Loop sous dossiers et extraire données de fichiers CSV
Bonjour à tous,
Je suis un peu coincé dans une manipulation dans R :
Je cherche à lister tous les sous-dossiers de mon répertoire de travail et extraire la seconde et dernière donnée d'un fichier 'data.csv' présent dans chacun d'entre eux.
J'aimerai ensuite créer un dataframe ayant la structure suivante :
Citation:
Name_folder_1 2nd value Last value
Name_folder_2 2nd value Last value
Name_folder_3 2nd value Last value
Pour l'heure, j'arrive à lister les sous-dossiers et les fichiers csv correspondants mais je n'arrive pas à les ouvrir à tour de rôle et en extraire les valeurs désirées.
Voici ce que j'ai jusqu'à présent :
Code:
1
2
3
4
5
6
7
8
9
10
| parent.folder <- "C:/Users/Desktop/test"
setwd(parent.folder)
sub.folders1 <- list.dirs(parent.folder, recursive = FALSE)
r.scripts <- file.path(sub.folders1)
files.v <- list()
for (j in seq_along(r.scripts)) {
files.v[j] <- dir(r.scripts[j],"data$")
} |
Je suppose que je dois implémenter une nested loop mais je cale vraiment sur les étapes suivantes. Merci d'avance pour l'aide proposée !
CL
