dominantpass.asv

来自「该压缩包为数字图像处理中的嵌入式零树小波算法的MATLAB源代码」· ASV 代码 · 共 22 行

function [D,X,sublist,sub_list] = dominantpass(X,threshold,sublist,sub_list)   
% Dominant pass function  
D=[];  
global N;  
[m,n]=size(X);  
% X is the coefficients matrix  
R=zeros(m); % matrix R is a reference matrix, same size as X; '0' means  
  %this coefficient is not a descendant from zerotree root;  
[a,b]=size(N);  
  
 
   if abs(X(1,1))>=threshold % X(1,1) is DC coefficient  
   sublist=[sublist, abs(X(1,1))]; % put significant coefficients's value to sublist  
  sub_list=[sub_list;N(1,1),N(1,2)];% put the significant coefficients' position in sub_list  
  if X(1,1)>0;  
   D=[D,'p'];   
   else D=[D,'n'];  
   end    
    X(1,1)=0;  
  else D=[D,'z'];  
    end