承接R&Python Data Science 系列：数据处理(1)继续介绍剩余的函数。

1 衍生字段函数

主要有两个函数，mutate()和transmute(),两个函数在Python和R上使用方法相同，这两个函数本身有点区别：mutate()函数保留原来所有列，然后新增一列；transmute()只保留新增的一列：

python实现

from dfply import *import numpy as npimport pandas as pd##新增列x+y、x*y*z,mutate()函数diamonds >> mutate(x_plus_y = X.x + X.y, xyz = X.x*X.y*X.z) >> head(5)##新增列x+y、x*y*z,transmute()函数diamonds >> transmute(x_plus_y = X.x + X.y, xyz = X.x*X.y*X.z) >> head(5)

R语言实现

library(dplyr)library(ggplot2)library(tidyr)##新增列x+y、x*y*z,mutate()函数diamonds %>% mutate(x_plus_y = x + y, xyz = x*y*z) %>% head(5)##新增列x+y、x*y*z,transmute()函数diamonds %>% transmute(x_plus_y = x + y, xyz = x*y*z) %>% head(5)

2 条件函数

这里介绍3个条件函数，if_else()、case_when()、between()函数，Python包dfply和R包dplyr中都是这3个函数，在用法上有点细微差别，日常中使用最多，在构建评分卡woe赋值的时候特别好用。

2.1 if_else函数

非A即B函数：

Python实现

##如果钻石价格大于2000，则钻石等级为A,其他为A-diamonds >> mutate(price_class = if_else(X.price > 2000, 'A', 'A-')) >> distinct(X.price_class)

而且if_else()函数可以嵌套使用，不过当条件判断超过2个的时候，建议使用case_when()函数。

##如果钻石价格大于2000，则钻石等级为A,1500-2000为A-, 1500以下为A--(diamonds >> mutate(price_class = if_else(X.price > 2000, 'A', if_else(X.price > 1500,'A-', 'A--'))) >> distinct(X.price_class) >>select(X.price_class))

R语言实现

##如果钻石价格大于2000，则钻石等级为A,其他为A-diamonds %>%   mutate(price_class = if_else(price > 2000, 'A', 'A-')) %>%  distinct(price_class)##如果钻石价格大于2000，则钻石等级为A,1500-2000为A-, 1500以下为A--diamonds %>%     mutate(price_class = if_else(price > 2000, 'A', if_else(price > 1500,'A-', 'A--'))) %>%     distinct(price_class)

注意：python在jupyter中使用管道函数换行书写代码的时候需要用()把代码括起来。

2.2 case_when函数

用于多条件赋值，评分卡Woe赋值的时候使用起来很方便。

python实现

##如果钻石价格大于2000，则钻石等级为A,1500-2000为B, 1000-1500以下为C,1000以下为D(diamonds >> mutate(price_class = case_when([X.price > 2000, 'A'],                              [X.price > 1500 , 'B'],                              [X.price > 1000, 'C'],                              [True, 'D'])) >>distinct(X.price_class) >>select(X.price_class))

R语言实现

##如果钻石价格大于2000，则钻石等级为A,1500-2000为B, 1000-1500以下为C,1000以下为Ddiamonds %>% mutate(price_class = case_when(price > 2000 ~ 'A',                                            price > 1500 ~ 'B',                                            price > 1000 ~ 'C',                                            TRUE ~ 'D')) %>%   distinct(price_class)

注意：case_when函数在Python和R语言中使用的时候有点区别，请留意。

2.3 between函数

区间判断条件函数，为闭区间[a,b]

python实现

##如果钻石价格大于2000，则钻石等级为A,1500-2000为B, 1000-1500以下为C,1000以下为D(diamonds >> mutate(price_class = case_when([X.price > 2000, 'A'],                              [between(X.price,1500,2000) , 'B'],                              [between(X.price,1000,1500), 'C'],                              [True, 'D'])) >>  select(X.price_class) >> distinct(X.price_class))

R语言实现

##如果钻石价格大于2000，则钻石等级为A,1500-2000为B, 1000-1500以下为C,1000以下为Ddiamonds %>% mutate(price_class = case_when(price > 2000 ~ 'A',                                            between(price,1500,2000) ~ 'B',                                            between(price,1000,1500) ~ 'C',                                            TRUE ~ 'D')) %>%   distinct(price_class)

3 bind函数

两个函数：bind_rows()行拼接；bind_cols()列拼接：

Python实现

###bind_rows()函数diamonds2 = diamonds >> head(2)diamonds3 = diamonds >> tail(3)diamonds2 >> bind_rows(diamonds3)

##bind_cols()函数diamonds4 = diamonds >> select(1, X.carat, 'cut', -1)diamonds5 = diamonds >> select('x', 'y')diamonds4 >> bind_cols(diamonds5) >> head(5)

R语言实现

##bind_rows()函数diamonds2 = diamonds %>% head(2)diamonds3 = diamonds %>% tail(3)diamonds2 %>% bind_rows(diamonds3)##bind_cols()函数diamonds4 = diamonds %>% select(1, carat, cut, dim(diamonds)[2])diamonds5 = diamonds %>% select(x, y)diamonds4 %>% bind_cols(diamonds5) %>% head(5)

4 连接函数

这里主要介绍inner_join()、left_join()和rigth_join()三个函数

Python实现

a = pd.DataFrame({        'x1':['A','B','C'],        'x2':[1,2,3]    })b = pd.DataFrame({    'x1':['A','B','D'],    'x3':[True,False,True]})

##inner_join函数a >> inner_join(b, by='x1')

##left_join函数a >> left_join(b, by='x1')

##right_join函数a >> right_join(b, by='x1')

R语言实现

a = data.frame(x1 = c('A', 'B', 'C'), B = c(1, 2, 3))b = data.frame(x1 = c('A', 'B', 'D'), D = c(TRUE, FALSE, TRUE))##inner_join函数a %>% inner_join(b, by = 'x1')  ##或者inner_join(a, b, by = 'x1')##left_join函数a %>% left_join(b, by = 'x1')  ##或者left_join(a, b, by = 'x1')##right_join函数a %>% right_join(b, by = 'x1')  ##或者rigth_join(a, b, by = 'x1')

注意：R语言中可以使用XXX_join(a，b，by)，Python中不可以使用。