poblacion<-rexp(2000)
#muestra de tamaño 20 m20<-sample(poblacion, size=20) #muestra de tamaño 50 m50<-sample(poblacion, size=50) #muestra de tamaño 100 m100<-sample(poblacion, size=100) #muestra de tamaño 1000 m1000<-sample(poblacion, size=1000)