r - package expss：以与值标签相同的格式打印多个响应的标签

Question

有谁知道在通过 expss 生成的表格中打印行标签的方法与值标签相同吗？这个问题与之前的帖子相关联，在该帖子中提出了 split_columns 命令作为解决方案。我正在寻找一种方法来制作具有干净和标准外观的表格书以导出到 excel。我尝试通过转换为与二分法编码产生相同结果的类别编码。

德克萨斯州，米查

Answer 1

您需要mdset用于二分法集或mrset类别。示例mdset：

library(expss)
demo = text_to_columns("
    dummy1 dummy2 dummy3 survey_weight
    1        0        0           1.5
    1        1        0           1.5
    1        1        1            .5
    0        1        1           1.5
    1        1        1            .5
    0        0        1            .5
") 


demo %>% 
    tab_cells(mdset(dummy1 %to% dummy3)) %>%  # 'mdset' designate that with have multiple dichotomy set
    tab_weight(survey_weight) %>% # weight
    tab_stat_cpct() %>% # statistic
    tab_pivot() 

# |              | #Total |
# | ------------ | ------ |
# |       dummy1 |   66.7 |
# |       dummy2 |   66.7 |
# |       dummy3 |   50.0 |
# | #Total cases |    6.0 |