sankey图能是一种变形的条形图，成功将条形图的数据进行流化，展示的数据面更广更宽阔。下面我们就做一下这种图。
#数据与包

将需要下载的文件下载并解压，路径将用来设置setLib参数 x <- temp[which(temp$source == 2),]

数据准备

在这里还是要向大家再次表明一个看法：要模仿出一幅图，首先要了解他的数据结构，包括是数据框还是list，数据怎么摆放，然后别人做图的思路，最后才是具体实现和实现的技术细节。

#其他参考资料 http://rcharts.io/viewer/?6001601#.VYt8opOdVit

http://rcharts.io/viewer/?6003605#.VYt8BZOdVis

相关数据及代码：http://pan.baidu.com/s/1qWytZKo   密码：微信索取

关于我们，关注理性与文艺，用数据创作内容性的精致阅读，这里是数据分析挖掘人员与文艺青年的集结地，不做培训，不做鼓吹，只踏踏实实的做一个又一个数据驱动的文章，并设计机器人减轻数据分析的负担，无论你感兴趣还是想参与都可以关注，请加微信公众号大音如霜