r: command seq para generar secuencias