Discussion :

[fanfanus]

Bonjour à tous,

Je suis débutant dans R. Afin de vérifier mes fichiers de données (qui sont des tableaux avec des valeurs séparées par des espaces en format .txt), je cherche à compter le nombre de colonnes dans chacun de ces fichiers.

J'ai donc réalisé la formule suivante qui fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ncol(read.table("mon_fichier.txt", header = FALSE, sep = ""))

Le problème, c'est que j'ai 257 fichiers à vérifier ! Autrement dit, il me faudrait automatiser cette fonction pour que j'obtienne le nombre de colonnes dans chacun de ces fichiers.

Pourriez-vous m'aider ?

Merci beaucoup par avance.

[mgdondon]

Bonjour,

Une proposition de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
liste_fichiers <- list.files("D:/data", pattern="txt")
n=length(liste_fichiers)
nbcol_fichiers <- data.frame(matrix(NA,ncol = 2, nrow = n))
colnames(nbcol_fichiers) <- c("fichier","nbcol")
for (i in 1:n) 
  {
  nbcol_fichiers[i,1] <- liste_fichiers[i]
  nbcol_fichiers[i,2] <- ncol(read.table(liste_fichiers[i], header = FALSE, sep = ""))
  }
nbcol_fichiers

Cordialement,

[fanfanus]

Merci beaucoup.

[faubry]

Le code de mgdondon est valide mais il est aussi possible d'utiliser les fonctions de liste de R à la place de la boucle for :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nbcol_fichiers <- vapply( liste_fichiers, FUN=function( nom) ncol( read.table( nom, header=FALSE, sep="")), FUN.VALUE=1)

on obtient alors un vecteur nommé