Show top terms of each topic

Topterms_Topic(betaDF, Topic, topn = 10, text.size = 3)

Arguments

betaDF	topic~term probability data.frame
Topic	topic to show
topn	top n terms of topic
text.size	size of text

Value

ggplot object

Examples

if (FALSE) {
ldaOut <- SeuratObj@misc$ldaOut
betaDF <- tidytext::tidy(ldaOut, matrix = "beta")
pws <- ID2Description(SeuratObj, by = "GO")
betaDF %<>% dplyr::mutate(descrip=unname(pws[term]))
Topterms_Topic(betaDF, Topic = 1, topn = 10, text.size = 3)
}