Beginning Test Run

[jeslo328]

Hello Im trying PKPDSim and ran the below code as in the site: install.packages("PKPDsim") library(PKPDsim) library(ggplot2)

pk2 <- new_ode_model( code = "dAdt[1] = -(CL/V) * A[1]", obs = list(cmt = 1, scale = "V"), dose = list(cmt = 1) ) r2 <- new_regimen( amt = 100, n = 5, interval = 12, type = "infusion", t_inf = 2 ) dat2 <- sim( ode = pk2, parameters = p, regimen = r2, only_obs = TRUE ) ggplot(dat2, aes(x = t, y = y)) + geom_line()

compared to the ones in the site

Can you help advice what is not right here please Thank you Jesmin