我想知道如何在 knitr 文档中引用表格中某些单元格的百分比或频率。这是我可能拥有的表格示例:
library(dplyr)
Tab <- mtcars %>%
group_by(cyl) %>%
summarise(
NewVar = scales::percent(length(carb) / nrow(.))
)
kable(Tab, format = "html")
现在假设我想在文档文本中引用该表的特定元素。一种选择是编写一个条件过滤器,如下所示:
scales::percent(mtcars %>% group_by(cyl) %>% filter(cyl == 8) %>% nrow(.) / mtcars %>% nrow(.))
在编译之前,knitr 文本如下所示:
“在数据集中的所有汽车中,`r scales::percent(mtcars %>% group_by(cyl) %>% filter(cyl == 8) %>% nrow(.) / mtcars %>% nrow(.) )`有八个汽缸。”
这适用于更简单的示例。当有多个过滤器或 group_by 时怎么办?您是否有其他技巧来引用表格的特定元素?我对 dplyr 和非 dplyr 技术都感兴趣。