More of an improvement point but really great material !

[moedaaboul]

1-) It would be helpful to have the below submission as an accepted option:

tidy_talks %>%
anti_join(get_stopwords(), by = "word") %>%
count(word, sort = TRUE)

Suggested response is:

tidy_talks %>%
anti_join(get_stopwords()) %>%
count(word, sort = TRUE)

2-) It is also not too clear how to run "get_stopwords()" as it doesn't come straight from the tidytext package but rather from the stopwords package.

[juliasilge]

Thanks so much @moedaaboul!

As a clarification, the function get_stopwords() does come from tidytext but it requires stopwords to be installed.

library(tidytext)
get_stopwords()
#> # A tibble: 175 x 2
#>    word      lexicon 
#>    <chr>     <chr>   
#>  1 i         snowball
#>  2 me        snowball
#>  3 my        snowball
#>  4 myself    snowball
#>  5 we        snowball
#>  6 our       snowball
#>  7 ours      snowball
#>  8 ourselves snowball
#>  9 you       snowball
#> 10 your      snowball
#> # … with 165 more rows

^{Created on 2021-02-04 by the reprex package (v1.0.0)}

I'll see what we can do about adding more accepted options.