supprimer des lignes

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Mokhtaria Benaouali
Messages : 13
Enregistré le : 18 Fév 2019, 12:21

supprimer des lignes

Messagepar Mokhtaria Benaouali » 15 Mai 2019, 11:16

Bonjour à tous ,
j'ai 2 tableaux avec 2 colonnes ,je voulais supprimer les lignes qui ont le même identifiant et la différence de date <=7 sans utiliser une boucle for parce que j'ai une longue table et ça me pend beaucoup de temps.
Exemple:
1 er tableau:
[id date.entrée ]
[1 2018-11-30 ]
[2 2018-06-12 ]
[3 2018-01-08 ]

éme tableau
[id date.sortie]
[1 2018-11-31]
[2 2018-08-31]
[3 2018-01-12 ]

Merci à vous !
MimiaBenna

Pierre-Yves Berrard
Messages : 686
Enregistré le : 12 Jan 2016, 23:30

Re: supprimer des lignes

Messagepar Pierre-Yves Berrard » 15 Mai 2019, 11:37

Bonjour,
Mokhtaria Benaouali a écrit : la différence de date <=7

La différence entre quoi et quoi ?
PY

Mokhtaria Benaouali
Messages : 13
Enregistré le : 18 Fév 2019, 12:21

Re: supprimer des lignes

Messagepar Mokhtaria Benaouali » 15 Mai 2019, 11:40

Pierre-Yves Berrard a écrit :Bonjour,
Mokhtaria Benaouali a écrit : la différence de date <=7

La différence entre quoi et quoi ?

la différence entre la date.entreé et date.sortie

Code : Tout sélectionner

diff(c(tab1$Date.entree.dossier,tab2$Date.sortie.dossier))<=7
MimiaBenna

Pierre-Yves Berrard
Messages : 686
Enregistré le : 12 Jan 2016, 23:30

Re: supprimer des lignes

Messagepar Pierre-Yves Berrard » 15 Mai 2019, 12:04

Sous réserve d'avoir bien compris :

Code : Tout sélectionner

library(dplyr)

id_sup7 <-
  full_join(tab1, tab2,  by = "id") %>%
  filter(Date.sortie - Date.entree > 7)

tab1_sup7 <- tab1[tab1$id %in% id_sup7$id, ]
tab2_sup7 <- tab2[tab2$id %in% id_sup7$id, ]

edit : pas sûr que la fonction diff soit adaptée
PY


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Bing [Bot] et 1 invité