je travaille sur une base de données observationnelle collectant l'administration d'antibiotiques sur une période de 30 jours.
Les variables sont les suivantes:
- antibiotique à J1 variable factorielle (0=non, 1=oui) : atb_J1
- antibiotique à J2 variable factorielle (0=non, 1=oui) : atb_J2
- antibiotique à J3 variable factorielle (0=non, 1=oui) : atb_J3
...
- Date J1: date_J1
- Date J2: date_J2
...
Je souhaiterais trouver une solution pour identifier le dernier jour de traitement sans avoir à écrire un script compliqué utilisant "ifelse()" pour chacun des jours
Code : Tout sélectionner
db$date_stop<-ifelse(db$atb_J2=="0", db$date_J1,
ifelse(db$atb_J3=="0", db$date_J2,
ifelse(db$atb_J4=="0", db$date_J3,
....))
Merci de vos conseils,
Tài Pham