J'aurais besoin d'un petit coup de pouce car je suis totalement bloquée, voici mon df :
Code : Tout sélectionner
df<-data.frame(patient=c(1,1,1,1,2,2),
med=c("med1", "med1", "med1", "med2", "med3", "med4"),
date=c("d1", "d2", "d3", "d1", "d4", "d5"))
Code : Tout sélectionner
patient med date
1 1 med1 d1
2 1 med1 d2
3 1 med1 d3
4 1 med2 d1
5 2 med3 d4
6 2 med4 d5
Et j'aimerai obtenir ceci :
Code : Tout sélectionner
patient med nb_occurence periode nb_med_diff
1 1 med1 3 d3-d1 2
2 1 med2 1 d1 2
3 2 med3 1 d4 2
4 2 med4 1 d5 2
Il s'agit pour chaque patient, de résumer la ligne médicament en comptant le nombre d'occurence pour celui-ci ainsi que la période sur laquelle il est donné.
Pour l'instant, je ne sais compter que le nombre de med différents pour chaque patient grâce à :
Code : Tout sélectionner
test_med <-
df %>%
group_by(patient) %>%
summarise(
nb_med_diff = n_distinct(med)
)
Si quelqu'un a une piste sur laquelle chercher, je suis preneuse!
Merci d'avance, et bonne journée