如果使用预期比例代替R中的计数，则卡方结果不相等

问题描述

在不同月份的同一事实中测试两个样本之间的拟合优度。我想知道9月的4个类别的结果是否与10月的相似/不同。

问题是我的测试给我使用列联表时的结论与以上个月的预期比例得出的预期比例不同。

样本数据：

data <-data.frame(september=c(10741,1575,174,2),october= c(11987,1705,211,row.names = c("A","B","C","D"))
> data
  september october
A     10741   11987
B      1575    1705
C       174     211
D         2       2

使用列联表测试通常的方式：

> chisq.test(data)

Pearson's Chi-squared test

data:  data
X-squared = 1.3846,df = 3,p-value = 0.7092

计算9月的比例并将其设置为预期概率：

    p <- data$september %>% prop.table()

    [1] 0.8598302914 0.1260806916 0.0139289145 0.0001601025

 chisq.test(x=data$october,p = p)

    Chi-squared test for given probabilities

data:  data$october
X-squared =  2.9748,p-value = 0.3955

为什么这样的测试差异？哪一个是错的？我认为这两种策略会导致相同的结果，但似乎是一个错误

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）