rMapsのleafletだとRPubsにアップするときうまくいかなかったので、htmlwidgetsを使ったleafletパッケージを使った方が良いかも。

なお、chunkにオプションはつけていない。

install_github("rstudio/leaflet")
library(leaflet)
set.seed(123)
m = leaflet() %>% addTiles()
rand_lng = function(n = 10) rnorm(n, -93.65, .01)
rand_lat = function(n = 10) rnorm(n, 42.0285, .01)

# circles (units in metres)
m %>% addCircles(rand_lng(50), rand_lat(50), radius = runif(50, 10, 200))