【光學(xué)】基于matlab模擬雙孔干涉附matlab代碼
【光學(xué)】基于matlab模擬雙孔干涉附matlab代碼
TT_Matlab
博主簡(jiǎn)介:擅長(zhǎng)智能優(yōu)化算法、神經(jīng)網(wǎng)絡(luò)預(yù)測(cè)、信號(hào)處理、元胞自動(dòng)機(jī)、圖像處理、路徑規(guī)劃、無(wú)人機(jī)等多種領(lǐng)域的Matlab仿真,完整matlab代碼或者程序定制加qq1575304183。
1 內(nèi)容介紹
通過(guò)Matlab軟件編程,實(shí)現(xiàn)光學(xué)雙縫干涉的計(jì)算機(jī)仿真.仿真結(jié)果對(duì)學(xué)生理解光學(xué)原理的基本概念很有幫助,提高了教學(xué)效果.
2 部分代碼
%REDME!!!該仿真模擬了雙孔干事實(shí)驗(yàn)中光屏逐漸遠(yuǎn)離雙孔時(shí)干涉圖像的變化,按空格鍵仿真停止
%—————————————————————————————————————
flag = 1;
t = 0;
d = 0.2; %兩孔的距離(兩孔中心正對(duì)干涉屏中心)
%默認(rèn)兩孔平行于X軸
Lambda = 500e-6; %干涉光波長(zhǎng)(mm)
x_scale = 120; %圖像長(zhǎng)度
y_scale = 4000; %圖像寬度
x_temp = linspace(-x_scale/2, x_scale/2, 601);
y_temp = linspace(-y_scale/2, y_scale/2, 501);
[X, Y] = meshgrid(x_temp, y_temp); %創(chuàng)建網(wǎng)格矩陣用于二維繪圖
while flag
input = get(gcf, ’currentkey’);
if strcmp(input, ’space’);
clc;
flag = 0;
end
D = 1500 + t; %雙孔到干涉屏的距離(mm)
R1 = sqrt((X-d/2).^2+Y.^2+D^2);
R2 = sqrt((X+d/2).^2+Y.^2+D^2); %計(jì)算網(wǎng)格坐標(biāo)點(diǎn)到兩孔的距離
Delte = (R1-R2)/Lambda * 2*pi; %計(jì)算網(wǎng)格坐標(biāo)點(diǎn)到兩孔的相位差
I = (1./R1).^2 + (1./R2).^2 + 2*(1./R1).*(1./R2).*cos(Delte);
%計(jì)算兩孔到網(wǎng)格坐標(biāo)點(diǎn)的相對(duì)光強(qiáng)
image(56 * I * D^2); %開(kāi)始繪圖
colormap gray;
axis off;
axis equal;
title(’楊氏雙孔干涉(Young’s double pinhole interference)’,’FontSize’,12);
pause(0.2);
t = t + 15;
end
3 運(yùn)行結(jié)果
4 參考文獻(xiàn)
[1]趙鑫. 基于Matlab的光學(xué)雙縫干涉實(shí)驗(yàn)仿真[J]. 科學(xué)中國(guó)人, 2015(12Z):1.
博主簡(jiǎn)介:擅長(zhǎng) 智能優(yōu)化算法 、 神經(jīng)網(wǎng)絡(luò)預(yù)測(cè) 、 信號(hào)處理 、 元胞自動(dòng)機(jī) 、 圖像處理 、 路徑規(guī)劃 、 無(wú)人機(jī) 、 雷達(dá)通信 、 無(wú)線(xiàn)傳感器 等多種領(lǐng)域的Matlab仿真,相關(guān)matlab代碼問(wèn)題可私信交流。
部分理論引用網(wǎng)絡(luò)文獻(xiàn),若有侵權(quán)聯(lián)系博主刪除。
-
2023年各省最新電價(jià)一覽!8省中午執(zhí)行谷段電價(jià)! 2023-01-03
-
PPT導(dǎo)出高分辨率圖片的四種方法 2022-09-22
-
全國(guó)消防救援總隊(duì)主官及簡(jiǎn)歷(2023.2) 2023-02-10
-
我們的前輩!歷屆全國(guó)工程勘察設(shè)計(jì)大師完整名單! 2022-11-18
-
關(guān)于某送變電公司“4·22”人身死亡事故的快報(bào) 2022-04-26
