Importer plusieurs fichiers CSV R

Bonjour à tous,

Je viens vers vous car j'ai un problème que je n'arrive pas à résoudre.
J'ai environ 2000 fichiers csv que je souhaiterais importer dans une même et unique table sur R.
Ceux-ci se présentent de la manière suivante : VILLE_JJ_MM_AAAA.csv

Tous ces fichiers se trouvent dans un dossier : D:/Rep/..../dossier

Est-il possible d'importer tous les fichiers d'un même dossier en sachant que j'ai 4 villes différentes.
Idéalement, chaque ville aurait une table sur R.

Je ne sais pas si ce que je demande est réalisable, mais dans le doute je viens vers vous :mouarf:

MERCI A VOUS POUR VOTRE TEMPS !

Bonjour,

Voici une proposition :

Code:

---

1 2 3

setwd("D:/Rep/..../dossier") liste_fichiers <- list.files(".", pattern="csv") n=length(liste_fichiers)

---

Code:

---

1 2 3 4

df_paris <- data.frame() df_lyon <- data.frame() df_avignon <- data.frame() df_marseille <- data.frame()

---

Code:

---

1 2 3 4 5 6 7 8

library(stringr) library(dplyr) for (i in 1:n) { ville <- unlist(str_split(liste_fichiers[i],"_"))[1] df <- read.csv(liste_fichiers[i]) assign(str_c("df_",ville), bind_rows(get(str_c("df_",ville)),df)) }

---

Code:

---

1 2 3 4

df_paris df_lyon df_avignon df_marseille

---

Cordialement,

Un petite modification par rapport à la proposition de mgdondon, éviter le setwd assez casse-gueule (on change le répertoire de travail !), utiliser directement

Code:

---

liste_fichiers <- list.files("D:/Rep/..../dossier", pattern="csv$", full.names=TRUE)

---

Bonjour,

Tout est dans l'option full.names=TRUE, merci.

Par contre ça complique l'extraction de la ville.

Cordialement,

Citation:

---

Par contre ça complique l'extraction de la ville.

---

Pas tant que cela, il suffit d'utiliser la fonction basename, ce qui donnera dans le script suggéré par mgdondon :

Code:

---

ville <- unlist( basename( str_split(liste_fichiers[i],"_")))[1]

---

Merci pour la fonction basename() (il faut inverser les fonctions unlist() et basename()).

Code:

---

ville <- basename(unlist(str_split(liste_fichiers[i],"_")))[1]

---

Cordialement,