%>%
例如, 使用 Pipe:
packs <- c("leaflet", "magrittr")
for (i in 1:length(packs)){
install.packages(packs[i])
}
sapply(packs, library, character.only=T)
helloMap <- leaflet() %>%
addTiles() %>% #把預設的地圖圖層加入
addMarkers(lng=121.539366, lat=25.017326, popup="National Taiwan University")
helloMap
不使用 Pipe
# 如果你不習慣使用pipe run %>%
helloMap <- addMarkers(addTiles(leaflet()), lng=121.539366, lat=25.017326, popup="National Taiwan University")
helloMap
沒有留言:
張貼留言