r - 使用 R 在美国地图中突出显示邮政编码

Question

在我的数据中，美国邮政编码分为 4 组：我需要为每组突出显示不同颜色的邮政编码，并显示这些邮政编码的州名。

我正在尝试使用包的zip.plot功能muRL。

使用此功能，我可以突出显示我正在为我的项目考虑的所有邮政编码，但无法为这 4 个组使用不同的配色方案并显示州名称。

如何找到解决方案？

Answer 1

这可能不是最优雅的解决方案，但我希望这应该让你朝着正确的方向前进。

首先是一些随机数据：

library(muRL)
data(zips) #This is the file muRL's zip.plot function is calling: I'm gonna use it to extract random zip codes.
zip.data <- data.frame(zip = sample(zips$zip, 10), group = sample(1:4, 10, replace=TRUE))

然后你的情节，每组有不同的颜色：

zip.plot(zip.data, col = zip.data$group)

对于州名，我在这里zips再次使用该表：

zips[zips$zip %in% zip.data$zip, ] -> zip_subset
text(zip_subset$lon, zip_subset$lat, labels = zip_subset$state, pos = 4, cex = 0.7, font = 2)

有关绘制邮政编码相关数据的更优雅的方式，您应该查看此 SO question的答案。