1 p, d( M) A' [8 R 离散函数的数字特征及其R语言的应用6 m, c4 K/ V. b; Y, |7 ?
目录 $ E" a( a8 R- D4 [0引言# J0 K! z/ L4 ^4 Y X
本文结构 * I* e/ W$ t) h0 A g理论公式 ; Y5 k% g- j4 G" a1 k2 W, H1、几何分布 Y, F0 k$ Z) ~7 g2、负二项分布/ h% |7 F- t; p* Q$ R
3、帕斯卡分布 $ C0 s, l& J$ V6 a4、泊松分布 ( V( E3 l+ v; t2 A1 J5、 参考链接/ H+ O* o0 p# _6 o: e
0引言 1 B0 B/ z0 y' V1 {* z本文结构 ; x( A: ^- K; [: g) ?! T$ O在文章统计学基础——负二项分布的数字特征1中介绍了负二项分布,在博客2中介绍了离散分布的数字特征。 7 [ a+ J1 l: n: F本文计算一些离散分布的:密度函数、分布函数、均值、方差、偏度、峰度、特征函数、矩母函数) ^4 S: R2 j4 p
, P# g1 F4 h! f, z3 ^ $ M2 Z3 n, w8 r$ T理论公式; w% y" Z" n# i
为了方便先给出计算公式: : B D- m# w8 p* C6 K% @( d; a' U3 s% p8 y5 c& @# i
* k9 \3 @, \/ z- l5 g6 q q
– 密度函数:f ( x ) f(x)f(x)& G* o. g, ]2 t+ K) S( s
9 j2 ] r8 p# {( x: g5 E
: s3 r5 X8 E1 Q' h/ L
– 分布函数:F ( x ) = ∫ − ∞ x f ( x ) d x F(x) = \int_{- \infty }^x f(x)dxF(x)=∫ , x* F( k5 E( X4 n−∞ ; t6 S4 ~4 I; G! i& w8 qx( X0 N8 K, i$ r/ n; J3 C' D3 N, N
( N: `, k; u. m5 }% C1 j, u# I. H
f(x)dx - O0 q, S9 m1 d( P+ z ; v$ G- @# _, }7 Y1 N; h: O+ h# j! W . L! x; o+ O' Q+ @. }– 期望:E ( X ) = k 1 E(X) = k_{1}E(X)=k 4 [8 D5 U" Y- @% O1 - M6 x% A5 U y 9 }; G4 |% \* O+ H1 W& [ & q8 }* _' t4 q& q' t v" w( W9 I% r7 r3 c0 {% b- n. U- U
' W) g5 L! k$ O. _
– 方差:D ( X ) = k 2 − k 1 2 D(X) = k_{2}-k_{1}^2D(X)=k " W' V+ g) U7 T
2 ; p" L* q$ V# } 3 K5 I: D8 Q& y4 N( E
−k - T2 }5 p& Z" D3 _* Z& M
1 5 [% P$ W3 v- Y: J1 o$ @5 b1 ]2 . i4 t' R/ m9 o) U2 L2 u$ z/ G6 U 8 e5 @' U7 e- m q
T+ U7 E5 [3 Z! t# W I* Y! q F1 ]0 z& d, E0 \
) x3 C; p: u- o( K- d9 H# K– 特征函数:φ ( t ) = E ( e i t X ) \varphi(t) = E(e^{itX})φ(t)=E(e : ]( E* `+ m$ }2 _- ]# |% ]
itX* ?( w4 Z1 l$ j4 p+ B
)) U5 \! h* y$ v2 [6 Z
' \* g7 [0 M3 r. \6 X v7 t$ z
: B: n+ ~* u5 g– 矩母函数:M ( t ) = E ( e t X ) M(t) = E(e^{tX})M(t)=E(e 0 i1 y) O0 T6 v# a4 `tX; V: \2 Q3 S- s- g
) ! J3 L6 C5 Z' n" w, _) X% o4 U z4 @9 S. A8 {
8 H. D) v- r- Y( U+ K% B– 中心矩的关系:E ( X k ) = i − k φ ( k ) ( 0 ) = M ( k ) ( 0 ) E(X^k) = i^{-k}\varphi^{(k)}(0) = M^{(k)}(0)E(X # n+ n6 O* ~& C- G- l2 N3 d7 j
k , ?9 I; r8 a5 `3 U' ^9 t )=i " J" p- K) f* r$ F2 w/ b5 I−k6 J9 E9 a" F+ J5 i3 _
φ , C% @8 j" ?6 A* r(k) " W% f8 f! x9 K. F" i" `; K8 u (0)=M ! Z) r, v* L. f9 U" N8 v! T(k)* f B9 t9 f4 D8 N3 p
(0): v1 ] ]% l# K0 r
0 j2 H; k5 E: ?2 e4 h( [! t# ]# a
4 o% m Y/ |$ Z' q
– 偏度:S k e w ( X ) = k 3 k 2 3 / 2 Skew(X) = \frac{k_{3}}{k_{2}^{3/2}}Skew(X)= , M. C/ Z) Q( Z1 P/ P( k1 b
k + ^! V9 i# F+ @ Q+ ?2 C2 r, N y
2 : F' O$ p2 p8 Y6 B3/27 n/ {. \, F( n/ {
% u& V, b* w/ u8 a 0 r Q ?6 p( r7 ]: r* i. ]' Y8 hk , B; b6 C# ?5 q% r$ e8 J
3 $ F0 c# ^: C8 a% l& \$ Y. z7 [ . e& K# q3 K, L9 b8 @; Z: R
7 \7 o, n' }. B 7 T& q4 l# ]1 t1 D# f4 v/ t5 S- C
39 W) `5 a, d4 m- S, i" n8 A
' ?0 q7 q+ j# e% f 3 ^+ C X; k4 S- `– 峰度:k u r t ( X ) = k 4 k 2 2 kurt(X) = \frac{k_{4}}{k_{2}^{2}}kurt(X)= ( I- b d! N2 h, ^% Ek - ^% g6 g4 G& E+ Z* D& H
2 * j6 M5 H; Y/ V+ G2& |- C! ^5 S9 s% Z" _+ E
2 k! H" y7 X1 f- z0 { r 9 a# l9 [+ z* [+ \! |) z) x
k / N# ?2 |! f# h X; j4 R
46 p- t" C4 K8 Y1 Z h
8 ]! h Q$ K7 p( J$ `) Z, e " r) f2 P7 ]3 Y/ O ! u7 I" ^% O* ]& I' N s0 ~
4 ( @! ]" F; O" E ( I7 w" ^" U4 q* Q9 L, w. y( Z9 q! [2 L1 }
1、几何分布# I3 j0 e' l7 `; A0 @7 n1 u3 w4 r
– 密度函数:f ( x ) = ( 1 − p ) ( x − 1 ) p , f(x) = (1-p)^{(x-1)}p,f(x)=(1−p) $ [. a2 d1 {4 N- k i* \+ f3 D
(x−1)+ S4 b1 M& [# Q
p, x = 1 , 2 , 3 , . . . . . . x = 1,2,3, ... ...x=1,2,3,...... ' @+ }2 H/ f; ~/ S/ p" L3 y0 n : w7 s8 H, U/ h9 Z! B/ Q) ^+ Y7 X0 V( [, E6 c
– 分布函数: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 x7 y6 A1 Q/ B6 O/ [: t
k=11 B7 L: s% H. w, |, i. k \7 _! t( ^
x 1 {/ x+ e$ M0 \6 ?5 `- |% H% p 3 w" a6 [7 L+ _2 \2 A f(k)=1−(1−p) 9 e$ A) K, A5 O4 `4 }8 E2 C
x% _( a1 k, ]% g& w; N
' V0 F6 q0 e% L" \: p
7 K# w# j) Y) H; v5 t
( o& j; d, S U( n, r* o
– 期望:E ( X ) = ∑ k = 1 x k f ( k ) = 1 p E(X) = \sum_{k=1}^x kf(k) = \frac{1}{p}E(X)=∑ ! m! y, m2 s5 l( gk=1 ( A) Y" [. O3 {' e* Kx % k+ u) r, X' t9 Y; y7 ^ ' j) D9 ]( t6 Y' \
kf(k)= 4 F, |2 i* i% z
p - T2 Z9 ^$ U+ ~! {1 8 T3 j8 A( U* Q* c0 @2 I9 N ; H% z3 ]' i. L9 F q 5 E( |& ~$ o* r0 v; N$ Q, O+ ^% l/ Q; b
9 B/ ]5 X4 G7 F– 方差: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)=∑ . I8 E# G* P9 P9 E1 }* l8 ck=1 1 H$ B/ _+ e* c. `8 D" {x* y$ M; S6 W- r* ~, a B
4 C- `/ A0 D1 ~ k $ g& w; R3 [" l# m! |& }6 ^
2 u' K; X. |, A* V, \. a7 @. q
f(k)−E(X) 8 i% K* O+ `% o& E& @4 y4 Q" L29 h& n/ z+ M* ]6 D
= . a* T6 w, e6 b/ hp ! k8 i6 r2 J1 v7 a5 Z7 i2 5 m8 ^4 U) ~- A6 a4 j+ b$ i: _ 2 u* ~4 F% F: I* k' w1−p 3 P6 U. G9 h- `. P; l1 B* q' U 3 r0 q# _& `- |$ @7 w' r: @
; F$ A2 n9 H& \. A9 }! r/ F
7 o3 Q: A3 f; C I7 [ e/ W) f $ B0 a) w9 T" f# o/ t1 ?6 I– 矩母函数:M ( t ) = p e i t 1 − ( 1 − p ) e i t M(t) = \frac{pe^{it}}{1-(1-p)e^{it}}M(t)= " j3 Z0 ]2 x0 ^4 ^1−(1−p)e 9 d/ k8 m( X! R& n; n8 F
it 9 V/ d& e" L4 n2 f) B ( {& r; L6 V: X; n6 u
pe # R' U, r( c; R! Y6 }
it% A4 Q1 T* D c
& q! h/ |6 `8 m" E$ G
$ y, `9 Z8 j# H 3 C/ d: D1 p: e: R- Y
7 m+ v3 y3 j/ C9 v& F# h 7 g! i0 v, g; X7 k, s/ E! |– 偏度:S k e w ( X ) = 2 ( 1 − p ) 1 / 2 Skew(X) = 2(1-p)^{1/2}Skew(X)=2(1−p) # y2 F5 @6 P! h4 s b, a/ _, E. |6 j# k
1/2 ! \2 _# E4 k3 A9 u& M- ?/ E) B8 r * y B% }6 q0 I% R e6 g- D! C2 _0 R9 z: c4 E
: F! Z+ P8 a1 q/ N' e* p$ {– 峰度:k u r t ( X ) = 9 − 6 p kurt(X) = 9-6pkurt(X)=9−6p4 U; g. r$ [4 G6 S( A
0 ^+ F8 A. a8 {2 j4 d9 z9 j( M) Y7 s; s0 T% j3 o: k$ d2 N0 E* x0 U8 C3 i
2、负二项分布. M/ d) o, c9 K* v5 F
– 矩母函数:M ( t ) = ( 1 − p ) r ( 1 − p e t ) − r M(t) = (1-p)^r(1-pe^t)^{-r}M(t)=(1−p) ( y0 U/ p2 Q# v6 S" t, S4 Dr/ y3 O* ~; b) E6 `+ L: J/ H
(1−pe ( n4 u- ?* P/ e6 C+ o, p1 Wt$ ^2 F8 U/ b7 g2 h
) , I2 @5 x P3 J# J$ \) R
−r, b/ l4 V) ]# X
) c; G8 w' _8 l8 ?6 m4 z% V- }' r% W' R, i
8 V# W# a% F6 h; I+ x) `$ ^– 偏度: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)= 5 U4 g# Q, L+ `% p1 _ d(n ; X( o* g p: [% `% k: T. d1 J
2 * w" \; a7 D6 O- u6 Z- R +n(1−p)) 5 c7 ]. \2 m+ a4 ~7 [3 @3/2# \% y. K! F9 {4 y; u
. v0 J4 B3 n! w; Dn 6 U! |' Y" z4 W8 X2 Y
3# o, f+ v: P4 `" _) M
+3n 0 c/ z6 m a- Z, o
23 M+ u6 g8 S$ C. t p& m% {. R. v
+2n−(3n " T9 N! v) g) t# S# x/ ]
27 ^9 R( ]9 D" k" L: w" P
+3n)p+np $ g0 {( U2 y& X& z
21 r9 x* m5 Z) u, J/ | I
, o0 F2 b6 L( I. B* ?
& |+ v$ e& c5 H4 k! k/ I2 S
" i1 _) c( y/ [
0 b8 S. m& n. z7 t9 k
0 w6 |! I( u$ R0 q: G- ?$ {) t' `
– 峰度:k u r t ( X ) = 略 kurt(X) = 略kurt(X)=略 (带入递推公式自行运算) 8 y; i2 b' m) G+ D( Q; k( K& U, V6 C {/ K7 }# B