Как выполнить тест собеля в r


Тест Собела — это метод проверки значимости эффекта посредничества.

Согласно Википедии :

При посредничестве связь между независимой переменной и зависимой переменной предполагается как косвенный эффект, существующий за счет влияния третьей переменной (медиатора). В результате, когда медиатор включается в модель регрессионного анализа с независимой переменной, влияние независимой переменной уменьшается, а эффект медиатора остается значимым.

Тест Собела, по сути, представляет собой специализированный t-критерий, который обеспечивает метод определения того, является ли снижение влияния независимой переменной после включения посредника в модель значительным снижением и, следовательно, является ли эффект посредничества статистически значимым.

В этом руководстве объясняется, как выполнить тест Собеля в R.

Выполните тест Собеля в R

Чтобы выполнить тест Sobel в R, вы можете использовать библиотеку bda .

 #install bda package if not already installed
install.packages('bda')

#load bda package
library(bda)

Основной синтаксис выполнения теста Собеля:

посредничество.test(mv,iv,dv)

где mv — опосредующая переменная, iv — независимая переменная, а dv — зависимая переменная.

Следующий код выполняет тест Собеля, используя список из 50 нормальных случайных величин для переменной-посредника, независимой переменной и зависимой переменной:

 mv <- rnorm(50)
iv <- rnorm(50)
dv <- rnorm(50)
mediation.test(mv,iv,dv)

Этот код дает следующий результат:

В данном случае нас в основном интересуют значения столбца Собеля . Значение z составляет -1,047, а соответствующее значение p составляет 0,295.

Поскольку это значение p превышает уровень альфа 0,05, мы не могли отвергнуть нулевую гипотезу об отсутствии эффекта посредничества.

Таким образом, эффект медиации не является статистически значимым.

Примечание. В своем тесте вы можете использовать другой альфа-уровень. Обычные значения альфа включают 0,01, 0,05 и 0,10.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *