0

これが基本的な感情の例です。テキストデータは、関数を介して文に分割され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')"
4

0 に答える 0