[R-es] Cambio de "titulo" en barra de un grafico

[neo]

Muchas gracias Oscar !! tu solucion funciona perfecto tambien.

Saludos, Eric.




On 06/07/14 11:09, Oscar Perpiñan wrote:
> Hola,
> 
> Otra opción es convertir la variable que define los paneles (dia) en
> un factor. De esta forma, lattice::xyplot (y Hmisc::xYplot) nombra los
> paneles de forma automática con el valor del nivel que corresponde. Si
> además quieres que aparezca el nombre de la variable, puedes usar el
> argumento `strip`.
> Por otra parte, puedes definir el subconjunto de datos que te
> interesan con el argumento `subset`. Este argumento se evalúa
> directamente en `data`, con lo que el código queda algo más limpio.
> 
> Todo esto queda así:
> 
> library(Hmisc)
> 
> mfctr <- read.csv('datosgrafico.csv')
> mfctr$dia <- factor(mfctr$dia)
> 
> xYplot(Cbind(mean,ll,ul) ~ con| dia,
>        groups=sol,
>        ## subconjunto de datos a representar
>        subset = dia %in% c(1, 7),
>        data=mfctr,
>        ## la etiqueta de cada panel *también* incluye el nombre de la variable
>        strip = strip.custom(strip.names = TRUE),
>        auto.key=list(cex=0.8, x = .58, y = .7, corner = c(0,0), columns=1),
>        xlab=list("Solvent concentration (%v/v)", cex=1.2),
>        ylab=list("saturated / unsaturated ratio", cex=1.2),
>        aspect=(1/3), ylim = c(-0.1, 0.7), scales=list(cex=1.1),
>        par.settings= simpleTheme(pch=c(0,1,2,5), lwd = 1.5, cex = 1),
>        layout=c(1,2))
> 
> 
> Saludos.
> 
> Oscar.
> 
> -----------------------------------------------------------------
> Oscar Perpiñán Lamigueiro
> Dpto. Ingeniería Eléctrica (ETSIDI-UPM)
> Grupo de Sistemas Fotovoltaicos (IES-UPM)
> URL: http://oscarperpinan.github.io
> Twitter: @oscarperpinan
> 
> 
> El día 5 de julio de 2014, 1:08, Carlos Ortega
> <cof en qualityexcellence.es> escribió:
>> Hola,
>>
>> Esta es una manera de hacerlo (he incluido un par de cambios adicionales en
>> las etiquetas):
>>
>> #---------------------------------
>> mfctr$dia.new <- paste("dia_",mfctr$dia, sep="")
>>
>> xYplot (Cbind(mean,ll,ul) ~ con| dia.new
>>         , groups=sol
>>         , data=mfctr[mfctr$dia.new =="dia_1" | mfctr$dia.new =="dia_7", ]
>>
>>         , auto.key=list(cex=0.8, x = .58, y = .7, corner = c(0,0),
>> columns=1)
>>         , xlab=list("Solvent concentration (%v/v)", cex=1.2, font=2)
>>         , ylab=list("saturated / unsaturated ratio", cex=1.2, font=2)
>>         , aspect=(1/3), ylim = c(-0.1, 0.7), scales=list(cex=1.1)
>>
>>         , panel=function(...)
>>         {
>>           panel.xYplot(...,type =c("p"),lty =1.5, label =FALSE)
>>         }
>>         , par.settings= simpleTheme( pch=c(0,1,2,5) , cex = 1)
>>         , par.strip.text=list(col="blue", font=2, cex=1.2)
>>         , layout=c(1,2)
>> )
>> #---------------------------------
>>
>> Saludos,
>> Carlos Ortega
>> www.qualityexcellence.es
>>
>>
>>
>> El 4 de julio de 2014, 21:53, neo <ericconchamunoz en gmail.com> escribió:
>>
>>> Estimados gracias por todos los consejos para resolver el tema de la
>>> importacion de una linea de texto, al final era lo que decia Francisco
>>> respecto al mu que estaba en la linea y la codificacion de lenguaje.
>>>
>>> Ahora tengo otra consulta, pero esta vez respecto a graficos con
>>> lattice. Hago un grafico (adjunto) con el siguiente codigo:
>>>
>>>
>>> xYplot (Cbind(mean,ll,ul) ~ con| dia, groups=sol, data=mfctr[mfctr$dia
>>> ==1 | mfctr$dia ==7,]
>>> , auto.key=list(cex=0.8, x = .58, y = .7, corner = c(0,0), columns=1)
>>> , xlab=list("Solvent concentration (%v/v)", cex=1.2),
>>> ylab=list("saturated / unsaturated ratio", cex=1.2)
>>> , aspect=(1/3), ylim = c(-0.1, 0.7), scales=list(cex=1.1)
>>> , panel=function(...)
>>> {
>>> panel.xYplot(...,type =c("p"),lty =1.5, label =FALSE)
>>> }
>>> , par.settings= simpleTheme(
>>> , pch=c(0,1,2,5) , cex = 1)
>>> , layout=c(1,2)
>>> )
>>>
>>> y como se observa en el grafico adjunto, el "titulo" de ambos paneles
>>> dice "dia", lo que es correcto. Sin embargo, como se ve en el codigo son
>>> dos dias diferentes. Luego la pregunta es.
>>>
>>> como podria hacer para que ese titulo diga efectivamente "dia 1" y "dia
>>> 7" que es mas conveniente ? he probado algunas cosas, pero no tengo
>>> mucha experiencia con lattice.
>>>
>>> adjunto tambien los datos para que puedan probar.
>>>
>>>
>>>
>>> Saludos y muchas gracias.
>>>
>>> eric.
>>>
>>>
>>>
>>> --
>>> Forest Engineer
>>> Master in Environmental and Natural Resource Economics
>>> Ph.D. student in Sciences of Natural Resources at La Frontera University
>>> Member in AguaDeTemu2030, citizen movement for Temuco with green city
>>> standards for living
>>>
>>> Nota: Las tildes se han omitido para asegurar compatibilidad con algunos
>>> lectores de correo.
>>>
>>> _______________________________________________
>>> 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]]
>>
>>
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es en r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>
> 

-- 
Forest Engineer
Master in Environmental and Natural Resource Economics
Ph.D. student in Sciences of Natural Resources at La Frontera University
Member in AguaDeTemu2030, citizen movement for Temuco with green city
standards for living

Nota: Las tildes se han omitido para asegurar compatibilidad con algunos
lectores de correo.