ฟังก์ชันสำหรับประเมินชุดข้อมูลห้าปี
ในแบบฝึกหัดนี้ เราจะเขียนฟังก์ชันเพื่อประเมินชุดข้อมูลห้าปีใด ๆ และตรวจสอบว่ามีผู้เล่นคนใดที่ได้รับเงินรางวัลครบทั้งห้าปีหรือไม่
สมมติว่ามีผู้เล่นทั้งหมด 6,000 คน โดยแต่ละคนจะถูกแทนด้วยตัวเลข 1 ถึง 6,000 ภายใต้สมมติฐานที่ว่าผู้เล่น 10% จะได้รับเงินรางวัล อินพุตของฟังก์ชันจะเป็นเมทริกซ์ที่มีห้าคอลัมน์ (แทนแต่ละปี) และ 600 แถว (แทนผู้เล่นที่ได้รับเงินรางวัลแต่ละคน)
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
Probability Puzzles in R
คำแนะนำการฝึกหัด
- ใช้ฟังก์ชัน
Reduceเพื่อหาค่าอินเทอร์เซกชันของทั้งห้าปี - ตรวจสอบว่าอินเทอร์เซกชันมีสมาชิกอยู่หรือไม่
- ระบุเงื่อนไขที่จะคืนค่า
FALSE
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
check_for_five <- function(cashed){
# Find intersection of five years
all_five <- Reduce(___)
# Check intersection
if(___){
return(TRUE)
# Specify when to return FALSE
} ___ {
return(FALSE)
}
}