R- 在四列中的至少一列中选择具有非 NA 值的行

Question

我有这个工作正常的代码：

CompleteCoxObs<-temp[is.na(temp[,8])== FALSE | is.na(temp[,9])== FALSE | is.na(temp[,10])== FALSE,];

达到相同结果的更好、更有效的方法是什么？

Answer 1

你可以试试这个来检查所有的列：

CompleteCox.df <- temp.df[rowSums(is.na(temp.df)) != ncol(temp.df),]

在你的情况下：

CompleteCox.df <- temp.df[rowSums(is.na(temp.df[, c(8,9,10)])) != 3,]

Answer 2

您可以尝试以下方法之一：

temp[!is.na(rowSums(temp[,8:10])),]

或

temp[!apply(is.na(temp[,8:10]),1,any),]

或

temp[na.omit(temp[,8:10]),]

Answer 3

temp[apply(!is.na(temp[,8:10]),1,any),]

作品，请注意放置“！” 在is.na面前