<html><head><meta http-equiv="Content-Type" content="text/html charset=windows-1252"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div apple-content-edited="true"><div style="orphans: auto; text-align: start; text-indent: 0px; widows: auto; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="orphans: auto; text-align: start; text-indent: 0px; widows: auto; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="orphans: auto; text-align: start; text-indent: 0px; widows: auto; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="orphans: 2; text-align: -webkit-auto; text-indent: 0px; widows: 2; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="orphans: 2; text-align: -webkit-auto; text-indent: 0px; widows: 2; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><span class="Apple-style-span" style="border-collapse: separate; orphans: 2; text-indent: 0px; widows: 2; border-spacing: 0px;"><div style="orphans: 2; text-align: start; text-indent: 0px; widows: 2; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="color: rgb(0, 0, 0); letter-spacing: normal; text-transform: none; white-space: normal; word-spacing: 0px; -webkit-text-stroke-width: 0px; orphans: auto; widows: auto;">Muchas gracias Carlos, previo a mi correo, entre las pruebas que hice estaba una parecida a la que apuntas de la siguiente manera:</div><div style="color: rgb(0, 0, 0); letter-spacing: normal; text-transform: none; white-space: normal; word-spacing: 0px; -webkit-text-stroke-width: 0px; orphans: auto; widows: auto;"><br></div><div style="color: rgb(0, 0, 0); letter-spacing: normal; text-transform: none; white-space: normal; word-spacing: 0px; -webkit-text-stroke-width: 0px; orphans: auto; widows: auto;">attach (Libro1)</div><div style="orphans: auto; widows: auto;"><div>plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,660), xaxt="n", type="b", pch=19,cex=1)</div><div> xlabels<-strptime(fecha,format="%d/%m/%Y")</div><div> axis.Date (1,at=xlabels,format="%b-%y")</div><div>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)</div></div><br></div>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. </span></div><div style="orphans: 2; text-align: -webkit-auto; text-indent: 0px; widows: 2; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><span class="Apple-style-span" style="border-collapse: separate; orphans: 2; text-indent: 0px; widows: 2; border-spacing: 0px;">Muchas gracias por tu ayuda.</span></div><div style="orphans: 2; text-align: -webkit-auto; text-indent: 0px; widows: 2; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><span class="Apple-style-span" style="border-collapse: separate; orphans: 2; text-indent: 0px; widows: 2; border-spacing: 0px;">Carlos<br class="Apple-interchange-newline"><br></span></div></div></div></div></div>
</div>
<br><div><div>El 08/09/2014, a las 00:05, Carlos Ortega <<a href="mailto:cof@qualityexcellence.es">cof@qualityexcellence.es</a>> escribió:</div><br class="Apple-interchange-newline"><div><div dir="ltr"><div class="gmail_default" style="font-family:verdana,sans-serif">Hola,<br><br></div><div class="gmail_default" style="font-family:verdana,sans-serif">Una forma de hacerlo es:<br></div><div class="gmail_default" style="font-family:verdana,sans-serif">1. incluyes un parámetro en "plot(..., axes=F)" y así indicas que no quieres pintar automáticamente los ejes.<br></div><div class="gmail_default" style="font-family:verdana,sans-serif">2. Y ahora construyes el eje "x" con la función "axis()".<br></div><div class="gmail_default" style="font-family:verdana,sans-serif">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").<br></div><div class="gmail_default" style="font-family:verdana,sans-serif"><br>Para ver un ejemplo, mira el ejemplo que aparece en la ayuda de la función "axis()".<br></div><div class="gmail_default" style="font-family:verdana,sans-serif"><br></div><div class="gmail_default" style="font-family:verdana,sans-serif">Saludos,<br></div><div class="gmail_default" style="font-family:verdana,sans-serif">Carlos Ortega<br></div><div class="gmail_default" style="font-family:verdana,sans-serif"><a href="http://www.qualityexcellence.es/">www.qualityexcellence.es</a><br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">El 7 de septiembre de 2014, 20:46, Carlos Fernández-Delgado <span dir="ltr"><<a href="mailto:ba1fedec@uco.es" target="_blank">ba1fedec@uco.es</a>></span> escribió:<br><blockquote class="gmail_quote" style="margin: 0px 0px 0px 0.8ex; border-left-width: 1px; border-left-color: rgb(204, 204, 204); border-left-style: solid; padding-left: 1ex; position: static; z-index: auto;"><div style="word-wrap:break-word">Estimada Comunidad, solicito vuestra ayuda en un tema quizás un poco tonto, pero no logro dar con la tecla.<div>Estoy intentando hacer una gráfica de la evolución temporal de una variable (xbar) a lo largo del tiempo.</div><div>La secuencia que he hecho es la siguiente:</div><div><div>attach(Libro1)</div><div>plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,650), type="b", pch=19,cex=1)</div><div>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)</div><div><br></div><div>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.</div><div><br></div><div>¿Podéis ayudarme?.</div><div>Muchas gracias por adelantado y un cordial saludo</div><span class="HOEnZb"><font color="#888888"><div><br></div><div>Carlos</div><div><br></div><div><br></div><div>
<div style="letter-spacing: normal; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; word-spacing: 0px; word-wrap: break-word;"><div style="text-align:start;text-indent:0px;word-wrap:break-word"><div style="text-align:start;text-indent:0px;word-wrap:break-word"><div style="text-align:-webkit-auto;text-indent:0px;word-wrap:break-word"><div style="text-align:-webkit-auto;text-indent:0px;word-wrap:break-word"><span style="border-collapse:separate;border-spacing:0px"><div style="text-align:start;text-indent:0px;word-wrap:break-word"><div style="font-family: Times; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-transform: none; white-space: normal; word-spacing: 0px;"><br></div><br></div><br><br></span></div></div></div></div></div>
</div>
</font></span></div></div><br><div style="word-wrap:break-word"><div></div></div><br><div style="word-wrap:break-word"><div></div></div><br>_______________________________________________<br>
R-help-es mailing list<br>
<a href="mailto:R-help-es@r-project.org">R-help-es@r-project.org</a><br>
<a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
<br></blockquote></div><br><br clear="all"><br>-- <br><span style="font-family:verdana,sans-serif">Saludos,</span><br style="font-family:verdana,sans-serif">
<span style="font-family:verdana,sans-serif">Carlos Ortega</span><br style="font-family:verdana,sans-serif">
<span style="font-family:verdana,sans-serif"><a href="http://www.qualityexcellence.es/" target="_blank">www.qualityexcellence.es</a></span>
</div>
</div></div></body></html>