从csv数据文件中删除NA

Question

我正在使用此代码导入数据

counts<-read.csv("data.csv", stringsAsFactors=FALSE, header=FALSE)

link to view the data

并从我使用2种方法的数据中删除NA

1

lists <- lapply(as.list(counts), function(x) x[x != ""])

2

removeEMPTYstrings <- function(x) {
 newVectorWOstrings <- x[x != ""]
 return(newVectorWOstrings)
}

lists <- lapply(as.list(counts), removeEMPTYstrings)

但这两种方式都没有从数据中删除NA，我仍然收到此消息“错误：数据集中的NA”。

我只想删除/忽略/未读取数据中的NA，而不是删除整个列或行。

谢谢。

Answer 1

我们可以使用na.omit删除NA

counts1 <- na.omit(counts)

或complete.cases

counts1 <- counts[complete.cases(counts),]

或者，如果我们需要删除每列的NA

lapply(counts, function(x) x[!is.na(x)])