Simularea unui singur n

Având o cameră cu 50 de persoane, să începem prin a găsi o soluție prin simulare.

În acest cod, n va reprezenta dimensiunea camerei, iar match va fi contorul nostru pentru numărul de ori în care a apărut cel puțin o zi de naștere comună în simulare – pornind de la 0 și incrementându-se la fiecare iterație în care apare o potrivire.

Acest exercițiu face parte din cursul

Puzzle de probabilitate în R

Vezi cursul

Instrucțiuni pentru exercițiu

Completează parametrii necesari ai funcției sample pentru a atribui aleatoriu zile de naștere fiecărei persoane.
Incrementează variabila match conform condiției care o precede.
Calculează probabilitatea estimată că apare cel puțin o potrivire.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

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(___)

Editează și rulează codul