Fetch and process Hillary Rodham Clinton’s personal emails. See site for more details.
You can install rodham from CRAN or Github with:
# from CRAN
install.packages("rodham")
# dev version
devtools::install_github("JohnCoene/rodham")
# load emails
data(emails)
# build graph
edges <- edges_emails(emails)
g <- igraph::graph.data.frame(edges)
# plot
plot(g)
See “how-to” vignette for more examples!
ext <- get_xpdf() # get pdf extractor
# get emails related to Benghazi released in December
emails_bengh <- get_emails(release = "Benghazi", extractor = ext)
# load contents
hrc_emails <- load_emails(emails_bengh)
print(hrc_emails)
#> 4366 emails
# get emails content
cont <- get_content(hrc_emails)
# clean emails
cont <- clean_content(cont)
####
# Chart in header
####
# devtools::install_github("JohnCoene/echarts")
library(echarts)
library(dplyr)
get_com(hrc_emails) %>%
filter(from != "") %>%
count(from) %>%
echart(from) %>%
ecloud(n) %>%
etitle(text = "Email senders", subtext = "Benghazi release") %>%
etheme("helianthus")
hrc_names
in package