Bonjour,

Je sollicite votre aide pour une opération que je n'arrive pas à réaliser.

J'ai ce tableau

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
res= data.frame(cas=c("A", "B", "C"), gene=c("AJUD,AUJTG,UYTRR", "FRTY", "ADERT,FERT,OPOIU"))
 
  cas             gene
1   A AJUD,AUJTG,UYTRR
2   B             FRTY
3   C ADERT,FERT,OPOIU
et cette liste de gènes

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
TD_gene=c("UYTRR", "FERT","OPOIU")
[1] "UYTRR" "FERT"  "OPOIU"
et j'aimerai pouvoir obtenir le tableau suivant, soit le même tableau qu'au début mais avec une nouvelle colonne indiquant les gènes de la deuxième colonne présent dans la liste de gène TD

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
res2= data.frame(cas=c("A", "B", "C"), gene=c("AJUD,AUJTG,UYTRR", "FRTY", "ADERT,FERT,OPOIU"), gene_TD=c("UYTRR", "", "FERT,OPOIU"))
  cas             gene    gene_TD
1   A AJUD,AUJTG,UYTRR      UYTRR
2   B             FRTY           
3   C ADERT,FERT,OPOIU FERT,OPOIU
Je voulais utiliser la fonction mutate de tydiverse et la fonction grep mais je ne sais pas trop comment proccéder.

Quelqu'un aurait une idée,

Merci d'avance,

Aline