Calculate Efficiency Gap — part_egap • redistmetrics

Calculate Efficiency Gap

part_egap(plans, shp, dvote, rvote)

Arguments

plans: redist_plans object or plans_matrix where each row indicates a district assignment and each column is a plan
shp: redist_map object, tibble, or data frame containing other columns
dvote: unqouted name of column in shp with total population
rvote: unqouted name of column in shp with group population

Value

numeric vector

References

Nicholas O. Stephanopoulos. 2015. Partisan Gerrymandering and the Efficiency Gap. The University of Chicago Law Review, 82, Pp. 831-900.

Examples

data(nh)
data(nh_m)
# For a single plan:
part_egap(plans = nh$r_2020, shp = nh, rvote = nrv, dvote = ndv)
#> [1] -0.02007106 -0.02007106

# Or many plans:
part_egap(plans = nh_m[, 3:5], shp = nh, rvote = nrv, dvote = ndv)
#> [1] -0.043094074 -0.043094074 -0.005968205 -0.005968205 -0.038383805
#> [6] -0.038383805