lm，带有使用管道％>％运算符的交互项

Question

我有一个包含三列的标题，分别为y，x1和x2。我可以通过简单地执行[

lm(y ~ x1 + x2)来进行正则回归%>%

dat %>%
 select(y, x1, x2) %>%
 lm()

但是，如果我想执行lm(y ~ x1*x2)，该怎么做？我想到的唯一方法是

dat %>%
 mutate(x1x2 = x1 * x2) %>%
 select(y, x1, x2, x1x2) %>%
 lm()

但是我不喜欢这种解决方案，想要更简单的东西。

Answer 1

您可以将所需的公式传递给lm()

dat %>%
  select(y, x1, x2) %>%
  lm(formula = (y ~x1*x2))