我正在尝试向自定义配对图添加一个简单的图例。
这是可复制的代码(没有我的自定义对功能):
layout(cbind(1,2),width=c(1,1))
layout.show(2)
pairs(USJudgeRatings)
为什么对功能“擦除”我的布局信息?
帮助中包含的警告layout
是
这些函数与在设备上安排绘图的其他机制完全不兼容:par(mfrow)、par(mfcol)
不幸的是,pairs
用于mfrow
安排情节。
使用Duncan Murdoch 和 Uwe Ligges 在 R help 上的提示,您可以设置oma
一个合理的值,以便为您留出余地来放置传奇人物,例如
pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species",
pch = 21, bg = c("red", "green3", "blue")[iris$Species],
oma=c(4,4,6,12))
# allow plotting of the legend outside the figure region
# (ie within the space left by making the margins big)
par(xpd=TRUE)
legend(0.85, 0.7, as.vector(unique(iris$Species)),
fill=c("red", "green3", "blue"))