33# =============================================================================
44
55# Import the previous code that returns the fitted Pumas model
6- include(joinpath(@__DIR__, " .." ," 01- TeachingMaterial" ," 02- population_pkpd" ," 03-pkpd_model_fitting.jl" ) ) # to get warfarin_model and warfarin_model_fit
6+ include(joinpath(@__DIR__, " .." ," TeachingMaterial" ," population_pkpd" ," 03-pkpd_model_fitting.jl" )) # to get warfarin_model and warfarin_model_fit
77
88# -----------------------------------------------------------------------------
99# 1. PACKAGES
@@ -51,11 +51,11 @@ sim_150 = simobs(
5151)
5252
5353# Plot:
54- sim_plot(warfarin_model, sim_50; observations = [:conc], axis = (; limits = ( nothing , ( 0 , 30 ))) )
55- sim_plot(warfarin_model, sim_150; observations = [:conc], axis = (; limits = ( nothing , ( 0 , 30 ))) )
54+ sim_plot(warfarin_model, sim_50; observations = [:conc])
55+ sim_plot(warfarin_model, sim_150; observations = [:conc])
5656
57- sim_plot(warfarin_model, sim_50; observations = [:pca], axis = (; limits = ( nothing , ( 0 , 150 ))) )
58- sim_plot(warfarin_model, sim_150; observations = [:pca], axis = (; limits = ( nothing , ( 0 , 150 ))) )
57+ sim_plot(warfarin_model, sim_50; observations = [:pca])
58+ sim_plot(warfarin_model, sim_150; observations = [:pca])
5959
6060
6161# -----------------------------------------------------------------------------
@@ -70,7 +70,7 @@ Using the warfarin PK-PD model:
70702. Explore the effect on PK and PCA
7171"""
7272
73- # Create DosagRegimen object for daily doses of 50 for a week:
73+ # Create DosagRegimen objects for daily doses of 50 and 150 for a week:
7474dose_50qd = DosageRegimen(50 ; time = 0 , ii = 24 , addl = 6 )
7575dose_150qd = DosageRegimen(150 ; time = 0 , ii = 24 , addl = 6 )
7676# Create a population for each new dosing regimen:
@@ -91,11 +91,11 @@ sim_150qd = simobs(
9191 obstimes = 0.0 : 1 : 150.0 , # Fine time grid
9292)
9393# Plot:
94- sim_plot(warfarin_model, sim_50qd; observations = [:conc], axis = (; limits = ( nothing , ( 0 , 80 ))) )
95- sim_plot(warfarin_model, sim_150qd; observations = [:conc], axis = (; limits = ( nothing , ( 0 , 80 ))) )
94+ sim_plot(warfarin_model, sim_50qd; observations = [:conc])
95+ sim_plot(warfarin_model, sim_150qd; observations = [:conc])
9696
97- sim_plot(warfarin_model, sim_50qd; observations = [:pca], axis = (; limits = ( nothing , ( 0 , 80 ))) )
98- sim_plot(warfarin_model, sim_150qd; observations = [:pca], axis = (; limits = ( nothing , ( 0 , 80 ))) )
97+ sim_plot(warfarin_model, sim_50qd; observations = [:pca])
98+ sim_plot(warfarin_model, sim_150qd; observations = [:pca])
9999
100100
101101# -----------------------------------------------------------------------------
@@ -128,7 +128,3 @@ new_sim = simobs(
128128# Plot:
129129sim_plot(warfarin_model, new_sim; observations = [:conc])
130130sim_plot(warfarin_model, new_sim; observations = [:pca])
131-
132-
133-
134-
0 commit comments