r - 查找 R 中列组合的 NA 值计数

Question

假设我有一个如下的数据集，

(dd <- read.table(header = TRUE, text="a    b
1    2
NA   1
1    NA
NA   NA
1    2
NA   3"))

#    a  b
# 1  1  2
# 2 NA  1
# 3  1 NA
# 4 NA NA
# 5  1  2
# 6 NA  3

我在想如何获得两列组合的 NA 值的计数。我的输出应该是这样的

No NA - 2
1st column NA - 2
2nd column NA - 1
Both NA - 1

我不知道如何对列组合执行此操作。有谁能够帮助我？

Answer 1

table它起来:

table(lapply(dd, is.na))

#       b
#a       FALSE TRUE
#  FALSE     2    1
#  TRUE      2    1

如果您需要一个用于子集设置的向量，因为 interaction给出:

interaction(lapply(dd,is.na))
#[1] FALSE.FALSE TRUE.FALSE  FALSE.TRUE  TRUE.TRUE   FALSE.FALSE TRUE.FALSE 
#Levels: FALSE.FALSE TRUE.FALSE FALSE.TRUE TRUE.TRUE

你可以做:

vec <- c("none","first","second","both")[interaction(lapply(dd,is.na))]
#[1] none   first  second both   none   first

table(vec)
#vec
#  none  first second   both 
#     2      2      1      1