Récupérez les fichiers de la liste de certains motifs

Question

je les fichiers suivants:

TAMF_Flight1.txt 
TAMF_Flight1_profile.txt 
TAMF_Flight2.txt 
TAMF_Flight2_profile.txt 
... 
TAMF_Flight10.txt 
TAMF_Flight10_profile.txt 
TAMF_Flight11.txt 
TAMF_Flight11_profile.txt 

Que dois-je mettre dans le modèle pour obtenir seulement:

TAMF_Flight1.txt 
TAMF_Flight2.txt 
... 
TAMF_Flight10.txt 
TAMF_Flight11.txt 

ou seulement:

TAMF_Flight1_profile.txt 
TAMF_Flight2_profile.txt 
... 
TAMF_Flight10_profile.txt 
TAMF_Flight11_profile.txt 

Answer 1

myfiles <- c('TAMF_Flight1.txt', 
      'TAMF_Flight1_profile.txt', 
      'TAMF_Flight2.txt', 
      'TAMF_Flight2_profile.txt') 

grep("TAMF_Flight[0-9]+[^_]", myfiles, value = TRUE) 
# [1] "TAMF_Flight1.txt" "TAMF_Flight2.txt" 

grep("TAMF_Flight[0-9]+[_]", myfiles, value = TRUE) 
# [1] "TAMF_Flight1_profile.txt" "TAMF_Flight2_profile.txt" 

en utilisant le motif à l'intérieur list.files()

list.files(path = ".", pattern = "TAMF_Flight[0-9]+\\.txt") 
list.files(path = ".", pattern = "TAMF_Flight[0-9]+[_]")