筛选数据的月份结束日期

时间:2019-01-16 14:47:29

标签: r panel-data

我正在尝试过滤一些每日面板,但是我只想使用月末数据,首先我必须知道他们的月末日期。

数据示例: https://imgur.com/a/SqL7A7F

我试图使用此代码来获取月底日期。但是,某些日期遗漏了(某些月底天是26/25/26,我错过了许多数据) 我的问题是,如何获取数据的月份结束日期,而不忽略最后一天的更早日期(例如3 / 23、6 / 25等)

library(anytime)
x=anydate(as.vector(fundbv$date))
y=unique(as.Date(format(mydates+28,"%Y-%m-01"))-1)
finaldays=x[x %in% unique(as.Date(format(x+28,"%Y-%m-01"))-1)]
finaldays=unique(finaldays)

谢谢,谢谢!!!!

1 个答案:

答案 0 :(得分:0)

以下是使用dplyrlubridate的方法:

library(dplyr)
library(lubridate)

# generate a data frame with dates to play with
(df <- data_frame(
  date=seq(as.Date("2017-01-01"), as.Date("2018-12-31"), by=6),
  amount=rgamma(length(date), shape=2, scale=20)))

df %>%
  group_by(month=floor_date(date, "month")) %>%
  summarize(date = max(date))