Discussion :

[eemelg]

Bonjour à tous,

J'ai deux tableaux avec environ 1000 individus. La plupart de ces individus sont communs aux deux tableaux, et je voudrais enlever de chacun de ces tableaux les individus qui ne sont pas présents dans l'autre.
J'ai déjà utilisé la fonction match entre mes deux colonnes d'individus, et je voudrais savoir si une fonction existe pour supprimer les individus n'existant pas dans l'autre tableau à partir de la fonction match.
L'idée à la fin est d'avoir deux tableaux, avec le même nombre d'individus et classés de la même façon.

Merci de vos réponses.

[mgdondon]

Bonjour,

Vous pouvez utiliser la fonction merge() :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
> df1 <- data.frame(numind=c(1,2,3,4,5,6,10,11,12,13,14,15),
+                   V1=c(1,1,1,1,1,1,1,1,1,1,1,1))
> df1.numind <- data.frame(numind=df1$numind)
> df2 <- data.frame(numind=c(11,12,13,14,15,1,2,3,7,8,9,10),
+                   V2=c(2,2,2,2,2,2,2,2,2,2,2,2))
> df2.numind <- data.frame(numind=df2$numind)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
> df1 <- merge(df1,df2.numind,by="numind")
> df1
  numind V1
1      1  1
2      2  1
3      3  1
4     10  1
5     11  1
6     12  1
7     13  1
8     14  1
9     15  1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
> df2 <- merge(df2,df1.numind,by="numind")
> df2
  numind V2
1      1  2
2      2  2
3      3  2
4     10  2
5     11  2
6     12  2
7     13  2
8     14  2
9     15  2

Cordialement,

[eemelg]

Super astuce ! Merci beaucoup