%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