R 在传单包中使用popupOptions()
我正在关注罗宾·洛夫莱斯博客上的传单教程 (). 我下面的代码工作正常:R 在传单包中使用popupOptions(),r,leaflet,R,Leaflet,我正在关注罗宾·洛夫莱斯博客上的传单教程 (). 我下面的代码工作正常: # 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.cart
# 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
#安装传单包
如果(!需要(传单))安装github(“rstudio/传单”)
#打印默认web地图(括号显示结果)
m%addTiles(m,urlTemplate=“http://{s}.basemaps.cartocdn.com/light_all/{z}/{x}/{y}.png”)
m%>%setView(lng=-1.5,纬度=53.4,缩放=10)#设置地图的中心和范围
m2%
setView(-1.5,53.4,10)%>%#地图位置
添加标记(-1.4,53.5)%>%#添加标记
addPopups(-1.6,53.3,popup=“Hello Sheffield!”,options=list(closeButton=FALSE))
平方米
但是addPopup的选项包含在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
#绘制默认网络地图(括号显示结果)
m%addTiles(m,urlTemplate=“http://{s}.basemaps.cartocdn.com/light_all/{z}/{x}/{y}.png”)
m%>%setView(lng=-1.5,纬度=53.4,缩放=10)#设置地图的中心和范围
m2%
setView(-1.5,53.4,10)%>%#地图位置
添加标记(-1.4,53.5)%>%#添加标记
添加弹出窗口(-1.6,53.3,popup=“Hello Sheffield!”)%>%
popupOptions(closeButton=FALSE)##新位
平方米
但是地图中没有使用popupOptions(x框在那里)
我做错了什么
干杯只需使用
弹出选项
创建选项列表,然后进入选项
参数。它用默认值填充所有其他值:
leaflet() %>% addTiles() %>%
addPopups(-1.6, 53.5,popup="Hello Sheffield",options=popupOptions(closeButton=FALSE))
如果您只需键入popupOptions(closeButton=FALSE)
您将在示例中看到传递给options=
的大列表