根据日期列过滤数据框中的行

Question

我有以下数据框：

id        day           total_amount
 1       2016-06-09         1000
 1       2016-06-23          100
 1       2016-06-24          200
 1       2015-11-27         2392
 1       2015-12-16          123
 7       2015-07-09          200
 7       2015-07-09         1000
 7       2015-08-27       100018
 7       2015-11-25         1000

如何使用基本R程序包和其他程序包（例如dplyr）丢弃从今天起三天之后的日列行。

Answer 1

我们可以使用subset

 subset(df1, as.Date(day) > Sys.Date()-21)

Answer 2

只是为了填补另外两种可能性（就语法而言彼此几乎相同，并且非常类似于@akrun对subset的使用）。

您可以使用with在如下缩短的字符数：

with(df, df[as.Date(day) > Sys.Date()-21,])

---

正如您提到要查看其他软件包的愿望一样，这是使用data.table软件包删除旧观察值的一种方法。

library(data.table)
# turn df into a data.table
setDT(df)

df[as.Date(day) > Sys.Date()-21,]

---

数据

df <- read.table(header=T, text="id        day           total_amount
 1       2016-06-09         1000
 1       2016-06-23          100
 1       2016-06-24          200
 1       2015-11-27         2392
 1       2015-12-16          123
 7       2015-07-09          200
 7       2015-07-09         1000
 7       2015-08-27       100018
 7       2015-11-25         1000")