在 R 中跨 mfrow 组合标题

【问题标题】：Combining title across mfrow in R在 R 中跨 mfrow 组合标题
【发布时间】：2015-05-30 16:11:27
【问题描述】：

我希望标题在我的 mfrow 对象中的两个图上方居中。确实，我有这样的工作，但标题离情节太远了，因此只包括了一半。下面是我显示问题的代码。如何将标题向下移动到中心地块的正上方？

a=1
p = c(rnorm(1000,5,10))
l = c(rnorm(1000,10,5))
par(mfrow=c(1,2))
hist(p,main=NULL)
hist(l,main=NULL)
title(main=print(paste0("Histogram a=", a)),outer=T)

【问题讨论】：

标签： r histogram title

【解决方案1】：

如果您将title 调用中的line 参数设置为例如-2，则可以将标题放置在更靠近直方图的位置：

a=1
p = c(rnorm(1000,5,10))
l = c(rnorm(1000,10,5))
par(mfrow=c(1,2))
hist(p,main=NULL)
hist(l,main=NULL)
title(main=print(paste0("Histogram a=", a)),outer=T, line=-2)

【讨论】：

也可以使用外边距来执行此操作，par(mfrow=c(1,2),oma=c(0,0,2,0))。不过，在这种情况下，结果是相同的。
@user295691，是的，没错！你甚至可以两者都做：定义oma，然后用line将标题调整到你想要的位置...