☰

将整个 R 脚本文件导入 Latex

tag-icon • tag-icon r latex-misc latex-base
将整个 R 脚本文件导入 Latex

有没有办法将整个 RScript (.R) 文件直接导入 Latex，而无需手动使用列表并将代码复制到 Latex？

答案1

foo.R：

# ---- foo

bah <- data.frame(a=c(1,2,3),b=c(4,5,6))
library(xtable)
print(
        xtable(bah,
                cap="My data frame",
                label="footable"),
        table.placement="!b",
        booktabs = T)
plot(bah$a,bah$b)
a <- mean(bah$a)
b <- mean(bah$b)

笔记：这# ---- foo不仅仅是一个评论。这是一个必须的标签，照原样。

foo.Rnw：

\documentclass[twocolumn]{article}
\setcounter{totalnumber}{40}
\setcounter{bottomnumber}{20}
\usepackage{booktabs,parskip,lipsum}
\usepackage[colorlinks,linkcolor=blue]{hyperref}
\pagestyle{empty}
\begin{document}

<<external-code,echo=FALSE>>=
read_chunk('foo.R')
@

\section*{R code}

<<foo,eval=FALSE,echo=TRUE>>=
@

\section*{output}

<<foo,eval=TRUE,echo=FALSE,results='asis',fig.cap="My plot", fig.height=3,fig.pos="!b">>= 
@

The R code produces the mean of \verb|a|, that is \Sexpr{a},  
and the mean of \verb|b|=\Sexpr{b}, and the table \ref{footable} 
with data frame and the figure \ref{fig:foo} with scatterplot 
of \verb|a| {\em versus} \verb|b|.

\lipsum[1-8] % dummy text

\end{document}

foo.pdf，第 1 页：

姆韦

注意：如果您不知道如何编译这个，或者到底是什么knitr，只需foo.Rnw在 Rstudio 编辑器中加载并按“编译 PDF”按钮，当然，还要搜索有关的信息knitr。

相关内容