[R] Simple lattice question

[Rubén Roa]

Thanks Peters!

Just a few minor glitches now:

require(lattice)
data <- data.frame(SP=sort(rep(as.factor(c('A','B','C','D','E')),12)),
                   x=rpois(60,10),
                   y=rep(c(rep(0,4),rep(10,4),rep(20,4)),5),
                   z=rep(1:4,15))
xyplot(x~y|SP,data=data,groups=z,layout=c(2,3),pch=1:4,lty=1:4,col='black',type='b',
       key=list(x = .65, y = .75, corner = c(0, 0), points=TRUE,
                  lines=TRUE, pch=1:4, lty=1:4, type='b',
                  text=list(lab = as.character(unique(data$z)))))

I have an extra column of symbols on the legend,

and,

would like to add a title to the legend. Such as 'main' for plots.

Any suggestions?

Rubén

____________________________________________________________________________________ 

Dr. Rubén Roa-Ureta
AZTI - Tecnalia / Marine Research Unit
Txatxarramendi Ugartea z/g
48395 Sukarrieta (Bizkaia)
SPAIN



> -----Mensaje original-----
> De: Peter Ehlers [mailto:ehlers at ucalgary.ca] 
> Enviado el: jueves, 31 de marzo de 2011 15:41
> Para: Rubén Roa
> CC: r-help at r-project.org
> Asunto: Re: [R] Simple lattice question
> 
> On 2011-03-31 03:39, Rubén Roa wrote:
> >
> > DeaR ComRades,
> >
> > require(lattice)
> > data<- 
> data.frame(SP=sort(rep(as.factor(c('A','B','C','D','E')),12)),
> >                     x=rpois(60,10),
> >                     y=rep(c(rep(0,4),rep(10,4),rep(20,4)),5),
> >                     z=rep(1:4,15))
> > 
> xyplot(x~y|SP,data=data,groups=z,layout=c(2,3),pch=1:4,lty=1:4,col='bl
> > ack',type='b')
> >
> > How do I put a legend for the grouping variable in the 
> empty upper-right panel?
> 
> See the help page for xyplot for an example using the iris data.
> You just need to add something like
> 
>   auto.key = list(x = .6, y = .7, corner = c(0, 0))
> 
> to your lattice call. See the 'key' entry on the ?xyplot page.
> 
> Peter Ehlers
> 
> >
> > TIA
> >
> > Rubén
> >
> > 
> ______________________________________________________________________
> > ______________
> >
> > Dr. Rubén Roa-Ureta
> > AZTI - Tecnalia / Marine Research Unit Txatxarramendi Ugartea z/g
> > 48395 Sukarrieta (Bizkaia)
> > SPAIN
> >
> > ______________________________________________
> > R-help at r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide 
> > http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
> 
>