无法在R中重现卡方检验结果

Question

我想在R中使用chisq.test（）函数。我在维基书籍上找到了一个例子＆＃34; GNU R＆＃34;为了测试。代码和输出是：

x <- matrix(c(13,15,58,67),2,2)                           
chisq.test(x)

Pearson's Chi-squared test with Yates' continuity correction

data:  x 
X-squared = 0.0428, df = 1, p-value = 0.8361

所以我尝试重现这个例子并得到了这个：

x <- matrix(c(13,15,58,67),2,2) 
chisq.test(x)

Pearson's Chi-squared test with Yates' continuity correction

data:  x
X-squared = 4.06e-31, df = 1, p-value = 1

结果差异的原因是什么？我使用完全相同的代码。我做错了吗？ 谢谢你的帮助！