r - Is there any function that will allow me to transform this list into a set of vectors?

Question

I would like to turn this list [1, 2, 3, 4, 5, 6, 7, 8, 9] into the following set of vectors

(2,3,4) 
(3,4,5) 
(4,5,6) 
(5,6,7)
(6,7,8) 
(7,8,9)

question from:https://stackoverflow.com/questions/65896054/is-there-any-function-that-will-allow-me-to-transform-this-list-into-a-set-of-ve

Answer 1

x = c(1, 2, 3, 4, 5, 6, 7, 8, 9)
n = length(x)
lapply(1:(n - 2), function(i) x[i:(i + 2)])