in chapter 3, instead of `seq_along(x)` you used [`seq_len(n)`](https://github.com/csgillespie/efficientR/blob/6a5b604ebb56610d9c69b871fd0fee261e653d35/03-programming.Rmd#L59) which is wrong.
