r - 如何创建一个 for 循环来查找 R 中多个变量之间的相互作用？

Question

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

可通过此链接获取数据 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* 武器

导弹*火力

等等。直到两者的每一个组合都耗尽为止

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

我知道如何手动执行此操作，创建一个线性模型，然后对该模型进行摘要，但我希望能够创建一个测试每个变量的循环，因为测试所有内容需要很多条目。

Answer 1

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

    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))
    }}