use seq_along(x) instead of 1:length(x)
use seq_along(x) instead of 1:length(x)
use seq_along(x) instead of 1:length(x)
use seq_along(x) instead of 1:length(x); replace 1:fun(x) with seq_len(fun(x))
use seq_along(x) instead of 1:length(x)
use seq_along(x) instead of 1:length(x)