Primera modificación a first2.r