%function?CSTRst_X（RstFileNameDataFileNameIniFileNameCstfilename）?
%Cstfilename?=?‘S_X.s2p‘;?
%RstFileName?=?‘S_X.txt‘;?
%DataFileName?=?‘Rst_x.txt‘;?
%IniFileName?=?‘iniPara.vol‘;?
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%?
DPreproc（CstfilenameRstFileName）;??%CST分析結果預處理操作?
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%?
S?=?load（RstFileName）;?
s11?=?S（:1:3）;?
index_S?=?[1?4?5];?
s21?=?S（:index_S）;?
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%?
[dareaper]=DataGet（IniFileName）;????%獲取沿電磁波入射方向材料單胞厚度參數d?
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%?
fre=s11（:?1）*1e9;?
C=3e8;?
lamda=C./fre;?
k=2*pi./lamda;?
n=zeros（size（fre））;?
S11=s11（:?2）.*exp（1i*（s11（:3）*pi/180））;?
S21=s21（:?2）.*exp（1i*（s21（:3）*pi/180））;?
Z=zeros（size（fre））;?
Z1=sqrt（（（1+S11）.^2-S21.^2）./（（1-S11）.^2-S21.^2））;?????%

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????1016101??2013-11-19?16:46??NRW方法2.pdf

?????文件???????3730??2013-10-23?14:36??NRW.m

?????文件?????139106??2013-10-23?14:33??NRW方法1.pdf

-----------?---------??----------?-----??----

??????????????1158937????????????????????3