r - 使用 plot_usmap 包在 R 中创建地图

Question

我有一个数据集，其中包含不同的州、邮政编码和索赔计数，每一个都在不同的列中。我正在尝试创建一个图，以根据 MA​​ 州的邮政编码显示总索赔数。

数据集：

我用它来按 MA 过滤：

MA_medicare <- medicare %>%
  filter(medicare$NPPES.Provider.State == "MA")

然后我用它来设置 plot_usmap 的 fips 代码：

MA_medicare$NPPES.Provider.State <- fips(MA_medicare$NPPES.Provider.State)
setnames(MA_medicare, old=c("NPPES.Provider.State"), new=c("fips"))

最后尝试绘制图表（不知道为什么这不起作用）：

plot_usmap(data = MA_medicare, values= c("Total.Claim.Count", "NPPES.Provider.Zip.Code"), include = c("MA")) + scale_fill_continuous(low= "white", high= "red") + theme(legend.position = "right") 

错误：美学长度必须为 1 或与数据相同 (4350838)：填充

Answer 1

我是usmap. plot_usmap只接受一列用于绘图的值，因此您可能正在寻找以下内容：

plot_usmap(data = MA_medicare, values = "Total.Claim.Count", include = c("MA"))

但是，您的数据是按邮政编码的，目前usmap不支持邮政编码地图（仅支持州和县级地图）。它使用 FIPS 列为地图上的州/县分配颜色。由于您按州定义了 FIPS 代码，因此您只需用一种纯色填充整个马萨诸塞州。