R 如何在附录中显示我的函数代码

我正在写一份报告，需要显示我在附录R中定义的函数的代码。我还想在每个函数的开头做一些评论，说明这个函数的作用。是否有一种简洁的方法可以做到这一点，或者我应该将工作区中的每个功能单独复制并粘贴到新文档中。

使用

knitr

install.packages("knitr")

然后将

.tex

文件更改为

.Rnw

，添加（在文档前言中）

=
图书馆（knitr）
knitr:：opts_chunk$set（eval=FALSE）
@

（它告诉knitr打印但不计算代码清单）

然后将代码分块添加：

\documentclass{article}

<<knitrOpts, echo=FALSE>>=
library(knitr)
knitr::opts_chunk$set(eval = FALSE)
@

\begin{document}

(Rest of your report)

\appendix

The following is an example of a function that calculates the average:
<<average_fn>>=
average_fn <- function(x){
  sum(x) / length(x)
}
@

\end{document}

\documentclass{article}
=
图书馆（knitr）
knitr:：opts_chunk$set（eval=FALSE）
@
\开始{document}
（报告的其余部分）
\附录
以下是计算平均值的函数示例：
=
平均值\u fn全局选项>Swave。在
中，使用以下命令编译文档：
在下拉菜单中选择
knitr

然后单击
编译PDF
您是使用LaTeX还是markdown？LaTeX作为报告本身，但附录可以是单独的文件，例如直接从R开始。如果使用LaTeX，您可以使用逐字记录或lstlisting和[language=R]，这使其易于阅读。请参阅，例如，您也可以使用Rmarkdown将代码和注释输出为.pdf、html或我相信的格式。
\documentclass{article}

<<knitrOpts, echo=FALSE>>=
library(knitr)
knitr::opts_chunk$set(eval = FALSE)
@

\begin{document}

(Rest of your report)

\appendix

The following is an example of a function that calculates the average:
<<average_fn>>=
average_fn <- function(x){
  sum(x) / length(x)
}
@

\end{document}