重复测量Anova R

Question

我正在尝试使用数据集问题集7进行重复测量方差分析。在此主题内设计中，我要在我的数据集的四列上运行此ANOVA：time1，time2，time3，time4

我尝试了以下代码：

library(car)
mlm<- lm(cbind(time1,time2,time3,time4) ~ 1, data=problemset7)
aov <- Anova(mlm,idata=data.frame(time),idesign=~time,type="III") 
summary(mlm.aov,multivariate=FALSE)

并收到以下消息：

Error in as.data.frame.default(x[[i]], optional = TRUE) : 
  cannot coerce class ‘"function"’ to a data.frame

对我在做什么错有任何想法吗？