在 R - par 中绘制多个图

Question

我使用par(mfrow = c(2,2)) 创建了一个 2x2 绘图矩阵。这以前工作得很好。然而，这一次我的地块太小了。 我没有更改代码中的任何内容。我想我一定是在不知不觉中改变了环境。 有什么想法可以恢复更改吗？

> par(mfrow = c(2,2))
>   par("mar")
[1] 5.1 4.1 4.1 2.1
> 
>   plot(hat.ep,rstudent.ep,col="#E69F00", main="hat-values versus studentized residuals",
+        xlab="Hat value", ylab="Studentized residual")
>   dffits.ep <- dffits(logit_reduced)
>   plot(id,dffits.ep,type="l", col="#E69F00", main="Index Plot",
+        xlab="Identification", ylab="Diffits")
>   cov.ep <- covratio(logit_reduced)
>   plot(id,cov.ep,type="l",col="#E69F00",  main="Covariance Ratio",
+        xlab="Identification", ylab="Covariance Ratio")
>   cook.ep <- cooks.distance(logit_reduced)
>   plot(id,cook.ep,type="l",col="#E69F00", main="Cook's Distance",
+        xlab="Identification", ylab="Cook's Distance")

Answer 1

如果您想返回 1 行一列图，请使用 par(mfrow=c(1,1))。 Shud 使用 options 函数来获取计算的显示及其结果

在开始更改任何选项设置之前，最好保存旧选项：

old.o <- options()

然后恢复到原来的可以使用：

options(old.o)

编辑

尝试重置图形设备，然后重新开始绘图，注意你可能会丢失所有以前的绘图。 dev.off()