2

单击另一个弹出窗口时如何保持打开状态？

当我单击标记时，下面的 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，但默认情况下它们都是可见的。如果可以改变它会很好（不确定如何）。

4

1 回答 1

1

正在为同样的事情苦苦挣扎，最后这对我有用：

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))
  )
于 2020-11-16T14:01:54.517 回答