if (FALSE) {
Mod <- tna::tna(tna::group_regulation)
m <- extract_motifs(Mod, significance = TRUE)
# Default network diagram
plot(m)
# Customize appearance
plot(m, node_size = 0.15, label_size = 6, title_size = 9)
# Change layout
plot(m, ncol = 4, n = 12)
# Other plot types
plot(m, type = "types")
plot(m, type = "significance")
}
Run the code above in your browser using DataLab