Önselerle güncelleme
20 yazı-tura atışından 14’ünün yazı geldiğini görüyoruz ve başlangıçta paranın adil olma olasılığını %80, %75’e yanlı olma olasılığını ise %20 alıyoruz.
Bunu benzetimle çözeceksin: 10.000 paradan oluşan bir “kova” ile başla; 8.000’i adil, 2.000’i %75’e yanlı olsun ve her birini 20 kez at.
Bu egzersiz, kursun bir parçasıdır
R ile Olasılığın Temelleri
Egzersiz talimatları
- Adil bir parayı 20 kez atmayı 8.000 deneme ve yanlı bir parayı 20 kez atmayı 2.000 deneme olarak benzetimle. Sonuçları sırasıyla
fair_flipsvebiased_flipsolarak kaydet. - Her iki para için de 14 yazı ile sonuçlanan durumların sayısını bul ve sırasıyla
fair_14vebiased_14olarak kaydet. - 14 yazı ile sonuçlanan tüm paralar arasında adil olanların oranını bul: bu, paranın adil olmasına dair son olasılığın bir tahminidir.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
# Simulate 8000 cases of flipping a fair coin, and 2000 of a biased coin
fair_flips <-
biased_flips <-
# Find the number of cases from each coin that resulted in 14/20
fair_14 <-
biased_14 <-
# Use these to estimate the posterior probability