IS
> as_tibble(curs[1:3]) %>% rename(dt = date)
# A tibble: 471 x 3
units R01235 dt
<dbl> <dbl> <date>
1 1 65.5 2019-05-14
2 1 65.3 2019-05-15
3 1 64.8 2019-05-16
4 1 64.6 2019-05-17
5 1 64.6 2019-05-18
6 1 64.5 2019-05-21
7 1 64.5 2019-05-22
8 1 64.4 2019-05-23
9 1 64.5 2019-05-24
10 1 64.6 2019-05-25
# ... with 461 more rows