From cdb974b6925a2bd0605d3a680a0f8301713d4f71 Mon Sep 17 00:00:00 2001 From: Vitor Barbosa de Freitas Date: Thu, 3 Nov 2016 09:25:08 -0200 Subject: [PATCH] Fixing typo on get.tdm --- 03-Classification/email_classify.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/03-Classification/email_classify.R b/03-Classification/email_classify.R index 2378cae..df30af5 100644 --- a/03-Classification/email_classify.R +++ b/03-Classification/email_classify.R @@ -78,8 +78,8 @@ get.tdm <- function(doc.vec) removeNumbers = TRUE, minDocFreq = 2) doc.corpus <- Corpus(VectorSource(doc.vec)) - doc.dtm <- TermDocumentMatrix(doc.corpus, control) - return(doc.dtm) + doc.tdm <- TermDocumentMatrix(doc.corpus, control) + return(doc.tdm) } # This function takes a file path to an email file and a string,