network showing top terms of topics
topicNW2(betaDF, topn)
| betaDF | topic~term probability data.frame |
|---|---|
| topn | number of top terms of each topic |
if (FALSE) { ldaOut <- SeuratObj@misc$ldaOut betaDF <- tidytext::tidy(ldaOut, matrix = "beta") topicNW2(betaDF, topn=10) }