# NOT RUN {
# }
# NOT RUN {
library(Twitmo)
# load tweets (included in package)
mytweets <- load_tweets(system.file("extdata", "tweets_20191027-141233.json", package = "Twitmo"))
pool <- pool_tweets(data = mytweets,
remove_numbers = TRUE,
remove_punct = TRUE,
remove_symbols = TRUE,
remove_url = TRUE,
remove_users = TRUE,
remove_hashtags = TRUE,
remove_emojis = TRUE,
cosine_threshold = 0.9,
stopwords = "en",
n_grams = 1)
# }
Run the code above in your browser using DataLab