Simulation d’un seul n

Avec une salle de 50 personnes, commençons par trouver une solution par simulation.

Dans ce code, n représente la taille de la salle et match est notre compteur du nombre de fois où au moins deux anniversaires correspondent dans la simulation. Il démarre à 0 et doit s’incrémenter à chaque itération où une correspondance se produit.

Cet exercice fait partie du cours

Énigmes de probabilité en R

Afficher le cours

Instructions

Renseignez les paramètres nécessaires de la fonction sample pour attribuer aléatoirement un anniversaire à chaque personne.
Incrémentez la variable match en fonction de la condition qu’elle suit.
Calculez la probabilité estimée d’avoir au moins une correspondance.

Exercice interactif pratique

Essayez cet exercice en complétant cet exemple de code.

set.seed(1)
n <- 50
match <- 0

# Simulate 10000 rooms and check for matches in each room
for(i in 1:10000){
  birthdays <- sample(___, ___, replace = ___)
  if(length(unique(birthdays)) < n){
    match <- ___
  } 
}

# Calculate the estimated probability of a match and print it
p_match <- ___
print(___)

Modifier et exécuter le code