Question

我在使用R创建循环时遇到问题。

我想重新创建一个点数的“袋”。让我尝试解释一下。想象一下，我在18年3月的积分为700万。我想知道我在18年2月，18年1月，17年12月...等几个点（24个月前）。为了做到这一点，我必须从我知道在Mar'18的活着的点开始，并开始向后循环构建所有循环。

2月份活着的积分的公式如下：

3月份的有效积分-您在18年3月给出的积分，然后我必须对所有消耗的积分以及该期间内过期的积分进行求和。

对不起我的英语，我知道那不是很完美；）

data[high]

我希望即使您不了解业务，您也可以理解我的代码。

如果您有帮助，我正在尝试类似的方法

该循环在每个24个月中都应执行上述操作。

R_24<-seq(as.Date("2016/04/01"), as.Date("2018/03/01"), by="mon") 
R_24<-format(R_24,"%Y%m")

 #Reverse the month array   
R_24_back<-rev(R_24)

   # POINTS FEBRUARY
    alive<-kk_points_alive %>% 
filter(Month!="201803")
    given <-kk_given %>% 
filter(Month=="201803" & MODAT_R_MES!="201803")
    expired<-kk_expired %>%
filter(Month=="201803" & AMes_emision!="201803")



# POINTS JANUARY
alive<-kk_points_alive %>%
  filter(Month!="201803" & Month!="201802")
given<- kk_given %>%
  filter((Month=="201803" | Month=="201802") & (MODAT_R_MES!="201803" | MODAT_R_MES!="201802"))
expired<- kk_expired %>%
  filter((Month=="201803" | Month=="201802")  & (AMes_emision!="201803" | AMes_emision!="201803"))

谢谢大家R社区！

非常感谢您的帮助

循环-考虑月份的列表中的R循环

0 个答案: