计算机实现近场和远场衍射汇编.docxVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
计算机实现近场和远场衍射汇编

基于Matlab实现近场和远场衍射1 预备知识1.1 Matlab简介 Matlab是美国MathWorks公司出品的商业数学软件,用于算法开发、数据可视化、数据分析以及数值计算的高级技术计算语言和交互式环境。 Matlab可以进行矩阵运算、绘制函数和数据、实现算法、创建用户界面、连接其他编程语言的程序等,主要应用于工程计算、控制设计、信号处理与通讯、图像处理、信号检测、金融建模设计与分析等领域。1.2 傅里叶变换函数Matlab提供了一套计算快速傅里叶变换的函数,它们包含一维、二维和N维离散傅里叶变换函数fft、fft2和fftN。这些离散傅里叶变换的逆变换函数为ifft、ifft2和ifftN。FFT变换完成后,低频部分分布在矩阵的四个角上,需要通过移频将零频及低频量移到矩阵中心,这样才能与建立的坐标系一致,移频通过Matlab自带函数fftshift()完成。2 基本思路要对圆孔进行衍射模拟,首先要设计出圆孔的图形。选取单位振幅的平面波垂直照射,一般取值为1,方向垂直xy平面,平行与z轴。确定观察屏距离孔径的距离。将上述的所有的量代入到公式中,计算出衍射的光场分布。Matlab模拟。3 菲涅尔衍射实例由已知菲涅尔衍射中心点的光强为:由图可以看出菲涅尔衍射图样的中心光强和距离z有关,其亮暗是交替变化的。程序:%圆孔菲涅尔衍射clear;z0=5;%范围2到10x0=0;%范围ROWS=256;COLS=256;colormap(gray(255))sigma=1/z0;y0=-x0;y=-12.8;for r=1:COLS, x=-12.8;for c=1:ROWS, fFZP(r,c)=exp(j*sigma*(x-x0).^2+j*sigma*(y-y0).^2); x=x+0.1;end y=y+0.1;endmax1=max(fFZP);max2=max(max1);scale=1.0/max2;fFZP=fFZP.*scale;R=127*(1+imag(fFZP));figure(1)image(R);axis squareonaxis off图1 菲涅尔圆孔衍射4圆孔的夫琅禾费衍射仿真利用衍射积分或者傅里叶分析可以求得在观察屏上任意径向坐标r处的复振幅分布为:其中,光强分布为:程序:clear all%圆孔的夫琅禾费衍射lamda=632.8e-9;a=input(请输入孔径大小)f=1;Np=2048;%调色板n=400;m=400;ym=4000*lamda*f;ys=linspace(-ym,ym,n);xs=ys;for i=1:n for j=1:m r=sqrt(xs(i).^2+ys(j).^2); x=2*pi*a*r./(lamda*f); I(i,j)=(2*BESSELJ(1,x)).^2./x.^2; endendIr=I.*Np;subplot(1,2,1)image(Ir)colormap(gray)subplot(1,2,2)mesh(Ir);colormap(gray)Case 1孔径大小为a=0.0005Case 2孔径大小为a=0.001Case 3孔径大小为a=0.015矩形的夫琅禾费衍射仿真利用衍射积分或者傅里叶分析可以求得单色光照明时在观察屏上的复振幅分布为:光强分布为:程序:f=1;a=input(a=);b=input(b=);%矩孔大小lmda=632.8e-9;%波长xmax=0.008;%观察屏大小ymax=xmax;N=1500;x=linspace(-xmax,xmax,N);y=linspace(-ymax,ymax,N);for n=1:Nfor m=1:Nalpha=pi*x(n)*a/(lmda*f);beta=pi*y(m)*a/(lmda*f);I(n,m)=((sin(alpha))/(alpha))^2*((sin(beta))/(beta))^2;endend[X,Y]=meshgrid(x,y);Np=512Ir=Np*I;figuremesh(X,Y,Ir);colormap(gray);axis square;zlabel(光强);hold onfigureimshow(Ir);Case 1 a=b=0.001时Case 2 a=b=0.01时由例二可以发现当孔径增大到0.01mm尺度时,衍射现象已经不是很明显,当孔径继续增大时小孔不再衍射,光线沿直线传播。6 任意图形Np=2048;a=imread(C:\Users\帅\Desktop\1.bmp);grid onfigure(1)imshow(a,[])afft=fft2(a);%傅里叶变换aabs=abs

文档评论(0)

wyjy + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档