hrbrmstr
/
ggchicklet
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity
Browse Source

updated debates data; regen'd vignette

master
boB Rudis 5 years ago
parent
7494388716
commit
dc3124d9b3
No known key found for this signature in database GPG Key ID: 1D7529BE14E2BBA9
2 changed files with 5 additions and 5 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 10
      data-raw/debates2019.R
  2. BIN
      data/debates2019.rda

10
data-raw/debates2019.R
View File

@ -57,7 +57,7 @@ read_html(here::here("data-raw/2019-06-26-us-elections-debate-speaking-time.html
grepl("Election", topic) ~ "Elections Reform", grepl("Election", topic) ~ "Elections Reform",
grepl("Health", topic) ~ "Healthcare", grepl("Health", topic) ~ "Healthcare",
grepl("Party", topic) ~ "Party Strategy", grepl("Party", topic) ~ "Party Strategy",
grepl("Women", topic) ~ "Womens Rights", grepl("Women", topic) ~ "Women's Rights",
TRUE ~ topic TRUE ~ topic
) )
) %>% ) %>%
@ -103,7 +103,7 @@ read_html(here::here("data-raw/2019-06-27-us-elections-debate-speaking-time.html
grepl("Election", topic) ~ "Elections Reform", grepl("Election", topic) ~ "Elections Reform",
grepl("Health", topic) ~ "Healthcare", grepl("Health", topic) ~ "Healthcare",
grepl("Party", topic) ~ "Party Strategy", grepl("Party", topic) ~ "Party Strategy",
grepl("Women", topic) ~ "Womens Rights", grepl("Women", topic) ~ "Women's Rights",
TRUE ~ topic TRUE ~ topic
) )
) %>% ) %>%
@ -149,7 +149,7 @@ read_html(here::here("data-raw/2019-07-30-us-elections-debate-speaking-time.html
grepl("Election", topic) ~ "Elections Reform", grepl("Election", topic) ~ "Elections Reform",
grepl("Health", topic) ~ "Healthcare", grepl("Health", topic) ~ "Healthcare",
grepl("Party", topic) ~ "Party Strategy", grepl("Party", topic) ~ "Party Strategy",
grepl("Women", topic) ~ "Womens Rights", grepl("Women", topic) ~ "Women's Rights",
TRUE ~ topic TRUE ~ topic
) )
) %>% ) %>%
@ -195,7 +195,7 @@ read_html(here::here("data-raw/2019-07-31-us-elections-debate-speaking-time.html
grepl("Election", topic) ~ "Elections Reform", grepl("Election", topic) ~ "Elections Reform",
grepl("Health", topic) ~ "Healthcare", grepl("Health", topic) ~ "Healthcare",
grepl("Party", topic) ~ "Party Strategy", grepl("Party", topic) ~ "Party Strategy",
grepl("Women", topic) ~ "Womens Rights", grepl("Women", topic) ~ "Women's Rights",
TRUE ~ topic TRUE ~ topic
) )
) %>% ) %>%
@ -241,7 +241,7 @@ read_html(here::here("data-raw/2019-09-12-us-elections-debate-speaking-time.html
grepl("Election", topic) ~ "Elections Reform", grepl("Election", topic) ~ "Elections Reform",
grepl("Health", topic) ~ "Healthcare", grepl("Health", topic) ~ "Healthcare",
grepl("Party", topic) ~ "Party Strategy", grepl("Party", topic) ~ "Party Strategy",
grepl("Women", topic) ~ "Womens Rights", grepl("Women", topic) ~ "Women's Rights",
TRUE ~ topic TRUE ~ topic
) )
) %>% ) %>%

BIN
data/debates2019.rda
View File

Binary file not shown.
Write Preview
Loading…
Cancel
Save