#' @name PowerExponentialPower
#' @examples
#' rpexpow(5, 2, 3, 4, 1)
#' @export
rpexpow = function(n, lambda = 1, mu= 0, sigma = 1, k = 0){
n = runif(n)
x = qpexpow(n, lambda, mu, sigma, k)
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.