Cập nhật bằng mô phỏng sau 16 lần ngửa
Bạn thấy 16 lần ngửa trong 20 lần tung từ một đồng xu hoặc là công bằng (50% xác suất ngửa) hoặc là lệch (75% xác suất ngửa). Khả năng đồng xu là công bằng là bao nhiêu?
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
- Mô phỏng 50.000 trường hợp tung 20 lần từ một đồng xu công bằng (50% xác suất ngửa), và từ một đồng xu lệch (75% xác suất ngửa). Lưu các biến này lần lượt là
fairvàbiased. - Tìm số đồng xu công bằng có đúng 16/20 lần ngửa, rồi số đồng xu lệch có đúng 16/20 lần ngửa. Lưu chúng lần lượt là
fair_16vàbiased_16. - In ra tỉ lệ trong tất cả các đồng xu có 16 lần ngửa là đồng xu công bằng — đây là xác suất hậu nghiệm rằng một đồng xu với 16/20 lần ngửa là công bằng.
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.
# Simulate 50000 cases of flipping 20 coins from fair and from biased
fair <-
biased <-
# How many fair cases, and how many biased, led to exactly 16 heads?
fair_16 <-
biased_16 <-
# Find the fraction of fair coins that are 16 out of all coins that were 16