library(leaflet)
使用function重複執行，標示出三家店的所在位置
m <- function(x,y,z){ w <- addMarkers(addTiles(leaflet()),lng=x, lat=y, popup=z) return(w) } m (c(120.217964,120.217990,120.217995), c(22.994571,22.994828,22.995790), c("Subway","Louisa Coffee","cama cafe"))