% 產生 Logistic 序列　
% 使用平臺 - Matlab6.5
% 作者：陸振波，海軍工程大學
% 歡迎同行來信交流與合作，更多文章與程序下載請訪問我的個人主頁
% 電子郵件：luzhenbo@sina.com
% 個人主頁：luzhenbo.88uu.com.cn

% 蟲口模型 x(n+1) = lambda * x(n) * (1 - x(n)) 
% 當 lambda 從 3 到 4 的過渡圖像
% 參見<<混沌動力學初步>>陳士華，陸君安編著 P46

clc
clear
close all

lambda = 3:5e-4:4;
x = 0.4*ones(1,length(lambda));

N1 = 400;                   % 前面的迭代點數
N2 = 100;                   % 后面的迭代點數

f = zeros(N1+N2,length(lambda));
for i = 1:N1+N2
    x = lambda .* x .* (1 - x);
    f(i,:) = x;
end
f = f(N1+1:end,:);

plot(lambda,f,'k.','MarkerSize',1)
xlabel('\lambda')
ylabel('x');