李清志 发表于 2011-9-14 19:07

求高手帮助解释程序!

clc;
clear all;
t=linspace(0.15,1.15);
d=4*sin(20*pi*t).*sin(pi*2*t/10)+sin(10*pi*t);
a(1:100)=d;
a=a';
n=a(1:100,1);
b=flipud(n);
for k=1:96;
    m(k,1:5)=b();
end
T=m(2:96,5);
p_test=m(96,1:5);
m(96,:)=[];
p=m(:,1:5);
p=p';
T=T';
net=newff(minmax(p),,{'tansig','purelin'},'trainlm'
);
net.trainParam.epochs=1000;
net.trainParam.goal=1e-8;
net.trainParam.show=5;
net.trainParam.lr=0.1;
net=train(net,p,T);
c(1)=p_test(1,1);c(2)=p_test(1,2);c(3)=p_test(1,3);c(4)=p
_test(1,4);c(5)=p_test(1,5);
j=1;
for i=1:10;
y(i,:)=;
    x(:,i)=y(i,:)';
    c(j+5)=sim(net,x(:,i));
    j=j+1;
end
disp(c);
T(91:105)=c;
t1=fliplr(T);
t0=(0.06:0.01:1.10);
plot(t0,t1,'*r');
hold on;
ezplot('4*sin(20*pi*t).*sin(pi*2*t/10)+sin(10*pi*t)',[0.0
6,1.10]);
hold off;
xlabel('时间(time)t/s');
ylabel('幅值/mm');
legend('预测振动曲线(*)与实际测试曲线(蓝)比较');
print(gcf,'-dpng','d:\5.png');
只需解释当中那段啊。求帮忙!{:{13}:}

李清志 发表于 2011-9-25 16:21

回复 1 # 李清志 的帖子

怎么没人帮忙啊?我是新人啊。求助

chenlu1986 发表于 2011-9-26 09:17

中间那段是神经网络部分么?别人的程序?
页: [1]
查看完整版本: 求高手帮助解释程序!