library(pryr) a <- list(rep(1, 1e5)) b <- list(a) object_size(a)
## 800 kB
object_size(b)
object_size(a, b)