在 R 中删除数据文件的空行

Question

我有一个包含空行的数据集。我想删除它们:

myData<-myData[-which(apply(myData,1,function(x)all(is.na(x)))),]

它工作正常。但现在我想在数据中添加一列并初始化第一个值:

myData$newCol[1] <- -999

Error in `$<-.data.frame`(`*tmp*`, "newCol", value = -999) : 
  replacement has 1 rows, data has 0

不幸的是，它不起作用，我不太明白为什么，也无法解决这个问题。当我使用以下命令一次删除一行时，它起作用了:

TgData = TgData[2:nrow(TgData),]

或者类似的东西。

当我仅使用前 13.000 行时，它也有效。

但它不适用于我的实际数据(32.000 行)。

我做错了什么？我觉得这没什么意义。

Answer 1

我假设您想要删除全部为 NA 的行。然后，您可以执行以下操作:

data <- rbind(c(1,2,3), c(1, NA, 4), c(4,6,7), c(NA, NA, NA), c(4, 8, NA)) # sample data
data
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    1   NA    4
[3,]    4    6    7
[4,]   NA   NA   NA
[5,]    4    8   NA

data[rowSums(is.na(data)) != ncol(data),]
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    1   NA    4
[3,]    4    6    7
[4,]    4    8   NA

如果您想删除至少有一个 NA 的行，只需更改条件即可:

data[rowSums(is.na(data)) == 0,]
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    4    6    7