matlab做干涉,matlab模拟干涉衍射

%##########################%

%名称：等厚干涉模拟 %

%作者：程序猿__int64Ago %

%时间：2011-12-16 %

%##########################%

clear %清内存

lamda=632.8e-9; %设定入射光波长

n=1; %缝隙折射率

R=5; %柱透镜半径

ym=5e-3; %设定屏幕的范围,根据实际情况调整

xs=ym; %x方向无变化，单一值

N=1000; %条纹柔和度

ys=linspace(-ym,ym,N); %y轴上坐标离散

for i=1:N %依次求干涉光强

hm=R-sqrt(R^2-ys(i)^2); %柱透镜与底面间隙

delta=2*n*hm+lamda/2; %光程差

phi=2*pi*delta/lamda; %相位差

I(i,:)=4*cos(phi/2).^2; %干涉光强

end %求光强结束

M=255; %设定灰度等级

II=(I/4.0)*M; %设定黑白条纹对比度

subplot(1,2,1); %分割figure1×2，并且在第一块上作图

image(xs,ys,II); %画干涉条纹

colormap(gray(M)); %二维光强分布灰度图

title('光强分布灰度图') %列出标题

subplot(1,2,2); %分割figure1×2，并且在第二块上作图

plot(I,ys); %一维光强分布曲线图

title('光强分布曲线图') %列出标题

%##########################%

%名称：多缝夫朗禾费衍射模拟 %

%作者：程序猿__int64Ago %

%时间：2011-12-16 %

%##########################%

clear %清内存

lamda=500e-9; %设定入射光波长

a=10e-6; %缝宽

d=25e-6; %光栏常数

N0=6; %缝数

D=5; %缝到像面的距离(这个随意，几乎不影响)

ym=1*lamda*D/a; %设定屏幕的范围,根据实际情况调整

xs=ym; %x方向无变化，单一值

N=1000; %条纹柔和度(不能太大)

ys=linspace(-ym,ym,N); %y轴上坐标离散

for i=1:N %依次求衍涉光强

sintheta=ys(i)/D; %以下由书上公式

alpha=pi*a*sintheta/lamda;

beta=pi*d*sintheta/lamda;

I(i,:)=(sin(alpha)./alpha).^2.*...

(sin(N0*beta)./sin(beta)).^2; %上一行续行

end %求光强结束

M=255; %设定灰度等级

II=(I/max(I))*M; %设定黑白条纹对比度

subplot(1,2,1); %分割figure1×2，并且在第一块上作图

image(xs,ys,II); %画干涉条纹

colormap(gray(M)); %二维光强分布灰度图

title('光强分布灰度图') %列出标题

subplot(1,2,2); %分割figure1×2，并且在第二块上作图

plot(I,ys); %一维光强分布曲线图

title('光强分布曲线图') %列出标题

matlab做干涉,matlab模拟干涉衍射 | 学步园相关推荐

layui上传图片列表展示_layui怎么做图片在列表中显示 | 学步园
layui table中显示图片的方法: 图片需要用到模板.templet: 注意div不可省略,48px指的是div的高度,如果要决定img图片的高度,需要单独设计style ',style:'he ...
怎么样用matlab做视频,MATLAB：使用writeVideo制作视频
我目前正在尝试使用MATLAB中的writeVideo函数制作视频.我使用GUIDE制作了一个GUI,其中包含一个滑块,一些复选框和一个单轴(标记为axes1).当我移动滑块时,轴会绘制根据滑块值改变 ...
如何用matlab做表格,matlab用excel数据做表格-如何向matlab中导入excel表格利用表格数据做出图......
matlab如何从excel表格中读取数据? 工具:matlab 2018b 1.打开matlab击主页下入数据,可以导入excel数据此将自己命名huitushuju文件导入: 2.点击打开按钮,即 ...
matlab角点坐标获取,MatLab角点检测(harris经典程序) | 学步园
这是源博客的出处,鄙人转过来是为了更好的保存!供大家一起学习!已将原始的博客的文章的位置附在上面! 至于代码的完整性和可运行性需要大家去自己考量! %MatLab角点检测程序harris. ori_i ...
MATLAB递归将数字一个个输出,数米粒个数和每个米粒面积的matlab算法实现（递归）。 | 学步园...
使用Matlab软件自带的rice.png图片进行处理. 不知道使用的函数利用help function-name 或者 lookfor function-name 查看这里是实现的主要代码段 %T ...
matlab写出函数表达式,matlab 由状态空间表达式求传递函数笔记 | 学步园
1 内容有一个两输入两输出线性系统 ,求该系统的传递函数表达式子. 2 求解 2.1 相关函数状态空间表达式的传递函数用ss2tf函数来求解函数原型 [b,a] = ss2tf(A,B,C,D, ...
matlab clabel函数用法,CLabel的用法 | 学步园
DDX_Control(pDX, IDC_STATIC_CONNSTATE, m_labConnState); IDC_STATIC_CONNSTATE 是某静态控件的ID,设置这个静态控件的控制变 ...
matlab radiogroup,RadioGroup和CheckBox的使用 | 学步园
1.布局文件: android:layout_width="fill_parent" android:layout_height="fill_parent" a ...
matlab怎么计算行列式,Matlab 线性代数(一)–行列式与方程组求解 | 学步园
1. %用克莱姆法则求解方程组 clear n=input('方程个数=') A=input('系数矩阵A=') b=input('常数列向量b=') if((size(A)~=[n,n])|(siz ...

matlab做干涉,matlab模拟干涉衍射 | 学步园

matlab做干涉,matlab模拟干涉衍射 | 学步园相关推荐

最新文章

热门文章