Alternatif hipotez altında doğru sayıda tahminin dağılımı , merkez oranı olmayan hipergeometrik bir dağılımı takip eder ; bu, oran oranı, yani, hanımın "önce çay" ı tahmin etme olasılıkları Aslında çay ilk önce (ya da tam tersi) süt eklendiğinde aksine gerçekten eklenmiştir. Oran oranı 1 ise, merkezi hipergeometrik dağılımı elde ederiz.
Bakalım bu işe yarayıp yaramadığını. R'yi örnekleme amacıyla, (merkezi olmayan) hipergeometrik dağılımın yoğunluğunu hesaplama MCMCpack
işlevine sahip paketi kullanarak kullanacağım dnoncenhypergeom()
. Bu değişkenleri olduğu x
tahminlerin doğru sayısını (dikkatli: çay gerçekten ilk eklendiğinde bu iki koşuldan birisi tahminlerin doğru sayıda, örneğin, bir), argümanlar n1
, n2
ve m1
dört kenar üçü için ve psi
için gerçek oran oranı. x
Gerçek olasılık oranı 1 olduğunda , yoğunluğu 0 ila 4'e eşitleyelim (tüm kenar boşlukları 4'e eşittir):
install.packages("MCMCpack")
library(MCMCpack)
sapply(0:4, function(x) dnoncenhypergeom(x, n1=4, n2=4, m1=4, psi=1))
Bu şu sonuçları verir:
[1] 0.01428571 0.22857143 0.51428571 0.22857143 0.01428571
Yani, sıfır hipotezi altında, hanımefendinin 8 doğru tahmin yapma şansı% 1.43'tür (yani, ilk önce çayın eklendiği 4 fincanın tamamını doğru tahmin eder ve bu nedenle de 4 sütü de ilk eklenen sütü de doğru tahmin eder). Bu aslında Fisher'ın sıfır hipotezini reddetmek için yeterli bulduğu kanıt miktarıdır.
Soruda belirtilen olasılıklar oran oranını hesaplamak için kullanılabilir, yani, (yani, ). Şimdi, hanımefendinin 8 bardağın hepsini doğru tahmin etme şansı nedir (yani, ilk önce çayın eklendiği 4 bardağın tamamını ve sütün ilk önce eklendiği 4 bardağı da doğru tahmin edecektir)?(.90/(1−.90))/(.10/(1−.10))=81odds(guessA|trueA)/odds(guessA|trueB)
dnoncenhypergeom(4, n1=4, n2=4, m1=4, psi=81)
Bu şu sonuçları verir:
[1] 0.8312221
Yani güç yaklaşık% 83'tür.