R/topicModel_utils.R
plot_sankey.Rd
Create a D3 JavaScript Sankey diagram which shows the best assigned topic of each cluster.
plot_sankey(gammaDF, topn = 1, plotHeight = 600)
gammaDF | cluster~topic probability data.frame |
---|---|
topn | top n terms of each topic |
plotHeight | height of plot |
if (FALSE) { ldaOut <- SeuratObj@misc$ldaOut gammaDF <- tidytext::tidy(ldaOut, matrix = "gamma") plot_sankey(gammaDF, topn=1) plot_sankey(gammaDF, topn=2) %>% networkD3::saveNetwork(file = "plot_sankey.html") }