我有一个1000列和8行的数据帧,我需要计算行的意思.我试过这个循环:
final <- as.data.frame(matrix(nrow=8,ncol=1))
for(j in 1:8){
value<- mean(dataframe[j,])
final[j,]<-value
}
Run Code Online (Sandbox Code Playgroud)
但得到以下错误:
在mean.default(df2 [j,])中:参数不是数字或逻辑:返回NA
使用rowMeans()功能:
final$mean <- rowMeans(final, na.rm=TRUE)
Run Code Online (Sandbox Code Playgroud)
请注意,您应该避免在日常R操作中使用循环.如果您想自己迭代所有行,可以使用如下apply()函数:
final$mean <- apply(final, 1, function(x) { mean(x, na.rm=TRUE) })
Run Code Online (Sandbox Code Playgroud)