对于单向重复测量anova，是否存在一个R函数来寻找调整后的置信区间（使用Dunnets检验c1）？

我试图用Dunnetts检验为单向重复测量anova生成置信区间，但只能用正常anova生成，而正常anova不能解释重复测量anova。 我已经得到了重复测量方差分析，但无法通过对数据进行dunnetts检验生成调整后的CI

library(car)

c1 <- c(100,90,80,50,40)
c2 <- c(120,90,130,125,120)
c3 <- c(120,95,125,125,90)

controlbind<-cbind(c1,c2,c3)

control <- c(1,2,3)
controlfactor <- as.factor(control)
controlframe <- data.frame(controlfactor)
controlmodel <-lm(controlbind ~ 1)
analysis <- Anova(controlmodel,idata = controlframe,idesign = ~controlfactor)
summary(analysis)

库（车）
c1