r - 特定の長さのすべてのサブベクトルを作成する (移動ウィンドウ)

Question

私はベクトルを持っています

vec <- c(1,2,3,4,5)

指定された長さのすべてのサブベクトルを取得する最良の方法は何ですか? たとえば、長さが 3 のすべてのサブベクトルは次のようになります。

1,2,3
2,3,4
3,4,5

ご協力ありがとうございました！