Nothing
##' Area Under the Curve with Simpson's Rule
##'
##' This function computes the area under the curve using Simpson's
##' (composite) rule, for a function \code{f(x)} evaluated over equally
##' spaced points \code{x}.
##'
##' @param x A vector of values \code{x}.
##' @param y A vector of values \code{f(x)}.
simp <- function(x, y) {
return( .Call(Csimp, as.numeric(x), as.numeric(y) ) )
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.