Wilcoxon_test_media.R

# Comparación una media con un valor teórico, suma de rangos de Wilcoxon
# Prueba no paramétrica
set.seed(10)
x <- rnorm(100,10)
Media <- 10

test <- wilcox.test(x, mu=Media)

print(test)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  x
## V = 2128, p-value = 0.1728
## alternative hypothesis: true location is not equal to 10