data-raw/stopwords_ngram_strings.R

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)
JulFriedrich/miRetrieve documentation built on Sept. 20, 2021, 11:37 p.m.