cambio en el codigo R

He añadico y quitado cosas