Estou usando o pacote tm para análise de texto de dados de reparo, a leitura de dados no quadro de dados, a conversão para o objeto Corpus e a aplicação de vários métodos para limpar dados usando espaço menor, stipWhitespace, removestopwords e assim por diante.

Retirado do objeto Corpus para stemCompletion.

Executado stemDocument usando a função tm_map, minhas palavras-objeto foram derivadas

obteve resultados esperados.

Quando estou executando a operação stemCompletion usando a função tm_map, ela não está funcionando e ficou abaixo do erro

Erro no UseMethod ("words"): nenhum método aplicável para 'words' aplicado a um objeto da classe "character"

Executou trackback () para mostrar e obteve as etapas abaixo

> traceback()
9: FUN(X[[1L]], ...)
8: lapply(dictionary, words)
7: unlist(lapply(dictionary, words))
6: unique(unlist(lapply(dictionary, words)))
5: FUN(X[[1L]], ...)
4: lapply(X, FUN, ...)
3: mclapply(content(x), FUN, ...)
2: tm_map.VCorpus(c, stemCompletion, dictionary = c_orig)
1: tm_map(c, stemCompletion, dictionary = c_orig)

Como posso resolver este erro?