课程：

• 1、磁偶极子的磁场分布 要有源程序代码，结果可运行，加分。 急！急！急！ 谢谢各位大虾了
• 2、求助:有谁做了磁偶极子的磁场的matlab模拟,学习一下
• 3、急！急！急！高分 用MATLAB仿真电磁场中的电磁场分布

磁偶极子的磁场分布 要有源程序代码，结果可运行，加分。 急！急！急！ 谢谢各位大虾了

clear;clf;

r=0.001; %设置圆电流线圈的半径

s=pi*r^2; %求圆电流线圈的面积

I=2e-6; %设置电流的大小

a=0,b=-0.15;

[X,Z]=meshgrid([-2:0.1:2]); %设置坐标网格点

R=sqrt(X.^2+Z.^2); %空间任意一点到原点的距离

cos=Z./R; %R与Z轴的夹角的余弦

Um=I*s*cos./(4*pi*R.^2); %求任一点的电位

[Hx,Hz]=gradient(-Um); %求任一点的场强

AH=sqrt(Hx.^2+Hz.^2);Hx=Hx./AH;Hz=Hz./AH; %场强归一化，使箭头等长

ch=linspace(min(min(Um)),max(max(Um)),200); %产生200个电位值

contourf(X,Z,Um,ch,'k-'); hold on; %用黑实线画添色等位线图

plot(a,b,'ro',a,b,'r+'); hold on; % 用红线画等效正磁荷位置

plot(a,-b,'ro',a,-b,'r-'); hold on; % 用红线画等效正磁荷位置

title('磁偶极子的场分布 ');

hold on;

grid on %加网格

quiver(X,Z,Hx,Hz,0.5); % 第五输入宗量 0.5 使场强箭头长短适中

hold off

求助:有谁做了磁偶极子的磁场的matlab模拟,学习一下

给你贴个电偶极子场的MATLAB模拟吧！clear;clf;q=2e-6;k=9e9;a=1.5;b=-1.5;x=-6:0.6:6;y=x; [X,Y]=meshgrid(x,y); % 设置坐标网点rp=sqrt((X-a).^2+(Y-b).^2);rm=sqrt((X+a).^2+(Y+b).^2);V=q*k*(1./rp-1./rm); % 计算电势[Ex,Ey]=gradient(-V); % 计算场强AE=sqrt(Ex.^2+Ey.^2);Ex=Ex./AE;Ey=Ey./AE;% 场强归一化，使箭头等长cv=linspace(min(V(:)),max(V(:)),49);% 产生 49 个电位值contourf(X,Y,V,cv,'k-') % 用黑实线画填色等位线图title('\fontname{隶书}偶极子的场','fontsize',20),hold onquiver(X,Y,Ex,Ey,0.7) % 第五输入宗量 0.7 使场强箭头长短适中。plot(a,b,'wo',a,b,'w+') % 用白线画正电荷位置plot(-a,-b,'wo',-a,-b,'w-') % 用白线画负电荷位置xlabel('x');ylabel('y'),hold off

急！急！急！高分 用MATLAB仿真电磁场中的电磁场分布

1

clear;clf;q=2e-6;k=9e9;a=2.0;b=0;x=-6:0.6:6;y=x;

[X,Y]=meshgrid(x,y);

rp=sqrt((X-a).^2+(Y-b).^2);rm=sqrt((X+a).^2+(Y+b).^2);

V=q*k*(1./rp-1./rm);

[Ex,Ey]=gradient(-V);

AE=sqrt(Ex.^2+Ey.^2);Ex=Ex./AE;Ey=Ey./AE;

cv=linspace(min(min(V)),max(max(V)),51);

contour(X,Y,V,cv,'r-')

%axis('square')

title('\fontname{ 宋体 }\fontsize{11} 电偶极子的电场线与等势线 '),hold on

quiver(X,Y,Ex,Ey,0.6,'g')

plot(a,b,'bo',a,b,'g+')

plot(-a,-b,'bo',-a,-b,'w-')

xlabel('x');ylabel('y'),hold off