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

    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)