Hola, estoy representando los datos Duncan de la libreria car y cuando hago un gráfico lattice observo que la profesión "architect" aparece en dos subgráficos que no se corresponden con su categoría. Alguien sabe el motivo? Os adjunto un fichero con el código y el gráfico resultante. Gracias, Manuel ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20131120/c7fa5bc9/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: grafico.jpeg Type: image/jpeg Size: 207891 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20131120/c7fa5bc9/attachment-0001.jpeg> ------------ próxima parte ------------ An embedded and charset-unspecified text was scrubbed... Name: grafico.R URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20131120/c7fa5bc9/attachment-0001.pl>
Hola, En la dirección de lo que comenta Óscar. Para poder pasarle los subscripts a panel tienes que crear "groups" sobre las profesiones. Mira los cambios en lo siguiente: #-------------------------------------- *Duncan$profe <- rownames(Duncan)* xyplot( income~education|type, ,*groups=profe* ,data=Duncan #,aspect="xy" ,type=c("p"),layout=c(1,3) ,xlab = names(Duncan)[3] ,ylab = names(Duncan)[2] ,main = "Relación entre ingresos y educación" * ,xlim=c(0,100)* * ,ylim=c(0,120)* *, panel = function(x, y ,subscripts, groups) {* panel.lmline(x,y,col="red") * panel.xyplot(x,y, grid=T)* * ltext(x=x, y=y, labels=groups[subscripts], cex = 0.7, pos=3, offset=1, srt=0, adj=c(1,1))* } ) #-------------------------------------- Saludos, Carlos Ortega www.qualityexcellence.es El 20 de noviembre de 2013 10:34, <morales@us.es> escribió:> > > > > > Hola, estoy representando los datos Duncan de la libreria car y cuando > hago un gráfico lattice observo que la profesión "architect" aparece en dos > subgráficos que no se corresponden con su categoría. Alguien sabe el > motivo? Os adjunto un fichero con el código y el gráfico resultante. > > Gracias, > > Manuel > > > > > _______________________________________________ > R-help-es mailing list > R-help-es@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 por la solución. Funciona!!! El 20/11/2013 15:34, Carlos Ortega escribió:> Hola, > En la dirección de lo quecomenta Óscar.> Para poder pasarle los subscripts a panel tienes quecrear "groups" sobre las profesiones.> Mira los cambios en losiguiente:> #-------------------------------------- > > Duncan$profe> > xyplot( > income~education|type, > ,GROUPS=PROFE > ,data=Duncan> #,aspect="xy" > ,type=c("p"),layout=c(1,3) > ,xlab names(Duncan)[3] > ,ylab = names(Duncan)[2] > ,main = "Relación entreingresos y educación"> ,XLIM=C(0,100) > ,YLIM=C(0,120) > > , PANEL= FUNCTION(X, Y ,SUBSCRIPTS, GROUPS) {> panel.lmline(x,y,col="red") >PANEL.XYPLOT(X,Y, GRID=T)> LTEXT(X=X, Y=Y, LABELS=GROUPS[SUBSCRIPTS],CEX = 0.7, POS=3, OFFSET=1, SRT=0, ADJ=C(1,1))> } > ) >#--------------------------------------> Saludos, > Carlos Ortega >www.qualityexcellence.es [3]> > El 20 de noviembre de 2013 10:34,<morales@us.es [4]> escribió:> >> Hola, estoy representando los datosDuncan de la libreria car y cuando hago un gráfico lattice observo que la profesión "architect" aparece en dos subgráficos que no se corresponden con su categoría. Alguien sabe el motivo? Os adjunto un fichero con el código y el gráfico resultante.>> >> Gracias, >> >>Manuel>> >> _______________________________________________ >>R-help-es mailing list>> R-help-es@r-project.org [1] >>https://stat.ethz.ch/mailman/listinfo/r-help-es [2]> > -- >Saludos,> Carlos Ortega > www.qualityexcellence.es [5]Links: ------ [1] mailto:R-help-es@r-project.org [2] https://stat.ethz.ch/mailman/listinfo/r-help-es [3] http://www.qualityexcellence.es [4] mailto:morales@us.es [5] http://www.qualityexcellence.es [[alternative HTML version deleted]]