# \donttest{
# Create a linear antibiotic model (recommended - stable constructors)
params <- LinearAbxModel()
model <- newCppModel(params)
# Access model properties
inColParams <- model$InColParams
insituParams <- model$InsituParams
# Get parameter values
paramValues <- inColParams$values
# Get parameter names (if available)
paramNames <- inColParams$names
# Create a log-normal model
params <- LogNormalModelParams("LogNormalModel")
model <- newCppModel(params, verbose = TRUE)
# }
Run the code above in your browser using DataLab