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 notre salle et match est notre compteur du nombre de fois où au moins deux personnes partagent la même date d'anniversaire dans la simulation. Il part de 0 et doit s'incrémenter à chaque itération où un jumelage se produit.
Cette activité fait partie du cours
Casse-têtes de probabilité en R
Instructions de l’exercice
- Remplissez les paramètres requis de la fonction
samplepour attribuer aléatoirement une date d'anniversaire à chaque personne. - Incrémentez la variable
matchselon la condition qu'elle suit. - Calculez la probabilité estimée d'avoir au moins un jumelage.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
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(___)