V
var.test() {stats}
Realiza una prueba F para comparar las varianzas de dos muestras de poblaciones normales |
|
# Datos aleatorios
x <- rnorm(50, mean = 0, sd = 2)
y <- rnorm(30, mean = 1, sd = 1)
# var.test()
var.test(x = x,
y = y,
alternative = "t") # Prueba bilateral
##
## F test to compare two variances
##
## data: x and y
## F = 5.5101, num df = 49, denom df = 29, p-value = 5.45e-06
## alternative hypothesis: true ratio of variances is not equal to 1
## 95 percent confidence interval:
## 2.768398 10.366780
## sample estimates:
## ratio of variances
## 5.510093
var.test(x, y, alternative = "g") # Prueba unilateral por derecha
##
## F test to compare two variances
##
## data: x and y
## F = 5.5101, num df = 49, denom df = 29, p-value = 2.725e-06
## alternative hypothesis: true ratio of variances is greater than 1
## 95 percent confidence interval:
## 3.100109 Inf
## sample estimates:
## ratio of variances
## 5.510093
var.test(x, y, alternative = "t") # Prueba unilateral por izquierda
##
## F test to compare two variances
##
## data: x and y
## F = 5.5101, num df = 49, denom df = 29, p-value = 5.45e-06
## alternative hypothesis: true ratio of variances is not equal to 1
## 95 percent confidence interval:
## 2.768398 10.366780
## sample estimates:
## ratio of variances
## 5.510093