Create a list containing the parameters of multiple fitted parametric survival models.
params_surv_list(...)
Objects of class params_surv
, which can be named.
An object of class params_surv_list
, which is a list containing params_surv
objects.
n <- 5
params <- params_surv_list(
# Model for progression free survival
pfs = params_surv(
coefs = list(
rate = data.frame(intercept = rnorm(n, log(.5), .5),
new_strategy = rnorm(n, log(.8), .1))
),
dist = "exp"
),
# Model for overall survival
os = params_surv(
coefs = list(
rate = data.frame(intercept = rnorm(n, log(.3) , .5))
),
dist = "exp"
)
)
summary(params)
#> model parameter term mean sd 2.5% 97.5%
#> <char> <char> <char> <num> <num> <num> <num>
#> 1: pfs rate intercept -0.9844966 0.5353715 -1.7002033 -0.51779249
#> 2: pfs rate new_strategy -0.1984423 0.1131713 -0.2875053 -0.02513626
#> 3: os rate intercept -1.0956754 0.7414058 -1.7472998 -0.19856217
params
#> A "params_surv_list" object
#>
#> Summary of coefficients:
#> model parameter term mean sd 2.5% 97.5%
#> <char> <char> <char> <num> <num> <num> <num>
#> 1: pfs rate intercept -0.9844966 0.5353715 -1.7002033 -0.51779249
#> 2: pfs rate new_strategy -0.1984423 0.1131713 -0.2875053 -0.02513626
#> 3: os rate intercept -1.0956754 0.7414058 -1.7472998 -0.19856217
#>
#> Number of parameter samples: 5
#> Distributions:
#> pfs os
#> "exp" "exp"