RAGUL DATA ANALYST- Word Cloud

View(SMSSpamCollection)

str(SMSSpamCollection)

'data.frame':   3184 obs. of  2 variables:
 $ V1: Factor w/ 2 levels "ham","spam": 1 1 2 1 1 2 1 1 2 2 ...
 $ V2: Factor w/ 3027 levels "'An Amazing Quote'' - Sometimes in life its difficult to decide whats wrong!! a lie that brings a smile or the "| __truncated__,..: 700 1898 638 2517 1692 656 591 248 2792 770 ...

THIS FUNCTION SHOWS THE STRUCTURE OF THE COLLECTION.

SMSSpamCollection_analysis=SMSSpamCollection

“SMSSPAMCOLLECTION_ANALYSIS” IS CREATED AS A SUB FILE WERE IT HOLD ALL THE COLLECTION OF “SMSSPAMCOLLECTION” TO WORK WITHOUT LACKING DATA.

SMSSpamCollection_analysis$V1=factor(SMSSpamCollection_analysis$V1)

FACTOR IS USED FOR “FINITE NUMBER OF VALUES” IN THE COLLECTION.

table(SMSSpamCollection_analysis$V1)

 ham spam 
2746  438 

THE TABLES FUNCTIONS SHOWS THE NO OF MESSAGES IN ITS CATEGORY.

library(NLP)

LIBRARY (NLP) “NATURAL LANGUAGE PROCESSING” IS USED ALLOW OTHER LANGUAGES TOO.

library(tm)

TO ACCESS THE CORPUS FUNCTION THE LIBRARY (TM) AND TO REPRESNT A NUMBER OF DATA’S.

Sms_corpus=Corpus(VectorSource(SMSSpamCollection_analysis$V2))

THE FUNCTION “VECTOR SOURCE” WHICH STORES CHARACTER IN SERVER.

print(Sms_corpus)

<<SimpleCorpus>>
Metadata:  corpus specific: 1, document level (indexed): 0
Content:  documents: 3184

THE FUNCTION PRINT IS USED TO VIEW THE TOTAL NUMBER OF DOCUMENTS.

inspect(Sms_corpus[1:3])

<<SimpleCorpus>>
Metadata:  corpus specific: 1, document level (indexed): 0
Content:  documents: 3

[1] Go until jurong point, crazy.. Available only in bugis n great world la e buffet... Cine there got amore wat...                                            
[2] Ok lar... Joking wif u oni...                                                                                                                              
[3] Free entry in 2 a wkly comp to win FA Cup final tkts 21st May 2005. Text FA to 87121 to receive entry question(std txt rate)T&C's apply 08452810075over18's

TO VIEW THE MESSAGES FROM THE COLLECTION THE “INSPECT” CMD IS USED.

Corpus_clean=tm_map(Corpus_clean,removeWords,stopwords())
Corpus_clean=tm_map(Corpus_clean,removePunctuation)
Corpus_clean=tm_map(Corpus_clean,stripWhitespace)

THE “TM_MAP” CLEANS THE DECLARED THINGS, WORDS, PUNCTIONS AND WHITESPACE.

sms_dtm=DocumentTermMatrix(Corpus_clean)
sms_corpus_train=Corpus_clean[1:2500]
sms_corpus_test=Corpus_clean[2501:3184]

APPLYING COMPRESSED MESSAGES INTO A MATRIX FORMAT, AND USING TRAIN AND TEST FOR THE MESSAGES.

install.packages("wordcloud")
library(wordcloud)

THE PACKAGE “WORD CLOUD” IS INSTALLED AND THE LIBRARY IS CALLED-OUT.

THE TRAIN FUNCTION IS CALLED AND FREQUENCY IS SET AND THEN THE COLOR IS SET AS BLACK.

TO GET RANDOM COLORS SET “RANDOMCOLOR=TRUE”,COL=“RAINBOW(7)”.