字符向量中的单词标记

Question

library(dplyr)
library(tidytext)
sk <- as.character(const.df$text[122])
sk <- unlist(strsplit(sk, "\n"))
sk <- data.frame(line = 1:length(sk), text = sk, stringAsFactors = 
FALSE)

sk <- sk %>%
  unnest_tokens(word, text) %>%
  count(word, sort = TRUE) %>%
  anti_join(stop_words)`

  

check_input（x）出错：     输入必须是任何长度的字符向量或字符列表     向量，每个向量的长度为1.

我不确定错误是什么，因为我已将文本设为字符向量并将长度指定为1.感谢任何帮助！