R编程中的超几何分布
R语言中的超几何分布被定义为一种用于计算概率的方法,当进行无放回抽样以获得密度值时。
在 R 中,有 4 个内置函数可以生成超几何分布:
- 超级()
dhyper(x, m, n, k)
- phyper()
phyper(x, m, n, k)
- qhyper()
qhyper(x, m, n, k)
- 超级()
rhyper(N, m, n, k)
在哪里,
x: represents the data set of values
m: size of the population
n: number of samples drawn
k: number of items in the population
N: hypergeometrically distributed values
生成超几何分布的函数
dhyper()函数
它被定义为用于获得密度值的超几何密度分布。
句法:
dhyper(x_dhyper, m, n, k)
示例 1:
# Specify x-values for dhyper function
x_dhyper <- seq(0, 22, by = 1.2)
# Apply dhyper function
y_dhyper <- dhyper(x_dhyper, m = 45, n = 30, k = 20)
# Plot dhyper values
plot(y_dhyper)
输出:
phyper()函数
超几何累积分布函数用于根据超几何分布估计在测试或调试过程开始时程序中最初存在的故障数,并使用相应的值计算 x 中的每个值。
句法:
phyper(x, m, n, k)
示例 1:
# Specify x-values for phyper function
x_phyper <- seq(0, 22, by = 1)
# Apply phyper function
y_phyper <- phyper(x_phyper, m = 40, n = 20, k = 31)
# Plot phyper values
plot(y_phyper)
输出:
qhyper()函数
基本上是 超几何分位数函数用于指定 0 到 1 之间的概率序列。
句法:
qhyper(x, m, n, k)
示例 1:
# Specify x-values for qhyper function
x_qhyper <- seq(0, 1, by = 0.02)
# Apply qhyper function
y_qhyper <- qhyper(x_qhyper, m = 49, n = 18, k = 30)
# Plot qhyper values
plot(y_qhyper)
输出:
rhyper()函数
它一般是指通过指定种子和样本大小来生成随机数函数。
句法:
rhyper(x, m, n, k)
示例 1:
# Set seed for reproducibility
# Specify sample size
set.seed(400)
N <- 10000
# Draw N hypergeometrically distributed values
y_rhyper <- rhyper(N, m = 50, n = 20, k = 30)
y_rhyper
# Plot of randomly drawn hyper density
hist(y_rhyper,
breaks = 50,
main = "")
输出 :