r - 如何在数据框中输出 NA 值的位置?
问题描述
我有以下代码...
pMiss <- function(x){sum(is.na(x))}
missing_values_data <- apply(csv,1,pMiss)
但这只是输出类似...
[1] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
[2] 0 0 0 0 0 0 0 0 20 0 0 0 0 0 0 0 0
[3] 0 0 0 0 10 0 0 0 0 0 0 0 0 0 0 0 0
[4] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
[5] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
10 和 20 是包含 NA 的行。有没有办法可以输出这些行在数据框中的索引位置,例如 [3,5] 等。
解决方案
sapply(df, function(x){which(is.na(x))})
# Data Used:
df <- data.frame(x1 = c(84.2,105.2,79.2,NA,108.2,79.2,112.2,NA,114.2,92.2),
x2 = c(138.3,110.3,84.3,45.3,128.3,99.3,NA,124.3,121.3,115.3),
x3 = as.character(c(138.3,110.3,84.3,45.3,128.3,99.3,100.3,124.3,121.3,115.3)),
stringsAsFactors = FALSE)
推荐阅读
- python - Python:FQDN 像 `hostname --fqdn`?
- javascript - 为什么我不能在 package.json 脚本中设置环境值
- kubernetes - minikube 在 win10 上获取带有标签选择器“k8s-app=kube-proxy”的 Pod 时出错
- macos - 如何在 Mac 10.10 上使用包含非 ascii 字符的挂载点挂载目录?
- c++ - 每次调用方法时递增变量
- azure - Azure Http 连接在 5 分钟后中断
- javascript - JS在按钮单击时播放声音
- ios - 如何添加注释注释弹出并保存一些文本 PDFKit iOS11
- workflow - 当作者尝试从 AEM 中的 Dam 资产中删除任何内容时,如何分配工作流?
- r - 按组选择数据框中的最大值