吸波体的MATALAB仿真程序

小弟是做本科毕业论文的 ，研究双层吸波体的吸收特性，那位大侠可以给我编个吸波体仿真的程序，就是给磁导率和磁介电常数一个范围，然后画出频率与反射率的曲线图，万分感谢了 .. A_(+r  
?k:])^G5  

未注册仅能浏览部分内容，查看全部内容及附件请先 登录 或 注册

%初始化 赋值各个数组 \2<yZCn  
data=[-7 10 -4 4 1] mN'9|`>V>  
F=(2:0.2:18);%频率8-12HZ n8O
dRv  
er1=data(:,1);%介电常数实部 [A..<[  
er2=data(:,2);%介电常数虚部 syNb0LR  
ur1=data(:,3);%磁导率实部 6P*)rye  
ur2=data(:,4);%磁导率虚部 ~oW8GQ  
%构造复介电常数和磁导率数组 QV H'06"{  
er=er1-i*er2; P7x?!71?L  
ur=ur1-i*ur2; >KClH'R2  
%自由空间的介电常数，磁导率及波阻抗 eRx[&-c  
er0=8.854e-12;ur0=4e-7*pi;Z0=120*pi; nog\,NT  
%计算反射率 r4NT`&`g?  
f=F*1e9;%频率转换为HZ ;~Gpw/]5E  
d=0,01;%厚度 /XW0`FF  
for n=1:81; 7SY->-H8  
     k=sqrt((ur0*ur)/(er0*er)); Ae_ E;
[mj  
     v=2*pi*f(n)*sqrt(er*ur); {O&liU4  
     Zin=k*tanh(v*d); K7O?{/  
     r=(Zin-Z0)/(Zin+Z0); +#JhhW Zj(  
     R(n)=20*log10(abs(r)); (z1%lZ}(  
end !Ub?eJp  
%绘制反射率曲线：实验值和计算值 33KPo0g7  
plot(F,R,'k'); Ah>krE0t  
xlabel('Frenquency/GHz'); w%o4MFK=!  
ylabel('Reflection/dB'); / ?[gB:s  
legend('exp','cal'); $9i5<16  
hold; tEX~72v  
e"adkV  
sV'.Bomq  
有个论文后给的类似这个程序，自己改了点 就出个直线 那位大侠帮忙改下啊？

那位大侠可以帮下忙啊，感激不尽，最好是通过遗传算法的方法改的

用户被禁言,该主题自动屏蔽!

大侠是不欠我钱，这个弄出来点眉目了 ，怎么将它和遗传算法结合呢 o5x^"#  
这是改好的 程序F=(2:0.2:18);%频率矩阵 gpvj'Ri7V  
data=[5 2.5 2 1.6 0.002];%参数矩阵
)-"L4TC)  
%初始化，赋值各个数组 TXl9c6  
er1=data(:,1);%介电常数实部 _rJSkZO  
er2=data(:,2);%介电常数虚部 3}1+"? s  
ur1=data(:,3);%磁导率实部 Ru aJ9
O  
ur2=data(:,4);%磁导率虚部 s(.-bjR  
d=data(:,5);%介质厚度 gj;G:;1m  
%构造复介电常数和磁导率数组 SW'KYzn  
er=er1-i*er2; Qu\l$/  
ur=ur1-i*ur2; H&IP>8Dk  
%自由空间的介电常数，磁导率及波阻抗 |3@Pt>Ikl  
er0=8.8854e-12; #R~NR8(z  
ur0=4e-7*pi; oP75|p  
Z0=120*pi; Df3v"iCq}  
%计算反射率 {$:13AnK  
f=F*1e9;%频率 6b01xu(A[  
v=2*pi*f*sqrt(ur*ur0*er*er0); 3'e 4{  
k=377*sqrt(ur/er); 3 v$
4LY  
Zin=k*tanh(i*v*d); b}*bgx@<  
r=(Zin-Z0)./(Zin+Z0); 2`U&,,-Mf  
R=-20*log10(abs(r)); \)uad5`N  
%绘制反射率曲线：实验值和计算值 #p`7gFl  
plot(F,R,'k'); X*"O'XCA  
xlabel('Freguency/GHz'); ]~Qkg+>'&  
ylabel('Reflection/dB'); 7uNI  
hold;

这个程序很多学校都有现成的，我们学校没有 ，谁给弄个 ，多谢了！！

利用遗传算法实现多层RAM的设计 摘要：遗传算法具有鲁棒性好，收敛性快.doc (763 K) 下载次数:44

感谢你的资料，对遗传算法又知道的多点了！

感谢分享！！！

用matlab画反射率图？