Update prueba.R

agregar nueva linea