基于zernike矩量化的数字水印算法_matlab

基于zernike矩量化的数字水印算法，matlab编写

function [factorial]	= fac（n）
maxno		= max（max（n））;
zerosi		= find（n<=0）;
n（zerosi）	= ones（size（zerosi））;
factorial	= n;
findex		= n;
for i=maxno:-1:2
	cand		= find（findex>2）;
	candidates	= findex（cand）;
	findex（cand）	= candidates-1;
	factorial（cand）	= factorial（cand）.*findex（cand）;
end
return;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        307  2013-03-07 11:35  Zernike\fac.m

     文件       1480  2013-03-08 15:16  Zernike\lans_equalize.m

     文件      66614  2011-11-22 11:05  Zernike\lena.bmp

     文件      66614  2013-05-13 14:43  Zernike\lenaw.bmp

     文件        558  2011-10-09 15:47  Zernike\nc.m

     文件        308  2013-03-08 11:12  Zernike\p.mat

     文件        441  2011-06-20 10:25  Zernike\psnr.m

     文件       1405  2013-05-11 11:14  Zernike\Zernike.asv

     文件       1427  2013-05-11 11:30  Zernike\Zernike.m

     文件       2801  2013-05-12 22:25  Zernike\Zernike_embedding.asv

     文件       2573  2013-05-13 15:08  Zernike\Zernike_embedding.m

     文件       2028  2013-05-13 15:08  Zernike\Zernike_extraction.m

     文件       1898  2010-01-12 18:19  Zernike\zernike_orderlist.m

     目录          0  2013-05-13 14:40  Zernike

----------- ---------  ---------- -----  ----

               148454                    14