标题在R中的情节画布中超出框架

Question

大家好我在这两个方向上都有3个带有密度条的图表（这里是一个简单的表格，只有3个普通图表，但其他部分是必要的，因为我需要更复杂的功能在这里只是为了方便观看）

     scatterBar.Norm <- function(x,y) {
     zones <- matrix(c(2,0,1,3), ncol=2, byrow=TRUE)
     layout(zones, widths=c(5/7,2/7), heights=c(2/7,5/7))
     title("My Title", outer=TRUE);
     par(mar=c(3,3,1,1),mgp=c(2,1,0))
     plot(1:10,  xlab="Magnification", ylab="residue", col=2)
     par(mar=c(0,3,1,1))
     plot(1:10,  xlab="Magnification", ylab="residue",col=3)
     par(mar=c(3,0,1,1))
     plot(1:10,  xlab="Magnification", ylab="residue", col=4)}

     scatterBar.Norm(2,3)

问题： 首先是剧情标题“我的头衔”部分走出画布，如何解决？

感谢您提前需要的帮助。

Answer 1

您已指示R在外边距处绘制标题，但（至少在您的示例中）您尚未设置该边距。以下应该有效：

scatterBar.Norm <- function(x, y) {
  zones <- matrix(c(2, 0, 1, 3), ncol=2, byrow=TRUE)
  layout(zones, widths=c(5, 2), heights=c(2, 5))
  par(mar=c(3, 3, 1, 1), mgp=c(2, 1, 0), oma=c(0, 0, 3, 0))
  plot(1:10, xlab="Magnification", ylab="residue", col=2)
  par(mar=c(0, 3, 1, 1))
  plot(1:10, xlab="Magnification", ylab="residue", col=3)
  par(mar=c(3, 0, 1, 1))
  plot(1:10, xlab="Magnification", ylab="residue", col=4)
  title("My Title", outer=TRUE)
}

plot.new()
scatterBar.Norm(2, 3)