Les notes de cours sont autorisées

• Chapter 1 R for Chapter 1
• Chapter 2 R for Chapter 2
• Chapter 3 R for Chapter 3

• Enoncé
• Début de code
• Data

• Enoncé
• Les données sont disponibles dans le package KMsurv
• Correction

• Enoncé
• Correction

• Enoncé
• Questionnaire google pour déclarer les équipes et uploader votre rapport

wpbc = read_delim(“./wpbc.data.txt”,delim=“,”,col_names=F,na = '?')

names_cov = paste0(rep(c('radius','texture','perimeter','area','smoothness','compactness',

                       'concavity','concave points','symmetry','fractal dimension'),3),
                 c(rep('_mean',10),rep('_SD',10),rep('_worst',10)))

names(wpbc) = c('id','recurrent','time',names_cov,c('Tumor size','Lymph node status'))

wpbc = wpbc %>% mutate(id = factor(id)) %>%

              mutate( recurrent = recode_factor(recurrent , "N" = FALSE, 'R' = TRUE )) 

glimpse(wpbc)