R wordcloud
March 22, 2015 Leave a comment
A piece of R code to beat the rut of my day job.
I have a document in the directory.
transcript<-Corpus(DirSource("~/Documents/Algorithms/rcloud/"))
transcript<-tm_map(transcript,stripWhitespace)
transcript<-tm_map(transcript,tolower)
transcript<-tm_map(transcript,stemDocument)
transcript<-tm_map(transcript,PlainTextDocument)
wordcloud(transcript,scale=c(5,0,5),max.words=100,random.order=FALSE,rot.per=0.35,use.r.layout=FALSE,colors=brewer.pal(8,"Dark2"))
MindSpace 