drdrawfig09.m

来自「beamlet变化的工具箱」· M 代码 · 共 60 行

function dRDrawFig09(OpenNewWindow,HaveTitle,LoadData)
% DrawFig9: Illustrate Slant Stack -- Slant Stack of Half Dome
if nargin<3
    LoadData=0;
end

if nargin<2
    HaveTitle=1;
end

if nargin<1
    OpenNewWindow=1;
end

if OpenNewWindow
    figure
end

n=128; 
n1 = 64;
n2 = 128;
ell = 29;
theta = atan(2*ell/n1);
%

Img=MakeHalfDomeImage(n1,pi/8, 1.5,3);
 
%figure;
	
	S = FastSlantStack(Img);
	subplot(1,2,1)
	imagesc(Img);
    title('Half Dome')
	axis('image');
    set (gca,'XTick',[]);
    set (gca,'YTick',[]);
	%colormap(1-hot)
	subplot(1,2,2)
	imagesc(abs(real(S)));
    title('Slant Stack of Half Dome')
	axis('image');set (gca,'XTick',[]);
    set (gca,'YTick',[]);
	colormap(1-gray)
    %print -depsc RawFig10.eps
    
    
%
% Part of BeamLab Version:200
% Built:Friday,23-Aug-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%
%
% Part of BeamLab Version:200
% Built:Saturday,14-Sep-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%