Mô phỏng lỗi dấu: thay đổi xác suất
Ở bài trước, mỗi lần mô phỏng dùng một xác suất cố định cho lỗi dấu ở mỗi bước.
Trong câu hỏi gốc, xác suất lỗi dấu có thể khác nhau ở mỗi bước; yêu cầu duy nhất là mỗi xác suất đều nhỏ hơn 0,50.
Tại đây, hãy mô phỏng một bài toán có 2 bước, trong đó xác suất đổi dấu ở mỗi bước lần lượt là 0,49 và 0,01, tức là có xác suất cao bị sai ở bước đầu và xác suất thấp đổi lại đúng ở bước sau.
Bài tập này là một phần của khóa học
Câu đố Xác suất với R
Hướng dẫn bài tập
- Dùng hàm
sapplykết hợprbinomđể mô phỏng các lần đổi dấu trong một bài toán, với xác suất đổi dấu là 0,49 và 0,01 cho bước thứ nhất và thứ hai, tương ứng. - Xác định tổng số lần đổi dấu đã xảy ra.
- Xác định xem lời giải của bài toán có đúng hay khô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.
set.seed(1)
counter <- 0
for(i in 1:10000){
# Simulate switches
each_switch <- sapply(___)
# Count switches
num_switches <-
# Check solution
if(___){
counter <- counter + 1
}
}
print(counter/10000)