单张上的热图颜色为R

单张上的热图颜色为R,r,shiny,leaflet,R,Shiny,Leaflet,我已经在一座城市的顶部绘制了一张热图,我想根据密度将其颜色从红色改为绿色。如果我将颜色保留为“红色”或“蓝色”,它将创建该颜色的色阶。然而,我似乎不知道如何从绿色变为红色 我已经尝试了我在这里所拥有的和一个调色板选项,似乎没有得到任何进展。当前的显示为黑色 有人知道如何让这些颜色显示出来吗 leaflet() %>% addProviderTiles("OpenStreetMap.BlackAndWhite", options = providerTileOpti

我已经在一座城市的顶部绘制了一张热图,我想根据密度将其颜色从红色改为绿色。如果我将颜色保留为“红色”或“蓝色”,它将创建该颜色的色阶。然而,我似乎不知道如何从绿色变为红色

我已经尝试了我在这里所拥有的和一个调色板选项,似乎没有得到任何进展。当前的显示为黑色

有人知道如何让这些颜色显示出来吗

leaflet() %>%
    addProviderTiles("OpenStreetMap.BlackAndWhite",
         options = providerTileOptions(noWrap = TRUE,minZoom=9)) %>%
    addPolygons(data=polys_dat,color= ~rainbow(n=50,start=0,end=.3), stroke = FALSE) %>%
    setMaxBounds(-0.715485, 51.252031, 0.514984, 51.745313) %>%
    setView(.1,51.5, zoom = 9)

您需要先创建调色板函数,然后在
addPolygons
函数中使用它。如果我们假设您的
polys_dat
函数中有一个名为
density
的字段,该字段包含您的值,那么下面的操作应该有效

pal = colorNumeric(colorRamp(c('green', 'red')), polys_dat$density)

leaflet() %>%
    addProviderTiles("OpenStreetMap.BlackAndWhite",
         options = providerTileOptions(noWrap = TRUE,minZoom=9)) %>%
    addPolygons(data=polys_dat,color= ~pal(density), stroke = FALSE) %>%
    setMaxBounds(-0.715485, 51.252031, 0.514984, 51.745313) %>%
    setView(.1,51.5, zoom = 9)

您需要先创建调色板函数,然后在
addPolygons
函数中使用它。如果我们假设您的
polys_dat
函数中有一个名为
density
的字段,该字段包含您的值,那么下面的操作应该有效

pal = colorNumeric(colorRamp(c('green', 'red')), polys_dat$density)

leaflet() %>%
    addProviderTiles("OpenStreetMap.BlackAndWhite",
         options = providerTileOptions(noWrap = TRUE,minZoom=9)) %>%
    addPolygons(data=polys_dat,color= ~pal(density), stroke = FALSE) %>%
    setMaxBounds(-0.715485, 51.252031, 0.514984, 51.745313) %>%
    setView(.1,51.5, zoom = 9)

瓷砖的用途是什么?瓷砖的用途是什么?