function?Correlation_Coefficient_1
m=90;
t=linspace（01m）‘;???
T=t（2）-t（1）
h=0.9*exp（-5*t）.*cos（2*pi*10*t+0.1）+...
????0.5*exp（-3*t）.*cos（2*pi*30*t+0.05）;
for?k=1:90
P（:k）=0.05*randn（m1）;????%隨機激勵信號
%P（:k）=0.1*exp（-（50）.^2*（t-t（k））.^2）;%?高斯脈沖激勵
%P（:k）=exp（-10*（t-0.5）.^2）+0.01*randn（size（t））;??%假設系統輸入高斯脈沖信號
%P（:k）=zeros（m1）;
x=P（:k）;
y（:k）=conv（xh）;
?A=y（:k）;
Y（:k）=A（1:m）;
end
H=Y*P‘*（inv（P*P‘））;
%H=Y*pinv（P）;??%偽逆矩陣
g=H（:1）;
figure?plot（t[hg]）;grid?on;??
title（sprintf（‘第%d條樣本的網絡學習誤差err=%d‘?1?sum（g-h）.^2））;
?legend（‘理想脈沖響應信號‘‘學習獲得的脈沖響應信號‘）;
?axis（[0?1?-1?1.5]）;

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

?????文件????????643??2011-04-20?20:40??Correlation_Coefficient_1.m

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

??????????????????643????????????????????1