R语言做情感分析，求助！！

getEmotionalType函数：文本做分词，并提取出中间的情感词。给每条文本定情感倾向评分初始值为1，跟褒义贬义词词库做匹配，褒义词+1，贬义词-1，计算出每条文本的最终情感倾向评分，为正值则是正面评价，为负值则是负面评价。

但是将分词结果与negative表和positive表作对照计算得分时显示错误，求助大家！！
commentTemp是分词结果

else if ,中间有空格，注意是两个函数

nuomin 发表于 2015-4-16 08:01
else if ,中间有空格，注意是两个函数

没注意到，谢谢

您好，问一下，怎么定义getEmotionalType函数？我现在在做毕业论文，用到这个代码，可有好多不太懂，您能加一下我微信tx591549284 吗？我想问您一些问题，拜托了！大四毕业狗伤不起

您好，问一下，怎么定义getEmotionalType函数？我现在在做毕业论文，用到这个代码，可有好多不太懂，您能加一下我微信tx591549284 吗？我想问您一些问题，拜托了！大四毕业狗伤不起

博主，有问题请教您，关于这个代码是在我毕业论文里用到的，希望您加一下我的微信 tx591549284，拜托帮一下忙！