programs_13b.m

来自「《Dynamical Systems with Applications usi」· M 代码 · 共 18 行

% Chapter 13 - Three-Dimensional Autonomous Systems and Chaos.
% Programs_13b - 3-D phase portrait (Chua).
% Copyright Birkhauser 2004. Stephen Lynch.

Chua=inline('[15*(x(2)-x(1)-(-(5/7)*x(1)+(1/2)*(-(8/7)-(-5/7))*(abs(x(1)+1)-abs(x(1)-1))));x(1)-x(2)+x(3);-25.58*x(2)]','t','x');
options = odeset('RelTol',1e-4,'AbsTol',1e-4);
[t,xb]=ode45(Chua,[0 100],[-1.6,0,1.6],options);
plot3(xb(:,1),xb(:,2),xb(:,3))
title('Chua`s Double Scroll Attractor')

fsize=15;
xlabel('x(t)','Fontsize',fsize);
ylabel('y(t)','Fontsize',fsize);
zlabel('z(t)','FontSize',fsize);

% End of Programs_13b.