Vizualizace mezí chyby v ACS

Analýza dat amerického sčítání lidu v R

Kyle Walker

Instructor

Vizualizace nejistoty

Běžný přístup: grafy s chybovými úsečkami

Příklad grafu s chybovými úsečkami

Grafy mezí chyby v ggplot2

V ggplot2: geom_errorbar() a geom_errorbarh()

library(tidycensus)
library(tidyverse)

wyoming_age <- get_acs(geography = "county", 
                       variables = c(medianage = "B01002_001"), 
                       state = "WY")  

ggplot(wyoming_age, aes(x = estimate, y = NAME)) + 
  geom_errorbarh(aes(xmin = estimate - moe, 
                     xmax = estimate + moe)) + 
  geom_point()

Neformátovaný graf mezí chyby

Formátování grafů mezí chyby

wyoming_age2 <- wyoming_age %>%
  mutate(NAME = str_replace(NAME, " County, Wyoming", ""))

ggplot(wyoming_age2, 
       aes(x = estimate, 
           y = reorder(NAME, estimate))) + 
  geom_errorbarh(aes(xmin = estimate - moe, 
                     xmax = estimate + moe)) + 
  geom_point(size = 3, color = "darkgreen") + 
  theme_grey(base_size = 14) + 
  labs(title = "Median age, counties in Wyoming", 
       subtitle = "2012-2016 American Community Survey",
       x = "ACS estimate (bars represent margins of error)", 
       y = "")

Formátovaný graf mezí chyby

Pojďme procvičovat!

Analýza dat amerického sčítání lidu v R