Hi,

Something like this perhaps,

p <- xyplot(y ~ x | names,
   layout = c(1, 3),
   panel = function(...,type="p") {
       if (panel.number() == 1) {
         panel.xyplot(...,type = "h")
          } else {
         panel.xyplot(...,type = type)
         }
       })

plot(p)

HTH,

baptiste

2009/9/7 Bryan Hanson <han...@depauw.edu>

> Hello R Folks...
>
> Using the example below, Iąd like two of the panels to be plotted with type
> = łp˛ but the third to be done with type = łh˛.  I canąt use type = 
> c(łp˛,
> łp˛, łh˛) because this syntax applies all given types to every panel.  I
> donąt think I can use groups and distribute.type because these are intended
> for different styles of plotting within a single panel.  As you can see, I
> tried to do a panel function following something I saw in the Lattice book,
> but this has no effect at all.  Looks like it may have to be more
> elaborate,
> but Iąm stuck.  Any suggestions appreciated!
>
> Thanks, Bryan
> *************
> Bryan Hanson
> Professor of Chemistry & Biochemistry
> DePauw University, Greencastle IN USA
>
>
> y <- rnorm(100)
> x <- rnorm(100)
> names <- rep(c("Set 1", "Set 2", "Set 3"), 4)
> df <- data.frame(y = y, x = y, names = as.factor(names))
> p <- xyplot(y ~ x | names,
>    layout = c(1, 3),
>    panel = function(...) {
>        panel.xyplot(...)
>        if (panel.number() == 1) type = "h"
>        })
>
> plot(p)
>
>        [[alternative HTML version deleted]]
>
>
> ______________________________________________
> 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.
>
>


-- 
_____________________________

Baptiste Auguié

School of Physics
University of Exeter
Stocker Road,
Exeter, Devon,
EX4 4QL, UK

http://newton.ex.ac.uk/research/emag
______________________________

        [[alternative HTML version deleted]]

______________________________________________
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.

Reply via email to