Generar datos

datos = sample(70:100, 1000, replace = TRUE)
datos
##    [1]  76  91  86  88  98  97  92  80  74  96  82  70  85  79  71  78  70  87
##   [19]  73  70  82  86  72  79 100  97  79  95  97  86  79  96  81  92  95  79
##   [37]  88  70  72  92 100 100  88  85  83  89 100  77  72  95  93  92  77  77
##   [55]  99  82  86  93  80  98  72  88  86  96  85  77  99  74  74 100  98  92
##   [73]  90  86  90  70  97  89  76  81  91  99  93  79  85  83  81  87  88  96
##   [91]  72  83  72  74  98  80  99  94  85  81  87  86  73  87  89  74 100  98
##  [109]  99  87  84 100  76  90  73  86  86  75  72  73  86  78  88 100  76  92
##  [127]  93  94  75  79  82  97  79  81  91  91  75  72  70  81  96  98  98  80
##  [145]  94  85  74  90  82  92  70  96  93  95  95  84  72  94  87  97  94  99
##  [163]  83  70  72  96  87  80  84  70  85  78  71  94  87  83  72  99  73  79
##  [181]  83  84  91  99 100  90  85  70  84  80  90  91  72  88  76  70  79  72
##  [199]  71  89  74  75  73  96  94  73  91  89  81  76  75  71  84  99 100  90
##  [217]  81  90  77  81  95  97  99  86  82  83  73  76  82  96  89  72  79  78
##  [235]  81  75  91 100  85  90  81  99  72  74  99  84  80  70  80  87  71  88
##  [253]  91  94  93  70  94  87  93  75 100  88  82  80  70  72  77  98  99  73
##  [271]  89  80  72  93  82  70  88  91  88  94  95  95  93  71  83 100  74  71
##  [289]  75  79  91  94  99  77  99  73  96  83  86  94  72  82  92  87  80  96
##  [307]  73  99  93  85  92  76  85  92 100  90  78  83  89  70  79  78  99  72
##  [325]  85  92  78  77  98  95  90  91  70  83 100  84  94 100  96  90  81 100
##  [343]  89  78  91  84  87  89 100  82  78  93  89  79  72  81  81  77  78  96
##  [361]  73  76  76  76  72  84  91  84  77  70  96  79  95  99  96  79  73  91
##  [379]  83  97  90 100  95  84  97  96  81  98  94  84  86  72  74  95  78  98
##  [397]  99  84  85  87  89 100  89  94  77  74  96  96  99  97  98  75  70  81
##  [415]  98  86  92  97 100  75  78  91  85  78 100  90  89  88  90  75  90  71
##  [433]  81  72  85  70  85  90  81  86  97  99  95  78  93  93  79  99 100  87
##  [451]  78  79  87  91  73  88  97  71  84  96  89  77  81  90  88  74  72  90
##  [469]  83  71  87  89  93  90  85  70  79  84  76  70  97  89 100  99  72  71
##  [487]  72  93  70  84  97  79  98  75  76  98  88  90  72  84  96  72  73  90
##  [505]  81  85  85  81  80  86  86  73 100  73  98  93  81 100  90  78  71  97
##  [523]  83  75  70  85  95  95  92  92  70  97  73  72  72  94  95  76  71  76
##  [541]  76  77  78  97  90  79  93  91  81  93 100  87  95  94  89  74  93  84
##  [559]  95  85  71  78  82  95  84  92  97  74  70  83  93  90  94  71  83  86
##  [577]  90  80  91  77  94  86  81  90  72  98  80  93  77  75  87  92  93  80
##  [595]  89  81  98 100  83  77  93  81  99 100  75  93  77  79  84  83  85  89
##  [613]  76  82  95  79  77  73  80  78  82  94  98  75  93  93  81  95 100  71
##  [631]  77  91  81  97 100  77  74  99  94 100  90  74  82  90  93  72  87  98
##  [649]  77  99  75  98  96  71  95  87  90  76  77  76  75  89  97  93  78  73
##  [667]  99  76  85  87  94  91  95  84  78  87  95  81  85  73  90  92  74  78
##  [685]  97  98  77  78  81  71  86  96  93  99  71  94  75  71  89  85  88 100
##  [703]  96  76 100  94  79  94  74  98  83  99  79  74  74  95  99  76  78  93
##  [721]  92  95  93  97  92  94  93 100  99  90  82  76  89  82  91  95  98 100
##  [739]  91  74  88  89  91  95  81  84  79  80  72  93  97  79  85  99  85  87
##  [757]  81  74  80  74 100 100  99  73  90  95  83  99  90  73  82  88  74  78
##  [775]  76  82  98  87  78  71  97  71  90  71  73  89  88  93  89  93  92  98
##  [793] 100  81  76  78  89  77  77  98  86 100  79  93  73  83  96  96  95  84
##  [811]  89  77  74  80 100  97  99  78  98  76  85  96  98  96  80  96  94  75
##  [829]  97  88  98  76  73  84  79  76  89  90  87  92  71  85  88  77  87  93
##  [847]  94  87  90  91  75  97  93  97  93  90  84  79  71  96  79  96  91  95
##  [865]  84  88  88  96  98  76  84  97  84  90  97  74  85  88  72  95  78  77
##  [883] 100  94  82  84  97  92  92  75  84  87  87  87  74  92  92  88  99  84
##  [901]  94  75  86  97  92  98  85  98  83  90  96  73  81  80  89  98  89  70
##  [919]  80  72  80  88  83  98  82  78  94  95  95  98  71  74  85  93  87  78
##  [937]  89  98  98  75  78  95  80  99  71  96  91  70  79  88  83  93  88  88
##  [955]  96  80  73  86  93  93  83  76  90  88  97  94  81  99  83  79  92  82
##  [973]  80  89  83  71  93  70  81  85  81  80  84  89  97 100  87  92  79  78
##  [991]  83  77 100  79  87  72  74  97  79  79

Ordenar y mostrar los datos

datosOrdenados = sort(datos)
datosOrdenados
##    [1]  70  70  70  70  70  70  70  70  70  70  70  70  70  70  70  70  70  70
##   [19]  70  70  70  70  70  70  70  70  70  70  70  71  71  71  71  71  71  71
##   [37]  71  71  71  71  71  71  71  71  71  71  71  71  71  71  71  71  71  71
##   [55]  71  71  71  72  72  72  72  72  72  72  72  72  72  72  72  72  72  72
##   [73]  72  72  72  72  72  72  72  72  72  72  72  72  72  72  72  72  72  72
##   [91]  72  72  72  73  73  73  73  73  73  73  73  73  73  73  73  73  73  73
##  [109]  73  73  73  73  73  73  73  73  73  73  73  73  73  74  74  74  74  74
##  [127]  74  74  74  74  74  74  74  74  74  74  74  74  74  74  74  74  74  74
##  [145]  74  74  74  74  74  74  75  75  75  75  75  75  75  75  75  75  75  75
##  [163]  75  75  75  75  75  75  75  75  75  75  75  75  76  76  76  76  76  76
##  [181]  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76
##  [199]  76  76  76  76  76  76  77  77  77  77  77  77  77  77  77  77  77  77
##  [217]  77  77  77  77  77  77  77  77  77  77  77  77  77  77  77  77  77  78
##  [235]  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78
##  [253]  78  78  78  78  78  78  78  78  78  78  78  78  78  78  79  79  79  79
##  [271]  79  79  79  79  79  79  79  79  79  79  79  79  79  79  79  79  79  79
##  [289]  79  79  79  79  79  79  79  79  79  79  79  79  79  79  79  80  80  80
##  [307]  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80
##  [325]  80  80  80  80  80  80  81  81  81  81  81  81  81  81  81  81  81  81
##  [343]  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81
##  [361]  81  81  81  81  81  81  81  82  82  82  82  82  82  82  82  82  82  82
##  [379]  82  82  82  82  82  82  82  82  82  82  82  83  83  83  83  83  83  83
##  [397]  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83
##  [415]  83  83  83  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84
##  [433]  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84
##  [451]  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85
##  [469]  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  86  86  86
##  [487]  86  86  86  86  86  86  86  86  86  86  86  86  86  86  86  86  86  86
##  [505]  86  86  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87
##  [523]  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  88
##  [541]  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88
##  [559]  88  88  88  88  88  88  88  88  88  88  88  89  89  89  89  89  89  89
##  [577]  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89
##  [595]  89  89  89  89  89  89  89  89  89  90  90  90  90  90  90  90  90  90
##  [613]  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90
##  [631]  90  90  90  90  90  90  90  90  90  90  90  90  90  90  91  91  91  91
##  [649]  91  91  91  91  91  91  91  91  91  91  91  91  91  91  91  91  91  91
##  [667]  91  91  91  91  91  92  92  92  92  92  92  92  92  92  92  92  92  92
##  [685]  92  92  92  92  92  92  92  92  92  92  92  92  92  92  92  93  93  93
##  [703]  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93
##  [721]  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93
##  [739]  93  93  93  93  93  94  94  94  94  94  94  94  94  94  94  94  94  94
##  [757]  94  94  94  94  94  94  94  94  94  94  94  94  94  94  94  94  94  94
##  [775]  94  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95
##  [793]  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95
##  [811]  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96
##  [829]  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  97  97
##  [847]  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97
##  [865]  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  98  98
##  [883]  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98
##  [901]  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98
##  [919]  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99
##  [937]  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99  99
##  [955]  99  99 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100
##  [973] 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100
##  [991] 100 100 100 100 100 100 100 100 100 100

Encontrar numero de elementos (n)

n = length(datos)
n
## [1] 1000

Valor máximo y mínimo

valorMax = max(datos)
valorMin = min(datos)
valorMax
## [1] 100
valorMin
## [1] 70

Rango y amplitud

rango = range(datos)
rango
## [1]  70 100
amplitud = diff(rango)
amplitud
## [1] 30

Número de clases

numInter = 5

Rango entre cada clase

rangoClases = amplitud / nclass.Sturges(datos)
rangoClases
## [1] 2.727273

Tabla de frecuencia

tabla.intervalos = transform(table(cut(datos, breaks = nclass.Sturges(datos))))
tabla.intervalos
##           Var1 Freq
## 1    (70,72.7]   93
## 2  (72.7,75.5]   81
## 3  (75.5,78.2]   92
## 4  (78.2,80.9]   64
## 5  (80.9,83.6]   87
## 6  (83.6,86.4]   89
## 7  (86.4,89.1]   97
## 8  (89.1,91.8]   68
## 9  (91.8,94.5]  104
## 10 (94.5,97.3]  105
## 11  (97.3,100]  120
plot(tabla.intervalos, main = "¿De cuál intervalo hay más y menos elementos?")

1 + 3.3222* (log10(n))
## [1] 10.9666
pie(tabla.intervalos$Freq, labels = paste(tabla.intervalos$Var1, " - ", tabla.intervalos$Freq), main = "¿De cuál intervalo hay más y menos elementos?. Sturges")