Code R : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Data_Brute_zoo <- zoo( Data_Brute[-1], order.by = Data_Brute$Date ) Data_Brute_ts <- ts(Data_Brute_zoo, start=c(2010, 1), frequency = 12) l1 <- lapply(Data_Brute_ts, function(e) try(seas(e, x11 = "",estimate.maxiter=10000))) is.err <- sapply(l1, class) == "try-error" l1[is.err] csv_final = data.frame(do.call(cbind, lapply(l1[!is.err], final)))
je veux traduire en python
Partager