Create prueba.r