data("otutab", package = "pcutils")
t(otutab) -> totu
metadata[, 3:10] -> env
c_net_calculate(totu) -> corr
c_net_build(corr, r_threshold = 0.65) -> co_net
c_net_calculate(totu, env) -> corr2
c_net_build(corr2) -> co_net2
Run the code above in your browser using DataLab