gtsummary - 从表中省略类别

Question

以下代码

library(tidyverse) 
library(gtsummary)

df <- tibble(category = c("a", "a", "a", 
                    "b", "b", "b", "b"))

output_table <- df %>%
  tbl_summary()

output_table 

生成此表。

是否可以在不更改相关频率的情况下从此表中删除“a”类别？所以在这种情况下，最终表格应该是这样的（但没有额外的空格）。

Answer 1

使用该tbl_summary(value=)参数，您可以选择要在表中显示的分类变量的单个级别。

library(gtsummary)

trial %>%
  select(grade) %>%
  # show only one level for grade
  tbl_summary(value = grade ~ "I", 
              label = grade ~ "Grade I") 

您也可以只从输出中删除一行。但是您需要安装包的开发版本才能使用新功能modify_table_body()。

remotes::install_github("ddsjoberg/gtsummary")
trial %>%
  select(grade) %>%
  tbl_summary() %>%
  # remove grade I row
  modify_table_body(filter, !(variable == "grade" & label == "I"))