Écrire une fonction pour « changer »
Avant de simuler la situation où l'on « change », écrivons d'abord une fonction pour effectuer le dévoilement dans ce contexte. Nous utiliserons ensuite cette fonction dans le prochain exercice pour simuler la probabilité de gagner lorsqu'on change de porte.
Rappelez-vous que si la porte choisie au départ est la bonne, l'animateur choisira au hasard l'une des deux autres portes à dévoiler.
Si la porte choisie au départ n'est pas la bonne, l'animateur dévoilera simplement l'autre porte incorrecte. Notez que, dans ce cas, il n'y a rien d'aléatoire dans le dévoilement.
Cette activité fait partie du cours
Casse-têtes de probabilité en R
Instructions de l’exercice
- Si le choix initial était correct, utilisez la fonction
samplepour choisir au hasard l'une des autres portes à dévoiler. - Sinon, sélectionnez la seule porte restante à dévoiler.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
reveal_door <- function(doors, prize, initial_choice){
if(prize == initial_choice){
# Sample at random from the two remaining doors
reveal <- sample(x = ___, size = 1)
} else {
# When the prize and initial choice are different, reveal the only remaining door
reveal <- ___
}
}