R学习：用REmap生成我们自己的迁徙地图

最新推荐文章于 2024-12-01 04:18:16 发布

老狼8848

最新推荐文章于 2024-12-01 04:18:16 发布

阅读量3.0k

点赞数

分类专栏： R语言文章标签： R语言学习

本文链接：https://blog.csdn.net/bq_cui/article/details/78160267

版权

R语言专栏收录该内容

23 篇文章 3 订阅

订阅专栏

R Version 3.4.2。

开始的几个步骤，跟上一篇一样。

首先制作我们自己的数据。制作一个csv文件内容如下：

origin,destination
上海,石家庄
武汉,哈尔滨
福州,兰州

然后导入到R中，

>demoC <- read.table("d:/0R/lx.csv", header=T, sep=",")

显示一下demoC：
> demoC
origin destination
1 上海石家庄
2 武汉哈尔滨
3 福州兰州
>

可以看到数据导入成功了。

剩下的步骤就很简单了：

set.seed(125)
out = remap(demoC,title = "REmap",subtitle = "theme:Dark")
plot(out)
summary(out)

上面的几个命令直接复制到R控制台，就直接打开下面的页面了：

下面是整个的控制台输入及输出显示内容：

> demoC <- read.table("d:/0R/lx.csv", header=T, sep=",")
> demoC
  origin destination
1   上海      石家庄
2   武汉      哈尔滨
3   福州        兰州
> set.seed(125)
> out = remap(demoC,title = "REmap",subtitle = "theme:Dark")
Warning messages:
1: In get_city_coord(out_list[i], ...) : Please use your own baidu API!
Set it using: options(remap.ak = "XXXXX")
http://lbsyun.baidu.com
2: In get_city_coord(out_list[i], ...) : Please use your own baidu API!
Set it using: options(remap.ak = "XXXXX")
http://lbsyun.baidu.com
3: In get_city_coord(out_list[i], ...) : Please use your own baidu API!
Set it using: options(remap.ak = "XXXXX")
http://lbsyun.baidu.com
4: In get_city_coord(out_list[i], ...) : Please use your own baidu API!
Set it using: options(remap.ak = "XXXXX")
http://lbsyun.baidu.com
5: In get_city_coord(out_list[i], ...) : Please use your own baidu API!
Set it using: options(remap.ak = "XXXXX")
http://lbsyun.baidu.com
6: In get_city_coord(out_list[i], ...) : Please use your own baidu API!
Set it using: options(remap.ak = "XXXXX")
http://lbsyun.baidu.com
> plot(out)
Save img as: C:\Users\User\AppData\Local\Temp\Rtmp8qeind/ID_20171005092742_4569875.html> summary(out)