Ces 2024

R/ces.R

@@ -8,7 +8,7 @@
 #' (2024)} for background and details. The raw code that was used to produce
 #' the data is accessible at Kuriwaki's \href{https://github.com/kuriwaki/cces_cumulative}{Github.}
 #'
-#' @format A tibble with 617,455 observations and 17 variables:
+#' @format A tibble with 701,955 observations and 17 variables:
 #' \describe{
 #'   \item{case_id}{integer variable for case number}
 #'   \item{year}{integer variable for year of survey}

TODO.txt

@@ -17,7 +17,7 @@
 
 * List all values for character/factor variables with 6 or fewer possible values.
 
-* Update ces with 2024 data. 
+* Update ces with 2024 data. SS: Done
 
 
 ### polls 

data-raw/make_ces.R

@@ -1,12 +1,12 @@
 # Script for cleaning ces data. Shiro updates the data whenever CES is updated.
-# Latest is for 2023. See the help page for links. Could include more approval
+# Latest is for 2024. See the help page for links. Could include more approval
 # variables.
 
 library(tidyverse)
 library(haven)
 library(usethis)
 
-raw <- read_rds("data-raw/cumulative_2006-2023.rds") |>
+raw <- read_rds("data-raw/cumulative_2006-2024.rds") |>
       select(case_id, year, state, voted_turnout_self,
 
              # Always a tricky issue.