时间戳

首页 > 解决方案 > 我不断收到“plot.new() 中的错误：数字边距太大”

r - 我不断收到“plot.new() 中的错误：数字边距太大”

问题描述

我不断收到同样的错误，似乎无法修复它。它应该产生大约 6 个图表，它们不会出现。请帮忙。我认为这与 par() 函数有关。

 variable <- c("Tot.Gross", "Gross.Log", "Age")  # pick up the numeric columns according to the names 
 par(mfrow = c(3, 2)) # layout in 3 rows and 3 columns
for (i in 1:length(variable)){
  sub <- unlist(salary[variable[i]])
  submean <- mean(sub)
  hist(sub, main = paste("Hist. of", variable[i], sep = " "), xlab = variable[i])
  abline(v = submean, col = "blue", lwd = 1)
  qqnorm(sub, main = paste("Q-Q Plot of", variable[i], sep = " "))
  qqline(sub)
  if(i == 1) {s.t <- shapiro.test(sub)
  } else {s.t <- rbind(s.t, shapiro.test(sub))
  }
}

Error in plot.new() : figure margins too large

标签： rr-markdown

解决方案

减少数字mar杜松子酒。例如。

par(mfrow=c(3, 2), mar=c(1, 1, 1, 1))

默认边距，特别是对于多面板图，通常太大。底部、左侧、顶部和右侧边距的默认值为 c(5,4,4,2) + 0.1。

推荐阅读