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]]

