1 簡介

利用MATLAB繪制白光單縫衍射圖像和演示二維自由粒子的波函數(shù)演化過程

2 部分代碼

lambda=[660,610,570,550,460,440,410].*10^(-9);%七色光的波長RGB=[1,0,0;1,0.5,0;1,1,0;0,1,0;0,1,1;0,0,1;0.67,0,1];%七色光的RGB值d=4e-5;b=8e-6;N=18;Bright=80;%單縫與光源的參數(shù)Irgb=zeros(150,1885,3);%由空間各點(diǎn)的RGB值構(gòu)成的數(shù)組，第三個維度是RGB值Iw=zeros(150,1885,3);for k=1:7 ? ?theta=(-0.003*pi:0.00001:0.003*pi); ? ?phi=2*pi*d*sin(theta)/lambda(k); ? ?alpha=pi*b*sin(theta)/lambda(k); ? ?Idf=(sinc(alpha)).^2; ? ?Idgs=(sin(N *phi/2)./sin(phi/2)).^2;%單縫衍射公式 ? ?I=Idf.*Idgs; ? ?for i=1:150 ? ? ? ?Iw(i,:,1)=I*RGB(k,1); ? ? ? ?Iw(i,:,2)=I*RGB(k,2); ? ? ? ?Iw(i,:,3)=I*RGB(k,3); ? ?end ? ?%單色光的光強(qiáng) ? ?Irgb=Irgb+Iw; ? ?Iw=[];endBr=1/max(max(max(Irgb)));II=Irgb*Br*Bright;%對光強(qiáng)進(jìn)行一些調(diào)整，使圖像亮度適中imshow(II)%將RGB值轉(zhuǎn)化為圖像

3 仿真結(jié)果

4 參考文獻(xiàn)

[1]學(xué)生, 高志強(qiáng), 指導(dǎo)教師,等. 用 matlab 進(jìn)行波動光學(xué)的計(jì)算機(jī)模擬.?

博主簡介：擅長智能優(yōu)化算法、神經(jīng)網(wǎng)絡(luò)預(yù)測、信號處理、元胞自動機(jī)、圖像處理、路徑規(guī)劃、無人機(jī)等多種領(lǐng)域的Matlab仿真，相關(guān)matlab代碼問題可私信交流。

部分理論引用網(wǎng)絡(luò)文獻(xiàn)，若有侵權(quán)聯(lián)系博主刪除。