测试，时间有问题

发现12月31日的笔记是不支持的，应该改为2018年1月1日吧！

library(tidyverse)

## Warning: 程辑包'tidyverse'是用R版本3.6.3 来建造的

## -- Attaching packages --------------------------------------------------------------------------- tidyverse 1.3.0 --

## √ ggplot2 3.3.2     √ purrr   0.3.4
## √ tibble  3.0.3     √ dplyr   1.0.2
## √ tidyr   1.1.2     √ stringr 1.4.0
## √ readr   1.3.1     √ forcats 0.5.0

## Warning: 程辑包'ggplot2'是用R版本3.6.3 来建造的

## Warning: 程辑包'tibble'是用R版本3.6.3 来建造的

## Warning: 程辑包'tidyr'是用R版本3.6.3 来建造的

## Warning: 程辑包'readr'是用R版本3.6.3 来建造的

## Warning: 程辑包'purrr'是用R版本3.6.3 来建造的

## Warning: 程辑包'dplyr'是用R版本3.6.3 来建造的

## Warning: 程辑包'stringr'是用R版本3.6.3 来建造的

## Warning: 程辑包'forcats'是用R版本3.6.3 来建造的

## -- Conflicts ------------------------------------------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

list.files() %>% 
  str_subset('2018-01-01')

## [1] "2018-01-01-life-hacker.html" "2018-01-01-life-hacker.Rmd"

我应该猜出问题的所在了，不能超过当前日期。