我正在使用QDAP极性功能。 它很棒!!!
我面临一个计算顶级正面词的问题 所以这就是我到目前为止所做的事情
(pol_All_Rev_aftersplit <- with(All_Review_Mod_Split_df, polarity(rm_stopwords(review_text), polarity.frame = POLENV)))
pos_words_rating <- data.frame(with(counts(pol_All_Rev_aftersplit), wfm(pos.words)))
pos_words_rating <- pos_words_rating[order(pos_words_rating$all, decreasing = TRUE), , drop= FALSE] ## to sort the df
我见过
counts(pol_All_Rev_aftersplit) #is a data frame
到目前为止一直很好....
问题:
pos_words_rating
数据框显示
之类的结果7 **cworks 65**
8 accurate 59
12 right 43
13 works 39
16 nice 28
17 **clike 26**
18 **cwork 25**
中肯定没有'c'字样
counts(pol_All_Rev_aftersplit)
数据框或任何评论文本。很遗憾,我无法发布评论评论(实际数据)。