為 gtsummary package 中的分類變量和連續變量設置主題 for tbl_summary function in R

Question

我對gtsummary package 以及如何設置默認主題有疑問：

東風：

library(tidyverse)
library(gtsummary)
library(gapminder)

gap <- gapminder %>% 
  dplyr::mutate_all(~ifelse(
    sample(c(TRUE, FALSE), size = length(.), replace = TRUE, prob = c(0.8, 0.2)),
    as.character(.), 
    NA)
  ) %>% 
  dplyr::mutate_at(vars(year:gdpPercap), ~as.numeric(.)
  ) 

my_theme <-   
  list(
    "tbl_summary-str:default_con_type" = "continuous2",
    "tbl_summary-str:continuous_stat" = c("{median} ({p25} - {p75})",
                                          "{mean} ({sd})", 
                                          "{min} - {max}",
                                          "{N_miss} ({p_miss}%)"),
    "tbl_summary-str:categorical_stat" = "{n} / {N} ({p}%)",
    "style_number-arg:big.mark" = ""
  )

gtsummary::set_gtsummary_theme(my_theme)

gap[, -1] %>% 
  gtsummary::tbl_summary(
    
    # remove default missing values because we specified them in 
    # the theme above already
    missing = "no"
  )

當我將大洲作為分類變量包含在內並且不顯示包含該大洲匯總統計數據的表格時，上面給出了一個錯誤。 我必須在tbl_summary function 中指定一些 arguments 還是必須在主題 function 中添加/刪除一些 arguments？ 謝謝！

Answer 1

非常感謝您報告這一意外行為。 這確實是一個錯誤，它已在開發版本中修復（您可以從 github 安裝）。

remotes::install_github("ddsjoberg/gtsummary", quiet = TRUE)
library(gtsummary)
packageVersion("gtsummary")
#> [1] '1.3.5.9003'

my_theme <-   
  list(
    "tbl_summary-str:default_con_type" = "continuous2",
    "tbl_summary-str:continuous_stat" = c("{median} ({p25} - {p75})", "{mean} ({sd})"),
    "tbl_summary-str:categorical_stat" = "{n} / {N} ({p}%)"
  )

set_gtsummary_theme(my_theme)

tbl <-
  gapminder::gapminder[, 2:3] %>% 
  tbl_summary()

^{由reprex package (v0.3.0) 創建於 2020-10-25}