s-string">"tres"</span>))
dtf &lt;- document_term_frequencies(dtf, document = <span class="hljs-string">"topic_level_id"</span>, term = <span class="hljs-string">"lemma"</span>)
dtm &lt;- document_term_matrix(x = dtf)
dtm_clean &lt;- dtm_remove_lowfreq(dtm, minfreq = <span class="hljs-number">5</span>)
<span class="hljs-comment">## Build topic model + get topic terminology</span>
m &lt;- LDA(dtm_clean, k = <span class="hljs-number">4</span>, method = <span class="hljs-string">"Gibbs"</span>, 
         contr