在 rmarkdown 参数中传递函数以在 html 报告中呈现图表

Question

我将把从 shiny 生成的图传递给 rmarkdown 以生成 html 报告。问题是 rmarkdown 文档的 params 中接受了 wordcloud 和饼图。

问题：如何通过闪亮的方式在渲染的 html 中传递 wordcloud 和饼图？

abc.Rmd

title: "Report using R Markdown"
subtitle: "ABC "
author: "Author name"
output:
     prettydoc::html_pretty:
     theme: architect
params:
    wc : 'NULL'
    table: 'NULL'
    pie: 'NULL'

app.R(sn-p)

rmarkdown::render(input = "report.Rmd",
                  output_file = "report.html",
                  params = list(wc=getWordcloud(),
                                table=getTab(),
                                pie=getPie()))

注意：getWordcloud()、getTab()、getPie() 函数在闪亮的应用程序中完美地返回绘图。

Answer 1

您不能将函数作为参数类型。

参看这里的参数类型： http://rmarkdown.rstudio.com/developer_parameterized_reports.html

支持yaml::yaml.load 函数可以解析的所有标准 R 类型，包括 character、integer、numeric 和 logical。

我强烈建议您找到一种无需在参数中传递函数即可使您的代码正常工作的方法。也许您可以传递函数的选项并将函数包含在 rmd 中？

但是，有办法绕过它：

一种是在参数中使用函数的名称作为字符串，并使用eval()将字符串作为代码进行评估。

abc.Rmd

title: "Report using R Markdown"
subtitle: "ABC "
author: "Author name"
output:
     prettydoc::html_pretty:
     theme: architect
params:
    wc : wc_function
    table: table_function
    pie: pie_function


 eval(paste0(param$wc_function, "(", my_options_as_string, ")")) 

app.R(sn-p)

rmarkdown::render(input = "report.Rmd",
                  output_file = "report.html",
                  params = list(wc="getWordcloud",
                                table="getTab",
                                pie="getPie"))

另一种方法是拥有另一个带有函数的 r 脚本，在 rmarkdown 中使用 source 调用。

这样，您可以将文件的路径作为参数传递，它允许您访问 rmarkdown 中的函数（但这意味着函数的名称是固定的）