我在R /传单中打印地图并且缺少标记。在下面的例子中应该有大约100个标记,但我只看到它的一小部分。我错过了什么?
library(leaflet)
library(data.table)
library(nycflights13)
data(flights); data(airports)
setDT(flights); setDT(airports)
dest.counts = flights[, .N, by = dest]
dest.counts = merge(dest.counts, airports, by.x = "dest", by.y = "faa", all.x = T)
leaflet(dest.counts) %>% addTiles() %>%
addCircles(radius = sqrt(dest.counts$N) * 200, popup = ~name) %>%
setView(-95.31, 28.81, zoom = 4)