R.我想用循环排除方差分析中的值

我想通过排除以下数据点来检查我用于方差分析的数据点的影响：

wanted =(1:10 !=10)
wanted
summary(aov(log(Sdrtl)~location,subset=wanted))

我不想手动排除1:10，我想做一些循环，这样所有方差分析都能一次流出。我是一名初学者，我尝试了以下几点：

for (i in 1:10){
    wanted =(1:10 !=i)
        summary(aov(log(Sdrtl)~location,subset=wanted))
    }

---

，这并不能满足我的需求。有人能帮我吗？

我想问题是，

摘要

不打印任何内容-它返回一个对象（您忽略了它）

#这将打印摘要
对于（1:10中的i）打印（摘要（aov（日志（Sdrtl）~位置，子集=1:10！=i）））
#这将返回所有摘要的列表
x您是否检查了base R中的
impact.measures
函数是否已经达到了您想要的效果？它计算一系列遗漏诊断

# This will print the summaries
for(i in 1:10) print(summary(aov(log(Sdrtl)~location, subset=1:10!=i)))

# This will return a list of all summaries
x <- lapply(1:10, function(i) summary(aov(log(Sdrtl)~location, subset=1:10!=i)))
x # prints the summaries