# NOT RUN {
rm_frequent_words(
as.text.table(
x = as.data.table(
list(
col1 = c(
"a",
"b"
),
col2 = c(
tolower("The dog is nice because it picked up the newspaper."),
tolower("The dog is extremely nice because it does the dishes.")
)
)
),
text = "col2",
split = " "
),
text = "col2",
count_col_name = "count",
max_count = 1
)
# }
Run the code above in your browser using DataLab