早教吧作业答案频道 -->其他-->
matlab模拟带电粒子在均匀电磁场中的运动functionydot=ddlzfun(t,y,flag,q,m,B,E)%q,m,B,E为参量ydot=[y(2);q*B*y(4)/m;y(4);q*E/m-q*B*y(2)/m;y(6);0];q=1.6e-2;m=0.02;%为粒子的带电量和质量赋值B=2;E=1;%为电磁场
题目详情
matlab模拟带电粒子在均匀电磁场中的运动function ydot=ddlzfun(t,y,flag,q,m,B,E) %q,m,B,E为参量 ydot=[ y(2); q*B*y(4)/m; y(4); q*E/m-q*B*y(2)/m; y(6); 0]; q=1.6e-2; m=0.02; %为粒子的带电量和质量赋值 B=2; E=1; %为电磁场的磁感强度和电场强度赋值 [t,y]=ode23('ddlzfun',[0:0.1:20],... [0,0.01,0,6,0,0.01],[ ],q,m,B,E); %用 ode23解微分方程组,时间设为20s %指定初始条件,传递相关参数 plot3(y(:,1),y(:,3),y(:,5),'linewidth',2); %绘出三维空间内粒子运动的轨迹,线宽2磅 grid on %开启坐标网格线 xlabel('x'); ylabel('y'); zlabel('z'); 请高手指导一下,我想利用这个程序模拟带电粒子在均匀电磁场中的运动。但我用matlab6.5,做不出来。不知道该怎么改进……请大家帮忙,谢谢
▼优质解答
答案和解析
function haha global q m B E [t,y]=ode23(@ddlzfun,[0:0.1:20],... [0,0.01,0,6,0,0.01],[ ],q,m,B,E); %用 ode23解微分方程组,时间设为20s %指定初始条件,传递相关参数 plot3(y(:,1),y(:,3),y(:,5),'linewidth',2); %绘出三维空间内粒子运动的轨迹,线宽2磅 grid on %开启坐标网格线 xlabel('x'); ylabel('y'); zlabel('z'); function ydot=ddlzfun(t,y,q,m,B,E) %q,m,B,E为参量 global q m B E q=1.6e-2; m=0.02; %为粒子的带电量和质量赋值 B=2; E=1; %为电磁场的磁感强度和电场强度赋值 ydot=[ y(2); q*B*y(4)/m; y(4); q*E/m-q*B*y(2)/m; y(6); 0]; 画出一个螺旋线啊!
看了matlab模拟带电粒子在均匀...的网友还看了以下:
(a=3×3×…×355个3)(b=4×4×…×444个4)(c=5x5x……(a=3×3×…×3 2020-04-07 …
1*a:b=2:3,b:c=4:3,那么a:b:c=() 2*150的60%是() 3*1*a:b 2020-05-15 …
若A-4=B-6,则A( )B,若4分之3A=3分之4B,则A( )B若A-4=B-6,则A( 2020-05-15 …
已知a、b为有理数,若A=a^2+5*b^2-4*a*b+2*b+100求a的最小值(“a^2”: 2020-05-19 …
因式分解(a+b+c)^4-(b+c)^4-(c+a)^4-(a+b)^4+a^4+b^4+c^4 2020-06-12 …
有A、B、C、D等4人,体重均不相同,A比C重8千克,D比B重4千克,最重的与…有A、B、C、D等 2020-06-15 …
一些因式分解1](x-2y)^2-3*(x-2y)-102]x^2-2xy+4x-4y+43](x 2020-07-18 …
已知:4/x(x^2+4)=A/x+Bx+C/x^2+4,求:A=?B=?C=?4/x(x^2+4 2020-07-21 …
matlab-1/18*pi*(2*a+3-b)^2*(2*a-b-6)+1/18*pi*(-6* 2020-07-24 …
已知a>0,b>0,a+b=2,则y=1/a+4/b的最小值是?1/a+4/b>=2*√(4/ab) 2020-12-31 …