承接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中不可以使用。
