Anyone who knows how to run stm package??
library(splines)
poliblogPrevFit <- stm(documents = out$documents, vocab = out$vocab, K = 20, prevalence =~ rating + s