资源简介
用于产生各种混沌序列,能够实现分岔、周期、混沌等现象的演示
代码片段和文件信息
%THIS PROGRAM IS WRITTEN FOR BERNOULLI MAP FOR GENERATING RANDOM SEQUENCES
%WHICH EXHIBIT GOOD AUTOCORRELATION PROPERTIES MAKING A CALL FOR USAGE IN
%ENGINEERING APPLICATIONS.
clc; close all; clear all;
B = 1.75; A = .5; phin = 0.25; phi(1) = (B*phin) - A;
for ii = 2:1:3000
if phi(ii-1) > 0
phi(ii) = (B*phi(ii-1)) - A;
else
phi(ii) = (B*phi(ii-1)) + A;
end
end
%++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Bb = 1.99; Aa = .35; phint = 0.25; phit(1) = (B*phint) - Aa;
%++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
for ni = 2:1:3000
if phit(ni-1) > 0
phit(ni) = (Bb*phit(ni-1)) - Aa;
else
phit(ni) = (Bb*phit(ni-1)) + Aa;
end
end
CST = xcorr(phitphi); AST = xcorr(phiphi);
for tt = 1:1:length(phi)-2
XX(tt) = phi(tt+2);
YY(tt) = phi(tt+1);
ZZ(tt) = phi(tt);
end
Time = 0;
for nn = 2:1:length(CST)
Time(nn) = Time(nn-1) + 1;
end
figure(1); plot(phi); title(‘\bf Bernoulli MAP‘); xlabel(‘\bf Time scale‘); ylabel(‘\bf Amplitude fluctuations‘);
figure(2); plot(ZZYY‘k.‘); title(‘\bf Mapping‘); xlabel(‘\bf X(n)‘); ylabel(‘\bf X(n+1)‘);
figure(3); plot(TimeAST‘r‘TimeCST‘g‘); title(‘\bf AUTO & CROSS correlation‘);
xlabel(‘\bf Time‘); ylabel(‘\bf Auto & Cross correlation‘); legend(‘red-AC‘‘green-CC‘);
figure(5); plot3(ZZYYXX‘r.‘); title(‘\bf Pseudo phase space trajectories‘); grid on;
xlabel(‘\bf X(n)‘); ylabel(‘\bf X(n+1)‘); zlabel(‘\bf X(n+2)‘);
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
文件 1010 2016-03-31 11:52 cmaps\quadratic.asv
文件 1659 2016-03-31 11:52 cmaps\Bernoulli.m
文件 2224 2016-03-31 11:52 cmaps\Bifns.m
文件 1657 2016-03-31 11:52 cmaps\Bernoulli.asv
文件 1782 2016-03-31 11:52 cmaps\diffdem.m
文件 1080 2016-03-31 11:52 cmaps\logict.m
文件 2019 2016-03-31 11:52 cmaps\newchao.m
文件 1069 2016-03-31 11:52 cmaps\quadratic.m
文件 2137 2016-03-31 11:52 cmaps\optimip.m
文件 959 2016-03-31 11:52 cmaps\tenti.m
文件 5240 2016-03-31 11:52 cmaps\index.pdf
文件 1308 2016-03-31 11:52 license.txt
评论
共有 条评论