如何将日期过滤条件附加到R中的现有过滤代码？

Question

我需要在R中创建我的主数据框（mydata1）的子集。

mydata1中的Date列已使用以下代码格式化为Date：

mydata1$Date = as.Date(mydata1$Date)

我正在运行当前代码来创建我的数据子集：

mydata3 <- mydata1 %>%
filter(Total.Extras.Per.GN >= 100) %>%
filter(Original.Meal.Plan.Code %in% target) %>%
filter(Date, between ("2017-01-01"), ("2017-06-01")) %>%
select(PropertyCode, Date, Market, Original.Meal.Plan.Code, GADR, Total.Extras.Per.GN)

但是，filter(Date, between ("2017-01-01"), ("2017-06-01")) %>%行给了我一个错误。如何正确编写它以便过滤我的日期列中的日期？

错误讯息：   filter_impl（.data，dots）中的错误：   论证＆＃34;左＆＃34;缺少，没有默认

Answer 1

只需将日期放在之间的 arg中，并将as.Date()中的日期字符串换行进行比较：

mydata3 <- mydata1 %>%
   filter(Total.Extras.Per.GN >= 100) %>%
   filter(Original.Meal.Plan.Code %in% target) %>%
   filter(between(Date, as.Date("2017-01-01"), as.Date("2017-06-01"))) %>%
   select(PropertyCode, Date, Market, Original.Meal.Plan.Code, GADR, Total.Extras.Per.GN)