我想为下面的点阵图形添加两个等价图。我对plot()
函数par(mfcol=c(1,2))
的惯用技巧不适用于这些基于网格的图形。我已经看了相关的帖子,尽管我似乎无法从解决方案中提取所需的信息。我如何组合下面的等价图,使它们在输出中彼此相邻(并排)?或者,换句话说,什么是与par(mfcol=c(1,2))
等价的晶格
require(equivalence)
# Simplified data for equivalence plot 1
a = c(2,4,6,8,10,12,14,16,18)
b = c(1,3,5,7,9,11,13,15,17)
mydata1 = data.frame(a,b)
equivalence.xyplot(mydata1$b ~ mydata1$a,
alpha=0.05, b0.ii=0.25, b1.ii=0.25)
# Simplified data for equivalence plot 2
x = c(1,4,8,2,3,4,6,5,9)
y = c(2,4,7,3,3,4,7,5,9)
mydata2 = data.frame(x,y)
equivalence.xyplot(mydata2$y ~ mydata2$x,
alpha=0.05, b0.ii=0.25, b1.ii=0.25)
发布于 2012-10-31 01:55:02
在@mplourde的评论中的link中,对代码进行了以下更改,使图表符合我的规范:
require(equivalence)
# Simplified data for equivalence plot 1
a = c(2,4,6,8,10,12,14,16,18)
b = c(1,3,5,7,9,11,13,15,17)
mydata1 = data.frame(a,b)
px1 = equivalence.xyplot(mydata1$b ~ mydata1$a,
alpha=0.05, b0.ii=0.25, b1.ii=0.25)
# Simplified data for equivalence plot 2
x = c(1,4,8,2,3,4,6,5,9)
y = c(2,4,7,3,3,4,7,5,9)
mydata2 = data.frame(x,y)
px2 = equivalence.xyplot(mydata2$y ~ mydata2$x,
alpha=0.05, b0.ii=0.25, b1.ii=0.25)
print(px1, position=c(0, 0.5, .5, 1), more=TRUE)
print(px2, position=c(0.5, 0.5, 1, 1))
https://stackoverflow.com/questions/13139687
复制相似问题