在传单包中使用popupOptions()

时间:2015-03-25 16:02:54

标签: r leaflet

我正在关注Robin Lovelace博客上的传单教程 (http://robinlovelace.net/r/2015/02/01/leaflet-r-package.html)。 我的代码工作正常:

# Install leaflet package
if(!require(leaflet)) install_github("rstudio/leaflet")

# Plot a default web map (brackets display the result)
m <- leaflet() %>% addTiles(m,urlTemplate = "http://{s}.basemaps.cartocdn.com/light_all/{z}/{x}/{y}.png")

m %>% setView(lng = -1.5, lat = 53.4, zoom = 10) # set centre and extent of map

m2 <- m %>%
   setView(-1.5, 53.4, 10) %>% # map location
   addMarkers(-1.4, 53.5) %>% # add a marker
   addPopups(-1.6, 53.3, popup = "Hello Sheffield!",options=list(closeButton=FALSE))
m2

但addPopups的选项包含在addPopup位中。我如何使用popupOptions()命令?

我以为会是这样的:

# Plot a default web map (brackets display the result)
m <- leaflet() %>% addTiles(m,urlTemplate = "http://{s}.basemaps.cartocdn.com/light_all/{z}/{x}/{y}.png")

m %>% setView(lng = -1.5, lat = 53.4, zoom = 10) # set centre and extent of map

m2 <- m %>%
   setView(-1.5, 53.4, 10) %>% # map location
   addMarkers(-1.4, 53.5) %>% # add a marker
   addPopups(-1.6, 53.3, popup = "Hello Sheffield!") %>%
  popupOptions(closeButton=FALSE) ##NEW BIT
m2

但是地图中没有使用popupOptions(x框就在那里)。

我做错了什么?

干杯

1 个答案:

答案 0 :(得分:2)

只需使用popupOptions创建一个选项列表,然后进入options arg。它用默认值填充所有其他的:

leaflet() %>% addTiles() %>%
  addPopups(-1.6, 53.5,popup="Hello Sheffield",options=popupOptions(closeButton=FALSE))

如果您只是输入popupOptions(closeButton=FALSE),您会在示例中看到传递给options=的大清单。