小编Jam*_*e_R的帖子

将自定义函数传递给 RMarkdown YAML df_print 以在编织 HTML 输出时打印数据帧

这是我在 Stack Overflow 上的第一篇文章,所以如果这是一个格式不正确或不可重现的问题,请原谅我。我尝试将以下自定义数据表打印函数('print.me')传递到 RMarkdown 中的 YAML 标头,以将 df_print 编织为 HTML:

print.me <- function(x) {
  x <- x %>% kbl(digits=2, align= 'l', booktabs=T) %>% 
   kable_styling(fixed_thead = T, position ="float_right") %>% 
   kable_paper("striped", full_width = T, fixed_thead = T, 
   html_font = "Helvetica", font_size = 11) %>% 
   row_spec(0, color = "yellow", background = "#5b705f", font_size = 12) %>% 
   scroll_box(width = "700px", height = "300px")
   return(x)
}
Run Code Online (Sandbox Code Playgroud)

此函数成功呈现了我在从 RMarkdown 打印 mtcar 时所希望的数据帧格式:

在此输入图像描述

问题是我无法找到一种方法来成功地将“print.me”传递到 YAML 标头,以便“print.me”成为编织到 HTML 时渲染数据帧的默认方法。我在 YAML 标头中的代码如下所示:

df_print: !expr 'print.me'
Run Code Online (Sandbox Code Playgroud)

但是,我收到以下错误消息:

错误:找不到对象“print.me” …

yaml r knitr r-markdown kableextra

2
推荐指数
1
解决办法
754
查看次数

标签 统计

kableextra ×1

knitr ×1

r ×1

r-markdown ×1

yaml ×1