在RStudio中，如何删除所有包含超过2000个NA值的列？

Question

我确实查过一个使用[]的类似示例>

## Some sample data
set.seed(0)
dat <- matrix(1:100, 10, 10)
dat[sample(1:100, 50)] <- NA
dat <- data.frame(dat)
## Remove columns with more than 50% NA
dat[, -which(colMeans(is.na(dat)) > 0.5)]
但是我不确定如何将其转换为数字而不是百分比。 

我确实查找了使用##一些示例数据集的类似示例。seed（0）dat

Answer 1

一个base R选项可以是：

Answer 2

自我提升

Answer 3

或者您也可以数它们：