data-raw/pbc5_script.R

library(survival)
library(dplyr)

pbc5 <- pbc %>%
  slice(1:312) %>%
  select(time, status, age, edema, bili, albumin, protime) %>%
  mutate(status = (status==2)*1, bili = log(bili), protime = log(protime))
liangcj/hds documentation built on May 21, 2019, 6:11 a.m.