Plot the internal regimes for a given fitted model
# S3 method for slouch regimeplot(x, ...) regimeplot(x, ...)
x | an object of class 'slouch' |
---|---|
... | additional parameters passed to plot.phylo(...) |
nothing
slouch
: Regimeplot for the 'slouch' object
data(artiodactyla) data(neocortex) neocortex <- neocortex[match(artiodactyla$tip.label, neocortex$species), ] m0 <- slouch.fit(phy = artiodactyla, species = neocortex$species, response = neocortex$body_mass_g_log_mean, mv.response = neocortex$body_mass_g_log_varmean, fixed.fact = neocortex$diet, hillclimb = TRUE) regimeplot(m0)#> [1] "Colors:" #> [1] "Br: black" #> [1] "Gr: red" #> [1] "MF: green3"