使用 knitR 在 R 函数中写入乳胶块

Question

我有以下问题；我在 Rstudio 中使用 knitR 来生成 pdf。在名为“master.Rnw”的主文件中，我调用了一个名为“trigono.R”的长函数：

<<trigono_R, echo=FALSE, warning=FALSE, cache=FALSE, eval=TRUE>>=

source("./trigono.R")  
@

现在的问题是：是否有可能在此 R 函数中调用乳胶块。这意味着在以下函数中：

trigono<- function(con = con, run.type = NULL){

normal R commands

open chunk Latex(

end chunk Latex)

normal R commands
}

有一个 Latex 命令或离开 R 块 <<... >>= ... @ 并返回到 Latex 中写一些句子。

非常感谢

Answer 1

我自己找到了答案并在这里给出了，虽然我不明白为什么我有时会得到反对票在这里真的很令人沮丧！

首先需要 2 个库：

图书馆（knitr）

图书馆（打印机）

您必须使用包含您的函数的 child。假设在 master.Rnw 中你调用一个名为 trigono.Rnw

的 child

<<childIntroduc, child='trigono.Rnw',results = "asis">>=
@

trigono.Rnw 看起来像：

<< myfunctions, echo=FALSE, eval=TRUE>>=
normal R commands

.
.
cat(" \newline \emph{The text which appears as a normal text in Latex and Pdf \color{red} 2.5.6} \newline")
.
.
@

使用 knitR 在 R 函数中写入乳胶块

write within R function a latex chunk using knitR

r

knitr

r-markdown

sweave