- 在线时间
- 1630 小时
- 最后登录
- 2024-1-29
- 注册时间
- 2017-5-16
- 听众数
- 82
- 收听数
- 1
- 能力
- 120 分
- 体力
- 557212 点
- 威望
- 12 点
- 阅读权限
- 255
- 积分
- 172536
- 相册
- 1
- 日志
- 0
- 记录
- 0
- 帖子
- 5313
- 主题
- 5273
- 精华
- 18
- 分享
- 0
- 好友
- 163
TA的每日心情 | 开心 2021-8-11 17:59 |
---|
签到天数: 17 天 [LV.4]偶尔看看III 网络挑战赛参赛者 网络挑战赛参赛者 - 自我介绍
- 本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。
 群组: 2018美赛大象算法课程 群组: 2018美赛护航培训课程 群组: 2019年 数学中国站长建 群组: 2019年数据分析师课程 群组: 2018年大象老师国赛优 |
: ^9 `3 N O5 j% H0 D
离散函数的数字特征及其R语言的应用
: i( y0 n' V X9 ~' f目录# A% X3 B. R* s6 l J% d
0引言* L( z6 g3 O2 @3 X7 n; C: z. D8 s
本文结构 F9 M d& n# B! X* F( J
理论公式! S2 W- ?/ A& a/ c9 C! G
1、几何分布8 K8 a8 s0 t1 L: ~
2、负二项分布7 A0 F0 ]0 b# w8 q7 U |: j- n
3、帕斯卡分布
+ i- j1 {1 l# S& ^6 G4、泊松分布2 _ c! I g$ Q* H0 u
5、 参考链接
" ?! @* X3 Y+ \& k( m; T0引言6 e+ l4 y) S) X! \& ], L
本文结构
* `* Y3 S; o, U; W$ \# ]& s在文章统计学基础——负二项分布的数字特征1中介绍了负二项分布,在博客2中介绍了离散分布的数字特征。% L% \* O. R: }5 o. Z$ T# L
本文计算一些离散分布的:密度函数、分布函数、均值、方差、偏度、峰度、特征函数、矩母函数
% ]& w# z3 A! |% p) X9 G. B9 A2 G: D; C3 Y
: p1 @! g& S/ y0 y理论公式
d8 M0 A# `8 R* n6 }& J0 Q3 J) f为了方便先给出计算公式:
& b9 N+ s( o2 l/ o/ Y" Z. c
k5 h1 |" J' N; q. e
6 S. T/ g+ u$ |* w' k; ^4 z– 密度函数:f ( x ) f(x)f(x)3 |( y, f% E$ t3 b) D
x% S; K- j. G' [ ]0 [
+ { w7 ]' @- n1 `
– 分布函数:F ( x ) = ∫ − ∞ x f ( x ) d x F(x) = \int_{- \infty }^x f(x)dxF(x)=∫ 5 o$ j/ K5 t2 e7 V8 E
−∞
4 t" b9 ?7 C. ~' B% }* z: o7 G) M& Ex5 j6 S' _4 u. o7 [
) l9 r) L$ f! S1 b5 Q$ } f(x)dx
% p1 q4 M. Q; t6 v. ^
. E4 ^4 G9 Y8 A' j7 y$ k, E! k, B4 e0 `" q' J* N; P
– 期望:E ( X ) = k 1 E(X) = k_{1}E(X)=k
" s9 L+ z9 h: }$ V( \1
' g6 S/ u2 J# L
- E, d' T% @5 R4 h
: A0 D' U" G M: Q9 U# p4 |7 Z9 a8 q2 I( r. o
: a. I' @7 q( F- y9 k– 方差:D ( X ) = k 2 − k 1 2 D(X) = k_{2}-k_{1}^2D(X)=k
; ~" t' A' o) ^* W; @& e/ j y# s2& T! e! O3 G2 b# v) V
; O) n. }9 O6 k, ]% J+ t9 Z −k
' M+ Z) H- M7 d2 { W ^1+ w" r( ]1 y! R; R1 g
2* c( {! l& S/ B% `
! h5 o) S7 J- F( S* f7 e 6 H0 |/ v+ n9 i% t
! q; f! Y t% v; S! \
& h1 b3 \' q. N( Z1 Q4 p+ U– 特征函数:φ ( t ) = E ( e i t X ) \varphi(t) = E(e^{itX})φ(t)=E(e 6 T) E% W; O! c& T4 `$ d, @, F' j: W8 _
itX
& B. b. y: }- ]5 M+ @ Y3 C4 X )3 u0 A. {4 Y( ?6 @2 T- H" Z7 y
6 F& t6 d0 X; u V4 W, I: Z
. j7 u6 O& L, z; _; W* {/ `2 a– 矩母函数:M ( t ) = E ( e t X ) M(t) = E(e^{tX})M(t)=E(e 0 X! X( p2 K$ [% ?2 p
tX& u4 r( G% ?* M; N& v
)
9 x& l8 c9 R l9 E, X" s; H
% w3 |* B! b' O% Q! p
8 \: ^4 Z2 @4 F# _7 p) \4 }! w– 中心矩的关系:E ( X k ) = i − k φ ( k ) ( 0 ) = M ( k ) ( 0 ) E(X^k) = i^{-k}\varphi^{(k)}(0) = M^{(k)}(0)E(X
$ i6 H1 C/ r' Y Ak
6 c" q( |) `/ P2 \: U5 z/ k( J& h' @ )=i
; f8 U$ N8 i+ r$ a−k o; }7 Y* T2 D9 h
φ
8 l2 N: g" `' _! | y(k)
+ W& p# ]# v1 j, u' c% Z; n (0)=M * ?1 d; o$ ]" {2 y# h3 u( B* w: p
(k), K1 A3 V* v: Y" P: ~
(0)9 F6 @8 ~2 F) `0 K
8 W/ B# W$ `/ ?% E! ?8 v9 l
8 ?" m3 y' E" A$ Y7 x: X+ T4 `
– 偏度:S k e w ( X ) = k 3 k 2 3 / 2 Skew(X) = \frac{k_{3}}{k_{2}^{3/2}}Skew(X)=
. z+ G* u# |. w4 d. P$ K' N/ mk * | ?9 ?! ]; d& m6 g- z
2
7 l% u" g+ T% B- ]% E+ k' F0 N3/2
4 B3 Y2 K1 y( U) x2 j! N6 t) s
$ L0 ^( d) m% C) x" d/ n) l ' e9 ^' R4 b; K- p, @ _5 r8 d
k
0 G% n9 P3 b9 j3 z, h: G6 k3
6 N1 g5 o- i% ~6 k$ }* a5 `* M
; ` h. V. m; h3 z# D # E5 C5 V; R' N8 ^, t4 P4 M0 u
+ f% {7 D+ A6 [; O! d 3
: @5 k$ R1 Q" x T
" p( G) S7 c' n% o; G4 E. T! w# R2 k* E' [; D
– 峰度:k u r t ( X ) = k 4 k 2 2 kurt(X) = \frac{k_{4}}{k_{2}^{2}}kurt(X)= 5 T0 t+ ?+ d8 x- D
k ! C6 Q+ a2 h$ G$ N( k
29 O* _5 a* X+ h
2, C3 N( c# K9 ^. c6 K, B9 l$ T+ Z
[: e: [$ U. L& b8 u& [- u
8 q% H+ \) Q8 J
k
/ ?. ]5 i* i1 B4 \+ A$ s0 A. x# L4( D1 I: Q1 g0 }3 D$ Z! @ d
8 {2 [* j: m5 N8 ^1 D1 D% P 9 t2 @/ u2 q% ?( n I0 a, ^
% K( E: n8 \+ H( M {) ]% k 4
) m* u6 d3 D1 J9 g0 N+ n5 l$ ~: B' Z2 }: i, Q H8 z: d, s+ R
) u5 u, E5 t! z
1、几何分布
1 n9 u! g4 r( M4 X! K5 \– 密度函数:f ( x ) = ( 1 − p ) ( x − 1 ) p , f(x) = (1-p)^{(x-1)}p,f(x)=(1−p)
; C5 }! A$ ^- i7 K7 B, [$ O( l6 r(x−1)! e; D. w2 f: j+ z6 D0 D
p, x = 1 , 2 , 3 , . . . . . . x = 1,2,3, ... ...x=1,2,3,......
( o: o; \* t. F- L' Z# G. y
7 D( C& X0 |7 S( u! V6 P3 s9 B3 {3 [# Q/ Y9 T
– 分布函数:F ( x ) = ∑ k = 1 x f ( k ) = 1 − ( 1 − p ) x F(x) = \sum_{k=1}^x f(k) = 1 - (1-p)^xF(x)=∑
1 ]/ N0 n$ _# Z+ ] hk=12 {! v3 i" z. o# l6 |" o
x) F4 N& w# h+ d7 o
) y/ Z% S3 b& Z+ o: f% `- c: O f(k)=1−(1−p) 8 h7 y: s: {6 T/ r; j
x
% J' J2 i5 G! Y' V
+ J4 z G3 F5 N5 r6 A! D$ g) `& f7 m
/ \5 F8 N( j* @– 期望:E ( X ) = ∑ k = 1 x k f ( k ) = 1 p E(X) = \sum_{k=1}^x kf(k) = \frac{1}{p}E(X)=∑
( ]1 R- Q- ]& ?0 W! @! R0 y$ ck=1
% ~3 d# K+ L# b( F- K) Ax# e& z8 e, R6 |1 Y! f+ w3 L
9 R! `, i, T$ j* s% b
kf(k)= ; B5 E' T7 h% b. @5 C4 U- y
p9 C6 ~, r+ M/ c# p( w3 x0 o
1
' Y+ ]" ~% @; [, P) ~/ O
0 C9 R: g- M. D" \- @ 3 S6 t7 ` n0 \4 A. e1 E4 c
$ L8 s9 f( Q- D" Y p% ^9 ^
. g7 F# r/ b3 `) n7 A. h
– 方差: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)=∑
+ d0 r5 t0 E+ g1 Ck=1# ?" [6 h3 z. x. H2 k) Q3 r
x
+ ~, J" P5 F+ b/ ^" ], G: s& _' v
; b# ~% }' b8 Y- j/ w/ } k # o9 x1 s' g( I: s3 A7 q _
28 @! ]# V4 p2 W2 ^
f(k)−E(X) 7 C6 _9 ^; j; M6 N% c% b6 [
2! i1 @, W; }8 {( Z' u
= 6 P: T& P) `. Q! s5 ]2 X0 e6 m
p 6 t# f' R5 N. `' K2 X% X
21 A$ n; y( z/ J5 F+ z j- m
6 m! Y- P9 a) V7 p9 o6 @0 V1−p+ v& v0 Z/ }0 a: B
/ V0 Q- }: p' @. `" `3 ]* a
. Z J1 J R/ _
3 Y$ Z, ]+ b9 c8 J$ u( I4 ~& ^4 A. [+ L R7 g
– 矩母函数:M ( t ) = p e i t 1 − ( 1 − p ) e i t M(t) = \frac{pe^{it}}{1-(1-p)e^{it}}M(t)= 4 ~& y1 d! U1 \4 V% }& Z* t6 K
1−(1−p)e 1 e% B# I: ^+ _# x$ O) j1 `
it
4 h3 L3 N+ i) v' q$ j1 B' \9 K6 ` * J- e4 w! x8 [0 h" t0 ^
pe
& m: t2 n& L/ Xit" ~5 H/ w1 u% d, d
7 O3 \6 H0 e) n# ^+ h9 j2 S& p x7 A n' n9 P2 u( Y
0 d1 D9 |2 P; T; d2 e( A( K- t
+ @8 N: o% v1 Y4 B: Y
0 x0 K& v' N; ~; H
– 偏度:S k e w ( X ) = 2 ( 1 − p ) 1 / 2 Skew(X) = 2(1-p)^{1/2}Skew(X)=2(1−p)
* \2 r/ Z4 k& d. a1/2. b5 S9 X' I+ D/ x2 M/ j0 E
! H% g# m. o4 y, @) @
5 H7 @' v+ {2 W5 x3 S: F1 `) s* C' k. I( h
– 峰度:k u r t ( X ) = 9 − 6 p kurt(X) = 9-6pkurt(X)=9−6p
) K6 Z; [ q- a9 }
+ O( X1 ?0 ?: n0 E5 j c8 [
7 t4 j& _0 Q5 p$ m" _; }3 \函数 功能
7 d1 l4 D4 B1 `+ Jdgeom(x, prob, log = FALSE) 概率密度8 E- I+ N4 p8 n0 j. @7 I7 ?
pgeom(q, prob, lower.tail = TRUE, log.p = FALSE) 累计密度
, }$ i" ~- y6 ?+ V1 M4 G% Y xqgeom(p, prob, lower.tail = TRUE, log.p = FALSE) 分位数
; V5 T: D. |9 }7 |$ s/ urgeom(n, prob) 随机数3 a5 j9 m8 U- H o' X& [
几何分布的各中心距来自5:
' ^2 a* W3 U) _) w
x8 j! M( E( w8 D2 u0 P
- F" B" x4 p* `6 V/ E( s. q2 r9 Q$ }3 p
' F) Q3 Z O. m5 o9 Z
2、负二项分布
" f2 y8 K5 i+ x0 X– 矩母函数:M ( t ) = ( 1 − p ) r ( 1 − p e t ) − r M(t) = (1-p)^r(1-pe^t)^{-r}M(t)=(1−p) 2 B1 ?1 z) X1 P! V
r
# I; c8 ?9 ?$ C2 O4 f1 A (1−pe # X( X$ f% U4 b
t
! {. b! a" x* S6 z )
4 n/ Y G# K. T−r
" i% J' V+ N% C3 T; C3 P/ X( s! _
$ M% D& c' K, ~0 z7 }6 K6 t5 N( V0 L) Q! S
+ ` E _, W% {/ ]
– 偏度: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)= ' _. f3 R: g+ f# f1 @
(n
; f$ l# Z" N# R1 m2& d9 r: \0 d( O; `( K
+n(1−p)) 1 P- r* _5 j! [3 L8 o# H0 j
3/2; u" g% Z( z8 y. Z
; X& w, I7 T3 n
n $ v$ B9 |: r0 N0 Z5 b& n# j a# t
3
1 X" g/ E6 r) O9 F8 K$ ^ +3n ( y7 q9 V* [! d0 a) d$ q f
20 k: f6 O0 Q. C3 r( R
+2n−(3n ' e% \+ i6 D. c
2/ g5 `; }" B6 t& s' j( z
+3n)p+np ; d1 z' P; k ?5 Y- ^& i
2& _0 G p! k% W% u: y! K: y5 `4 h
+ G! ]' o* j# o& E2 Y
6 U9 T: P$ j2 D2 P7 c 3 L6 }$ x* \8 ?9 q' T5 U# O
. C' J& \- ^7 [( N' V! v" X
2 i& {0 t; Q# |. s9 S# _* t( @& L
– 峰度:k u r t ( X ) = 略 kurt(X) = 略kurt(X)=略 (带入递推公式自行运算)
; T. Y' \! }( _3 b. O4 J4 ^+ E, Y/ a1 }6 s8 C7 l
; r& h/ C3 c6 M2 j$ }9 H0 |
函数 功能5 p5 `* L* \$ [3 j! t+ l0 E
dnbinom(x, size, prob, mu, log = FALSE) 概率密度
* I+ z# t7 X+ S( G) d/ hpnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度& H6 @4 ]+ x* `
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数: M4 \/ i: F. @; C) d- q$ s4 B
rnbinom(n, size, prob, mu) 随机数
6 p2 ?( J! _5 `. G7 E: C/ U负二项分布的递推公式如下:62 N0 _$ n( s+ {4 U. j/ m
; H4 d- d& G _: y
, s0 J/ W# M2 ?' n1 j: Z2 ?2 x7 n
. P, G+ a+ p! f
: _7 a3 Z5 F) [8 S
0 U! l- K5 n4 E w
7 o6 j$ j4 y: X B; E# i4 U. E6 l4 q L: u
( P9 d* E/ s* U! K' \ W* V# X3、帕斯卡分布" b: B1 M, l/ x. j: {0 i
X XX服从r , θ r,\thetar,θ的负二项分布,Y YY服从r , θ r,\thetar,θ的帕斯卡分布。有Y = X + r Y = X +rY=X+r。即:在同样的实验中,帕斯卡分布是成功r rr次后实验(成功+失败)的次数,负二项分布是成功r rr次后失败的次数。负二项分布的数字特征推到见博文1。故帕斯卡分布的数字特征可以由负二项分布推出。
* l/ o$ i9 e4 g, }5 \7 X在R语言中我们仍可以使用下面负二项分布的函数做适当调整生成帕斯卡分布。
) Z( F( f& d$ Q7 X注:在百度百科7中还有另一种说法是:
. _( e( e% P" t! L0 Q: u/ e! B8 i7 l% W3 M% ~- R) Q) p% s
P0 z# f" Q( d帕斯卡分布,负二项分布的正整数形式,描述第n次成功发生在第x次的概率。& _' p( E/ _2 Y3 p d; w: |# w
( F) Y( K. d" @4 B
5 B/ i) X! f, w/ E: f我们在课本中见的比较多的是负二项分布的整数形式,这时候课本会标注又称帕斯卡分布,类似于二项分布,负二项分布也可以推广到实数上去定义。大家感兴趣有的可以去自己找资料文献考察一下,这里就不过多的讨论其定义和数字特征的问题了。
. l% M6 W2 V9 R% w ^4 w6 Q$ i
6 D& r S! u# `8 a. q2 s( ]
+ C+ p+ j. R# ^$ ]函数 功能) M" m7 ` X7 Y# l, o" v; B
dnbinom(x, size, prob, mu, log = FALSE) 概率密度" F( `! G2 E$ H; |
pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度 ]/ ~: f9 J& b; k4 ~# ~7 i
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数8 q! q9 |! x6 u- p3 \
rnbinom(n, size, prob, mu) 随机数+ A) b$ I( p9 K& Z4 v
4、泊松分布& {, L3 C) \1 h# l
– 矩母函数:M ( t ) = e λ ( e t − 1 ) M(t) = e^{\lambda(e^t-1)}M(t)=e
, u( l5 o1 O, l6 a. iλ(e
0 P) u. ~# F. z( }- C0 d, kt" k* O# y6 q G& y
−1)+ n1 j' {) q" \* t; J; p
, _+ f( G! h7 j' b W
- \$ r# G1 z/ b. A: o
: F* F2 Q- ]- L$ W" C– 偏度: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)= z& Y' _' H8 H* H. [+ M6 q* o
(λ
; K2 m. p# W) k2
6 q8 ]8 u) N1 o- b& ? +λ)
, @: A, M' d% y$ }9 C3/2
. W S5 E. ?# i5 E; a! ~4 u
~. _' d# P! y) L' `λ + `5 a7 ~' [! V0 V" A
31 \0 x+ ]/ S0 C% H# s0 R7 e+ V
+3λ
* S! I. @( j5 f+ J6 q23 Q8 ?& G5 c; Y" w
+λ
0 v) A% C5 T. N! A- G. I% C; N; s ' R* F: s( X8 _+ }
, }! I8 d d( ~/ n) V: H$ r# V+ c
% }! k/ z8 q* X# N. i
; g: q0 p2 G e. c0 E5 @( K– 峰度: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)= , r s+ H' [4 y$ c1 j! e# N
λ(λ+1) 9 h% H8 t) L% i
2
6 v h/ p7 C' Z5 Q! t s* I
, U: F) }/ L F uλ $ R8 V% |1 L* d& Q
3
; ~; j% r3 q" U +6λ / ?/ m- Q w3 ^# h2 K- F4 h5 _4 a
2( i/ ?6 c3 G* M8 \2 M
+7λ+11 f) P" ]# k5 V" h" J1 _# ~
- V1 e4 d& M8 {4 q9 l" U
2 o' W# H* L) g7 d' y: ?5 e' O! d9 l/ x- z
9 @6 Y* |; s1 l! G* K1 ~% ]& j8 Q函数 功能
( X" z0 [! Y: @; Xdpois(x, lambda, log = FALSE) 概率密度
/ m" ^7 {" g0 r' d+ rppois(q, lambda, lower.tail = TRUE, log.p = FALSE) 累计密度& G3 d0 [4 @( h8 o: e* R8 i/ o
qpois(p, lambda, lower.tail = TRUE, log.p = FALSE) 分位数5 W! y- ?! E6 d$ ?0 u
rpois(n, lambda) 随机数
( E3 y; _9 o1 r( s中心矩的递推公式来自8:
. M" O5 J% @( @
, l, Z K/ `1 |! N1 z& u/ f
" ?+ I) l$ b" q) l: X
+ M B6 ^; r; Q+ I
y9 O5 y2 P) [0 ~* A3 d5、 参考链接
, f4 o2 {8 R, u7 A( O/ k! B% Phttps://blog.csdn.net/weixin_46111814/article/details/105243202 ↩︎ ↩︎
; O" |% e! k f
# k5 I& y# ?1 ?3 i& t: F' }8 i
$ J( f. X: M1 N3 @* U" Shttps://blog.csdn.net/weixin_44602958/article/details/105261188 ↩︎
( Z' O' U ^$ B1 }, D" n2 I! e1 q8 m
- n( X8 H% S9 s! f5 q; E, q& l1 {$ h% M( y& m* I2 R
https://blog.csdn.net/STcyclone/article/details/84310450 ↩︎. V' \1 {* g0 q/ R% T
( p' x. C5 f* [. e% v
" @6 S2 f5 T% @6 @https://baike.baidu.com/item/%E5%81%8F%E5%BA%A6 ↩︎
7 e. }; S' ~8 l
( s0 H# h! i: W# K
$ n. Z- s; Q8 p7 b5 e' \https://max.book118.com/html/2019/0412/6234220152002022.shtm ↩︎
% v, j2 U: H2 \/ {. B* m9 e" K: r: W' q2 r) m3 L/ I9 k
* m. _) H, D4 O' M2 S0 w2 E% u9 r朱成莲.关于负二项分布高阶矩的教学注记[J].高教学刊,2017,No.66,103-104+107. ↩︎
$ U, ?: @/ i4 y& l. T- j* q. a6 w5 I4 q5 c. B
4 o8 M, k8 V" g- ^6 {https://baike.baidu.com/item/%E5%B8%95%E6%96%AF%E5%8D%A1%E5%88%86%E5%B8%83/1188907 ↩︎! s: v, K5 a# P1 |- W) l; e
3 ], j3 g8 E1 R6 }2 s
) X" _( [( {& C( l4 thttps://wenku.baidu.com/view/7f8328c10c22590102029d83.html ↩︎5 T3 a0 r' S" E
————————————————
' \# `, T8 n; e( j4 s版权声明:本文为CSDN博主「统计学小王子」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。& v2 @0 E( I _
原文链接:https://blog.csdn.net/weixin_46111814/article/details/115499487
0 z: v: Z& R ?" \) c2 c8 U4 W* t- V0 ^2 I1 o
6 I+ y! ~, u% u1 w7 Q
|
zan
|