2020年数学建模C题代码

原创

已于 2024-12-29 23:21:53 修改 · 2.4k 阅读

21 ·

CC 4.0 BY-SA版权

文章标签：

#matlab #启发式算法 #数学建模

于 2024-07-23 10:46:20 首次发布

%chulisj.m
%第一步：数据预处理
y_jin_jine=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',2,'E2:E210948');
y_jin_shuie=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',2,'F2:F210948');
y_xiao_jine=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',3,'E2:E162485');
y_xiao_shuie=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',3,'F2:F162485');
%读取发票状态
jin_zf=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',2,'H2:H210948');
xiao_zf=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',3,'H2:H210948');

y_jin_qy=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',2,'A2:A210948');
y_xiao_qy=xlsread('附件1：123家有信贷记录企业的相关数据.xlsx',3,'A2:A162485');

n_jin_jine=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',3,'E2:E395176');
n_jin_shuie=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',3,'F2:F395176');
n_xiao_jine=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',2,'E2:E330836');
n_xiao_shuie=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',2,'F2:F330836');
n_jin_zf=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',3,'H2:H395176');
n_xiao_zf=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',2,'H2:H330836');

n_jin_qy=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',3,'A2:A395176');
n_xiao_qy=xlsread('附件2：302家无信贷记录企业的相关数据.xlsx',2,'A2:A330836');

%有信贷——数据处理
if jin_zf==0 %发票状态为作废时，进项金额、税额都作废
y_jin_jine1=0;
y_jin_shuie1=0;
else
y_jin_jine1=y_jin_jine;
y_jin_shuie1=y_jin_shuie;
if y_jin_jine<0 %负数发票时，进项金额为0，税额不变，供以后抵扣
y_jin_jine1=0;
end
end

if xiao_zf==0
y_xiao_jine1=0;
y_xiao_shuie1=0;
else
y_xiao_jine1=y_xiao_jine;
y_xiao_shuie1=y_xiao_shuie;
if y_xiao_jine<0 %负数发票时，销项金额为0，税额不变，供以后抵扣
y_xiao_jine1=0;

end
end

xlswrite('处理：123家有信贷记录企业的相关数据1.xlsx',y_jin_jine1,1, 'B2:B210948');
xlswrite('处理：123家有信贷记录企业的相关数据1.xlsx',y_jin_shuie1,1, 'C2:C210948');
xlswrite('处理：123家有信贷记录企业的相关数据1.xlsx',y_xiao_jine1,2, 'B2:B162485');
xlswrite('处理：123家有信贷记录企业的相关数据1.xlsx',y_xiao_shuie1,2, 'C2:C162485');

%无信贷数据处理
if n_jin_zf==0
n_jin_jine1=0;
n_jin_shuie1=0;
else
n_jin_jine1=n_jin_jine;
n_jin_shuie1=n_jin_shuie;
if n_jin_jine<0
n_jin_jine1=0;
end
end

if n_xiao_zf==0
n_xiao_jine1=0;
n_xiao_shuie1=0;
else
n_xiao_jine1=n_xiao_jine;
n_xiao_shuie1=n_xiao_shuie;
if n_xiao_jine<0
n_xiao_jine1=0;
end
end