# Create a dummy annotaR object with enrichment data
annotated_data <- tibble::tibble(
gene = c("TP53", "TP53", "EGFR"),
term_name = c("Cell cycle", "Apoptosis", "Cell cycle"),
p_value = c(0.001, 0.005, 0.001),
source = "GO:BP",
intersection = "TP53,EGFR"
)
plot_enrichment_dotplot(annotated_data)
Run the code above in your browser using DataLab