R 中的 par() 选项 pin 和 oma答案

【问题标题】：par() options pin and oma in RR 中的 par() 选项 pin 和 oma
【发布时间】：2012-09-13 21:43:17
【问题描述】：

当我使用pin 指定绘图大小时，我在使用par 选项oma 设置绘图范围标题时遇到问题。当使用pin 时，oma 的标题会上升（似乎超出了oma 的范围）；当pin 被注释掉（如下）时，oma 标题位置在视觉上很吸引人。我尝试旋转par 选项的序列，认为其中一个可能会压倒其他选项，但没有运气。代码如下。线索赞赏！谢谢，汤姆

par(mfrow=c(1,2)) # 1X2 graphs
par(oma=c(0,0,5,0))  # top has 5 lines of space 
par(mar=c(4,4,2,1)+.1)  # margin lines
#par(pin=c(1.9,1.9))  # plot areas for graphs

# plot 1
plot(rnorm(n=20),col="olivedrab",pch=19,ylim=c(-2.0,2.0),xlim=c(0,20),ylab="",xlab="")
mtext("Observation No.",side=1,line=3)
mtext("Random variate",side=2,line=3)
mtext("Olivedrab Plot",side=3,line=2,cex=1.5)

# plot 2
plot(rnorm(n=20),col="olivedrab2",pch=19,ylim=c(-2.0,2.0),xlim=c(0,20),ylab="",xlab="")
mtext("Observation No.",side=1,line=3)
mtext("Random variate",side=2,line=3)
mtext("Olivedrab Plot",side=3,line=2,cex=1.5)

mtext("Army Olive Drab Plots",side=3,line=3,cex=2,outer=TRUE)  # add outer label

【问题讨论】：

标签： r

【解决方案1】：

你没有描述你想看到什么，只描述了哪些代码产生了你不喜欢的东西。猜想你想看到mtext 生成一个“主标题”，它离图形设备的外边缘更远（更靠近图表），我建议你使用负数进行放置。正如帮助页面所说，'line' 指定“从 0 开始向外计数”（尽管我无法找到我们应该期望零线在哪里的描述。）

par(mfrow=c(1,2)) # 1X2 graphs
par(oma=c(0,0,5,0))  # top has 5 lines of space 
par(mar=c(4,4,2,1)+.1)  # margin lines
par(pin=c(1.9,1.9))  # plot areas for graphs

# plot 1
plot(rnorm(n=20),col="olivedrab",pch=19,ylim=c(-2.0,2.0),xlim=c(0,20),ylab="",xlab="")
mtext("Observation No.",side=1,line=3)
mtext("Random variate",side=2,line=3)
mtext("Olivedrab Plot",side=3,line=2,cex=1.5)

# plot 2
plot(rnorm(n=20),col="olivedrab2",pch=19,ylim=c(-2.0,2.0),xlim=c(0,20),ylab="",xlab="")
mtext("Observation No.",side=1,line=3)
mtext("Random variate",side=2,line=3)
mtext("Olivedrab Plot",side=3,line=2,cex=1.5)

mtext("Army Olive Drab Plots",side=3,line=-3,cex=2,outer=TRUE)

【讨论】：