The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.
library(clusterProfiler)
library(wikiprofiler)
data(geneList, package="DOSE")
de <- names(geneList)[1:100]
x <- enrichWP(de, organism='Homo sapiens')
de2 <- bitr(de, "ENTREZID", "SYMBOL", OrgDb='org.Hs.eg.db')
#### if needed
# de2 <- de2[!duplicated(de2[,1]), ]
value <- setNames(geneList[de2[,1]], de2[,2])
ID <- x$ID[1]
p1 <- wpplot(ID)
p1
p2 <- p1 |> wp_bgfill(value, low='darkgreen', high='firebrick', legend_x = .9, legend_y = .95)
p2
p3 <- p2 |> wp_shadowtext()
p3
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.