powered by
Inverse of Emax function used by Eleveld population PK model.
emax_inv_eleveld(pdresp, pars)
Numeric vector of same length as pdresp.
PD response values
Named vector of parameter values with names (c50,gamma,E0,Emx).
pars_emax_eleveld <- c(c50 = 1.5, e0 = 100, gamma = 1.47, gamma2 = 1.89) ce_seq <- seq(0,4,0.1) all.equal(emax_inv_eleveld(emax_eleveld(ce_seq, pars_emax_eleveld), pars_emax_eleveld), ce_seq)
Run the code above in your browser using DataLab