pattern04_2.m

来自「神经网络方面源码 神经网络方面源码 神经网络方面源码 神经网络方面源码 神经网络」· M 代码 · 共 36 行

%实验主要完成3.3节的2小题
%
%
clear all
%
%实验数据
x2 = [0.58 0.27 0.055 0.53 0.47 0.69 0.55 ...
    0.61 0.49 0.054];
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

L = length(x2);
%估计u和q
%   u: 均值
%   q: 偏差
u = sum(x2) / L;
q = sum(x2.^2) / L - u^2;


J = linspace(0.001,u,L);
K = linspace(0.001,q,L);

p(1:L) = 0;
for i = 1 : L
    for j = 1 : L
        p(i) = p(i) + ( K(j) - abs( x2(i) - J(j)) ) / K(j)^2 *...
            myfun( x2 , J(j) , K(j) ) * 1/(J(j)*K(j));
    end
end
x = linspace(0,1,10);
figure,plot(x,p);