# \donttest{
if (requireNamespace("NST")) {
library(ggplot2)
data(otutab, package = "pcutils")
nst(otutab, metadata["Group"]) -> nst_res
plot(nst_res, c_group = "intra") + geom_hline(yintercept = 0.5, lty = 2) + ylab("NST")
}
# }
Run the code above in your browser using DataLab