1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43
|
clear all;close all;
%longueur d'onde en microns
lambda1 = 5;
lambda2 = 20;
%nb points
N = 100;
%definition des axes
Axe_microns = linspace(lambda1,lambda2,N);
Axe_cm = 1e4./Axe_microns;
% signal a afficher
R = rand(1,100);
% affichage
figure
hold on
hl1 = line(Axe_microns,R,'Color','r');
ax1 = gca;
ax2 = axes('Position',get(ax1,'Position'),...
'XAxisLocation','top',...
'YAxisLocation','left',...
'Color','none',...
'XColor','k','YColor','k','Xdir','reverse');
hl2 = line(Axe_cm,R,'Color','k','Parent',ax2);
% Ajustement des Ticks
xlimits = get(ax1,'XLim');
ylimits = get(ax1,'YLim');
xinc = (xlimits(2)-xlimits(1))/5;
yinc = (ylimits(2)-ylimits(1))/5;
set(ax1,'XTick',[xlimits(1):xinc:xlimits(2)],...
'YTick',[ylimits(1):yinc:ylimits(2)])
xlimits = get(ax2,'XLim');
ylimits = get(ax2,'YLim');
xinc = (xlimits(2)-xlimits(1))/5;
yinc = (ylimits(2)-ylimits(1))/5;
set(ax2,'XTick',[xlimits(1):xinc:xlimits(2)],...
'YTick',[ylimits(1):yinc:ylimits(2)]) |
Partager