各位好，我想請問個問題。
請問如何將單狹縫繞射複製成多狹縫繞射
變成2*2個或是 4*4個
試過用迴圈寫，可是一直沒辦法成功
以下是我的單狹縫繞射
clc
clear all
lambda=632e-9; k=(2*pi)/lambda;
a=1e-3; b=4e-3;
Io = 100.0;
R = 1;
Y = (-0.4e-2:1e-5:0.4e-2); Z=Y ;
beta = k*b*Y/(2*R*pi);
alpha = k*a*Z/(2*R*pi);
for i=1:length(Y)
for j=1:length(Z)
I(i,j)=Io.*((sinc(alpha(j)).^2).*(sinc(beta(i))).^2);
end
end
figure(1)
imshow(I)
title('Fraunhofer Diffraction','fontsize',14)
fh = figure(1);
set(fh, 'color', 'white');