Replace 1:k with seq_len(k)

[nanxstats]

See https://win-vector.com/2018/02/19/r-tip-use-seq_len-to-avoid-the-backwards-sequence-bug/