
campsismod must be installed beforehandrxode2 or
mrgsolve)Install the latest stable release using devtools:
devtools::install_github("Calvagone/campsis")Import the campsis package:
library(campsis)Create your dataset:
ds <- Dataset(50) %>%
add(Bolus(time=0, amount=1000, ii=12, addl=2)) %>%
add(Observations(times=seq(0, 36, by=0.5)))Load your own model or use a built-in model from the library:
model <- model_suite$pk$`2cpt_fo`Simulate your results with your preferred simulation engine
(rxode2 or mrgsolve):
results <- model %>% simulate(dataset=ds, dest="rxode2", seed=1)Plot your results:
shadedPlot(results, "CONC")