태그 : rBasicLearning

이항 분포의 그래프 만들기

표가 나올 확률이 0.8인 동전을 3회 던졌을 때의 이항 분포 그래프

그래프화

x <- 0:3
n <- 3
p <- 0.8
plot(x, dbinom(x,n,p))
plot(x, dbinom(x,n,p), type="h")

이항 분포 공식

이항 분포의 정의식은

$$f(x) = {}_n\mathrm{C} _r\cdot p^x\cdot (1 - p)^{n - x}$$

$n = 3$, $p = 0.8$보다
$$f(x) = {}_3\mathrm{C} _r\cdot (0.8)^x\cdot (1 - 0.8)^{3 - x}$$
이것보다,

$f(0) = 1\cdot1\cdot(0.2)^3 = 0.008$
$f(1) = 3\cdot0.8\cdot(0.2)^2 = 0.096$
$f(2) = 3\cdot(0.8)^2\cdot0.2 = 0.384$
$f(3) = 1\cdot(0.8)^3\cdot1 = 0.512$