R3.20
RSTUDIO
一、安装包install.packages('devtools')#如果安装了就不需要这步 library(devtools) install_github('lchiffon/REmap')
二、加载包library(REmap)
三、加载数据集data.line<-read.csv(file.choose(),T)#私有数据,需要的联系我
dataxian<-data.line[data.line$出发地=='西安',]#选择西安咸阳机场为出发机场d<-dataxian[,c(7,8)]markline_control <-markLineControl(symbol = c('none','arrow'),symbolSize=c(2,4), smooth=T,smoothness=0.2, effect=F,lineWidth=1,lineType='dashed', color = 'Random')(1) symbol 控制要绘制线条两端形状,第一个为起点,第二个为终点,可选样式有:'pin','circle','rectangle','triangle','diamond','emptyCircle','emptyRectangle','emptyTriangle','emptyDiamond','heart','droplet','pin','arrow','tar'(2)symbolSize 控制上述参数形状大小,同样有两个值(3)smooth 控制线条是否平滑,为T时,smoothness参数才有效(4)smoothness 控制线条的平滑度,为0时是直线(5)effect 控制线条是否呈现动态效果,为T时显示动态效果,需要注意的是当线条过多时effect参数无效,不会显示动效(6)linewidth 控制线条的粗细(7)lineType 控制线条的形状,可选样式有:'solid', 'dotted','dashed'(8)color 控制线条的颜色,不建议在此处设置颜色markpoint_control <-markPointControl(symbol = 'Circle', symbolSize = 10, effect =F,effectType = 'scale')(1)symbol 控制点的形状,可选样式有:'pin''circle','rectangle','triangle','diamond','emptyCircle','emptyRectangle','emptyTriangle','emptyDiamond','heart','droplet','pin','arrow','tar'(2)symbolSize 控制上述参数形状大小(3)effect 控制点是否呈现动态效果,为T时显示动态效果,需要注意的是当点数目过多时effect参数无效,不会显示动效(4)effectType 控制点的动效呈现形式,可选样式有:'scale' ,'bounce'(5)color控制点的颜色,不建议在此处设置颜色geoData = get_geo_position(unique(d[d==d])) remapB(center=get_geo_position('西安'),markLineData = d,geoData = geoData,zoom = 5.8,markLineTheme = markline_control,markPointTheme = markpoint_control)
zoom的大小需要控制在6以内,不然显示不全