Функция chisq.test() в R - критерий хи-квадрат
Примеры на языке RФункция chisq.test() в R используется для проведения критерия хи-квадрат, проверяющего независимость или согласие между категориальными переменными.
Критерий хи-квадрат часто используется для анализа наличия связи между двумя категориальными переменными в таблице сопряжённости.
Синтаксис функции chisq.test() выглядит следующим образом:
chisq.test(x, y = NULL, correct = TRUE)
Описание параметра:
xТаблица сопряжённости (матрица) или числовой вектор.
yНеобязательный, второй вектор.
correctИспользовать ли поправку Йетса на непрерывность (только для таблиц 2x2), по умолчанию TRUE.
Пример
# Создать таблицу сопряжённости: пол и факт покупки
# Куплено Не куплено
# Мужчины 40 20
# Женщины 30 30
data_table <- matrix(c(40, 20, 30, 30), nrow = 2,
byrow = TRUE)
colnames(data_table) <- c("Куплено", "Не куплено")
rownames(data_table) <- c("Мужчины", "Женский")
print("Таблица сопряжённости:")
print(data_table)
# Критерий хи-квадрат
result <- chisq.test(data_table)
print(result)
# Куплено Не куплено
# Мужчины 40 20
# Женщины 30 30
data_table <- matrix(c(40, 20, 30, 30), nrow = 2,
byrow = TRUE)
colnames(data_table) <- c("Куплено", "Не куплено")
rownames(data_table) <- c("Мужчины", "Женский")
print("Таблица сопряжённости:")
print(data_table)
# Критерий хи-квадрат
result <- chisq.test(data_table)
print(result)
Выполнение приведенного выше кода дает следующий вывод:
[1] "列联表:"
购买 未购买
男性 40 20
女性 30 30
Pearson's Chi-squared test with Yates' continuity correction
data: data_table
X-squared = 3.2812, df = 1, p-value = 0.07008
p-значение > 0.05, что указывает на отсутствие значимой связи между полом и покупательским поведением на уровне значимости 0.05.
Другие расширения