Hola, AirPassengers es un objeto de tipo "ts" (time-series). Puedes crear un objeto parecido a partir de tus datos con la función "ts()", indicando los datos, el origen de la serie y la frecuencia (en tu caso 52 por ser semanas).
El siguiente código consigue esto. He incluido una secuencia de colores para pintar los resultados. #----------------------------------- library(RColorBrwer) #Leo fichero datIn <- read.table("x.csv", header=T, as.is=T, sep=",") #Contruyo la serie temporal datEnd <- ts(datIn$cantidad, frequency=52, start=2005) #Defino conjunto de colores micolores <- brewer.pal(length(unique(datIn$anio)),"Paired") #Graficos de las series seasonplot(datEnd,col=micolores,year.labels=TRUE) plot(datEnd) #----------------------------------- Saludos, Carlos Ortega www.qualityexcellence.es El 19 de octubre de 2014, 14:29, jbetancourt <jbetanco...@iscmc.cmw.sld.cu> escribió: > > > Esatimados: > > > > En esta librería está este análisis > > library(forecast) > > seasonplot (AirPassengers,col=rainbow(12),year.labels=TRUE) > > > > queremos transformar los datos de x.csv a la misma estructura de > AirPassengers, para hacer el mismo análisis. Adjunto x.csv > > > > Saludos > > _______________________________________________ > R-help-es mailing list > R-help-es@r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es > > -- Saludos, Carlos Ortega www.qualityexcellence.es [[alternative HTML version deleted]] _______________________________________________ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es