So sánh mô hình Weibull và Log-Normal I
Trong bài tập này, bạn sẽ thêm các xác suất sống sót đúng vào một data frame. Data frame này sẽ được dùng để vẽ các đường cong sống sót. surv_wide là một data frame dạng rộng, chứa thông tin liệu pháp hormone và các đường cong sống sót cho mô hình Weibull và log-normal.
Các gói survival, survminer, và reshape2 cùng với dữ liệu GBSG2 đã được nạp sẵn cho bạn trong bài tập này.
Bài tập này là một phần của khóa học
Phân tích Sống sót trong R
Hướng dẫn bài tập
- Chuyển data frame sang định dạng dài (long) bằng melt.
- Dùng
surv_long$surv_idđể thêm các xác suất sống sótsurvđúng vào data frame.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# 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