Сумма каждого n-го очка
У меня есть вектор, и мне нужно сложить каждыйn
цифры и вернуть результаты. Это способ, которым я планирую делать это в настоящее время. Есть ли лучший способ сделать это?
v = 1:100
n = 10
sidx = seq.int(from=1, to=length(v), by=n)
eidx = c((sidx-1)[2:length(sidx)], length(v))
thesum = sapply(1:length(sidx), function(i) sum(v[sidx[i]:eidx[i]]))
Это дает:
thesum
[1] 55 155 255 355 455 555 655 755 855 955