Don't Do What Donny Don't Does

Donny Don't!

big_ints <- list(
  1:10 %>% bit64::as.integer64(),
  11:20 %>% bit64::as.integer64()
)

## [[1]]
## integer64
##  [1] 1  2  3  4  5  6  7  8  9  10
## 
## [[2]]
## integer64
##  [1] 11 12 13 14 15 16 17 18 19 20

big_ints %>% unlist()

##  [1] 4.940656e-324 9.881313e-324 1.482197e-323 1.976263e-323 2.470328e-323
##  [6] 2.964394e-323 3.458460e-323 3.952525e-323 4.446591e-323 4.940656e-323
## [11] 5.434722e-323 5.928788e-323 6.422853e-323 6.916919e-323 7.410985e-323
## [16] 7.905050e-323 8.399116e-323 8.893182e-323 9.387247e-323 9.881313e-323

dates <- list(
  runif(3, 0, 10000) %>% lubridate::as_date(), 
  runif(3, 0, 10000) %>% lubridate::as_date()
)

## [[1]]
## [1] "1992-06-12" "1990-04-04" "1994-07-16"
## 
## [[2]]
## [1] "1993-04-14" "1981-05-13" "1981-04-15"

dates %>% unlist()

## [1] 8198.940 7398.387 8962.279 8504.193 4150.349 4122.656

big_ints %>% purrr::reduce(c)

## integer64
##  [1] 1  2  3  4  5  6  7  8  9  10 11 12 13 14 15 16 17 18 19 20

dates %>% purrr::reduce(c)

## [1] "1992-06-12" "1990-04-04" "1994-07-16" "1993-04-14" "1981-05-13"
## [6] "1981-04-15"