Discussion :

[Chloé10]

Bonjour, je bloque sur la première question d'un exercice dont l'énoncé est le suivant :

Vous disposez d'un fichier contenant > 500 000 entrée et composé de 11 colonnes (forest_covertype.tsv) ; la dernière colonne code numériquement le type de couverture forestière rencontrée sur différents terrains ; vous disposez d'un deuxième fichier (forest_cover-type_companion-infos.txt) contenant l'équivalence entre le numéro de code et le type de couverture
- écrivez un programme (forest_analyse.pl) permettant d'obtenir la fréquence de chaque type de couverture forestière dans le fichier de données (la couverture forestière se trouve en colonne 11)

Je ne saisis pas comment pouvoir travailler sur une seule colonne parmi les 11 présentes et ainsi pouvoir réussir à afficher ce qu'il m'est demandé. Je travaille sur Komodo.

Merci d'avance

[disedorgue]

Bonjour et Bienvenue,

Ton exercice est:
-Ouvrir le fichier
-boucler sur chaque ligne pour récupérer le champs 11 et en faire quelque chose.
-fermer le fichier

En exemple, prenons un fichier de 2 colonne et affichons la 2ème colonne:
Le fichier /tmp/col.tsv ressemble à:

Code :

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

1
2
titi    toto
tata    tutu

Le bout de code perl:

Code :

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

1
2
3
4
5
6
open(my $fh, "<", "/tmp/col.tsv") or die $!
while(<$fh>){
  my @XX=split(/\t/)
  print $XX[1]
}
close($fh)'

ce qui affichera:

Code :

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

1
2
toto
tutu

[Lolo78]

Bonjour,

dans ce cas, comme on s'intéresse à la dernière colonne de la ligne, il est sans doute plus sûr pour la suite de commencer par retirer les caractères de fin de ligne. Par ailleurs, comme il faut faire une sorte d'histogramme des différentes couvertures forestières, il est utile de déclarer avant de commencer un hachage (ou à la rigueur un tableau, cela dépend du codage numérique des types de couvertures forestières) contenant la fréquence d'apparition pour chaque couverture.

Cela peut donner quelque chose comme suit:

Code :

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

1
2
3
4
5
6
7
8
9
10
 
my %frequences;                                    # déclaration du hachage de compteurs (histogramme)
my $infile = "path_to/forest_covertype.tsv";
open my $FH, "<", $infile or die "Ouverture impossible de $infile $!";
while (my $line = <$FH>) {
    chomp $line;                                   # retirer les caractères de fin de ligne
    my $couverture  = (split /\t/, $line)[10];     # splitte la ligne et récupère le 11ème champ
    $frequences{$couverture}++;                    # on incrémente le compteur correspondant à cette couverture
}
close $FH;

Il te reste à lire l'autre fichier afin d'établir une table de correspondance entre le code de la couverture forestière et son libellé, puis d'afficher ton résultat.

[olivier1969]

Code :

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

my $couverture  = (split /\t/, $line)[-1];

récupérera la dernière colonne , quelque soit le nombre de colonnes