programs_12b.m

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

% Chapter 12 - Bifurcation Theory.
% Programs_12b - Finding critical points.
% Copyright Birkhauser 2004. Stephen Lynch.

% Critical points for y=mu*x-x^3.
% Symbolic Math toolbox required.
syms x y
[x,y]=solve('mu*x-x^3','-y')

% Plot a simple bifurcation diagram (Fig. 7.11).
r=0:.01:2;
mu=.28*r.^6-r.^4+r.^2;
plot(mu,r)
fsize=15;
xlabel('\mu','Fontsize',fsize);
ylabel('r','Fontsize',fsize);

% End Programs_12b.