cedergreen {drc}R Documentation

The Cedergreen-Ritz-Streibig model

Description

'cedergreen' provides a very general way of specifying then Cedergreen-Ritz-Streibig modified log-logistic model for describing hormesis, under various constraints on the parameters.

For u-shaped hormesis data 'ucedergreen' provides a very general way of specifying the Cedergreen-Ritz-Streibig modified log-logistic model, under various constraints on the parameters.

Usage

  cedergreen(lowerc = c(-Inf, -Inf, -Inf, -Inf, -Inf), 
  upperc = c(Inf, Inf, Inf, Inf, Inf), fixed = c(NA, NA, NA, NA, NA), 
  names = c("b", "c", "d", "e", "f"), alpha, scaleDose = TRUE)
  
  ucedergreen(lowerc = c(-Inf, -Inf, -Inf, -Inf, -Inf), 
  upperc = c(Inf, Inf, Inf, Inf, Inf), fixed = c(NA, NA, NA, NA, NA), 
  names = c("b", "c", "d", "e", "f"), alpha, scaleDose = TRUE)

Arguments

lowerc numeric vector. The lower bound on parameters. Default is minus infinity.
upperc numeric vector. The upper bound on parameters. Default is plus infinity.
fixed numeric vector. Specifies which parameters are fixed and at what value they are fixed. NAs for parameter that are not fixed.
names a vector of character strings giving the names of the parameters (should not contain ":"). The default is reasonable (see under 'Usage'). The order of the parameters is: b, c, d, e, f (see under 'Details').
alpha numeric. The degree of hormesis. Needs to be specified!
scaleDose logical. If TRUE dose values are scaled around 1 during estimation; this is required for datasets where all dose values are small.

Details

The model is given by the expression

f(x) = c + frac{d-c+f exp(-1/(x^{α}))}{1+exp(b(log(x)-log(e)))}

which is a five-parameter model (alpha is fixed).

It is a modification of the four-parameter logistic curve to take hormesis into account.

The u-shaped model is given by the expression

f(x) = c + d - frac{d-c+f exp(-1/x^{α})}{1+exp(b(log(x)-log(e)))}

Value

The value returned is a list containing the non-linear function, the self starter function and the parameter names.

Note

The functions are for use with the functions drm or multdrc.

Author(s)

Christian Ritz

References

Cedergreen, N. and Ritz, C. and Streibig, J. C. (2005) Improved empirical models describing hormesis, Environmental Toxicology and Chemistry {bold 24}, 3166–3172.

See Also

Special cases are CRS.4a, CRS.4a, UCRS.5a and UCRS.5a where a,b and c coresspond to the pre-specified alpha values 1, 0.5 and 0.25, respectively.

Examples


## Modified logistic model with the constraint f>0
model1 <- multdrc(hormesis[,c(2,1)], 
fct=cedergreen(fixed=c(NA, NA, NA, NA, NA), 
lowerc=c(-Inf, -Inf, -Inf, -Inf, 0), alpha=1), 
control=mdControl(constr=TRUE))

summary(model1)
ED(model1, c(10, 50, 90))

rm(model1)


[Package drc version 1.1-0 Index]