Извлечение точек данных из скользящей суммы в R

Question

all <- c()
for (i in c(1:10)){
   temp <- sum (i:(i+3))
   all <- c(all, temp)
}

all
[1] 10 14 18 22 26 30 34 38 42 46

Можно ли извлечь точки данных (если размер окна = 4) и дать следующие результаты?

[1] 1 2 3 4 5 6 7 8 9 10

Спасибо.