Question

我正在尝试使用以下方法构建3个散点图：

par(mfrow=c(3,1)),pty='s')

但它们在A4尺寸的纸张上显得相当小。我用的时候：

仅

par(mfrow=c(3,1))，散点图太长了（长度方面）。有什么东西可以用来让我调整尺寸，使它们在A4尺寸的纸上足够大（3个地块）吗？

这正是我目前用来绘制第一个：

(apirt$irt12[apirt$surv==1],
apirt$prtemp[apirt$surv==1],
xlab="ave.base of ears (°C)",
ylab="rectal (°C)",
xlim=c(26,42),
ylim=c(30,42),
col='blue')

谢谢，

巴兹

Answer 1

我建议改用par(mfrow=c(2,2), pty='s')。然后你将有一个2乘2的图形布局（有一个空的quadrent），这将为方形绘图区域提供更多的空间。您还应确保将绘图设备设置为与纸张尺寸相同。降低利润率也会为您提供更大的绘图区域（只需留出足够的空间进行注释）。

Answer 2

你应该在某个地方指定页面大小......

pdf(file="tmp.pdf",width=21/2,height=29.7/2)
op <- par(mfrow=c(3,1), pty="s")  # or c(2,2) 
plot(1:100,cumsum(rnorm(100)))
plot(1:100,cumsum(rnorm(100)))
plot(1:100,cumsum(rnorm(100)))
par(op)
dev.off()

使用R设置散点图的长度和宽度

2 个答案: