data(result.kegg)
bbplot.kegg <- BBplot(result.kegg, max.pval = 0.05, min.ngenes = 10,
name.com = c("Cond.1_12h","Cond.1_24h","Cond.2_12h","Cond.2_24h"),
labels = c("down", "up"), colors = c("#009E73", "red"),
title = "BBplot - KEGG", print.term = "full")
bbplot.kegg
##ggsave("KEGG_terms.tiff", width=6, height=4, scale=2, dpi=200)
Run the code above in your browser using DataLab