Вычисление модели Вейбулла и кривых выживаемости

В этом упражнении мы воспроизведём пример из видео, выполнив следующие шаги:

Вычислить модель Вейбулла
Определить «воображаемых пациентов»
Вычислить кривые выживаемости
Создать data.frame с информацией о кривых выживаемости
Построить график

В этом упражнении мы сосредоточимся на первых трёх шагах. Оставшиеся шаги будут рассмотрены в следующем упражнении.

Пакеты survival, survminer и reshape2, а также данные GBSG2 уже загружены для вас.

Это упражнение является частью курса

Анализ выживаемости в R

Посмотреть курс

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Weibull model
wbmod <- survreg(___ ~ ___ + ___, data = GBSG2)

# Imaginary patients
newdat <- expand.grid(
  horTh = levels(GBSG2$___),
  tsize = quantile(GBSG2$___, probs = c(___, ___, ___)))
newdat

Редактировать и запускать код