# \donttest{
dat <- Oral_1CPTMM
# Fit using 'nls'
Fit_1cmpt_mm_oral(
data = dat,
est.method = "nls",
input.ka = 1,
input.vmax = 1000,
input.km = 250,
input.vd = 70,
input.add = 10
)
# Return only predicted concentrations
Fit_1cmpt_mm_oral(
data = dat,
est.method = "rxSolve",
input.ka = 1,
input.vmax = 1000,
input.km = 250,
input.vd = 70,
input.add = 10
)
# }
Run the code above in your browser using DataLab