我正在比较一个地区的种族构成和地区收入中位数(可以做人口普查区或 ZCTA。这里我将包括 ZCTA,因为教育部没有那么大)。
将数据放入以便可视化的最佳格式是什么?另外,我如何计算每个种族/族裔群体占总数的百分比和百分比变化?
我能够为 YEAR 和 ESTIMATE 使用 dplyr(spread),但我也希望能够为 YEAR 和 MOE 做到这一点。这甚至是正确的举动吗?
我还想计算每个种族/民族的百分比,以及百分比变化。我该怎么做呢?
谢谢!
在这里,我想出了如何提取多年的数据:
library(tidyverse)
library(tidycensus)
years <- lst(2012, 2017)
race_ethnicity <- c(Total = "DP05_0070", Hispanic = "DP05_0071", White = "DP05_0077", Black = "DP05_0078")
multi_yearZCTA <- map_dfr(
years,
~get_acs(
geography = "zcta",
variables = race_ethnicity,
year = .x,
survey = "acs5",
geometry = FALSE
),
.id = "years"
) %>%
arrange(variable, NAME) %>%
print()
然后我选择了特定的ZCTA ...
# Select specific ZCTA
RundbergZCTA <- multi_yearZCTA %>%
filter(NAME == "ZCTA5 78758")
我可以传播,但它不携带教育部...
RundbergZCTA2 <- RundbergZCTA %>%
spread(years, estimate, sep = "_")
但我不确定从那里去哪里。