点击另一张弹出窗口时弹出窗口如何保持打开状态?
点击标记时,下面的MWE显示弹出窗口。好。但是当我点击第二个标记时,我不希望第一个弹出窗口消失。它应该只在单击关闭[x]时消失。在点击标记之前,不应该看到弹出窗口。
library(leaflet)
the.points <- data.frame(latitude=c(63.136353,63.132935,63.128051),
longitude=c(21.928023,21.962601,21.893444),
text=c("One point", "A second point", "The third point"))
p <- leaflet(the.points)
p <- addTiles(p)
p <- addMarkers(p, lng=~longitude, lat=~latitude, popup=~text)
p
我也尝试使用addPopups,但默认情况下它们都是可见的。如果可以改变它会很好(不确定如何)。
答案 0 :(得分:0)
在同一个东西上挣扎,最终这对我有用:
leaflet() %>% addTiles() %>%
addMarkers(
lng = -118.456554, lat = 34.085,
popup = "One popup",
popupOptions = popupOptions(autoClose = FALSE, closeOnClick = FALSE)) %>%
addMarkers(
lng = -118.456554, lat = 34.065,
popup = "Another popup",
popupOptions = popupOptions(autoClose = FALSE, closeOnClick = FALSE))
)