Fatal编程技术网
  • r/
  • R 去年同期的销售额

R 去年同期的销售额

r

R 去年同期的销售额,r,R,我有一个DF如果你的Year列不在Date类中，那么首先将其转换为Date类 df$Year <- as.Date(df$Year, "%d/%m/%Y") 尝试库（dplyr）；DF%>%变异（LastYearSales=潜在客户（销售）） ID Year Sales LastYearSales 1 01/01/2015 50000 20000 2 01/01/2014 20000 df$Year <- as.Date(df$Year, "%d/%m/%Y")

我有一个
DF如果你的
Year
列不在
Date
类中，那么首先将其转换为
Date
类


df$Year <- as.Date(df$Year, "%d/%m/%Y") 


尝试
库（dplyr）；DF%>%变异（LastYearSales=潜在客户（销售））


ID    Year  Sales  LastYearSales

1 01/01/2015 50000  20000
2 01/01/2014 20000



df$Year <- as.Date(df$Year, "%d/%m/%Y") 



library(lubridate)
df$LastYearSales <-  c(df[df$Year %in% (as.Date(ymd(df$Year) - years(1))), ]$Sales,  NA)
df
# ID       Year   Sales    LastYearSales
# 1  1 2015-01-01 50000        20000
# 2  2 2014-01-01 20000           NA