如何在R中的RMarkdown Kable对象中添加总计？ [包括代码和图像]

Question

我目前在Rmarkdown文件中有两个并排的表。见下文。我想从两个数据框中为右列添加总计行。

我目前正在执行以下操作，以使将文件编织为html时并排显示这两个表

tr::kables(list(
  kable(caption = "Promise Day Distribution", align=rep('l', 5),
    step1_fix %>% 
  group_by(days) %>% 
  summarise(Orders = n_distinct(ID))
    ) %>% kable_styling(),
    kable(caption = "Delivery Day Distribution", align=rep('l', 5),
    step1_fix %>% 
       adorn_totals("row") %>% 
  group_by(days) %>% 
  summarise(Orders = n_distinct(ID))
    ) %>% kable_styling()
    
  )
) %>% kable_styling()

如何将总计添加到上面的代码中？我尝试使用adorn_totals（），但收到错误消息

Answer 1

函数A_count | B_count 0 | 0 312 | NA 2 | 23 0 | 2 NA | NA 13 | 0 似乎在 janitor 软件包中，您是否已将该软件包与kable一起安装并加载到R中？尝试加载库并重新运行代码。

Answer 2

我尝试使用 adorn_totals() 来应用总计行和列。工作完美 (https://rdrr.io/cran/janitor/man/adorn_totals.html)