#' @export smooth3 <- function(data, filt = "b", sz = 3) { padsize <- (sz - 1) / 2 ones(sz) / prod(sz) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.