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])
 ))