Research Question:
How do high school students’ subgroup makeup (i.e., Race/ethnicity, Male vs. Female, economically disadvantaged, Limited English, Migrant status, Disability status, and Homelessness) differ among states/regions?



df_pivot %>%
ggplot(aes(x = mean_pct,
y = fct_reorder(STNAM.y, mean_pct),
fill = stat(x))) +
geom_density_ridges_gradient(scale = 2, size = 0.3, rel_min_height = 0.001) +
scale_fill_viridis_c(name = "%", option = "C") +
coord_cartesian(clip = "off") +
theme_ridges(grid = FALSE) +
labs(title = 'Mean percentage of students that scored at or above proficient',
x = 'Mean percent proficient',
y = 'State')