Функция в пакете выживания R, чтобы получить базовый уровень опасности basehaz
.
Затем вам нужно умножить его на различные значения чтобы получить конкретную степень опасности с учетом найденных вами коэффициентов.еβ
Простой пример может помочь:
library(survival) #survival analysis
library(eha) #used for data
data(oldmort) #create the data
# Create surv data set
mort <- Surv(time=oldmort$enter,time2=oldmort$exit,event=oldmort$event)
reg_fit <- coxph(formula=mort~oldmort$sex)
summary(reg_fit)
# Now get baseline curve
baseline <- basehaz(reg_fit)
# Draw baseline hazard (that's male)
plot(baseline$time, baseline$hazard, type='l',main="Hazard rates")
# Draw female hazard
lines(baseline$time, exp(-0.1929)*baseline$hazard, col="blue")
копировании и вставке из итоговых результатов регрессии Кокса, , подразумевая , что женщины в данных имеют показатели опасности ниже , чем у мужчин.ехр( - 0,1929 ) = 0,8245summary(reg_fit)
18 %