API exercise
Won Do Lee
2023-06-01
Let’s navigating Open Data Portals with R
Many local governments manage OpenAPI services in their official data portals to publish open data
This allows us to access these data resources using programming languages (or open source software)
R also supports OpenAPI services (formerly REST APIs) to interact with the remote service with minimal implementation logic
Set up your comfortable and personal workplace
You should be aware of your API access key to expose to the public
API access keys are unique identifiers that allow applications to access an API
options(knitr.duplicate.label = "allow")
setwd("d:/WORKSPACE/Temp/api/")
seoul.api.key<-"794649516b7768693130307a7a595950"
kakao.api<-"af804b7af72cd9ba73ccfb5e951baf1d"Locate the Seoul Air Quality Monitoring Station
require(XML)## Loading required package: XML## Warning: package 'XML' was built under R version 4.2.3require(RCurl)## Loading required package: RCurl## Warning: package 'RCurl' was built under R version 4.2.3require(dplyr)## Loading required package: dplyr##
## Attaching package: 'dplyr'## The following objects are masked from 'package:stats':
##
## filter, lag## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, unionseoul.api<-"http://openapi.seoul.go.kr:8088"
seoul.api.key<-"794649516b7768693130307a7a595950"
type<-"xml"
aurn.loc<-"airPolutionMeasuringPlace"
startindex="1"
endindex="100"
url<-paste(seoul.api,seoul.api.key,type,aurn.loc,startindex,endindex,sep="/")
doc<-xmlToDataFrame(url)
tbl.doc<-doc[3:27,]
tbl.doc<-tbl.doc %>% dplyr::select(c(4:8))
tbl.doc$LOC_ADDRRESS[tbl.doc$LOC_CODE==118]<-c("서울특별시 금천구 금하로24길 6")Geocoding SAQM data using Kakao API
require(httr)## Loading required package: httrrequire(jsonlite)## Loading required package: jsonlitekakao.api<-"af804b7af72cd9ba73ccfb5e951baf1d"
result<-data.frame()
address_list <-tbl.doc$LOC_ADDRRESS
for(i in 1:length(address_list)){
res <- GET(url = 'https://dapi.kakao.com/v2/local/search/address.json',
query = list(query = address_list[i]),
add_headers(Authorization = paste0("KakaoAK ",
kakao.api)))
print(x=res)
coord <- res %>% content(as = 'text') %>% fromJSON()
str(object = coord)
place_list <- res %>%
content(as='text') %>%
fromJSON()
row_temp = cbind(place_list$documents$road_address %>%
select(address_name, x, y))
result = rbind(result, row_temp)
}## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%A2%85%EB%A1%9C%EA%B5%AC%20%EC%A2%85%EB%A1%9C35%EA%B0%80%EA%B8%B8%2019%20%EC%A2%85%EB%A1%9C5%2C6%EA%B0%80%20%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 922 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 종로구 효제동 173-2"
## .. ..$ b_code : chr "1111016200"
## .. ..$ h_code : chr "1111063000"
## .. ..$ main_address_no : chr "173"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "종로구"
## .. ..$ region_3depth_h_name: chr "종로5.6가동"
## .. ..$ region_3depth_name : chr "효제동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "127.005031333474"
## .. ..$ y : chr "37.5720611697886"
## ..$ address_name: chr "서울 종로구 종로35가길 19"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 종로구 종로35가길 19"
## .. ..$ building_name : chr "종로5-6가동주민센터"
## .. ..$ main_building_no : chr "19"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "종로구"
## .. ..$ region_3depth_name: chr "효제동"
## .. ..$ road_name : chr "종로35가길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.005031333474"
## .. ..$ y : chr "37.5720611697886"
## .. ..$ zone_no : chr "03126"
## ..$ x : chr "127.005031333474"
## ..$ y : chr "37.5720611697886"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%A4%91%EA%B5%AC%20%EB%8D%95%EC%88%98%EA%B6%81%EA%B8%B8%2015%20%EC%8B%9C%EC%B2%AD%EC%84%9C%EC%86%8C%EB%AC%B8%EB%B3%84%EA%B4%80%203%EB%8F%99]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 900 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 중구 서소문동 37"
## .. ..$ b_code : chr "1114016600"
## .. ..$ h_code : chr "1114052000"
## .. ..$ main_address_no : chr "37"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "중구"
## .. ..$ region_3depth_h_name: chr "소공동"
## .. ..$ region_3depth_name : chr "서소문동"
## .. ..$ sub_address_no : chr ""
## .. ..$ x : chr "126.975613605737"
## .. ..$ y : chr "37.5645541852439"
## ..$ address_name: chr "서울 중구 덕수궁길 15"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 중구 덕수궁길 15"
## .. ..$ building_name : chr "서울시청 서소문별관"
## .. ..$ main_building_no : chr "15"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "중구"
## .. ..$ region_3depth_name: chr "서소문동"
## .. ..$ road_name : chr "덕수궁길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.975613605737"
## .. ..$ y : chr "37.5645541852439"
## .. ..$ zone_no : chr "04515"
## ..$ x : chr "126.975613605737"
## ..$ y : chr "37.5645541852439"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%9A%A9%EC%82%B0%EA%B5%AC%20%ED%95%9C%EB%82%A8%EB%8C%80%EB%A1%9C%20136%20%EC%84%9C%EC%9A%B8%ED%8A%B9%EB%B3%84%EC%8B%9C%EC%A4%91%EB%B6%80%EA%B8%B0%EC%88%A0%EA%B5%90%EC%9C%A1%EC%9B%90]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 926 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 용산구 한남동 726-366"
## .. ..$ b_code : chr "1117013100"
## .. ..$ h_code : chr "1117068500"
## .. ..$ main_address_no : chr "726"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "용산구"
## .. ..$ region_3depth_h_name: chr "한남동"
## .. ..$ region_3depth_name : chr "한남동"
## .. ..$ sub_address_no : chr "366"
## .. ..$ x : chr "127.004301422814"
## .. ..$ y : chr "37.5404404203161"
## ..$ address_name: chr "서울 용산구 한남대로 136"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 용산구 한남대로 136"
## .. ..$ building_name : chr "서울특별시중부기술교육원"
## .. ..$ main_building_no : chr "136"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "용산구"
## .. ..$ region_3depth_name: chr "한남동"
## .. ..$ road_name : chr "한남대로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.004301422814"
## .. ..$ y : chr "37.5404404203161"
## .. ..$ zone_no : chr "04417"
## ..$ x : chr "127.004301422814"
## ..$ y : chr "37.5404404203161"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%9D%80%ED%8F%89%EA%B5%AC%20%EC%A7%84%ED%9D%A5%EB%A1%9C%20215%20%28%ED%95%9C%EA%B5%AD%ED%99%98%EA%B2%BD%EC%82%B0%EC%97%85%EA%B8%B0%EC%88%A0%EC%9B%90%20%EC%98%A8%EC%8B%A4%EB%8F%992%EC%B8%B5%20%29]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 905 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 은평구 불광동 613-2"
## .. ..$ b_code : chr "1138010300"
## .. ..$ h_code : chr "1138052000"
## .. ..$ main_address_no : chr "613"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "은평구"
## .. ..$ region_3depth_h_name: chr "불광1동"
## .. ..$ region_3depth_name : chr "불광동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "126.934324904596"
## .. ..$ y : chr "37.6098717913874"
## ..$ address_name: chr "서울 은평구 진흥로 215"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 은평구 진흥로 215"
## .. ..$ building_name : chr "한국환경산업기술원"
## .. ..$ main_building_no : chr "215"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "은평구"
## .. ..$ region_3depth_name: chr "불광동"
## .. ..$ road_name : chr "진흥로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.934324904596"
## .. ..$ y : chr "37.6098717913874"
## .. ..$ zone_no : chr "03367"
## ..$ x : chr "126.934324904596"
## ..$ y : chr "37.6098717913874"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%84%9C%EB%8C%80%EB%AC%B8%EA%B5%AC%20%EC%84%B8%EA%B2%80%EC%A0%95%EB%A1%9C4%EA%B8%B8%2032%28%ED%99%8D%EC%A0%9C3%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0%29%20]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 934 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 서대문구 홍제동 7-13"
## .. ..$ b_code : chr "1141011100"
## .. ..$ h_code : chr "1141064000"
## .. ..$ main_address_no : chr "7"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "서대문구"
## .. ..$ region_3depth_h_name: chr "홍제3동"
## .. ..$ region_3depth_name : chr "홍제동"
## .. ..$ sub_address_no : chr "13"
## .. ..$ x : chr "126.949691080182"
## .. ..$ y : chr "37.5937665695472"
## ..$ address_name: chr "서울 서대문구 세검정로4길 32"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 서대문구 세검정로4길 32"
## .. ..$ building_name : chr "홍제제3동주민센터"
## .. ..$ main_building_no : chr "32"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "서대문구"
## .. ..$ region_3depth_name: chr "홍제동"
## .. ..$ road_name : chr "세검정로4길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.949691080182"
## .. ..$ y : chr "37.5937665695472"
## .. ..$ zone_no : chr "03622"
## ..$ x : chr "126.949691080182"
## ..$ y : chr "37.5937665695472"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EB%A7%88%ED%8F%AC%EA%B5%AC%20%ED%8F%AC%EC%9D%80%EB%A1%9C%206%EA%B8%B8%2010%20%EB%A7%9D%EC%9B%901%EB%8F%99%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0%20%EC%98%A5%EC%83%81]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 909 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 마포구 망원동 403-2"
## .. ..$ b_code : chr "1144012300"
## .. ..$ h_code : chr "1144069000"
## .. ..$ main_address_no : chr "403"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "마포구"
## .. ..$ region_3depth_h_name: chr "망원1동"
## .. ..$ region_3depth_name : chr "망원동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "126.905591296196"
## .. ..$ y : chr "37.5555883684512"
## ..$ address_name: chr "서울 마포구 포은로6길 10"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 마포구 포은로6길 10"
## .. ..$ building_name : chr "망원1동주민센터"
## .. ..$ main_building_no : chr "10"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "마포구"
## .. ..$ region_3depth_name: chr "망원동"
## .. ..$ road_name : chr "포은로6길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.905591296196"
## .. ..$ y : chr "37.5555883684512"
## .. ..$ zone_no : chr "04010"
## ..$ x : chr "126.905591296196"
## ..$ y : chr "37.5555883684512"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%84%B1%EB%8F%99%EA%B5%AC%20%EB%9A%9D%EC%84%AC%EB%A1%9C3%EA%B8%B8%2018%20%EC%84%B1%EC%88%981%EA%B0%801%EB%8F%99%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 932 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 성동구 성수동1가 27-23"
## .. ..$ b_code : chr "1120011400"
## .. ..$ h_code : chr "1120065000"
## .. ..$ main_address_no : chr "27"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "성동구"
## .. ..$ region_3depth_h_name: chr "성수1가1동"
## .. ..$ region_3depth_name : chr "성수동1가"
## .. ..$ sub_address_no : chr "23"
## .. ..$ x : chr "127.049688457046"
## .. ..$ y : chr "37.5420323828235"
## ..$ address_name: chr "서울 성동구 뚝섬로3길 18"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 성동구 뚝섬로3길 18"
## .. ..$ building_name : chr "성수1가제1동주민센터"
## .. ..$ main_building_no : chr "18"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "성동구"
## .. ..$ region_3depth_name: chr "성수동1가"
## .. ..$ road_name : chr "뚝섬로3길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.049688457046"
## .. ..$ y : chr "37.5420323828235"
## .. ..$ zone_no : chr "04780"
## ..$ x : chr "127.049688457046"
## ..$ y : chr "37.5420323828235"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%ED%8A%B9%EB%B3%84%EC%8B%9C%20%EA%B4%91%EC%A7%84%EA%B5%AC%20%EA%B4%91%EB%82%98%EB%A3%A8%EB%A1%9C%20571%20%EA%B5%AC%EC%9D%98%20%EC%95%84%EB%A6%AC%EC%88%98%EC%A0%95%EC%88%98%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 884 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 광진구 구의동 164-2"
## .. ..$ b_code : chr "1121510300"
## .. ..$ h_code : chr "1121586000"
## .. ..$ main_address_no : chr "164"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "광진구"
## .. ..$ region_3depth_h_name: chr "구의2동"
## .. ..$ region_3depth_name : chr "구의동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "127.09295071199"
## .. ..$ y : chr "37.5459473143709"
## ..$ address_name: chr "서울 광진구 광나루로 571"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 광진구 광나루로 571"
## .. ..$ building_name : chr ""
## .. ..$ main_building_no : chr "571"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "광진구"
## .. ..$ region_3depth_name: chr "구의동"
## .. ..$ road_name : chr "광나루로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.09295071199"
## .. ..$ y : chr "37.5459473143709"
## .. ..$ zone_no : chr "04981"
## ..$ x : chr "127.09295071199"
## ..$ y : chr "37.5459473143709"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EB%8F%99%EB%8C%80%EB%AC%B8%EA%B5%AC%20%EC%B2%9C%ED%98%B8%EB%8C%80%EB%A1%9C13%EA%B8%B8%2043%20%EC%9A%A9%EB%91%90%EC%B4%88%EB%93%B1%ED%95%99%EA%B5%90]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 937 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 동대문구 용두동 237-1"
## .. ..$ b_code : chr "1123010200"
## .. ..$ h_code : chr "1123053600"
## .. ..$ main_address_no : chr "237"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "동대문구"
## .. ..$ region_3depth_h_name: chr "용신동"
## .. ..$ region_3depth_name : chr "용두동"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "127.028387192811"
## .. ..$ y : chr "37.5764130924206"
## ..$ address_name: chr "서울 동대문구 천호대로13길 43"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 동대문구 천호대로13길 43"
## .. ..$ building_name : chr "서울용두초등학교"
## .. ..$ main_building_no : chr "43"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "동대문구"
## .. ..$ region_3depth_name: chr "용두동"
## .. ..$ road_name : chr "천호대로13길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.028387192811"
## .. ..$ y : chr "37.5764130924206"
## .. ..$ zone_no : chr "02583"
## ..$ x : chr "127.028387192811"
## ..$ y : chr "37.5764130924206"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%A4%91%EB%9E%91%EA%B5%AC%20%EC%9A%A9%EB%A7%88%EC%82%B0%EB%A1%9C%20369%20%EA%B1%B4%EA%B0%95%EA%B0%80%EC%A0%95%EC%A7%80%EC%9B%90%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 911 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 중랑구 면목동 62-2"
## .. ..$ b_code : chr "1126010100"
## .. ..$ h_code : chr "1126056500"
## .. ..$ main_address_no : chr "62"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "중랑구"
## .. ..$ region_3depth_h_name: chr "면목본동"
## .. ..$ region_3depth_name : chr "면목동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "127.094036329091"
## .. ..$ y : chr "37.5849127213259"
## ..$ address_name: chr "서울 중랑구 용마산로 369"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 중랑구 용마산로 369"
## .. ..$ building_name : chr "건강가정지원센터"
## .. ..$ main_building_no : chr "369"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "중랑구"
## .. ..$ region_3depth_name: chr "면목동"
## .. ..$ road_name : chr "용마산로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.094036329091"
## .. ..$ y : chr "37.5849127213259"
## .. ..$ zone_no : chr "02208"
## ..$ x : chr "127.094036329091"
## ..$ y : chr "37.5849127213259"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%84%B1%EB%B6%81%EA%B5%AC%20%EC%82%BC%EC%96%91%EB%A1%9C2%EA%B8%B8%2070%20%EA%B8%B8%EC%9D%8C2%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 933 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 성북구 길음동 1064-1"
## .. ..$ b_code : chr "1129013400"
## .. ..$ h_code : chr "1129068500"
## .. ..$ main_address_no : chr "1064"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "성북구"
## .. ..$ region_3depth_h_name: chr "길음2동"
## .. ..$ region_3depth_name : chr "길음동"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "127.027279365525"
## .. ..$ y : chr "37.6068073305341"
## ..$ address_name: chr "서울 성북구 삼양로2길 70"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 성북구 삼양로2길 70"
## .. ..$ building_name : chr "길음2동 주민센터(길음3치안센터)"
## .. ..$ main_building_no : chr "70"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "성북구"
## .. ..$ region_3depth_name: chr "길음동"
## .. ..$ road_name : chr "삼양로2길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.027279365525"
## .. ..$ y : chr "37.6068073305341"
## .. ..$ zone_no : chr "02732"
## ..$ x : chr "127.027279365525"
## ..$ y : chr "37.6068073305341"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EA%B0%95%EB%B6%81%EA%B5%AC%20%EC%82%BC%EC%96%91%EB%A1%9C%20139%EA%B8%B8%2049%20%EC%9A%B0%EC%9D%B4%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 944 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강북구 수유동 568-100"
## .. ..$ b_code : chr "1130510300"
## .. ..$ h_code : chr "1130564500"
## .. ..$ main_address_no : chr "568"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "강북구"
## .. ..$ region_3depth_h_name: chr "우이동"
## .. ..$ region_3depth_name : chr "수유동"
## .. ..$ sub_address_no : chr "100"
## .. ..$ x : chr "127.011869707413"
## .. ..$ y : chr "37.6479342499954"
## ..$ address_name: chr "서울 강북구 삼양로139길 49"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강북구 삼양로139길 49"
## .. ..$ building_name : chr "우이동 주민센터, 환경미화원후생관"
## .. ..$ main_building_no : chr "49"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "강북구"
## .. ..$ region_3depth_name: chr "수유동"
## .. ..$ road_name : chr "삼양로139길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.011869707413"
## .. ..$ y : chr "37.6479342499954"
## .. ..$ zone_no : chr "01011"
## ..$ x : chr "127.011869707413"
## ..$ y : chr "37.6479342499954"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EB%8F%84%EB%B4%89%EA%B5%AC%20%EC%8B%9C%EB%A3%A8%EB%B4%89%EB%A1%9C2%EA%B8%B8%2034%20%EC%8C%8D%EB%AC%B8%EB%8F%99%EC%B2%AD%EC%86%8C%EB%85%84%EB%AC%B8%ED%99%94%EC%9D%98%EC%A7%91]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 929 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 도봉구 쌍문동 산 80-1"
## .. ..$ b_code : chr "1132010500"
## .. ..$ h_code : chr "1132068100"
## .. ..$ main_address_no : chr "80"
## .. ..$ mountain_yn : chr "Y"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "도봉구"
## .. ..$ region_3depth_h_name: chr "쌍문4동"
## .. ..$ region_3depth_name : chr "쌍문동"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "127.029080065774"
## .. ..$ y : chr "37.6542176014875"
## ..$ address_name: chr "서울 도봉구 시루봉로2길 34"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 도봉구 시루봉로2길 34"
## .. ..$ building_name : chr "쌍문동 청소년문화의집"
## .. ..$ main_building_no : chr "34"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "도봉구"
## .. ..$ region_3depth_name: chr "쌍문동"
## .. ..$ road_name : chr "시루봉로2길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.029080065774"
## .. ..$ y : chr "37.6542176014875"
## .. ..$ zone_no : chr "01435"
## ..$ x : chr "127.029080065774"
## ..$ y : chr "37.6542176014875"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EB%85%B8%EC%9B%90%EA%B5%AC%20%EC%83%81%EA%B3%84%EB%A1%9C%20118%20%EC%83%81%EA%B3%842%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0%20%2823%EA%B8%B8%2017%20%EB%85%B8%EC%9B%90%EA%B5%AC%20%EC%9B%90%ED%84%B0%ED%96%89%EB%B3%B5%EB%B0%9C%EC%A0%84%EC%86%8C%29]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 900 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 노원구 상계동 385-1"
## .. ..$ b_code : chr "1135010500"
## .. ..$ h_code : chr "1135064000"
## .. ..$ main_address_no : chr "385"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "노원구"
## .. ..$ region_3depth_h_name: chr "상계2동"
## .. ..$ region_3depth_name : chr "상계동"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "127.067864123732"
## .. ..$ y : chr "37.6574831321849"
## ..$ address_name: chr "서울 노원구 상계로 118"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 노원구 상계로 118"
## .. ..$ building_name : chr "상계2동주민센터"
## .. ..$ main_building_no : chr "118"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "노원구"
## .. ..$ region_3depth_name: chr "상계동"
## .. ..$ road_name : chr "상계로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.067864123732"
## .. ..$ y : chr "37.6574831321849"
## .. ..$ zone_no : chr "01696"
## ..$ x : chr "127.067864123732"
## ..$ y : chr "37.6574831321849"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%96%91%EC%B2%9C%EA%B5%AC%20%EC%A4%91%EC%95%99%EB%A1%9C52%EA%B8%B8%2056%20%EC%8B%A0%EC%A0%954%EB%8F%99%20%EB%AC%B8%ED%99%94%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 905 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 양천구 신정동 915-2"
## .. ..$ b_code : chr "1147010100"
## .. ..$ h_code : chr "1147065000"
## .. ..$ main_address_no : chr "915"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "양천구"
## .. ..$ region_3depth_h_name: chr "신정4동"
## .. ..$ region_3depth_name : chr "신정동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "126.856602131412"
## .. ..$ y : chr "37.5259751797829"
## ..$ address_name: chr "서울 양천구 중앙로52길 56"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 양천구 중앙로52길 56"
## .. ..$ building_name : chr "개울도서관"
## .. ..$ main_building_no : chr "56"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "양천구"
## .. ..$ region_3depth_name: chr "신정동"
## .. ..$ road_name : chr "중앙로52길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.856602131412"
## .. ..$ y : chr "37.5259751797829"
## .. ..$ zone_no : chr "07944"
## ..$ x : chr "126.856602131412"
## ..$ y : chr "37.5259751797829"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EA%B0%95%EC%84%9C%EA%B5%AC%20%EA%B0%95%EC%84%9C%EB%A1%9C%2045%20%EB%8B%A4%EA%B8%B8%2071%20%ED%99%94%EA%B3%A13%EB%8F%99%20%ED%91%B8%EB%A5%B8%EB%93%A4%EC%B2%AD%EC%86%8C%EB%85%84%EB%8F%84%EC%84%9C%EA%B4%80]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 946 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강서구 화곡동 1019"
## .. ..$ b_code : chr "1150010300"
## .. ..$ h_code : chr "1150056000"
## .. ..$ main_address_no : chr "1019"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "강서구"
## .. ..$ region_3depth_h_name: chr "화곡3동"
## .. ..$ region_3depth_name : chr "화곡동"
## .. ..$ sub_address_no : chr ""
## .. ..$ x : chr "126.835179100171"
## .. ..$ y : chr "37.5446697303679"
## ..$ address_name: chr "서울 강서구 강서로45다길 71"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강서구 강서로45다길 71"
## .. ..$ building_name : chr "화곡3동청소년도서,화곡3동치안센터"
## .. ..$ main_building_no : chr "71"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "강서구"
## .. ..$ region_3depth_name: chr "화곡동"
## .. ..$ road_name : chr "강서로45다길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.835179100171"
## .. ..$ y : chr "37.5446697303679"
## .. ..$ zone_no : chr "07709"
## ..$ x : chr "126.835179100171"
## ..$ y : chr "37.5446697303679"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EA%B5%AC%EB%A1%9C%EA%B5%AC%20%EA%B0%80%EB%A7%88%EC%82%B0%EB%A1%9C%2027%EA%B8%B8%2045%20%EA%B5%AC%EB%A1%9C%EA%B3%A0%EB%93%B1%ED%95%99%EA%B5%90]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 917 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 구로구 구로동 105-1"
## .. ..$ b_code : chr "1153010200"
## .. ..$ h_code : chr "1153056000"
## .. ..$ main_address_no : chr "105"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "구로구"
## .. ..$ region_3depth_h_name: chr "구로5동"
## .. ..$ region_3depth_name : chr "구로동"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "126.890309191986"
## .. ..$ y : chr "37.4988400846064"
## ..$ address_name: chr "서울 구로구 가마산로27길 45"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 구로구 가마산로27길 45"
## .. ..$ building_name : chr "구로고등학교"
## .. ..$ main_building_no : chr "45"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "구로구"
## .. ..$ region_3depth_name: chr "구로동"
## .. ..$ road_name : chr "가마산로27길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.890309191986"
## .. ..$ y : chr "37.4988400846064"
## .. ..$ zone_no : chr "08299"
## ..$ x : chr "126.890309191986"
## ..$ y : chr "37.4988400846064"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%ED%8A%B9%EB%B3%84%EC%8B%9C%20%EA%B8%88%EC%B2%9C%EA%B5%AC%20%EA%B8%88%ED%95%98%EB%A1%9C24%EA%B8%B8%206]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 884 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 금천구 시흥동 910-5"
## .. ..$ b_code : chr "1154510300"
## .. ..$ h_code : chr "1154571000"
## .. ..$ main_address_no : chr "910"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "금천구"
## .. ..$ region_3depth_h_name: chr "시흥5동"
## .. ..$ region_3depth_name : chr "시흥동"
## .. ..$ sub_address_no : chr "5"
## .. ..$ x : chr "126.908341459055"
## .. ..$ y : chr "37.450734597329"
## ..$ address_name: chr "서울 금천구 금하로24길 6"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 금천구 금하로24길 6"
## .. ..$ building_name : chr ""
## .. ..$ main_building_no : chr "6"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "금천구"
## .. ..$ region_3depth_name: chr "시흥동"
## .. ..$ road_name : chr "금하로24길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.908341459055"
## .. ..$ y : chr "37.450734597329"
## .. ..$ zone_no : chr "08643"
## ..$ x : chr "126.908341459055"
## ..$ y : chr "37.450734597329"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%ED%8A%B9%EB%B3%84%EC%8B%9C%20%EC%98%81%EB%93%B1%ED%8F%AC%EA%B5%AC%20%EB%8B%B9%EC%82%B0%EB%A1%9C%20123%20%EC%98%81%EB%93%B1%ED%8F%AC%EA%B5%AC%EC%B2%AD%20%28%EB%8B%B9%EC%82%B0%EB%8F%993%EA%B0%80%29]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 917 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 영등포구 당산동3가 385-1"
## .. ..$ b_code : chr "1156011300"
## .. ..$ h_code : chr "1156055000"
## .. ..$ main_address_no : chr "385"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "영등포구"
## .. ..$ region_3depth_h_name: chr "당산1동"
## .. ..$ region_3depth_name : chr "당산동3가"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "126.896367130558"
## .. ..$ y : chr "37.525963157053"
## ..$ address_name: chr "서울 영등포구 당산로 123"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 영등포구 당산로 123"
## .. ..$ building_name : chr "영등포구청"
## .. ..$ main_building_no : chr "123"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "영등포구"
## .. ..$ region_3depth_name: chr "당산동3가"
## .. ..$ road_name : chr "당산로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.896367130558"
## .. ..$ y : chr "37.525963157053"
## .. ..$ zone_no : chr "07260"
## ..$ x : chr "126.896367130558"
## ..$ y : chr "37.525963157053"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EB%8F%99%EC%9E%91%EA%B5%AC%20%EC%82%AC%EB%8B%B9%EB%A1%9C16%EC%95%84%EA%B8%B8%206%20%EC%82%AC%EB%8B%B94%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 919 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 동작구 사당동 300-8"
## .. ..$ b_code : chr "1159010700"
## .. ..$ h_code : chr "1159065000"
## .. ..$ main_address_no : chr "300"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "동작구"
## .. ..$ region_3depth_h_name: chr "사당4동"
## .. ..$ region_3depth_name : chr "사당동"
## .. ..$ sub_address_no : chr "8"
## .. ..$ x : chr "126.971633687906"
## .. ..$ y : chr "37.4809757528847"
## ..$ address_name: chr "서울 동작구 사당로16아길 6"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 동작구 사당로16아길 6"
## .. ..$ building_name : chr "사당4동 주민센터"
## .. ..$ main_building_no : chr "6"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "동작구"
## .. ..$ region_3depth_name: chr "사당동"
## .. ..$ road_name : chr "사당로16아길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.971633687906"
## .. ..$ y : chr "37.4809757528847"
## .. ..$ zone_no : chr "07018"
## ..$ x : chr "126.971633687906"
## ..$ y : chr "37.4809757528847"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EA%B4%80%EC%95%85%EA%B5%AC%20%EC%8B%A0%EB%A6%BC%EB%8F%99%EA%B8%B8%2014%20%EC%8B%A0%EB%A6%BC%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 906 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 관악구 신림동 1439-3"
## .. ..$ b_code : chr "1162010200"
## .. ..$ h_code : chr "1162069500"
## .. ..$ main_address_no : chr "1439"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "관악구"
## .. ..$ region_3depth_h_name: chr "신림동"
## .. ..$ region_3depth_name : chr "신림동"
## .. ..$ sub_address_no : chr "3"
## .. ..$ x : chr "126.927113892829"
## .. ..$ y : chr "37.4873960036367"
## ..$ address_name: chr "서울 관악구 신림동길 14"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 관악구 신림동길 14"
## .. ..$ building_name : chr "신림동주민센터"
## .. ..$ main_building_no : chr "14"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "관악구"
## .. ..$ region_3depth_name: chr "신림동"
## .. ..$ road_name : chr "신림동길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.927113892829"
## .. ..$ y : chr "37.4873960036367"
## .. ..$ zone_no : chr "08707"
## ..$ x : chr "126.927113892829"
## ..$ y : chr "37.4873960036367"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%84%9C%EC%B4%88%EA%B5%AC%20%EC%8B%A0%EB%B0%98%ED%8F%AC%EB%A1%9C15%EA%B8%B8%2016%20%EB%B0%98%ED%8F%AC%202%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 919 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 서초구 반포동 4-15"
## .. ..$ b_code : chr "1165010700"
## .. ..$ h_code : chr "1165057000"
## .. ..$ main_address_no : chr "4"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "서초구"
## .. ..$ region_3depth_h_name: chr "반포2동"
## .. ..$ region_3depth_name : chr "반포동"
## .. ..$ sub_address_no : chr "15"
## .. ..$ x : chr "126.994471501866"
## .. ..$ y : chr "37.5045865893249"
## ..$ address_name: chr "서울 서초구 신반포로15길 16"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 서초구 신반포로15길 16"
## .. ..$ building_name : chr "반포2동주민센터"
## .. ..$ main_building_no : chr "16"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "서초구"
## .. ..$ region_3depth_name: chr "반포동"
## .. ..$ road_name : chr "신반포로15길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "126.994471501866"
## .. ..$ y : chr "37.5045865893249"
## .. ..$ zone_no : chr "06504"
## ..$ x : chr "126.994471501866"
## ..$ y : chr "37.5045865893249"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EA%B0%95%EB%82%A8%EA%B5%AC%20%ED%95%99%EB%8F%99%EB%A1%9C%20426%20%EA%B0%95%EB%82%A8%EA%B5%AC%EC%B2%AD%20%EB%B3%84%EA%B4%80%201%EB%8F%99]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 888 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강남구 삼성동 16-1"
## .. ..$ b_code : chr "1168010500"
## .. ..$ h_code : chr "1168059000"
## .. ..$ main_address_no : chr "16"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "강남구"
## .. ..$ region_3depth_h_name: chr "삼성2동"
## .. ..$ region_3depth_name : chr "삼성동"
## .. ..$ sub_address_no : chr "1"
## .. ..$ x : chr "127.047059839521"
## .. ..$ y : chr "37.5179681611717"
## ..$ address_name: chr "서울 강남구 학동로 426"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강남구 학동로 426"
## .. ..$ building_name : chr "강남구청"
## .. ..$ main_building_no : chr "426"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "강남구"
## .. ..$ region_3depth_name: chr "삼성동"
## .. ..$ road_name : chr "학동로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.047059839521"
## .. ..$ y : chr "37.5179681611717"
## .. ..$ zone_no : chr "06090"
## ..$ x : chr "127.047059839521"
## ..$ y : chr "37.5179681611717"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EC%86%A1%ED%8C%8C%EA%B5%AC%20%EB%B0%B1%EC%A0%9C%EA%B3%A0%EB%B6%84%EB%A1%9C%20236%20%EC%82%BC%EC%A0%84%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0%20%28%EC%82%BC%EC%A0%84%EB%8F%99%29]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 902 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 송파구 삼전동 62"
## .. ..$ b_code : chr "1171010600"
## .. ..$ h_code : chr "1171061000"
## .. ..$ main_address_no : chr "62"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "송파구"
## .. ..$ region_3depth_h_name: chr "삼전동"
## .. ..$ region_3depth_name : chr "삼전동"
## .. ..$ sub_address_no : chr ""
## .. ..$ x : chr "127.092523102"
## .. ..$ y : chr "37.5027249577567"
## ..$ address_name: chr "서울 송파구 백제고분로 236"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 송파구 백제고분로 236"
## .. ..$ building_name : chr "삼전동주민센터"
## .. ..$ main_building_no : chr "236"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "송파구"
## .. ..$ region_3depth_name: chr "삼전동"
## .. ..$ road_name : chr "백제고분로"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.092523102"
## .. ..$ y : chr "37.5027249577567"
## .. ..$ zone_no : chr "05584"
## ..$ x : chr "127.092523102"
## ..$ y : chr "37.5027249577567"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1
## Response [https://dapi.kakao.com/v2/local/search/address.json?query=%EC%84%9C%EC%9A%B8%20%EA%B0%95%EB%8F%99%EA%B5%AC%20%EA%B5%AC%EC%B2%9C%EB%A9%B4%EB%A1%9C%2042%EA%B8%B8%2059%20%EC%B2%9C%ED%98%B81%EB%8F%99%20%EC%A3%BC%EB%AF%BC%EC%84%BC%ED%84%B0]
## Date: 2023-06-01 08:27
## Status: 200
## Content-Type: application/json;charset=UTF-8
## Size: 934 B
##
## List of 2
## $ documents:'data.frame': 1 obs. of 6 variables:
## ..$ address :'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강동구 천호동 76-2"
## .. ..$ b_code : chr "1174010900"
## .. ..$ h_code : chr "1174060000"
## .. ..$ main_address_no : chr "76"
## .. ..$ mountain_yn : chr "N"
## .. ..$ region_1depth_name : chr "서울"
## .. ..$ region_2depth_name : chr "강동구"
## .. ..$ region_3depth_h_name: chr "천호1동"
## .. ..$ region_3depth_name : chr "천호동"
## .. ..$ sub_address_no : chr "2"
## .. ..$ x : chr "127.13679935135"
## .. ..$ y : chr "37.5450208674213"
## ..$ address_name: chr "서울 강동구 구천면로42길 59"
## ..$ address_type: chr "ROAD_ADDR"
## ..$ road_address:'data.frame': 1 obs. of 12 variables:
## .. ..$ address_name : chr "서울 강동구 구천면로42길 59"
## .. ..$ building_name : chr "천호1파출소, 천호1동주민센터"
## .. ..$ main_building_no : chr "59"
## .. ..$ region_1depth_name: chr "서울"
## .. ..$ region_2depth_name: chr "강동구"
## .. ..$ region_3depth_name: chr "천호동"
## .. ..$ road_name : chr "구천면로42길"
## .. ..$ sub_building_no : chr ""
## .. ..$ underground_yn : chr "N"
## .. ..$ x : chr "127.13679935135"
## .. ..$ y : chr "37.5450208674213"
## .. ..$ zone_no : chr "05312"
## ..$ x : chr "127.13679935135"
## ..$ y : chr "37.5450208674213"
## $ meta :List of 3
## ..$ is_end : logi TRUE
## ..$ pageable_count: int 1
## ..$ total_count : int 1Making integrated database; combine SAQM with measured air pollution data for the peak period of yellow dust from April 10 to 16, 2023
air.quality<-"TimeAverageAirQuality"
date<-c(20230410:20230416)
hour<-c(00:23)
hour<-sprintf("%02d",hour)
MSRDT<-expand.grid(date,hour)
MSRDT<-paste0(MSRDT$Var1,MSRDT$Var2)
measure<-data.frame()
for(i in 1:length(MSRDT)){
url<-paste(seoul.api,seoul.api.key,type,
air.quality,startindex,endindex,MSRDT[[i]],sep="/")
doc<-xmlToDataFrame(url)
measure = rbind(measure,doc)
}
tbl.measure<-measure[-(1:2),]
tbl.measure<-tbl.measure %>% dplyr::select(c(-1,-2,-3))
tbl.measure<-na.omit(tbl.measure)
require(lubridate)## Loading required package: lubridate##
## Attaching package: 'lubridate'## The following objects are masked from 'package:base':
##
## date, intersect, setdiff, uniontbl.measure$date<-lubridate::ymd(substr(tbl.measure$MSRDT,1,8))
tbl.measure$time<-substr(tbl.measure$MSRDT,9,10)
tbl.measure$date.time<-paste0(tbl.measure$date," ",tbl.measure$time,":00:01")
tbl.measure$date.time<-lubridate::ymd_hms(tbl.measure$date.time)
tbl.measure$time<-as.numeric(tbl.measure$time)Tracking changes in Particulate Matter (PM 2.5, 10) levels over time
seoul.aqms.with.data<-left_join(seoul.gungu,tbl.measure,
by=c("SIG_KOR_NM"="MSRSTE_NM"))## Warning in sf_column %in% names(g): Each row in `x` is expected to match at most 1 row in `y`.
## ℹ Row 1 of `x` matches multiple rows.
## ℹ If multiple matches are expected, set `multiple = "all"` to silence this
## warning.seoul.aqms.with.data<-seoul.aqms.with.data[
order(seoul.aqms.with.data$SIG_CD,seoul.aqms.with.data$date,
seoul.aqms.with.data$time),]
require(ggplot2)## Loading required package: ggplot2require(ggplot2)
require(showtext)## Loading required package: showtext## Loading required package: sysfonts## Loading required package: showtextdbrequire(ggrepel)## Loading required package: ggrepelrequire(geofacet)## Loading required package: geofacet## Warning: package 'geofacet' was built under R version 4.2.3require(directlabels)## Loading required package: directlabels## Warning: package 'directlabels' was built under R version 4.2.3seoul.aqms.with.data$PM10<-as.numeric(seoul.aqms.with.data$PM10)
plot.pm10<-ggplot(data=seoul.aqms.with.data,
aes(x=time,y=PM10,group=SIG_ENG_NM))+
geom_line(linewidth=0.5,alpha=0.5,show.legend =FALSE,aes(colour=SIG_ENG_NM))+
geom_point(size=0.01,show.legend=FALSE,aes(colour=SIG_ENG_NM))+
geom_smooth(colour="gray80",method="loess",span=0.2,linewidth=0.8,se=TRUE,show.legend=FALSE,alpha=.8)+
facet_wrap(~SIG_ENG_NM,ncol=6,nrow=5)+
geom_hline(yintercept=81, linetype='dashed', color='red', size=0.5)+
geom_hline(yintercept=151, linetype='dashed', color='red', size=0.5)+
labs(x="from April 10 to 16, 2023",y="PM10 (ppb)",
colour=NULL)+
theme_minimal()## Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
## ℹ Please use `linewidth` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.plot.pm10## `geom_smooth()` using formula = 'y ~ x'## Warning: Removed 36 rows containing non-finite values (`stat_smooth()`).## Warning: Removed 36 rows containing missing values (`geom_point()`).
seoul.aqms.with.data$PM25<-as.numeric(seoul.aqms.with.data$PM25)
plot.pm25<-ggplot(data=seoul.aqms.with.data,
aes(x=time,y=PM25,group=SIG_ENG_NM))+
geom_line(linewidth=0.5,alpha=0.5,show.legend =FALSE,aes(colour=SIG_ENG_NM))+
geom_point(size=0.01,show.legend=FALSE,aes(colour=SIG_ENG_NM))+
geom_smooth(colour="gray80",method="loess",span=0.2,linewidth=0.8,se=TRUE,show.legend=FALSE,alpha=.8)+
facet_wrap(~SIG_ENG_NM,ncol=6,nrow=5)+
geom_hline(yintercept=36, linetype='dashed', color="navy blue", size=0.5)+
geom_hline(yintercept=76, linetype='dashed', color="navy blue", size=0.5)+
labs(x="from April 10 to 16, 2023",y="PM2.5 (ppb)",
colour=NULL)+
theme_minimal()
plot.pm25## `geom_smooth()` using formula = 'y ~ x'## Warning: Removed 42 rows containing non-finite values (`stat_smooth()`).## Warning: Removed 2 rows containing missing values (`geom_line()`).## Warning: Removed 42 rows containing missing values (`geom_point()`).