Avoid 1: for possibly-empty input

[MichaelChirico]

Identified by lintr::seq_linter().

I didn't see enough input validation to ensure that a length-0 input doesn't wind up running 1:0 accidentally in these cases, hence seq_along()/seq_len() should be preferred.