如何制作for循环以查找R中多个变量之间的相互作用?

How to make a for loop to find interactions between several variables in R?

我有一个包含 17 个变量的数据集

这里有数据link http://www.uwyo.edu/crawford/stat3050/final%20project/maxwellchandler.txt

我想找出变量之间的显着交互作用。

例如

    fitcivilian<-lm(Civilian~Stock+Terrorism+log(Firepower)+Payload+Bombs*Temperature+FirstAid+Spies+Personnel+IG88, data=data)

其中炸弹*温度很重要

我想做的是针对每个其他变量测试每个变量,

喜欢

炸弹*温度

炸弹*凝固汽油弹

IG88* 武器

导弹*火力

等直到两个的每一个组合都被耗尽

这样,我可以找出每个变量之间是否存在显着的交互作用。

我知道如何手动完成,创建一个线性模型,然后对该模型进行总结,但我希望能够创建一个循环来测试每个变量,因为测试所有内容需要很多条目.

我也做过类似的事情。您需要根据需要修改循环。如果您需要帮助,请告诉我。

    vars=colnames(mydata)[-1] 
    for (i in vars)  {
    for (j in vars) {
    if (i != j) {
    factor= paste(i,j,sep='*')}
    lm.fit <- lm(paste("Sales ~", factor), data=mydata)
    print(summary(lm.fit))
    }}