r - 更改 ggplot2 中的绘图尺寸

Question

我想创建一个 pdf 文件并使用 package 在其中放置几个​​图ggplot2。但是，我需要减少一个特定绘图的宽度。这是代码：

invisible(pdf("foo.pdf"))
foo <- data.frame(x=rnorm(100), y=rnorm(100), class=factor(sample(2,1000,T)))
ggplot(foo, aes(x=x,y=y))+geom_point() # first plot

# For next plot I want to reduce the width
ggplot(foo, aes(x=class,y=y)) + geom_boxplot()
invisible(dev.off())

怎么做？

Answer 1

您可以在小于整页的视口中打印，

library(grid) 
grid.rect(width=unit(0.8, "npc"), gp=gpar(lty=2))
print(qplot(1,1), vp=viewport(width=unit(0.8, "npc")))