r语言 - 我一直在"Error in plot.new() : figure margins too large"

Question

我一直收到同样的错误，似乎无法修复。它应该生成大约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

Answer 1

减小图形margins。例如

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

默认边距(尤其是多面板打印(通常过大。下页边距、左页边距、上页边距和右页边距的默认值为c(5,4,4,2(+0.1。