dbmiafig9.m

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

function dBMIAfig9(varargin)
% dBMIAfig9.m -- Figure 9 of  Beamlets and Multiscale Image Analysis
% Usage: dBMIAfig9 will start a new figure window and plot Figure 9 of  Beamlets and Multiscale Image Analysis.
%        dBMIAfig9(n) for any argument type n will plot the figure on the current figure 
%        window and plot Figure 9 of  Beamlets and Multiscale Image Analysis.
if nargin == 0
	 figure;
else
     gcf;
end

%clc; close all;
fprintf('\n');
disp('Figure 9')
disp('For the Picasso image, we plot the beamlets at each of ')
disp('several scales whose coefficients exceed a predetermined')
disp('threshold.')
fprintf('\n');
disp('Warning: It takes some time to load the figures.')

%fig09draw;
close all;  open('BMIAFig9.fig');
if 0,
  disp('You need to download the file "fig09data.mat" on the web.')
  disp('To download, visit "http://www.isye.gatech.edu/~beamlab/data/".')
  disp('Install the data file at [Your BeamLab Directory]/Applications/BDRDP/.')
  disp('Now waiting...');
  pause;

  disp('Loading the data...');
  load fig09data;
  %figure(1); clf; 
  subplot(3,2,1);
  AutoImage(img_s); ax = axis; 
  disp('Creating the 2nd figure...');
  thr = .55; cnt=2; 
  %figure(2); clf; 
  subplot(3,2,2);
  fig09d_frag1; 
  disp('Creating the 3rd figure...');
  thr = .6;  cnt=3; 
  %figure(3); clf; 
  subplot(3,2,3);
  fig09d_frag1; 
  disp('Creating the 4th figure...');
  thr = .75; cnt=4; 
  %figure(4); clf; 
  subplot(3,2,4);
  fig09d_frag1; 
  disp('Creating the 5th figure...');
  thr = .80; cnt=5; 
  %figure(5); clf;
  subplot(3,2,5);  
  fig09d_frag1; 
  disp('Creating the 6th figure...');
  thr = .99; cnt=6; 
  %figure(6); clf; 
  subplot(3,2,6);
  fig09d_frag1;  
end
fprintf('\n');

disp('For more information, visit subdirectory [Applications/BDRDP].');
disp('*** END Figure 9 ***');


%
% 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]
%