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