DWT.m ( File view )

 北单比分zhibo www.603090.live 
			%  程序作者:沙威,香港大學電氣電子工程學系,[email protected]
%  參考文獻:小波分析理論與MATLAB R2007實現,葛哲學,沙威,第20章  小波變換在矩陣方程求解中的應用(沙威、陳明生編寫).

%  構造正交小波變換矩陣,圖像大小N*N,N=2^P,P是整數。

function ww=DWT(N)

[h,g]= wfilters('sym8','d');       %  分解低通和高通濾波器

% N=256;                           %  矩陣維數(大小為2的整數冪次)
L=length(h);                       %  濾波器長度
rank_max=log2(N);                  %  最大層數
rank_min=double(int8(log2(L)))+1;  %  最小層數
ww=1;   %  預處理矩陣

%  矩陣構造
for jj=rank_min:rank_max
    
    nn=2^jj;
    
    %  構造向量
    p1_0=sparse([h,zeros(1,nn-L)]);
    p2_0=sparse([g,zeros(1,nn-L)]);
    
    %  向量圓周移位
    for ii=1:nn/2
        p1(ii,:)=circshift(p1_0',2*(ii-1))';
        p2(ii,:)=circshift(p2_0',2*(ii-1))';
    end
    
    %  構造正交矩陣
    w1=[p1;p2];
    mm=2^rank_max-length(w1);
    w=sparse([w1,zeros(length(w1),mm);zeros(mm,length(w1)),eye(mm,mm)]);
    ww=ww*w;
    
    clear p1;clear p2;
end
			
...
Expand> <Close

Want complete source code? Download it here

Point(s): 1

Download
0 lines left, continue to read
Sponsored links

File list

Tips: You can preview the content of files by clicking file names^_^
Name Size Date
01.97 kB
CSfusion.asv1.37 kB2014-12-02 08:52
CSfusion.m1.39 kB2014-12-02 08:53
DWT.m1.04 kB2009-10-14 18:27
omp.m1.25 kB2014-09-28 20:46
tuxiang1.jpg25.89 kB2009-04-24 21:20
tuxiang2.jpg23.90 kB2009-04-24 21:20
...
Sponsored links

DWT.m (53.75 kB)

Need 1 point
Your Point(s)

Your Point isn't enough.

Get point immediately by PayPal

More(Debit card / Credit card / PayPal Credit / Online Banking)

Submit your source codes. Get more point

LOGIN

Don't have an account? Register now
Need any help?
Mail to: [email protected]

切換到中文版?

CodeForge Chinese Version
CodeForge English Version

Where are you going?

^_^"Oops ...

Sorry!This guy is mysterious, its blog hasn't been opened, try another, please!
北单比分zhibo

Warm tip!

CodeForge to FavoriteFavorite by Ctrl+D
{ganrao}