Discussion :

[vargasvan]

Bonjour,
En ce moment, je travaille sur un projet qui consiste à migrer un outil de création de graphiques de MATLAB vers PERL, à travers la librairie GD. Sous Matlab, la personne qui avait développé l'outil utilisait l'instruction suivante pour choisir une couleur pour tracer une courbe :

Code :

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

1
2
3
4
5
6
7
8
l_colormap = colormap (jet (256)) ;
   if (nbProfil == 1)
       V0 = l_colormap(1,:);
   else
       l_pas = 255 / (nbProfil-1);
       l_compteur = round(1 + l_pas * (numProfil-1));
       V0 = l_colormap(l_compteur,:);
   end

Pour passer cette fonction en PERL, je suis un peu gêné. Existe-t-il une palette de couleur comme jet en PERL (ou plutôt dans le module GD)? Si oui, quelle est-elle et comment l'utilise-t-on? Merci beaucoup d'avance!

[vargasvan]

Bonjour!
Bon, je crois avoir résolu mon problème en créant moi-même une palette de couleurs. Par contre, pourriez-vous me dire comment je peux tracer des courbes de couleurs différentes?

En fait, pour l'instant, j'ai fait ça :

Code :

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

1
2
3
4
 
    $couleur = &determiner_couleur($nbProf, $i, @colors);
    $graph->set(color => $couleur);
    $gd = $graph->plot(\@donnees) or die $graph->error;

Mais ça ne marche pas... Comment dois-je faire pour mettre à jour la couleur qu'il faudra utiliser pour tracer la courbe? Merci beaucoup d'avance!