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

Posted 2023-02-23

【中文标题】使用 R 在美国地图中突出显示邮政编码

【英文标题】：Highlight zip codes in US MAP using R

【发布时间】：2012-08-06 10:39:06

【问题描述】：

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

我正在尝试使用 muRL 包的 zip.plot 函数。

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

如何找到解决方案？

【问题讨论】：

我不熟悉这个功能，但我会猜测（根据包muRL参考手册的内容判断）如果您输入的data.frame（data）包含一列@ 987654326@ 带有您的邮政编码和一列 group 带有他们所属的组的编号，您可能可以这样做：zip.plot(data, col=data$group)

话虽如此，请考虑根据this guideline 编辑您的问题，添加一个可重现的示例，并可能显示您尝试过的代码，因为这样为您提供足够的答案会容易得多.

【参考方案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)

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