Calculating ED following the regulatory ED definition.

Calculating ED following the regulatory ED definition.

Deprecated helper function for ED calculation

Usage

# S3 method for class 'plus'
ED(
  object,
  respLev,
  maxEff = TRUE,
  trend = "Increase",
  range = "Percentage",
  CI = c("delta", "inv", "bmd-inv"),
  ...
)

# S3 method for class 'ZG'
ED(...)

Arguments

object

fitted model using drc::drm

respLev

response level, the x of ECx.

maxEff

Not used for now. maximum effect.

trend

Increase of Decrease, whether the dose response is decreasing or increasing compared control.

range

using Percentage, not used for now.

CI

methods to calculate the confidence intervals, either "inv", "bmd-inv",(bmd) or "delta" or "fls".

...

other parameters for ED function

Value

Back calculated regulatory ECx

Details

Due to old ECxHelper development where ED.plus is defined as ED.ZG

See also

ED.plus() for the public version of usage

Examples

if (FALSE) { # \dontrun{
data("dat_medium")
dat_medium <- dat_medium %>% mutate(Treatment=factor(Dose,levels=unique(Dose)))
dat_medium$Response[dat_medium$Response < 0] <- 0
mod <- drm(Response~Dose,data=dat_medium,fct=LL.3())
fctList <- list(LN.4(),LL.4(),W1.3(),LL2.2())
res <- mselect.plus(mod,fctList = fctList )
modList <- res$modList
mod <-modList[[1]]
edres <- ED.plus(mod,c(10,50),trend="Decrease")
} # }