[R-es] Fwd: barchart con abline en lattice

[Carlos Ortega]

Hola,

De esta forma:

chart<- barchart(web[,2] ~ web[,1],
panel= function (...){
panel.abline(h=mean(web[,2]), lwd = 3, col.line="red")
panel.barchart(...)},
ylab=colnames(web)[2],
xlab="Country",
main= "Social Web Involvement",
)
print (chart)

Saludos,
Carlos Ortega
www.qualityexcellence.es

El 5 de noviembre de 2012 20:15, Beatriz Martínez <mtnezb en gmail.com>escribió:

> Hola a todos:
>
> soy nueva en R así que es posible que la pregunta sea simple, pero no
> encuentro la solución.
>
> El caso, quiero hacer un gráfico de barras sencillito, pero con una linea
> horizontal que represente la media. Para ello estoy usando el paquete
> lattice.
>
> Pues bien, si hago el gráfico sin aplicar la linea, no hay problema:
>
> -----
> barchart(web[,2] ~ web[,1],
>         col="#2C575D",
>         ylab=colnames(web)[2],
>         xlab="Country",
>         main= "Social Web Involvement")
>
> [image: Imágenes integradas 1]
>
> ------
>
> Ahora bien, cuando trato de pintar la linea, las barras se vuelven
> horizontales (a pesar de que las etiquetas de los ejes las mantiene en su
> sitio) y no tengo nada claro qué valores están representado. Eso sí, la
> linea de la media sale en su sitio.
>
> --------
> chart<- barchart(web[,2] ~ web[,1],
> panel= function (x,y){
>  panel.abline(h=mean(web[,2]), lwd = 3, col.line="red")
> panel.barchart(x,y, col="#2C575D")},
>  ylab=colnames(web)[2],
> xlab="Country",
>  main= "Social Web Involvement",
> )
> print (chart)
>
>
> [image: Imágenes integradas 2]
>
> ¿alguna idea de cómo tener el primer gráfico con la linea del segundo?
>
> Muchísimas gracias de antemano
>
> Saludos,
>
> Beatriz Martínez
>
>
>
> _______________________________________________
> 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/20121105/79ba958c/attachment-0001.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: no disponible
Type: image/png
Size: 23648 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20121105/79ba958c/attachment-0002.png>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: no disponible
Type: image/png
Size: 23656 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20121105/79ba958c/attachment-0003.png>