?를 사용하여 다각형 사이의 작은 "은색"을 제거하는 방법이 R
있습니까? 원하는 솔루션은 SpatialPolygonsDataFrame
다각형 간의 공유 경계가 일치 하는 새로운 곳을 만듭니다 . R
ArcMap 또는 QGIS 대신 을 사용하는 솔루션에 특히 관심이 있습니다.
또한 왜 이러한 차이가 처음에 존재하는지에 대한 설명을 듣고 싶습니다.
다음은 작업중인 공간 데이터의 재현 가능한 예입니다.
library(rgdal)
library(sp)
library(tigris)
library(magrittr)
library(leaflet)
library(gplots)
# This project will use WGS 84 projected coordinate system
crs_proj <- CRS("+init=epsg:4326")
# These are the FIPS codes of the specific block groups in my study area
sel <- c("530330079005", "530330079001", "530330079004",
"530330085002", "530330085003", "530330086003",
"530330087003", "530330085001", "530330090001",
"530330091001", "530330091002", "530330092001",
"530330092002", "530330086001", "530330090002",
"530330086002", "530330079003", "530330079002",
"530330087002", "530330087001")
# Create polygons
polygons <- tigris::block_groups(state = "WA",county = "King") %>%
.[.@data$GEOID %in% sel,] %>%
spTransform(CRSobj = crs_proj)
# Map the result
leaflet() %>%
addProviderTiles("CartoDB.Positron") %>%
addPolygons(data = polygons,
stroke = F,
fillColor = col2hex("red"), fillOpacity = 1)
위의 스크린 샷에서 볼 수 있듯이 센서스 블록 그룹 다각형 사이에는 작은 간격이 있습니다. 이러한 간격의 위치는 확대 / 축소 수준에 따라 다르게 렌더링되지만 항상 약간의 간격이 보입니다.
R
이 차이를 없애기 위해 다각형을 프로그래밍 방식으로 조정 하는 함수 (또는 함수 조합)를 추천 할 수 있습니까 ?