Defines functions prepare_function is_function

# Determine whether an expression counts as a function in a magrittr chain.
# @param a non-evaluated expression.
# @return logical - TRUE if expr represents a function, FALSE otherwise.
is_function <- function(expr)
  is.symbol(expr) || is.function(expr)

# Prepare a magrittr rhs of funtion type
# @param a an expression which passes \code{is_function}
# @return an expression prepared for functional sequence construction.
prepare_function <- function(f)
  as.call(list(f, quote(.)))

Try the magrittr package in your browser

Any scripts or data that you put into this service are public.

magrittr documentation built on May 29, 2017, 12:37 p.m.