xyplot 行的格子分隔 y 轴答案

【问题标题】：lattice separate y axes for row of xyplotxyplot 行的格子分隔 y 轴
【发布时间】：2014-10-31 15:55:44
【问题描述】：

我希望xyplot 的一行具有相同的 y 轴限制，显示为 2 x 2。 scales = "free" 和 scales = "sliced" 都不会实现这一点。

玩具示例

size <- rep(c("da","db","ca","cb"),each=5)  
age <- rep(1:5,4)  
growth <- rep(c(-75,-55,-25,-20),each=5)  

test <- data.frame(size,age,growth)


xyplot(growth~age|factor(size),layout=c(2,2),
 type=c("p","g"),
 scales=list(x=list(tick.number=3)),
 ylab="growth %",xlab="age",pch=20,col="black",
 data=test)

在这种情况下，我希望（在基本图形中）：ylim=c(-50,-80) 用于第一行，y=c(-20,-30) 用于第二行。

【问题讨论】：

标签： r lattice

【解决方案1】：

您需要将限制列表传递给xyplot。在这里，我在xyplot 函数之外创建了一个列表，但如果您愿意，您可以在scales 参数中这样做。

library(lattice)
size <- rep(c("da","db","ca","cb"),each=5) 
age <- rep(1:5,4)
growth <- rep(c(-75,-55,-25,-20),each=5)
test <- data.frame(size,age,growth)

YLims<-list(c(-20,30),c(-20,30),c(-50,-80),c(-50,-80) )

xyplot(growth~age|factor(size),
   layout=c(2,2), 
   type=c("p","g"), 
   scales=list(x=list(tick.number=3), y=list(relation="free", limits=YLims)), 
   ylab="growth %",xlab="age",pch=20,col="black",  data=test)

【讨论】：