写函数查找非数字

Question

我必须修改以下函数，以便不返回NA的索引：

findNonNumbers <- function(z) {
  return(which(is.na(as.numeric(z))))
}

我知道这个问题是超级基本的，但我是R的新手并且正在努力解决这个问题。

Answer 1

您可以简单地在输入向量中排除NA的索引：

findNonNumbers <- function(z) {
  return(which(is.na(as.numeric(z)) & !is.na(z)))
}

Answer 2

这也有效！

findNonNumbers <- function(z) {
  return(which(!is.na(as.numeric(z))))
}