Simulasi untuk satu n
Dengan jumlah orang di ruangan sebanyak 50, mari mulai dengan mencari solusi melalui simulasi.
Dalam kode ini, n akan merepresentasikan ukuran ruangan kita dan match akan menjadi penghitung untuk jumlah kejadian ketika setidaknya ada satu ulang tahun yang sama dalam simulasi, yang dimulai dari 0 dan harus bertambah pada setiap iterasi ketika kecocokan terjadi.
Latihan ini adalah bagian dari kursus
Teka-teki Probabilitas di R
Petunjuk latihan
- Lengkapi parameter yang diperlukan pada fungsi
sampleuntuk mengacak tanggal ulang tahun bagi setiap individu. - Tambahkan variabel
matchsesuai kondisi yang diikutinya. - Hitung probabilitas taksir untuk setidaknya satu kecocokan.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
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(___)