de_st_out.m

可以运行的m4k20功率分配图

function de_st1=de_st_out(r1,h1,h2)
 x(1)=1+j;
 x(2)=1-j;
 x(3)=-1+j;
 x(4)=-1-j;
 x(5)=3+j;
 x(6)=1+3*j;
 x(7)=3-j;
 x(8)=1-3*j;
 x(9)=-1+3*j;
 x(10)=-3+j;
 x(11)=-3-j;
 x(12)=-1-3*j;
 x(13)=3+3*j;
 x(14)=-3+3*j;
 x(15)=-3-3*j;
 x(16)=3-3*j;
 x=x./sqrt(10);
for  i=1:16
    %dis(i)=abs(r1-x(i))^2+(-1+h1+h2)*abs(x(i))^2;
    dis(i)=abs(r1-x(i))^2+(-1+abs(h1)^2+abs(h2)^2)*abs(x(i))^2;
end
mindis=min(dis);
for i=1:16
    if (dis(i)==mindis) 
        de_st1=x(i);
    end
end