传单闪亮 r 中的动态彩色多边形答案

【问题标题】：dynamic colored polygons in leaflet shiny r传单闪亮 r 中的动态彩色多边形
【发布时间】：2016-09-17 02:41:59
【问题描述】：

我正在尝试创建一个 r 闪亮的传单应用程序，它可以根据用户输入动态地为具有 pal 光谱的阴影多边形着色。请注意，我不只是为多边形着色，我还想使用颜色范围来说明变量中的一系列值。（因此需要pal谱）

下面的代码可以正常工作 - 但 pal 和 fillColor 输入在这里不是动态的。

output$mymap <- renderLeaflet({
map <- readShapeSpatial(paste(input$state,"Zip.shp",sep=""))

pal <- colorNumeric(
 palette = "YlGnBu",
 domain = map$college)

leaflet() %>%
addProviderTiles("CartoDB.Positron") %>%
addPolygons(data=map,
         fillColor=~pal(college),
fillOpacity = 0.7, 
 weight = 1, 
smoothFactor = 0.2)
 })}

但是下面的版本失败了。它创建了一个“没有将这个 S4 类强制为向量的方法”错误。为什么会出现这个错误，我该如何解决这个问题？

失败的代码：

 output$mymap <- renderLeaflet({

 map <- readShapeSpatial(paste(input$state,"Zip.shp",sep=""))

 pal <- colorNumeric(
  palette = "YlGnBu",
  domain = paste(map,"input$fill",sep=""))

leaflet() %>%
  addProviderTiles("CartoDB.Positron") %>%
  addPolygons(data=map,
              fillColor=~pal(input$fill),
              fillOpacity = 0.7, 
              weight = 1, 
              smoothFactor = 0.2)

为什么我不能使用 input$fill 的动态闪亮输入来设置多边形的 pal 光谱和 fillColor？任何可能的解决方法？

感谢您的帮助！

【问题讨论】：

你至少应该告诉我们什么是input$fill
input$fill 是不同的变量名称，例如“college”、“income”、“population”，它们指的是通过 r 中的 geo_join 函数与 shapefile 地图共同连接的数据集，使用tigris 包。
请注意，父地图对象是一个 ShapeSatial 文件 - 但 input$fill 的选项类（例如 map$college、map$population 等）是整数。

标签： r shiny leaflet

【解决方案1】：

我认为您的案件可以通过this suggestion 解决。因此你应该使用fillColor = ~pal()(input$fill)。

【讨论】：

如果您有新问题，请点击按钮提出问题。如果有助于提供上下文，请包含指向此问题的链接。 - From Review
好的。相应地编辑了答案。