Leslie人口预测模型

从Excel表格中读取数据;从数据中读取各年龄女性人口数、女性人口比例和存活率;总和生育率;计算Leslie人口预测模型中Leslie矩阵;预测每年的女性人口数量;转换成总人口数量;将结果写入Excel文件;画图。

clear;
clc;
warning off;
close all;
%% 从Excel表格中读取数据
female = xlsread（‘A0301a.xls‘1‘D7:D126‘）; %2010年各年龄段女性人口数量
rsex = xlsread（‘A0301a.xls‘1‘H7:H126‘）; %2010年各年龄段性别比，女=100的男性数量
death = xlsread（‘A0604a.xls‘1‘J8:J127‘）; %2010年各年龄段死亡率，千分之单位
%% 从数据中读取各年龄女性人口数、女性人口比例和存活率
j = 1;
for i=1:1:length（female）
    if mod（i-16） ~= 0
        x（j1） = female（i）/1e8;
        w（j1） = 100/（rsex（i）+100）;
        s（j1） = 1-death（i）/1000;
        j = j+1;
    end
end
%% 总和生育率
b1（1:151） = 0; %0-14岁
b1（16:501） = 1.4/35; %15-49岁，计划生育政策
b1（51:1001） = 0; %50-100岁

b2（1:151） = 0; %0-14岁
b2（16:501） = 1.8/35; %15-49岁二胎政策
b2（51:1001） = 0; %50-100岁
%% 计算Leslie人口预测模型中Leslie矩阵
L1 = zeros（100）; %计划生育政策
for i=1:1:length（b1）
    L1（1i） = w（i）*b1（i）;
    if i ~= length（b1）
        L1（i+1i） = s（i）;
    end
end

L2 = zeros（100）; %二胎政策
for i=1:1:length（b2）
    L2（1i） = w（i）*b2（i）;
    if i ~= length（b2）
        L2（i+1i） = s（i）;
    end
end
%% 预测每年的女性人口数量
t（11） =