#' A helper function.
#'
#' @param
#' x A vector to be mapped to the unit simplex.
#' @export
softmax <- function(x)
{
X = exp(x)
S = sum(X)
return(X/S)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.