checkfield.m

核磁共振谱仪的匀场仿真程序。仿真了比较简单的匀场过程

z0=1;
m=int8(z0/0.02+1);
for k=1:a
for l=1:b
bb(k,l)=B(k,l,m)+deltaB(x(k),y(l),z0,s);
end
end
figure,surf(bb)
figure,surf(reshape(B(:,:,m),a,b))