请教各位老师一个关于数据筛选的问题。

各位老师好：

数据格式为

客户           日期              消费金额
A        2017/10/15        100
A        2017/10/16        123
A        2017/10/17        131
A        2017/10/18        213
B        2017/10/17        234
B        2017/10/18        141
B        2017/10/19        242
B        2017/10/20        12
C        2017/10/19        134
C        2017/10/20        242
C        2017/10/21        313

条件：筛选出每位客户，日期最近的消费金额（实际数据大致20万条）。

客户        日期        消费金额
A        2017/10/18        213
B        2017/10/20        12
C        2017/10/21        313

感谢各位老师。

1. library(dplyr)
   
2. df %>%
   
3.   filter(客户=="A"|客户=="B"|客户=="C")%>%
   
4.   group_by(客户)%>%
   
5.   mutate(diff=as.numeric(Sys.Date()-as.Date(日期)))%>%
   
6.   filter(diff==min(diff))%>%
   
7.   select(客户,日期,消费金额)

复制代码

屋檐滴语 发表于 2017-10-30 14:59

非常感谢~