R：用参数设置多个绘图高度

Question

我试图将三个图表拼凑在一起，一个在另一个下面。 我想让第一张图表的高度是使用par的两倍大，但是我对高度参数有困难。

par(mfrow = c(3, 1),mar=c(2, 4, 2, 0.2), heights=c(2,1,1))

plot(x=1:100,y=cumsum(sample(c(-1, 1), 100, TRUE)), type="l")
plot(x=1:100,y=cumsum(sample(c(-1, 1), 100, TRUE)), type="l")
plot(x=1:100,y=cumsum(sample(c(-1, 1), 100, TRUE)), type="l")

感谢您的帮助。

Answer 1

您可以使用layout：

#the first argument is a matrix that shows the order of the graphs
#in this case the matrix has 1 column and 3 rows. therefore, graphs 1,2,3
#will be ploted in this order, one below the other
#you then need to adjust the heights and the widths for each plot
nf <- layout(matrix(c(1,2,3),ncol=1), widths=c(4,4,4), heights=c(2,1,1), TRUE) 
#typing the below command will let you see how the plots will be filled in.
#layout.show(nf)

#then you just run your plots
plot(x=1:100,y=cumsum(sample(c(-1, 1), 100, TRUE)), type="l")
plot(x=1:100,y=cumsum(sample(c(-1, 1), 100, TRUE)), type="l")
plot(x=1:100,y=cumsum(sample(c(-1, 1), 100, TRUE)), type="l")