Jugando con R y guardando pedazos utiles de codigo