r - 使用 plot_usmap 包在 R 中创建 map

Question

我有一个数据集，其中包含不同的州、邮政编码和 claim 计数，每个都在单独的列中。我正在尝试创建一个图来根据马萨诸塞州的邮政编码显示 claim 总数。

数据集:

我用它来按 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 不支持邮政编码 map (仅支持州和县级 map )。它使用 FIPS 列为 map 上的州/县指定颜色。由于您按州定义了 FIPS 代码，因此您只会用一种纯色填充整个马萨诸塞州。