指定‘curve`绘图高度？

Question

我有下面的代码来生成四个图，但它们最终被挤压了(见下图)。我该如何解决这个问题？

par(mfrow=c(2,2))
curve(.5*exp(-.5*x),from=0,to=10,main="f(x)")
curve(.25*exp(-.25*x),from=0,to=10,main="f(y)")
curve(1-exp(-.5*x),from=0,to=10,main="F(x)")
curve(1-exp(-.25*x),from=0,to=10,main="F(y)")

​

​

Answer 1

三个选项：

1)使用par(mar=c(bottom, left, top, right))指定各自的边距。

2)增加总输出大小，将自动增加绘图大小。

3)将ggplot与facet_wrap一起使用，这将允许您共享轴以最大化空间。