我在R中有几个数据帧.第一个数据帧包含市场上一组lat和long坐标的计算凸包(由R中的chull提供).它看起来像这样:
MyGeo<- "Part of Chicago & Wisconsin"
Longitude <- c(-90.31914, -90.61911, -89.37842, -88.0988, -87.44875)
Latitude <- c(38.45781, 38.80097, 43.07961, 43.0624,41.49182)
dat <- data.frame(Longitude, Latitude, MyGeo)
Run Code Online (Sandbox Code Playgroud)
第二个是纬度和纵坐标的邮政编码(美国人口普查网站提供).它看起来像这样:
CensuseZip <- c("SomeZipCode1","SomeZipCode2","SomeZipCode3","SomeZipCode4","SomeZipCode5","SomeZipCode6","SomeZipCode7")
Longitude2 <- c(-131.470425,-133.457924,-131.693453,-87.64957,-87.99734,-87.895,-88.0228)
Latitude2 <- c(55.138352,56.239062,56.370538,41.87485,42.0086,42.04957,41.81055)
cen <- data.frame(Longitude2, Latitude2, CensuseZip)
Run Code Online (Sandbox Code Playgroud)
现在我相信第一个数据表为我提供了一个多边形或边框,我应该可以使用它来识别属于该边界的邮政编码.理想情况下,我想创建一个类似于下面的第三个数据表:
Longitude2 Latitude2 CensusZip MyGeo
-131.470425 55.138352 SomeZipCode1
-133.457924 56.239062 SomeZipCode2
-131.693453 56.370538 SomeZipCode3
-87.64957 41.87485 SomeZipCode4 Part of Chicago & Wisconsin
-87.99734 42.0086 SomeZipCode5 Part of Chicago & Wisconsin
-87.895 42.04957 SomeZipCode6 Part of Chicago & Wisconsin …Run Code Online (Sandbox Code Playgroud)