Differences

This shows you the differences between two versions of the page.

--- members:aguilloux:enseignements:survivalanalysis [2019/10/22 09:13]
Agathe Guilloux
+++ members:aguilloux:enseignements:survivalanalysis [2019/10/22 09:58]
Agathe Guilloux [Longitudinal and survival data analysis (M2DSSAF et ENSIIE)]
@@ Line 25: / Line 25: @@
 == Lab 4 ==
   * {{:members:aguilloux:enseignements:m2ds_surv:lab4_project.pdf| Enoncé}}
+  * [[https://docs.google.com/forms/d/1ciOUQoNZk9h4hcm0eZLm-ykjFHGNhkJNc2mPuaUSd54/edit?usp=sharing|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)