全部版块 我的主页
› 论坛 › 数据科学与人工智能 › 数据分析与数据科学 › R语言论坛
R语言怎么做循环
阿璇tian
3826 15
2018-12-03
老师们，我想请教一个R循环的问题。

我有两个表，表一：有两列，一共是311322条数据
日期                 员工编号
2018-11-01         12345678
2018-11-01         234556
2018-11-01         23454678
2018-11-02         123456786
2018-11-02         23456786

表二：有四列，一共是80849条
日期                 部门编码               部门开始编码               部门截止编码
2018-11-01         2345                    1234567889                 1345678900
2018-11-01         2346                    1234567899                 1345674567
2018-11-02         2345                    1234567889                 1345678900

我想按天，看每天，每个部门编码，在这个部门开始编码、结束编码数值范围内的员工编码有多少个。生成下面三个变量
日期     部门编码        个数

我自己的想法是生成一个80849*311322的表，看每个员工编码是否在部门开始编码、部门截止编码范围内，再按照日期、部门编码分组求个数，但是这个表太大了，内存不够啊。。。

请问老师们有什么好办法吗？
二维码

扫码加我 拉你入群

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

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

全部回复
阿璇tian
2018-12-3 17:04:53
是不是应该写了循环，日期、员工编号套两层，但我不知道怎么写，请问有老师知道吗？
谢谢~
二维码

扫码加我 拉你入群

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

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

Whig
2018-12-3 18:19:38
部门开始、结束编码会变？
二维码

扫码加我 拉你入群

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

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

阿璇tian
2018-12-3 19:12:04
Whig 发表于 2018-12-3 18:19
部门开始、结束编码会变？
同一个部门的开始和结束编码不会变
二维码

扫码加我 拉你入群

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

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

Whig
2018-12-3 19:31:35
阿璇tian 发表于 2018-12-3 19:12
同一个部门的开始和结束编码不会变
像这种大数据量的不建议循环。你现在问题的关键是获取员工编码和部门编码的对应关系。首先用unique获取部门编码、部门起止编码。然后在员工表上，通过某种方式找到对应的部门。问题的难点就变成如何去找对应部门了。
二维码

扫码加我 拉你入群

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

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

jgchen1966
2018-12-3 22:50:13
##  用一个简单的模仿数据集xda，将核心部分，例示如下：
##################

   xda<-tibble::tibble(x=letters[1:5],y0=c(1,5,9,15,20),y1=c(4,8,14,19,25))
   yda<-tibble::tibble(ys=seq(min(xda$y0),max(xda$y1),by=1))

   xyda<-xda%>%
       dplyr::group_by(x)%>%
       dplyr::do( y=filter(yda,ys>=.$y0& ys<=.$y1))%>%
       tidyr::unnest()
###################
## 体会理解了，此问题，就很容易了  。。
二维码

扫码加我 拉你入群

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

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

点击查看更多内容…
相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

微信QQ空间QQ微博
扫码加好友，拉您进群
各岗位、行业、专业交流群