R&Python Data Science 系列：数据处理(4）长宽格式数据转换-CSDN博客

0 前言

在数据分析过程中，不同的软件通常对数据格式有一定的要求，例如R语言中希望导入的数据最好是长格式数据而不是宽格式数据，而SPSS软件经常使用宽格式数据。平时数据分析的时候，无法保证导入的数据一定是什么格式，因此需要了解长宽格式数据之间如何相互转换。

1 何为长宽格式数据

640?wx_fmt=png

长格式数据：每一行数据记录的是ID（Player）的一个属性，形式为key：value，例如上图左表中，第一行数据记录Player1选手的name信息，name为key，Sulie为value；

宽格式数据：每一行数据为是一条完整的记录，记录着ID（Player）的各种属性；例如上图右表中，第一行就是一条完整的记录，分别记录Player1选手的name叫Sulie，sex为male，education为master。

2 解决方案

640?wx_fmt=png

特别说明：不要将长宽格数据转换为宽格式数据理解为数据透视表，长转宽只是数据存储形式发生变化，并不对操作对象进行计算，而数据透视表一般对操作对象进行某种操作计算（计数、求和、平均等）。

Python中pivot()、pivot_table()和melt位于pandas库中，pivot_table()是数据透视函数，会对操作对象进行处理，故操作对象不能是字符串型，下面举例中会特别说明；spread()和gather()位于dfply库中；

3 长转宽函数

Python实现

两种方法：

1 pandas库中的pivot()和privot_table()函数；

2 dfply库中的spread()函数；

方法一：

##构造数据	
 long_data = pd.DataFrame({	
        'Player':['Player1']*3 + ['Player2']*3 + ['Player3']*3,	
        'Introduction':['name','education', 'sex']*3,	
        'Message': ['Sulie', 'master', 'male', 'LuBan', 'Bachelor', 'male', 'ZhenJi', 'PhD', 'female']	
    })	
long_data >>= select(X.Player, X.Introduction, X.Message)	
long_data

640?wx_fmt=png

##使用pivot()	
import pandas as pd	
import numpy as np	
from dfply import *	

	
###长格式数据转换成宽格式数据	
from pandas import *	
long_data.pivot(index = 'Player',	
                           columns = 'Introduction',	
                           values = 'Message')

640?wx_fmt=png

参数columns是长格式数据中的key键对应的列名；参数values是长格式数据中的value对应的列。这里不能使用透视表pivot_table()函数，因为pivot_table()函数对value进行计算（求和、平均等），但这里Message列都是字符型的，无法进行计算；若value为数值型数据，可以使用pivot_table()函数，例如：

long_data1 = pd.DataFrame({	
'Company':['Apple']*3 + ['Google']*3 + ['Facebook']*3 + ['Amozon']*3,	
'Year':['Sale2017', 'Sale2018', 'Sale2019']*4,	
'Sale':[2000,1500,3000,3500]*3})	
long_data1 >>= select(X.Company, X.Year, X.Sale)	
long_data1

640?wx_fmt=png

###长格式数据转换成宽格式数据	
long_data1.pivot_table(index = 'Company',	
                           columns = 'Year',	
                           values = 'Sale')	
###或者	
long_data1.pivot(index = 'Company',	
                           columns = 'Year',	
                           values = 'Sale')

640?wx_fmt=png

方法二：

###用spread()	
long_data >> spread(X.Introduction, X.Message)

640?wx_fmt=png

R实现

##构造数据	
long_data <- data.frame(	
  Player = rep(c("Player1", "Player2", "Player3"), each = 3),	
  Introduction = rep(c("name", "education", "sex"), times = 3),	
  Message = c("Sulie", "master", "male", "LuBan", "Bachelor", "male", 	
             "ZhenJi", "PhD", "female")	
)	

	
long_data = long_data %>% arrange(Player, Introduction)	

	
###使用pivot_wider()	
library(tidyverse)	
library(dplyr)	
library(tidyr)	
long_data %>%	
  pivot_wider(id_cols = Player,	
              names_from = Introduction,	
              values_from = Message)

640?wx_fmt=png

参数names_from对应长格式数据key键对应的列；values_from对应长格式数据value值对应的列。

4 宽转长函数

Python实现

Python中两种方法：

1 pandas库中的melt()函数；

2 dfply库中的gather()函数；

###构造数据集	
wide_data = pd.DataFrame({	
    'Player':['Player1', 'Player2', 'Player3'],	
    'name':['SuLie', 'LuBan', 'ZhenJI'],	
    'sex':['male', 'male', 'female'],	
    'education':['master','Bachelor', 'PhD']	

	
})	
wide_data >>= select(X.Player, X.name, X.sex, X.education)	
wide_data

640?wx_fmt=png

方法一：

##使用melt()	
wide_data.melt(id_vars='Player', 	
               var_name='Introduction', value_name = 'Message')

640?wx_fmt=png

方法二：

###使用gather()	
wide_data >> gather('Introduction', 'Message', 	
                    ['name', 'sex', 'education'])

640?wx_fmt=png

R实现

wide_data <- data.frame(	

	
  Player = c("Player1", "Player2", "Player3"),	
  name = c("SuLie", "LuBan", "ZhenJi"),	
  sex = c("male", "male", "female"),	
  education = c("master", "Bachelor", "PhD")	
)	
wide_data	
wide_data %>%	
  pivot_longer(-Player,	
               names_to = "Introduction",	
               values_to = "Message")

640?wx_fmt=png