Skip to content
Back to formatted view

Raw Message

Message-ID: <1127376648.7491.19.camel@Tardis.considine.local>
Date: 2005-09-22T08:10:48Z
From: John Charles Considine
Subject: xyplot and abline

How should I pass abline to this function so that I get a reference line
at h=0 in each panel?

sps <- trellis.par.get("superpose.symbol")
sps$pch <- 1:10
trellis.par.set("superpose.symbol",sps)
xyplot(fcast$LOGDIFF~fcast$VINTAGE|fcast$REGION,
       groups=fcast$LAG,
       panel=panel.superpose,
       type="b",mfcol=c(3,5),
       key=list(columns=3, 
         text=list(paste(c("forecast:  ", "",""),
           unique(fcast$LAG), "years")),
       points=Rows(sps,1:3)))

Cheers,

JC