作者：伍正祥
来源：AI入门学习
今天教大家画一个图，桑基图，一个大大提高你的江湖地位的图。桑基图是一种流图，其实在前期文章中提到过，但是并没有讲细节的画法，现在教大家两种画法，一个是R语言(案例1、2、3)，一个是直接在线画(案例4)。
案例1：你的工资是怎么霍霍的？
假如你月薪20000，你能拿到多少？最后花完还剩多少？可能比你想象的要少。一部分被国家拿走，当然国家并不是要你的钱，只是帮你存起来，等你长大了，不对，是老了会还给你的(此处我想起了压岁钱的故事)，当然税收部分，那国家说了，强制征收，打死都不会给你的。国家的拿完了，然后扣除柴米油盐酱醋茶等一些列开支，你会发现，又回到了穷人的队伍。
以杭州为例，根据工资计算器，五险一金+所得税大约扣6000多，你能拿到13000多，为什么扣这么多，因为杭州公积金12%，所以欢迎大家来杭州发展。除掉五险一金，就是各项生活开支了，最后剩下不足4000了。说了这么多，数据怎么表达更直观，大部分网站都用二维饼图，在分类很多的情况下，饼图比较乱，其实桑基图会有更好的表现力，看具体的绘图步骤。
step1：数据准备，理清各类数据金额或者比例
step2：数据格式转换，宽格式的转换成3列，注意会汇总多一行或者多行
step3：可以把数字标签加到文本描述里面，准备好后，套用文末代码即可
工资是怎么样离你而去的
案例2：比赛数据样本量统计
比赛分为初赛和复赛，初赛复赛分别有训练集和测试集，在训练集中，有5个分类，存在各种交叉，用桑基图如下。
比赛数据样本量统计
案例3：手机各个渠道销售量统计
手机品牌商会在不同的渠道进行销售，不同渠道又会在不同的省份进行销售，用其他类型的图表表达都显得拥挤，但是桑基图恰到好处的表现出来了，可以在标签上加上各个渠道的占比。
某品牌手机各个渠道销售量统计
案例4：在线用Echart绘制桑基图
绘图思路及数据准备和上面一样，只要手动更改标签及数据，运行即可得到想要的图形，下面是原始的demo截图，非常简单。
案例5：其他作品欣赏(需要一些开发资源)
开头图代码：
URL
Energy
sankeyNetwork(links = Energy$links, Nodes = Energy$nodes, Source = "source", Target = "target", Value = "value",NodeID = "name",fontSize = 12, nodeWidth = 30)
案例123代码，只需要更换文件即可
library(networkD3)#安装并包加载，如果没有请安装
library(dplyr)
setwd("C:/Users/wuzhengxiang/Desktop/R语言可视化/Sankey")#文件的存储空间
sankey = read.csv("手机销售渠道统计.csv",header=T,stringsAsFactors = FALSE)#读取数据
Sankeynodes = data.frame(name = unique(c(sankey$Source,sankey$Target)))
Sankeynodes$index = 0:(nrow(Sankeynodes)-1)
Sankeylinks = sankey
Sankeylinks = left_join(Sankeylinks,Sankeynodes,by=c('Source'='name'))
Sankeylinks = left_join(Sankeylinks,Sankeynodes,by=c('Target'='name'))
Sankeydata = Sankeylinks[,c(4,5,3)]
names(Sankeydata) = c("Source","Target","Value")
Sankeyname = select(Sankeynodes,name)
sankeyNetwork(links = Sankeydata,Nodes = Sankeyname, Source = "Source",Target = "Target", Value = "Value", NodeID = "name", units = "元", #根据具体单位填写, fontSize = 12, nodeWidth = 24,sinksRight = FALSE, colourScale = JS("d3.scaleOrdinal(d3.schemeCategory20);"))