m10_4.m

来自「《MATLAB控制系统仿真与实例详解》一书的光盘源码。图书简介：本书详细地讲解了」· M 代码 · 共 39 行

%定义输入信号并绘出其曲线
                  time=0:0.025:5;
                  X=sin(sin(time).*time*10);
                  plot(time,X);
                  title('输入信号X');
                  xlabel('时间');
                  ylabel('输入信号');
                  figure;
                  %定义系统线性变换函数,绘出系统输出曲线
                  T=X*2+0.8;
                  plot(time,T);
                  title('系统输出T');
                  xlabel('时间');
                  ylabel('系统输出');
                  %定义网络输入
                  Q=size(X,2);
                  P=zeros(3,Q);
                  P(1,1:Q)=X(1,1:Q);
                  P(2,2:Q)=X(1,1:(Q-1));
                  P(3,3:Q)=X(1,1:(Q-2));
                  %建立网络
                  net=newlind(P,T);
                  %测试网络
                  a=sim(net,P);
                  %绘出网络输出a与系统输出T
                  figure;
                  plot(time,a,'+',time,T,'--');
                  title('网络输出a与系统输出T');
                  xlabel('时间');
                  ylabel('系统输出--  网络输出+');
                  %计算误差,并绘出其曲线
                  e=T-a;
                  figure;
                  plot(time,e);
                  title('输出误差');
                  xlabel('时间');
                  ylabel('误差');