#' @rdname csSAM-internal make.monotone <- function(x) { n=length(x) for(j in 2:n){ x[j]=min(x[j-1],x[j])} return(x) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.