100 numeros aleatorios del 15 al 50

datos=sample(15:50, size=100, replace= TRUE, prob= NULL )
datos
##   [1] 38 24 37 32 19 20 40 48 45 30 33 33 40 43 50 17 30 24 25 27 20 31 49
##  [24] 33 34 39 17 15 48 40 15 19 30 27 19 24 35 15 46 24 24 28 50 27 19 17
##  [47] 16 37 18 35 32 16 30 18 22 49 47 33 21 29 15 31 18 34 26 32 22 22 37
##  [70] 21 27 47 43 44 22 48 23 39 20 22 37 22 47 18 39 30 36 28 48 43 31 15
##  [93] 32 41 34 45 20 48 20 46

Mediana y med

## [1] 30
## [1] 30.76

Maximo y minimo

max(datos)
## [1] 50
min(datos)
## [1] 15

frecuencia

table(datos)
## datos
## 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 
##  5  2  3  4  4  5  2  6  1  5  1  1  4  2  1  5  3  4  4  3  2  1  4  1  3 
## 40 41 43 44 45 46 47 48 49 50 
##  3  1  3  1  2  2  3  5  2  2

datos

plot(datos)