stopwords_vec <- tidytext::stop_words %>%
dplyr::select(1) %>%
dplyr::pull() %>%
c("\\.")
ngram_stopwords <- stringr::str_c(stopwords_vec, collapse = " | ")
ngram_stopwords <- stringr::str_c(" ", ngram_stopwords, collapse = "")
usethis::use_data(ngram_stopwords, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.