7.分叉與混沌_第1頁
7.分叉與混沌_第2頁
7.分叉與混沌_第3頁
7.分叉與混沌_第4頁
7.分叉與混沌_第5頁
已閱讀5頁,還剩2頁未讀 繼續免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

1、分叉與混沌實驗實驗目的實驗指導px_ := 2 x - 0.001 x2data1 = NestListp, 0, 30ListPlotdata1, PlotStyle -> PointSize0.02Note:橫坐標為數據表的位序(索引號)RSolvean + 1 = 2 an - 0.001 an2, a0 = 0, an, n結論:p0=0時,迭代恒等于0,0是迭代的不動點。px_ := 2x - 0.001 x2data1 = NestListp, 1, 30ListPlotdata1, PlotStyle -> PointSize0.02結論:0<p0<100

2、0時,迭代收斂于1000。px_ := 2x - 0.001 x2data1 = NestListp, 1000, 30ListPlotdata1, PlotStyle -> PointSize0.02結論:p0=1000時,迭代恒等于1000,為迭代的不動點。px_ := 2x - 0.001 x2data1 = NestListp, 1500, 30ListPlotdata1, PlotStyle -> PointSize0.02結論:p0>1000時,迭代仍收斂于1000。Note:px_ := 2x - 0.001 x2data1 = NestListp, 1500,

3、 30ListPlotdata1,PlotStyle->PointSize0.02ListPlotdata1,PlotJoined->TrueShow%,%px_:=x+0.002 x (400-x)data=NestListp,2,14ListPlotdata, PlotStyle -> PointSize0.02gx_ := 0.7 x(1 - x);data = NestListg, 0.2, 30;llg1 = ListPlotdata, PlotStyle -> PointSize0.02;llg2 = ListPlotdata, PlotJoined -&g

4、t; True;Showllg1, llg2;g0 = Plotgx, x, x, 0, 1.1, PlotRange -> 0, 1a = 0.2; n = 5;ll = Linea, 0, a, ga;Dob = ga; c = gb;ll = Appendll, Linea, b, b, b,Lineb, b, b, c,Lineb, c, c, c,Linec, c, c, gc;a = c, k, 1, n;g1 = Showg0, Graphicsll;gx_:=2.9(x-x2);data=NestListg,0.2,30;llg1=ListPlotdata,PlotSty

5、le->PointSize0.02;llg2=ListPlotdata,PlotJoined->True;Showllg1,llg2;g0 = Plotgx, x, x, 0, 1.1, PlotRange -> 0, 1a = 0.2; n = 5;ll = Linea, 0, a, ga;Dob = ga; c = gb;ll = Appendll, Linea, b, b, b,Lineb, b, b, c,Lineb, c, c, c,Linec, c, c, gc;a = c, k, 1, n;g1 = Showg0, Graphicsll;gx_:=3.4(x-x

6、2);data=NestListg,0.02,30;llg1=ListPlotdata,PlotStyle->PointSize0.02;llg2=ListPlotdata,PlotJoined->True;Showllg1,llg2;g0 = Plotgx, x, x, 0, 1.1, PlotRange -> 0, 1a = 0.2; n = 5;ll = Linea, 0, a, ga;Dob = ga; c = gb;ll = Appendll, Linea, b, b, b,Lineb, b, b, c,Lineb, c, c, c,Linec, c, c, gc;

7、a = c, k, 1, n;g1 = Showg0, Graphicsll;gx_:=3.55(x-x2);data=NestListg,0.02,30;llg1=ListPlotdata,PlotStyle->PointSize0.02;llg2=ListPlotdata,PlotJoined->True;Showllg1,llg2;g0 = Plotgx, x, x, 0, 1.1, PlotRange -> 0, 1a = 0.2; n = 5;ll = Linea, 0, a, ga;Dob = ga; c = gb;ll = Appendll, Linea, b,

8、 b, b,Lineb, b, b, c,Lineb, c, c, c,Linec, c, c, gc;a = c, k, 1, n;g1 = Showg0, Graphicsll;gx_:=3.70(x-x2);data=NestListg,0.02,30;llg1=ListPlotdata,PlotStyle->PointSize0.02;llg2=ListPlotdata,PlotJoined->True;Showllg1,llg2;g0 = Plotgx, x, x, 0, 1.1, PlotRange -> 0, 1a = 0.2; n = 5;ll = Linea

9、, 0, a, ga;Dob = ga; c = gb;ll = Appendll, Linea, b, b, b,Lineb, b, b, c,Lineb, c, c, c,Linec, c, c, gc;a = c, k, 1, n;g1 = Showg0, Graphicsll;Feign_, x0_ :=Moduleplist = , a, i, temp, pilist = ,Fora = 1, a <= n, a+, temp = x0; plist = ;Fori = 1, i <= 50, i+, temp = 4*a*temp*(1 - temp)/n;Fori = 51, i <= 100, i+, temp = 4*a*temp*(1 - temp)/n;AppendToplist, 4a/n, t

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經權益所有人同意不得將文件中的內容挪作商業或盈利用途。
  • 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
  • 6. 下載文件中如有侵權或不適當內容,請與我們聯系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論