R vecteur

y <- x[1:(length(x) - 1)]
Cautious Caiman