Envoyer par SMS: Funciones en R