【求大神指点，小白快被作业整死了】r语言 协方差分析 提示只有负下标才能为0 但是我的数据全部大于0啊

library(mvtnorm)
library(survival)
library(TH.data)
library(MASS)
library(multcomp)
df<-read.table(file="book1.csv",header=T,sep=",")
head(df)
attach(df)
View(vary)
df$x<-as.factor(df$x)
df$y<-as.factor(df$y)
df$vary<-as.factor(df$vary)
summary(aov(y~vary+x,data=df))

---

题目是这个：

---

数据：

 

运行后：