R 代码在`[<-.data.table`(`*tmp*`, , "P", value = c(NA, NA, NA, NA, NA, : 尝试在sentistr中使用polarity_dt时返回错误)

如何解决R 代码在`[<-.data.table`(`*tmp*`, , "P", value = c(NA, NA, NA, NA, NA, : 尝试在sentistr中使用polarity_dt时返回错误)

我有一个对我的分析很重要的代码，在一天或两天前运行良好，我正在尝试使用情绪分析器指定我自己的词典数据框，我已经将它变成了一个键，但它不断返回这个新错误.

Error in `[<-.data.table`(`*tmP*`,"P",value = c(NA,NA,: 
  Supplied 1642214 items to be assigned to 1642195 items of column 'P'. If you wish to 'recycle' the RHS please use rep() to make this intent clear to readers of your code.

这是我正在使用的代码，唯一的附加元素是polarity_dt 指标，我之前使用了相同的代码和相同的指标，一切正常，我想我缺少一个关键库，或者我可能已经制作了其他地方的错误。极性键是一个简单的数据框，有两列，一列是单词，另一列是值，gamecanu 只是单独数据框中每个观察的文本数据，我已经检查了所有内容，但我似乎无法理解为什么会这样正在返回错误。我对此很陌生，所以如果这是一个愚蠢的问题，我深表歉意，但我真的可以使用帮助。这是我使用的代码。

batch_sentiment_by <- function(gamecanu,batch_size = 200,...) {
     gamecanu_batches <- split(gamecanu,ceiling(seq_along(gamecanu)/batch_size))
     x <- rbindlist(lapply(gamecanu_batches,sentiment_by,...))
     x[,gid := .I]
     x[]
 }
 
batch_sentiment_by(gamecanu,polarity_dt = polkey) -> usersentiC