From c029ee36427d1e24f7dee17ca83794a0793e112a Mon Sep 17 00:00:00 2001
From: theresagessler <theresagessler@users.noreply.github.com>
Date: Wed, 11 Apr 2018 20:08:29 +0200
Subject: [PATCH] Update classification.R

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

diff --git a/R/classification.R b/R/classification.R
index 4b47f6e..12e3b71 100644
--- a/R/classification.R
+++ b/R/classification.R
@@ -830,7 +830,7 @@ tmca_classify <- setRefClass(
           theta <- theta + ldaPosterior$topics
         }
       }
-      theta <- as.(theta / n_repeat, "dgCMatrix")
+      theta <- as(theta / n_repeat, "dgCMatrix")
 
       if (TRAIN) {
         dfm_lda <<- theta