powered by
findTopic(x, list, n=20, type=c("prob", "frex", "lift","score"), verbose=TRUE)
## Not run: # lab <- sageLabels(gadarianFit, 5) # findTopic(lab, c("poor", "immigr", "peopl")) # findTopic(gadarianFit, c("poor", "immigr", "peopl")) # ## End(Not run)
Run the code above in your browser using DataLab