seq_along - R cómo enumerar todos los demás elementos?