各位好，我想请问个问题。
请问如何将单狭缝绕射复制成多狭缝绕射
变成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');