我正在尝试找到一种方法来遮盖或掩盖来自交叉表中的响应者阈值小于某个阈值的输出中的单元格。我需要显示输出,但在单元格中使用占位符或NA。
我可以过滤导致没有正确回答者数量的单元格的行,但是使该单元格为0。这在解释输出时会有所不同,例如6 Men,并且小于建筑中的5名女性不同于建筑中的6名男性和0名女性。
library(dplyr)
library(descr)
# Test Unique Combinations <2, Fake data
Hide <- data.frame(Gend = c("Pref No Resp", "Male", "Male", "Male", "Male", "Male", "Male",
"Female", "Female", "Female", "Female"),
Job = c(1, 1, 1, 1, 1, 2, 2, 1, 2, 2, 1),
Dayson = c(0, 2, 3, 44, 55, 12, 12, 8, 10, 1, 2))
# Complete Output
CrossTable(Hide$Gend, Hide$Job, chisq = FALSE, prop.t = FALSE, prop.c = FALSE, prop.chisq = FALSE)
# If I Filter -
Hide2 <- Hide %>% group_by(Gend, Job) %>% filter(n()>1)
CrossTable(Hide2$Gend, Hide2$Job, chisq = FALSE, prop.t = FALSE, prop.c = FALSE, prop.chisq = FALSE)
有效地,我在“完整输出”代码中寻找结果,但最下面一行具有NA,-99或其他一些值,这些值将隐藏结果而不产生0,但仍保持行和列。
例如,上述“ Pref No Resp”行中的两个值(1和0)将为X或NA
我一直在使用descr包中的CrossTable,但对其他人开放。我需要尽可能的自动化,因为脚本将利用具有大量输出的不同数据组。
谢谢!