Get startedGet started for free

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.

This exercise is part of the course

Probability Puzzles in R

View Course

Exercise instructions

  • Fill in the required parameters of the sample function, to randomly assign birthdays to each individual.
  • Increment the match variable according to the condition it follows.
  • Calculate the estimated probability of at least one match.

Hands-on interactive exercise

Have a go at this exercise by completing this sample 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(___)
Edit and Run Code