Weibull और Log-Normal मॉडल की तुलना I
इस अभ्यास में, हम सही survival probabilities एक डेटा फ़्रेम में जोड़ना चाहते हैं. यह डेटा फ़्रेम survival curves प्लॉट करने के लिए इस्तेमाल होगा. surv_wide एक wide डेटा फ़्रेम है जिसमें hormonal therapy की जानकारी और Weibull तथा log-normal मॉडलों की survival curves शामिल हैं.
इस अभ्यास के लिए survival, survminer, और reshape2 पैकेज तथा GBSG2 डेटा आपके लिए पहले से लोड किए गए हैं.
यह अभ्यास पाठ्यक्रम का हिस्सा है
R में Survival Analysis
अभ्यास निर्देश
- डेटा फ़्रेम को long फ़ॉर्मेट में melt करें.
surv_long$surv_idका उपयोग करके सही survival probabilitiessurvडेटा फ़्रेम में जोड़ें.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Melt the data.frame into long format.
surv_long <- melt(surv_wide, ___ = c("horTh", "dist"), ___ = "surv_id", ___ = "time")
# Add column for the survival probabilities
surv_long$surv <- surv[as.numeric(surv_long$___)]
# Add columns upper, lower, std.err, and strata contianing NA values
surv_long[, c("upper", "lower", "std.err", "strata")] <- NA