Computes the exponential transformation, including its inverse and the first two derivatives.
explink(theta, bvalue = NULL, inverse = FALSE, deriv = 0, short = TRUE, tag = FALSE)
Numeric or character. See below for further details.
See cloglog
.
Details at Links
.
For explink
with deriv = 0
, the exponential of theta
, i.e.,
exp(theta)
when inverse = FALSE
.
And if inverse = TRUE
then
log(theta)
;
if theta
is not positive then it will return NaN
.
For deriv = 1
, then the function returns
d eta
/ d theta
as a function of theta
if inverse = FALSE
,
else if inverse = TRUE
then it returns the reciprocal.
Here, all logarithms are natural logarithms, i.e., to base e.
The exponential link function is potentially suitable for parameters that
are positive.
Numerical values of theta
close to negative or positive infinity
may result in
0
, Inf
, -Inf
, NA
or NaN
.
# NOT RUN {
theta <- rnorm(30)
explink(theta)
max(abs(explink(explink(theta), inverse = TRUE) - theta)) # Should be 0
# }
Run the code above in your browser using DataLab