- 在线时间
- 1630 小时
- 最后登录
- 2024-1-29
- 注册时间
- 2017-5-16
- 听众数
- 82
- 收听数
- 1
- 能力
- 120 分
- 体力
- 563347 点
- 威望
- 12 点
- 阅读权限
- 255
- 积分
- 174227
- 相册
- 1
- 日志
- 0
- 记录
- 0
- 帖子
- 5313
- 主题
- 5273
- 精华
- 3
- 分享
- 0
- 好友
- 163
TA的每日心情 | 开心 2021-8-11 17:59 |
|---|
签到天数: 17 天 [LV.4]偶尔看看III 网络挑战赛参赛者 网络挑战赛参赛者 - 自我介绍
- 本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。
 群组: 2018美赛大象算法课程 群组: 2018美赛护航培训课程 群组: 2019年 数学中国站长建 群组: 2019年数据分析师课程 群组: 2018年大象老师国赛优 |
+ g" J2 [+ q# [' f% D
离散函数的数字特征及其R语言的应用
6 t n% m4 q, ~& ] Z0 o目录0 H8 S8 N/ R: `4 k8 L6 h; y
0引言
: L! x& e: G7 [5 x. W8 X4 E本文结构
1 s: ^- O4 I- e: y: C理论公式. a% S) F4 R4 b+ F% d3 C* F
1、几何分布2 _/ K; _$ ~; [
2、负二项分布
* E; `+ U! E! r0 n, ^7 P, ^3、帕斯卡分布
. {! y' U* T. p2 d( |4、泊松分布
7 ]" V7 U. ]7 f3 Y# v/ r5、 参考链接
* `9 ]2 B) S: E( |( {$ z. `1 h) R0引言
$ p3 J" ~9 J8 D本文结构
7 a e) H+ _$ T0 a/ W在文章统计学基础——负二项分布的数字特征1中介绍了负二项分布,在博客2中介绍了离散分布的数字特征。
& S" |( P& j7 H+ T本文计算一些离散分布的:密度函数、分布函数、均值、方差、偏度、峰度、特征函数、矩母函数
% j, d1 ?2 E, A0 i- A( ^# U" \# N) v) A2 U, X! B
5 {0 n) \8 z6 O0 d2 F* i理论公式& v: c) C5 S) {9 [- a8 [# q
为了方便先给出计算公式:
_( t9 G, ^1 h5 s' h# y: s6 h. W
! X4 d, Z; |" o9 u: b4 i5 s4 B3 e: o# o+ a8 T
– 密度函数:f ( x ) f(x)f(x)4 v. S0 ^- U+ d& s
* c/ y+ P" k! G4 l
- P/ M Q! k1 M q" Y6 z3 ?- h– 分布函数:F ( x ) = ∫ − ∞ x f ( x ) d x F(x) = \int_{- \infty }^x f(x)dxF(x)=∫
8 s( O& O/ N% Z7 v& n: o+ K5 d- s2 B−∞
( j' F# v5 s1 L; px
8 L8 Q; Y, M7 J" o6 l% I
3 G c0 e' I" f# P. x9 f f(x)dx
; Y% K5 g/ i7 ^" N1 c! G. j' Z# m! @
4 M- i+ @: c9 E1 n! h, v% Z- m( ?$ o4 Y& `& C
– 期望:E ( X ) = k 1 E(X) = k_{1}E(X)=k 7 s: a" ?. O% h) z1 ^- K
1
# ?1 n& {$ R: ~5 v 5 K+ `1 b! r" V& a( a y
& x& ?4 E* @$ J7 m8 U9 _( t+ k/ ~5 S' T0 @
- E( z" c( f& K: O4 D
– 方差:D ( X ) = k 2 − k 1 2 D(X) = k_{2}-k_{1}^2D(X)=k
4 Z& |5 T( k. ~; M1 ?/ m29 z3 n! k1 G& d6 y# Z. @( h
- h. a4 B& o5 x: o −k $ _0 l: _4 j- C4 g; N
13 q7 w6 ^+ r( g( G; B8 [$ N
2
- Y. _% L* H2 L9 R3 e / x5 \& E; I1 n2 y/ t
3 L( f5 R4 v- ^' r- t
# d" s: u' v# i
. f. @1 Y# q1 L2 w+ G
– 特征函数:φ ( t ) = E ( e i t X ) \varphi(t) = E(e^{itX})φ(t)=E(e
2 h8 ~! X/ N$ }( kitX
& P& x6 `% Z8 _, W4 c )
; _) w" ~6 w% g' T s- |8 r2 S( y2 \; L0 t$ }7 i- x
7 r- |+ r6 ]6 v! q% r– 矩母函数:M ( t ) = E ( e t X ) M(t) = E(e^{tX})M(t)=E(e - w2 P9 I# @% b2 C6 |( }$ I% u/ C
tX ]: y7 v7 E8 ^& X- T: `6 u6 i
)
8 h3 D4 J* z N# X5 }
" O( J5 n+ B" [* q8 e* S6 J' l% }$ C M# W4 V
– 中心矩的关系:E ( X k ) = i − k φ ( k ) ( 0 ) = M ( k ) ( 0 ) E(X^k) = i^{-k}\varphi^{(k)}(0) = M^{(k)}(0)E(X
. H9 z1 R O! _$ b+ u# T9 {k" b4 T/ X$ N- K3 a. {8 S0 d
)=i 8 h5 F6 g# ]3 x" G9 F
−k5 P+ l6 E1 @) C9 o4 }
φ
3 B4 k h y9 |( W! |0 `2 D(k): b% W$ D3 l3 r
(0)=M 2 _0 C3 h. k1 F% b; Z5 }
(k)2 F$ t" L* \8 b2 Z+ E) [) O
(0)2 N2 }- E3 o* r1 b
/ G$ P* \% k% a; I4 Q* w& ] {% p9 W, p9 y
– 偏度:S k e w ( X ) = k 3 k 2 3 / 2 Skew(X) = \frac{k_{3}}{k_{2}^{3/2}}Skew(X)=
! H3 h- V, o" g4 Yk
; r( ^4 U" H4 L- H5 B( d; t! d+ R2( A6 i* ~- a+ ]6 l" R _) F
3/25 ^9 F; U u* u
% ?7 F- f4 ? o) d
, a! ]# [& K% c8 q1 Z/ fk
+ j \/ s! z" G9 r3
7 F- m1 ?. z( w4 J9 w) n 1 Q* R" x6 G W- q+ _7 r% f
/ B% v z# h! C; G
2 k1 j6 p0 D0 y/ \0 Q: b2 u6 y6 X# m
3
0 e8 {: F* Q u6 v9 Y [) H
+ d" l+ U# ~, s) g
* b( X2 ?9 T& I, \ i# }$ A– 峰度:k u r t ( X ) = k 4 k 2 2 kurt(X) = \frac{k_{4}}{k_{2}^{2}}kurt(X)=
$ z4 w% H( C! Uk ; i& d" C# x+ L+ U" }
27 g; y: C% Q5 v- k4 w: u' R0 C
2
& C# ^7 L; W' Y, F 6 X' Z) @/ R( O4 U- Z4 o
) j/ d8 Y9 ~4 U5 T, X* P
k 6 R) v" `0 p$ ]7 I$ z0 ]( \
48 ?7 c% E4 k$ u0 ~! P8 }# D# A* P
3 o$ P( B- X& b& H8 _3 V" { 3 X6 u/ o4 E7 G( }7 b; M( y! Q
) ^$ c: W& I# y7 x5 h2 p6 J 4
4 _' E- z1 i/ n: r
* A* t1 g9 d( E) F. _% x
. n. g8 a; b5 j4 K8 X2 G1、几何分布
# J7 V9 g% s# {2 ?4 f$ `) ? [– 密度函数:f ( x ) = ( 1 − p ) ( x − 1 ) p , f(x) = (1-p)^{(x-1)}p,f(x)=(1−p)
" I6 K! W/ i! {! |(x−1); x4 X4 w a8 Q: q& W1 X3 e
p, x = 1 , 2 , 3 , . . . . . . x = 1,2,3, ... ...x=1,2,3,......0 Y- U# J* `2 ?
5 z1 w; O9 c5 ^# ]! Q
( K6 X8 e- K$ y3 q) \– 分布函数:F ( x ) = ∑ k = 1 x f ( k ) = 1 − ( 1 − p ) x F(x) = \sum_{k=1}^x f(k) = 1 - (1-p)^xF(x)=∑
3 l! ^0 i. T5 C4 s7 R0 Kk=1: e% U8 g! l: s3 G( k0 N
x+ O; l8 @2 u* Q/ P
# `6 a* N9 r% D$ [# O+ d f(k)=1−(1−p) & n) D% X8 z/ e2 c- H6 w
x( H4 n7 J, K" |' w& r v* ?; P
2 m/ U7 t- l+ I' E, ]6 y
2 p5 A. m, u2 a* [- x1 r U# {. v1 t5 W g( C
– 期望:E ( X ) = ∑ k = 1 x k f ( k ) = 1 p E(X) = \sum_{k=1}^x kf(k) = \frac{1}{p}E(X)=∑
* H$ J4 x2 }1 z& }. d+ \k=1
# Y4 I6 t- `1 Z$ ]6 ix
# |6 B: @) j3 Q! k! k * f+ p: l6 C3 a& q0 }! ~( F, D
kf(k)=
$ ]8 g1 s$ A) g; Kp
; k2 G" y, N7 a/ \' H8 l. N1
5 l) M$ J$ `. e$ J3 D) a5 v & J; m8 y `- ^( j1 y& |7 B
4 i) z, i0 n1 p. v! ~+ D# O8 {5 o7 G4 _+ \( b% D I9 j4 I9 N2 s
/ G3 J/ D/ l3 k v. T6 e* F9 l– 方差: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)=∑
$ Y3 P" |4 K% {% a! X# _7 wk=1: |7 M/ y: m% ?0 ~
x& h, v( W5 I# U2 q0 [3 [
& i; v& z. s6 K0 y0 o: n k
9 M, l* A% {& b4 l1 Y5 y21 V( X3 n8 I4 h b7 g
f(k)−E(X) ; i: k X- i* _" e' v) b4 r! v
2( b+ f' Z- Y! p& d7 J3 u E5 [
=
& i7 P9 N0 A2 K4 rp ) O3 ]) `1 P& u: P) h$ a% b; l
2
0 W) l# [, {1 \4 Q# i 4 e. {1 v3 S+ L2 I; R
1−p
4 Q0 }7 I6 R* m$ f* ~, ^, W3 C
' c( i$ c# w, [: e+ f4 y) R 9 E/ G# a3 a; x1 W# J1 S2 ]4 B
) w2 ` c8 ]3 ]1 H8 Z8 Y
/ Q' H# [2 t& h3 j9 h3 Y* B' R– 矩母函数:M ( t ) = p e i t 1 − ( 1 − p ) e i t M(t) = \frac{pe^{it}}{1-(1-p)e^{it}}M(t)= 6 N9 A/ Q7 ^& \( x; a b' z
1−(1−p)e
% Y/ w# K- E; K1 U$ kit
* e$ m% m3 k/ p* p, B
9 _- e- u5 v z9 `pe
6 [6 O9 U; H4 [9 zit
0 e+ U/ k$ L$ F- N* Q7 C2 _$ \ 7 w. [3 Z7 K2 }& }
( n' H( g5 w5 T) r$ M
% i: U; Z* p9 O2 L/ ~1 h @+ ?, M5 V: U
" [% d# `+ }- ]) t– 偏度:S k e w ( X ) = 2 ( 1 − p ) 1 / 2 Skew(X) = 2(1-p)^{1/2}Skew(X)=2(1−p)
* P/ X/ y% m# ?- W& ?; y) a1/2
; V& j* \1 c& d8 F& V" N# \ $ A$ i+ R+ L9 G& X& f7 t6 s0 z
6 `9 Q. U- P" }
; l1 h0 x7 V2 R! b& A; @: z: ?– 峰度:k u r t ( X ) = 9 − 6 p kurt(X) = 9-6pkurt(X)=9−6p
/ F$ I) b6 a, D
& @: N3 e9 P7 x" D; u! P! n+ R M7 h- C2 ?- P8 ?+ P. z0 Z
函数 功能
, H( O5 U4 ~+ u, R/ ]2 adgeom(x, prob, log = FALSE) 概率密度
% q& ^' n. W! ~! q% X$ Xpgeom(q, prob, lower.tail = TRUE, log.p = FALSE) 累计密度
0 H' Y! J& z; g5 O0 Kqgeom(p, prob, lower.tail = TRUE, log.p = FALSE) 分位数
9 p& c; o1 Z" F' G- V trgeom(n, prob) 随机数
7 Y. d y! I# O" Z3 u1 L2 |几何分布的各中心距来自5:
' C. r7 K) b% U% R: K9 b) t( _# u) V
$ S+ r" y# J7 U# G* s. o
: a2 S$ y) M8 U! J: X9 ]- Q
0 w( Z- N3 J7 S4 c* z: m2、负二项分布
, Y0 k/ N" O) C! T! ?+ {– 矩母函数:M ( t ) = ( 1 − p ) r ( 1 − p e t ) − r M(t) = (1-p)^r(1-pe^t)^{-r}M(t)=(1−p) ( i4 i2 k6 E9 N# o/ S( @
r
% T1 m4 G0 P+ W$ C1 a/ [- { (1−pe : C, Y$ F6 ]; c- b4 d
t u) v7 K/ F( N( a4 c o, ^
)
- x* A$ L) r+ A3 B4 A5 U3 h−r( E# n7 l$ k9 P3 V2 S3 \! d1 b
/ ~7 a, L3 _! C/ T2 Z- r3 h
6 t6 N1 a6 O) Q) N4 ~2 }
5 r+ j* l+ h0 N' @% X/ Z& |% D
– 偏度: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)= # j6 U# e5 z4 F. O; @
(n 1 O3 u# [% \9 n8 Q" B
2! [( Q/ z7 a; o+ ~, r
+n(1−p)) 6 s* ~% @1 J0 S- W R# U
3/25 J' _3 R9 }; N) a1 g" [+ E: r
2 a0 N7 z% S. @6 k! L
n
1 }, A- e( [9 I: L0 E; p# a+ N* b3, G% j h/ b% M" p6 P- D4 i3 I
+3n , ?- A' n- p7 Q) }
2
; \) `, ] r# _8 w +2n−(3n
) I) }: r8 N. D+ S4 v$ |2
J D( \. l( ], R, @+ n, g, y +3n)p+np 6 p( G' c# X$ ~9 ?. `/ p8 Z
2
% n! q# G# D. G( K1 p6 Y
2 h b. x. W! q( E$ Y# \0 d" m7 ^ 0 `7 I% ~% r) N" V, h
2 S% [3 c* n3 m# Q& i" F
$ l- v' _8 H# n. w
* K7 L. L% F! x8 g- G– 峰度:k u r t ( X ) = 略 kurt(X) = 略kurt(X)=略 (带入递推公式自行运算)
' l# N8 E. P9 ?7 i9 n8 C7 p' B. K& V7 g \8 z- p6 B3 g4 T: a4 m* J3 |
. d& h# Q8 P" K8 _/ C5 W
函数 功能
; g2 t$ P# z4 L3 R0 m+ vdnbinom(x, size, prob, mu, log = FALSE) 概率密度
4 K- P& r9 k9 \, W9 A i% ~7 l9 p% Npnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度6 C) j& l! I7 G& d0 c
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数, o8 x b: S* ~, L
rnbinom(n, size, prob, mu) 随机数
7 f& A$ F4 Q, h& T" h负二项分布的递推公式如下:67 }, A- f: p3 C' ?. a- M7 o
: J# z6 N6 S5 N# [) Y) c. ~ ~
( N* P& p1 K6 f: D: J" \. n2 F' \ M8 m1 d9 j; L% o8 q
- f7 q6 Q1 L; @ }
- E- G4 z) F1 w* o
6 U) G0 [4 _% x f/ `% Z0 C
, b4 v: f% Q" e0 Q, y8 p6 v3、帕斯卡分布; E5 {( z# L- Q( T: N4 ]1 z5 M( n
X XX服从r , θ r,\thetar,θ的负二项分布,Y YY服从r , θ r,\thetar,θ的帕斯卡分布。有Y = X + r Y = X +rY=X+r。即:在同样的实验中,帕斯卡分布是成功r rr次后实验(成功+失败)的次数,负二项分布是成功r rr次后失败的次数。负二项分布的数字特征推到见博文1。故帕斯卡分布的数字特征可以由负二项分布推出。
0 z& n+ M1 j, d* F在R语言中我们仍可以使用下面负二项分布的函数做适当调整生成帕斯卡分布。! U$ |- [. W/ K; y' v. R1 T& \/ G
注:在百度百科7中还有另一种说法是: V+ b* b! J6 i4 \9 f( U" f+ i
/ Q O, U D* |2 s& b" V
/ Q. \8 J+ a9 _; K# c0 X帕斯卡分布,负二项分布的正整数形式,描述第n次成功发生在第x次的概率。- B. ?' I2 }! A9 o/ h8 l1 A
2 C/ ]% K$ l; x# \# M% C
. h0 C/ y4 I4 L4 R1 P) i3 c
我们在课本中见的比较多的是负二项分布的整数形式,这时候课本会标注又称帕斯卡分布,类似于二项分布,负二项分布也可以推广到实数上去定义。大家感兴趣有的可以去自己找资料文献考察一下,这里就不过多的讨论其定义和数字特征的问题了。 W! H& A" X0 I" S
6 j, I1 B+ U, Y+ ~" l. u: `0 i- y L6 o O6 V9 H
函数 功能! Q, Q3 t$ J( H; c3 C0 B' F
dnbinom(x, size, prob, mu, log = FALSE) 概率密度
# s- R9 G7 E$ |4 Q. |6 kpnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度
. U$ t0 M1 h- I2 U1 [5 pqnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数
% V7 b U! F3 e; o" d4 \6 Lrnbinom(n, size, prob, mu) 随机数
2 _% N1 A- p4 e9 ?/ w* f0 u4、泊松分布% t/ L) J- ^9 _ g2 J# ~& k; Y
– 矩母函数:M ( t ) = e λ ( e t − 1 ) M(t) = e^{\lambda(e^t-1)}M(t)=e / H c/ o) S+ s
λ(e " z0 F* j3 Q+ Z T9 h5 |& A" x
t
* R6 W* ?5 ^% o. W −1). l0 ]; C; W; w6 K
* Y" v& e. T5 ^% C. @5 d
+ f2 q2 [7 `) y* [5 p) F/ `2 u" M" |" x4 p) q
– 偏度: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)= ( [! R1 i8 P# C
(λ
8 z" f+ j2 }2 q. y2* l9 x) I* t7 `! D8 I2 N3 ]
+λ)
5 |6 D' D% W" R3/25 C$ l0 g+ {* u M3 J2 B- I
- w: t$ |$ [- T g; mλ
! E& Q" c, f2 P& Q+ f3
$ v4 \% g: V& A) n4 k8 B9 T +3λ 4 r& ?2 a0 e. n3 n& f* s6 z
2
, E! G. {8 x6 l# s( j9 U +λ
$ J8 X/ R; g. z) m
* \( v5 g h, I% [" @/ Z i7 m 1 A/ C! y, S6 O& f# E" R
+ Y; @1 `4 F% _; ? q j8 m) U5 T$ M- d, ~9 U6 a
– 峰度: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)=
2 E1 R, J1 A& V! Bλ(λ+1)
5 t) ^6 P- r. ]' i2
. F* q7 M8 |& v. Q8 `+ r - h! a h3 ]1 @# p- A
λ 0 D4 m1 Q) M& Q9 o6 z* M
3
$ U9 K g1 t2 W' X! p9 q +6λ
6 r6 O0 v6 e+ K0 ]* O2% g0 H7 N" i8 D, b2 |
+7λ+1
: |4 F* J* h( B8 H' D. s % E7 y8 e7 r. R1 A; t, U
8 K/ i3 u! f7 }( L, N' ?% V1 p3 u
' d% Z! i1 X2 a# |1 ?8 g6 g4 w' F8 o+ t3 F- Y( `% a/ [( _8 w
函数 功能$ U4 E9 I! W3 r: t
dpois(x, lambda, log = FALSE) 概率密度( D9 _+ S5 L9 z. P4 I! {9 c) `0 ?$ R
ppois(q, lambda, lower.tail = TRUE, log.p = FALSE) 累计密度
8 } L+ V- _; o5 _qpois(p, lambda, lower.tail = TRUE, log.p = FALSE) 分位数: ]+ L& o3 @4 }" g) _# a0 |
rpois(n, lambda) 随机数
- I4 a, e& Y n中心矩的递推公式来自8:
' `. o( Z% Z8 W6 {# E9 E1 A3 }( T) @: \! o6 V; W* j
: J4 s. v# M9 H4 `9 |0 ^9 u
) @" @- y1 g+ y! s# f& C$ G
: a$ k2 L* n# j3 ~- Y* X+ {* A4 M5、 参考链接
' \9 C T! D+ w- M1 ?https://blog.csdn.net/weixin_46111814/article/details/105243202 ↩︎ ↩︎
$ ^! m, m- n2 }% B2 {
0 a; o: T# k: ?2 t! B; a# b5 H, ]
S$ E; R3 _( m9 H% c. O% i( Jhttps://blog.csdn.net/weixin_44602958/article/details/105261188 ↩︎. i3 c! n( @! Z0 @& j& e; a/ m1 `1 K
) J6 C1 H( n. p2 F+ I7 L6 [
# c2 w/ Z7 q) t. [https://blog.csdn.net/STcyclone/article/details/84310450 ↩︎
% D, j6 r5 T/ Z
3 f. Z, s5 O/ O
3 N7 G3 q& P( L1 l K) fhttps://baike.baidu.com/item/%E5%81%8F%E5%BA%A6 ↩︎+ Y4 X; D0 U# ^- p4 l
, l. ~: p" F" E; ^" E2 w
) s1 z* t& L; k- F: i! K* {8 lhttps://max.book118.com/html/2019/0412/6234220152002022.shtm ↩︎. `& U" ~- \9 U9 j. ^) X; ]' L+ H
( R# D- A2 F8 h
: g4 c! k9 |% h朱成莲.关于负二项分布高阶矩的教学注记[J].高教学刊,2017,No.66,103-104+107. ↩︎
. y2 K8 `1 g8 u3 D" H* P* r( d" X& q& E8 x1 M8 W; J- i
[. Z2 a/ X! ]" c
https://baike.baidu.com/item/%E5%B8%95%E6%96%AF%E5%8D%A1%E5%88%86%E5%B8%83/1188907 ↩︎) Z! ]7 S5 H2 E1 v/ x3 t
5 [& D3 n" G, g5 X+ a
" D' s/ a' N" o" t7 N" s
https://wenku.baidu.com/view/7f8328c10c22590102029d83.html ↩︎
8 R+ ^( L$ G8 g; E( F————————————————3 v( \4 M4 {& U* I
版权声明:本文为CSDN博主「统计学小王子」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
1 ?' T. A# j) r/ I* q; ?' {原文链接:https://blog.csdn.net/weixin_46111814/article/details/1154994879 ?8 C4 r: {7 j |( v4 z
# u5 n' L. q" S8 z% d/ p- @. P3 e4 q" \+ H, \
|
zan
|