| 查看: 241 | 回复: 0 | |||
[交流]
龙格库塔 四元求解 求大神
|
|
设置 x y z 的范围 设与不设 范围不受控制 这个模拟的是混沌电路 图形 完全不太像 function huatu x0=0.05*randn(4,1); [x0]=a(x0); [xx]=ch(x0,1,20000); plot3(xx(1,  ,xx(2,,xx(3,,'k');%axis([-4,3,-2.5,2,-4,1.5]); xlabel('x'); ylabel('y'); %zlabel('z'); %wlabei('w'); function[x]=map(xx,t) if abs(xx(4))>=1 hx=-40; else hx=-0.8; end A=[hx 4 0 0 ;-1 0 1 0;0 -1 0.65 0;1 0 0 0]; x=A*xx; function[x0]=a(x) h=0.002; a=h/2; aa=h/6; x=[0.198,0.000012,0.018,0.0001]'; for k=1:100 k0=map(x,k); x1=x+k0*a; k1=map(x1,k); x1=x+k1*a; k2=map(x1,k); x1=x+k2*h; k3=map(x1,k); x=x+aa*(k0+2*(k1+k2)+k3); end x0=x; function[xx]=ch(x,t,symbol) h=0.002; a=h/2; aa=h/6; xx=[]; for j=1:symbol k0=map(x,t); x1=x+k0*a; k1=map(x1,t); x1=x+k1*a; k2=map(x1,t); x1=x+k2*h; k3=map(x1,t); x=x+aa*(k0+2*(k1+k2)+k3); xx=[xx x]; end  O5O5CODIQGZ(IF[V1M1IKQJ.png |
回复此楼» 猜你喜欢
有多少人是今天查系统知道结果的？
已经有19人回复
-
国社科又开始会评了，不知道这次命运如何
已经有9人回复
-
能否申诉？
已经有5人回复
-
为什么到现在没收到通知？
已经有5人回复
-
有没有仍没收到信息的
已经有8人回复
-
面上意见出来了
已经有18人回复
-
找导师
已经有7人回复
-
29号明天会评吗
已经有3人回复
-
麻烦专家们看看评委们的意见（F口面上）
已经有11人回复
-
我就是申请一个面上项目而已，这评审意见是按照杰青的条件评的吧？
已经有11人回复
投票:
30