정보
- 데이터셋 : 국토정보플랫폼 -
국토통계지도
- 건물 항목에서 분류는 일반, 자료유형은 지상층수 선택
- 2022년 3월의 250m 격자 데이터, 2014년 7월의 250m 격자 데이터
다운로드
데이터 가져오기
floor_2014 <- st_read( dsn = "../data/spatial/cc_bldg/grid_250_floor_201407", layer="nlsp_031002011")
floor_2022 <- st_read( dsn = "../data/spatial/cc_bldg/grid_250_floor_202203", layer="nlsp_031002011")
250m 격자 단위의 기초 통계
2014년 평균 층수
Descriptive Statistics
floor_2014$val
N: 18424
|
Mean |
Std.Dev |
Min |
Median |
Max |
N.Valid |
Pct.Valid |
|
val |
1.4 |
1.1 |
1.0 |
1.0 |
19.9 |
3550 |
19.3 |
2022년 평균 층수
Descriptive Statistics
floor_2022$val
N: 18424
|
Mean |
Std.Dev |
Min |
Median |
Max |
N.Valid |
Pct.Valid |
|
val |
1.5 |
1.3 |
1.0 |
1.1 |
21.4 |
3844 |
20.9 |
데이터 정리
- 국토정보플랫폼은 격자 내 건물의 지상층수의 평균을 제공함
- 층수 구분을 1층 이하, 1.5층 이하, 2층 이하, 5층 이하, 10층 이하,
10층 초과로 함
floor_cuts <- c(-1, 1, 1.5, 2, 5, 10, Inf)
floor_2014$fl_cuts <- cut(floor_2014$val, breaks = floor_cuts)
floor_2014$fl_cuts <- factor( floor_2014$fl_cuts,
labels=c("1층 이하",
"1.5층 이하",
"2층 이하",
"5층 이하",
"10층 이하",
"10층 초과") )
floor_2022$fl_cuts <- cut(floor_2022$val, breaks = floor_cuts)
floor_2022$fl_cuts <- factor( floor_2022$fl_cuts,
labels=c("1층 이하",
"1.5층 이하",
"2층 이하",
"5층 이하",
"10층 이하",
"10층 초과") )
Mapview를 이용하여 동적지도 만들기
mapview의 기본 설정을 사용하고 몇가지 설정만 변경함
2014년
mapview( floor_2014 , map.types="OpenStreetMap", zcol="fl_cuts", alpha=0.1, alpha.regions=0.6, layer.name = "2014 Mean floor")