#' Value-at-risk de la loi binomiale
#' @param kappa niveau de confiance désiré
#' @param n nombres d'essais de Bernouilli
#' @param p probabilité de succès (pour chaque expérience indépendantes)
#' @export
VaR_binom <- function(kappa, n, p) qbinom(kappa, n, p)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.