Replace '1:nrow(...)' by 'seq_len(nrow(...))' which is likely to be r…

Replace '1:nrow(...)' by 'seq_len(nrow(...))' which is likely to be r… #157