在线时间 1630 小时 最后登录 2024-1-29 注册时间 2017-5-16 听众数 82 收听数 1 能力 120 分 体力 557844 点 威望 12 点 阅读权限 255 积分 172726 相册 1 日志 0 记录 0 帖子 5313 主题 5273 精华 18 分享 0 好友 163
TA的每日心情 开心 2021-8-11 17:59
签到天数: 17 天
[LV.4]偶尔看看III
网络挑战赛参赛者
网络挑战赛参赛者
自我介绍 本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。
群组 : 2018美赛大象算法课程
群组 : 2018美赛护航培训课程
群组 : 2019年 数学中国站长建
群组 : 2019年数据分析师课程
群组 : 2018年大象老师国赛优
7 W2 v% x" |, [; b 离散函数的数字特征及其R语言的应用 + c1 I* R; V! M8 H9 j. ~; {7 T# U
目录 - m& q4 p# ~8 |# z4 l
0引言
% X1 [0 F9 r4 I: u! H. Q 本文结构 0 J( \& E. j T; U
理论公式 7 K3 c, W, @ S
1、几何分布 ; J/ p" g% P% Y5 y" Q
2、负二项分布 " S) P; A1 l7 Z r( m& S, _" |
3、帕斯卡分布 & Z$ A r, h; x7 \/ ` }9 x
4、泊松分布 ( o: j! j7 ~& A) @3 z; c* J
5、 参考链接 5 a6 q; `, f2 W9 [, r# F
0引言 0 U! |# c, ]* U/ ?7 N# i
本文结构 , Z9 t' G' {5 b- ^# o/ g& _' B
在文章统计学基础——负二项分布的数字特征1中介绍了负二项分布,在博客2中介绍了离散分布的数字特征。
" C7 G+ U$ W0 i/ o; I+ M 本文计算一些离散分布的:密度函数、分布函数、均值、方差、偏度、峰度、特征函数、矩母函数
: X0 f/ e6 k2 V$ {5 j# l& N 3 d2 `6 Q% G- U4 c/ Z
& U; B! |8 }) j( o( L& d' u 理论公式
2 e2 R. R+ B" _) r$ S, h) `9 U 为了方便先给出计算公式: ( x) @+ l7 a% C1 Q
9 H9 ^9 Y: s9 N$ `
. a- }0 V- X5 ]% _3 C7 {% r- k
– 密度函数:f ( x ) f(x)f(x)
6 t, Y% D. M1 | r3 {4 \
7 y, V% G% I+ I- _6 s - f+ a ~3 M: \* o% \( \
– 分布函数:F ( x ) = ∫ − ∞ x f ( x ) d x F(x) = \int_{- \infty }^x f(x)dxF(x)=∫
. G4 T9 `" v9 X −∞
1 [! T( A4 q$ \- D6 `8 j( w0 q5 | x : c+ _/ Q4 ]& M0 A
* _& o+ k, y$ J f(x)dx F! x, O* M* X
1 Q9 S0 `' M, w
9 t" B, T, f9 | – 期望:E ( X ) = k 1 E(X) = k_{1}E(X)=k 5 o5 ?* t9 w5 o" {9 X, Q H, m
1 6 U/ j. X/ F6 l W! v
( d1 Y+ [! ]6 \( Z, } * n. r- Q7 s9 }$ C
) _% [) a: ]/ d s& Y$ u1 U ' [, ~3 z( l! y6 Y) ~9 e4 v( E" \, i
– 方差:D ( X ) = k 2 − k 1 2 D(X) = k_{2}-k_{1}^2D(X)=k
) W, K& y+ F' G8 C! s 2 9 H) H9 T7 K9 H% W$ K
- X% J) s* x' R −k 3 `3 s5 H* _. O) `8 y+ H' ^8 S: {+ \# L
1
9 }6 M1 ^9 v, A" W' y 2 * v2 E' X3 x& T6 ^( L( L& @& l# q. r
- A% f. X% C, H& m
8 D; R( {+ Q0 l$ z/ a/ L
; L3 x( L$ r# T% S# R1 A
; J0 q* y1 ^/ s6 T5 B – 特征函数:φ ( t ) = E ( e i t X ) \varphi(t) = E(e^{itX})φ(t)=E(e ) F! x- a1 Y. {) x) c
itX
9 p- W8 R7 k `+ l ) 3 z7 U' I3 d) m0 c0 w
0 Q4 h5 `, g. _# T5 }' D" h* |+ C
Z; b$ h$ W! h! R7 r
– 矩母函数:M ( t ) = E ( e t X ) M(t) = E(e^{tX})M(t)=E(e
) B! P, F2 g f! D6 i tX ; [3 @* T5 Z2 e0 K- R$ A2 G
)
5 ~( r- a1 c, s& q0 G9 t4 F: l * P$ i3 w/ n0 ^. j7 b- i
5 p9 w" n) c' c, ~. h: D% V ] – 中心矩的关系:E ( X k ) = i − k φ ( k ) ( 0 ) = M ( k ) ( 0 ) E(X^k) = i^{-k}\varphi^{(k)}(0) = M^{(k)}(0)E(X 8 ]1 O6 ^5 A, |: P: t' K
k
3 u* X4 m+ _9 H3 k( a2 F )=i
7 P# x' q# x% b. V* o* R −k 3 T5 J9 u0 b$ c4 Y+ a) Y6 s
φ " s/ U+ U" u* k4 H
(k) 8 X" Z& D9 h6 x$ X- n* o) V; W1 |
(0)=M
9 g3 Q7 o6 A; ?* B) t/ b) D (k) 2 [# B# R" ]5 l" R
(0) % J/ A. B4 O/ p8 a5 `* n# s+ }
! H$ z& x) c' M* N
7 O, S. K% \) G* e/ t1 M# `4 s _& [
– 偏度:S k e w ( X ) = k 3 k 2 3 / 2 Skew(X) = \frac{k_{3}}{k_{2}^{3/2}}Skew(X)= , q. M# F, S: ^
k ' p0 Z) I. S" V" k8 E
2 9 b: j% |* z. P+ B
3/2
5 T/ A! l# |9 v$ ?" T8 V. _
3 s' m4 @+ L" d W" I3 m8 c* b
* f% J( d2 O' y k * Q+ l' A- }- r& G* m. s* L F9 y& }
3 ! x+ b' Y3 R7 M8 |
2 ?: {: u; n0 F) ^
2 O0 f. s7 W$ M( a 7 j" B' k/ a- M8 X! C
3
# {5 n% c/ q. _& q" O % U; d* M r/ w0 A. o# I2 ?4 A1 w
6 i7 l* T' J$ Q1 w! K! ?
– 峰度:k u r t ( X ) = k 4 k 2 2 kurt(X) = \frac{k_{4}}{k_{2}^{2}}kurt(X)= % x! ]8 s! D# N% f! i2 D4 r
k
3 w9 ~ N, ^: L0 M8 A8 [ 2 , \! y E9 v1 w+ l! g- w. v
2 ( M! f7 r- {* Y: Z) H: O0 i
, \. q! B7 I. e5 f/ _' T; O
- s6 }, L5 \* A8 _ k
; J/ Z8 t. _0 w2 L 4 9 h) `2 A# c4 X$ ?" X
6 b; ^" W, ]5 O/ M9 p* f
% r, k# {1 ]9 h' T- V' _
! Z K% q+ N6 G) o4 ]; w) V: x% W: v
4
6 t( K! E- K; g x5 S. X9 S( m + ^1 N* m2 `$ h. `- y5 {5 P
$ ?/ ?- T6 S" o
1、几何分布 & L) A4 B7 E- J8 P
– 密度函数:f ( x ) = ( 1 − p ) ( x − 1 ) p , f(x) = (1-p)^{(x-1)}p,f(x)=(1−p)
3 t1 F U% K/ L6 z' T- d (x−1)
. m" b! }. O- E) D* \5 h5 h1 E# _ p, x = 1 , 2 , 3 , . . . . . . x = 1,2,3, ... ...x=1,2,3,...... # O; ]6 _( w g9 d/ v5 Q1 h. |1 `8 Y
7 z) r+ ~& a: R4 L & q3 T* u/ i( b& ?8 e* {
– 分布函数:F ( x ) = ∑ k = 1 x f ( k ) = 1 − ( 1 − p ) x F(x) = \sum_{k=1}^x f(k) = 1 - (1-p)^xF(x)=∑
5 o4 J, l+ F$ {* m k=1
9 g% j) [* p* }- B: ~ s/ j x ) i$ ~% G x9 z
+ s7 u" v2 x0 o* V
f(k)=1−(1−p)
9 X, Z1 H$ I- p x
4 B, @4 @3 d, N' s0 \
, ^5 O' O& s/ |
4 E. e# e# Z8 w . V. k" n7 D9 x5 l
– 期望:E ( X ) = ∑ k = 1 x k f ( k ) = 1 p E(X) = \sum_{k=1}^x kf(k) = \frac{1}{p}E(X)=∑
; H2 S/ d& \2 I! Q k=1 7 z& P; [% L/ U
x # s4 c- T7 X3 F" n% |& f
! T0 J$ Z+ ~) q! M; X
kf(k)= - P3 Y! |- t6 q1 v# P D
p ; J, [9 }- j, `9 l- b0 c5 A- b
1
' k" ^! m8 d% |" i
2 v F8 K' ?4 ]6 I4 ?3 t ' U0 J# \- [% h5 \
# m- C# N9 }. [+ q$ d7 F1 F) V
. ]* L7 M% H, f, i" i+ K – 方差:D ( X ) = ∑ k = 1 x k 2 f ( k ) − E ( X ) 2 = 1 − p p 2 D(X) = \sum_{k=1}^x k^2f(k) -E(X)^2= \frac{1-p}{p^2}D(X)=∑ " \# U' e: a- ], I' `
k=1 - Z$ L( r) ^$ }2 S, P8 ~; K
x
% f/ _7 A- B. r8 I; h' a
/ R# s( \ M7 x* P* S k
- J/ G7 V5 V& C2 N 2 . c2 _6 k+ G' L* Q' f, V& _$ x
f(k)−E(X) 7 T- H9 e. P5 F8 U9 T$ m/ u5 m% \! H1 y
2 $ l1 c+ F& Z% h* W
= % r' j. A# W p7 K0 ]
p
" s$ W; {1 P* U 2
3 s0 U% Q p: w . i0 P5 ?* Y! G! }/ }5 |7 Z
1−p & p- I6 J$ h$ Q1 g8 [. |
7 N. Y# ? m2 q [3 H2 F
' ^4 {5 r' L# g, Q3 U $ f! k k" j( n, D: K, C. `$ r
* ?& T$ c6 w2 N1 T$ b% h
– 矩母函数:M ( t ) = p e i t 1 − ( 1 − p ) e i t M(t) = \frac{pe^{it}}{1-(1-p)e^{it}}M(t)=
' E: S7 X+ i6 L 1−(1−p)e
+ y- `6 l2 b6 B' A/ X* X it
& S( n/ G8 D* Q" [6 I3 x2 P6 y+ Z $ K) f6 d3 ]$ }2 q
pe
( O- Q. m) O' ^' F it E0 y3 A/ @" A8 Q; j! f
: w4 B3 [7 T8 b0 J" L
# y( E1 D, `/ O9 U1 ?1 m
6 u( [( M9 D# A9 B9 l% v4 y( J ; C: K0 n' J" y
8 C4 k! ^. P$ r ]2 T
– 偏度:S k e w ( X ) = 2 ( 1 − p ) 1 / 2 Skew(X) = 2(1-p)^{1/2}Skew(X)=2(1−p)
1 _7 a6 ?: w' d0 N1 n4 [7 X 1/2
* k0 b) [+ ^& r) q+ w 9 i$ d* y0 O+ W# b7 V2 T7 C
' e5 k, ~" g6 T' b
% V; y. @, Q! w
– 峰度:k u r t ( X ) = 9 − 6 p kurt(X) = 9-6pkurt(X)=9−6p
# f7 R" o* Y' [. y B ) {. [6 p% g- B3 U: l
' Q. H2 j: }( p; k1 {3 D; d9 N" L: P 函数 功能 ( N6 V( [5 d! d1 B4 O: f8 s- g/ A" b
dgeom(x, prob, log = FALSE) 概率密度
, w% }; ] N* C; z' u4 Z$ V' { pgeom(q, prob, lower.tail = TRUE, log.p = FALSE) 累计密度 0 f8 c1 [2 t' A1 t7 [3 A
qgeom(p, prob, lower.tail = TRUE, log.p = FALSE) 分位数 5 g& f, n. f% d9 |, V: B% y
rgeom(n, prob) 随机数 0 O8 U, r! \% A6 o9 F! s# D
几何分布的各中心距来自5:
3 `( q" L. E% K0 V" a4 r o" i( b - N" ]- ?* |, U
8 |4 X6 ^0 I" ^6 B8 r4 ]. P7 N$ B& f " i- t$ T! A- E' Y
8 c" a! r( K8 J( l
2、负二项分布 4 q. c: s. g( ^! H2 L
– 矩母函数:M ( t ) = ( 1 − p ) r ( 1 − p e t ) − r M(t) = (1-p)^r(1-pe^t)^{-r}M(t)=(1−p) ; ^ ^, i$ _" U/ \3 b; h/ {
r
9 T4 E7 v% K- T3 v7 Q (1−pe 3 p7 a# t: r- u" E3 F; G
t
+ v9 [/ E7 T, J/ \8 S6 g ) % J- k1 u3 t9 \2 S3 c3 a
−r 0 E! S7 r, e5 a% }5 N7 p+ o7 i
- N9 A+ I4 l/ t4 T
4 e0 b5 n5 X9 W5 N5 F* o
1 g: [% [7 r Z O$ A9 t – 偏度:S k e w ( X ) = n 3 + 3 n 2 + 2 n − ( 3 n 2 + 3 n ) p + n p 2 ( n 2 + n ( 1 − p ) ) 3 / 2 Skew(X) = \frac{n^3+3n^2+2n-(3n^2+3n)p+np^2}{(n^2+n(1-p))^{3/2}}Skew(X)= + d; H9 I! Y% a0 d! B
(n
' D% O: C7 e1 {, |9 Q 2
8 P: Q) R) u: p +n(1−p)) 3 b/ ~1 f' R' f. t
3/2 ! F1 u7 C( n# r
! q/ P( n5 q) F1 V0 P8 { n # X3 A2 a( _6 Y3 N, b* V
3
: H! e1 q! I) ^5 N: \8 s +3n : A$ p0 s2 x% h. f D5 _" B
2
* W7 m* n- H0 }1 c( N8 @3 P/ F +2n−(3n
1 a3 m3 s1 ~) y# e5 ^, v: v7 o1 W( k 2
; S1 K# ?. L0 ?# R. L" J +3n)p+np
0 k8 ]! ? N, ?! A1 Q1 c2 M 2 6 J" k( V4 i7 J1 @. g2 [# ^$ F7 h
0 p O& _8 }9 B0 b3 G V- P; x
5 u2 A* _! i0 K+ d5 R5 E8 y
# O N' i- \0 m( X- I+ T- c# C# A
- _- v l4 D' _ ; T/ W# F' O8 B- k5 `- O/ s
– 峰度:k u r t ( X ) = 略 kurt(X) = 略kurt(X)=略 (带入递推公式自行运算)
2 J$ r; q+ f( L4 H( { # S$ ^/ m) s) q9 F$ ?, b3 W
/ E" ~+ R/ {: u) k# W/ ~ 函数 功能
: t9 |& Q7 {) X+ B2 E" o/ J dnbinom(x, size, prob, mu, log = FALSE) 概率密度
9 o' B4 n) f7 r3 g3 {0 l" n pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度 $ R8 {3 p2 u8 v! i$ f; t
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数 / ^; E5 M3 l) U# |$ f, O
rnbinom(n, size, prob, mu) 随机数
/ x N' j! E4 i! V- F 负二项分布的递推公式如下:6 * u H% O' h1 M1 h* p; F+ R( w
' _8 A3 _+ N$ o ' F$ A+ A h# N! o. t
2 e1 g& z3 `, `- N
7 a2 u% A: ^ H/ M. `' j
9 q+ i0 `1 z8 H7 [' a. r& ~ ) T1 t9 L% ^5 H0 A
! A$ y) h, R9 I4 I1 n& z9 ]% X: l* U& K
a1 i3 A& W. C
3、帕斯卡分布 + `9 Y6 m# A4 ?! S% h
X XX服从r , θ r,\thetar,θ的负二项分布,Y YY服从r , θ r,\thetar,θ的帕斯卡分布。有Y = X + r Y = X +rY=X+r。即:在同样的实验中,帕斯卡分布是成功r rr次后实验(成功+失败)的次数,负二项分布是成功r rr次后失败的次数。负二项分布的数字特征推到见博文1。故帕斯卡分布的数字特征可以由负二项分布推出。
3 G* e9 N5 r" }7 b; }0 P; y# S 在R语言中我们仍可以使用下面负二项分布的函数做适当调整生成帕斯卡分布。
+ ~. y" C# V1 P2 x, I; i$ } 注:在百度百科7中还有另一种说法是: 5 r3 t' S' E, b4 b4 E( Z
3 _5 u9 ]! N. a$ K) B
4 a2 }) ^5 g( T/ O 帕斯卡分布,负二项分布的正整数形式,描述第n次成功发生在第x次的概率。
3 x$ x' i6 c! |4 T# X6 b
& B0 b! h) ?1 f3 I . R8 S H) J3 Y7 d$ q, R
我们在课本中见的比较多的是负二项分布的整数形式,这时候课本会标注又称帕斯卡分布,类似于二项分布,负二项分布也可以推广到实数上去定义。大家感兴趣有的可以去自己找资料文献考察一下,这里就不过多的讨论其定义和数字特征的问题了。 K" s$ P0 H3 V) i% g
7 c ~4 L+ N! ^2 ^) p1 I
% p" z t( M/ a- q8 v5 M w 函数 功能
( _9 i/ O9 h$ b1 i2 Q6 H dnbinom(x, size, prob, mu, log = FALSE) 概率密度
& u6 T3 ?$ Q% G( y, W2 U7 [ pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度 & `" n h) p. c+ g' N- `9 D1 {
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数 : ]6 O' D. e0 W' O# O. A
rnbinom(n, size, prob, mu) 随机数
, y9 D+ q9 o) a/ n% i 4、泊松分布 & }/ G$ N( r& d9 q
– 矩母函数:M ( t ) = e λ ( e t − 1 ) M(t) = e^{\lambda(e^t-1)}M(t)=e 3 H: S2 B7 ^, s$ j1 r X# W
λ(e
. f9 ~; C/ s- f3 b: e9 A. a) M t ) T I2 [& S; q* e: H
−1)
( [8 [ h+ U0 g) k8 V' m 0 Z5 X% A% Z$ `' r1 j
6 F+ q( q6 y9 j% @3 j" {$ ~
$ q% V+ ?+ B9 g$ v – 偏度:S k e w ( X ) = λ 3 + 3 λ 2 + λ ( λ 2 + λ ) 3 / 2 Skew(X) = \frac{\lambda^3+3\lambda^2+\lambda}{(\lambda^2+\lambda)^{3/2}}Skew(X)=
6 a$ `' n- r1 s' J' B (λ
0 e( C) T& a) V( Y* U 2 5 ]5 q7 z, ^% s f7 H% V
+λ)
0 ~8 A$ n" v. I% O 3/2
% s8 v6 d' G& q, w3 ~ 5 p% @! _4 T# ^4 ~9 U
λ % w4 l, U$ L( ?
3
& N' ~/ y8 u3 O u: p8 [ +3λ J6 @0 D8 B! O* T, d/ M
2 ! ~/ l7 }* F# |& L
+λ
. J5 t& k8 c1 {2 s& W, v
' \( ^2 M1 ?# O) Y2 K8 k4 C9 C: r % Q; e8 M5 }& V: P7 G: N! t' H3 T
& K+ g* E& u8 W, s- }% [ / O% D7 o; {6 K; _% |; H$ o
– 峰度:k u r t ( X ) = λ 3 + 6 λ 2 + 7 λ + 1 λ ( λ + 1 ) 2 kurt(X) = \frac{\lambda^3+6\lambda^2+7\lambda+1}{\lambda(\lambda+1)^2}kurt(X)=
3 V/ ]. s1 N0 j! L* f1 r2 C& s λ(λ+1) ) A y: X6 ?" L) @# ?, k. V6 Q1 O# C
2 0 {: u; k" \* I7 K1 m; H
8 Y3 k x, U# E! j: S- @9 C5 o λ & E u2 c: J2 c( q
3 , ?3 a1 h- R1 A Z7 v- a! h
+6λ 4 B! J, d) Z: p. P
2 : V/ \" {, J% `) K( z- r
+7λ+1 ' X' M1 D- L1 s8 h* A8 w& I
7 ]* _& ?+ `- S& T3 p2 K) @
- Y4 K' M/ q8 n. c) D* f ! h3 f6 I, e& X6 S# i: q+ [& z
, y: \4 `( a* y/ O1 U( z) F
函数 功能
( d6 O; x# n& Z: t; M7 x' u dpois(x, lambda, log = FALSE) 概率密度 E# W4 f$ s/ o+ x" w
ppois(q, lambda, lower.tail = TRUE, log.p = FALSE) 累计密度
+ C# n0 ?; r9 ?+ A: |- t qpois(p, lambda, lower.tail = TRUE, log.p = FALSE) 分位数 ( `& A4 l- t, L) C
rpois(n, lambda) 随机数 % \$ ]$ L8 N, X% O1 X* Z
中心矩的递推公式来自8: / u' r# {% f: Z- S
6 L. _3 }: o7 S4 S' }8 F
1 | \) `: J6 G
3 z1 E% l9 [. A6 Q# n( p
' I2 P: x% N9 W! Q 5、 参考链接
+ O* X! M3 W$ x# R/ T https://blog.csdn.net/weixin_46111814/article/details/105243202 ↩︎ ↩︎ ' l9 M+ s; ]2 }; B9 V% V
* j) ?! i: G6 R! N7 Z
* a! t4 P7 z3 {3 ? https://blog.csdn.net/weixin_44602958/article/details/105261188 ↩︎
" J& l9 A( J) O. I
* H* f: X6 R( P6 ?) e
- [( H; m `( K2 B https://blog.csdn.net/STcyclone/article/details/84310450 ↩︎
- P1 p: \ F8 l$ Q4 d
' n' r% S' o0 N3 h: ~5 q0 W2 b& E 6 e9 G) q) `' g
https://baike.baidu.com/item/%E5%81%8F%E5%BA%A6 ↩︎
1 J0 q/ I/ M/ p3 ] r% n; a
$ V3 x( c- |) a# u; {% X ' D$ ]5 j' T5 G% x
https://max.book118.com/html/2019/0412/6234220152002022.shtm ↩︎ - }: ^5 W9 }( \/ C" n. z. f6 T
0 r+ G7 C" S3 S: V- t0 v 7 y0 K' ]- a2 h) ~6 p& y
朱成莲.关于负二项分布高阶矩的教学注记[J].高教学刊,2017,No.66,103-104+107. ↩︎
& l- I3 v3 D8 z. K, c6 O! O; T 5 o8 E/ N( y4 |8 U& v; [) ^
- [% B0 D- D& {5 ]- l3 ? https://baike.baidu.com/item/%E5%B8%95%E6%96%AF%E5%8D%A1%E5%88%86%E5%B8%83/1188907 ↩︎
7 l) ^" k4 c/ k9 V8 S" g
6 Q+ n- B9 _$ N+ U( K! K) M0 r" Z
6 k1 E4 S. b6 k9 ~4 U https://wenku.baidu.com/view/7f8328c10c22590102029d83.html ↩︎
& q0 w7 }! M- @1 b' c7 y ———————————————— g0 s c y2 e8 p# }+ B$ N
版权声明:本文为CSDN博主「统计学小王子」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。 ( |, N0 [; s2 ? |2 N+ f
原文链接:https://blog.csdn.net/weixin_46111814/article/details/115499487
8 |% w7 y9 p/ f$ u! n . I0 W, {1 C( j
9 r1 _9 P1 N& D& w- g% @, \
zan