📄 chengshi.m
字号:
%城市交通流量预测
clc
year=1994:2008;
p=[493 372 445 372 445 176 445 176 235 176 235 378 235 378 429;...
378 429 561 429 561 651 561 651 467 651 467 527 467 527 668;...
527 668 841 668 841 526 841 526 480 526 480 567 480 567 685];
t=[176 235 378 429 561 651 467 527 668 841 526 480 567 685 507];
%对原始数据进行规范化处理
[pn,meanp,stdp,tn,meant,stdt]=prestd(p,t);
%建立相应的BP网络
net = newff(minmax(pn),[7,1],{'tansig' 'purelin' },'trainlm');
% 设置训练参数
net.trainParam.epochs = 1000; %设定循环次数
net.trainParam.goal = 0.0001;
%训练网络
net = train(net,pn,tn);
%对训练后的网络进行仿真
an=sim(net,pn);
a=poststd(an,meant,stdt);
% 绘制仿真后图像
plot(year,t,'b-o',year,a,'r:x');
title('仿真后图像')
xlabel('年份');
ylabel('交通量(辆次/昼夜)');
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -