Exercise 2 : Méthode d'échantillonnage de la fonction inverse

Programmer un algorithme d’échantillonnage selon la loi exponentielle de paramètre \(\lambda\) grâce à la méthode de la fonction inverse et la fonction runif().

Comparer la distribution de l’échantillon obtenu avec cet algorithme et la distribution théorique cible (grâce à la fonction dexp()), et explorer différentes valeurs pour le paramètre \(\lambda\) (par exemple 1, 10, 0.78, …) pour vérifier le bon comportement de l’algorithme.

generer_exp <- function(n, lambda) {
    ...
    return(x)
}

hist(...)
curve(..., add = TRUE)