R help es - Sep 2014 - problema con los cambios de marcas temporales en el eje X

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






------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140907/f9910188/attachment.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: grafica.pdf
Type: application/pdf
Size: 7540 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140907/f9910188/attachment.pdf>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140907/f9910188/attachment-0001.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Libro1.csv
Type: text/csv
Size: 1521 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140907/f9910188/attachment.bin>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140907/f9910188/attachment-0002.html>

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

	[[alternative HTML version deleted]]

Muchas gracias Carlos, previo a mi correo, entre las pruebas que hice estaba una
parecida a la que apuntas de la siguiente manera:

attach (Libro1)
plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,660),
xaxt="n", type="b", pch=19,cex=1)
      xlabels<-strptime(fecha,format="%d/%m/%Y")
      axis.Date (1,at=xlabels,format="%b-%y")
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)

Pero esta me saca las etiquetas que yo tengo (ver grafica adjunta), sin embargo
lo que voy buscando es colocar las marcas de los meses enteros (con 30 o 31 días
según corresponda) en donde se ha realizado el estudio a lo largo del eje x.
Muchas gracias por tu ayuda.
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
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/9149aa40/attachment-0003.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: imagen.pdf
Type: application/pdf
Size: 7667 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/9149aa40/attachment-0001.pdf>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/9149aa40/attachment-0004.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Libro1.csv
Type: text/csv
Size: 1521 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/9149aa40/attachment-0001.bin>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/9149aa40/attachment-0005.html>

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
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/4c58f3f9/attachment-0003.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Libro1.csv
Type: text/csv
Size: 1880 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/4c58f3f9/attachment-0001.bin>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/4c58f3f9/attachment-0004.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Rplot.jpeg
Type: image/jpeg
Size: 64136 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/4c58f3f9/attachment-0001.jpeg>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20140908/4c58f3f9/attachment-0005.html>