permutation - 为什么使用 set.seed() 不能得到恒定的结果？

Question

我使用 aovp() 在 Rstudio 中进行置换 ANCOVA，并使用 set.seed() 来获得恒定的结果。

但是每次我重启Rstudio，结果还是会变！

这是我的代码：</p>

set.seed(2021)
thickness.S.p.perm<-aovp(p_thickness~ftreatment+WVD+canopy,data=S.growth,type="II")
summary(thickness.p.perm)

以及ftreatment(factor)的p值结果：</p>

1. 第一次： p < 2e-16 ***
2. 第二次：p = 0.00220 **

我应该怎么做才能得到恒定的结果？