これが基本的な感情の例です。テキストデータは、関数を介して文に分割されget_sentences
ます。を使用sentiment_by
して、リストの要素全体に対するテキストのセンチメント (極性) を概算します (mytext
この例では)。
たとえば、次のようになります。
library(sentimentr)
mytext <- c(
'do you like it? But I hate really bad dogs',
'I am the best friend.',
'Do you really like it? I\'m not a fan'
)
mytext <- get_sentences(mytext)
sentiment_by(mytext)
次の結果が得られました。
element_id word_count sd ave_sentiment
1: 1 10 1.497465 -0.8088680
2: 2 5 NA 0.5813777
3: 3 9 0.284605 0.2196345
感情関数を適用する前に、ストップ ワード、数字、顔文字を から削除したいと思いmytext
ます。たとえば、次のように使用できると考えました。
library("tm")
tm_map(mytext, removeNumbers)
tm_map(mytext, removeWords, stopwords())
しかし、私は得ました:
Error in UseMethod("tm_map", x) :
no applicable method for 'tm_map' applied to an object of class "c('get_sentences',
'get_sentences_character', 'list')"