hexinyunsuanguocheng.asv

证券投资模型

for i=1:6
    for j=1:4
        n(i,j)=str2num(get(a1(i,j),'string'));
    end
end
%i表示投资种类
%j表示投资年数
%定义第i种投资在4年里的总收益为b(i);
for i=1:6
    b(i)=0;
    for j=1:4
        b(i)=b(i)+n(i,j);
    end
end
%定义各种投资资金的比率分别为x(1),x(2),x(3),x(4),x(5),x(6)其中x(1)+x(2)+x(4)+x(5)+x(6)=1;
%定义在第j年的收益为R(j)
x(1)=sym('x1');x(2)=sym('x2');x(3)=sym('x3');x(4)=sym('x4');x(5)=sym('x5');x(6)=sym('x6');
t=a(1,1)*x(1)+a(2,1)*x(2)+a(3,1)*x(3)+a(4,1)*x(4)+a(5,1)*x(5)+a(6,1)*x(6);
y=a(1,2)*x(1)+a(2,2)*x(2)+a(3,2)*x(3)+a(4,2)*x(4)+a(5,2)*x(5)+a(6,2)*x(6);
p=a(1,3)*x(1)+a(2,3)*x(2)+a(3,3)*x(3)+a(4,3)*x(4)+a(5,3)*x(5)+a(6,3)*x(6);
q=a(1,4)*x(1)+a(2,4)*x(2)+a(3,4)*x(3)+a(4,4)*x(4)+a(5,4)*x(5)+a(6,4)*x(6);
B=t+y+p+q;
     %定义S(j)为投资在第j年的风险
     for j=1:4
     S(1)=0;
     for i=1:6
      S(i)=S(i)+abs(R/4-R(i));
     end
  %定义S为投资的总风险值
  %假设S=（1/10）*B；
  xishu=mean(n,2);
fengxianhe=sum(S);
%获取投资风险的权重数
a1=findobj('tag','edit3');
a=get(a1,'string');
u=str2num(a);
y=-(1-u)*B+u*B/10;
f=xishu;
A=[1 1 1 1 1 1];
b=1;
lb=zeros(6,1);
[jieguo,fval,exitflag,output,lambda]=linprog(f,A,b,[],[],[],[],[],[],lb)