>pa tv dt NHj/\ 圆孔
衍射程序如下：
s(yV E [.e
Y xZ{= lmda=500e-9;
2Z]<MiAx D r=1e-3;
u*R9x3&/5 f=1;
RZykwD( xm=2000*lmda*f;
?H9F"B$a xs=linspace( -xm,xm,2000);
ag6hhkj A ys=xs;
ZB-+ bY [x,y]=meshgrid(xs);
%SV"iXxY s=2*pi*r*sqrt(x.^2+y.^2)./(lmda*f);
=m@5$ z=4*(besselj(1,s)./(s+eps)).^2;
X8T7(w<0%f subplot( 2,2,1)
\Fh k> imshow( z* 255) ; %平面图
iR-MuDM title( '非单色光圆孔衍射光强')
/f!_dJ^ xlabel( 'x')
H!dUQ ylabel( 'y')
Ed/@&52z0 subplot( 2,2,2)
H LMEB0zh^ mesh( x,y,z) %三维图
M4a- +T" colormap( gray)
\FOX#|i) xlabel( 'x')
1m-"v:fT5D ylabel( 'y')
cK.T=7T zlabel( '光强')
Ty]/F+{ 圆盘衍射公式
&k3'UN!&Ix 
5G 8`zy [c?']<f 4 求助代码
+4emkDTdR 或者用
信息光学求的也行
