R/function.length.R

In vlulla/vlutils: Common utilities that I find useful

Defines functions function.length

Documented in function.length

function.length <-
function(func) {
  if (is.character(func)) {
    func <- match.fun(func)
  }
  length(deparse(func))
}