在 Rmarkdown 文档的一块内,我有一个循环,可以为变量向量生成文本和绘图。
结果是一个列表,随后不列出并生成字符向量:
"# Variable A \n\n```{r fig.width=12, fig.height=6} \na_plot\n``` \n\nVariable A definition... [@citation2024]. \n\n\\newpage"
为了提高可读性(使用
cat()
):
# Variable A
```{r fig.width=12, fig.height=6}
a_plot
```
Variable A definition... [@citation2024].
\newpage
我希望在我的文档中读取该块,以便显示绘图,而不仅仅是打印出来。在生成此代码的块中,我可以选择
results = 'asis'
。
我尝试了几种替代方案,但没有成功......
我找到了这个解决方案:
```{r echo=FALSE,message=FALSE,results="asis",fig.width=12, fig.height=6}
i <- 1
for (i in 1:length(vars)) {
cat(" \n#", vars_long[i], " \n")
general_plot_function(data = ds,
var_col_name = vars[i],
positive = pos_construct[i],
email = v,
html = F)
cat(" \n")
cat(paste0(desc_vars[i],' ', refs_vars_latex[i],'. ',' \n'))
cat(paste0(ans_scales[i],' \n\\newpage \n'))
}
```
general_plot_function
是在单独的脚本中生成的。
我希望也生成块选项,然后进行解析。但我没能做到。
向量
vars
、vars_long
、pos_construct
、desc_vars
、refs_vars_latex
和 ans_scale
分别包含:
1 - 数据集中的列名称;
2 - 每个变量的全名(不带缩写词);
3 - 从可取性的角度来看,它是正变量还是负变量(例如,倦怠 -> 负结构);
4 - 变量的描述/定义;
5 - 引文的 bibtex 参考 ID;
6 - 仪器的答案等级(例如,1 - “完全不同意”到 5 - “完全同意”)。
对象
v
包含报告发送对象的电子邮件。
html
参数用于生成 html 格式的绘图,以便将其合并到 blastula
电子邮件中,或者是否包含在 pdf 报告中。