-
카테고리
-
세부 분야
데이터 수집 · 처리
-
해결 여부
미해결
최종 코드 입니다.
21.06.26 01:04 작성 조회수 96
0
# 인코딩 변환 안해줘도 됩니다.
search_loc <- function(keyword) {
keyword2<-URLencode(keyword)
url <-paste0("https://map.naver.com/v5/api/instantSearch?lang=ko&caller=pcweb&types=place,address,bus&coords=37.5499346,126.9145229&query=",keyword2)
b<-readLines(url, encoding = "UTF-8")
b
library(RJSONIO)
b2<-fromJSON(b)
c(b2$place[[1]]$title, b2$place[[1]]$x, b2$place[[1]]$y)
}
search_loc("서울역")
답변을 작성해보세요.
답변 0