我想在一页上放置两个正方形图,并让生成的图形填满一张纸的大部分。这似乎是一个非常基本的想法。但是,默认设置似乎是创建矩形图。当我指定绘图为正方形时,它们的大小相对于页面变得非常小。如果我成功地使方形图变大,轴标签就会隐藏起来。我已经尝试了 omi
和 mar
以及 layout
的多种变体,但都没有成功。
我想使用基础 R
。感谢您的任何建议。
setwd('c:/users/markm/simple R programs')
x <- 1:10
y1.1 <- x ^2
y1.2 <- x + 50
y1.3 <- x ^1.5
pdf("plots_June1_2015.pdf")
par(mfrow=c(2,1))
plot(x, y1.1, type = 'l', col = 'black' , lwd = 1, lty = 1,
xlab = 'My X Axis',
ylab = 'My Y Axis')
lines(x, y1.2, type = 'l', col = 'black' , lwd = 1, lty = 2)
lines(x, y1.3, type = 'l', col = 'black' , lwd = 1, lty = 3)
title('Plot One')
plot(x, y1.1, type = 'l', col = 'black' , lwd = 1, lty = 1,
xlab = 'My X Axis',
ylab = 'My Y Axis')
lines(x, y1.2, type = 'l', col = 'black', lwd = 1, lty = 2)
lines(x, y1.3, type = 'l', col = 'black', lwd = 1, lty = 3)
title('Plot Two')
dev.off()
以下是各种不成功的尝试:
#par(mfrow=c(2,1), omi=c(0.1,0.1,0.1,0.1), mar=c(3,3,3,3), cex.lab=0.75, pty="s", cex.axis=0.75)
#par(mfrow=c(2,1), omi=c(0.1,0.1,0.1,0.1), mar=c(3,3,3,3), cex.lab=0.75, cex.axis=0.75)
#par(mfrow=c(2,1), omi=c(1,1,1,1), mar=c(3,3,3,3), cex.lab=0.75, cex.axis=0.75)
#par(mfrow=c(2,1), omi=c(1,1,1,1), cex.lab=0.75, cex.axis=0.75)
#par(mfrow=c(2,1), omi=c(1,1,1,1), cex.lab=0.75, cex.axis=0.75, pty="s")
#par(mfrow=c(2,1), omi=c(1,1,1,1), cex.lab=0.75, cex.axis=0.75, asp=1)
#par(mfrow=c(2,1))
#layout(matrix(c(1,1), 2, 1, byrow = TRUE), widths=c(3,1), heights=c(1,2))
#layout(matrix(c(2,2), 2, 1, byrow = TRUE), widths=c(3,1), heights=c(1,2))
#layout(matrix(c(2,2), 2, 1, byrow = TRUE), widths=c(1,1), heights=c(1,1))
#layout(matrix(c(2,2), 2, 1, byrow = TRUE), widths=c(1,1), heights=c(1,1))
#layout(matrix(c(2,2), 2, 1, byrow = TRUE), widths=lcm(7,7), heights=c(1,1))
最佳答案
我认为您关注的是错误的问题。最终大小由您的 pdf
调用定义,而不是 par
。使用
pdf("plots_June1_2015.pdf", width = 11.69, height = 16.53)
(11.69 x 16.53 是以英寸为单位的 A3 纸张尺寸 according to Google )
我得到了你发布的未更改代码(这是 pdf 的打印屏幕)
关于r - 填满一张纸的两个正方形图,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/30584512/