Expression régulière

Bonjour,
Je souhaiterais lister les 3 premiers programmes (numérotés) R du répertoire courant. Ce code :

Code:

---

list.files(pattern="^1|^2|^3,R$")

---

fonctionne correctement.
Mais je souhaiterais l'écrire de façon un peu plus synthétique. Et le code :

Code:

---

list.files(pattern="^[1-3],R$")

---

ne fonctionne malheureusement pas

En fait, même le 1er code ne donne pas les résultats attendus (il manque un fichier dans la liste)
Le problème se situe dans la conjonction de 2 critères : la chaîne doit commencer par un nombre inférieur à 2 ET se terminer par le caractère "R"
Je ne sais pas trop si c'est possible de faire ça au moyen d'une seule expression régulière.
Mais j'ai trouvé une solution au moyen de 2 expressions :

Code:

---

1 2 3 4

intersect(list.files(pattern="^[1-3]"), list.files(pattern="R$") )

---

En fait il faudrait ajouter .+ dans l'expression régulière pour indiquer des caractères quelconques (.) en nombre inconnu (+) entre le chiffre du début et le R de la fin.

Code:

---

list.files(pattern="^[1-3].+R$")

---

Super !! Merci ! :D