5-6. Exponential Distribution

指数分布

1. Exponential Distribution from Gamma Distribution

The exponential distribution is one of the widely used continuous distributions. It is often used to model the time elapsed between events.

다음은 지수분포의 확률밀도함수 입니다,

지수분포(Exponential Distribution)는 확률밀도함수가 지수적으로 감소하는 확률분포이다.

2. Expected Value and Variance of Exponential Distribution

Expected Value and Variance of Exponential Distribution

Or.

[ Solution ]

library(Rstat)

# 모수 설정 및 함수 실행 : cont.mpdf()
lamb <- 1:5
cont.mpdf("exp", 0, 3, para=lamb, ymax=5)

지수분포의 비기억(memoryless) 특성

EXAMPLE 31. 평균 수명이 10년인 지수분포를 따르는 제품을 5년간 고장없이 사용했을 때 앞으로 3년 더 고장없이 작동할 확률을 구하시오.

[ Solution ]

library(Rstat)

theta <- 10; lamb <- 1/theta

# Conditional Prob., lower = FALSE
pexp(5+3, lamb, lower=FALSE) / pexp(5, labm, lower=FALSE)

# memoryless 
pexp(3, lamb, lower=FALSE)

EXAMPLE 32. 평균수명이 10,000 시간인 지수분포를 따르는 시스템에 대하여 90%의 확률로 고장 없이 작동할 시간을 구하시오.

[ Solution ]

library(Rstat)

theta <- 10000; lamb <- 1/theta

# 누적확률이 1-0.9인 분위수 게산
qexp(1-0.9, labm)

[ Solution ]

library(Rstat)

# 해를 구하는 함수 정의
lamb <- function(r) pexp(10000, r, lower=F) - 0.9

# 함수 값이 0이 되는 해 찾기 : uniroot(), 범위 0~1, 오차한계 1E-10
uniroot(lamb, c(0,1), tol=1E-10)[[1]]

3. Poisson Distribution and Exponential Distribution

이 지수 분포는 '포아송 분포'와 매우 깊은 연관이 있다.

누적분포함수를 미분하면 확률질량함수가 되므로 다음과 같이 변형시킬 수 있다.

EXAMPLE 34. 고장횟수가 포아송 분포를 따르는 어떤 기계는 1개월에 평균 3번 고장이 난다. 이 기계가 고장이 나서 고친 후 2개월 내에는 다시 고장나지 않을 확률을 구하라.

[ Solution ]

4. Exponential Distribution and Geometric Distribution

이것은 직관적으로 생각할 수 있다.

지금까지 우리가 배웠던 확률분포의 관계를 종합해보면 다음과 같다.

Last updated