R中的线性对比与Anova

Question

我正在努力理解这个问题(我的老师正在休假)，我希望能得到一些帮助。

利用“contr.sum”对比选项，进行时间和面积作为主效应的方差分析(ANOVA)，以及两个主效应之间的相互作用。

我不太清楚如何用对比来做方差分析。我的答案似乎是分开的。我创造了一个这样的模型

modelCO1 = aov(CO~Time+Area+(Time*Area), data = WorkplaceCO)

但这与线性对比无关。每当我尝试使用这段代码

modelCO1$contrasts$Time

我得到的输出是

"contr.sum"

但这并没有告诉我什么。或者，我也这样做了

options(contrasts=c("contr.sum", "contr.poly"))

contrasts(WorkplaceCO$Area)
contrasts(WorkplaceCO$Time)

这给了我一个输出

> contrasts(WorkplaceCO$Area)
           [,1]
Nonsmoking    1
Smoking      -1
> contrasts(WorkplaceCO$Time)
        [,1] [,2] [,3] [,4] [,5]
7:00am     1    0    0    0    0
10:00am    0    1    0    0    0
11:00am    0    0    1    0    0
1:20pm     0    0    0    1    0
4:20pm     0    0    0    0    1
7:00pm    -1   -1   -1   -1   -1

但再说一遍，方差分析在哪里适用？非常感激。

Answer 1

设置对比需要做之前，你适合的模型。因此，如果在调用options(contrasts=c("contr.sum", "contr.poly"))之前运行aov()，那么您将得到所需的模型。请注意，options()调用将更改对contrasts()的未来调用的默认值；如果不希望这样，您可以在不更改默认设置的情况下对一个因素设置对比：

contrasts(WorkplaceCO$Area) <- contr.sum
contrasts(WorkplaceCO$Time) <- contr.sum

不管你怎么做，它都需要在aov()之前完成。