enrich_bar_plot | R Documentation |
Bar plot for enrich_result
enrich_bar_plot(
object,
x_axis = c("p_value_adjust", "p_value"),
cutoff = 0.05,
top = 10,
axis.text.x.width = 15,
axis.text.y.width = 15
)
object |
enrich_result object. |
x_axis |
"p_value_adjust or "p_value" |
cutoff |
cutoff for p_value_adjust or p_value. |
top |
top pathways to show. |
axis.text.x.width |
axis.text.x.width |
axis.text.y.width |
axis.text.y.width |
Xiaotao Shen shenxt1990@outlook.com
## Not run:
data("kegg_hsa_pathway")
remain_idx =
kegg_hsa_pathway@pathway_class %>%
unlist() %>%
stringr::str_detect("Disease") %>%
`!`() %>%
which()
pathway_database =
filter_pathway(object = kegg_hsa_pathway,
remain_idx = remain_idx[1:50])
data("query_id_kegg")
kegg_enrichment =
enrich_kegg(
query_id = query_id_kegg,
query_type = "compound",
id_type = "KEGG",
pathway_database = pathway_database,
p_cutoff = 0.05,
p_adjust_method = "BH",
method = "hypergeometric",
threads = 5
)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.