KEGG bar plot

plot for enrich_kegg result

kegg_barplot(data, top = -10, down_label = "Down")

Arguments

data

a enrich_kegg result, list format contains Up and Down

top

top rows of up and down

down_label

which one is Down

Value

a ggplot OB

Examples

if (FALSE) {
test <- enrich_kegg(deg_data = DEG_df, x = "log2FoldChange", y = "pvalue")
kegg_barplot(test)
}