Cập nhật cho các kết quả khác
Trong bài tập trước, bạn đã tính xác suất đồng xu là công bằng nếu tung được 11 mặt ngửa trong 20 lần, giả sử ban đầu khả năng là đồng xu công bằng hoặc lệch đều như nhau. Hãy nhớ rằng đoạn mã trông như sau:
probability_fair <- dbinom(11, 20, .5)
probability_biased <- dbinom(11, 20, .75)
probability_fair / (probability_fair + probability_biased)
Giờ bạn sẽ dùng cách tiếp cận dbinom() để tìm xác suất hậu nghiệm cho hai kết quả khác.
Bài tập này là một phần của khóa học
Nền tảng Xác suất với R
Hướng dẫn bài tập
- Tìm xác suất đồng xu là công bằng khi được 14 mặt ngửa trong 20 lần tung.
- Tìm xác suất đồng xu là công bằng khi được 18 mặt ngửa trong 20 lần tung.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# Find the probability that a coin resulting in 14/20 is fair
# Find the probability that a coin resulting in 18/20 is fair