r - 多列的频率和百分比计数

Question

我的数据如下:

print(dat)
i1  i2  i3  i4
 0   1   1   0
NA   1   1   1
 0   0   0   1
 1   1   1   1

我的目标是通过函数和 sapply 的某种组合理想地获取三项信息:1 的数量、0 的数量以及 1 的非 NA 的百分比。例如，这里的理想结果是这样的:

function(dat)
0  1   percentage
5  10      66.7

谢谢!

Answer 1

这里有一个选项:

c(sum(mat==0,na.rm=TRUE),
  sum(mat==1,na.rm=TRUE),
  round(sum(mat==1,na.rm=TRUE)/sum(!is.na(mat))*100,1))

## 5.0 10.0 66.7