如何将gtsummary回归表中交互项的*替换为•字符?
如何将gtsummary回归表中的交互项*替换为•
完全可以实现,以下是两种实用的解决方法:
方法1:批量替换所有交互项的符号
利用modify_table_body()函数配合字符串替换,自动将表格中所有交互项标签里的*替换为•,适合需要统一替换的场景:
library(gtsummary) library(stringr) # 生成回归表并替换符号 tbl <- tbl_regression(lm(mpg ~ cyl*disp, mtcars)) %>% modify_table_body( mutate, label = str_replace(label, "\\*", "•") # 正则转义*,避免匹配特殊字符 ) # 查看结果 tbl
方法2:自定义交互项标签
如果需要更精准地控制交互项的显示文本,可以在tbl_regression()的label参数中直接指定交互项的标签,手动替换符号:
library(gtsummary) tbl_regression( lm(mpg ~ cyl*disp, mtcars), label = list( cyl ~ "气缸数", disp ~ "排量", cyl:disp ~ "气缸数•排量" # 直接设置带•的交互项标签 ) )
内容的提问来源于stack exchange,提问作者robertspierre
相关产品推荐
相关产品推荐

