%ab?為inputf的size
%dctcompr（‘lean.tif‘2000‘out.tif‘）;

function?[PSNR]=check（OutfInputfab）
??Outf=double（Outf）;??Inputf=double（Inputf）;
????
%load?test
%load?asd

SQRT=0;
for?i=1:a
????for?j=1:b
????????SQRT=SQRT+（double（Inputf（ij））-double（Outf（ij）））^2;
????end
end
MSE=SQRT/a/b;
RMSE=sqrt（MSE）;
LINE=zeros（1a*b）;
for?i=1:a
????LINE=[LINEdouble（Inputf（i:））];
end
VAR=var（LINE）;
SNR=10*log10（VAR/MSE）;
PSNR=20*log10（255/RMSE）;
return?;
beep?on;
beep;

????????

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????499??2006-06-02?15:40??神經網絡\DCT數字水印\check.m

?????文件???????2393??2006-06-02?22:37??神經網絡\DCT數字水印\test.m

?????文件?????148701??2009-04-12?09:53??神經網絡\MATLAB?神經網絡用于數字識別源程序.rar

?????文件????7394333??2009-04-14?22:29??神經網絡\MATLAB+6[1].5輔助神經網絡分析與設計.pdf

?????文件?????159392??2009-04-11?23:37??神經網絡\Matlab實現的阿拉伯數字識別程序代碼.rar

?????文件??????81666??2009-04-12?09:56??神經網絡\基于BP網絡的印刷體數字識別.rar

?????文件?????100756??2009-03-26?21:14??神經網絡\用dtw識別10個數字的matlab程序.rar

?????目錄??????????0??2009-04-15?23:10??神經網絡\DCT數字水印

?????目錄??????????0??2009-04-15?23:10??神經網絡

-----------?---------??----------?-----??----

??????????????7887740????????????????????9