W
was29e
Guest
hej ..
im skrive en kode til at designe en flerlaget optisk filter, koden går sådan her:
Jeg har N lag, hvor hvert af dem er beskrevet ved hjælp af en karakteristisk matrix m, og den resulterende matrix for hele strukturen er M = Πm fra det første lag til den sidste ..
Jeg skrev koden, men theres sth.forkert det holder fortæller mig forkert brug vertcat!
kan man tage et kig på det og fortælle mig, hvad er det prob.'coz jeg kan ikke finde den ..og en ting mere: Hvordan kan jeg ændre udvidelse af en Matlab fil. m??*********************************************
for w = w% w = 1000:2000 bølgelængde
M = [1 0; 01];
d = dem (1, Nmax) * WC / 4% d: tykkelsen af lag
% n lag hver defineret ved m
for i = 1: Nmax
hvis det mod (i, 2) == 0
ni = NH;
anden
ni = nL;
ende
g = (2 * pi * ni * d1i) / w;% M: charactarestic matrix for alle
% g = fase lag = multiplikation af
m for hvert lag
M11 = cos (g);
M12 = (sin (g)) / ni;
M21 = ni * sin (g);
M22 = cos (g);
M = M * [M11 i * M12, M21 M22];
ende
t = 2 * N0 / (((M (1) i * M (3) * ns) * N0) (i * M (2) M (4) * ns));
% t = fractional transmission
tstar = conj (t);
T = t * tstar .* (ns/n0);
R = 1-T;
ende
plot (R)
axis ([Wmin wmax 0 1])
im skrive en kode til at designe en flerlaget optisk filter, koden går sådan her:
Jeg har N lag, hvor hvert af dem er beskrevet ved hjælp af en karakteristisk matrix m, og den resulterende matrix for hele strukturen er M = Πm fra det første lag til den sidste ..
Jeg skrev koden, men theres sth.forkert det holder fortæller mig forkert brug vertcat!
kan man tage et kig på det og fortælle mig, hvad er det prob.'coz jeg kan ikke finde den ..og en ting mere: Hvordan kan jeg ændre udvidelse af en Matlab fil. m??*********************************************
for w = w% w = 1000:2000 bølgelængde
M = [1 0; 01];
d = dem (1, Nmax) * WC / 4% d: tykkelsen af lag
% n lag hver defineret ved m
for i = 1: Nmax
hvis det mod (i, 2) == 0
ni = NH;
anden
ni = nL;
ende
g = (2 * pi * ni * d1i) / w;% M: charactarestic matrix for alle
% g = fase lag = multiplikation af
m for hvert lag
M11 = cos (g);
M12 = (sin (g)) / ni;
M21 = ni * sin (g);
M22 = cos (g);
M = M * [M11 i * M12, M21 M22];
ende
t = 2 * N0 / (((M (1) i * M (3) * ns) * N0) (i * M (2) M (4) * ns));
% t = fractional transmission
tstar = conj (t);
T = t * tstar .* (ns/n0);
R = 1-T;
ende
plot (R)
axis ([Wmin wmax 0 1])