Nothing
tests/testthat/helpers/recover_betas.R
In simsurv: Simulate Survival Data
recover_betas <- function(mod) {
nms <- names(mod$coefficients)
nms_drop <- c("log(scale)", "log(shape)")
sel <- setdiff(nms, nms_drop)
if (length(sel)) as.list(mod$coefficients[sel]) else NULL
}
Try the simsurv package in your browser
Any scripts or data that you put into this service are public.
simsurv documentation built on Jan. 16, 2021, 5:27 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
recover_betas <- function(mod) {
nms <- names(mod$coefficients)
nms_drop <- c("log(scale)", "log(shape)")
sel <- setdiff(nms, nms_drop)
if (length(sel)) as.list(mod$coefficients[sel]) else NULL
}
Try the simsurv package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.