Envoyer par SMS: Reinsurance of Extremal Claims by EOT Method Using R