panel.cartesian {HH} | R Documentation |
trellis panel function, with labeled rows and columns and without strip labels.
Description
trellis panel function, with labeled rows and columns and without strip labels. Designed for use with the ladder of powers plot.
Usage
panel.cartesian(x, y,
x.label=unique(panel.labels[,"x"]),
y.label=unique(panel.labels[,"y"]),
group.label.side="",
axis3.line=1,
xg.label, yg.label, g.cex=.7,
rescale=list(x=TRUE,y=TRUE), ...,
browser.on=FALSE)
Arguments
x , y |
x and y as for any other panel function |
x.label |
labels for the columns of the scatterplot matrix |
y.label |
labels for the rows of the scatterplot matrix |
axis3.line |
The |
group.label.side |
|
xg.label |
group labels for rows of the scatterplot matrix |
yg.label |
group labels for rows of the scatterplot matrix |
g.cex |
|
rescale |
alternate way to get something similar to |
... |
other arguments |
browser.on |
logical, normally |
References
Heiberger, Richard M. and Holland, Burt (2015). Statistical Analysis and Data Display: An Intermediate Course with Examples in R. Second Edition. Springer-Verlag, New York. https://link.springer.com/book/10.1007/978-1-4939-2122-5
See Also
Examples
data(rent) ## Weisberg's file alr162
rent.lm <- lm(rnt.alf ~ rnt.till + cow.dens + lime, data=rent)
rent$resid.rent <- resid(rent.lm)
xysplom(resid.rent ~ rnt.till + cow.dens | lime, data=rent,
layout=c(2,2))
xysplom(resid.rent ~ rnt.till + cow.dens | lime, data=rent,
layout=c(2,2),
xlab="", ylab="",
x.label="", y.label="",
group.label.side="",
par.strip.text=list(cex=1.2),
panel=panel.cartesian,
axis3.line=2.4,
scales=list(
relation="same",
alternating=FALSE, labels=FALSE, ticks=FALSE),
between=list(x=1, y=3))
xysplom(resid.rent ~ rnt.till + cow.dens | lime, data=rent,
layout=c(2,2),
xlab="", ylab="",
x.label="", y.label="",
group.label.side="",
par.strip.text=list(cex=1.2),
panel=panel.cartesian,
axis3.line=3.6,
scales=list(
relation="same",
alternating=FALSE, labels=FALSE, ticks=FALSE),
rescale=list(x=FALSE, y=FALSE),
between=list(x=1, y=3))
xysplom(resid.rent ~ rnt.till + cow.dens | lime, data=rent,
layout=c(2,2),
xlab="", ylab="",
x.label="", y.label="",
group.label.side="",
par.strip.text=list(cex=1.2),
panel=panel.cartesian,
axis3.line=3.6,
scales=list(
relation="free",
alternating=FALSE, labels=FALSE, ticks=FALSE),
between=list(x=1, y=3))
tmp <-
xysplom(resid.rent ~ rnt.till + cow.dens | lime, data=rent,
layout=c(2,2),
xlab="", ylab="",
y.label="resid",
group.label.side="top",
par.strip.text=list(cex=1.2),
panel=panel.cartesian,
axis3.line=3.6,
scales=list(alternating=FALSE, labels=FALSE, ticks=FALSE),
rescale=list(x=FALSE, y=FALSE),
between=list(x=4, y=5))
if.R(r=tmp$par.settings <- list(layout.widths=list(right.padding=4)),
s={})
tmp