R help - Jan 2007 - Adding lines to xYplot

I am using xYplot to plot data and CIs. How do I add several lines to  
the figure?
_____________________________
Professor Michael Kubovy
University of Virginia
Department of Psychology
USPS:     P.O.Box 400400    Charlottesville, VA 22904-4400
Parcels:    Room 102        Gilmer Hall
         McCormick Road    Charlottesville, VA 22903
Office:    B011    +1-434-982-4729
Lab:        B019    +1-434-982-4751
Fax:        +1-434-982-4766
WWW:    http://www.people.virginia.edu/~mk9y/

Am 27 Jan 2007 um 20:13 hat Michael Kubovy geschrieben:

To:             	"r-help at stat.math.ethz.ch list" <r-
help at stat.math.ethz.ch>
From:           	Michael Kubovy <kubovy at virginia.edu>
Date sent:      	Sat, 27 Jan 2007 20:13:15 -0500
Subject:        	[R] Adding lines to xYplot
> I am using xYplot to plot data and CIs. How do I add several lines to 
> the figure? 
It's not clear what you mean by "add several lines". Maybe 
<panel.abline> is what you are looking for? Another option might be 
to use <panel.xYplot(x,y,subscripts,type="b")>...

HTH,

Bernd


# Examples of plotting raw data
dfr <- expand.grid(month=1:12, 
continent=c('Europe','USA'),sex=c('female','male'))

set.seed(1)

dfr <- upData(dfr,  y=month/10 + 1*(sex=='female') + 
2*(continent=='Europe') + 
              runif(48,-.15,.15),
              lower=y - runif(48,.05,.15),
              upper=y + runif(48,.05,.15)
			  )

xYplot(Cbind(y,lower,upper) ~ month,
subset=sex=='male' & continent=='USA',
panel=function(x,y,subscripts){panel.xYplot(x,y,subscripts);
## add lines to the graph which denote means of x and y 
panel.abline(h=mean(y),v=mean(x))},data=dfr)

Hi

here is another approach based on Gabor Grothendieck's idea to add 
lines to existing lattice plot.

# based on Gabor Grothendieck's code suggestion
# adds straight lines to panels in lattice plots

addLine<- function(...) {
tcL <- trellis.currentLayout()
for(i in 1:nrow(tcL))
  for(j in 1:ncol(tcL))
    if (tcL[i,j] > 0) {
        trellis.focus("panel", j, i, highlight = FALSE)
        panel.abline(...)
        trellis.unfocus()
        }
}

HTH
Petr



On 27 Jan 2007 at 20:13, Michael Kubovy wrote:

To:             	"r-help at stat.math.ethz.ch list" <r-help at
stat.math.ethz.ch>
From:           	Michael Kubovy <kubovy at virginia.edu>
Date sent:      	Sat, 27 Jan 2007 20:13:15 -0500
Subject:        	[R] Adding lines to xYplot
> I am using xYplot to plot data and CIs. How do I add several lines to 
> the figure? _____________________________ Professor Michael Kubovy
> University of Virginia Department of Psychology USPS:     P.O.Box
> 400400    Charlottesville, VA 22904-4400 Parcels:    Room 102       
> Gilmer Hall
>          McCormick Road    Charlottesville, VA 22903
> Office:    B011    +1-434-982-4729
> Lab:        B019    +1-434-982-4751
> Fax:        +1-434-982-4766
> WWW:    http://www.people.virginia.edu/~mk9y/
> 
> ______________________________________________
> R-help at stat.math.ethz.ch 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.
Petr Pikal
petr.pikal at precheza.cz