Ошибка в if (tolower) {: аргумент не интерпретируется как логический

Question

В настоящее время я пытаюсь удалить слова из созданного мной корпуса. Вот последовательность. Любая помощь приветствуется.

#Create a Corpus 
data_texts <- readtext(paste0(txt_directory, "*"), encoding = "UTF-8")
data_corpus_Afghanistan <- corpus(data_texts)

#Transform Corpus to dfm
data_corpus_dfm <- dfm(data_corpus_Afghanistan, remove = stopwords("english"), 
                           remove_punct = TRUE, remove_numbers = TRUE,)

data_corpus_dfm <- dfm_tolower(data_corpus_dfm, keep_acronyms = FALSE)

#After found words I don't want
#create new corpus with these words removed

data_corpus_dfm <- dfm(data_corpus_Afghanistan, removeWords, c("anonymous"))