xtshift now robust to k > length(x)