R: Split a Vector to Equally-Overlapping Sub-vectors

Question

I want R script to split a parent vector (1 to n) to overlapping sub-vectors with equal and constant length. In that case,