Page 44 - LIBRO SEMANA PEDAGOGICA
P. 44

SEMANA
                                                                    PEDAGÓGICA



                                                                               UNIVERSIDAD - REGIÓN
                                                      REGIONALIZACIÓN




                    nov_corpus <- Corpus(VectorSource(nov_text))
                    nov_corpus












             Para  este  ejemplo  tenemos  que  nuestro  corpus  esta  compuesto  por  2  únicos
             documentos.


             A partir de ahora nuestro análisis se hará desde nuestro corpus.


             NUBE DE PALABRAS

             Vamos a mapear nuestro corpus usando las siguientes funciones.



                    nov_ptd <- tm_map(nov_corpus, PlainTextDocument)
                    wordcloud(nov_ptd,  max.words  =  80,  random.order  =  F,  colors  =
                    brewer.pal(name = "Dark2", n = 8))


             TERM DOCUMENT MATRIX

             Ahora mapearemos nuestro corpus indicando que es una matriz de términos.



                    nov_tdm <- TermDocumentMatrix(nov_corpus)
                    nov_tdm
   39   40   41   42   43   44   45   46   47   48   49