# say you have some list
list1 = list(1:5, runif(3), rnorm(4))
# get the sum of all elements in list1
funlist(list1, sum)
# get the maximum element in list1
funlist(list1, max)
# say you have missing data
list2 = list(c(1:4, NA), runif(3), rnorm(4))
# get the sum removing NAs
funlist(list2, sum, na.rm=TRUE)
Run the code above in your browser using DataLab