R/mdmb_exp_overflow.R

Defines functions mdmb_exp_overflow

## File Name: mdmb_exp_overflow.R
## File Version: 0.05

mdmb_exp_overflow <- function(x, M=200)
{
    x <- ifelse( x > M, M, x)
    y <- exp(x)
    return(y)
}
alexanderrobitzsch/mdmb documentation built on July 18, 2024, 11:14 p.m.