enrichplot barplot doc with mutate example is broken

[hermidalc]

Get following error when trying to run https://yulab-smu.top/biomedical-knowledge-mining-book/enrichplot.html#bar-plot:

library(DOSE)
data(geneList)
de <- names(geneList)[abs(geneList) > 2]
edo <- enrichDGN(de)

library(enrichplot)
barplot(edo, showCategory=20)

dplyr::mutate(edo, qscore = -log(p.adjust, base=10)) |> barplot(x="qscore")
Error in UseMethod("mutate") : 
  no applicable method for 'mutate' applied to an object of class "enrichResult"

[huerqiang]

You should run library(clusterProfiler) before dplyr::mutate(edo, qscore = -log(p.adjust, base=10)) |> barplot(x="qscore").

[hermidalc]

Works