#' @export
#'
param.intsig <- within(list(from = -4, to = 28, n = 501), {
x = seq(from, to, length.out = n)
dx = (to - from)/(n - 1)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.