电磁场的Matlab仿真.pdf

电磁场的Matlab仿真.pdf

ID:58626217

大小:556.73 KB

页数:9页

时间:2020-10-17

电磁场的Matlab仿真.pdf_第1页
电磁场的Matlab仿真.pdf_第2页
电磁场的Matlab仿真.pdf_第3页
电磁场的Matlab仿真.pdf_第4页
电磁场的Matlab仿真.pdf_第5页
资源描述:

《电磁场的Matlab仿真.pdf》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、Matlab与电磁场模拟一单电荷的场分布:单电荷的外部电位计算公式:q40r等位线就是连接距离电荷等距离的点,在图上表示就是一圈一圈的圆,而电力线就是由点向外辐射的线。MATLAB程序:theta=[0:.01:2*pi]';r=0:10;x=sin(theta)*r;y=cos(theta)*r;plot(x,y,'b')x=linspace(-5,5,100);fortheta=[-pi/40pi/4]y=x*tan(theta);holdon;plot(x,y);endgridon单电荷的等位线和电力

2、线分布图:二多个点电荷的电场情况:模拟一对同号点电荷的静电场设有两个同号点电荷,其带电量分别为+Q1和+Q2(Q1、Q2>0)距离为2a则两电荷在点P(x,y)处产生的电势为:由电场强度可得E=-?U,在xOy平面上,电场强度的公式为:为了简单起见,对电势U做如下变换:。Matlab程序:q=1;xm=2.5;ym=2;x=linspace(-xm,xm);y=linspace(-ym,ym);[X,Y]=meshgrid(x,y);R1=sqrt((X+1).^2+Y.^2);R2=sqrt((X-1).

3、^2+Y.^2);U=1./R1+q./R2;u=1:0.5:4;figurecontour(X,Y,U,u)gridonlegend(num2str(u'))holdonplot([-xm;xm],[0;0])plot([0;0],[-ym;ym])plot(-1,0,'o','MarkerSize',12)plot(1,0,'o','MarkerSize',12)[DX,DY]=gradient(U);quiver(X,Y,-DX,-DY);surf(X,Y,U);同号电荷的静电场图像为:11.5250

4、2.533.54043020100-2-2-100122同理,将程序稍作修改,便可以得到异号电荷的静电场图像:4011.52302.53203.54100-10-20-302-400-2.5-2-1.5-1-0.500.511.522.5-2三、线电荷产生的电位:设电荷均匀分布在从z=-L到z=L,通过原点的线段上,其密度为q(单位C/m),求在xy平面上的电位分布。点电荷产生的电位可表示为VQ/4r0是一个标量。其中r为电荷到测量点的距离。线电荷所产生的电位可用积分或叠加的方法来求。为此把线电荷分为N段,

5、每段长为dL。每段上电荷为q*dL,看作集中在中点的点电荷,它产生的电位为qdLdV然后对全部电荷求和即可。4r0把xy平面分成网格,因为xy平面上的电位仅取决于离原点的垂直距离R,所以可以省略一维,只取R为自变量。把R从0到10米分成Nr+1点,对每一点计算其电位。Matlab程序:clearall;L=input(‘线电荷长度L=’);N=input(‘分段数N=’);Nr=input(‘分段数Nr=’);q=input(‘电荷密度q=’);E0=8.85e-12;C0=1/4/pi/E0;L0=lin

6、space(-L,L,N+1);L1=L0(1:N);L2=L0(2:N+1);Lm=(L1+L2)/2;dL=2*L/N;R=linspace(0,10,Nr+1);fork=1:Nr+1Rk=sqrt(Lm.^2+R(k)^2);Vk=C0*dL*q./Rk;V(k)=sum(Vk);end[max(V),min(V)]plot(R,V),grid线电荷产生的静电位分布图:四计算平面上N个电荷之间的库伦引力1建模:由库仑定律:2Fq1q2/40r3Fxq1q2(x2x1)/40r3Fyq1q2(y2y1

7、)/40r22r(x2x1)(y2y1)先输入电荷的数目,各电荷的坐标及电荷量,再选一个电荷,求其它电荷对它的作用力,叠加求合力。再选下一个电荷,依次类推。Matlab程序:clearall;N=input('ê?è?μ?oéêy??N=:');foric=1:Nfprintf('----/n??μ?oé#%g',ic);rc=input('ê?è?μ?oé????[x,y]£¨?×£);?:'x(ic)=rc(1);y(ic)=rc(2);q(ic)=input('ê?è?μ?oéá?£¨?a??£)

8、;?£o'endE0=8.85e-12;C0=1/(4*pi*E0);foric=1:NFx=0.0;Fy=0.0;forjc=1:Nif(ic~=jc)xij=x(ic)-x(jc);yij=y(ic)-y(jc);Rij=sqrt(xij^2+yij^2);Fx=Fx+C0*q(ic)*q(jc)*xij/Rij^3;Fy=Fy+C0*q(ic)*q(jc)*yij/Rij^3;endendfprintf('

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。