jaytimm

get_historic_acs <- function (variables, 
                              geography,
                              state = NULL,
                              year, 
                              summary_var = NULL,
                              var_names) {
  
label <- var_names; variable <- variables
  
  y <- list()

jaytimm

library(tidyverse)
library(Rvoteview)
library(ggrepel)
library(ggthemes)

house115 <- Rvoteview:: member_search(chamber= 'House', congress = 115) %>%
  mutate(name = gsub(', .*$', '', bioname))

reps <- c("O'ROURKE", "WATERS", "PELOSI", "LAMB", "SCHIFF",
          "CURBELO", "MCSALLY", "MCCARTHY", "JORDAN")