leaflet과 R로 AED의 위치를 ​​플롯 해보십시오.

6233 단어 Rleaflet

소개



leaflet이란?
-> 실수로 map 그리기를위한 js 라이브러리

※kazutan씨의 기사를 알기 쉽습니다. (둥근 던지기)
htps : // rpbs. 코 m / 카즈 탄 / ぇ f t_s ぃ

어쨌든 해보자!



라이브러리 설치 및 동작 확인


install.packages("leaflet")
library(leaflet)
#豊島区を中央として地図描画
leaflet() %>% 
     addTiles() %>% 
     setView(lng=139.715405,lat=35.732459,zoom=14)



도시마구의 AED 위치 가져오기 및 플롯



LinkData의 도시마구 AED 설치 장소
1-12 줄을 지우고 탭을 쉼표로 바꾸고 가져옵니다.
aed <- read.csv("AED_list_toshima.csv",header=F)
part_aed <- aed[c(2,3,4,13,14)]
#列名を変更する
colnames(part_aed) <- c("name","address","place","lat","lng")
#leafletにピンをプロットする
leaflet(part_aed) %>% addTiles() %>% addMarkers(lng=~lng,lat=~lat)

할 수 있었습니다. 너무 쉽습니다.


팝업을 맞추기


leaflet(part_aed) %>%
  addTiles() %>%
  addMarkers(lng=~lng,lat=~lat) %>%
  addPopups(lng=~lng,lat=~lat,popup=~name)



물론 줌도 OK!


도움이 필요할 때 도움말



leaflet 공식 문서 그렇지만 OK입니다만,
기본적으로 r에 내장 된 도움말로 좋다고 생각합니다.
help(leaflet)
help(addPopups)
help(popupOptions)
#とかとか・・

이상! !

좋은 웹페이지 즐겨찾기