model <- pkindirectmodel(
indirectType = "LimitedInhibition",
isBuildup = FALSE,
data = pkpdData,
ID = "ID",
Time = "Time",
A1 = "Dose",
CObs = "CObs",
EObs = "EObs"
)
# Change style of structural parameter "Imax" to "LogitNormal"
# and rename fixed effect to "tvlogitImax"
model <- structuralParameter(model,
paramName = "Imax",
style = "LogitNormal", fixedEffName = "tvlogitImax"
)
# Remove random effect for structural parameter "IC50"
model <- structuralParameter(model,
paramName = "IC50",
hasRandomEffect = FALSE
)
Run the code above in your browser using DataLab