## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr     1.1.3     ✔ readr     2.1.4
## ✔ forcats   1.0.0     ✔ stringr   1.5.0
## ✔ ggplot2   3.4.3     ✔ tibble    3.2.1
## ✔ lubridate 1.9.3     ✔ tidyr     1.3.0
## ✔ purrr     1.0.2     
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag()    masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
## Getting data from the 2015-2019 5-year ACS

## Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
## ℹ Please use `linewidth` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.
## `geom_smooth()` using formula = 'y ~ x'
## Warning: Removed 9344 rows containing non-finite values (`stat_smooth()`).
## `geom_smooth()` using formula = 'y ~ x'
## Warning: Removed 19 rows containing non-finite values (`stat_smooth()`).
## Warning: Removed 9363 rows containing missing values (`geom_point()`).

## Warning in rdrobust(y = combined$allocation, x = combined$pop_2019, c =
## cutoff): Mass points detected in the running variable.
## Sharp RD estimates using local polynomial regression.
## 
## Number of Obs.                 9392
## BW type                       mserd
## Kernel                   Triangular
## VCE method                       NN
## 
## Number of Obs.                 9359           33
## Eff. Number of Obs.               9            8
## Order est. (p)                    1            1
## Order bias  (q)                   2            2
## BW est. (h)              131634.609   131634.609
## BW bias (b)              313336.965   313336.965
## rho (h/b)                     0.420        0.420
## Unique Obs.                    5079           29
## 
## =============================================================================
##         Method     Coef. Std. Err.         z     P>|z|      [ 95% C.I. ]       
## =============================================================================
##   Conventional-3141410.92230136071.482    -0.104     0.917[-62207025.663 , 55924203.819]
##         Robust         -         -    -0.332     0.740[-77501309.401 , 55055604.272]
## =============================================================================
## Rows: 51 Columns: 4
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): stname, stusps
## dbl (2): st, census_code
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Warning: ggrepel: 1 unlabeled data points (too many overlaps). Consider
## increasing max.overlaps