Displaying 1 result from an estimated 1 matches for "nosit".
Did you mean:
nsit
2003 Jun 10
1
Bootstraping with MANOVA
Hi,
Does anyone know what the error message mean?
> Boot2.Pillai <- function(x, ind) {
+ x <- as.matrix(x[,2:ncol(x)])
+ boot.x <- as.factor(x[ind, 1])
+ boot.man <- manova(x ~ boot.x)
+ summary(manova(boot.man))[[4]][[3]]
+ }
>
> man.res <- manova(as.matrix(pl.nosite) ~
+ as.factor(plankton.new[,1]))$residuals
> boot2.plank <- cbind(plankton.new[, 1], man.res)
> boot.sep <- boot(boot2.plank, Boot2.Pillai, R = 1000,
+ strata = plankton.new[, 1])
Error in summary.manova(manova(boot.man)) :
residuals have ra...