myk_close.m

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

%本实验完成上机练习4.3节
%   3小题(a)。
%
clear all

%实验所用数据
x1 = [ 1.36 1.41 1.22 2.46 0.68 2.51 0.60 0.64 0.85 0.66 ];

k = 1;
[lx,ly] = size( x1 );
x = linspace( 0 , 2 , ly );
for i = 1:ly
    d(i) = 2 * getdot( x(i) , x1 , k );
    p(i) = ( k / ly ) / d(i)^lx ;
end
plot( x , p ,'r');
hold on