จำลองความน่าจะเป็นสำหรับชุดห้าปีที่กำหนด

ต่อไป มาใช้ฟังก์ชัน check_for_five จากคำถามก่อนหน้าเพื่อจำลอง 10000 รอบของช่วงห้าปี เพื่อดูว่าความสำเร็จของ Ronnie Bardah ที่ผ่านเข้ารอบ cash ห้าปีติดต่อกันนั้นหาได้ยากแค่ไหน โดยสมมติว่ามีผู้เล่นทั้งหมด 6000 คน และ 10% หรือ 600 คนจะผ่านเข้ารอบ cash ในแต่ละปี

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

Probability Puzzles in R

ดูคอร์ส

คำแนะนำการฝึกหัด

สร้าง matrix ของผลลัพธ์ว่าใครผ่านเข้ารอบ cash ในแต่ละปีจากทั้งหมดห้าปี โดยสมมติว่ามีผู้เล่นทั้งหมด 6000 คน และ 600 คนจะผ่านเข้ารอบ cash
กำหนดเงื่อนไขเพื่อตรวจสอบว่ามีผู้เล่นคนใดผ่านเข้ารอบ cash ครบทั้งห้าปีหรือไม่

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

players <- c(1:6000)
count <- 0

for(i in 1:10000){
  # Create matrix of cashing players
  cashes <- ___
  # Check for five time winners
  if(___){
    count <- count + 1
  }
}

print(count/10000)

แก้ไขและรันโค้ด