#' Print a SOO function.
#'
#' @param x [\code{\link{soo_function}}] A \code{\link{soo_function}} object.
#' @param ... Ignored.
#' @export
#' @method print soo_function
#' @method print soo_function
print.soo_function <- function(x, ...) {
cat(function_name(x), "\n",
" Lower bounds: (", paste(lower_bounds(x), collapse=", "), ")\n",
" Upper bounds: (", paste(upper_bounds(x), collapse=", "), ")\n", sep="")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.