% ToAkser
%-----------------------------------------------------
% Plotning af figur med to forskellige y-akser. En til højre
% og en til venstre. Der bruges ikke MatLabs indbyggede funktion
% til at lave to y-akser, men derimod plottes der til to
% forskellige aksesystemer.
%-----------------------------------------------------
clear all

%----- Definition af data der skal plottes -----------
X = linspace(-0.34,3.6,100) ;
Y1 = sin(X) ;
Y2 = X.^2 - 3*X - 1 ;

xmin = min(X) ; % Mindste x-værdi. Bruges senere i fastsættelse af akser
xmax = max(X) ; % Største x-værdi. Bruges senere i fastsættelse af akser
%-----------------------------------------------------

%----- Oprettelse af figur ---------------
figure(1) ; clf ; hold on ; % Oprettelse af figuren
%-----------------------------------------

%----- Plotning af Y1-data i venstre y-akse-system som justeres ind ----------------
set(gca,'xlim',[xmin xmax],'ylim',[-1.3 1.2],...
        'fontname','times','fontsize',9,'TickLength',[0.01 0.00]) ; 
plot(X,Y1,'-k','linewidth',1.5) ; hold on ;
%-----------------------------------------------------------------------------------

%----- Plotning af Y2-data i højre y-akse-system som oprettes ----------------
ax2=axes('xlim',[xmin xmax],'ylim',[min(Y2) max(Y2)],...
        'fontname','times','fontsize',9,'TickLength',[0.01 0.00],...
		'YAxisLocation','right', 'Color','none') ; hold on ;
% Bemærk 'Color','none' i ovenstående. Uden denne vil Y2-aksen lægge et hvidt 
% rektangel henover det der er på plottet i forvejen, dvs. Y1-data.
plot(ax2,X,Y2,'-b','linewidth',1.5) ; hold on ;
%-----------------------------------------------------------------------------

%----- Slut ----------------------------------------------------------------