Измените размер графика ggplot2 в Sweave, не делая текст / цифры непропорционально большими - PullRequest
Новая
       15

Измените размер графика ggplot2 в Sweave, не делая текст / цифры непропорционально большими

2 голосов
/ 21 декабря 2010

Я нашел этот вопрос об изменении размера графика ggplot2 в Sweave. Я добавил Sweaveopts{width=3, height=3}, и он уменьшает размер графика, но не уменьшает текст. В итоге все числа на осях перекрываются.

Есть ли способ масштабирования всего графика ggplot2 в Sweave, чтобы мне не приходилось вручную масштабировать каждый компонент в исходном вызове 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")

1 Ответ

6 голосов
/ 21 декабря 2010

Это в основном Sweave FAQ.Google, и вы найдете миллионы хитов.

Один из подходов состоит в том, чтобы просто записать файл в 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 дюймов.

...