knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(NMIT) library(dplyr)
data(mice)
otu <- mice %>% select(starts_with("OTU")) %>% as.data.frame() id.var <- mice$id cov.var <- mice$group time.var <- mice$time NMIT(otu, id.var, cov.var, time.var, method = "kendall", dist.type = "F")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.