Распределение правильного числа догадок согласно альтернативной гипотезе следует нецентральному гипергеометрическому распределению , которое параметризуется в терминах отношения шансов, то есть насколько выше шансы, что дама будет угадывать «чай первым», когда в Фактически, чай был действительно добавлен первым, в отличие от того, когда на самом деле молоко было добавлено первым (или наоборот). Если отношение шансов равно 1, то мы получаем центральное гипергеометрическое распределение.
Посмотрим, работает ли это. Я буду использовать R в целях иллюстрации, используя MCMCpack
пакет, который имеет функцию dnoncenhypergeom()
для вычисления плотности (нецентрального) гипергеометрического распределения. Он имеет аргументы x
для правильного количества догадок (осторожно: это правильное количество догадок при одном из двух условий, например, когда чай был действительно добавлен первым), аргументы n1
, n2
и m1
для трех из четырех краев, а также psi
для истинное соотношение шансов. Давайте вычислим плотность для x
значений от 0 до 4 (со всеми полями, равными 4), когда истинное отношение шансов равно 1:
install.packages("MCMCpack")
library(MCMCpack)
sapply(0:4, function(x) dnoncenhypergeom(x, n1=4, n2=4, m1=4, psi=1))
Это дает:
[1] 0.01428571 0.22857143 0.51428571 0.22857143 0.01428571
Таким образом, есть вероятность 1,43%, что дама сделает 8 правильных предположений (т.е. она угадывает все 4 чашки правильно, где чай был добавлен первым, и, следовательно, она также угадывает все 4 чашки правильно, где молоко было добавлено первым) при нулевой гипотезе. На самом деле это количество доказательств, которые Фишер считал достаточными, чтобы отвергнуть нулевую гипотезу.
Вероятности, указанные в вопросе, могут быть использованы для вычисления отношения шансов, а именно (то есть ). Какова вероятность того, что дама угадает все 8 чашек правильно (то есть она угадает все 4 чашки правильно, где чай был добавлен первым, а следовательно, и 4 чашки правильно, где молоко было добавлено первым)?коэффициент ( предположение A | истинный A ) / коэффициент ( предположение A | истинный B )(.90/(1−.90))/(.10/(1−.10))=81odds(guessA|trueA)/odds(guessA|trueB)
dnoncenhypergeom(4, n1=4, n2=4, m1=4, psi=81)
Это дает:
[1] 0.8312221
Таким образом, мощность составляет около 83% тогда.