I realize a common pattern is to look for frequencies that words cooccur in a document

A "cooccur" function about tidytext HOT 2 CLOSED

juliasilge commented on August 20, 2024 1

A "cooccur" function

from tidytext.

Comments (2)

dgrtwo commented on August 20, 2024

Leaving some example notes here. Probably won't put the ggraph part in a vignette since it requires ggraph which is only on GitHub. But maybe in README since the figure is neat.

pride_prejudice_words <- books %>%
  filter(book == "Pride & Prejudice")
pride_prejudice_words

word_cooccurences <- pride_prejudice_words %>%
  pair_count(linenumber, word, sort = TRUE)

word_cooccurences

This is useful, for example, to plot a network of co-occuring words with the igraph and ggraph packages:

library(igraph)
library(ggraph)

set.seed(2016)
word_cooccurences %>%
  filter(n >= 10) %>%
  graph_from_data_frame() %>%
  ggraph(layout = "fr") +
  geom_edge_link(aes(edge_alpha = n, edge_width = n)) +
  geom_node_point(color = "lightblue", size = 5) +
  geom_node_text(aes(label = name), vjust = 1, hjust = 1) +
  theme_void()

from tidytext.

github-actions commented on August 20, 2024

This issue has been automatically locked. If you believe you have found a related problem, please file a new issue (with a reprex: https://reprex.tidyverse.org) and link to this issue.

from tidytext.

Recommend Projects