用R进行调节效应分析

调节效应分析可以用pequod包来完成。分析之前需要先安装pequod包，安装方法，请在R控制台输入：install.packages("pequod")。

脚本与注释

library(car)    # 启用car包。如果没有安装，请先按安装。安装方法，请在R控制台输入：install.packages("car")
data(Ginzberg)  # 调用car包中的Ginzberg数据
library(pequod) # 启用pequod包
model1<-lmres(adjdep~adjsimp*adjfatal, centered=c("adjsimp", "adjfatal"),data=Ginzberg) #使用pequod包中的lmres()函数进行分析
summary(model1, type="nested")  # 显示结果