求大神帮助，神经网络

[复制链接]

字体大小: 正常放大

子任

4 主题	12 听众	360 积分

升级 20%

TA的每日心情

	开心 2016-10-11 16:51

签到天数: 138 天

[LV.7]常住居民III

自我介绍: 比较喜爱数学

电梯直达

1^#

发表于 2015-3-19 21:56 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

求大神看看我这代码哪里出问题了。。。谢谢了

p=[1 2 3;3 2 1;5 6 1;7 3 1;3 5 2;9 3 5;7 4 2;4 5 6;0 3 4;6 0 1;4 2 3;9 2 7;8 0 1;3 6 2];

a=max(p'); %#ok<UDIM>
for i=1:14
for j=1:3
ptest(i,j)=P(i,j)/a(i);
end
end

pl=ones(1,14);
p2=0.8.*ones(1,14);
p3=0.6.*ones(1,14);
p4=0.4.*ones(1,14);
p5=0.2.*ones(1,14);
p6=0.*ones(1,14);
ptrain=[pl;p2;p3;p4;p5;p6];
t=[100,80,60,40,20,0];

net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
net=init(net);
net.trainparam.epochs=100000;
net.trainparam.goal=1e-10;
[net,tr]=train(net,ptrain',t);

for i=1:3
a=ptes(:,i);
score(i)=sim(net,a); %#ok<SAGROW>
end

zan