Internalized function
This commit is contained in:
parent
9553105363
commit
3f41629c09
1 changed files with 0 additions and 1 deletions
|
|
@ -4,7 +4,6 @@
|
|||
#' @param b rate
|
||||
#' @return One realization of Gamma(a, b)
|
||||
#' @details The generated random variable has mean a / b. It will be positively-skewed for small values, but converges to a symmetric distribution for very large numbers of a and b.
|
||||
#' @export
|
||||
randga <- function (a, b) {
|
||||
flag <- 0
|
||||
if (a > 1) {
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue