数学建模社区-数学中国

标题: Matlab数学建模学习报告(一) [打印本页]

作者: 杨利霞    时间: 2019-4-10 15:43
标题: Matlab数学建模学习报告(一)
Matlab数学建模学习报告(一)" B& R# J; i# L; t$ g2 P( ~
# @+ G3 e" k- ~4 W- b

% \5 x- W/ ?! Y! t1. 二维数据曲线图
1.1 绘制二维曲线的基本函数

1.plot()函数 ' C, D8 z, A3 f, w
plot函数用于绘制二维平面上的线性坐标曲线图,要提供一组x坐标和对应的y坐标,可以绘制分别以x和y为横、纵坐标的二维曲线。
  l, d1 W% U2 V# y3 n0 `例:

二、实例演练。  a4 n- q$ i6 A. n7 L# t- J
! ^& w! j/ [) H3 W/ f3 ~/ U
   1、谈谈你对Matlab与数学建模竞赛的了解。
, T' h' {) {2 H  g4 N9 ^  ]+ z
# ?* O+ y% V' u1 E6 K2 N( u        Matlab在数学建模中使用广泛:MATLAB 是公认的最优秀的数学模型求解工具,在数学建模竞赛中超过 95% 的参赛队使用 MATLAB 作为求解工具,在国家奖队伍中,MATLAB 的使用率几乎 100%。虽然比较知名的数模软件不只 MATLAB。) l5 c0 {/ z, f0 m5 W
, N; l. K# A5 a4 ^- ~
        人们喜欢使用Matlab去数学建模的原因:
% h0 d# O6 H- m. W5 l, Y
/ y9 E5 Q  @' o4 o( k(1)MATLAB 的数学函数全,包含人类社会的绝大多数数学知识。$ h4 t" z" \" n# L' E6 a
$ {& R1 _6 J& H7 r2 A$ d
(2)MATLAB 足够灵活,可以按照问题的需要,自主开发程序,解决问题。; r  X7 J" V  Y; Q  e. }

5 [7 \% b0 h7 G' g5 y4 m( p7 e(3)MATLAB易上手,本身很简单,不存在壁垒。掌握正确的 MATLAB 使用方法和实用的小技巧,在半小时内就可以很快地变成 MATLAB 高手了。
$ N; q4 Z# O$ O6 y! H0 S
: h0 y" P# ?( P0 V/ B1 W        正确且高效的 MATLAB 编程理念就是以问题为中心的主动编程。我们传统学习编程的方法是学习变量类型、语法结构、算法以及编程的其他知识,因为学习时候是没有目标的,也不知道学的知识什么时候能用到,收效甚微。而以问题为中心的主动编程,则是先找到问题的解决步骤,然后在 MATLAB 中一步一步地去实现。在每步实现的过程中,遇到问题,查找知识(互联网时代查询知识还是很容易的),定位方法,再根据方法,查询 MATLAB 中的对应函数,学习函数用法,回到程序,解决问题。在这个过程中,知识的获取都是为了解决问题的,也就是说每次学习的目标都是非常明确的,学完之后的应用就会强化对知识的理解和掌握,这样即学即用的学习方式是效率最高,也是最有效的方式。最重要的是,这种主动的编程方式会让学习者体验到学习的成就感的乐趣,有成就感,自然就强化对编程的自信了。这种内心的自信和强大在建模中会发挥意想不到的力量,所为信念的力量。3 Q. J% e3 m$ P

4 p/ a" S$ y3 @8 x7 ]% _7 g  U         数学建模竞赛中的 MATLAB 水平要求:
1 ]/ x: ]0 @4 J' o* k# s3 F9 y7 K2 [9 l2 m* i& I
要想在全国大学生数学建模竞赛中拿到国奖, MATLAB 技能是必备的。 具体的技能水平应达到:( M9 T! w* R6 R: }: u; W2 q
! X" P* E' ~' c4 _( U, @
1)了解 MATLAB 的基本用法,包括几个常用的命令,如何获取帮助,脚本结构,程序的分节与注释,矩阵的基本操作,快捷绘图方式;) ?9 s4 d* d  d0 j9 ]
8 s1 |6 t& w0 `3 b
2)熟悉 MATLAB 的程序结构,编程模式,能自由地创建和引用函数(包括匿名函数);2 N2 P) x( P& k

3 s5 c+ G# N" m9 T& e  v1 I  }3 J9 g0 c3)熟悉常见模型的求解算法和套路,包括连续模型,规划模型,数据建模类的模型;# M* f+ v% ~- z1 I5 U+ d  ]

% X& X' i0 Q& I0 s! E/ k- M4)能够用 MALTAB 程序将机理建模的过程模拟出来,就是能够建立和求解没有套路的数学模型。 1 p  ~+ o) }9 \( ^

$ S: T% I5 S7 O要想达到如上要求, 不能按照传统的学习方式一步一步地学习, 而要结合上述提到的学习理念制定科学的训练计划。% b7 ~8 v/ ^) m

% _0 H/ N* y  m( r9 Z  2、已知股票的交易数据:日期、开盘价、最高价、最低价、收盘价、成交量和换手率,试用某种方法来评价这只股票的价值和风险。如何用MATLAB去求解该问题?(交易数据:点击此处获取数据)
3 y* t3 c: [: O" v
0 ~% l4 ~+ l6 ~0 h% S1 j! B解题步骤:
% z1 Z0 Z2 Z/ G" F0 H+ X3 r$ ?. ^* o7 a& ~/ _$ h) ]0 q
第一阶段:从外部读取数据* f! W8 X( k. x4 C" M

5 ^" R$ u) b0 S9 pStep1.1:把数据文件sz000004.xls拖曳进‘当前文件夹区’,选中数据文件sz000004.xls,右键,将弹出右键列表,很快可发现有个“导入数据”菜单,如图 1 所示。: v  m+ V, j/ d8 D: o6 e  w

# s- E+ ?1 L8 w( n9 y1 f) ^4 P5 D4 ^% s) v& V( J/ a
" w: t# M( n6 s  C4 T/ C
                                                                  图1. 启动导入数据引擎示意图
+ n. z' i; s5 _  D- X! a+ h0 M3 R% P
Step1.2:单击“导入数据”这个按钮,则很快发现起到一个导入数据引擎,如图 4 所示。+ Z' f0 P5 a: Z' N2 ^* X
2 P" B/ A- ]; _) K: X: J
- h- i# `! p2 c8 e2 W* f, O& v

1 [: u2 u9 [1 s: }1 T                                                                    图2. 导入数据界面7 d+ p; v! O6 L6 e8 z+ q8 h9 z

7 y2 y% ^  p, ]' k* f  jStep1.3:观察图 2,在右上角有个“导入所选内容”按钮,则可直接单击之。马上我们就会发现在 MATLAB 的工作区(当前内存中的变量)就会显示这些导入的数据,并以列向量的方式表示,因为默认的数据类型就是“列向量”,当然您可以可以选择其他的数据类型,大家不妨做几个实验,观察一下选择不同的数据类型后会结果会有什么不同。至此,第一步获取数据的工作的完成。7 n* W4 Q# d- Z1 x
" G% {2 Z" G+ ~& a. e
5 x2 Q& J' S: u
0 u' i% D8 T7 j! W$ E; A! ~" Q
第二阶段:数据探索和建模
2 S2 D1 V3 E! G% l# r& m! H. `1 s/ v" d' Z. W. p; @" s- w3 Q
现在重新回到问题,对于该问题,我们的目标是能够评估股票的价值和风险,但现在我们还不知道该如何去评估,MATLAB 是工具,不能代替我们决策用何种方法来评估,但是可以辅助我们得到合适的方法,这就是数据探索部分的工作。下面我们就来尝试如何在 MATLAB 中进行数据的探索和建模。
! ^; \3 P; n( ?" \) A/ `
3 Z. K+ b) l  JStep2.1:查看数据的统计信息,了解我们的数据。具体操作方式是双击工具区(直接双击这三个字),此时会得到所有变量的详细统计信息。通过查看这些基本的统计信息,有助于快速在第一层面认识我们所正在研究的数据。当然,只要大体浏览即可,除非这些统计信息对某个问题都有很重要的意义。数据的统计信息是认识数据的基础,但不够直观,更直观也更容易发现数据规律的方式就是数据可视化,也就是以图的形式呈现数据的信息。下面我们将尝试用 MATLAB 对这些数据进行可视化。
, \/ O; o1 ^! v# i
6 @4 c4 s/ j  ^% p9 V( O6 O由于变量比较多,所以还有必要对这些变量进行初步的梳理。对于这个问题,我们一般关心收盘价随时间的变化趋势,这样我们就可以初步选定日期(DateNum)和收盘价(Pclose)作为重点研究对象。也就是说下一步,要对这这两个变量进行可视化。2 k7 q7 z0 w8 a. ~# i) N3 G

. v+ q: W& b4 f( [' e/ T1 i+ ^对于一个新手,我们还不知道如何绘图。但不要紧,新版 MATLAB 提供了更强大的绘图功能——“绘图”面板,这里提供了非常丰富的图形原型,如图 3 所示。
& I1 p4 u5 \" R# y: w. x' B- D$ }
7 r! P+ d% V* u$ |, S
8 j. Q6 s  z) |9 g8 w
+ E: j- P8 s- z, F7 u, h; |1 O/ Y" ]4 z                                                                                 图3 MATLAB绘图面板中的图例
' C9 d1 \! F4 [
7 }& }; T5 q; Q- e' W要注意,需要在工作区选中变量后绘图面板中的这些图标才会激活。接下来就可以选中一个中意的图标进行绘图,一般都直接先选第一个(plot)看一下效果,然后再浏览整个面板,看看有没有更合适的。下面我们进行绘图操作。" e* H# ~, B' D: K8 N2 x8 p

: n3 O4 E2 T0 B4 w1 ~Step2.2:选中变量 DataNum 和 Pclose,在绘图面板中单机 plot 图标,马上可以得到这两个变量的可视化结果,如图 4 所示,同时还可以在命令窗口区看到绘制此图的命令:- E9 E3 U/ N9 u5 U% t
1 G9 ]: [, F8 n6 }, j8 a+ h/ `' X
>> plot(DateNum,Pclose)
3 Q' E: C8 ?' e7 E5 o8 N8 T$ y
1 f. v2 @0 k* A; S9 w% _, W7 B( E3 G5 }( F2 v
$ [. L/ K8 [% n/ N, R8 e6 a
                                                                                       图4 通过 plot 图标绘制的原图9 v) f, N+ X% d9 c( V, X. P

: u( N7 ?) q  z3 D' F/ p这样我们就知道了,下次再绘制这样的图直接用 plot 命令就可以了。一般情况下,用这种方式绘图的图往往不能满足我们的要求,比如我们希望更改:
" W' V4 I1 {9 R3 {) E/ J% o/ m1 a( l& |7 ^' `3 |+ S- l# R
(1)曲线的颜色、线宽、形状;
/ v# \. E% {! f5 W" l
; Z, o7 o$ _6 ~, E; ~; v, V, E(2)坐标轴的线宽、坐标,增加坐标轴描述;- [3 l' j+ e/ [! v6 Y3 P4 y

; [4 i" D+ L) P* G+ Z' h(3)在同个坐标轴中绘制多条曲线。: N. }& l% w  `0 Z
, V  j! s7 Y+ O) l
此时我们就需要了解更多关于命令 plot 的用法,这时就可以通过 MATLAB 强大的帮助系统来帮助我们实现期望的结果。最直接获取帮助的两个命令是 doc 和 help,对于新手来说,推荐使用 doc,因为 doc 直接打开的是帮助系统中的某个命令的用法说明,不仅全,而且有应用实例,这样就可以“照猫画虎”,直接参考实例,从而将实例快速转化成自己需要的代码。: u5 F! ]& c1 k/ f( V( f# F# Y* \

- t( n* A4 n, W3 w5 D7 \" C0 q接下来我们就要考虑如何评估股票的价值和风险呢?
) D8 {2 @6 k8 F2 ~9 p6 p, N: N% D
- o' @8 x0 p) }! J# s/ c3 a7 p         对于一只好的股票,我们希望股票的增幅越大越好,体现在数学上,就是曲线的斜率越大越好。, D- v5 s: P  i4 v5 V

; U6 J: X+ Y2 E( H6 w# ]         对于风险,则可用最大回撤率来描述更合适,什么是最大回撤率?
! z) T) a' {8 V$ L2 C  E/ x% M9 [$ O& u% e  e6 s7 X  K2 a
         最大回撤率的公式可以这样表达:: u# o" m5 T% q3 ?

0 r6 o) V% o0 f' H0 ~2 iD为某一天的净值,i为某一天,j为i后的某一天,Di为第i天的产品净值,Dj则是Di后面某一天的净值4 s& ]6 y3 l" b, S4 K

2 B& P1 v- V* Wdrawdown=max(Di-Dj)/Di,drawdown就是最大回撤率。其实就是对每一个净值进行回撤率求值,然后找出最大的。可以使用程序实现。最大回撤率越大,说明该股票的风险越高。所以最大回撤率越小,股票越好。
7 ~6 l3 l4 u" K5 M! X% w* ?- ]4 f$ S+ p
           斜率和最大回撤率不妨一个一个来解决。我们先来看如何计算曲线的斜率。对于这个问题,比较简单,由于从数据的可视化结果来看,数据近似成线性,所以不妨用多项式拟合的方法来拟合该改组数据的方程,这样我们就可以得到斜率。
8 B* p! }& g$ Z* _( Q( {6 b: {" [% U: E$ [3 \. F! o5 A. z
Step2.3:通过polyfit()多项式拟合的命令,并计算股票的价值,具体代码为:
4 Q; _; L8 z, N# c6 o& g$ a' o6 X8 e( H; ?1 J. D( Y9 W( a
>> p = polyfit(DateNum,Pclose,1); % 多项式拟合
! K- f/ A' t7 E8 b& L2 [' E4 @. s2 l  I/ g2 Z/ s1 f
>> value = p(1) % 将斜率赋值给value,作为股票的价值
1 G/ |; D, Z2 l0 j) V+ |
) f" }' f5 m7 u& o* ?value =
5 M: j" S* s  u; {5 e9 G5 n- S, W/ T' R
    0.1212
; o6 E9 Y1 p6 p) E2 u" v' P% A$ W3 Z' {1 ^5 \0 T& j
代码分析:%后面的内容是注释。polyfit()有三个参数,前两个大家都能明白是什么意思,那第三个参数是什么意思呢?它表示多项式的阶数,也就是最高次数。比如:在本例中,第三个参数为1,说明其为一次项,即一次函数。第三个参数为你要拟合的阶数,一阶直线拟合,二阶抛物线拟合,并非阶次越高越好,看拟合情况而定。polyfit()返回阶数为 n 的多项式 p(x) 的系数,p 中的系数按降幂排列。在本例中的P(1)指的是最高项的系数,即斜率。
7 x( O. N$ E, @. P$ V/ g. D6 n" n+ E! `6 f* A
Step2.4:用相似的方法,可以很快得到计算最大回撤的代码:
* T% h( G0 K# @" ]' r
) c5 H" M8 z3 D" C7 {>> MaxDD = maxdrawdown(Pclose); % 计算最大回撤
! b/ {6 w8 j; o# s) `) ~8 F, U% A- f( E- m3 J' Z
>> risk = MaxDD  % 将最大回撤赋值给risk,作为股票的风险3 a& `9 _! i' h$ R+ `% F

; M7 n- b: D! H8 Prisk =7 I+ h! U8 y$ ~7 i: \
4 J! n% y2 E' I8 U6 `# M
    0.1155
& Y0 |6 s+ O3 D3 Y* x
, M( [3 t0 j" I+ ^9 w代码分析:最大回撤率当然计算的是每天收盘时的股价。最大回撤率越大,说明该股票的风险越高。所以最大回撤率越小,股票越好。
4 a' i) V" j2 Z, [( K2 Q
; _: M. s/ ?2 t- M: Y% Y0 o% v& v" P到此处,我们已经找到了评估股票价值和风险的方法,并能用 MALTAB 来实现了。但是,我们都是在命令行中实现的,并不能很方便地修改代码。而 MATLAB 最经典的一种用法就是脚本,因为脚本不仅能够完整地呈现整个问题的解决方法,同时更便于维护、完善、执行,优点很多。所以当我们的探索和开发工作比较成熟后,通常都会将这些有用的程序归纳整理起来,形成脚本。现在我们就来看如何快速开发解决该问题的脚本。
" I) N% g$ K0 ]2 n
7 d9 Q0 ?$ X( f# @" n: tStep2.5:像 Step1.1 一样,重新选中数据文件,右键并单击“导入数据”菜单,待启动导入数据引擎后,选择“生成脚本”,然后就会得到导入数据的脚本,并保存该脚本。! U1 O/ F" v  M% P/ J" n
7 L9 {; e8 w  A5 k
脚本源代码中有些地方要注意:
# c# N. M5 i5 p. h$ l% w8 R$ G; Y) g5 |+ a! N
       %%在matlab代码中的作用是将代码分块,上下两个%%之间的部分作为一块,在运行代码的时候可以分块运行,查看每一块代码的运行情况。常用于调试程序。%%相当于jupyter notebook中的cell。
) }$ p9 z; T2 H- B% H. `7 k7 U9 j) B. A* I8 C6 F9 t7 Y
       %后的内容是注释。
3 ?* h, M( a$ Z( G$ H. K# m* F2 g2 b) v6 W& L) v
        每句代码后面的分号作用为不在命令窗口显示执行结果。
, ^& L% f# q* e5 K, }) p1 p: O% `  v$ a
脚本源代码:8 L* t& N/ o* v% b
$ _  E' U  @$ Z
%% 预测股票的价值与风险
: j: A8 d; `/ }/ E- M% a8 ^+ c, q2 h% I% \3 T
%% 导入数据
1 {# D! {6 c2 I0 n3 ?! aclc, clear, close all
( U/ x9 r+ z# D8 h, V. d  l% clc:清除命令窗口的内容,对工作环境中的全部变量无任何影响
- P8 K5 W( M% t2 r4 h  z7 _% clear:清除工作空间的所有变量 2 D2 h3 D9 Q7 x. Q: o
% close all:关闭所有的Figure窗口) x4 C8 u1 j: z8 E3 T

1 q+ u! X' s( }% 导入数据
; w, t. w5 Z% U+ N: v  S[~, ~, raw] = xlsread('sz000004.xlsx', 'Sheet1', 'A2:H7');
  b$ A' d; Q0 d# z% [num,txt,raw],~表示省略该部分的返回值
$ q2 K' d+ C$ u0 d1 x( X  \# ~% xlsread('filename','sheet', 'range'),第二个参数指数据在sheet1还是其他sheet部分,range表示单元格范围$ `+ F9 m( B7 x$ K9 D5 H5 T6 B
0 a+ I: c6 V, V) j, \  w
% 创建输出变量
' T4 q5 S" ~5 ^! S1 T1 @7 W  Tdata = reshape([raw{:}],size(raw));
: B5 D; D" e$ d" B3 _  l% [raw{:}]指raw里的所有数据,size(raw):6 x 8 ,该语句把6x8的cell类型数据转换为6x8 double类型数据
, w5 q7 \( G. e2 {; K
' I9 L$ q. P7 k& o" H% 将导入的数组分配列变量名称. I. \- D9 G, K- v
Date = data(:, 1); % 第一个参数表示从第一行到最后一行,第二个参数表示第一列4 w3 v  n6 x. A; i2 A
DateNum = data(:, 2);
& B: N! O! E6 nPopen = data(:, 3);
! U. C+ C; m: f0 d& |# F5 }0 k; APhigh = data(:, 4);% y" z5 j1 F$ X) l4 ?( ^
Plow = data(:, 5);$ v4 y5 N8 V$ U* l
Pclose = data(:, 6);  + y* ~. E9 d& l* Z/ F
Volum = data(:, 7); % Volume 表示股票成交量的意思,成交量=成交股数*成交价格 再加权求和; x8 Z2 k! W" T+ D5 x( x
Turn = data(:, 8); % turn表示股票周转率,股票周转率越高,意味着该股股性越活泼,也就是投资人所谓的热门股
4 C' \8 V3 m* U6 `
# ], @( A' h$ w/ g+ d* A4 W% 清除临时变量data和raw
% T6 o* G, o( U4 bclearvars data raw;/ L5 v/ y; D* H: C" }0 m+ Q

; y* s& J/ v; w6 C1 I  d%% 数据探索$ z" l; m% F( V. ~% q$ E+ j
) P: t# f/ g* a1 e$ H" h
figure % 创建一个新的图像窗口- q! V" ]; P$ _3 ^4 `# [5 c& \
plot(DateNum, Pclose, 'k'); % 'k',曲线是黑色的,打印后不失真
0 `. i7 @3 p2 H/ cdatetick('x','mm-dd'); % 更改日期显示类型。参数x表示x轴,mm-dd表示月份和日。yyyy-mm-dd,如2018-10-270 }% y# l) R  P* O, R" Z, J6 O
xlabel('日期') % x轴
+ @% J( t  U! J0 oylabel('收盘价') % y轴
) {/ f0 ~! }7 m: _' }) d( ffigure+ E% v1 Q4 w  I) Q4 N% c
bar(Pclose) % 作为对照图形
8 s& j. l- V) s  v8 d% @$ l1 n  Q; g1 Y7 i2 {/ G, f
%% 股票价值的评估
. D, e, Q- I3 w2 j3 z! c( y( Y4 R, m6 g0 E% P; C5 s
p = polyfit(DateNum, Pclose, 1); % 多项式拟合
, M4 K) _7 ?. [- \% polyfit()返回阶数为 n 的多项式 p(x) 的系数,p 中的系数按降幂排列
" i6 \2 a5 V7 h( {P1 = polyval(p,DateNum); % 得到多项式模型的结果6 x! ]( v+ |0 R5 s8 Z) g
figure
3 J' i6 p/ M$ v' g8 _! ?plot(DateNum,P1,DateNum,Pclose,'*g'); % 模型与原始数据的对照, '*g'表示绿色的*
  I. G+ [3 j6 o6 W+ s( yvalue = p(1) % 将斜率赋值给value,作为股票的价值。p(1)最高项的次数
: r4 Y' d5 a0 t. S1 [
- r8 H. ^1 W7 Z2 n' T%% 股票风险的评估+ h+ ^$ }( B  v
MaxDD = maxdrawdown(Pclose); % 计算最大回撤
' [- A1 A( L$ ~; I: Hrisk = MaxDD  % 将最大回撤赋值给risk,作为股票的风险
8 R8 y4 @& m! j: ?& |5 P  3、回归算法演练。3 I8 u/ i" r0 _6 ]
  w( A9 _$ u/ m7 `! u
(1)一元线性回归# g6 L' x  o, X. @8 [/ t
/ X, y  H" T6 A: V" v! l2 G
[ 例1 ] 近 10 年来,某市社会商品零售总额与职工工资总额(单位:亿元)的数据见表1,请建立社会商品零售总额与职工工资总额数据的回归模型。
; J3 j; ~" [5 m: q; Q
  ]2 M; E5 _6 w. V
- N1 U* z+ n5 |+ ?$ q( i
8 }/ W. H! y& b5 N# D该问题是典型的一元回归问题,但先要确定是线性还是非线性,然后就可以利用对应的回归方法建立他们之间的回归模型了,具体实现的 MATLAB 代码如下:3 _# G& S6 B4 b4 B: @
$ {# }+ k9 x0 \6 E
(1)输入数据1 c( n2 `1 i7 f
' |6 j0 t9 v: \0 H
%% 输入数据
9 _+ Y4 e- f2 [7 m6 lclc, clear, close all. x2 y9 R' C; Y' t7 D
% 职工工资总额
! U  C: j' |' v+ q  Jx = [23.8,27.6,31.6,32.4,33.7,34.90,43.2,52.8,63.8,73.4];
5 X) I! e2 A8 n2 c& w% 商品零售总额- z# E5 I5 h/ T% s
y = [41.4,51.8,61.7,67.9,68.7,77.5,95.9,137.4,155.0,175.0];
! ~7 ]6 Z2 m, d  s5 _6 y(2)采用最小二乘回归" T9 T! [1 _% x" L) ?$ s+ w( s
; o6 w& ^. _* a4 B' b3 ~
%% 采用最小二乘法回归
) _: E" T# D+ M( H0 I& K% 作散点图
& I' i) j1 S) V; u0 p* d+ rfigure* O* x- f9 g5 U! X
plot(x,y,'r*') % 散点图,散点为红色7 _/ p2 q2 ]' @/ L! N
xlabel('x(职工工资总额)','fontsize',12)
( I- {1 C& w7 T( l, B4 j0 `ylabel('y(商品零售总额)','fontsize',12)& C0 u( j! t! H! @  y8 e& T
set(gca, 'linewidth',2) % 坐标轴线宽为2
/ C# B# @6 y) j1 {- p- v* S/ M) e  L, {- f; i- Y6 C
% 采用最小二乘法拟合/ T0 s) E. ]6 y8 q
Lxx = sum((x-mean(x)).^2); %在列表运算中,^与.^不同
6 \6 o# d' {8 XLxy = sum((x-mean(x)).*(y-mean(y)));0 U) ]9 F0 i+ V0 J1 Y3 |7 _7 ?$ Q" a6 M
b1 = Lxy/Lxx;  a0 z8 c# L0 y2 T# n/ m
b0 = mean(y) - b1 * mean(x);# T% X) y- ?( H. p
y1 = b1 * x + b0;
) b+ f6 l( K# S3 u
% g6 L1 v. z* R, Mhold on % hold on是当前轴及图像保持而不被刷新,准备接受此后将绘制的图形,多图共存2 Y% m% R1 ?2 X( A/ O
plot(x,y1, 'linewidth',2);
7 g9 _; {# z4 i! ?  }* v运行本节程序,会得到如图5所示的回归图形。在用最小二乘回归之前,先绘制了数据的散点图,这样就可以从图形上判断这些数据是否近似成线性关系。当发现它们的确近似在一条线上后,再用线性回归的方法进行回归,这样也更符合我们分析数据的一般思路。2 |* W$ F+ I( f5 k4 G

) _/ x9 z. U! Y' U% F% D/ {: k1 {8 u2 Q( ^5 z$ V( K' b

: l: N4 A7 O) _8 C9 `3 o9 ?, j0 @                                                                                                    图5  b* i' `3 S. u+ ~5 H
8 L* `, E. Q# m& R% ?; {
(3)采用 LinearModel.fit 函数进行线性回归
9 _4 i9 L- v1 U% c/ G) W+ m
; ]( O/ [4 X) L: ~%% 采用 LinearModel.fit 函数进行线性回归
  S" B# x  f+ qm2 = LinearModel.fit(x, y)
9 w* r2 i" A7 o% [* ~3 x0 [/ o3 ]运行结果如下:
5 g# P" ^$ q, M8 D2 J* I: O; K! m" Y1 B- z6 l. i+ |( j3 F9 L
m2 =
% |" h3 j5 Q, a; }7 [, P8 e; F' t' M2 w* w  V8 s
Linear regression model:
9 t/ h$ L. h# ~$ Y. \$ z
" ~- O0 D- B2 k6 g    y ~ 1 + x1( y9 j- O9 t8 E  Q; ?
Estimated Coefficients:
7 X$ m0 j/ d+ X3 b# M
6 ?# O0 t4 V$ J& R) Q/ ~) N               Estimate      SE       tStat       pValue
* a5 `) n; p: m0 q) G" ~$ b
) V5 K2 v9 T8 P; c    (Intercept)    -23.549      5.1028    -4.615     0.0017215
4 D* y/ R& j* [9 a8 l) p) J! o: _1 I1 w4 J8 D  s1 v- F
    x1           2.7991     0.11456    24.435    8.4014e-09: \- ?3 x8 }5 o( ~' Y
1 \' N) S% K/ D/ z  Q; f$ R
R-squared: 0.987,  Adjusted R-Squared 0.985( C# G& E6 l) B& e$ j4 f" f$ ?2 g

5 ], ^) Y2 O8 t! Z% G: IF-statistic vs. constant model: 597, p-value = 8.4e-09
9 ?# |' Q% C3 W& v& i$ m3 N
0 t: S  |9 h1 u! |/ z( \如下图,我们只需记住-23.594是一次函数的中x的系数,2.7991是一次函数中的常数项即可,其它的不用理会。, `. U, ~4 b' ]* s2 x; r

# U) W# e- q$ z. W" E2 y1 t9 m, \( |, Z2 [5 Z2 Q

- s8 M* q7 }5 n4)采用 regress 函数进行回归
' L) a7 S3 m$ L  e% K
& I9 F# @* i6 J0 W( Y' l+ D* v; z%% 采用 regress 函数进行回归
: @. \/ B& z: _0 s! B" tY = y'
5 [! k9 Y. a6 D. ZX = [ones(size(x,2),1),x']. `- [  d. k* Q! [7 F7 t; e
[b,bint,r,rint,s] = regress(Y,X)
4 h; w9 {4 Y# J运行结果如下:! c3 o- G0 u9 v. \0 S4 f1 |% N5 K; y

# t/ H% _6 C6 W* c6 e4 ?b =  Z8 @. F  @% e/ W4 b. ?
" p5 U. h: n- M" D- W4 E
  -23.5493& F3 ?+ Y5 g1 R

& y& U" M) J6 F. O% C( X    2.7991
! ]: h4 _( ~! q; p9 n/ [; [$ F. k& h) [0 v6 `) i
我们只需记住-23.594是一次函数的中x的系数,2.7991是一次函数中的常数项即可,其它的不用理会。
7 R( W9 y& R0 V8 g  I6 N
, x% ~( a6 w' z1 f9 a(2)一元非线性回归' N  O& I1 ~0 C
7 D2 r5 u" h& y) x; @% a! ~& A
[ 例2 ] 为了解百货商店销售额 x 与流通率(这是反映商业活动的一个质量指标,指每元商品流转额所分摊的流通费用)y 之间的关系,收集了九个商店的有关数据(见表2)。请建立它们关系的数学模型。+ C" [. k0 l4 [0 P

2 ~( j9 L& |9 }+ a( R4 r$ }. c0 R, i# U0 S! b+ Y
; c3 \9 H! j) V2 }
' y- b6 R" ~) v/ T# t8 j5 z
0 N6 P; n7 J0 H5 |! I: E# U7 S7 h
        为了得到 x 与 y 之间的关系,先绘制出它们之间的散点图,如图 2 所示的“雪花”点图。由该图可以判断它们之间的关系近似为对数关系或指数关系,为此可以利用这两种函数形式进行非线性拟合,具体实现步骤及每个步骤的结果如下:
/ ^' N2 u+ K& S! E( `9 _) ]; J9 v
. R% ?5 o6 Z' n8 f; D(1)输入数据
# i8 ?& d8 Y2 C; n) d3 s+ Z0 m+ ^
2 V2 B3 P( A% v9 M0 Y2 H; e%% 输入数据
' z0 \, l  B* A5 vclc, clear all, close all
! _+ ^9 r9 _- |* cx = [1.5, 4.5, 7.5,10.5,13.5,16.5,19.5,22.5,25.5];+ ]3 e+ o1 W9 y$ t$ o
y = [7.0,4.8,3.6,3.1,2.7,2.5,2.4,2.3,2.2];
0 Y2 V  _7 }+ u1 {1 Q" j- zplot(x, y, '*', 'linewidth', 1) % 这里的linewidth指的是散点大小
  A- S; i$ B$ Iset(gca,'linewidth',2) % 设置坐标轴的线宽为2* h3 D. T" V& I! Y. {* [# [' {
xlabel('销售额x/万元','fontsize',12)
+ p; s( ?' Z) d4 @" [% o7 x! ~ylabel('流通率y/%','fontsize',12)" b$ _6 v% Y, X4 H9 G
(2)对数形式非线性回归! a8 A4 V8 U8 {- t: G  \+ Q
/ M  l0 c  ]! ?* B  r: S
%% 对数形式非线性回归
% P- g/ {4 Q- ]2 ^5 J7 Sm1 = @(b,x) b(1) + b(2)*log(x);
* Y: m* H% k3 C# ]( cnonlinfit1 = fitnlm(x,y,m1,[0.01;0.01])4 _3 d+ D4 W+ Z1 ?" V( t5 T3 I
b = nonlinfit1.Coefficients.Estimate;+ z- J, {  ], q7 G' S+ a+ ^
Y1 = b(1,1) + b(2,1)*log(x);
% P0 {2 T  Q' g# ~$ Whold on 1 n- E7 g# P, T
plot(x, Y1, '--k', 'linewidth',2)
3 l+ y* H& U' t6 `  d* h运行结果如下:* g! n& |* ?" y& n; |7 e+ g
$ @4 h, Y& x+ [" h, p$ j
nonlinfit1 =2 N2 |4 ^* V) E3 e
6 c" e- R6 p. J2 o3 x. Y
Nonlinear regression model:
6 Z7 K6 o  O. Z" {: }2 [3 [; M! Y# ]
1 @/ ?' ]2 e5 E3 ~! W! W" s$ F    y ~ b1 + b2*log(x)
- w! ^) d9 u; u, w' [: @2 p- P( a. s, E4 H4 {
Estimated Coefficients:; p3 J! n- V: f) R2 ]8 ]6 g
! v2 f$ z6 z4 J7 ^
          Estimate      SE        tStat       pValue 3 y$ ]# F7 u" B
: n" W9 s& g: g5 Z6 _
    b1    7.3979      0.26667     27.742    2.0303e-08# v) \7 N. e" ^5 w# ]) S$ u, t
0 p4 R0 ^1 F; l
    b2    -1.713      0.10724    -15.974    9.1465e-071 W& f! U4 t8 U3 B+ O/ L0 [7 C

* ]# I" W4 u4 [R-Squared: 0.973,  Adjusted R-Squared 0.969
( B/ r* s) y) @! a/ m. T% Z9 F* |- m) c) O0 d
F-statistic vs. constant model: 255, p-value = 9.15e-070 j+ F7 ?5 `/ ?+ m" F

; z! n4 n2 Z) `5 ~0 q% i(3)指数形式非线性回归) k3 i$ K! S" C% S4 o1 o* x4 A

7 n' \) |; @0 s' P+ X& t% x%% 指数形式非线性回归
9 y. m! o( D' Z8 Am2 = 'y ~ b1*x^b2';
( y7 a5 y- E2 P4 Q6 rnonlinfit2 = fitnlm(x,y,m2, [1;1])0 m4 K, c( y2 p3 z, m
b1 = nonlinfit2.Coefficients.Estimate(1,1);: z# _& b1 c* m: k
b2 = nonlinfit2.Coefficients.Estimate(2,1)8 t3 M, J$ o4 ?: v/ z  {# ?
Y2 = b1*x.^b2;
. g1 O: Q; a; D4 K( H4 }& Fhold on;  H; p: }- r; i' E  I3 I
plot(x,Y2,'r','linewidth',2). p  O! N2 Y6 f
legend('原始数据','a+b*lnx','a*x^b') % 图例
; r3 r; ~; @1 `0 c6 y" e运行结果如下:" e. y4 l6 i/ P( ?1 E; ^$ d
1 Y. B% ]* u, \
nonlinfit2 =5 K2 R& H; I' o% G: {4 m/ _

6 [" B! Y7 X3 @- F+ y, N3 ANonlinear regression model:2 l3 n4 r) }0 o+ ]7 }3 o6 i

& e) S# n  n1 g; {" w( |    y ~ b1*x^b2
8 Z, @8 @. E% Y3 V" V/ u. P2 C/ `# {/ C7 r, x8 |' S( l
Estimated Coefficients:* d5 I0 H: Y/ y6 C2 M$ ]

# S0 W, e' ~" @+ O7 d          Estimate       SE        tStat       pValue
$ D5 E+ f' v  {: L+ q0 [
7 k8 G! `: N. S; `% V    b1      8.4112     0.19176     43.862    8.3606e-100 q! F! {* }$ {

* d6 k! l' }' D  `4 d- g" m! H, D/ D    b2    -0.41893    0.012382    -33.834    5.1061e-09+ [3 \  c$ B+ g3 x) w# S

- R1 K8 Z* ~0 @: u* I; rR-Squared: 0.993,  Adjusted R-Squared 0.992
) K# @- ~0 h4 y7 h1 A1 ~" b% R, R6 }% q
F-statistic vs. zero model: 3.05e+03, p-value = 5.1e-11
. C+ a" L( L1 I# Z, z6 ]$ S2 a) R& a' H- |
在该案例中,选择两种函数形式进行非线性回归,从回归结果来看,对数形式的决定系数为 0.973 ,而指数形式的为 0.993 ,优于前者,所以可以认为指数形式的函数形式更符合 y 与 x 之间的关系,这样就可以确定他们之间的函数关系形式了。6 b$ S  Q1 N0 n: Y9 z
: M5 i. q" _5 @/ P$ v% Y
2.多元回归; g* F' f  K# L: k( Q
  x: L7 G( ~( h
1.多元线性回归
8 D( H  d* R# \2 Q$ [4 T5 c
1 C* f4 A$ K4 t1 ?( s[ 例3 ] 某科学基金会希望估计从事某研究的学者的年薪 Y 与他们的研究成果(论文、著作等)的质量指标 X1、从事研究工作的时间 X2、能成功获得资助的指标 X3 之间的关系,为此按一定的实验设计方法调查了 24 位研究学者,得到如表3 所示的数据( i 为学者序号),试建立 Y 与 X1 , X2 , X3 之间关系的数学模型,并得出有关结论和作统计分析。
$ T4 u- q- o* Y; u! N7 K/ S+ o% h# [' ^# x/ n' ], W

  W4 Q9 _: h$ Q3 G/ r7 Q
( d- N$ ~& h4 I$ s, z9 G# h# Y9 z该问题是典型的多元回归问题,但能否应用多元线性回归,最好先通过数据可视化判断他们之间的变化趋势,如果近似满足线性关系,则可以执行利用多元线性回归方法对该问题进行回归。具体步骤如下:. l% M, J; ~# O  D$ ~- g

' H4 O& R* ~' Q, y) q(1)作出因变量 Y 与各自变量的样本散点图
* u  y. A# i! t8 \
3 x- E) ~1 k; s) \' r作散点图的目的主要是观察因变量 Y 与各自变量间是否有比较好的线性关系,以便选择恰当的数学模型形式。图3 分别为年薪 Y 与成果质量指标 X1、研究工作时间 X2、获得资助的指标 X3 之间的散点图。从图中可以看出这些点大致分布在一条直线旁边,因此,有比较好的线性关系,可以采用线性回归。绘制图3的代码如下:! M0 G/ }& n7 [: `

9 K  I1 U2 n# n0 k" P%% 作出因变量Y与各自变量的样本散点图
- Z& ?; s. g5 j% x1,x2,x3,Y的数据) ~2 X/ R- S' T- v: E! f
x1=[3.5 5.3 5.1 5.8 4.2 6.0 6.8 5.5 3.1 7.2 4.5 4.9 8.0 6.5 6.5 3.7 6.2 7.0 4.0 4.5 5.9 5.6 4.8 3.9];+ K! W2 I6 v; a
x2=[9 20 18 33 31 13 25 30 5 47 25 11 23 35 39 21 7 40 35 23 33 27 34 15];
8 o9 S" o( B: p! h! ~* Rx3=[6.1 6.4 7.4 6.7 7.5 5.9 6.0 4.0 5.8 8.3 5.0 6.4 7.6 7.0 5.0 4.0 5.5 7.0 6.0 3.5 4.9 4.3 8.0 5.0];
& ?( e1 F; J  |7 L! |/ U' SY=[33.2 40.3 38.7 46.8 41.4 37.5 39.0 40.7 30.1 52.9 38.2 31.8 43.3 44.1 42.5 33.6 34.2 48.0 38.0 35.9 40.4 36.8 45.2 35.1];, V" Y  U* o0 _/ @( j
% 绘图,三幅图横向并排7 R$ t5 N# t: q) h
subplot(1,3,1),plot(x1,Y,'g*')) c' a5 k4 ~1 y3 Y( \4 e
subplot(1,3,2),plot(x2,Y,'k+')
: C6 U8 [5 b+ i6 A/ Gsubplot(1,3,3),plot(x3,Y,'ro')
9 d7 N* K* R. t, _绘制的图形如下:
4 D7 `  _$ \$ p! G% ^2 k7 B% S) U- b' \+ `/ F; X, |, W

& ~7 |3 h  f5 e2 B# f
/ o  H  T; g0 l) R8 _0 a(2)进行多元线性回归% t; J; k# h  o, F3 l: v5 C
3 m) T+ \- m- f, L7 @1 P+ v$ c
这里可以直接使用 regress 函数执行多元线性回归,注意以下代码模板,以后碰到多元线性问题直接套用代码,具体代码如下:0 q7 x! v5 p1 `

) Z" V0 _5 v8 F' l$ {3 o7 f2 J. j%% 进行多元线性回归/ V4 |* K3 \3 h' H/ L3 k  q
n = 24; m = 3; % 每个变量均有24个数据,共有3个变量
/ a) a5 j, Y- e1 s/ F* TX = [ones(n,1),x1',x2',x3'];4 D3 J, A, P$ z, a
[b,bint,r,rint,s]=regress(Y',X,0.05) % 0.05为预定显著水平,判断因变量y与自变量之间是否具有显著的线性相关关系需要用到。
1 ^/ G  H1 T5 h9 n4 D9 C运行结果如下:
5 @" `" w8 {9 J2 y6 a8 W* Y! q, n8 U# }3 L) d( H
b =' B4 i- C% v; k  c; |  v5 X# |; _. }
1 L4 S2 R  r) v% f8 e# H9 c
   18.0157
0 d( Z& T0 W" \" o. `3 U    1.0817/ {, J! P. M: @) n1 X1 }0 ^! D
    0.3212# P5 ]9 h& w8 P( k
    1.2835
- `3 S. q5 I5 T) H: i7 Q/ u
# X2 t5 o1 `' `& ~' r7 V4 V; t
4 t7 R9 B4 t8 Y/ N( Ubint =
% S, U1 |/ G. P9 e0 Z) d1 F* b( _
, W0 }: `( {: I" c* x   13.9052   22.12625 i) J) O; i( m- c' P0 [! x* ?
    0.3900    1.7733+ h6 e' d+ b  {& K
    0.2440    0.3984; `: k; |* S" Z6 {
    0.6691    1.8979
$ m0 u( M7 ^5 t2 _1 u# ^& S8 K* S9 b! j! j( X
- b7 R* s: d0 b0 U. M3 c# Z
r =5 z1 h4 P% P4 h2 b  ?
2 {8 t1 r6 B# p  X. n& r# j
    0.6781: h9 |0 J3 N9 e- T
    1.9129
5 [# w1 G- K; W, b   -0.1119# W$ e5 A9 i  J9 A( ~
    3.31147 n" w) |: W6 q$ s
   -0.7424
/ y* F& |* Z& h0 X! m4 m# Z. @4 r5 e( U    1.2459
0 F" i1 T% f' z- o! ~+ i3 Q. O   -2.1022
" e- u/ D# I, C7 z( e$ z+ [6 z    1.9650
' i2 p( r% k8 ?3 b3 ^( [   -0.3193
5 S! l% P3 i* M( ^% K    1.3466* L# {. \# A  j/ x% r3 Y+ m
    0.8691
, ?/ K2 W/ r; G" N- A   -3.2637
3 [9 b) s* C9 U/ a& B, {8 E   -0.5115
! x, f6 L' R# U& g1 ~! E8 c   -1.1733& G* n$ P* d" G8 S- q; I
   -1.4910
* I/ I' T; l. Y" R4 K! m   -0.2972
. _2 ?" v; B( K' C2 H! B    0.1702+ U, y% {6 n& v/ e, e* f  \& V
    0.5799- g- _4 n0 t# B
   -3.28561 l) Y8 b& X* m% R
    1.1368
( u1 Z% O  t6 }  y" A, w   -0.8864; e# s3 C6 R! O1 _0 g+ f
   -1.4646
" [& X$ }7 Z- D( l5 w    0.8032& l) r- E5 {" F1 d$ x1 K1 l
    1.63011 m  Y9 G" k' D

. y, T' [2 Q( R" T" r0 d1 r9 m0 B! j" L' u& V1 t4 ^
rint =4 S% f0 y5 D+ A0 Q, ]) U3 a

& B# s) r" i. n   -2.7017    4.0580
3 ?# G) Z5 }+ \3 I+ i4 Y   -1.6203    5.4461( o9 W: m( U0 ~. i" v5 o: G
   -3.6190    3.3951
+ a2 I) s2 Y8 T3 C1 F" c    0.0498    6.5729
7 K" h# U/ U9 L$ k5 ]   -4.0560    2.5712& Z8 D  |/ w8 v6 k1 B; D- G
   -2.1800    4.6717* A& _+ O% p/ R
   -5.4947    1.2902- l- Q+ p3 ]1 K, S; R2 k
   -1.3231    5.2531
, o( I$ P1 D+ s   -3.5894    2.9507( _  s( ?) q! r+ T
   -1.7678    4.4609
8 `# j6 E( V$ E% I' s" v& `   -2.7146    4.4529
9 r& x6 Q) u& p4 T   -6.4090   -0.1183( D; S  ~- a% D
   -3.6088    2.5859
& s+ z7 H/ x/ U" a   -4.7040    2.3575% e1 j& C1 n) A; E6 I4 d. [; R
   -4.8249    1.8429
6 u4 h! |: I; ]7 B6 m   -3.7129    3.1185; {1 K, J6 c! t5 f2 o8 f5 ]
   -3.0504    3.3907
7 W! {5 B9 G% c) m   -2.8855    4.0453( w  N: D, F: D4 |* j' v
   -6.2644   -0.3067
, ?! i3 F- j& z1 ?8 \   -2.1893    4.4630
$ \* A( I- L/ P$ @' f   -4.4002    2.6273( H' ?( O+ s3 r$ Q1 b; o
   -4.8991    1.9699
. _+ z; M4 h6 c  G3 p/ i' K   -2.4872    4.0937/ c& h: \& }7 O. K" J# n
   -1.8351    5.0954
5 a$ b, W2 W$ _% P: B/ z( G" `7 v& j' {
' K3 D5 Y6 Z0 S% D
s =
' N0 e% @7 p* n0 W
( S) W) q" [% I# a  G    0.9106   67.9195    0.0000    3.0719
" r& J& b# @9 C& \0 [  K, @看到如此长的运行结果,我们不要害怕,因为里面很多数据是没用的,我们只需提取有用的数据。
( r1 L( z+ o- R0 F! A5 [* U9 W& Y( R9 R- R
在运行结果中,很多数据我们不需理会,我们真正需要用到的数据如下:- p2 {! I1 J! P9 j- I6 b$ q, D

5 V) i) b! \" [1 Bb =" u+ t! H5 R! @; ^8 a: I
6 M- N8 m# T! z' x3 Z) g% Z
   18.0157
+ I7 o1 g" R8 _% S1 ?. |    1.08174 e+ l- e6 x# G1 n
    0.32122 m: V8 [: \# [
    1.2835
8 Q' N' ~8 |; r
! H0 [* n$ s- l) @$ J7 `: Ls =
4 K. w5 V% T  A9 G3 K2 a) k, E0 \2 _, i8 p3 }
    0.9106   67.9195    0.0000    3.0719
, l$ b$ Y9 |0 q5 s7 o, _回归系数 b = (β0,β1,β2,β3) = (18.0157, 1.0817, 0.3212, 1.2835),回归系数的置信区间,以及统计变量 stats(它包含四个检验统计量:相关系数的平方R^2,假设检验统计量 F,与 F 对应的概率 p,s^2 的值)。观察表4的数据,会发现它来源于运行结果中的b和s:+ K/ E$ v; p3 i9 {9 h5 |& N
! c2 h$ R3 u' [. b4 m- B
' Y: y3 g  l3 x- Z( \
% b$ N/ Y8 ^9 |
根据β0,β1,β2,β3,我们初步得出回归方程为:$ H+ J4 H/ u; r. J# i

% f2 |7 R5 r4 r9 P# B) M1 M. v7 b$ C! a7 @( K1 d
; x' ^+ Y- g" X6 ~. j3 d/ N
如何判断该回归方程是否符合该模型呢?有以下3种方法:
* o5 j- i" |8 h* W3 J
! G+ {# d" [( I! f7 h6 I1)相关系数 R 的评价:本例 R 的绝对值为 0.9542 ,表明线性相关性较强。
: v" X5 g5 J" t2 n- }+ m* c! N
0 E- q' \/ s" H# G8 K2)F 检验法:当 F > F1-α(m,n-m-1) ,即认为因变量 y 与自变量 x1,x2,...,xm 之间有显著的线性相关关系;否则认为因变量 y 与自变量 x1,x2,...,xm 之间线性相关关系不显著。本例 F=67.919 > F1-0.05( 3,20 ) = 3.10。
! U/ X, w+ H) R) O. ?8 ~' a2 w* I3 {# ]7 j. Z! x( ~
3)p 值检验:若 p < α(α 为预定显著水平),则说明因变量 y 与自变量 x1,x2,...,xm之间显著地有线性相关关系。本例输出结果,p<0.0001,显然满足 p<α=0.05。6 R; T% \# d8 K; ]

, l2 H% y# \; d8 o! t$ Q. {0 w, ~以上三种统计推断方法推断的结果是一致的,说明因变量 y 与自变量之间显著地有线性相关关系,所得线性回归模型可用。s^2 当然越小越好,这主要在模型改进时作为参考。+ h4 G; N8 `2 [8 n) U0 x3 F
* R- r' P- \& |4 C0 ~
3. 逐步回归% K3 J0 V' S" U3 [4 q) H

& K( t0 ]' w3 A- H8 \[ 例4 ] (Hald,1960)Hald 数据是关于水泥生产的数据。某种水泥在凝固时放出的热量 Y(单位:卡/克)与水泥中 4 种化学成品所占的百分比有关:
& p& f) E, r% r: Y9 }2 D- n" L4 x+ o% ~# Q! Q8 W

- E' X. B; J; h6 }$ z0 U" y5 {4 V( D
/ H# h1 d0 b1 ^8 }在生产中测得 12 组数据,见表5,试建立 Y 关于这些因子的“最优”回归方程。; w! J+ V, N& ?0 x) J, w6 n
/ C/ f! G3 [0 [
% {+ g" G! L5 V
  ]/ t5 [& }7 _; n+ z# I2 a3 |
对于例 4 中的问题,可以使用多元线性回归、多元多项式回归,但也可以考虑使用逐步回归。从逐步回归的原理来看,逐步回归是以上两种回归方法的结合,可以自动使得方程的因子设置最合理。对于该问题,逐步回归的代码如下:
7 U( k  g/ e/ c  M
8 M8 _* t) b3 s3 [; U2 Z%% 逐步回归
$ H0 ?. Z5 H8 h5 R7 }5 U8 p  @X=[7,26,6,60;1,29,15,52;11,56,8,20;11,31,8,47;7,52,6,33;11,55,9,22;3,71,17,6;1,31,22,44;2,54,18,22;21,47,4,26;1,40,23,34;11,66,9,12];   %自变量数据
! q8 y( T9 J% w% L, FY=[78.5,74.3,104.3,87.6,95.9,109.2,102.7,72.5,93.1,115.9,83.8,113.3];  %因变量数据
! f2 C2 J! o, {% K0 Pstepwise(X,Y,[1,2,3,4],0.05,0.10)% in=[1,2,3,4]表示X1、X2、X3、X4均保留在模型中2 K3 Z% A3 c& e( ]0 |
程序执行后得到下列逐步回归的窗口,如图 4 所示。6 w' Z- r  G$ w% x0 T6 l  U$ x) j8 |

  _& U, p- O& u5 |: G" c
0 F- _4 K/ A' d' g: w" M7 I$ y3 }4 x
                                                                                                             图4
0 a7 A, b, U) |6 Y& t1 b- V4 A, a1 y3 V! J
在图 4 中,用蓝色行显示变量 X1、X2、X3、X4 均保留在模型中,窗口的右侧按钮上方提示:将变量X4剔除回归方程(Move X4 out),单击 Next Step 按钮,即进行下一步运算,将第 4 列数据对应的变量 X4 剔除回归方程。单击 Next Step 按钮后,剔除的变量 X3 所对应的行用红色表示,同时又得到提示:将变量 X3 剔除回归方程(Move X3 out),单击 Next Step 按钮,这样一直重复操作,直到 “Next Step” 按钮变灰,表明逐步回归结束,此时得到的模型即为逐步回归最终的结果。最终结果如下:
/ z0 E" G3 W8 z6 j. p% m* f& F
  x9 l" _2 X/ y6 @  s, p- Q: L! R! G; V# a  l& M% V
4 R8 _) D" i' r7 d. u0 N
4. 逻辑回归' h# T5 n$ l! I1 _2 P
1 H9 j  F6 s" L3 H# \) S& N4 e
[ 例5 ] 企业到金融商业机构贷款,金融商业机构需要对企业进行评估。评估结果为 0 , 1 两种形式,0 表示企业两年后破产,将拒绝贷款,而 1 表示企业 2 年后具备还款能力,可以贷款。在表 6 中,已知前 20 家企业的三项评价指标值和评估结果,试建立模型对其他 5 家企业(企业 21-25)进行评估。
/ F# H+ l* ]/ {7 @3 U! w6 I% @
+ D* w- r$ R) ?  I0 E! b
7 _3 f7 s& @: `( B& c8 l$ Y) @7 n( t8 B) H, R# ]3 y9 H2 |; f+ x
对于该问题,很明显可以用 Logistic 模型来回归,具体求解程序如下:  G' g" C) X! Z1 Z3 V- R, [; P
' c/ f8 i  D0 m7 g' O8 U6 K
程序中需要用到的数据文件logistic_ex1.xlsx已上传github:https://github.com/xiexupang/mathematical-modeling/tree/master/%E5%9B%9E%E5%BD%92/%E9%80%BB%E8%BE%91%E5%9B%9E%E5%BD%92
% |# @4 A3 _5 e- p" h2 q3 A' p  f* k8 [: E7 \: M' q4 M8 d
% logistic回归
1 \4 e' O  H4 F* s2 [9 S- O8 o2 M
: ~* _( v* J8 D$ Q, X%% 导入数据" r7 x7 o6 ~5 H
clc,clear,close all
% r' v9 z, @' q) KX0 = xlsread('logistic_ex1.xlsx','A2:C21'); % 前20家企业的三项评价指标值,即回归模型的输入
* p2 f0 Z; d$ U5 L0 pY0 = xlsread('logistic_ex1.xlsx','D221'); % 前20家企业的评估结果,即回归模型的输出
5 x5 j" x9 ^% [' `6 E8 IX1 = xlsread('logistic_ex1.xlsx','A2:C26'); % 预测数据输入& x& Y2 @! x( n: M3 Q+ f* n

0 F  M. ]6 A2 @+ }3 V! E5 b%% 逻辑函数. u, o" Y5 o3 R& p4 U* N
GM = fitglm(X0,Y0,'Distribution','binomial');; y+ g" P* ^5 k! U9 G2 K
Y1 = predict(GM,X1);
" w, U; C: ?, ?  q% a, P
. `6 j* h4 v. o, o9 ^8 i%% 模型的评估
8 `; {+ g! `1 W6 R" B+ b1 g$ UN0 = 1:size(Y0,1); % N0 = [1,2,3,4,……,20]9 @1 Y. J3 y; _6 `
N1 = 1:size(Y1,1); % N1 = [1,2,3,4,……,25]2 ~% d: X# e/ ?3 C& S5 X2 d
plot(N0',Y0,'-kd'); % N0'指的是对N0'进行转置,N0'和Y0的形式相同,该行代码绘制的是前20家企业的评估结果
1 C! k9 M: _& p$ ?; E4 ~% plot()中的参数'-kd'的解析:-代表直线,k代表黑色,d代表菱形符号
+ w/ s( o7 _7 I% U$ p3 F6 Qhold on;# B2 Q$ o/ o9 w
scatter(N1',Y1,'b'); % N1'指的是对N1'进行转置,N1'和Y1的形式相同
" o# ]' X! P( @) F  X$ ~/ yxlabel('企业编号');' |+ Z5 Y8 S- g8 v" H
ylabel('输出值');9 w4 Q8 S% F8 q6 y
得到的回归结果与原始数据的比较如图5所示。
( J) m, N, v. C4 L7 {# q/ p
# W2 H  L2 g& o: E- B. `8 X1 r: r; h/ s' S( o0 U

9 r" D& a( n' f4 i5 Y5 _( [                                                                   图5
* F  Z% M$ r* \0 m' m( E" M! @$ {2 F' |( t' i7 g  L/ M9 t* U
三、总结与感悟。
4 ~- z+ }7 \: X( B" I* B# a# |. v" f/ f, n; O' e# W+ }" d' U
        总结:通过这次学习,我了解到Matlab在数学建模竞赛中使用广泛;在评估股票价值与风险的小实例中,我掌握了用Matlab去建模的基本方法和步骤;在回归算法的学习过程中,我掌握了一元线性回归、一元非线性回归、多元线性回归、逐步回归、逻辑回归的算法。
& h) R4 ?6 d3 g& `8 q# b6 I0 t- q/ U2 p$ f6 u. E
        感悟:正确且高效的 MATLAB 编程理念就是以问题为中心的主动编程。我们传统学习编程的方法是学习变量类型、语法结构、算法以及编程的其他知识,因为学习时候是没有目标的,也不知道学的知识什么时候能用到,收效甚微。而以问题为中心的主动编程,则是先找到问题的解决步骤,然后在 MATLAB 中一步一步地去实现。在每步实现的过程中,遇到问题,查找知识(互联网时代查询知识还是很容易的),定位方法,再根据方法,查询 MATLAB 中的对应函数,学习函数用法,回到程序,解决问题。在这个过程中,知识的获取都是为了解决问题的,也就是说每次学习的目标都是非常明确的,学完之后的应用就会强化对知识的理解和掌握,这样即学即用的学习方式是效率最高,也是最有效的方式。最重要的是,这种主动的编程方式会让学习者体验到学习的成就感的乐趣,有成就感,自然就强化对编程的自信了。这种内心的自信和强大在建模中会发挥意想不到的力量,所为信念的力量。
* {: X6 `- T" h. h9 }) d  v; s2 |- \1 K

; n* z! u7 y+ G8 W
5 W/ y: x2 z+ l5 \7 \3 D4 U# t6 t! Y- K

# K' J$ {% X9 i6 a! [  N8 m6 I




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5