电磁波电磁场实验二.docx

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
实验二 实验名称 时间 地点 圆环电流得磁场分布 2014-6-5 一、实验目得及要求 掌握载流回路周围空间得磁场分布; 掌握利用Matlab仿真分析磁场分布。 实验环境 PC机 MATLAB软件 三、 实验内容及实验步骤(实践内容、设计思想与实现步骤) 实验原理: 毕奥一萨伐尔定律可表述为:载流回路得任一电流元Idl,在空间任一点P处所 产生得磁感应强度dB可表示为 clB = ZA,/d£xr 4兀 其中,r就是电流元Idl到场点P得径矢,1为电流。可以瞧出,dB得方向垂直于 Idl与r所在得平面,其指向遵守右手螺旋法则。dB得大小为 471 厂 利用叠加原理,对上式积分,便可求得任意形状得载流导线所产生得磁感应强 度,即 〃訂/〃=鬻];学 半径为a得环形载流回路周围空间得磁场分布 设载流圆环中流过得电流为I,则圆环在空间任意一点P(xyz)产生得磁感应 强度矢量为 “°l r d T x R° F小ada x R_ 4^ Jl ― “°l r d T x R° F小 ada x R c。 9 c 由于 r=x~+ y_+ 7: 则 R2=a2+ r2-2xaxrxcos P 二 a~ + r__2xax p =a■+ r-~2xax (xXcos a +y xsin a ) 二 a=+ x2+ y+ z2~2aXxXcos a -2aXyXsin a 二(x - axcos a )2+(y - axsin a )2+ z2 ill da x十可求出磁感应强度矢量在x,y,z方向得分量分别为实验内容:根据实验原理得分析,利用Matlab强大得绘图功能画出环形载流回路周围空间得 磁场分布。 ill da x十可求出磁感应强度矢量在x,y,z方向得分量分别为 实验内容: 根据实验原理得分析,利用Matlab强大得绘图功能画出环形载流回路周围空间得 磁场分布。 (1) 二维磁力线图(半径为a得环形载流回路) (2) 三维磁力线图 四、调试过程及实验结果(详细记录实验在调试过程中出现得问题及 解决方法。记录实验得结果) (1)二维磁力线(半径为a得环形载流回路) ITnputC请输入电流1=); a=l; y=linspace(-5,5JOO); theta=linspace(0,2*pi,50); u0=4*pi*le-7; k=I*uO/4/pi; [YZ, Tlieta]=meshgrid(y,y,theta); r=sqrt((a*cos(Theta)) 八2+Z、A2+(Y-a*sin(Theta)) x A2); dBy=a*Z% *sin(Theta)^ /(r、A3); By=k*trapz(dBy3); dBz=a*(a?Y、*sin(Thcta))、/(r、A3); Bz=k*trapz(dBz,3); [BSY,BSZ]=meshgrid([O:O. 1:0、7],0); hl=strcamlinc(Y(:,:,l),Z(:,:,l).By,Bz.BSYBSZJO、2.500]) h2=copyobj(hl,gca) rotate(h2,[l ,0,0], 180,[0,0,0]); h3=copyobj(allchild(gca),gca); rotate(h3J0」.0],180.[0Q0]); MIX磁场得二维图); 磁场的二维图 (2)三维磁力线 clear all: figure( 1) a=0、 3; y=-l:0 04:1; the=O:pi/2O:2*pi; i=l; u0=4*pi*le-7; k0=i*u0/4/pi; [YZ,T]=meshgrid(y,y,the); r=sqrt((a*cos(T))x 八2+Z、A2+(Y-a*sin(T))x A2); r3=r、 A3; dby=a*Z、*sin(T) /r3; by=kO*trapz(dby,3); dbz=a*(a-Yx *sin(T))、/r3; bz=kO*trapz(dbz3); for kk=l:4 [bSY.bSZ]二mcshgrid(O、2+kk*0、02.0); streamlinc(Y(:,:J),Z(:,:J).by,bz,bSY.bS乙[0、02/(kk+1),4500]); streamline(?Y(:,:,l),Z(:,:,l),?by,bz「bSY,bS乙[0、02/(kk+1),4500]); end [X.Y.Z]二mcshgrid(?0、5:0、04:0、5); r2=X.八2+Y. A2+Z. A2; for k=l:81 phi=kO*(k-l); costh=cos(phi); sinth=sin(phi); R3=(r2+aA2-2*a*(X*costh+Y*sinth))、八

文档评论(0)

xiaozu + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档