Simulation of a single n
With a room of size 50, let us start by finding a solution via simulation.
In this code, n will represent our room size and match will be our counter for the number of times at least one matching birthday occurred in the simulation, which starts at 0 and should increment in each iteration where a match occurs.
Este ejercicio forma parte del curso
Probability Puzzles in R
Instrucciones del ejercicio
- Fill in the required parameters of the
samplefunction, to randomly assign birthdays to each individual. - Increment the
matchvariable according to the condition it follows. - Calculate the estimated probability of at least one match.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
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(___)