- 在线时间
- 1630 小时
- 最后登录
- 2024-1-29
- 注册时间
- 2017-5-16
- 听众数
- 82
- 收听数
- 1
- 能力
- 120 分
- 体力
- 555873 点
- 威望
- 12 点
- 阅读权限
- 255
- 积分
- 172135
- 相册
- 1
- 日志
- 0
- 记录
- 0
- 帖子
- 5313
- 主题
- 5273
- 精华
- 18
- 分享
- 0
- 好友
- 163
TA的每日心情 | 开心 2021-8-11 17:59 |
---|
签到天数: 17 天 [LV.4]偶尔看看III 网络挑战赛参赛者 网络挑战赛参赛者 - 自我介绍
- 本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。
 群组: 2018美赛大象算法课程 群组: 2018美赛护航培训课程 群组: 2019年 数学中国站长建 群组: 2019年数据分析师课程 群组: 2018年大象老师国赛优 |
" f$ c" q3 K' g. N- G" M
离散函数的数字特征及其R语言的应用+ I; R- o# A2 ?: b4 q
目录
w" }% {4 T: X' l1 P8 z' ~ p6 E0引言* b2 d5 E+ U9 k! O" M
本文结构8 H& c& g! d0 [9 O
理论公式
; P' g0 f! v$ n7 g1、几何分布" G2 W1 E0 V3 E9 T- M& M
2、负二项分布4 J# O* n% d0 u1 R. x4 O3 ~
3、帕斯卡分布' Q% z1 Y7 R: o' c' P
4、泊松分布6 r( ^7 ]: _! S; H# `
5、 参考链接
+ _- v8 W7 d, o0引言
0 _2 R! @/ H6 L/ M本文结构
; O) v3 t' t2 P. ]0 P在文章统计学基础——负二项分布的数字特征1中介绍了负二项分布,在博客2中介绍了离散分布的数字特征。
+ I" c, X3 I( g5 Y7 n1 m本文计算一些离散分布的:密度函数、分布函数、均值、方差、偏度、峰度、特征函数、矩母函数
& k) v& U- C* l* x9 N4 F. E L2 i* l6 H9 b _2 O
b# D& A- p: c! t
理论公式
- O- s8 s5 s" U5 _% t. r为了方便先给出计算公式:$ \+ f0 t5 Q0 B! n
$ Q [: P) w) @' A4 J4 d7 k& g
' q* i8 ^' H8 ? a4 K. O7 i" o
– 密度函数:f ( x ) f(x)f(x)
: A9 t0 {6 B; w/ G+ n) i4 z; }4 |
3 X! N) p I3 A- _ a
" b( |6 @) n, x2 Q5 z3 M7 G8 P. Z– 分布函数:F ( x ) = ∫ − ∞ x f ( x ) d x F(x) = \int_{- \infty }^x f(x)dxF(x)=∫
! }+ J' E* ^' a−∞0 X( a6 F0 O6 g9 h% p) O
x
; ~8 V0 O3 E" ]- f8 p! W & z. ~5 e/ H2 K7 r- B
f(x)dx
6 {& u; S# \3 G) E, T3 W* ]) J# Q: C6 r' `. b
$ B3 c: G, f$ _2 y2 z
– 期望:E ( X ) = k 1 E(X) = k_{1}E(X)=k
+ W& E" e* x6 |8 P18 \0 C( v; L! r& c, I7 b; D
5 ~/ |6 a+ Z# Z3 {! K+ |# z
" `0 H5 L8 K! }3 B! H6 \5 A8 O/ p0 V
$ _% D7 @8 B" M
– 方差:D ( X ) = k 2 − k 1 2 D(X) = k_{2}-k_{1}^2D(X)=k 4 |) b, c/ ^% t4 |0 u. F b
2/ ?+ P/ [% f2 ?, r/ Z
3 b; m: M1 x3 L8 G2 B* d5 T
−k 0 r9 g: Y& J4 u, w9 `+ Z( E( B
1$ @ W: `3 V. _# P: j% |/ J' i2 J
2
. H$ w$ z0 ?, ?4 p1 Z0 G; q ) C: G+ L- T% x+ H0 z. f
Q# l" G6 p+ S0 K( r, d
2 A, ^5 }8 g" e) f
. T# d, s @2 V5 Q5 \1 Q K0 |– 特征函数:φ ( t ) = E ( e i t X ) \varphi(t) = E(e^{itX})φ(t)=E(e
- I" e0 `, ]. Z. t5 A+ s- h9 yitX+ ]$ |& j& X/ ^8 Y, a
)! M: n) @2 v' l- `, |
% |% M8 P' ~& ^+ {+ D7 ]; d# S8 ~5 }$ [2 u; W+ R
– 矩母函数:M ( t ) = E ( e t X ) M(t) = E(e^{tX})M(t)=E(e
" Q3 ]; y- v2 h( O; J- F# S6 H. y$ wtX
; e) ^0 o W% h# r. s$ I# Z ). @8 }5 }( C2 x2 F/ n
8 W; C x5 ^4 e( S* u; H, q5 _4 }7 U0 a! W6 _
– 中心矩的关系:E ( X k ) = i − k φ ( k ) ( 0 ) = M ( k ) ( 0 ) E(X^k) = i^{-k}\varphi^{(k)}(0) = M^{(k)}(0)E(X % C0 t' c8 K x. o
k: ?$ s+ c% Y8 S( n; I) s& V1 D
)=i 0 K* b% d$ C% U/ Y5 c) P
−k3 x( I- F& u# Y+ I: ]5 X U
φ , b- `) x9 N0 b- ]; f2 }' u
(k)
2 z) ~1 r& r ^8 G% H6 } (0)=M 3 E3 Q' ?3 N; M: x
(k)
7 S- e. m6 n. F (0)! V1 G' U& E# G% E* c
4 j9 V/ R! A$ w7 j1 Y- j2 R1 @+ I- R1 i4 O$ ]" y/ a# y
– 偏度:S k e w ( X ) = k 3 k 2 3 / 2 Skew(X) = \frac{k_{3}}{k_{2}^{3/2}}Skew(X)=
# g1 i X+ @: y2 @% f. z3 ?k
1 r" B; h4 o+ R26 t0 \% ^3 J$ v# V4 [0 C4 \
3/2) K2 V& W2 q6 A8 H' Z" Y! E" C/ D
& r+ r. f6 J- Z
! T2 S8 P% j$ d- u c. s
k
* u- _+ T6 G' O8 m m% h3( I" q1 e( r0 B- g/ i4 q3 R
' u8 ?" `9 n& } ]
2 O6 q+ ~& \1 s, r- x+ J. r% h x* X* Z( E) `+ o: j% D7 Q
3% O% k8 o% Z0 b3 T" s. o+ Y
& Z6 `7 G7 ^ E! D* i
8 r: p6 e3 L# ?– 峰度:k u r t ( X ) = k 4 k 2 2 kurt(X) = \frac{k_{4}}{k_{2}^{2}}kurt(X)=
* ^# Y4 M" e# J2 d% Ak / S) X* e3 d r
21 Q* s; R/ s0 D/ X F$ t
2
# w+ n5 M% a; k; k* F6 v7 {" S ( P- n9 Q1 V+ H9 j
% D8 Z& ?; ?( [+ nk
# z! L7 A9 s9 }4
& n3 r. b+ }: S) d4 i' a0 V+ v / k$ k3 w9 I* _! n+ Z$ W9 e! R
, ]: m, `$ e7 X; [. X1 w4 O! I
( M: k& H( E5 @; U8 i. c8 t
4
8 J2 n4 O0 q9 ?: U5 z' o% M- s; t1 [- F# f0 p- g0 I
4 N) e! x# v1 s! B# D1、几何分布) ^6 a! U% u, I( J% l
– 密度函数:f ( x ) = ( 1 − p ) ( x − 1 ) p , f(x) = (1-p)^{(x-1)}p,f(x)=(1−p) i1 |( A5 t$ G8 h- H3 a9 T% Z7 C( a
(x−1)" n) }& [ A* y& _# v- Y3 e2 P
p, x = 1 , 2 , 3 , . . . . . . x = 1,2,3, ... ...x=1,2,3,......4 J( s. A" s* l' e3 f
# C0 r: }% X% S& h5 F. ]9 `! I$ s' P2 O2 i+ c+ r7 G9 U
– 分布函数:F ( x ) = ∑ k = 1 x f ( k ) = 1 − ( 1 − p ) x F(x) = \sum_{k=1}^x f(k) = 1 - (1-p)^xF(x)=∑ / F/ Z! S' p3 U* r) z+ j. v$ P& M
k=10 B" ] x0 E1 \) ?; U
x/ R! V& @5 }$ q6 m
. X; Q+ r; B4 Y; h" c8 O0 Z! v
f(k)=1−(1−p) : x$ T# v* h$ q9 ~3 c3 b: J
x9 S/ l* m) \, _; k) e' H
1 D4 T* s$ g9 P# A" {
. E7 l- V2 w, V' v1 I( t+ L- ^9 F6 x( p8 Z" [, O
– 期望:E ( X ) = ∑ k = 1 x k f ( k ) = 1 p E(X) = \sum_{k=1}^x kf(k) = \frac{1}{p}E(X)=∑
: q' @5 f: j/ [* [* X' h; D. w, x1 Zk=1- U, j% R1 y* Y
x
2 V$ K! w4 }: j , v2 n, N: I6 Z; Y" g8 i* q( Q
kf(k)=
2 G: X/ m+ O& l: @+ f* a: X; X, op4 B F$ q5 h+ H. ?
1, f: d* I. R/ t- c2 X3 c. W
2 C" D3 V$ V7 T+ c) ~
( v8 q7 Z: F+ \9 m4 S4 i t+ i, V+ D) y$ p$ Y' x
. p: O- `9 l3 }) o/ Q– 方差: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)=∑ ! ]$ @3 H" f, t" e0 Q( C
k=1- s( M" a; B4 S% |* {" u6 r
x! Q3 t- O2 C' U- n+ G1 z
6 U3 p2 T# I2 `- D' S$ b
k - p5 _& L* u( W; {, ]/ a
2( @ i' ]$ l# M3 |
f(k)−E(X)
! u% {8 j- r9 T* j7 @8 f: j2
4 ^6 x# e* _1 c3 }8 _3 E% w =
* y' H" E9 @& V tp
- K# c/ P9 a1 c) z2
4 O9 [: L- z1 Z2 L6 f& d& u9 h
9 c- O: [; P& W, G; n1−p {6 e" y% I/ Y# r6 y# T% ]
4 y* e+ O, B- u. L2 y; r% d( {( }6 q
$ G4 F' {* u/ g' X# A+ F& _
; ^ e( n; n1 Q+ P0 g3 C
( l ]# T4 z9 b. Q– 矩母函数:M ( t ) = p e i t 1 − ( 1 − p ) e i t M(t) = \frac{pe^{it}}{1-(1-p)e^{it}}M(t)= 8 Q5 F5 X# r" `& `0 j
1−(1−p)e 8 B% `) B5 e$ D: _& o0 Z
it$ Y S) `2 \2 j/ E r+ |
% y5 j* }/ t' z5 D3 q' B3 M
pe
8 h5 e2 A" {6 O# Tit
) ]; e( U7 Y5 q+ A 2 f+ |0 C+ V% T' V- f3 ^
/ ^, A& u; a0 R
1 p& d! |: r: Q" A6 ^ B$ w
. d2 e% s7 B' d
: r; X4 h9 [: V0 n+ |) \– 偏度:S k e w ( X ) = 2 ( 1 − p ) 1 / 2 Skew(X) = 2(1-p)^{1/2}Skew(X)=2(1−p)
7 W6 C" K' b0 ~ v! X+ g1 x- H1/2
5 q$ ~& S) s1 l' O7 |' g, s, p N9 R) i# Y( a- T$ a2 T* P! R% p4 _
( K. g9 l$ _# d( i) D
! W5 m( [& t. V# t+ V
– 峰度:k u r t ( X ) = 9 − 6 p kurt(X) = 9-6pkurt(X)=9−6p
; t! b& H( Z- v! H3 R: t6 b/ i; m- E2 j5 j9 P% D$ c) U
6 K7 R5 A$ c6 R+ [. ^# |0 @函数 功能
0 m7 |* V! r) P9 a8 {dgeom(x, prob, log = FALSE) 概率密度' \4 f. o7 l% {. H7 x7 }
pgeom(q, prob, lower.tail = TRUE, log.p = FALSE) 累计密度3 G" z' O8 e9 Z v, e7 `/ y
qgeom(p, prob, lower.tail = TRUE, log.p = FALSE) 分位数* P# P& l' X, J
rgeom(n, prob) 随机数
9 K9 T$ h, a" ?9 A9 }几何分布的各中心距来自5:; h5 h) g: G+ D3 \: {
1 V0 o' E/ c6 ]' {
' v9 V" q) L9 K* ]1 o+ c- i3 c: b+ K8 k! a
6 f* h* w, E" r2、负二项分布& }( k2 K6 A, G2 m0 V0 v* h
– 矩母函数:M ( t ) = ( 1 − p ) r ( 1 − p e t ) − r M(t) = (1-p)^r(1-pe^t)^{-r}M(t)=(1−p)
) s$ p$ B( A% h. F. Wr
w5 a* Z# }% J (1−pe 8 m9 \6 f" Z3 v$ t
t4 w$ o+ z4 J2 c7 ^) _$ {$ _
)
3 p6 f3 l6 Z5 U−r: [( ^# D: p9 K# Q
- `8 D/ ]( D# O. e @9 N$ h$ E
# _9 {% ~/ N" s# B+ b. b, r/ N& A7 m% J7 u0 x$ Y
– 偏度: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)= 0 y0 e7 W6 U# t' z, e0 T
(n
% n( R% Z! H1 Z2 F) h) S H& ]2" n& N# A1 C% Y
+n(1−p)) 2 a1 \- ^9 H6 c7 g1 b- q. U% Y) r0 \
3/26 V' u5 ~* } K; c$ I+ K, ?
2 w0 {+ f' P2 S% s. P
n ; Q6 Z& w; m+ O3 t1 _/ C
3% l+ L, u+ b. z
+3n
" C& Y. n% i/ ~5 o# ]+ k1 l5 y. F21 M# b* @# x6 \$ f. ^6 ^5 u8 k- n
+2n−(3n
7 ]; I5 W) i J9 ?( \: C2 ~# L; `; y/ ?2
! \* }- n6 S/ f7 ~7 b" H +3n)p+np
$ }; B* D# O* x- d6 D4 ~% n2
; {3 ^& ?( B7 \8 M0 R& u
# Q6 x* d* L0 m! S% { 7 D, {3 `; O' r1 p3 E4 T
( Z# P! @0 X; n4 ?8 m p3 e5 c# H3 h4 u' [
e3 C. u7 j ?3 J3 w
– 峰度:k u r t ( X ) = 略 kurt(X) = 略kurt(X)=略 (带入递推公式自行运算)4 N: m5 h1 }% j! J
: ^! s0 @& Q* U3 l: V6 V. g- N
# D, \, }% J% U' X
函数 功能
" h. @9 T& J1 o5 v! p* A( p5 t; _dnbinom(x, size, prob, mu, log = FALSE) 概率密度( c5 w- O& l- w' S6 _
pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度, q6 p' [$ R- j1 I
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数4 ]1 |+ m+ J* N
rnbinom(n, size, prob, mu) 随机数' X+ m& E: R9 C
负二项分布的递推公式如下:69 {" W" E3 o( k2 F
. [; z! P& @! N7 a$ H7 y" w5 B* b. Y" L
. |5 k5 r4 V( t
1 R& T% G$ I U
% p$ `) y# ]6 q A
' P/ w C1 K v( o
, k/ a$ G% `2 s7 v( ]' l4 c/ H( p
$ S- J# h5 f) {! d. K3、帕斯卡分布
! O @9 z; B# |; ?( m7 v/ LX XX服从r , θ r,\thetar,θ的负二项分布,Y YY服从r , θ r,\thetar,θ的帕斯卡分布。有Y = X + r Y = X +rY=X+r。即:在同样的实验中,帕斯卡分布是成功r rr次后实验(成功+失败)的次数,负二项分布是成功r rr次后失败的次数。负二项分布的数字特征推到见博文1。故帕斯卡分布的数字特征可以由负二项分布推出。2 W1 R+ {" ~. Z# _* d, ~
在R语言中我们仍可以使用下面负二项分布的函数做适当调整生成帕斯卡分布。
% _; X* s8 i. s8 Y8 c R注:在百度百科7中还有另一种说法是:3 B2 K6 P9 y, r: B0 p4 N O/ Y: C
% U7 a, V5 Z; x# c
9 i1 S" w5 l/ }3 Q5 k: i帕斯卡分布,负二项分布的正整数形式,描述第n次成功发生在第x次的概率。6 y9 I! C+ ~- @, e% S8 B
! ^9 @6 v# _9 U: X( @
: U( a7 A" l) M) ~. }5 P7 B
我们在课本中见的比较多的是负二项分布的整数形式,这时候课本会标注又称帕斯卡分布,类似于二项分布,负二项分布也可以推广到实数上去定义。大家感兴趣有的可以去自己找资料文献考察一下,这里就不过多的讨论其定义和数字特征的问题了。
% F6 d7 _0 I$ `* O( i# a4 ~: T) u2 R: c3 r/ z7 Q. E# v1 [
9 L8 [3 }) k! b4 I/ s( B/ {/ W
函数 功能
- G4 J, N" a" s% K9 Z. d+ Ldnbinom(x, size, prob, mu, log = FALSE) 概率密度3 R Y$ u- ]2 u# Q6 B7 r) Q
pnbinom(q, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 累计密度6 |6 T! i1 m9 S i
qnbinom (p, size, prob, mu, lower.tail = TRUE, log.p = FALSE) 分位数
, U1 H& h" I grnbinom(n, size, prob, mu) 随机数8 F( |. Y4 p! r, E: V+ u6 }: ]$ L
4、泊松分布
' Z4 v0 u' r' o, z! \– 矩母函数:M ( t ) = e λ ( e t − 1 ) M(t) = e^{\lambda(e^t-1)}M(t)=e
, Y8 w: k/ S9 |1 }, O/ cλ(e 1 A2 ]0 o2 E: W$ {
t
. `' E: y1 _& O( ? −1)
6 s( C" N" ^4 T " i$ E ]' W3 f4 K: N
( K! J6 {8 K. x. C; k# S, X
% y/ y/ ^, Q. G) V1 w- u
– 偏度: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)= . r3 K) o, }& C4 M5 x$ T
(λ
0 t+ ^# w; b. R- A4 J& i24 ]& Y' q1 B/ Y# E$ [ {
+λ)
3 A+ k* Y# |* }" l5 C$ X1 q3/2; O2 X" a! F" }# F
0 u, C% d( g1 ]6 k& ]" Fλ
7 u1 k/ H4 E6 e) `# j, E% a: H3 e3
: I" N# \2 W1 Z4 C" Q +3λ , G( g$ h; M9 g9 I5 H$ M
2
. [! r) I! p9 R2 m +λ
& _6 L$ B5 E' \5 Q
# U9 G _% T$ Q % C* F; X. J1 p2 j) x; P/ `# \
. Q b; t6 I% G' j( F+ P
r+ k) {) R& b
– 峰度: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 O/ [& M" n0 `6 Q" h( K
λ(λ+1)
1 X+ l$ a( u; Z) a4 }2- O, h: {/ w3 Q% e
" ?& ^" D5 q$ X8 C' S4 v* J
λ ' l( D* \. {1 b
35 H; k6 K4 i6 f1 h
+6λ
, G' s, C* Q ` Q2
9 u0 c& F0 V6 t$ q1 I% x) Y& ~4 D/ m +7λ+1. s# q% S& o1 Y x) V4 Y$ H
: ?) w0 f6 V. y5 @9 w - `: W y; T# P2 N
d, B1 [' m- P- T7 Y& c
4 L. f8 y2 T8 D) L- ?: i函数 功能. U# e: `- ?% T" y, e. @) I
dpois(x, lambda, log = FALSE) 概率密度
; J( S7 a( \; S6 j; J9 _6 g. Bppois(q, lambda, lower.tail = TRUE, log.p = FALSE) 累计密度% p2 D1 k1 m0 P, q
qpois(p, lambda, lower.tail = TRUE, log.p = FALSE) 分位数) y/ K! c0 B. E9 ]& k5 |6 P
rpois(n, lambda) 随机数
: v/ E& G! T5 L( Y中心矩的递推公式来自8:3 Z6 n) i, R3 R! q" {4 K1 Z
$ R% v: h8 r% L- h- m% D5 S
) w( I. `+ w9 e* A8 H- p9 J- n# C! B) W. H+ x
7 M& e8 @, k2 y/ t# Y# F* i. t
5、 参考链接7 V8 ~) Y! L" E" `
https://blog.csdn.net/weixin_46111814/article/details/105243202 ↩︎ ↩︎* J5 ?5 \( h$ t- u E7 ?- L, N0 a
) e0 L5 C+ k. \/ @4 V x6 Y3 K4 @" [% B' ?) X& y# M6 M
https://blog.csdn.net/weixin_44602958/article/details/105261188 ↩︎
, p2 t! i4 X+ C# S1 P& k2 M6 N4 X' v( j
& H" q) g5 ]: P4 n4 @
https://blog.csdn.net/STcyclone/article/details/84310450 ↩︎
0 G" b0 O3 }3 A4 i3 V: G2 G
8 e, r$ y; D7 |5 @- P4 p+ e4 H6 S0 E% G; k
https://baike.baidu.com/item/%E5%81%8F%E5%BA%A6 ↩︎, l# s1 g3 k, W4 s, D
. [2 k- p' U0 ]% @, a
6 y, `. x( J! A- v( I
https://max.book118.com/html/2019/0412/6234220152002022.shtm ↩︎
+ a- S+ J/ ]1 n' s) `. E) Z3 n t6 J# J
6 _2 l; w3 S" \/ W8 g2 L$ v朱成莲.关于负二项分布高阶矩的教学注记[J].高教学刊,2017,No.66,103-104+107. ↩︎4 d8 y% a' Y! K+ e! Y8 Z# j/ W) J
- w3 m- X/ A' l( t0 Z
1 q2 E& F. b' k. u3 k( `6 qhttps://baike.baidu.com/item/%E5%B8%95%E6%96%AF%E5%8D%A1%E5%88%86%E5%B8%83/1188907 ↩︎
4 a$ m/ F" J) W- Z2 N, Y: t& }
5 p( _& G: \2 W5 ~& S# f
2 O: Y# n- A0 e5 Vhttps://wenku.baidu.com/view/7f8328c10c22590102029d83.html ↩︎
7 D9 j; J9 j. f Z/ ~/ e, J————————————————
4 s4 t% g: {; v3 R# x版权声明:本文为CSDN博主「统计学小王子」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
6 C* g" l6 B8 w9 i: i原文链接:https://blog.csdn.net/weixin_46111814/article/details/115499487
3 l1 @5 o: A# m
5 C+ L7 _ F) x. E7 K: M! u
) M1 t, r: J: S, g3 ~ |
zan
|