Анализ настроений; «лексика» не найдена; "настроения" испорчены? - PullRequest
0 голосов
/ 02 июля 2018

Я пытаюсь следовать интерактивному учебнику по анализу настроений. Код:

new_sentiments <- sentiments %>% #From the tidytext package
  filter(lexicon != "loughran") %>% #Remove the finance lexicon
  mutate( sentiment = ifelse(lexicon == "AFINN" & score >= 0, "positive",
                         ifelse(lexicon == "AFINN" & score < 0,
                                "negative", sentiment))) %>%
  group_by(lexicon) %>%
  mutate(words_in_lexicon = n_distinct(word)) %>%
  ungroup()

Генерирует ошибку:

>Error in filter_impl(.data, quo) : 
>Evaluation error: object 'lexicon' not found.

Возможно, это связано с тем, что мне кажется, что таблицы "настроений" странно (испорчены?). Вот глава "чувства":

> head(sentiments,3)
>  element_id sentence_id word_count sentiment                                  
> chapter
> 1          1           1          7         0 The First Book of Moses:  
> Called Genesis
> 2          2           1         NA         0 The First Book of Moses:  
> Called Genesis
> 3          3           1         NA         0 The First Book of Moses:  > 
> Called Genesis
>                                  category
> 1 The First Book of Moses:  Called Genesis
> 2 The First Book of Moses:  Called Genesis
> 3 The First Book of Moses:  Called Genesis

Если я использую Get_Sentiments для bing, AFINN или NRC, я получаю то, что похоже на соответствующий ответ:

>  get_sentiments("bing")
> # A tibble: 6,788 x 2
>   word        sentiment
>   <chr>       <chr>    >   1 2-faced     negative 
> 2 2-faces     negative 
> 3 a+          positive 
> 4 abnormal    negative 

Я попытался удалить (удалить .packages) и переустановить tidytext; без изменений в поведении. Я бегу R 3.5

Даже если я полностью неправильно понимаю проблему, я был бы признателен за любые идеи, которые кто-либо может мне дать.

...