Variables en retard dans R

Quel est le moyen le plus efficace de faire une matrice de variables retardées en R pour une variable arbitraire (c'est à dire non de temps réguliers de la série)

Par exemple:

Entrée:

x <- c(1,2,3,4) 

2 gal, sortie:

[1,NA, NA]
[2, 1, NA]
[3, 2,  1]
[4, 3,  2]

source d'informationauteur James in Ottawa