利用R语言的dplyr包进行数据转换