r - While循环用于删除日期之前的观察

Question

我有一个 df 列日期和观察。我想删除 2020-01-01 之前的所有观察结果。我决定使用while循环。有趣的是，有时它会起作用。但是，每当我将它投入使用时，它就不起作用，返回"argument is of length zero"

subset1 <- data.frame("date"= c("2019-12-31",  "2020-01-01", "2020-01-02", "2020-01-03"), "observations" = c(0,0,12,10))
while(subset1$date < "2020-01-01") {
    subset1 = subset1[-1,]
}

可能有什么问题？

帮助表示赞赏！

标签： rwhile-loop