向量化语句中的R求和

Question

我有以下语句。我似乎不得不通过自己写出数字来重复自己。使用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])) 

Answer 1

你可以尝试

rowSums(data.frame(
    lapply(c(nrow(difnorm),1:9), function(i) difnorm[[1]][-i]) 
))