> On Dec 28, 2016, at 6:50 PM, sbihorel <sebastien.biho...@cognigencorp.com> 
> wrote:
> 
> Hi,
> 
> I would like to create a custom key for a lattice xyplot in which line 
> elements are displayed on top of rectangle elements. In the example code 
> below, the lines and rectangles are shown side by side (the legend itself is 
> meaningless, but that is not the point). Is there a way to overlay these key 
> elements (but not the text)?
> 
> Thanks
> 
> xyplot(Sepal.Length + Sepal.Width ~ Petal.Length + Petal.Width,
>  iris,
>  type = c("p", "r"),
>  jitter.x = TRUE,
>  jitter.y = TRUE,
>  factor = 5,
>  key = list(
>    column=4,
>    text=list(lab=letters[1:4]),
>    lines=list(col=1:4, pch=1:4, type='b'),
>    rectangles=list(col=1:4, alpha=0.25, border=FALSE)
>  )
> )

I'm not seeing the result that you describe. Attached is the pdf that comes 
from:

 pdf(); print( xyplot(Sepal.Length + Sepal.Width ~ Petal.Length + Petal.Width,
 iris,
 type = c("p", "r"),
 jitter.x = TRUE,
 jitter.y = TRUE,
 factor = 5,
 key = list(
   column=4,
   text=list(lab=letters[1:4]),
   lines=list(col=1:4, pch=1:4, type='b'),
   rectangles=list(col=1:4, alpha=0.25, border=FALSE)
 )
) ); dev.off()

Attachment: Rplots.pdf
Description: Adobe PDF document


-- 
David Winsemius
Alameda, CA, USA

______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.

Reply via email to