【R语言】实现数据透视表--基于sqldf包、dplyr包、reshape2包

0. 前言

       日常数据分析中，常常会使用Excel中的数据透视表功能解决一些汇总、求和、平均的任务；然而，当数据量比较大，无法将数据导入Excel处理，即使可以导入，Excel处理速度比较慢，有时候会出现卡死现象。既然我们使用R语言软件做数据分析，何必将数据导出用Excel分析，然后再导入R中呢？这里我们介绍一些R语言中类似于Excel中数据透视功能的函数。

1. 数据准备

       这里我们虚构一些数据：某电商有两家分店，当客户下单的时候，由于一些原因，导致客户交易失败，每个月总部会汇总每个分店交易失败的数据，数据如下：

##交易失败月份
TransFailTime <- rep(c("2018-01", "2018-02", "2018-03"), each = 16)
##分店
Branch <- rep(c("branch_1", "branch_2"), times = 24)
##交易失败原因
TransFailCode <- rep(c("Failed_code01","Failed_code02","Failed_code04",
                        "Failed_code05","Failed_code06",
                        "Failed_code07","Failed_code08",
                        "Failed_code09"), each = 2, times = 3)
##交易失败客户
set.seed