我正在尝试通过句子和单词注释提取pos标签,其中一些句子给出了句子注释错误

时间:2019-05-01 10:40:56

标签: r

我对句子注释有疑问

我尝试将评论拆分成句子,然后注释每个句子 用于pos标签。但这没用。

review=as.String(servqual$Review_Text[186])
review_split=str_split(review,"[:punct:]")

for (l in 1:(lengths(review_split)-1)) 
{

  string1=as.String(review_split[[1]][l])
  sent_token_annotator=Maxent_Sent_Token_Annotator()
  word_token_annotator=Maxent_Word_Token_Annotator()
  annotate_word=annotate(string1,list(sent_token_annotator,word_token_annotator))
  pos_tag_annotator=Maxent_POS_Tag_Annotator()
  annotate_pos=annotate(string1,pos_tag_annotator,annotate_word)
  subset_word=subset(annotate_pos,type=="word")
  tags_word=sapply(subset_word$features,'[[',"POS")

  s_word_tag=as.String(sprintf("%s%s%s",string1[subset_word],"/",tags_word))
  review_split[[1]][l]=str_replace_all(s_word_tag,"\n"," ")

}
  

e(s,a)中的错误:找不到句子标记注释。
  traceback()
  6:stop(“未找到句子标记注释”)
  5:e(s,a)
  4:粘贴(y $ id,y $ type,y $ start,y $ end,sep =“ \ r”)
  3:merge.Annotation(a,e(s,a))
  2:merge(a,e(s,a))
  1:注释(字符串1,列表(sent_token_annotator,word_token_annotator))

我希望输出为带有所有句子的每个单词的pos标签。

0 个答案:

没有答案