Weibull 모델과 로그-정규 모델 비교 I
이 연습에서는 생존 곡선을 그릴 수 있도록, 올바른 생존확률을 데이터 프레임에 추가해 보겠습니다. surv_wide는 호르몬 치료 정보와 Weibull 및 로그-정규 모델의 생존 곡선을 담고 있는 와이드 포맷 데이터 프레임입니다.
이 연습에서는 survival, survminer, reshape2 패키지와 GBSG2 데이터가 이미 로드되어 있습니다.
이 연습은 강의의 일부입니다
R로 배우는 생존 분석
연습 안내
- 데이터 프레임을 롱 포맷으로 melt 하세요.
surv_long$surv_id를 사용해 올바른 생존확률surv를 데이터 프레임에 추가하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# 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