tidytext problem using dplyr: not count words

Question

I am getting problem with an old script using tidytext and dplyr libraries.

My example was extracted from : https://community.rstudio.com/t/problem-with-unnest-tokens-function/94107

But I am having the same problem:

   library(gutenbergr)
   library(dplyr)
   library(tidytext)

    TTLutS_.ted <- gutenberg_download(164, mirror = "http://mirrors.xmission.com/gutenberg/")
    Ulysses_.ted <- gutenberg_download(4300, mirror = "http://mirrors.xmission.com/gutenberg/")
    TTLutS <- tibble(TTLutS_.ted)
    Ulysses <- tibble(Ulysses_.ted)
    TTLutS.words <- TTLutS %>% unnest_tokens(word, text)
    Ulysses.words <- Ulysses %>% unnest_tokens(word, text)
    TTLutS.words %>% count(word, sort = TRUE)

Error: objeto 'txt' no encontrado Run rlang::last_error() to see where the error occurred.

Error in count(., word, sort = TRUE) : unused argument (sort = TRUE)

Whixh packages have you loaded? Try `dplyr::count(…`. – deschen Nov 01 '21 at 22:06 — deschen, Nov 01 '21 at 22:06
Sorry I forgot, i fix the problem – Rodrigo_BC Nov 01 '21 at 22:15 — Rodrigo_BC, Nov 01 '21 at 22:15

Rodrigo_BC · Answer 1 · 2021-11-01T22:56:59.037

Finally I found a easy solution

   library(gutenbergr)
   library(dplyr)
   library(tidytext)

     TTLutS_.ted <- gutenberg_download(164, mirror = "http://mirrors.xmission.com/gutenberg/")
     Ulysses_.ted <- gutenberg_download(4300, mirror = "http://mirrors.xmission.com/gutenberg/")
     TTLutS <- tibble(TTLutS_.ted)
     Ulysses <- tibble(Ulysses_.ted)
     TTLutS.words <- TTLutS %>% unnest_tokens(word, text)
     Ulysses.words <- Ulysses %>% unnest_tokens(word, text)
     TTLutS.words %>% mutate(n = str_count(word))

tidytext problem using dplyr: not count words

1 Answers1