Text Mining of Reddit Data using R (or R Studio)-3
Your name, taught by Dr. zhenning Jimmy xu, Twitter: https://twitter.com/MKTJimmyxu
02/16/2023
R Markdown
Description: This meetup is for anyone interested in learning and sharing knowledge about analyzing Reddit data using R. In this tutorial, we will be using RedditExtractoR and a few other R packages to analyze a dataset of Reddit posts.
Text mining is the process of analyzing large collections of unstructured text data to discover patterns, trends, and insights. With the rise of social media platforms like Reddit, there is a wealth of information available in the form of user-generated content that can be analyzed using text mining techniques.
R is a popular programming language and environment for statistical computing and graphics, widely used in data analysis and data visualization. In recent years, it has also become a powerful tool for text mining and natural language processing.
In this Meetup event, we will explore how to use R for text mining of Reddit data. We will walk through the process of collecting data from Reddit using its API, cleaning and preprocessing the data, and applying text mining techniques such as sentiment analysis and topic modeling. By the end of the session, you will have a basic understanding of how to use R for text mining of social media data and be able to apply these techniques to other similar datasets.
Who should attend?
This meetup is open to all skill levels.
Requirements: Participants should bring their laptops to the online event. Basic knowledge of R programming is recommended, but not required. Internet access will be required to access Yahoo Finance pages during the live coding session.
Processing data
Using a few R packages, we will clean and preprocess the data to prepare it for analysis. We will remove stop words, punctuations, and URLs from the text data.
This will create a corpus of the post titles and remove punctuations, URLs, and stop words. We also perform stemming to reduce words to their root form.
Creating a Document Term Matrix
We will now create a document term matrix to represent the text data.
Text Analysis using tm and other packages
We can now perform text analysis using tm and other packages. We will start by creating a few plots (word cloud, etc.) to visualize the most frequent words in the post titles.
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)
## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.2'
## (as 'lib' is unspecified)## Loading required package: NLP## Loading required package: RColorBrewer##
## Attaching package: 'syuzhet'## The following object is masked from 'package:rtweet':
##
## get_tokens##
## Attaching package: 'ggplot2'## The following object is masked from 'package:NLP':
##
## annotate##
## Attaching package: 'plotly'## The following object is masked from 'package:ggplot2':
##
## last_plot## The following object is masked from 'package:stats':
##
## filter## The following object is masked from 'package:graphics':
##
## layout## Rows: 701 Columns: 7
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (4): title, text, subreddit, url
## dbl (2): timestamp, comments
## date (1): date_utc
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.## spc_tbl_ [701 × 7] (S3: spec_tbl_df/tbl_df/tbl/data.frame)
## $ date_utc : Date[1:701], format: NA "2023-04-05" ...
## $ timestamp: num [1:701] NA 1.68e+09 1.68e+09 1.68e+09 1.68e+09 ...
## $ title : chr [1:701] NA "Anyone know what type of shoes these are? bought in JD in 2021, says air on the back. (i lost them and forgotte"| __truncated__ "What kind of nikes are these? They look custom? Do u think they would stay held together like the paint and stuff?" "Hey yall, i was wondering if this is legit. Thrifted it and cant find any info about it." ...
## $ text : chr [1:701] NA NA "Also what do u think they are worth? What kind of nikes r they?" NA ...
## $ subreddit: chr [1:701] NA "Nike" "Nike" "Nike" ...
## $ comments : num [1:701] NA 1 2 0 2 0 11 6 0 0 ...
## $ url : chr [1:701] NA "https://www.reddit.com/r/Nike/comments/12cw2do/anyone_know_what_type_of_shoes_these_are_bought/" "https://www.reddit.com/r/Nike/comments/12boqfh/what_kind_of_nikes_are_these_they_look_custom_do/" "https://www.reddit.com/r/Nike/comments/12aub6v/hey_yall_i_was_wondering_if_this_is_legit/" ...
## - attr(*, "spec")=
## .. cols(
## .. date_utc = col_date(format = ""),
## .. timestamp = col_double(),
## .. title = col_character(),
## .. text = col_character(),
## .. subreddit = col_character(),
## .. comments = col_double(),
## .. url = col_character()
## .. )
## - attr(*, "problems")=<externalptr>## [1] 701## [1] 7## chr [1:701] NA NA ...## [1] NA
## [2] NA
## [3] "Also what do u think they are worth? What kind of nikes r they?"
## [4] NA
## [5] "Can anyone help me find these? Or know what kind they were?"
## [6] "I've been looking at Blazers at Nike, but they are not the same as they were a week ago. Some left, some new came instead. How often do Blazers change in the store?"## [1] NA NA NA NA NA NA## <<VCorpus>>
## Metadata: corpus specific: 0, document level (indexed): 0
## Content: documents: 701## $content
## [1] "Why doesn\031t Ebay authenticate all shoes?\r\nDoes the seller make that decision?"## Error in FUN(X[[i]], ...): unused argument (mc.cores = 1)## word freq
## nike nike 104
## shoes shoes 79
## just just 67
## know know 63
## pair pair 63
## like like 58
## anyone anyone 55
## can can 48
## shoe shoe 48
## find find 47
## buy buy 44
## get get 42
## help help 38
## one one 38
## i\031m i\031m 35
## size size 35
## looking looking 34
## white white 34
## thanks thanks 31
## back back 29
## new new 28
## time time 27
## air air 26
## got got 26
## i\031ve i\031ve 26
## now now 26
## online online 26
## really really 26
## store store 26
## also also 25
## want want 25
## bought bought 24
## look look 24
## the the 23
## anything anything 22
## tried tried 22
## found found 20
## https https 20
## think think 20
## years years 20
## does does 19
## dunks dunks 19
## sure sure 18
## way way 18
## black black 17
## see see 17
## will will 17
## even even 16
## jordan jordan 16
## make make 16
## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): recommendations could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): currently could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): happened could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): hoodie could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): information could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): leather could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): literally could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): march could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): middle could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): might could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): nikecom could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): option could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): ordering could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): payment could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): picked could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): possible could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): pretty could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): purchase could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): question could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): recommend could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): release could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): releases could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): school could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): searching could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): selling could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): separation could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): service could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): shipping could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): some could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): system could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): team could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): these could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): today could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): version could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): walking could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): wearing could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): yellow could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): yesterday could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): accidentally could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): actual could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): adidas could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): advice could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): almost could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): always could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): ankle could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): annoying could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): assume could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): battery could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): blazers could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): break could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): canceled could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): cancelled could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): card could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): cause could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): change could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): clearance could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): coming could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): connection could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): country could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): couple could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): crazy could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): delivered could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): discount could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): drifit could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): elephant could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): exact could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): exactly could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): exclusive could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): feedback could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): figured could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): finding could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): fresh could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): fuck could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): gone could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): gotten could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): great could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): have could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): heel could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): highs could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): hopefully could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): ideas could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): instead could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): interested could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): internet could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): issues could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): jacket could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): liked could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): lmk could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): materials could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): mean could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): mesh could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): mine could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): minutes could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): missing could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): move could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): mud could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): multiple could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): needs could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): neon could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): nicer could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): obviously could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): offer could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): opinion could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): opinions could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): options could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): original could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): owned could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): pack could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): panda could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): particular could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): past could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): pegasus could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): phone could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): plan could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): points could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): polo could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): products could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): rare could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): reason could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): remove could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): returned could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): season could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): section could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): sent could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): sew could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): shown could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): single could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): special could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): step could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): storage could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): straight could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): styles could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): supposed could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): tags could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): trainers could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): trouble could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): unfortunately could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): using could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): ve could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): warranty could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): weeks could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): werent could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): whats could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): wider could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): with could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): womens could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): worked could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): world could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): worn could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): worried could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): wouldnt could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): wrong could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## random.order = F): you could not be fit on page. It will not be plotted.
## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : appreciate could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : clean could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : doesnt could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : experience could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : google could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : happened could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : heard could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : information could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : leather could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : literally could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : makes could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : march could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : market could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : middle could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : might could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : motor could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : nikecom could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : open could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : option could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : ordering could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : payment could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : picked could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : pls could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : possible could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : pretty could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : purchase could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : question could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : quite could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : recommend could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : release could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : releases could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : restock could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : school could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : search could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : searching could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : selling could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : separation could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : shipping could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : sizes could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : some could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : stockx could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : system could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : team could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : these could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : tips could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : today could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : upper could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : version could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : walk could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : walking could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : wearing could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : yesterday could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : accidentally could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : adidas could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : advice could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : always could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : amp could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : annoying could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : avail could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : battery could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : blazers could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : break could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : canceled could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : cancelled could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : change could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : clearance could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : coming could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : connection could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : couldnt could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : country could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : couple could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : crazy could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : delivered could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : discount could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : elephant could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : email could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : exactly could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : exclusive could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : feedback could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : figured could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : finding could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : front could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : gone could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : gotten could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : great could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : have could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : hopefully could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : ideas could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : instead could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : interested could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : internet could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : jacket could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : looked could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : luck could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : materials could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : mean could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : mesh could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : minutes could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : multiple could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : needs could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : nicer could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : obviously could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : often could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : opinion could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : opinions could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : original could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : owned could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : panda could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : particular could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : past could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : pegasus could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : phone could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : points could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : polo could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : products could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : reason could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : remove could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : returned could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : section could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : shown could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : single could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : storage could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : straight could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : styles could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : supposed could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : tags could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : trainers could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : trouble could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : true could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : unfortunately could not be fit on page. It will not be
## plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : using could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : warranty could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : weeks could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : werent could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : whole could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : wider could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : womens could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : worked could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : world could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : worried could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : wouldnt could not be fit on page. It will not be plotted.## Warning in wordcloud(words = names(dtm_v), freq = dtm_v, min.freq = 3,
## max.words = 500, : wrong could not be fit on page. It will not be plotted.
References
‘RedditExtractoR’ - An R Package that helps you access the Reddit API: https://github.com/ivan-rivera/RedditExtractor
What Are APIs? - Simply Explained: https://www.youtube.com/watch?v=OVvTv9Hy91Q