2016-10-04 77 views

回答

0

你不能改變正常標記的顏色 - 到目前爲止我知道。你可以做的是用圓:

library(leaflet) 

m <- leaflet() %>% 
    addTiles() %>% # Add default OpenStreetMap map tiles 
    setView(13, 42, zoom = 4) %>% 
    addCircles(c(13,0,10), c(42,40,45), radius = c(50000, 1, 100000), color=c("red", "orange", "blue")) 
m # Print the map 

或創建自己的標記,這個函數是這樣的:

Rlogo = file.path(R.home('doc'), 'html', 'logo.jpg') 
m <- leaflet() %>% 
    addTiles() %>% # Add default OpenStreetMap map tiles 
    setView(13, 42, zoom = 4) %>% 
    addMarkers(
    5, 47, icon = list(
     iconUrl = Rlogo, iconSize = c(100, 76)/2 
    ) 
) 
m