buenos días.
Cree el código (entre otros muchos) que sigue abajo, pero no consigo que la predicción empiece en el mes de octubre en vez de en enero. Por favor, ¿qué estoy haciendo mal?
gracias y un saludo
fecha <- as.Date(c("2015-01-28", "2015-02-04","2015-03-25", "2015-04-07", "2015-05-27", "2015-06-15", "2015-07-21", "2015-08-26", "2015-09-18", "2015-10-28", "2015-11-11", "2015-12-28", "2016-01-27", "2016-02-25", "2016-03-21", "2016-04-13", "2016-05-03", "2016-06-28", "2016-07-27", "2016-08-26", "2016-09-28"))
importe <- as.numeric(c(38482329.42, 40170005.73, 39573901.41, 38194584.46, 41308008.57, 39286280.41, 39140885.40, 40131789.82, 41331386.52, 41388516.82, 39467688.74, 40413666.02, 38601205.36, 40969065.69, 39963439.96, 39183362.01, 39445567.03, 38392694.62, 43295992.07, 45414800.06, 47209602.20))
com = data.frame(fecha, importe)
modelo1=HoltWinters(ts(com, frequency = 12))
cas=predict(modelo1,12)
cas
Jan Feb Mar Apr May Jun Jul Aug Sep
4 55917454 56425608 56933750
5 58966358 59474506 59982650 58888074 56120458 53307399
Oct Nov Dec
4 57441909 57950043 58458210
5