r - 在 R 中按行计算 2 个值之间的 NA 数量

Question

我的数据看起来像这样:

db <- as.data.frame(matrix(ncol=10, nrow=3, 
                           c(3,NA,NA,4,5,NA,7,NA,NA,NA,NA,NA,7,NA,8,9,NA,NA,4,6,NA,NA,7,8,11,5,10,NA,NA,NA), byrow = TRUE))

db
  V1 V2 V3 V4 V5 V6 V7 V8 V9 V10
1  3 NA NA  4  5 NA  7 NA NA  NA
2 NA NA  7 NA  8  9 NA NA  4   6
3 NA NA  7  8 11  5 10 NA NA  NA

对于每一行，我尝试按行计算第一个和最后一个非 NA 元素(我有数字和字符)之间出现的 NA 数量。

输出应该是这样的:

db$na.tot <- c(3, 3, 0)
db
  V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 na.tot
1  3 NA NA  4  5 NA  7 NA NA  NA      3
2 NA NA  7 NA  8  9 NA NA  4   6      3
3 NA NA  7  8 11  5 10 NA NA  NA      0

其中 na.tot 表示按行第一个和最后一个非 NA 元素之间观察到的 NA 数量(第 1 行、第 2 行和第 2 行中的 3 和 7、7 和 6 以及 7 和 10 之间)分别为 3)。

有没有人有一个简单的解决方案？

谢谢!

Answer 1

试试这个:

require(data.table)
z<-as.data.table(which(!is.na(db),arr.ind=TRUE))
setkey(z,row,col)
z[,list(NAs=last(col)-first(col)-.N+1),by=row]
#   row NAs
#1:   1   3
#2:   2   3
#3:   3   0