powered by
pool(..., weights = 1)pool_(dots, weights = 1)
pool_(dots, weights = 1)
surv_pooled
dist1 <- define_survival(distribution = "exp", rate = .5) dist2 <- define_survival(distribution = "gompertz", rate = .5, shape = 1) pooled_dist <- pool(dist1, dist2, weights = c(0.25, 0.75))
Run the code above in your browser using DataLab