الرائد
2019-05-15, 14:45
السلام عليكم
ممكن المساعدة في هذا البرنامج من فضلكم
عند المحاكاة تظهر هذه الرسالة
https://2.top4top.net/p_1230vaun81.jpg (https://up.top4top.net/)
https://4.top4top.net/p_12306su443.jpg (https://up.top4top.net/)
https://3.top4top.net/p_1230qbxh02.jpg (https://up.top4top.net/)
r=2.52; l=0.048;j=0.017;f=0.000042;k=1
a=[-r/l -k/l;k/j,-f/j]
b=[1/l;0]
c=[0 1]
d=0
%calculer les valeurs propres
%eig(a)
x0=[0;0]
t=0:0.5:500;
u=12*ones(1,length(t))
%lsim(a,b,c,d,u,t,x0)
sys=ss(a,b,c,d)
sysf=tf(sys)
[t,y]=step(12*sysf)
%plot(y,t)
u=12*ones(1,length(t))
%net = newnarx(u,y,2,2,[0 1],[1 2],5);
net = newff(u,y,5);
Y = sim(net,u);
figure(1)
plot(Y,t,y,t,'o')
net = train(net,u,y);
Yf = sim(net,u);
figure(2)
plot(y,t,'o',Yf,t,'+')
و بارك الله فيكم
ممكن المساعدة في هذا البرنامج من فضلكم
عند المحاكاة تظهر هذه الرسالة
https://2.top4top.net/p_1230vaun81.jpg (https://up.top4top.net/)
https://4.top4top.net/p_12306su443.jpg (https://up.top4top.net/)
https://3.top4top.net/p_1230qbxh02.jpg (https://up.top4top.net/)
r=2.52; l=0.048;j=0.017;f=0.000042;k=1
a=[-r/l -k/l;k/j,-f/j]
b=[1/l;0]
c=[0 1]
d=0
%calculer les valeurs propres
%eig(a)
x0=[0;0]
t=0:0.5:500;
u=12*ones(1,length(t))
%lsim(a,b,c,d,u,t,x0)
sys=ss(a,b,c,d)
sysf=tf(sys)
[t,y]=step(12*sysf)
%plot(y,t)
u=12*ones(1,length(t))
%net = newnarx(u,y,2,2,[0 1],[1 2],5);
net = newff(u,y,5);
Y = sim(net,u);
figure(1)
plot(Y,t,y,t,'o')
net = train(net,u,y);
Yf = sim(net,u);
figure(2)
plot(y,t,'o',Yf,t,'+')
و بارك الله فيكم