Distribución Hipergeométrica en Programación R

La distribución hipergeométrica en lenguaje R se define como un método que se utiliza para calcular probabilidades cuando se debe realizar un muestreo sin reemplazo para obtener el valor de densidad.

En R, hay 4 funciones integradas para generar una distribución hipergeométrica:

• hiperactivo()

  dhyper(x, m, n, k)

• phyper()

  phyper(x, m, n, k)

• qhiper()

  qhyper(x, m, n, k)

• hiperactivo()

  rhyper(N, m, n, k)

dónde,

x: representa el conjunto de datos de valores
m: tamaño de la población
n: número de muestras extraídas
k: número de elementos en la población
N: valores distribuidos hipergeométricamente

Funciones para generar distribución hipergeométrica

Función dhyper()

Se define como la distribución de densidad hipergeométrica utilizada para obtener el valor de densidad.

Sintaxis:

dhyper(x_dhyper, m, n, k)

Ejemplo 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) 

Producción:

Función phyper()

Función de distribución acumulativa hipergeométrica utilizada para estimar el número de fallas inicialmente residentes en un programa al comienzo del proceso de prueba o depuración en función de la distribución hipergeométrica y calcular cada valor en x utilizando los valores correspondientes.

Sintaxis:

phyper(x, m, n, k)

Ejemplo 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)  

Producción:

Función qhyper()

Es básicamente una función hipergeométrica de cuantiles utilizada para especificar una secuencia de probabilidades entre 0 y 1.

Sintaxis:

qhyper(x, m, n, k)

Ejemplo 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)

Producción:

Función rhyper()

Generalmente se refiere a generar una función de números aleatorios especificando una semilla y un tamaño de muestra.

Sintaxis:

rhyper(x, m, n, k)

Ejemplo 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 = "")

Producción :