Thank you, Deepayan, that works perfectly!
Regards,
Sarah
Deepayan Sarkar wrote:
> On 10/16/07, Sarah Barry <[EMAIL PROTECTED]> wrote:
>
>>Hi,
>>
>>I am trying to produce a 30x30 lattice grid. The 30 variables naturally
>>fall into three groups of ten and I would like to add thicker axis lines
>>around these to highlight this. However, I can only do this separately,
>>so far, and I don't know how to superimpose the grid with the thicker
>>lines (separating the 10x10 groups) onto the overall grid of all 30x30
>>plots. I enclose a reproducible example:
>>
>>#####
>>require(lattice)
>>temp.df <- sapply(1:30, function(i) rnorm(20, 0,1))
>>
>>splom(~temp.df, aspect="fill", varnames=paste("coord", 1:30, sep=""),
>>xlab="", pscales=0, varname.cex=0.6, panel=function(x, y, ...){
>> panel.xyplot(x,y, cex=0.2, xlab="", ylab="")
>>})
>>
>>splom(~matrix(c(1,2,3), nc=3), aspect="fill", varnames=NULL, xlab="",
>>pscales=0, axis.line.lwd=4, varname.cex=0.6, panel=function(x, y, ...){
>> panel.xyplot(x,y, cex=0.2, xlab="", ylab="", type="n")
>>})
>>#####
>
>
> Thanks for the example. Try
>
> splom(~temp.df, aspect="fill", varnames=paste("coord", 1:30, sep=""),
> xlab="", pscales=0, varname.cex=0.6, cex=0.2,
> ## panel = panel.xyplot, # unnecessary
> superpanel = function(...) {
> panel.pairs(...)
> panel.grid(h = 2, v = 2, col = "black", lwd = 4)
> })
>
> 'superpanel' is documented in ?splom.
>
> (BTW, panel.xyplot doesn't know anything about xlab, ylab, etc., and
> you can specify cex as part of the top level call)
>
> -Deepayan
--
Sarah Barry, MSc
Department of Statistics
University of Glasgow
Tel: +44 (0)141 330 2474
Fax: +44 (0)141 330 4814
www.stats.gla.ac.uk/~sarah
______________________________________________
R-help@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.
