全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
4521 5
2017-05-23
如下是数据框d
Number        Date        Value        Total        ActualValue
111        2016年8月        3769.98         3769.98         3769.98
112        2016年9月        4090.02         4090.02         4090.02
113        2016年9月        3490.02         3490.02         3000.00
114        2016年10月        3090.00         2575.00         2575.00
115        2016年10月        4069.98         3391.65         3391.65
116        2016年11月        4090.02         2726.68         2500.00
117        2016年11月        3870.00         2580.00         2580.00
118        2016年11月        4090.02         2726.68         0.00
119        2016年8月        3490.02         3490.02         0.00



如何按DATE这列的月份分组,并输出定义新的数据框,比如
输出数据框d1
Number        Date        Value        Total        ActualValue
111        2016年8月        3769.98         3769.98         3769.98
119        2016年8月        3490.02         3490.02         0.00



d2
Number        Date        Value        Total        ActualValue
112        2016年9月        4090.02         4090.02         4090.02
113        2016年9月        3490.02         3490.02         3000.00


d3
Number        Date        Value        Total        ActualValue
114        2016年10月        3090.00         2575.00         2575.00
115        2016年10月        4069.98         3391.65         3391.65



d4
Number        Date        Value        Total        ActualValue
116        2016年11月        4090.02         2726.68         2500.00
117        2016年11月        3870.00         2580.00         2580.00
118        2016年11月        4090.02         2726.68         0.00




还有个问题
数据框d如何按月份分组,且筛选出ActualValue小于Total的情况,输出Value-ActualVAlue的值?

求教这段代码怎么写,感谢!

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

全部回复
2017-5-23 15:16:36
附上数据
附件列表

111.txt

大小:414 Bytes

 马上下载

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

2017-5-23 16:13:16
library(tidyverse)
data %>%
    filter(ActualValue < Total) %>%
    split(f = .$Date)
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

2017-5-24 07:01:58
cheetahfly 发表于 2017-5-23 16:13
library(tidyverse)
data %>%
    filter(ActualValue < Total) %>%
看起来 tidyvers这个包很好用 好多用处呀
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

2017-5-24 16:13:43
初学,看不懂
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

2017-5-24 16:19:54
cheetahfly 发表于 2017-5-23 16:13
library(tidyverse)
data %>%
    filter(ActualValue < Total) %>%
感谢,我用plyr包搞定了
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群