NegInv_link object provides a way to implement negative inverse link function that
maxlogL needs to perform estimation. See documentation for
maxlogL for further information on parameter estimation and implementation
of link objects.
NegInv_link is part of a family of generic functions with no input arguments that
defines and returns a list with details of the link function:
name: a character string with the name of the link function.
g: implementation of the link function as a generic function in
g_inv: implementation of the inverse link function as a generic function
There is a way to add new mapping functions. The user must specify the details aforesaid.
A list with negative inverse link function, its inverse and its name.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
# Estimation of rate parameter in exponential distribution T <- rexp(n = 1000, rate = 3) lambda <- maxlogL(x = T, dist = "dexp", start = 5, link = list(over = "rate", fun = "NegInv_link")) summary(lambda) # Link function name fun <- NegInv_link()$name print(fun) # Link function g <- NegInv_link()$g curve(g(x), from = 0.1, to = 1) # Inverse link function ginv <- NegInv_link()$g_inv curve(ginv(x), from = 0.1, to = 1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.