clear;clc
%l=input（‘單縫到衍射屏的距離（mm）L=‘）;
%a=input（‘單縫的寬度（mm）a=‘）;
%lam=input（‘波長（nm）λ=‘）;
%lam=lam*10^-6;
l=1000;
a=10;
lam=555e-6;
x=-1:0.001:1;
y=x./sqrt（x.^2+l^2）;
z=a.*y/lam;
I=1000*（sinc（z））.^2;

subplot（211）
image（2xI）
colormap（gray（3））
title（‘弗朗禾費單縫衍射條紋‘）
subplot（212）
plot（xI）
title（‘光強分布‘）

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件?????????353??2013-04-09?17:21??danfeng.m
?????文件?????????338??2013-04-09?17:21??feinieer.m
?????文件?????????378??2013-04-09?17:21??fulanghefei.m
?????文件????????9772??2013-04-09?17:21??yansheGUI.m
?????文件???????63206??2013-04-02?09:12??愛拼才會贏2.jpg