"Marcuzzi, Javier Rubén"
2013-Nov-19 04:02 UTC
[R-es] como agrego una linea dibujada con abline() en la leyenda de un grafico ?
Eric Recordé un ejemplo rápido ## Setup up coordinate system (with x == y aspect ratio): plot(c(-2,3), c(-1,5), type = "n", xlab = "x", ylab = "y", asp = 1) ## the x- and y-axis, and an integer grid abline(h = 0, v = 0, col = "gray60") text(1,0, "abline( h = 0 )", col = "gray60", adj = c(0, -.1)) abline(h = -1:5, v = -2:3, col = "lightgray", lty = 3) abline(a = 1, b = 2, col = 2) text(1,3, "abline( 1, 2 )", col = 2, adj = c(-.1, -.1)) ¿Es eso lo que necesita? Javier Marcuzzi El 18/11/13 22:49, neo escribió:> solo quiero reponer esta pregunta ya que necesito hacer esto en varios > graficos > > slds, eric. > > > > > > > > > On 11/16/2013 07:39 PM, neo wrote: >> Estimados, tengo un grafico al que agregue una linea con abline(), este >> es el codigo ... >> >> library(Hmisc) >> >> # agregar una linea horizontal con el valor del angulo de contacto del >> control >> trellis.device(color = FALSE) >> xYplot(Cbind(ca.med[,3],ca.med[,5],ca.med[,6])~ca.med[,2], groups=Sol, >> data=ca.med, xlab=list(label="Concentration (mM)", cex=1.3), >> ylab=list(label="Contact Angle (°)", cex=1.3), keys="lines", type="b", >> method="bars", scales=list(x=list(log=10), cex=1.3), abline=list(h=120, >> lty=4)) >> >> >> >> >> Mi pregunta es, como puedo hacer que la linea dibujada con abline() >> aparezca en la leyenda con su respectivo tipo de linea ?? >> >> Adjunto el conjunto de datos para que prueben, >> >> mucha gracias, eric. >> > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es
neo
2013-Nov-19 07:24 UTC
[R-es] como agrego una linea dibujada con abline() en la leyenda de un grafico ?
Hola Javier, tu idea me hubiera solucionado el problema si hubiera estado usando plot() para hacer el grafico, pero como estoy forzado a usar xYplot() del a libreria Hmisc, me arroja un error diciendo que aun no uso plot() ... alguna otra idea si estoy usando Hmisc o lattice ? gracias, eric. On Tue 19 Nov 2013 01:02:50 AM CLST, "Marcuzzi, Javier Rubén" wrote:> Eric > > Recordé un ejemplo rápido > > ## Setup up coordinate system (with x == y aspect ratio): > plot(c(-2,3), c(-1,5), type = "n", xlab = "x", ylab = "y", asp = 1) > ## the x- and y-axis, and an integer grid > abline(h = 0, v = 0, col = "gray60") > text(1,0, "abline( h = 0 )", col = "gray60", adj = c(0, -.1)) > abline(h = -1:5, v = -2:3, col = "lightgray", lty = 3) > abline(a = 1, b = 2, col = 2) > text(1,3, "abline( 1, 2 )", col = 2, adj = c(-.1, -.1)) > > ¿Es eso lo que necesita? > > Javier Marcuzzi > > El 18/11/13 22:49, neo escribió: >> solo quiero reponer esta pregunta ya que necesito hacer esto en varios >> graficos >> >> slds, eric. >> >> >> >> >> >> >> >> >> On 11/16/2013 07:39 PM, neo wrote: >>> Estimados, tengo un grafico al que agregue una linea con abline(), este >>> es el codigo ... >>> >>> library(Hmisc) >>> >>> # agregar una linea horizontal con el valor del angulo de >>> contacto del >>> control >>> trellis.device(color = FALSE) >>> xYplot(Cbind(ca.med[,3],ca.med[,5],ca.med[,6])~ca.med[,2], >>> groups=Sol, >>> data=ca.med, xlab=list(label="Concentration (mM)", cex=1.3), >>> ylab=list(label="Contact Angle (°)", cex=1.3), keys="lines", type="b", >>> method="bars", scales=list(x=list(log=10), cex=1.3), abline=list(h=120, >>> lty=4)) >>> >>> >>> >>> >>> Mi pregunta es, como puedo hacer que la linea dibujada con abline() >>> aparezca en la leyenda con su respectivo tipo de linea ?? >>> >>> Adjunto el conjunto de datos para que prueben, >>> >>> mucha gracias, eric. >>> >> _______________________________________________ >> R-help-es mailing list >> R-help-es en r-project.org >> https://stat.ethz.ch/mailman/listinfo/r-help-es > > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es >
"Marcuzzi, Javier Rubén"
2013-Nov-19 12:16 UTC
[R-es] como agrego una linea dibujada con abline() en la leyenda de un grafico ?
Estimado Eric
En Hmisc la función labcurve puede ser útil, en todos casos crear una
curva con valores constantes, habría que intentar, pero labcurve en
algunos ejemplos en mi computadora no anda.
Ayer envié dos correos, el primero era de latticeextra, usted nombra
lattice, pero podría funcionar, en latticeextra:
## horizontal and vertical lines
xyplot(ysim ~ xsim) +
layer(panel.ablineq(v = 3, pos = 4, at = 0.1, lty = 2,
label = "3.0 (critical value)")) +
layer(panel.ablineq(h = mean(ysim), pos = 3, at = 0.15, lty = 2,
varNames = alist(y = plain(mean)(y))))
Javier Marcuzzi
El 19/11/13 04:24, neo escribió:> Hola Javier, tu idea me hubiera solucionado el problema si hubiera
> estado usando plot() para hacer el grafico, pero como estoy forzado a
> usar xYplot() del a libreria Hmisc, me arroja un error diciendo que aun
> no uso plot() ... alguna otra idea si estoy usando Hmisc o lattice ?
>
> gracias,
>
> eric.
>
>
>
>
>
>
>
> On Tue 19 Nov 2013 01:02:50 AM CLST, "Marcuzzi, Javier Rubén"
wrote:
>> Eric
>>
>> Recordé un ejemplo rápido
>>
>> ## Setup up coordinate system (with x == y aspect ratio):
>> plot(c(-2,3), c(-1,5), type = "n", xlab = "x", ylab
= "y", asp = 1)
>> ## the x- and y-axis, and an integer grid
>> abline(h = 0, v = 0, col = "gray60")
>> text(1,0, "abline( h = 0 )", col = "gray60", adj =
c(0, -.1))
>> abline(h = -1:5, v = -2:3, col = "lightgray", lty = 3)
>> abline(a = 1, b = 2, col = 2)
>> text(1,3, "abline( 1, 2 )", col = 2, adj = c(-.1, -.1))
>>
>> ¿Es eso lo que necesita?
>>
>> Javier Marcuzzi
>>
>> El 18/11/13 22:49, neo escribió:
>>> solo quiero reponer esta pregunta ya que necesito hacer esto en
varios
>>> graficos
>>>
>>> slds, eric.
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>> On 11/16/2013 07:39 PM, neo wrote:
>>>> Estimados, tengo un grafico al que agregue una linea con
abline(), este
>>>> es el codigo ...
>>>>
>>>> library(Hmisc)
>>>>
>>>> # agregar una linea horizontal con el valor del angulo de
>>>> contacto del
>>>> control
>>>> trellis.device(color = FALSE)
>>>> xYplot(Cbind(ca.med[,3],ca.med[,5],ca.med[,6])~ca.med[,2],
>>>> groups=Sol,
>>>> data=ca.med, xlab=list(label="Concentration (mM)",
cex=1.3),
>>>> ylab=list(label="Contact Angle (°)", cex=1.3),
keys="lines", type="b",
>>>> method="bars", scales=list(x=list(log=10), cex=1.3),
abline=list(h=120,
>>>> lty=4))
>>>>
>>>>
>>>>
>>>>
>>>> Mi pregunta es, como puedo hacer que la linea dibujada con
abline()
>>>> aparezca en la leyenda con su respectivo tipo de linea ??
>>>>
>>>> Adjunto el conjunto de datos para que prueben,
>>>>
>>>> mucha gracias, eric.
>>>>
>>> _______________________________________________
>>> R-help-es mailing list
>>> R-help-es@r-project.org
>>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es@r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>
[[alternative HTML version deleted]]
Apparently Analagous Threads
- como agrego una linea dibujada con abline() en la leyenda de un grafico ?
- como agrego una linea dibujada con abline() en la leyenda de un grafico ?
- como agrego una linea dibujada con abline() en la leyenda de un grafico ?
- como agrego una linea dibujada con abline() en la leyenda de un grafico ?
- Es posible controlar el tipo de linea que se agrega con abline() en un grafico ?