#' Checks whether the given function accepts \dQuote{vectorized} input.
#'
#' @template arg_smoof_function
#' @return [\code{logical(1)}]
#' \code{TRUE} if the function accepts vectorized input, \code{FALSE} otherwise.
#' @export
isVectorized = function(fn) {
UseMethod("isVectorized")
}
#' @export
isVectorized.smoof_function = function(fn) {
return(attr(fn, "vectorized"))
}
#' @export
isVectorized.smoof_wrapped_function = function(fn) {
return(isVectorized(getWrappedFunction(fn)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.