r - 带有四分之一虚拟变量的线性回归

Question

我正在尝试对下面的数据进行线性回归

Power<-mutate(Power,Year=format(Date,"%Y"),Quarter=quarters(Date),Month=format(Date,"%m"))
head(Power)
       Date    YY    XX  Year    Quarter
2007-01-01     NA     NA 2007      Q1
2007-01-02     NA     NA 2007      Q1
2007-01-03  55.90  71.40 2007      Q1
2007-01-04  55.25  70.75 2007      Q1

模型是

lm(YY~XX+as.factor(Quarter,ref="Q1"),data=Power)

这很好用。但是，它会自动创建 3 个季度的三个虚拟对象。有没有办法在这个模型中只包含一个假人，比如 Q2？

Answer 1

可以说，最常见的方法是使用 I() 动态创建一个二分变量。

lm(YY ~ XX + I(Quarter=="Q2"), data=Power)

这包括模型中的二元预测变量，当 Quarter=="Q2" 时该预测变量为 1，否则为 0。