Simulacion estadistica del coeficiente de variacion de Pearson con R-Project
x1 <- c(rep(10,5),rep(25,5),rep(35,6),rep(45,10),rep(55,38)
,rep(65,30) ,rep(75,20),rep(85,4),rep(95,2));
cvp <- function(x) {
ni<- table(x);
n<-sum(ni);
m1<- mean(x);
s1 <-sd(x)*sqrt((n-1)/n);
cv<- s1/abs(m1);
cv
}
cvp(x1)
[1] 12.52664
Comentarios recientes