17 lines
320 B
R
17 lines
320 B
R
# Riks factors
|
|
#
|
|
# License: GPL version 3
|
|
# Jens Mathis Sauer (c) 2020
|
|
|
|
source("coxph.R")
|
|
|
|
options(width = 150)
|
|
|
|
sink("risk-analysis.txt")
|
|
print("Using following risk predictors:")
|
|
print(as.data.frame(covariates))
|
|
# Show all coxph univariate models
|
|
sma_coxph_univ()
|
|
sink()
|
|
print("Output written to 'risk-analysis.txt'")
|