Count words, n-grams, shingles x
⚠️ THIS IS A WORK IN PROGRESS
1
library(stringr)
2
3
4
top_words <- all_full_txt %>%
5
unnest_tokens(word, txt) %>%
6
anti_join(get_stopwords()) %>%
7
filter(!str_detect(word, "[0-9]+") == TRUE) %>%
8
group_by(url) %>%
9
count(word, sort = F) %>%
10
View()
Copied!
Last modified 9mo ago
Copy link