卡方檢驗 - R dyplr

Question

我有以下 dataframe：

data = data.frame(group = c("conse", "dem", "schoo"),
                  f = c(43, 30, 36),
                  m = c(rep(29, 17, 36))

我想應用卡方檢驗來檢查三組中女性和男性的比例是否具有可比性。

但是當我寫下面的代碼時：

data_chi = data%>%
  chisq.test()

我收到一條錯誤消息，內容為“sum(x) 錯誤：參數的‘類型’（字符）無效”

我試圖將我的表轉換為 tibble，然后什么也沒有發生（甚至沒有錯誤消息）。

你能幫我找到解決辦法嗎？

非常感謝！

Answer 1

您需要刪除group列，因為卡方檢驗僅適用於數字數據，不知道如何處理字符列

data = data.frame(group = c("conse", "dem", "schoo"),
                  f = c(43, 30, 36),
                  m = c(rep(29, 17, 36)))

library(dplyr)

data %>%
  select(-group) %>%
  chisq.test()
#> 
#>  Pearson's Chi-squared test
#> 
#> data:  .
#> X-squared = 12.44, df = 35, p-value = 0.9998

^{創建於 2023-01-25，使用reprex v2.0.2}

Answer 2

另外的選擇

library(magrittr)
data <- data.frame(
  group = c("conse", "dem", "schoo"),
  f = c(43, 30, 36),
  m = c(29, 17, 36)
)

data %$% chisq.test(data[-1])
#> 
#>  Pearson's Chi-squared test
#> 
#> data:  data[-1]
#> X-squared = 2.5522, df = 2, p-value = 0.2791

^{創建於 2023-01-25，使用reprex v2.0.2}