r - R - 制作美国各州热图时遇到问题

问题描述

我正在尝试制作本周整洁的星期二数据的美国各州热图。我在让它工作时遇到了很多麻烦，我认为这应该只需要几行代码。

USMAP 是在 R 中进行此类映射的最佳方式吗？
有没有一种 ggplot 方法来代替使用 usmap 包？

在我的例子中我做错了什么？

library(usmap)
library(tidyverse)

nurses <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/master/data/2021/2021-10-05/nurses.csv')

plot_data <- nurses %>% 
filter(Year == 2020) %>% 
select(State, `Total Employed RN`) %>% 
rename("Total_Employed" = 2)

# Works with no data
plot_usmap()

# Does not work with data ??
plot_usmap(data = plot_data,
         values = Total_Employed,
         color = "blue") +
scale_fill_continuous(low = "white",
                      high = "blue")

# The column is real and I can access it
plot_data %>% 
mutate(test_column = (1 + Total_Employed))

# Trying to emulate an example from : https://cran.r-project.org/web/packages/usmap/vignettes/mapping.html
statepop <- statepop %>% 
rename(State = 3)

merged_df <- left_join(plot_data, statepop, by = "State") %>% 
select(fips, abbr, Total_Employed, State)
merged_df

# Still does not work even though data is in the same format
plot_usmap(data = merged_df,
         values = Total_Employed,
         color = "blue") +
scale_fill_continuous(low = "white",
                      high = "blue")

标签： r

r - R - 制作美国各州热图时遇到问题

问题描述

解决方案

推荐阅读