私は行動研究を行っており、種が 3 つの期間で予想とは大幅に異なる反応を示しているかどうかを確認したいと考えています。種の 47 の独立した観察があり、それぞれ 3 つの期間があり、合計観察期間は 8.6 分です。1 ピリオドは 3 分、2 ピリオドは 0.6 分、3 ピリオドは 5 分です。各期間中、動物は肯定的または否定的に反応します。最初の期間では、2 つの肯定的な応答があり (47 の観測のうち、45 は否定的)、2 番目の期間では、47 の応答のうち 13 が肯定的であり、3 番目の期間では、47 の応答のうち 14 が肯定的でした。
したがって、期間間の時間の違いを修正するために帰無仮説の確率を調整するカイ二乗検定を実行しようとしていますが、正しく行っているとは思いません。
data<-c(2,13,14)
null.probs<-c(3/8.6, 0.6/8.6, 5/8.6)
chi<-chisq.test(data, p=null.probs)
この場合、これらの期待値の帰無仮説が正しくないことはかなり確信していますが、それを適切に調整する方法はわかりません。