如何更改MapView的主数据

Question

我试图使用observeEvent()将Mapview的x参数更改为新数据。我通常只使用clearShapes()，然后使用addPolygons()，但是需要zcol等参数。

我想做以下类似的事情：

server <- function(input, output) {
  output$DisplayMap <- renderLeaflet(
    mapview(first_data, zcol = coolCol, color = brewer.pal(12, "Set3") %>%
      addControl(actionButton("Next", ">"), position = "topright")
  )
  observeEvent(input$Next, {
    output$DisplayMap$x <- next_data  # This doesn't work
  })
}

我意识到有两个问题在起作用(一个改变变量的接口和一个这样做的方法)，其中一个可能需要以某种形式做出反应

Answer 1

我认为不可能像这样修改输出(但实际上，使用MRE会更容易)。

你应该想想这样的事情：

server <- function(input, output) {

  my_data <- reactiveVal(data.frame(a = 1, b = 2))

  output$DisplayMap <- renderLeaflet(
    mapview(my_data()[[input$Next]], zcol = coolCol, color = brewer.pal(12, "Set3") %>%
      addControl(actionButton("Next", ">"), position = "topright")
  )
}

假设input$Next是用户可以在GUI中选择的列名。这只是给你看个主意。如果您还需要帮助，请发送MRE，我可以编辑这个答案。