R/TukeyHSD.betadisper.R

Defines functions `TukeyHSD.betadisper`

`TukeyHSD.betadisper` <- function(x, which = "group", ordered = FALSE,
                                  conf.level = 0.95, ...) {
    df <- data.frame(distances = x$distances, group = x$group)
    mod.aov <- aov(distances ~ group, data = df)
    TukeyHSD(mod.aov, which = which, ordered = ordered,
             conf.level = conf.level, ...)
}

Try the vegan package in your browser

Any scripts or data that you put into this service are public.

vegan documentation built on Sept. 11, 2024, 7:57 p.m.