如何创建仅在R中具有交互项的线性模型?