是否有任何专注于情绪分析的 R 包?我有一个小型调查,用户可以在其中写下关于他们使用网络工具的体验的评论。我要求一个数字排名,并且可以选择包含评论。
我想知道评估评论的积极性或消极性的最佳方法是什么。我希望能够将其与用户使用 R 提供的数字排名进行比较。
是否有任何专注于情绪分析的 R 包?我有一个小型调查,用户可以在其中写下关于他们使用网络工具的体验的评论。我要求一个数字排名,并且可以选择包含评论。
我想知道评估评论的积极性或消极性的最佳方法是什么。我希望能够将其与用户使用 R 提供的数字排名进行比较。
这是我在 R 中对情感分析所做的工作。
该代码绝不是经过修饰或打包好的,但我将其发布在 Github 上并附有基本文档。我使用了仅返回 JSON 的ViralHeat 情绪 API,因此进行情绪分析的实际函数非常简单(请参阅此处的代码)。
如果您在使用它时遇到问题,请随时与我联系。请注意,您需要先向 ViralHeat 注册一个 API 密钥,然后才能使用它。如果您发现配额过于严格,我已经联系了他们,他们很乐意在我使用 API 的几个月里给我更多的查询。
有关使用 1) Viral Heat API 2) Jeffrey Breen 的方法 3) 使用 Sentiment Package 的分步指南,请查看此链接:https ://sites.google.com/site/miningtwitter/questions/sentiment
我试图在这里重组并提供一个有凝聚力的情绪分析包。SentR 包括词干提取和预处理,并提供对 ViralHeat API、默认聚合函数以及更高级的朴素贝叶斯方法的访问。
安装比较简单:
install.packages('devtools')
require('devtools')
install_github('mananshah99/sentR')
require('sentR')
以及一个简单的分类示例:
# Create small vectors for happy and sad words (useful in aggregate(...) function)
positive <- c('happy', 'well-off', 'good', 'happiness')
negative <- c('sad', 'bad', 'miserable', 'terrible')
# Words to test sentiment
test <- c('I am a very happy person.', 'I am a very sad person',
'I’ve always understood happiness to be appreciation. There is no greater happiness than appreciation for what one has- both physically and in the way of relationships and ideologies. The unhappy seek that which they do not have and can not fully appreciate the things around them. I don’t expect much from life. I don’t need a high paying job, a big house or fancy cars. I simply wish to be able to live my life appreciating everything around me.
')
# 1. Simple Summation
out <- classify.aggregate(test, positive, negative)
out
# 2. Naive Bayes
out <- classify.naivebayes(test)
out
它提供以下输出:
score
1 1
2 -1
3 2
POS NEG POS/NEG SENT
[1,] "9.47547003995745" "0.445453222112551" "21.2715265477714" "positive"
[2,] "1.03127774142571" "9.47547003995745" "0.108836578774127" "negative"
[3,] "67.1985217685598" "35.1792261323723" "1.9101762362738" "positive"
请随时贡献:) 希望有所帮助!
您仍然可以使用情绪包。按照下面的脚本安装它。
您可能需要 R 3.x。
require(devtools)
install_url("http://cran.r-project.org/src/contrib/Archive/sentiment/sentiment_0.2.tar.gz")
require(sentiment)
ls("package:sentiment")