R - 地图视图和闪亮:如何以交互方式更改调色板

Question

我想使用mapview包 - 它非常快 - 在闪亮。 为了渲染mapview对象，@map技巧就像一个魅力。

然而，与ggplot2相反，使mapview_leaflet对象成为响应式对象是相当复杂的。在我的闪亮应用程序中，我想使调色板具有交互性。这可能吗？

library(mapview)
library(shiny)
server <- function(input, output) {
output$test <- renderLeaflet({
req(input$obs)
rws <- input$obs
mapview(breweries91[1:rws,])@map
})
}
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
sliderInput("obs", "Number of observations:", min = 1, max = nrow(breweries91@data), value = nrow(breweries91@data))
),
mainPanel(
leafletOutput('test')
)
)
)
shinyApp(ui = ui, server = server)

Answer 1

我可以确认，通过使输入数据以及 mapview 对象响应式，mapview 和闪亮就像一个魅力一样与 @map hack。结合传单-易打印插件，它是创建和导出地图的非常有用的工具。