Было бы проще ответить, если бы вы могли привести пример. Но я все равно попробую.
install.packages("tidyverse")
library(tidyverse)
install.packages("tidytext")
library(tidytext)
tidy_df <- df %>%
unnest_tokens(word, text) %>%
anti_join(stop_words) %>% # this will remove words such as "the", "a", "an"
count(word, sort = TRUE)