matlab.txt

matlab模拟牛顿环...............................................................

L=589.3;
R=3;
H=5;
a1=axes('Position',[0.4,0.16,0.4,0.7]);%产生一个位置
[x,y]=meshgrid(linspace(-0.004,0.004,200));初始化数据
r2=(x.^2+y.^2);
Di=[2*H+2*(R-sqrt(R^2-r2))*1e9]/L;%求光程差
In=abs(cos(Di*pi*2));%形成一个明暗的周期
Pc=imshow(In,[]);
title('牛顿环模拟图','fontsize',18);