From ba8e63048bb3ebe3786ad16b864bdcdc91698b4c Mon Sep 17 00:00:00 2001
From: chainsawriot <chainsawtiney@gmail.com>
Date: Thu, 15 Aug 2024 16:40:12 +0200
Subject: [PATCH] Fix partial matching ref #92

---
 R/oolong_topicmodels.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/oolong_topicmodels.R b/R/oolong_topicmodels.R
index d0139b8..94cae8a 100644
--- a/R/oolong_topicmodels.R
+++ b/R/oolong_topicmodels.R
@@ -7,7 +7,7 @@
     if (need_topic) {
         model_terms <- t(topicmodels::terms(input_model, k = n_topiclabel_words))
         dimnames(model_terms)[[1]] <- NULL
-        theta <- topicmodels::posterior(input_model)$topic
+        theta <- topicmodels::posterior(input_model)$topics
     } else {
         model_terms <- NULL
         theta <- NULL