←戻る

二項分布のグラフ / Graph of Binomial Distribution

第1種の過誤・第2種の過誤の部分に色を付けたもの。

A graph of binomial distribution with colors on type-I and -II errors.

par(mfrow=c(2,1))

n <- 10
k <- 8
p0 <- 0.5
p <- 0.8

x <- 0:n
d <- c(rep(0, k), rep(50, n-k+1))
a <- dbinom(x, size=n, prob=p0)
barplot(a, names.arg=x, density=d, xlab="x", ylab="P(x)", ylim=c(0, 0.3))

d <- c(rep(50, k), rep(0, n-k+1))
a <- dbinom(x, size=n, prob=p)
barplot(a, names.arg=x, density=d, xlab="x", ylab="P(x)", ylim=c(0, 0.3))