[R-es] problema con los cambios de marcas temporales en el eje X

[daniel]

Disculpas por ingresar tarde en este debate. Si te entiendo bien mi
solución sería usar el paquete zoo:

library(zoo)
datIn <- read.csv2("Libro1.csv")
datIn <- zoo(datIn[,-1], order.by=as.Date(datIn$fecha, format="%d/%m/%y"))
plot (datIn$xbar ,ylim=c(400,660),  type="b", pch=19,cex=1)
axis(2)
box()
arrows( x0=index(datIn),y0=datIn$lci
       ,x1=index(datIn),y1=datIn$lcs
       ,angle=90,code=3,length=.1 )

Suerte,

Daniel Merino





El 8 de septiembre de 2014, 16:12, Carlos Fernández-Delgado <ba1fedec en uco.es
> escribió:

> Hola de nuevo, acabo de encontrar la solución. He creado una variable
> ficticia con los días 1 de cada mes en la secuencia temporal que quería y
> después he actuado de la siguiente manera
>
> attach(Libro1)
> plot (xbar~as.Date(fecha,"%d/%m/%y"), type="b", pch=19,cex=2,xaxt="n")
> xlabels<-strptime(ofeje, format = "%d/%m/%y")
> axis.Date(1, at=xlabels[xlabels$mday==1], format="%b-%y")
>
>
> El resultado se plasma en la grafica adjunta, por si alguien está
> interesado también envío la base de datos con la variable ficticia. Muchas
> gracias y disculpas por las molestias.
> Un cordial saludo.
> Carlos
>
>
> El 08/09/2014, a las 00:05, Carlos Ortega <cof en qualityexcellence.es>
> escribió:
>
> Hola,
>
> Una forma de hacerlo es:
> 1. incluyes un parámetro en "plot(..., axes=F)" y así indicas que no
> quieres pintar automáticamente los ejes.
> 2. Y ahora construyes el eje "x" con la función "axis()".
> 3. Dentro de axis(), dirás cada cuánto quieres pintar una marca (parámetro
> "at") y qué quieres incluir en la marca (parámetro "label").
>
> Para ver un ejemplo, mira el ejemplo que aparece en la ayuda de la función
> "axis()".
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
>
> El 7 de septiembre de 2014, 20:46, Carlos Fernández-Delgado <
> ba1fedec en uco.es> escribió:
>
>> Estimada Comunidad, solicito vuestra ayuda en un tema quizás un poco
>> tonto, pero no logro dar con la tecla.
>> Estoy intentando hacer una gráfica de la evolución temporal de una
>> variable (xbar) a lo largo del tiempo.
>> La secuencia que he hecho es la siguiente:
>> attach(Libro1)
>> plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,650), type="b",
>> pch=19,cex=1)
>>
>> arrows(x0=as.Date(fechas,"%d/%m/%y"),y0=lci,x1=as.Date(fechas,"%d/%m/%y"),y1=lcs,angle=90,code=3,length=.1)
>>
>> El problema es que la gráfica emitida por R me saca en abscisas una serie
>> de meses que me los coloca por defecto (ver gráfica adjunta) y lo que yo
>> quiero es poner marcas mensuales desde agosto de 2013 hasta mayo 2014,
>> incluido el cambio de año (ya sea dic’13 o ene’14), pero por mucho que lo
>> intento no me sale.
>>
>> ¿Podéis ayudarme?.
>> Muchas gracias por adelantado y un cordial saludo
>>
>> Carlos
>>
>>
>>
>>
>>
>>
>>
>>
>>
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es en r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>
>>
>
>
> --
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>


-- 
Daniel

	[[alternative HTML version deleted]]