- 在线时间
- 1630 小时
- 最后登录
- 2024-1-29
- 注册时间
- 2017-5-16
- 听众数
- 82
- 收听数
- 1
- 能力
- 120 分
- 体力
- 565754 点
- 威望
- 12 点
- 阅读权限
- 255
- 积分
- 174949
- 相册
- 1
- 日志
- 0
- 记录
- 0
- 帖子
- 5313
- 主题
- 5273
- 精华
- 3
- 分享
- 0
- 好友
- 163
TA的每日心情 | 开心 2021-8-11 17:59 |
|---|
签到天数: 17 天 [LV.4]偶尔看看III 网络挑战赛参赛者 网络挑战赛参赛者 - 自我介绍
- 本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。
 群组: 2018美赛大象算法课程 群组: 2018美赛护航培训课程 群组: 2019年 数学中国站长建 群组: 2019年数据分析师课程 群组: 2018年大象老师国赛优 |
" i9 ]% G6 d8 \4 ~/ _: |' F
离散函数的数字特征及其R语言的应用
, \3 ?9 m( }; Q Y; r目录
) A y1 Z# o8 P5 Z$ [7 g. c8 w0引言
" b# h, ?4 ?" W# A4 x# U本文结构0 T0 b* I/ K" D1 y% x8 S1 {) |
理论公式0 N4 o' D, T7 A" u) u
1、几何分布
8 O7 U6 }8 u( I& D6 @. h2、负二项分布
+ e, C7 i: N; D! l" Y5 ?) m9 s3、帕斯卡分布8 h0 r3 `" n7 Z2 ]+ q" \
4、泊松分布
6 T8 Z }" g/ e) S- J- `$ N5、 参考链接
& ~3 ]1 X1 T) f; \6 A! ?" X3 p0引言- c; C5 A: p3 A
本文结构' A: ]+ W( K! N
在文章统计学基础——负二项分布的数字特征1中介绍了负二项分布,在博客2中介绍了离散分布的数字特征。( h4 I; n1 i* f, ~" \& h
本文计算一些离散分布的:密度函数、分布函数、均值、方差、偏度、峰度、特征函数、矩母函数
$ E# J3 Q M* U I& A
- }+ U& \/ I" c( N% ?4 G8 U
0 p$ ]- K j2 c0 S0 F理论公式
$ z% }3 K5 f2 p4 @* U. Z3 V为了方便先给出计算公式:. ?1 p) u1 D! z" c D* E5 Y, \) @
- Y L9 K- C4 d0 O% `7 I' k& A
6 r3 F) j+ s" d– 密度函数:f ( x ) f(x)f(x)
% ^, a; u' A4 ^! ?8 E% S; `
; P* D# R( z. l$ A m
) Y. y. E. ?$ a3 b3 T# Y– 分布函数:F ( x ) = ∫ − ∞ x f ( x ) d x F(x) = \int_{- \infty }^x f(x)dxF(x)=∫
" I) {* H! a9 L& I% M! n, u−∞
8 S% z1 k4 _5 f; `7 |/ O- Ux% K4 c1 \" L- s3 b
4 S& Q4 p3 t! @& \5 j
f(x)dx
0 c- P" R3 M. a: g% l$ U. L# H) X( x2 c
. Z. l x6 x. }5 U
– 期望:E ( X ) = k 1 E(X) = k_{1}E(X)=k
' g. W: t" j+ `# Q1% }' Y" k) P+ @& c" o7 [
; X1 R$ O6 q' W
1 \5 h! H/ \. N0 C# ?6 q8 D
2 n( F3 B9 Q& m- Q; a( n% Y2 A7 B) n! \! Q2 `. t
– 方差:D ( X ) = k 2 − k 1 2 D(X) = k_{2}-k_{1}^2D(X)=k ! T! h( ]# V8 C" g
2* M8 Q6 I: d1 f( w+ `; e
, h' V5 Q0 Q7 ^! q −k
2 Q- o% D; R5 T" N7 ?8 W1
( e% N' y9 H" @5 \. P- x25 o" x* _9 h v/ p( j
! {' p, B; J: S; V
- o1 e z* [& a [. H4 Q
. S8 J1 Y# c6 G, x1 m: B) `1 {, y3 H% v3 T7 ^* s# z
– 特征函数:φ ( t ) = E ( e i t X ) \varphi(t) = E(e^{itX})φ(t)=E(e
3 p& w5 d7 T) j$ s# N& jitX
+ {3 p! ]3 c; M ): C4 o0 K" S1 G$ }% x7 r
' C7 t0 E5 f( I% P0 Z3 r8 w
+ d& R" p' T y5 A- V– 矩母函数:M ( t ) = E ( e t X ) M(t) = E(e^{tX})M(t)=E(e ) i4 I& Z' i: T$ Z
tX6 c- R L/ k0 M0 N0 y& A+ c
); H$ O) E% y5 D
% K2 v0 [4 e1 \$ X7 r0 l* Z# ~7 b
1 u, Y& G* m5 p1 Q8 Q2 X. a– 中心矩的关系:E ( X k ) = i − k φ ( k ) ( 0 ) = M ( k ) ( 0 ) E(X^k) = i^{-k}\varphi^{(k)}(0) = M^{(k)}(0)E(X
6 h1 \ v5 J# Wk1 t$ p& d- C, [1 z" d6 j
)=i 9 `" I9 e4 f. @2 H8 V4 x4 Q. ?
−k
5 E8 v7 V- ~! ?5 M φ ) j/ y1 M5 u0 w% f+ \6 M& e/ A
(k)
( e6 ^% ^2 T- K4 { (0)=M
5 b1 E( b3 o F/ `1 U(k)7 E$ c6 W8 f, C3 T8 K! `% O
(0)
# o- V5 T! }" V; h+ w% r/ k$ c& u e1 ^2 W0 z7 r( s/ m
1 E5 |& {4 y% x2 G
– 偏度:S k e w ( X ) = k 3 k 2 3 / 2 Skew(X) = \frac{k_{3}}{k_{2}^{3/2}}Skew(X)=
6 { w* n5 N: vk 5 b% \6 `/ q* N. H- k4 S
2
6 a/ C1 n" x* Z3/2, Z: z' q9 B& D
% b! | Z, P( U6 w. P
9 K+ M% u+ Q3 j( Sk $ L) m2 q- p9 ]. S9 V
3' X$ W0 l; r$ a5 X+ p0 y) |3 O
8 ` S, m8 q8 e4 v. h' X
) z' B& S/ X+ m. [5 [% \4 d ( N- e, o8 M4 ]4 D; r
3
/ r7 ~& g) ~8 [' i- t
+ A; U C! j8 Q, l) r! Z3 j# ?7 V1 V8 b6 D7 S
– 峰度:k u r t ( X ) = k 4 k 2 2 kurt(X) = \frac{k_{4}}{k_{2}^{2}}kurt(X)= % b0 y$ ~% F A+ q2 j* l
k $ f5 |( F& D# L+ M( X& g1 H
2 P8 \# h$ [0 Q' R- d, P
2
1 _4 C" X5 X5 x! b ; N( i, }1 e) F8 i" |* Z
# L/ @+ N) C9 P) j) g: Ek ; i; c# T8 d& ~0 E" G# r
4! w; |9 \" R- P
0 z: h: [! U* U: X' u0 @- b
, Y( B8 [+ O8 v- X0 n6 @ / W" y5 ]9 a% j6 v! u- U
4' ~0 f" n3 A2 D4 {3 R7 Y9 j" C
# d& j: A# ?' J' E' A, m0 c! j7 r; u( `) X5 R0 |
1、几何分布
# }# ]( J& ]1 f- g, G– 密度函数:f ( x ) = ( 1 − p ) ( x − 1 ) p , f(x) = (1-p)^{(x-1)}p,f(x)=(1−p) $ f$ k, u6 I) v w8 ~
(x−1)
5 M- k) z$ J. G8 C1 W# B6 {# r p, x = 1 , 2 , 3 , . . . . . . x = 1,2,3, ... ...x=1,2,3,......$ I( D; |5 e3 ~" M
' ?7 h0 ]- L2 c; y; @" }3 O0 q
# I/ A" y3 S" @# j3 x– 分布函数:F ( x ) = ∑ k = 1 x f ( k ) = 1 − ( 1 − p ) x F(x) = \sum_{k=1}^x f(k) = 1 - (1-p)^xF(x)=∑ 0 N4 v0 b7 t; x, Z5 C3 G$ ?
k=19 M1 ?, N- J0 Q" w o6 w* z* S
x3 e0 D. L7 X1 B: ?
# ]; \2 U2 K5 y1 x f(k)=1−(1−p)
) f# q2 A( g- Z6 Gx
J, j* ]( H5 X6 A 7 X: d% Z0 Y. y' q8 Z- W% c
- |$ P% R& r$ K: z0 C( e
: n% }% k2 U5 [# _: |, l! f! h5 H. ]– 期望:E ( X ) = ∑ k = 1 x k f ( k ) = 1 p E(X) = \sum_{k=1}^x kf(k) = \frac{1}{p}E(X)=∑
7 M* \0 M- y/ f3 n, Jk=1
# b/ ?$ o8 t- F. Xx, F+ l; A' }" A4 i6 h$ O' P4 o2 ~0 [7 {
5 _$ x. E8 P) N I) C
kf(k)=
, w% y* w: T$ j# Rp5 i6 d6 S; I& s( N6 S4 I
1
+ h# s( u* B2 u0 u3 g
+ J1 M9 n4 w5 G' g8 B
" p2 n# ^% ~9 a8 s& O% o& c! a+ l# R( Y
$ K+ \- A9 P# k% F5 F5 p– 方差: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)=∑ ) Y% o s8 d* T+ r( w$ Z, h+ V# z# r
k=1
5 x2 A" ?% K, P0 K# \x% J. c" r/ P a" {1 E% V7 _" \
( ]2 H B* p4 D# J, M& o" r k
' s, {! N4 H! {% {2" Q5 h! D. T1 [. I1 d( C0 \. \
f(k)−E(X) }) E c# w [7 k
2
: l8 E2 ?: ~0 [8 \6 Q9 I: ? =
! `, H1 j' g: W( E# q$ L' Z( np
7 E: ~) \4 _, G2
5 ?0 n2 {- W& n; I0 O7 a: A$ R" u * D/ F4 N: @5 D( x! p) _( x
1−p) f+ K8 O: C& q1 |
, e" |( p: K: |$ V2 x ]
* E/ E* c5 L! B+ Y0 H: T% z- _ X
% c( ^+ ]$ E0 m7 U- G
' C0 a' |: [+ ]( {4 x– 矩母函数:M ( t ) = p e i t 1 − ( 1 − p ) e i t M(t) = \frac{pe^{it}}{1-(1-p)e^{it}}M(t)=
. w, h X6 n3 q% r# c1−(1−p)e
3 J/ O9 N8 ?: X1 Hit
+ r! r- F: T s% l' w+ `) I Q g9 S
. W. B) X' M, {8 ~( z' ]7 S1 jpe
' B F9 k! q1 r7 z+ c7 H( Git
0 G) u& m& z% o& ?7 k ( \0 H5 \5 \1 W/ m2 ?* B3 G' U8 k
- M7 T2 z# p8 `' i3 P. A% j
, }3 U, w M* M. J9 K% i) Q5 j/ A
* e5 }/ w5 E, z( n0 I" y% s3 K5 T( S6 @/ [8 x9 `! n, Z: h' i
– 偏度:S k e w ( X ) = 2 ( 1 − p ) 1 / 2 Skew(X) = 2(1-p)^{1/2}Skew(X)=2(1−p)
Y) f- U) M' R6 M9 k0 b" W0 V1/24 h7 I: r3 \) \
. A4 G5 D0 Q0 x% k6 T O5 @
3 M/ j; d+ L7 M* v, o% ?/ O' ^3 F+ @9 i3 y
– 峰度:k u r t ( X ) = 9 − 6 p kurt(X) = 9-6pkurt(X)=9−6p* s3 n. M" y4 X2 ^3 _6 w
6 m1 B" b. e& q- ^
3 ?! C8 _. S9 m! [函数 功能% l) b' `* N; J5 ]; n
dgeom(x, prob, log = FALSE) 概率密度, A9 Y: }$ Q) u) V; W( w7 u2 u3 Z
pgeom(q, prob, lower.tail = TRUE, log.p = FALSE) 累计密度* t: V/ W- w1 g v7 Z, C5 m- V( j
qgeom(p, prob, lower.tail = TRUE, log.p = FALSE) 分位数' O5 ]9 R* }. q% I4 d' B
rgeom(n, prob) 随机数
2 b' @) K4 O) H; |几何分布的各中心距来自5:; [; |9 L* I' p8 r
" H0 W# u; C0 a& j3 _" y, W! Z4 @/ {, v- }$ \
% E) z: K( a# F7 p, F
2 n) {: A' P8 W2、负二项分布; G* n- U# \- K# [: [- W
– 矩母函数:M ( t ) = ( 1 − p ) r ( 1 − p e t ) − r M(t) = (1-p)^r(1-pe^t)^{-r}M(t)=(1−p)
1 }% T1 ^# ^ V" b' Nr
5 W/ y; P: Q8 W (1−pe
& M8 ^- L; S4 Gt
# Z$ }7 b R! D )
5 h. O1 @8 o; b−r ] S7 i+ K! Q6 ]* E
" Q' }0 E5 M7 A! s9 M# I
9 D( g0 y4 i' c. k9 `7 ^( ]) p% ^
' E, ~% |0 U7 b" a" m' \, K– 偏度: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)= / `. h' z- q/ Y/ Q1 r; ~
(n " J } a7 m; f! p& A# ^6 g \
2% S4 @0 _6 L" R1 R# }
+n(1−p))
! W# e$ f* b9 s( y- d: E$ B3/2
0 K! d6 ^" H, M. c! i
7 k, ?6 B5 @$ K5 S4 j) {n ) h& ?0 k0 {' L9 H! }" f* W
3
4 |+ }2 n7 |6 @- Q! m ^ +3n
4 ?4 w8 ^% _, l0 f. z$ ?2+ R: D7 O$ C/ f* t# g# j
+2n−(3n & X( m$ E( A$ s: i' K$ q+ b# X
2
0 Y6 h& g v& t: B* O +3n)p+np ( r. g; I; Q0 l9 l! _0 A
2. L4 r+ t- H3 i5 l4 [% s
. m! u& A) |( I* T
u- m) b" X0 J3 ~3 h 7 j" I: I1 G' Y8 y) f& l
8 G& @: k. H5 d! m( ? t
- C5 K! n% y( F3 v, h0 M& p– 峰度:k u r t ( X ) = 略 kurt(X) = 略kurt(X)=略 (带入递推公式自行运算)
+ h7 X/ ], D8 ~* {7 X+ a, w" X* B' J0 ?& y( j( Q
/ a5 m. w1 k: `7 {7 _9 f
函数 功能
9 [% J3 `. l, p7 R* K6 {/ P4 Ndnbinom(x, size, prob, mu, log = FALSE) 概率密度2 H |, ]1 ~4 s( E8 q: n
pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度' P% S7 D- t# z" f, m7 X8 U
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数
o2 F' S) |7 {rnbinom(n, size, prob, mu) 随机数 s9 {8 m; p- p; M9 t# G
负二项分布的递推公式如下:6
3 O) \0 ]1 Z. w$ B. t+ z$ a# S$ [+ d9 T$ ` e. ~( r/ I5 m3 X! Y
2 w, n1 v! V, L6 a( g8 H
' w' H, k/ o7 Z+ U4 _* p' I/ W" N v, [
# X4 x2 W) C6 z) {2 c
+ _6 o2 G& v6 U ^
: m4 ?5 `9 G( B7 A
2 j8 |% |& J c4 m( B1 u4 Q3、帕斯卡分布' {( [% w" d" S, E( G
X XX服从r , θ r,\thetar,θ的负二项分布,Y YY服从r , θ r,\thetar,θ的帕斯卡分布。有Y = X + r Y = X +rY=X+r。即:在同样的实验中,帕斯卡分布是成功r rr次后实验(成功+失败)的次数,负二项分布是成功r rr次后失败的次数。负二项分布的数字特征推到见博文1。故帕斯卡分布的数字特征可以由负二项分布推出。! V8 s& @7 s1 I* k
在R语言中我们仍可以使用下面负二项分布的函数做适当调整生成帕斯卡分布。
" S) }8 F m6 L) R7 X注:在百度百科7中还有另一种说法是:
& A7 {7 g) A8 B3 ?% P& V8 w w; B/ B, U1 ^+ i
( X3 k0 q+ K1 o! f: ?6 g帕斯卡分布,负二项分布的正整数形式,描述第n次成功发生在第x次的概率。
* {1 v+ }* `* U$ r- _* D! i' D" g: K$ v6 H$ n' @( x
1 J2 Q/ ]7 _) \* @% l* G
我们在课本中见的比较多的是负二项分布的整数形式,这时候课本会标注又称帕斯卡分布,类似于二项分布,负二项分布也可以推广到实数上去定义。大家感兴趣有的可以去自己找资料文献考察一下,这里就不过多的讨论其定义和数字特征的问题了。 Y0 f; l+ \" k$ t9 |- H
* H9 a* I( o6 e( W
+ R0 r4 J1 Y" F3 x8 p. L函数 功能
% K0 d& G4 Q9 S# U( y! M, l8 pdnbinom(x, size, prob, mu, log = FALSE) 概率密度5 p3 z6 c6 P6 |7 K' F6 _6 S' ]
pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度/ I) e; u( `: R. @
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数
. y8 i; U) D3 l$ k6 M, crnbinom(n, size, prob, mu) 随机数. F! j$ c4 D; [5 F2 K7 j
4、泊松分布
2 ?; s& a! _5 |– 矩母函数:M ( t ) = e λ ( e t − 1 ) M(t) = e^{\lambda(e^t-1)}M(t)=e 1 t, G& ?& T6 W5 f3 h# [* M
λ(e 3 k3 @/ o0 E. d2 f" [
t! q; C* ^ P1 h$ S" _
−1)
/ r" u% V4 |7 F8 f3 T6 q0 P: R* G
3 H' z5 F& X% o& b
{" C' L: ^) p J8 @. z& j; F7 y4 b; o$ ^7 q! l
– 偏度: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)= & V$ Z# |5 [( h5 s
(λ . f6 \& o; O% K( o) Z- r- r) ]* ?
29 q+ ~' {1 S3 s9 k
+λ) ) L$ s+ C! w0 L) _+ T; \4 p
3/2
% x" u* ~& N" F! O
) |% r9 x, w* I( a( T6 b. Wλ / _% m. d) J& s0 v
3* m( y; t! f; @6 [ D8 u- z2 E
+3λ $ m/ |$ X9 A7 f6 {! d- q
2/ h& x8 F3 }% O
+λ
# T" X' @6 b1 L" g
5 L6 F9 w9 I0 @) m( q; L9 j' N
! X: G k/ Z3 d- t& ~4 B. {* u
; E3 a) }( \! a2 [5 y
- x! g8 _2 k& R. f0 {3 a3 {– 峰度: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)=
4 I2 T. j* a" s4 f; Kλ(λ+1)
2 \# `) e7 v ^& v6 k0 v! T2' c* [9 `9 k z5 c' O
4 T9 P/ |+ o% Z* a0 ?/ P6 ]* |λ
$ E* V3 B- |, w/ T0 [+ |3& ?5 \! P8 b$ x5 a7 O) j
+6λ 0 V9 R7 T6 Y v
2. x, x9 Y1 Z* ]' L/ h. I1 m' G
+7λ+1( \" ]/ E6 I; y; U, m
6 v1 |2 D8 T8 Q; ~8 D, V) u% n
5 T* g1 G; U! I
( c; I% P: v! ?& f% b8 I! z" K) Z1 {4 f( `4 t
函数 功能& j: \6 y" \" Y _. I. k
dpois(x, lambda, log = FALSE) 概率密度( ?* z6 w g2 m/ _% v4 B" @ I
ppois(q, lambda, lower.tail = TRUE, log.p = FALSE) 累计密度0 J5 |7 |3 ?( m( w
qpois(p, lambda, lower.tail = TRUE, log.p = FALSE) 分位数
6 ^* N3 O& c; t! ^" brpois(n, lambda) 随机数7 t/ s6 g* ]3 |. `& p" ^
中心矩的递推公式来自8:
$ T+ W' d2 Y1 S( E! N
+ u! I! I u" x! \, X( Q( L6 X; s" e, }' m/ f' n* d0 V
7 T7 R$ ]# a3 F! w! o8 j. v: ^
4 W/ p. D H. N0 n5、 参考链接9 }. P/ r) s) k, Y# V7 ?3 a
https://blog.csdn.net/weixin_46111814/article/details/105243202 ↩︎ ↩︎5 `/ k+ T* q/ @( j+ h# q! c3 Y
0 [; g6 g/ `; z! Q
" S' k2 O3 ^: e2 S" Bhttps://blog.csdn.net/weixin_44602958/article/details/105261188 ↩︎* F: [- Y: r$ Q7 u* n
! `( n' A- b& q- P( Z9 ~2 N Z9 n1 G/ Z% v6 @5 _" f: d
https://blog.csdn.net/STcyclone/article/details/84310450 ↩︎2 g, e$ G! V% |* c* L, r0 Y
; q, R6 m# C, |. ^" O( t: d0 F
0 }( q( a, u! P+ v0 q8 K! t: `https://baike.baidu.com/item/%E5%81%8F%E5%BA%A6 ↩︎4 t/ W- Y/ j! _+ i, F( h
M3 X( O$ {% _6 d5 _& z) H9 n* H" u! U% v$ r, N
https://max.book118.com/html/2019/0412/6234220152002022.shtm ↩︎$ m" d$ R( S3 N: G6 i% a1 y
( t' w- O- K6 b4 \( L% _' \! e2 }
6 E+ s C' V; B# ?朱成莲.关于负二项分布高阶矩的教学注记[J].高教学刊,2017,No.66,103-104+107. ↩︎8 h# t0 O8 y; j* L+ G* _
" M9 s0 c4 m: N) G! @7 Z
6 f; D) m9 ^/ r/ _% N" x" Phttps://baike.baidu.com/item/%E5%B8%95%E6%96%AF%E5%8D%A1%E5%88%86%E5%B8%83/1188907 ↩︎
8 S2 [ M& X7 Y( l* [: x: a: v+ `* ^+ B
/ ?6 ^- |* Z; k' p) }- ~9 M! F
https://wenku.baidu.com/view/7f8328c10c22590102029d83.html ↩︎
# ]" O7 v+ V. E! P( g( I; r$ C————————————————- p9 p1 a) R9 y3 V/ ]+ s. e
版权声明:本文为CSDN博主「统计学小王子」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。: D* L7 q# v I# U; Z2 r
原文链接:https://blog.csdn.net/weixin_46111814/article/details/115499487
; I1 m+ f, v' p* c+ W5 K: I! {3 S! n
) I1 ~; m6 c l) Y) l |
zan
|