Моделирование вероятности для заданного набора пяти лет
Теперь используем функцию check_for_five из предыдущего задания, чтобы смоделировать 10 000 итераций пяти лет и оценить, насколько редким было достижение Ронни Бардаха — пять побед подряд с получением призовых. Будем исходить из того, что всего участвуют 6000 игроков, из которых 10%, то есть 600 человек, получают призовые каждый год.
Это упражнение является частью курса
Задачи по теории вероятностей на R
Инструкции к упражнению
- Создайте матрицу результатов о том, кто получил призовые в каждый из пяти лет, учитывая, что общее число игроков составляет 6000, а призовые получают 600 из них.
- Укажите условие, чтобы проверить, получил ли хотя бы один игрок призовые во все пять лет.
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
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)