library(cheapr)
l <- list(1:10,
NULL,
list(integer(), NA_integer_, 2:10))
lengths_(l) # Faster lengths()
unlisted_length(l) # length of vector if we unlist
paste0("length: ", length(print(unlist(l))))
unlisted_length(l) - na_count(l) # Number of non-NA elements
# We can create and initialise a new list with a default value
l <- new_list(20, 0L)
l[1:5]
# This works well with vctrs_list_of objects
Run the code above in your browser using DataLab