caffDescstat will calculate descriptive statistics of simulated PK parameters

caffDescstat(caffPkparamData)

Arguments

caffPkparamData

data frame generated by caffPkparam function

Value

The descriptive statistics of pharmacokinetic parameters

See also

Examples

caffDescstat(caffPkparam(20,500))
#> # A tibble: 8 x 2 #> `PK parameters` `value: mean (sd) [min-max]` #> <chr> <chr> #> 1 AUC 305.90 (132.21) [153.55-629.94] #> 2 CL 1.91 (0.75) [0.79-3.26] #> 3 Cmax 30.84 (7.99) [19.27-51.49] #> 4 Half_life 6.04 (1.98) [3.59-12.06] #> 5 Ka 7.89 (9.07) [1.02-37.12] #> 6 Ke 0.12 (0.03) [0.06-0.19] #> 7 Tmax 1.02 (0.69) [0.15-2.36] #> 8 V 15.14 (3.32) [9.40-22.26]
caffDescstat(caffPkparamMulti(20,500))
#> # A tibble: 8 x 2 #> `PK parameters` `value: mean (sd) [min-max]` #> <chr> <chr> #> 1 Aavss 497.69 (152.79) [269.34-807.29] #> 2 AI 1.59 (0.28) [1.19-2.17] #> 3 AUCS 279.43 (124.04) [111.83-497.41] #> 4 Cavss 34.93 (15.50) [13.98-62.18] #> 5 CmaxS 30.88 (7.40) [17.44-45.92] #> 6 Cmaxss 54.99 (18.70) [25.55-85.13] #> 7 Cminss 20.81 (12.33) [5.31-44.93] #> 8 TmaxS 0.81 (0.68) [0.16-2.60]
caffDescExample <- cbind(caffDescstat(caffPkparam(20,500)), caffDescstat(caffPkparam(50,500))[,2]) colnames(caffDescExample)[2:3] <- c('20 kg', '50 kg') caffDescExample
#> PK parameters 20 kg 50 kg #> 1 AUC 254.35 (98.78) [134.98-510.81] 130.33 (69.53) [61.84-351.74] #> 2 CL 2.21 (0.71) [0.98-3.70] 4.70 (1.97) [1.42-8.09] #> 3 Cmax 27.74 (6.07) [18.59-39.50] 14.24 (2.98) [8.02-20.59] #> 4 Half_life 5.35 (1.46) [3.08-8.47] 5.39 (2.13) [3.31-12.34] #> 5 Ka 5.28 (6.49) [0.74-26.00] 6.68 (6.84) [0.87-25.38] #> 6 Ke 0.14 (0.04) [0.08-0.22] 0.14 (0.04) [0.06-0.21] #> 7 Tmax 1.29 (0.81) [0.20-3.27] 1.03 (0.69) [0.19-2.38] #> 8 V 15.90 (3.14) [11.12-22.00] 32.06 (6.81) [22.19-47.38]