mod <- mrgsolve::house()
mod <- mrgsolve::ev(mod, amt = 100)
out_each <- parseq_cv(mod, CL, VC, .n = 3) %>% sens_each()
sens_plot(out_each, dv_name = "CP,RESP", layout = "facet_grid")
out_grid <- parseq_cv(mod, CL, VC) %>% sens_grid()
sens_plot(out_grid, dv_name = "CP")
Run the code above in your browser using DataLab