r - 在 R 中创建漂亮的 PDF 报告文件

Question

我已完成所有分析，并希望仅在一个 pdf 文件中输出一份摘要报告。第一页，我想在中间写一个粗体大的“报告”。第二页，我想插入一个表格(我在 R 中有这个数据框)，表格标题很短。其余页面是我的图表。一页，一张图。

目前，我的 pdf 文件只有四页。任何想法，我可以第一页和第二页。谢谢!

pdf()
plot1  #page 1
plot2  #page 2
plot3  #page 3
plot4  #page 4
dev.off()

Answer 1

这是您想要的 Sweave 版本:

\documentclass[a4paper, titlepage]{article}
\title{Report}
\author{}
\date{}

\begin{document}
\SweaveOpts{concordance=TRUE}

\makeatletter
\vspace*{\fill}
{\centering\Huge\bfseries\@title\par}
\vspace*{\fill}
\makeatother

\newpage

\subsection*{Table}
<<results=tex, echo=FALSE>>=
library(xtable)
print(xtable(data.frame(x = rnorm(20), y = rnorm(20))), floating = FALSE)
@

\newpage

\subsection*{Plot 1}

<<plot1, fig=TRUE, echo=FALSE>>=
plot(rnorm(100))
@
\newpage

\subsection*{Plot 2}

<<plot2, fig=TRUE, echo=FALSE>>=
plot(rnorm(100))
@
\newpage

\subsection*{Plot 3}

<<plot3, fig=TRUE, echo=FALSE>>=
plot(rnorm(100))
@
\newpage

\subsection*{Plot 4}

<<plot4, fig=TRUE, echo=FALSE>>=
plot(rnorm(100))
@

\end{document}

您应该将其保存为“MyReport.Rnw”，然后可以使用它进行编译

Sweave("MyReport.Rnw")
tools::texi2pdf("MyReport.tex")

RStudio 有一个很棒的界面，可以从 .Rnw 文件编译 PDF。您还可以 knitr 使用 LaTeX 格式的文件(相对于 RMarkdown)。您需要先通过 knitr::Sweave2knitr("MyReport.Rnw") 运行上述文件。您甚至可以将 LaTeX 编辑器 Lyx 与 knitr 一起使用(参见 http://yihui.name/knitr/demo/lyx/ )。