sudo apt-get install build-essential libcurl4-gnutls-dev libxml2-dev libssl-dev

R

install.packages('devtools')
install_github("lchiffon/wordcloud2")

Function.Base.Config.Environment()



library(wordcloud2)
wordcloud2(data = demoFreq)


figPath = system.file("../Logos/Huella_H.png",package = "wordcloud2")
wordcloud2(demoFreq, figPath = figPath, size = 1.5,color = "skyblue")





Function.Base.Config.Environment()

Data.Original=read.csv("../Tweets/LaPAzI_2019_08_03T21_46_49_341Z.csv")

Data.Original.DF = as.data.frame(cbind(Data.Original$ID, as.character(Data.Original$Text)))
colnames(Data.Original.DF) = c("doc_id", "text")

Data.Original.DF.Corpus=Function.TM.CreateCorpus(Data.Original.DF, pLanguage="spanish", aStopWords=c("paz", "...", "\"", "…", "“", "¿según", "“lamento…", "¿amlo", "httpstcol7x7dzwdrvalvarouribevel", "pased…", "pasedel…", "valoresbuen…", "guarderiaabcpasedelista11…", "l…", "q…", "”", "‘", "d…", "excusasq…", "c…", "¿tuitearían"));

Data.Original.DF.Corpus.DTM=Function.TM.CreateDTM(Data.Original.DF.Corpus)

Function.TM.SaveFreqV(Data.Original.DF.Corpus.FreqV)



Function.TM.Freq.CreateCloud(Data.Original.DF.Corpus.DTM)


Data.Original.DF.Corpus.FreqV=Function.TM.GetFreqV(Data.Original.DF.Corpus.DTM)


wordcloud2(Data.Original.DF.Corpus.FreqV, figPath = "R.jpg", size = 1.5,color = "skyblue")


































