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