Discussion :

[number_pho]

Bonjour à tous,

Tout d'abord, je vous présente une partie du programme que je développe servant à exploiter des tableaux de données pour tracer plusieurs spectres sur un même graphique.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clear
exec("C:\Users\numberpho\Documents\stage\programmes/obsidienne_process.sce");
 
n=input('Entrer le nombre de fichier :');
P1='C:\Users\numberpho\Documents\stage\spectre\Obsidienne/obsidienne';
P2='.dpt';
 
//construire AS
 
for i=1:n
filename=P1+string(i)+P2;
[A,B,C,yy,BL,I,fn,n_inf_sup,n_sup_inf]=obsidienne_spectre(filename);
    for j=1:1815
        AS(j,2*i-1)=A(j,1);
        AS(j,2*i)=A(j,2);
    end
     plot(A(:,1),2*i-1+A(:,2),"r")
 
end

Le problème c'est qu'à la fin, j'ai en effet réussi à obtenir tous les spectres voulu mais leurs couleurs sont identiques, ils sont donc indiscernable. Je voulais donc faire numéroter sur le graphe les courbes afin de les reconnaitre. Sachant qu'on demande à l'utilisateur de rentrer le nombre de fichier qu'il veut ouvrir, le nombre de courbes générées en dépend. Je n'ai trouvé aucune solution malgré avoir arpenter longuement google.
Auriez-vous des suggestions?

[number_pho]

C'est bon j'ai réussi, au lieu de mettre des chiffres sur les courbes j'ai attribué à chacune une couleur en changeant le "plot" en "plot2d" et comme le "style=" doit être suivi d'un numéro, je l'ai remplacé par mon i. Il ne me restait plus qu'à ajouter une légende. Je met le code au cas ou quelqu'un voudrait s'en servir:

Code :

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

1
2
3
4
5
6
7
8
9
for i=1:n
filename=P1+string(i)+P2; // les fichiers à ouvrir du type "C://.../Obsidienne4.dpt", j'ai séparé le nom en 3 pour pouvoir y mettre le numéro voulu genre 3 au lieu de 4
 
[A,B,C,yy,BL,I,fn,n_inf_sup,n_sup_inf,subidxmax,suby]=obsidienne_spectre(filename); //le nom d'une fontion créée précédemment
 
     subplot(221)
     plot2d(A(:,1),2*i-1+A(:,2),style=i);
     legends(["1","2","3","4"],[1,2,3,4],opt=2)
     xtitle(fn ,"wavenumber","Absorbance")