先po全国城市可视化效果图:
局部区域放大效果:
说明:
1. 数据为每个城市某一时间段某个渠道的流入人口量
2. 人口量越多,圆圈半径越大
3. 源数据为城市经度、城市维度、人口量
4. 由于leaflet默认地图包有城市中文名,所以没有额外添加。如有需要,可以添加label或popup效果。
CSV数据如下(原始数据已经过处理):
R语言代码如下:
setwd("D:/data")
library(leaflet)
cities <- read.csv("amount.csv",header = T)
leaflet(cities) %>%
addTiles() %>%
addCircles(lng = ~lng, lat = ~lat, weight = 1,
radius = ~sqrt(amount) * 200 )
leaflet官方教学请戳:http://rstudio.github.io/leaflet/shapes.html