在 R 传单中映射背景颜色/透明度

【问题标题】：Map background colour/transparency within R leaflet在 R 传单中映射背景颜色/透明度
【发布时间】：2022-12-03 21:23:54
【问题描述】：

我正在使用 geojson 文件在 R 上生成带有传单的地图。我想更改背景色到白色，或者如果可能的话使背景透明（这实际上是真正需要的）。我见过this和this。我可以更改边框颜色和填充颜色，但无法更改地图外部的颜色 > 背景颜色。

wLeaf <- leaflet(states) %>%
  addProviderTiles("MapBox", options = providerTileOptions(
    id = "mapbox.light",
    accessToken = Sys.getenv('MAPBOX_ACCESS_TOKEN')))%>%
    addPolygons(
      weight = 2,
      opacity = 1,
      color = "#222",
      fillColor = "gray",
    )

如何处理地图背景的颜色或透明度问题？

谢谢

【问题讨论】：

您是否尝试过将底图设置为完全透明，即 providerTileOptions 下的 opacity = 0？

标签： r leaflet geojson r-leaflet

【解决方案1】：

如果有帮助，请先创建后台调用

backg <- htmltools::tags$style(".leaflet-container { background: tomato; }" )

然后你可以将这个对象作为 CSS 格式添加到你的地图中

sts <- tigris::states(cb = TRUE) # you map
leaflet::leaflet(data = sts) %>% 
addPolygons(fillColor = "grey90", stroke = FALSE) %>%
htmlwidgets::prependContent(backg) #this applies the CSS format

全部一起：

library(dplyr)
backg <- htmltools::tags$style(".leaflet-container { background: tomato; }" )  
sts <- tigris::states(cb = TRUE)
leaflet::leaflet(data = sts) %>% 
addPolygons(fillColor = "grey90", stroke = FALSE) %>%
htmlwidgets::prependContent(backg)

干杯!

【讨论】：