更改 Sweave 中 ggplot2 图的大小，而不使文本/数字过大

Question

我发现这个关于更改的问题 Sweave 中 ggplot2 图的大小。我添加了 Sweaveopts{width=3, height=3} ，它确实缩小了绘图的大小，但它不会缩小文本。所以最后，轴上的所有数字都会重叠。

有没有办法在 Sweave 中缩放整个 ggplot2 图，这样我就不必手动缩放原始 ggplot2 调用中的每个组件？这似乎是我应该能够做的事情，但我在 ggplot2 书中或网站上找不到它。谢谢！

FWIW，这是我在 Sweave 中的调用：

\SweaveOpts{width=3, height=3}
\begin{figure}
\begin{center}
<<fig=TRUE>>=
print(plot.m)
@
\end{center}
\caption{stuff}
\label{fig:stuff}
\end{figure}

以及生成 ggplot2 图的调用：

plot.m <- ggplot(temp, aes(date, spread)) + geom_bar(stat="identity") + scale_x_date(major="years", minor="months")

Answer 1

这基本上是一个 Sweave 常见问题解答。谷歌一下，你会发现无数的点击。

一种方法是将文件写入 pdf（不缩放），然后使用 \includegraphics 命令进行缩放。我刚刚看了几天前完成的一个小插图，我想要一些大约与页面一样宽的东西，我做到了：

\begin{figure}[t!]
  \centering
<<someLabel,fig=TRUE,width=8>>=
## some R code omitted
print(dotplot(foo ~ bar | someFactor, group=someThing, 
              data=someDF, layout=c(1,3),
              xlab="some X label", ylab="",
              key=simpleKey(text=c("A","B"), space="top")))
@
  \caption{Some caption.}
  \label{fig:someLabel}
\end{figure}

有些基本上只是 Sweave 选项级别的一个宽度尺寸。我发现较小的值效果不佳 - 因此请尝试较大的值，例如 6 或 7 英寸。