Nous proposons ici le code qui calcule les valeurs entières des graduations sur l’axe des ordonnées pour une représentation graphique correcte de résultats statistiques.
Programmation > Perl
Recherche :   
Actualité Système Salon Concours Outils Programmation Devparadise Programmation HTML .Net JavaScript VBScript ASP PHP Visual Basic Perl Java Active X SQL XML WAP Delphi Graphisme Flash Web Design Promotion Référencement Publicité Valeur de votre site Outils Systèmes Windows Unix Linux Benchmark Hardware Réseaux locaux Droit Sécurité
Calcul des valeurs des graduations pour les graphiques de statistique
  Auteur : Liliya KOVALOVA

Nous proposons ici le code qui calcule les valeurs entières des graduations sur l’axe des ordonnées pour une représentation graphique correcte de résultats statistiques.

Publicité 
Les fonctions pour représenter graphiquement des résultats statistiques ont besoin :
- du nombre de divisions,
- de la valeur maximale entière sur l'axe des ordonnées.
Si la statistique est dynamique, les données sont inconnues et la fixation du nombre de divisions sur l'axe des ordonnées peut provoquer des apparitions de valeurs de graduations sous forme de nombres en virgule flottante. Les nombreux chiffres après la virgule altèrent la lisibilité du graphique. Le code ci-après calcule le nombre entier de divisions $tick et la valeur maximale entière $valmax supérieure à la valeur maximale des données statistiques sur l'axe des ordonnées qui permettront d'obtenir des valeurs entières des graduations.

$Val - valeur maximale des données statistiques. Elle doit être supérieure à 1.


sub Echelle1{
local ($Val) = @_;
local ($tick,$valmax);
local $len=length(int($Val));
print "len=$len<BR>\n";
if (($len==1)){
if ($Val==0){
$tick=1;
$valmax=0.001;
}else{
$_=$Val;
if (/./){
print "1=$'<BR>\n";
$tick=int($Val)+1;
$valmax=int($Val)+1;
}else{
$tick=$Val;
$valmax=$Val;
}
}
}elsif($len==2){
my $Nombre=substr(int($Val),-($len),1);
$valmax=($Nombre+1)*10;
$tick =$Nombre+1;
}else{
my $Nombre1=int($Val)/(10**($len-2));
my $Nombre2=int($Nombre1)+1;
$tick =int($Nombre2/3)+1;
$valmax=3*$tick*(10**($len-2));
}
return ($valmax,$tick);
}


Paramètre de la fonction :
$Val- valeur maximale des données statistiques

Valeurs de retour :
$ valmax - valeur maximale entière supérieure à $Val sur l'axe des ordonnées.
$ tick - nombre entier de divisions sur l'axe des ordonnées.

L'utilisation de cette fonction permettra d'avoir des graphiques avec des valeurs de graduation sans virgules.

A lire aussi sur Devparadise.com :
  • Une banque d’images pour dynamiser votre site
  • membre.devparadise.com : boîte à outils pour webmasters.
  • Installation de Mrtg 2-9-12a sous Mandrake 8.0
  • Devparadise.com a développé un outil d’analyse d’audience
  • Création d’un diagramme circulaire en PERL.
  • A télécharger aussi sur Devparadise.com :
  • XnView v1.80.3 version Complète
  • IconPro v 6
  • PhPlot 4.4.6
  • NOUVEAU des interfaces graphiques à télécharger (modèle N°1)
  • Nouvelle interface graphique à télécharger (modèle N°2)

  • © 1997-2008 tous droits réservés Devparadise.com
    Les logos, et marques déposées sont la propriété de leurs détenteurs respectifs.
    Devparadise.com s'est engagé à respecter la confidentialité des données personnelles régies par la loi 78-17 du 6 janvier 1978.
    Déclaration C.N.I.L. n° 621623
    graduation,axe,graphique,statistique,division