funs(mean, "mean", mean(., na.rm = TRUE))
# Overide default names
funs(m1 = mean, m2 = "mean", m3 = mean(., na.rm = TRUE))
# If you have a function names in a vector, use funs_q
fs <- c("min", "max")
funs_(fs)
Run the code above in your browser using DataLab