r - 如何计算数据框中的行均值？

Question

我有一个包含 1000 列和 8 行的数据框，我需要计算行均值。我试过这个循环:

final <- as.data.frame(matrix(nrow=8,ncol=1))
for(j in 1:8){
  value<- mean(dataframe[j,])
  final[j,]<-value
}

但出现以下错误:

In mean.default(df2[j, ]) : argument is not numeric or logical: returning NA

Answer 1

使用 rowMeans()功能:

final$mean <- rowMeans(final, na.rm=TRUE)

请注意，您应该避免在日常生活中使用循环 R操作。如果您想自己遍历所有行，可以使用 apply()像这样的功能:

final$mean <- apply(final, 1, function(x) { mean(x, na.rm=TRUE) })