Bonjour,
Je suis à la recherche d\'un programme qui permet d\'afficher une séquence de fréquence des catégories. Je dois en fait afficher au moins 5 collocations. J\'ai essai ce script mais cela ne m\'affiche que 2 suites de catégories. QQ1 pourai résoudre mon pb svp?
use strict;
use locale;
my $ligne;
my $forme;
my $cat;
my $lemme;
my $collo;
my $i;
my $j;
my $motcle;
my @temp;
my %cooc ;
while ($ligne = <>) { #lire le fichier
chomp $ligne;
( $forme, $cat, $lemme ) = split( /\\t/, $ligne ); #segmentation de texte en 3 tableaux;
if ( $cat ne \"SENT\" ) { #quand on rencontre \"sent\", on fait rien, si il n\'y a pas \"sent\",
#alors on va executer les procédé suivants;
push ( @temp, $cat ); #rajoute en meme temps la variable $cat pour notre analyse plus tard;
}
else {
for ( $i = 0; $i <= $#temp; $i++ ) {
$motcle = lc( $temp[$i] );
for ( my $j = $i-5; $j <= $i+5; $j++ )#2 à 5 collocation/cooccurrence
{
if ( ( $j >= -5 ) and
( $j <= $#temp ) and
( $j != $i ) ) {
my $collo = lc ($temp[$j]);
$cooc{$motcle}{$collo}++;
}
}
}
@temp = (\"5\");
}
}
