Question base de données sur R

1 pièce(s) jointe(s)

Bonjour à tous,

En fait j'ai une base de donnée "etude" avec 173 observations et 3 variable SubId, SERId et date.
Je souhaiterai créer une nouvelle variable diff_date de cette manière:

Pièce jointe 203149

En fait l'objectif au final c'est pour chaque groupe par exemple le premier groupe (1, 1, 1, 1) c'est de garder la ligne correspond à SERId =1 avec la ligne qui a une date compris entre 3 mois plus ou moins 15 jours.
Je me débrouille avec boucle for mais j'arrive pas et je pense qu'on a besoin de "while" mais j'ai un prob d’arrêter la boucle et de passer d'un groupe à l'autre car les numéros des groupes ne sont pas consécutifs (1,1,1,1,2,2,2,3,3,3,5,5,5,9,9,9).
Merci de m'aider si vous avez des idées afin de résoudre mon problème.
Merci d'avance

Bonjour,

Un tapply() avec la bonne fonction devrait faire l'affaire:
Code:

1 2 3 4 5 6 7 diff.func<-function(x){return(x-x[1])} diff_date<-unlist(tapply(etude$date,etude$SubId,diff.func)) etude$diff_date=diff_date

Salut,

Un GRAND merci Sengar, le code marchait super bien :) :bravo: