#' Draw random inverse gamma variates
#' @export
rinvgamma <- function(n, a, b){
.Call("rinvgammaR",
as.integer(n),
a, b,
PACKAGE = "dpOMP")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.