tracerSpectre.m

% Cette fonction permet, à partir d'un spectre au format texte, de tracer
% le spectre (longueurs d'onde (nm) en fonction de l'amplitude des raies)
% -----Prototype de la fonction-----
% tracerSpectre(spectre)
%
% spectre = nom du tableau avec les informations du spectre
% save = enregistrer le graphe (1 pour enregistrer)

function tracerSpectre(spectre, save)
    
    Lmax=800; Lmin=300;

    REF = zeros((Lmax-Lmin),1); %Une case par longueur d'onde
    valeursREF = Lmin:Lmax-1; %Uniquement pour tracer à la bonne échelle x
    
    for i = 1:size(spectre,1)
        for n = 1:length(REF)
           if ((spectre(i,1) > n+Lmin) && (spectre(i,1) < n+(Lmin+1)))
               REF(n) = spectre(i,2);
           end
        end
    end
    
    %Tracé de la figure
    #{
    A = round(length(valeursREF)/3);
    B = round(2*length(valeursREF)/3);
    
    f1 = figure;
    hold on
    plot(valeursREF(1:A), REF(1:A),'b');
    plot(valeursREF(A:B), REF(A:B),'g');
    plot(valeursREF(B:end), REF(B:end),'r');
    hold off
    
    xlim([Lmin-10 , Lmax+10]);
    xlabel('Longueur d''onde en nm'); 
    ylabel('Amplitude des raies');
    title('Spectre de raies');
    #}
    
    f1 = imagesc([300 800], [], REF')
    colormap(jet);
    
    if save == 1
        saveas(f1, 'Spectre de raies');
    end
end