R : ggplot2 코드에 따라 모양 파일의 다각형 채우기

Question

그래서 모양 파일 (페이지 하단에 POWIATY)이 있습니다. 내가 가지고있는 좌표로 특정 다각형을 채우고 싶습니다. 위도 : 52.599427 경도 :

이의 말을하자, 나는에 전체 영역을 채우려 20.7572137

내가지도에 점 좌표를 설정하지만 어떻게 거기에 전체 다각형을 채우는 방법을 알아? 당신이 폴리곤 숫자 ID로 기입해야합니다 있도록

Answer 1

그 모양 파일에 중복 된 지역 이름이 있습니다

library(rgdal) 
library(rgeos) 
library(ggplot2) 

pow <- readOGR("POWIATY.shp", "POWIATY") 
plot(pow) 

where <- over(SpatialPoints(cbind(20.7572137, 52.599427)), pow, TRUE) 
reg <- data.frame(id=rownames(where[[1]])) 

map <- fortify(pow) 

gg <- ggplot() 
gg <- gg + geom_map(map=map, data=map, 
        aes(x=long, y=lat, map_id=id), 
        fill="white", color="black", size=0.25) 
gg <- gg + geom_map(data=reg, map=map, 
        aes(fill=id, map_id=id), color="steelblue") 
gg <- gg + coord_map() 
gg <- gg + theme_bw() 
gg