QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 1794|回复: 1
打印 上一主题 下一主题

数学建模--灰色关联分析

[复制链接]
字体大小: 正常 放大
杨利霞        

5273

主题

82

听众

17万

积分

  • TA的每日心情
    开心
    2021-8-11 17:59
  • 签到天数: 17 天

    [LV.4]偶尔看看III

    网络挑战赛参赛者

    网络挑战赛参赛者

    自我介绍
    本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。

    群组2018美赛大象算法课程

    群组2018美赛护航培训课程

    群组2019年 数学中国站长建

    群组2019年数据分析师课程

    群组2018年大象老师国赛优

    跳转到指定楼层
    1#
    发表于 2020-4-13 16:26 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta

    9 n. j6 C* D7 E+ I数学建模--灰色关联分析写在前面:/ ]3 ?( o( c& c) v6 n4 B
    笔记为自行整理,内容出自课程《数学建模学习交流》,主讲人:清风
    # i' ?& G/ z" }4 k( X$ |
    * S& v- u0 V7 e; P$ a灰色关联分析概述+ n+ ?3 ^) Q4 o$ P
    / A8 o! b$ A9 V* g; c
    一般的抽象系统,如社会系统、经济系统、农业系统、生态系统、教育系统等都包含有许多种因素,多种因素共同作用的结果决定了该系统的发展态势。人们常希望知道在众多的因素中,哪些是主要因素,哪些是次要因素;哪些因素对系统发展影响大,哪些因素对系统发展影响小;哪些因素对系统发展起推动作用需强化发展,哪些因素对系统起阻碍作用需加以抑制;…这些都是系统分析中人们普遍关心的问题。例如,粮食生产系统,人们希望提高粮食总产量,二影响粮食总产量的因素是多方面的,有播种面积以及水利、化肥、土壤、种子、劳力、气候、耕作技术二号政策环境等。
    & t& t% a% s+ d- ~0 H5 }2 `2 D4 ?' S; y
    为了实现少投入多产出,并取得良好的经济效益、社会效益和生态效益,就必须进行系统分析。
    * K8 X& k9 _2 @; u8 p: N
    ! y7 q+ I% _2 R0 k. T* r4 F数理统计中的回归分析、方差分析、主成分分析等都是用来进行系统分析的方法。这些方法存在以下问题:0 ~( E  r7 v+ {9 J$ M& p
    / v2 b6 I( V: [
    要求有大量数据,在数据量少、不满足大样本要求时上诉方法均失效。
    % e% f( W% W4 ]5 P要求样本服从某个典型的概率分布,要求各因素数据与系统特征数据之间呈线性关系且各因素之间彼此无关。这种要求往往难以满足。
    . Z5 E/ {. ]) T计算量大,一般要考计算机帮助。
    1 g; m$ b( ^  O2 }可能出现量化结果与定性分析结果不一致的现象,导致系统的关系和规律遭到歪曲和颠倒。
    % K+ N4 r$ [$ J, e$ }灰色关联分析的基本思想是根据序列曲线几何形状的相似程度来判断其联系是否紧密。曲线越接近,相应序列之间的关联度就越大,反之就越小。
    ! w' T" U; |5 S# `! A参考:刘思峰.灰色系统理论及其应用(第五版)[M].北京:科学出版社,2010:62.
    1 N# d$ h' h( S! E- j! C+ ]! N应用:进行系统分析" I% v  {8 u1 B% a3 F0 u: i
    3 |+ k; `! F1 ^- Q0 o  q4 f: ~

    2 M/ J, P& z& D# x- ~5 B! @
    2 O6 A. E5 ^4 B①. 画统计图
    / a) G8 v2 s* P$ s- j" e5 k
    * k( ^2 B' T3 ?2 a( V. w% B0 t4 F, @& J
    进行简单的分析:
    3 ~; r+ {  Q7 x) Z! `/ X) }, _% i( W0 Z0 H
    四个变量均呈现上升的趋势。; A+ Y; c6 P# Q: l: ^7 A
    第二产业的增幅较为明显。* a6 Y# P: b5 F+ F' t
    第二产业和第三产业的差距在后三年更大。+ o. a  d2 l: {5 N' M3 }
    ②. 确定分析序列
    % Z( M/ _3 p) L, o0 n
    6 a# V, {! j- P/ o4 L( ^母序列(又称参考序列、母指标):能够反映系统行为特征的数据序列。
    $ O8 G+ e& `, ~) W子序列(又称比较序列、子指标):影响系统行为的因素组成的数据序列。4 @! D0 L' t% A+ `
    本例中,国内生产总值就是母序列,第一、二、三产业是子序列。
    ) p) r  b  P9 P. ~
    % D  W" ?2 L1 }8 w$ V5 ~③. 对变量进行预处理(消去量纲,缩小变量范围简化计算)7 O# w% Q( K9 X( O
    ; _% }+ v9 s3 _- a) i$ e
    方法:对每个指标中的元素,用该元素除以所在指标的均值3 V, ~! D, q/ q9 r' s+ l; A" V% Y

    ' Z3 q, d- o2 l( U+ `6 z0 T" r④. 计算子序列中各个指标与母序列的关联系数
    $ {5 W  b' h) x3 Y
    1 _. ]# i7 X' {# D  Y- u! v% f& d* v# K, ]; ~- u7 T
    x0=(x0(1),x0(2),...,x0(n))T x_0=(x_0(1),x_0(2),...,x_0(n))^Tx " ~- \6 r9 e: g! P) m& F
    0% _' j4 g8 w  a0 u& f% Q: J) G
    ​       
    6 i8 f2 z# w$ [( P8 g1 Z# Q! k& \" J =(x ! t5 D, Q1 o( R1 [
    07 S+ ?6 \  c; @# ~; |, P
    ​        : t0 a3 r8 s8 r
    (1),x 3 M1 H% r- a9 ?, }. \, O- c
    0
    2 H) \" }: H1 M/ ]0 Z5 ?​        . ?; ^* {' C! Y+ Y# Q
    (2),...,x ; G2 ?, f( _7 i
    0! |0 F: C* {# K. a
    ​       
    5 I; A; O5 A# B* x3 Z8 L1 L% g (n))
    0 p0 v- R4 x" s3 r0 o  N! y" t, VT7 U1 h5 S$ v. ~+ H

    6 S5 y5 _; @/ ~, x! `; D8 l7 ax1=(x1(1),x1(2),...,x1(n))T x_1=(x_1(1),x_1(2),...,x_1(n))^Tx . N2 t) K( B, ~! k7 A
    1% E# ?* C# c  [' H9 }- m: \4 c4 `
    ​        - y  r; V$ S2 T
    =(x   [( C' Y/ `) J0 f; e: Y; ?
    1
    0 b) f) ~' Q5 r; v& u5 A/ K​        + c2 [/ s" I8 \, M. Q3 x5 y
    (1),x
    : e/ \  |4 L  ]- P. Z, v* B: A. R0 @1
    $ b, @2 ^  p) H% Y3 v​       
    ( s% j9 J& h* j9 i (2),...,x
    : |9 w% R+ j" {; k; A6 ~1$ c# o8 l8 @, [$ f" |
    ​        ' Y, H' l9 j" r
    (n)) 4 Y/ u2 Z. q# |7 ^
    T
    # v1 Q" R3 j; ~/ T
    ' W5 |7 u2 ?: jx2=(x2(1),x2(2),...,x2(n))T x_2=(x_2(1),x_2(2),...,x_2(n))^Tx , t! B, Z* Q2 i  e0 v
    2
    * Z1 }. L9 Y9 w​       
    + J# n$ H2 ~5 v2 P3 W- i7 H =(x : f& W4 v- n8 N9 |9 p' b; x
    2
    : c1 o, [7 B4 h% k/ ]​       
    8 |8 C6 F  A. d4 K (1),x 4 B+ Q, l& j8 u, D  d5 h$ Z
    22 }9 q$ t) {& I
    ​       
      r2 a+ r9 k6 ?1 n (2),...,x
    3 B0 O- {# F% Z2
    : C3 m1 b" @$ S5 e2 S0 S​        2 @$ ~% d+ O- N! H
    (n))
    " t* J# _6 N7 s/ P" ]6 hT0 u6 J: ]" b2 W! V

    . `! O2 b' @3 Yx3=(x3(1),x3(2),...,x3(n))T x_3=(x_3(1),x_3(2),...,x_3(n))^Tx * v) d' \, p* R9 a5 s8 c5 {& n3 @% N
    3
      H* u' K0 t0 }+ W$ s3 S​        $ h, x; [" P6 Y8 A; G" U% s: `
    =(x 7 f  t0 ]* o* F5 o
    3+ ]! [1 m1 S; u, A
    ​        1 x- l; C. q) J& W& e2 S8 P, t
    (1),x ) G* R8 D4 A, j1 y: G
    3
    & h9 d# s, ~2 _! o) l​        $ h, o+ C3 [  B+ i8 O* b* q/ U
    (2),...,x # Y( i$ `0 c4 ]8 F) u
    3- A. H. [; q- _& G9 z1 K: ]
    ​       
    ! p$ u- u% _5 M( q4 f2 v (n)) 8 {1 a. ~7 i, @$ {, H4 a  y: r
    T( Z; k3 ]1 A; u7 k* @8 H9 h

    , P6 `. G, D4 j- y, F1 D* |4 C记a=min∣x0(k)−xi(k)∣ a=min{|x_0(k)-x_i(k)|}a=min∣x
    . `5 ]! c* Y' {% Z, @. r  W" A0/ ?" }  p+ ^, \5 y3 V! p4 n
    ​       
    - m( @% ?2 q' S7 @. f6 Z (k)−x
    3 ]8 L0 D( q; \& Gi
    ! l/ D8 {3 Z; _7 W8 p. A5 n​       
    " J8 M% P% c+ ~ (k)∣(每个子序列中的每个元素减去对应的母序列中的元素,找到最小的那个),b=min∣x0(k)−xi(k)∣ b=min{|x_0(k)-x_i(k)|}b=min∣x
    ! e, U4 x+ Z7 W7 f' k0' x' \' S- k# l, ^! {9 @
    ​       
    & Y9 i9 O* h3 [: i (k)−x
    ) R# M* B$ A3 x1 _! T8 b; Si6 ^4 n; P6 x2 Z. P& S4 _( v
    ​       
    4 q& i, ]' `) u5 g; Z7 [ (k)∣
    1 X8 u- F0 Q7 ~- R$ la aa为两级最小差,b bb为两级最大差。
    6 f9 H5 N+ Y  J
    . ?' Y6 K' s% E( n3 C+ ?8 V定义:γ(x0(k),xi(k))=a+ρb∣x0(k)−xi(k)∣+ρb ρ:分辨系数(一般取0.5) \gamma\left( x_0\left( k \right) ,x_i\left( k \right) \right) =\frac{a+\rho b}{|x_0\left( k \right) -x_i\left( k \right) |+\rho b}\ \rho \text{:分辨系数(一般取0.5)}γ(x 0 x" z; A9 P2 ^# K3 L) r2 m4 X
    0  v) z/ Y* B' r5 A) i7 \
    ​        - d2 j0 l3 V2 u* z; V' `2 `
    (k),x ; D# h1 @  m6 J/ ?; V# Q
    i
    0 p) i# x" F7 ^6 a3 L​       
    + b' x# N, G% o. ]) l* p (k))=
    / o  V  n  C6 W+ `7 P∣x ' O" v& T9 ]; t7 K# {3 s
    0
    2 p9 t9 e% O: Q0 f! Z​       
    / x) v% l; u3 G (k)−x
    # Z7 R5 P/ V5 B: D  d! pi
    : f9 Z% f4 Z2 U$ O​        3 O- a- L; I% `) ]
    (k)∣+ρb
    ! T* T4 t/ M& m3 g0 p7 K6 F6 }a+ρb% V& v/ O; A! y9 N+ z" U
    ​        9 L( o& P. g* C2 H6 g3 `
      ρ:分辨系数(一般取0.5)) B6 Z& t5 `( N

    7 P& O+ D1 X: a* G3 `$ U" T/ `) f6 t; v% B$ o
    ⑤. 定义γ(x0,xi)=1n∑nk=1γ(x0(k),xi(k)) \gamma \left( x_0,x_i \right) =\frac{1}{n}\sum_{k=1}^n{\gamma \left( x_0\left( k \right) ,x_i\left( k \right) \right)}γ(x
    2 D5 G/ ]2 e5 x, S; m0, G: ^$ m. V5 e6 g; v
    ​        : c" ?) N  [/ [# d* U6 w2 {, z
    ,x 8 k1 y1 U' [) ~4 f( I1 T7 O
    i4 v% t2 l( V" L! u0 l0 I" W* X
    ​       
    ( p% N4 u6 |! g )= ! C( ~7 _  d, ~; @) Y
    n& F% F, L- y0 R* o) {# X, A
    1, j: P/ j2 m# W: r# M
    ​       
    5 L6 M5 G' `# m: l% b5 A4 G1 T" _$ O3 b# y* h, |* w
    k=1
    3 [. s8 p# W& A, E' un
    % e& _8 {/ v3 d0 V​        : U" R9 \8 d5 G4 _/ r) ^8 e% g+ y
    γ(x % P, h$ q" L2 l: U- [
    0/ K4 ?% i7 ?4 a- ]( b: C6 q
    ​       
    7 u/ q5 H$ z1 d0 H (k),x 2 k$ |1 j5 G/ X7 W
    i
    5 g4 ?5 m4 j" _) X0 H9 z# f3 v​        1 P2 W- G- C# Q% t6 p9 [, b
    (k)) 为x0 x_0x
    9 |# G. y. ]) a; t0
    2 w4 l5 s7 }& n; z5 z, S) B  x​       
    4 T/ I0 w# a9 j  S- |6 Z 和xi x_ix + o0 l& o  B$ ]6 |
    i
    5 Z- C. N3 d+ l: y​       
    ( m0 `$ [2 K3 N) Y: I! B' n- ? 的灰色关联度
    9 s: L# ?0 B$ C  l
    5 N& x* T- N% p0 Vγ(x0,x1)=0.5084,γ(x0,x2)=0.6243,γ(x0,x3)=0.7573 \gamma(x_0,x_1)=0.5084,\gamma(x_0,x_2)=0.6243,\gamma(x_0,x_3)=0.7573γ(x , o% I) t: O- e. \5 Z
    0  x0 s/ i7 A) N
    ​        % ~) j9 L) y& x' q& x5 A
    ,x
    3 w9 g( P" Z, f4 o5 J  v1( B/ u) {9 L2 T7 v1 e
    ​       
    5 V6 m$ }0 ]. l1 `5 Q( Y )=0.5084,γ(x
    ; Q) a; _# G% `5 b- w0
    + A: z( V9 ?* \7 a  I2 P8 Y  m​       
    - Z8 U+ _! `& l: Z/ l ,x 9 M  E  G$ b  v9 Q
    2
    ( G( H! u: R! _4 C  v% l; \5 m8 t0 I​       
    ' ?, N, H  b: {. J" r) u: u1 I )=0.6243,γ(x 5 R( x. X( y6 p, o" m
    0
    - u& n3 p2 y2 a/ E! u# d9 d; j% I​        , H: C6 T' y1 L0 m
    ,x
    1 u5 m5 x, H* Y& j3 b+ {* W' g, J6 V: p3- B* w/ Y, U* A1 U; i
    ​       
    # @- c' P$ K+ |" {0 W )=0.7573: T: `# M0 u- `/ L
    5 S1 x8 v' y% w
    ⑥. 通过比较三个子序列和母序列的关联度可以得到结论:该地区在2000年至2005年间的国内生产总值收到第三产业的影响最大。
    ! \! Z; X! o$ q. J3 E# N
    ; r! T+ m8 D$ I0 B( E3 t  y代码(python实现)  }5 m  c7 {6 |2 [

    0 W* v4 ]) E( v; l( fimport numpy as np0 q* ?- {, `- M# V
    x_mat = np.loadtxt('gdp.csv', encoding='utf-8-sig', delimiter=',')  #推荐使用csv格式
    , ]  p. e" t. o7 F7 l: E% O1( I( @1 O" ^# v4 ^) ]
    2
    2 p0 J* i. j' K1 u## 定义函数求解关联度
    0 {. S1 G! R3 X7 Zdef gray_analysis(x):: K) z% y' ~0 f0 Q
        x_mean = x.mean(axis=0)2 \0 k: I9 i8 B0 M
        x = x/x_mean
    # k; ]  T7 I' H+ S8 b    Y = x[:,0]  #提取母序列
    , ^3 M$ p$ f( g6 k; P; T    X = x[:,1:]  #提取所有子序列
    1 Y( ]& c- \3 f  p, a3 J9 i    abs_x0_xi = np.abs(X-np.tile(Y.reshape(Y.shape[0],1),(1,np.shape(X)[1])))
    ! `9 ~. L! G$ Y, I3 L) Z/ y# o0 N    a = np.min(abs_x0_xi)
    ; I& X6 S. _8 F- n    b = np.max(abs_x0_xi): }# x% E4 W1 M) w( k2 \
        rho = 0.52 c5 G& U% S: ~& v9 R
        gamma_mat = (a+rho*b)/(abs_x0_xi+rho*b)% P& t7 k5 o/ A- A
        corre_degree = np.mean(gamma_mat,axis=0)9 Y, X' u( ~( t1 d! G9 J" d4 ~/ q
        print("子序列中各个指标的灰色关联度分别为:",corre_degree)
    & f' A, ]& Z; S3 U0 Z% ?% L& u' c' O————————————————
    3 R/ h" L) ~- o) b- s" i版权声明:本文为CSDN博主「脑汁」的原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接及本声明。
    ' X) i2 a/ g6 I$ U  [原文链接:https://blog.csdn.net/ddjhpxs/article/details/105487261
    # y, ~! E8 ~9 s, v! l/ b/ e& _
    : P! `3 {9 O* L' J+ y
    5 k+ {, R' J/ ~
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    xiEnqing        

    0

    主题

    1

    听众

    4

    积分

    升级  80%

    该用户从未签到

    自我介绍
    SIMPLE
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2026-7-24 22:39 , Processed in 0.335966 second(s), 56 queries .

    回顶部