Question

我想在同一个pdf页面上放两个图。第一个图需要宽高比为1.

x <- 1:5
y <- 1:5
z <- 1:5
t <- 1:5
pdf("test.pdf")
par(mfrow=c(2,1))
plot(x,y,asp=1)
plot(z,t)
dev.off()

我最终得到以下结果：

让我们说负值在第一个情节的背景下没有意义。如何获得方形图而不是这个水平扩展的矩形？

我尝试指定xlim=c(0, 6)和ylim=c(0, 6)，但绘图仍然是一个长矩形，点的两边都有空格。此外，我可能事先并不知道最高价值是什么。

理想情况下，我希望能够说：对于第一个图，将轴开始为0，对两个轴使用相同的长度，在A4页的前半部分拟合第一个图，第二个图在同一页的后半部分。

我该怎么做？

Answer 1

也许您可以像这样更改pdf的宽度和高度：

pdf("test.pdf",width=2.height=5)

然后

par(mfrow=c(2,1))
plot(x,y)#remove asp=1
plot(z,t)
dev.off()

Answer 2

强制方形绘图区域的机智是添加pty =＆＃34; s＆＃34;到par函数：

pdf("temp.pdf", height=11, width=8.5)
par(mfrow=c(2,1), pty="s")
plot(x,y,asp=1, xlim=c(0, 6))
plot(z,t, xlim=c(0, 6))
dev.off()

在帮助文件?par中，pty参数需要

指定要使用的绘图区域类型的字符; ＆＃34; S＆＃34;生成一个方形绘图区域＆＃34; m＆＃34;生成最大绘图区域。