【R图秀-1】12306列车数据可视化

原标题：【R图秀-1】12306列车数据可视化感谢关注天善智能，走好数据之路↑↑↑欢迎关注天善智能，我们是专注于商业智能BI，人工智能AI，大数据分析与挖掘领域的垂直社区，学习，问答、求职一站式搞定！对商业智能BI、大数据分析挖掘、机器学习，python，R等数据领域感兴趣的同学加微信：tstoutiao，邀请你进入数据爱好者交流群，数据爱好者们都在这儿。作者简介傅兴：个人公众号：Rapp用R语言来试着分析一下12306官网上的列车数据。我的目的不是做一个同样的命令行火车票查看器，而是通过实战来练习如何抓取、整理、分析数据，并对分析结果进行可视化。在抓取数据前，首先要确定列车的出发地和目的地是哪里。我选择上海作为出发地，12306官网上的其他32个热门城市作为目的地。发车时间选择十一国庆节（2016-10-01）下面是我整理出来的32个目的地的名称和12306提供的英文缩写：我定义了一个名为search_12306的函数，用来抓取数据。该函数调用12306的API（找到这个API的方法可以参考前面提到的那篇文章），然后用R的jsonlite包来解析API返回的json字符串，最后转成R的data.frame数据。为了方便提取这个data.frame中的数据，我又定义了一个名为parse_tickets_info的函数来处理这个data.frame，并将整理好的数据用一个list返回。加载的软件包和自定义的2个函数代码如下：工具已经准备完毕，接下来就正式抓取数据。首先读入目的地文件，然后用一个apply函数将目的地参数传递给search_12306函数，抓取到的32个城市的信息存在一个list里。然后再用一个lapply函数将抓取到的每个目的地的信息传递给parse_tickets_info函数，结果同样保存在一个list里。代码如下：至此，数据也准备完毕，下面我们一起来作图：1. 从上海出发的列车中，出发的高峰时间是几点钟，到达目的地的高峰时间是几点钟？从图上可以看，中午出发的列车较少，在上午和下午各有一个出发高峰，到达目的地的时间大多在下午和傍晚。代码如下：2. 从上海出发的列车中，有多少是始发车，多少是过路车？从图上可以看到，从上海到南京和杭州的列车是最多的（江浙沪的交通是最便利的），而且从上海始发的列车远远多于过路车。代码如下：3. 到各个城市的车次类型有哪些？从这个图可以方便的看到，上海到哪些城市开通了高铁。代码如下：4. 到达某个目的地，最快和最慢的列车分别需要多长时间？根据这幅图，大家可以估计一下坐火车到你想去的城市需要多少时间。代码如下：5. 十一长假就要到了，我们看看到各个城市的剩余车票还有多少，到不同的城市的订票趋势是否有差异？从图上可以看到，1号的票已经卖的差不多了，3号和4号的车票比较富余，6号和7号的票也比较紧俏。需要注意的是，车票数据会实时变化，这幅图只代表了9月23号的余票情况。我对余票信息做了聚类，发现从上海到不同的城市的订票趋势还是有一些差异，但总体趋势是一致的。代码如下：今天的【R图秀】给大家展示的是如何用R来分析从上海到其他城市的列车数据，感兴趣的小伙伴们也可以研究一下自己所在城市的列车数据。