TE011 mode, TM111 mode

In[10]:= Subscript[f, 0] = 16.95*10^9;

a = 0.02;

d = \[Pi]/Sqrt[((2 \[Pi]*Subscript[f, 0])/(3*10^8))^2 - (3.832/a)^2]

Out[12]= 0.0105121

改用：

c = 1/Sqrt[4 \[Pi]*10^-7*8.854*10^-12];

close all;home;clc;clear all;

f0=16.95e9;

c=1/sqrt(4*pi*1e-7*8.854*1e-12);

N=5;

ad_table=zeros(2,N);

ad_volu=zeros(1,N);

for index=1:1:N+1

k(1,index)=10+index;

a(1,index)=1e-3.*k(1,index);

d(1,index)=1e3*pi/sqrt((2*pi*f0/c)^2-(3.832/a(1,index))^2);

ad_volu(1,index)=pi*d(1,index)*a(1,index)^2;

X(1,index)=(2*a(1,index)/(1e-3*d(1,index)))^2;

Y(1,index)=(f0*(1e-6)*2*a(1,index)*100)^2;

ad_table(1,index)=k(1,index);

ad_table(2,index)=d(1,index);

end

ad_table =

11.0000 12.0000 13.0000 14.0000 15.0000 16.0000

45.1589 20.1853 15.8456 13.8735 12.7269 11.9740

ad_volu =

0.0172 0.0091 0.0084 0.0085 0.0090 0.0096

X =

0.2373 1.4137 2.6923 4.0733 5.5565 7.1420

Y =

1.0e+09 *

1.3905 1.6549 1.9422 2.2525 2.5857 2.9420

ans =

0.0084