lineinchina <- (data.line[,'V3'] %in% chinaport$code) & (data.line[,'V5'] %in% chinaport$code) chinaline <- data.line[lineinchina,c('V3','V5','V9')] names(chinaline) <- c('source','destination','equipment') //航班数据展示 航班数据 //构建一个函数,根据机场编码得到经纬度 find...
address 1 beijing normal university, 19号 xinjiekou outer street, haidian, beijing, china, 100088 north south east west postal_code country 1 39.97076 39.95365116.3816116.3496100088 china administrative_area_level_2 administrative_area_level_1 locality 1 <NA> beijing beijing street streetNo point_of_...
ggmap包整合了四种地图资源,分别是Google、OpenStreetMaps、Stamen和Cloudmade。可以方便的与ggplot进行涂层叠加,实现在R中的地图绘制需求。 ggmap简介 1,get_map( ):ggmap包中最基本函数,用来下载地图。注意,要访问外国网站后才能下载地图。 2,geocode( ):用来返回某地的经纬度,比如要查询北京的经纬度。 结果为在谷...
最近一直在研究ggplot剩余还没有涉略过的图表类型,试图挖掘出一些新的图表形式,就像是该包的作者所暗示的那样,ggplot2只是给你搭建了一个图层语法环境,至于具体能创造出何种图形,全凭自己的想象力。...加载包: library(ggplot2) library(ggmap) library(plyr) library(maptools) 加载中国省份行政地图: china_map<...
1 beijing normal university, 19号 xinjiekou outer street, haidian, beijing, china, 100088 north south east west postal_code country 1 39.97076 39.95365116.3816116.3496100088 china administrative_area_level_2 administrative_area_level_1 locality