我有以下声明。我似乎不得不通过自己写出数字来重复自己。使用seq(-1,-9,-1)或-1:-9似乎不起作用。还有另一种与R说话的方式吗?
difnormsum<-rowSums(data.frame(difnorm[[1]][-nrow(difnorm)],difnorm[[1]][-1],
difnorm[[1]][-2],difnorm[[1]][-3],difnorm[[1]][-4],difnorm[[1]][-5],
difnorm[[1]][-6],difnorm[[1]][-7],difnorm[[1]][-8],difnorm[[1]][-9]))
答案 0 :(得分:1)
你可以尝试
rowSums(data.frame(
lapply(c(nrow(difnorm),1:9), function(i) difnorm[[1]][-i])
))