资金缺口程序.docVIP

%30~55岁缴纳保险，75岁死亡的情况 a=[74 165 26 16 1 0 0 0 36 82 94 42 6 3 0 0 0 32 83 95 24 6 2 0 0 11 74 83 36 16 4 2 0 0 43 86 55 21 13 3 0 3 32 32 64 41 18 4 0 7 23 29 44 21 8 3 0 6 17 27 37 7 7 0];%2009年企业月工资表 b=[1250 1750 2250 2750 3250 3750 4500 6500];%2009年企业各种工资水平的中值 c=a*b;%2009年企业各年龄段的总工资 for i=1:8 d(i)=c(i)/sum(a(i,:));%d(i)表示第i年龄段的平均工资 end x=[1:8]; %d数组表各年龄段平均工资 %第一条直线斜率k1的计算 x1=1:6; x1=[ones(6,1) x1]; y1=d(1:6); y1=y1; b1=regress(y1,x1); k1=b1(2);%第一条直线斜率：k1 %第二条直线斜率k2的计算 x2=6:8; x2=[ones(3,1) x2]; y2=d(6:8); y2=y2; b2=regress(y2,x2); k2=b2(2);%第二条直线斜率：k2 k0=max(d)/(29688/12);%企业各年龄段种工资最高的年龄段的月平均工资/09年省的月平均、的比率：k0 k02=sum(d)/8/(29688/12);%企业总月平均工资/09年省的月平均、的比率：k02 t=24:1:48;%t=24表示2000年.....t=48表示2025年 y=6.8747.*10^5./(1+exp(7.41-0.1331.*t))/12;%预测出2000~2025年的省月平均工资记入数组：y for i=1:25 %计算缴费期间各年的月平均工资，存入数组：m q=y(i)*k0;%将相应年份的省月平均工资转换成企业各年龄段中工资最高的年龄段的月平均工资 x=(29+i)*6/50;%坐标转换 if x6.0001 %如果年龄范围在第一条直线范围 yx=k1*x+q-6*k1; %相应年龄的工资 else %如果年龄范围在第二条直线范围 yx=k2*x+q-6*k2; %相应年龄的月工资 end m(i)=yx;%个人第i年对应的月工资 end grzh=0;%初始化个人账户2025年时总金额为0 for i=1:25 %计算出个人账户2025年时总金额为存入变量：grzh for j=1:12 q=25-i+(13-j)/12; grzh=grzh+m(i)*0.08*((1+0.03)^q); end end %下段程序计算出1~240个月每月个人账户应发的金额，存入数组：A a=grzh;%个人账户2025年时总金额为存入变量：a p=200370/170;%个人账户每月发放的基本金 A=[p]; for i=2:170 u=p+(a-(i-1)*p)*(0.03/12); A=[A,u]; end p=A(170); for i=171:240 A=[A,p]; end %下段程序计算出55岁时统筹基金的总金额，存入变量：b b=0; for i=1:25 for j1=1:12 b=b+m(i)*0.2*(1+0.03)^(i-1+(13-j1)/12); end end %下段程序计算出1~240个月每月统筹账户应发的金额，存入数组：B B=zeros(1,240);%B(i)为第i个月应发养老金的统筹部分 t2=48:1:67; yq=6.8747.*10^5./(1+exp(7.41-0.1331.*t2))./12.*k02;%2025~2045年的企业月平均工资 for i=1:20 for r=1:12 B((i-1)*12+r)=(yq(i)+yq(i)*1.136)*0.5*0.25;%B(i)为第i个月应发养老金的统筹部分 end end %计算资金缺口放入变量：s s=0;%初始资金缺口为0 for i=1:170 %这个时间段内个人账户部分不会出现缺口 b=b-B(i);