在R的地图上绘制英国邮政编码

时间:2015-03-13 16:01:08

标签: r mapping

请帮助R newbie

我有一份英国邮政编码清单 - 事实上是300万次观察。使用R来绘制地图的最佳方法是什么?

由于

1 个答案:

答案 0 :(得分:12)

第1步 - 下载英国邮政编码地理信息:例如 http://www.doogal.co.uk/UKPostcodes.php

https://data.gov.uk/search?q=postcodes

http://www.freemaptools.com/download-uk-postcode-lat-lng.htm

您可以选择所选的格式。 CSV易于使用。 将此表导入R。

第2步 - 使用列表创建子集

#You have now a data.frame Df_UK containing geoinfo.
#Your initial list is in Df_JVT with variable PostCodes.
list <- as.list(unique(Df_JVT$PostCodes))
#Select your postcodes from Df_UK and choose variable to display on the map
datamap <- subset(Df_UK, Df_UK$POSTNR %in% list, select= c("POSTNR","CITY", "COUNTY", "LAT",  "LON"))  
row.names(datamap) <- 1:nrow(datamap)

步骤3 - 创建空间对象并绘制地图

#Transform data.frame in spatial object
require(rgdal)
require(sp)
require(plotGoogleMaps)

datamap_mat<- cbind(datamap$LON,datamap$LAT)
row.names(datamap_mat) <- 1:nrow(datamap_mat)
AACRS <- CRS("+proj=longlat +ellps=WGS84")

UK_Map <- SpatialPointsDataFrame(datamap_mat, datamap, proj4string = AACRS, match.ID = TRUE) 


#Map Points on Googlemaps
m <- plotGoogleMaps(UK_Map , filename='MAP_UK.html')