我开始使用小册子在地图上放置大圆圈,在欧洲发生故障集群。它目前正在玩耍。我有120万行,持续6个月的数据
我使用下面的代码进行聚类,但似乎在10k点之后没有绘制任何东西。我并不是真的需要它来分析个别点,也许它最多可以聚集15或20个项目。谁能告诉我如何纠正这种情况?
sample <- head(ex, 9500)
leaflet(sample) %>%
addTiles() %>%
fitBounds(0, 60, 20, 70) %>%
addMarkers(clusterOptions = markerClusterOptions())
答案 0 :(得分:3)
library(mapview)
能够绘制多达400万个点(显然取决于机器)。这是一个可重复的例子,有大约130万点:
library(mapview)
library(ggplot2)
library(sp)
### blow diaminds up a bit
big <- data.frame(diamonds[rep(seq_len(nrow(diamonds)), 25),])
big$cut <- as.character(big$cut)
big$color <- as.character(big$color)
big$clarity <- as.character(big$clarity)
### provide some random positions
big$x <- rnorm(nrow(big), 0, 10)
big$y <- rnorm(nrow(big), 0, 10)
coordinates(big) <- ~x+y
proj4string(big) <- CRS("+init=epsg:4326")
### view it
mapview(big)
这需要一段时间才能加载(在我的机器上大约30秒),但随后一切都会非常敏感。
请注意,这是有效的,但装饰点的选项较少。即没有颜色或大小的映射。从好的方面来说,您将获得有关基础数据框的所有点的弹出窗口的完整信息。
另请注意, mapview 旨在使用空间类(因此示例中的coordinates
和proj4string
调用),因此您需要确保拥有由library(sp)
提供的有效Spatial *对象。
答案 1 :(得分:0)
看完之后:
https://github.com/Leaflet/Leaflet.markercluster
该套餐的目的是为marketClusterOptions处理50,000点,但仅限Chrome,所以我说,尝试使用Chrome。