r - 传单永远加载，永远不会在 RStudio 中显示

Question

我是新的 r 和传单用户，我发现当我运行传单地图的代码时，地图只会永远加载。我永远不会出错。在不尝试按数据着色的情况下运行代码时，地图需要十分钟才能加载，但最终会加载。

我对针织也有同样的问题。

在我的任何其他工作中，我都没有遇到过这类问题。

这是代码：

```{r setup, echo = FALSE, warning = FALSE, message = FALSE, 
error = FALSE, cache = TRUE}
knitr::opts_chunk$set(echo = FALSE)

library(leaflet)
library(tidyverse)
library(rgdal)
crime <- read_rds("r_4_tidy.rds")


rf_map <- readOGR(dsn = "/Final_Project/RUS_adm", layer = 
"RUS_adm1")

rf_map <- spTransform(rf_map, CRS("+init=epsg:4326"))

rf_map <- merge(rf_map, crime, by = "ID_1", duplicateGeoms = 
TRUE)

domain <- rf_map@data %>%
 filter(YEAR == "1990") %>%
 select(CRIMESHARE)

coloring <- colorNumeric(palette = "Blues",domain = domain)

rf_map %>%
 leaflet() %>%
 addProviderTiles(provider = "CartoDB") %>%
 addPolygons(weight = 1, 
            #label = NAME,
            color = ~coloring(CRIMESHARE))

谢谢！

标签： rleaflet