Implements overall survival analysis or progression-free survival analysis, depending upon the datatypes supplied to surv_designation, and return the "survfit" object
fit_surv(omicsData)
if fitted survival analysis object is returned
if (FALSE) { # \dontrun{
library(MSomicsSTAT)
library(OvarianPepdataBP)
# Basic analysis without covariates
attr(tcga_ovarian_pepdata_bp, "survDF") <- list(t_death = "survival_time",
ind_death = "vital_status")
sfit <- fit_surv(tcga_ovarian_pepdata_bp)
plot(sfit)
# Add some covariate information
attr(tcga_ovarian_pepdata_bp, "survDF") <- list(
t_death = "survival_time",
ind_death = "vital_status",
covariates = "g__initial_pathologic_diagnosis_method_g1"
)
sfit <- fit_surv(tcga_ovarian_pepdata_bp)
plot(sfit, col = c(1, 2))
} # }