21/02/20

Identificar datos de la muestra

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

Ordenar datos y mostrar

muestraord <- sort(muestra)
muestraord
##    [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  70  70  70  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  71  71  71  71  71  71  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  73  73
##   [91]  73  73  73  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  73  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  74  74  75  75  75  75  75  75  75  75  75  75
##  [163]  75  75  75  75  75  75  75  75  75  75  75  75  75  75  75  75  75  75
##  [181]  75  75  75  75  75  75  75  76  76  76  76  76  76  76  76  76  76  76
##  [199]  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76  76
##  [217]  76  76  76  76  77  77  77  77  77  77  77  77  77  77  77  77  77  77
##  [235]  77  77  77  77  77  77  77  77  77  77  77  77  77  77  77  77  78  78
##  [253]  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78
##  [271]  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78  78
##  [289]  78  78  78  79  79  79  79  79  79  79  79  79  79  79  79  79  79  79
##  [307]  79  79  79  79  79  79  79  79  79  79  79  79  80  80  80  80  80  80
##  [325]  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80  80
##  [343]  80  80  80  80  80  81  81  81  81  81  81  81  81  81  81  81  81  81
##  [361]  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81  81
##  [379]  81  81  81  82  82  82  82  82  82  82  82  82  82  82  82  82  82  82
##  [397]  82  82  82  82  82  82  82  82  82  82  82  82  82  82  82  82  82  82
##  [415]  82  82  82  82  82  82  83  83  83  83  83  83  83  83  83  83  83  83
##  [433]  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83  83
##  [451]  83  83  83  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84
##  [469]  84  84  84  84  84  84  84  84  84  84  84  84  84  84  84  85  85  85
##  [487]  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85
##  [505]  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85  85
##  [523]  85  85  85  86  86  86  86  86  86  86  86  86  86  86  86  86  86  86
##  [541]  86  86  86  86  86  86  86  86  86  86  86  86  86  86  86  87  87  87
##  [559]  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87
##  [577]  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  87  88  88
##  [595]  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88
##  [613]  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  88  89  89
##  [631]  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89  89
##  [649]  89  89  89  89  89  89  89  89  89  89  89  89  89  90  90  90  90  90
##  [667]  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90  90
##  [685]  90  90  90  90  90  91  91  91  91  91  91  91  91  91  91  91  91  91
##  [703]  91  91  91  91  91  91  91  91  91  91  91  92  92  92  92  92  92  92
##  [721]  92  92  92  92  92  92  92  92  92  92  92  92  92  92  92  92  92  92
##  [739]  92  92  92  92  92  92  92  92  92  93  93  93  93  93  93  93  93  93
##  [757]  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93  93
##  [775]  93  93  93  93  94  94  94  94  94  94  94  94  94  94  94  94  94  94
##  [793]  94  94  94  94  94  94  95  95  95  95  95  95  95  95  95  95  95  95
##  [811]  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95
##  [829]  95  95  95  95  95  95  95  95  95  95  95  95  95  95  95  96  96  96
##  [847]  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96  96
##  [865]  96  96  96  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97
##  [883]  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97  97
##  [901]  97  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98  98
##  [919]  98  98  98  98  98  98  98  98  98  98  98  98  98  98  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  99  99  99  99  99  99 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 número de elementos n, valores máximos y míximos , rango y amplitud del rango de la muestra

n <- length(muestra)
n
## [1] 1000
max(muestra)
## [1] 100
min(muestra)
## [1] 70
rango <- range(muestra) # Valores maximo y minimo
rango
## [1]  70 100
amplitud <- diff(rango) # amplitud del rango. Tambien es max(muestra) - min(muestra)
amplitud
## [1] 30

FORMA HABITUAL PARA AGRUPAR DATOS

¿Cuántos intérvalos se quiere tener? ¿Cuántos grupos?]

Determinar número de intervalos igual a 5

nointervalos <- 5
rangointervalos <- amplitud / nointervalos
rangointervalos
## [1] 6

Mostrar tabla de frecuencia de datos agrupados

tabla.intervalos <- transform(table(cut(muestra, breaks = 5)))
tabla.intervalos
##       Var1 Freq
## 1  (70,76]  220
## 2  (76,82]  200
## 3  (82,88]  208
## 4  (88,94]  170
## 5 (94,100]  202

Plot o graficar tabla de frecuencia

plot(tabla.intervalos, main = "¿De cuál intervalo hay más y menos elementos?")

REGLA DE STURGES.

1 + 3.3222* (log10(n))
## [1] 10.9666
nointervalos <- nclass.Sturges(muestra) 
nointervalos
## [1] 11
cut(muestra, breaks = nointervalos) 
##    [1] (80.9,83.6] (86.4,89.1] (75.5,78.2] (70,72.7]   (80.9,83.6] (80.9,83.6]
##    [7] (78.2,80.9] (70,72.7]   (72.7,75.5] (72.7,75.5] (70,72.7]   (70,72.7]  
##   [13] (97.3,100]  (72.7,75.5] (70,72.7]   (94.5,97.3] (86.4,89.1] (86.4,89.1]
##   [19] (94.5,97.3] (70,72.7]   (97.3,100]  (89.1,91.8] (83.6,86.4] (89.1,91.8]
##   [25] (89.1,91.8] (89.1,91.8] (97.3,100]  (97.3,100]  (70,72.7]   (72.7,75.5]
##   [31] (94.5,97.3] (91.8,94.5] (75.5,78.2] (70,72.7]   (72.7,75.5] (72.7,75.5]
##   [37] (97.3,100]  (97.3,100]  (89.1,91.8] (97.3,100]  (83.6,86.4] (91.8,94.5]
##   [43] (72.7,75.5] (86.4,89.1] (89.1,91.8] (86.4,89.1] (70,72.7]   (83.6,86.4]
##   [49] (91.8,94.5] (97.3,100]  (83.6,86.4] (80.9,83.6] (83.6,86.4] (94.5,97.3]
##   [55] (70,72.7]   (97.3,100]  (91.8,94.5] (83.6,86.4] (86.4,89.1] (78.2,80.9]
##   [61] (97.3,100]  (70,72.7]   (72.7,75.5] (75.5,78.2] (83.6,86.4] (70,72.7]  
##   [67] (83.6,86.4] (78.2,80.9] (94.5,97.3] (72.7,75.5] (89.1,91.8] (80.9,83.6]
##   [73] (83.6,86.4] (97.3,100]  (75.5,78.2] (94.5,97.3] (83.6,86.4] (83.6,86.4]
##   [79] (78.2,80.9] (70,72.7]   (83.6,86.4] (86.4,89.1] (86.4,89.1] (80.9,83.6]
##   [85] (70,72.7]   (78.2,80.9] (91.8,94.5] (78.2,80.9] (72.7,75.5] (97.3,100] 
##   [91] (94.5,97.3] (86.4,89.1] (75.5,78.2] (70,72.7]   (80.9,83.6] (75.5,78.2]
##   [97] (75.5,78.2] (75.5,78.2] (89.1,91.8] (91.8,94.5] (86.4,89.1] (80.9,83.6]
##  [103] (72.7,75.5] (75.5,78.2] (83.6,86.4] (70,72.7]   (83.6,86.4] (94.5,97.3]
##  [109] (97.3,100]  (78.2,80.9] (97.3,100]  (91.8,94.5] (83.6,86.4] (75.5,78.2]
##  [115] (86.4,89.1] (94.5,97.3] (70,72.7]   (75.5,78.2] (75.5,78.2] (78.2,80.9]
##  [121] (91.8,94.5] (94.5,97.3] (78.2,80.9] (80.9,83.6] (80.9,83.6] (97.3,100] 
##  [127] (75.5,78.2] (83.6,86.4] (89.1,91.8] (97.3,100]  (94.5,97.3] (78.2,80.9]
##  [133] (97.3,100]  (72.7,75.5] (97.3,100]  (75.5,78.2] (86.4,89.1] (94.5,97.3]
##  [139] (86.4,89.1] (89.1,91.8] (83.6,86.4] (78.2,80.9] (75.5,78.2] (86.4,89.1]
##  [145] (72.7,75.5] (83.6,86.4] (83.6,86.4] (72.7,75.5] (94.5,97.3] (97.3,100] 
##  [151] (72.7,75.5] (89.1,91.8] (91.8,94.5] (83.6,86.4] (94.5,97.3] (94.5,97.3]
##  [157] (97.3,100]  (86.4,89.1] (97.3,100]  (70,72.7]   (78.2,80.9] (83.6,86.4]
##  [163] (94.5,97.3] (80.9,83.6] (80.9,83.6] (94.5,97.3] (80.9,83.6] (83.6,86.4]
##  [169] (70,72.7]   (97.3,100]  (72.7,75.5] (75.5,78.2] (80.9,83.6] (89.1,91.8]
##  [175] (83.6,86.4] (86.4,89.1] (94.5,97.3] (72.7,75.5] (83.6,86.4] (80.9,83.6]
##  [181] (72.7,75.5] (97.3,100]  (83.6,86.4] (94.5,97.3] (97.3,100]  (86.4,89.1]
##  [187] (80.9,83.6] (91.8,94.5] (83.6,86.4] (70,72.7]   (80.9,83.6] (78.2,80.9]
##  [193] (80.9,83.6] (91.8,94.5] (83.6,86.4] (78.2,80.9] (80.9,83.6] (75.5,78.2]
##  [199] (83.6,86.4] (80.9,83.6] (91.8,94.5] (72.7,75.5] (75.5,78.2] (91.8,94.5]
##  [205] (97.3,100]  (70,72.7]   (91.8,94.5] (86.4,89.1] (72.7,75.5] (72.7,75.5]
##  [211] (86.4,89.1] (72.7,75.5] (91.8,94.5] (86.4,89.1] (80.9,83.6] (94.5,97.3]
##  [217] (89.1,91.8] (83.6,86.4] (70,72.7]   (89.1,91.8] (75.5,78.2] (86.4,89.1]
##  [223] (80.9,83.6] (75.5,78.2] (78.2,80.9] (86.4,89.1] (91.8,94.5] (86.4,89.1]
##  [229] (83.6,86.4] (86.4,89.1] (97.3,100]  (97.3,100]  (75.5,78.2] (86.4,89.1]
##  [235] (91.8,94.5] (91.8,94.5] (86.4,89.1] (94.5,97.3] (75.5,78.2] (80.9,83.6]
##  [241] (70,72.7]   (75.5,78.2] (80.9,83.6] (94.5,97.3] (75.5,78.2] (70,72.7]  
##  [247] (70,72.7]   (91.8,94.5] (83.6,86.4] (91.8,94.5] (91.8,94.5] (80.9,83.6]
##  [253] (70,72.7]   (94.5,97.3] (86.4,89.1] (75.5,78.2] (78.2,80.9] (86.4,89.1]
##  [259] (83.6,86.4] (83.6,86.4] (91.8,94.5] (94.5,97.3] (94.5,97.3] (91.8,94.5]
##  [265] (70,72.7]   (91.8,94.5] (72.7,75.5] (83.6,86.4] (75.5,78.2] (72.7,75.5]
##  [271] (86.4,89.1] (83.6,86.4] (91.8,94.5] (78.2,80.9] (72.7,75.5] (94.5,97.3]
##  [277] (78.2,80.9] (89.1,91.8] (94.5,97.3] (94.5,97.3] (89.1,91.8] (72.7,75.5]
##  [283] (80.9,83.6] (72.7,75.5] (86.4,89.1] (86.4,89.1] (75.5,78.2] (75.5,78.2]
##  [289] (80.9,83.6] (70,72.7]   (80.9,83.6] (97.3,100]  (86.4,89.1] (70,72.7]  
##  [295] (78.2,80.9] (86.4,89.1] (72.7,75.5] (72.7,75.5] (91.8,94.5] (97.3,100] 
##  [301] (70,72.7]   (97.3,100]  (72.7,75.5] (86.4,89.1] (97.3,100]  (70,72.7]  
##  [307] (70,72.7]   (94.5,97.3] (91.8,94.5] (94.5,97.3] (75.5,78.2] (94.5,97.3]
##  [313] (75.5,78.2] (83.6,86.4] (80.9,83.6] (75.5,78.2] (94.5,97.3] (97.3,100] 
##  [319] (78.2,80.9] (97.3,100]  (97.3,100]  (80.9,83.6] (83.6,86.4] (83.6,86.4]
##  [325] (75.5,78.2] (86.4,89.1] (83.6,86.4] (91.8,94.5] (83.6,86.4] (86.4,89.1]
##  [331] (72.7,75.5] (91.8,94.5] (97.3,100]  (75.5,78.2] (91.8,94.5] (70,72.7]  
##  [337] (80.9,83.6] (97.3,100]  (83.6,86.4] (97.3,100]  (97.3,100]  (72.7,75.5]
##  [343] (94.5,97.3] (75.5,78.2] (72.7,75.5] (83.6,86.4] (86.4,89.1] (97.3,100] 
##  [349] (86.4,89.1] (94.5,97.3] (70,72.7]   (86.4,89.1] (72.7,75.5] (75.5,78.2]
##  [355] (83.6,86.4] (72.7,75.5] (72.7,75.5] (70,72.7]   (78.2,80.9] (97.3,100] 
##  [361] (75.5,78.2] (80.9,83.6] (80.9,83.6] (91.8,94.5] (80.9,83.6] (78.2,80.9]
##  [367] (75.5,78.2] (83.6,86.4] (94.5,97.3] (97.3,100]  (91.8,94.5] (70,72.7]  
##  [373] (89.1,91.8] (75.5,78.2] (94.5,97.3] (94.5,97.3] (75.5,78.2] (83.6,86.4]
##  [379] (89.1,91.8] (70,72.7]   (86.4,89.1] (80.9,83.6] (70,72.7]   (72.7,75.5]
##  [385] (78.2,80.9] (70,72.7]   (94.5,97.3] (94.5,97.3] (78.2,80.9] (80.9,83.6]
##  [391] (70,72.7]   (75.5,78.2] (72.7,75.5] (86.4,89.1] (75.5,78.2] (91.8,94.5]
##  [397] (91.8,94.5] (70,72.7]   (89.1,91.8] (78.2,80.9] (86.4,89.1] (89.1,91.8]
##  [403] (94.5,97.3] (72.7,75.5] (80.9,83.6] (86.4,89.1] (91.8,94.5] (80.9,83.6]
##  [409] (86.4,89.1] (72.7,75.5] (97.3,100]  (86.4,89.1] (75.5,78.2] (75.5,78.2]
##  [415] (91.8,94.5] (80.9,83.6] (83.6,86.4] (91.8,94.5] (91.8,94.5] (70,72.7]  
##  [421] (72.7,75.5] (94.5,97.3] (86.4,89.1] (70,72.7]   (83.6,86.4] (80.9,83.6]
##  [427] (70,72.7]   (97.3,100]  (86.4,89.1] (94.5,97.3] (89.1,91.8] (97.3,100] 
##  [433] (80.9,83.6] (86.4,89.1] (75.5,78.2] (89.1,91.8] (80.9,83.6] (80.9,83.6]
##  [439] (80.9,83.6] (75.5,78.2] (72.7,75.5] (89.1,91.8] (72.7,75.5] (91.8,94.5]
##  [445] (72.7,75.5] (94.5,97.3] (97.3,100]  (97.3,100]  (97.3,100]  (72.7,75.5]
##  [451] (97.3,100]  (94.5,97.3] (80.9,83.6] (72.7,75.5] (94.5,97.3] (97.3,100] 
##  [457] (72.7,75.5] (86.4,89.1] (97.3,100]  (83.6,86.4] (91.8,94.5] (72.7,75.5]
##  [463] (80.9,83.6] (97.3,100]  (80.9,83.6] (80.9,83.6] (80.9,83.6] (72.7,75.5]
##  [469] (72.7,75.5] (94.5,97.3] (78.2,80.9] (80.9,83.6] (97.3,100]  (72.7,75.5]
##  [475] (72.7,75.5] (94.5,97.3] (86.4,89.1] (80.9,83.6] (91.8,94.5] (70,72.7]  
##  [481] (72.7,75.5] (97.3,100]  (70,72.7]   (72.7,75.5] (94.5,97.3] (72.7,75.5]
##  [487] (78.2,80.9] (97.3,100]  (97.3,100]  (70,72.7]   (91.8,94.5] (89.1,91.8]
##  [493] (72.7,75.5] (80.9,83.6] (94.5,97.3] (97.3,100]  (86.4,89.1] (80.9,83.6]
##  [499] (83.6,86.4] (70,72.7]   (94.5,97.3] (86.4,89.1] (91.8,94.5] (70,72.7]  
##  [505] (97.3,100]  (80.9,83.6] (94.5,97.3] (70,72.7]   (83.6,86.4] (83.6,86.4]
##  [511] (97.3,100]  (80.9,83.6] (80.9,83.6] (75.5,78.2] (83.6,86.4] (75.5,78.2]
##  [517] (80.9,83.6] (86.4,89.1] (97.3,100]  (75.5,78.2] (72.7,75.5] (75.5,78.2]
##  [523] (94.5,97.3] (97.3,100]  (70,72.7]   (78.2,80.9] (86.4,89.1] (94.5,97.3]
##  [529] (86.4,89.1] (75.5,78.2] (97.3,100]  (72.7,75.5] (80.9,83.6] (89.1,91.8]
##  [535] (91.8,94.5] (83.6,86.4] (75.5,78.2] (91.8,94.5] (89.1,91.8] (75.5,78.2]
##  [541] (86.4,89.1] (72.7,75.5] (89.1,91.8] (86.4,89.1] (75.5,78.2] (91.8,94.5]
##  [547] (80.9,83.6] (89.1,91.8] (72.7,75.5] (72.7,75.5] (83.6,86.4] (70,72.7]  
##  [553] (83.6,86.4] (89.1,91.8] (75.5,78.2] (78.2,80.9] (97.3,100]  (75.5,78.2]
##  [559] (83.6,86.4] (72.7,75.5] (80.9,83.6] (78.2,80.9] (75.5,78.2] (70,72.7]  
##  [565] (91.8,94.5] (72.7,75.5] (94.5,97.3] (94.5,97.3] (86.4,89.1] (78.2,80.9]
##  [571] (86.4,89.1] (75.5,78.2] (70,72.7]   (75.5,78.2] (94.5,97.3] (83.6,86.4]
##  [577] (83.6,86.4] (70,72.7]   (94.5,97.3] (80.9,83.6] (80.9,83.6] (75.5,78.2]
##  [583] (70,72.7]   (97.3,100]  (97.3,100]  (78.2,80.9] (75.5,78.2] (72.7,75.5]
##  [589] (86.4,89.1] (97.3,100]  (91.8,94.5] (86.4,89.1] (86.4,89.1] (75.5,78.2]
##  [595] (83.6,86.4] (70,72.7]   (86.4,89.1] (91.8,94.5] (70,72.7]   (94.5,97.3]
##  [601] (80.9,83.6] (91.8,94.5] (97.3,100]  (89.1,91.8] (97.3,100]  (80.9,83.6]
##  [607] (75.5,78.2] (97.3,100]  (86.4,89.1] (86.4,89.1] (83.6,86.4] (83.6,86.4]
##  [613] (83.6,86.4] (97.3,100]  (91.8,94.5] (75.5,78.2] (83.6,86.4] (91.8,94.5]
##  [619] (89.1,91.8] (75.5,78.2] (86.4,89.1] (80.9,83.6] (86.4,89.1] (80.9,83.6]
##  [625] (78.2,80.9] (70,72.7]   (97.3,100]  (94.5,97.3] (80.9,83.6] (86.4,89.1]
##  [631] (83.6,86.4] (83.6,86.4] (80.9,83.6] (72.7,75.5] (75.5,78.2] (94.5,97.3]
##  [637] (80.9,83.6] (86.4,89.1] (91.8,94.5] (86.4,89.1] (78.2,80.9] (83.6,86.4]
##  [643] (97.3,100]  (86.4,89.1] (86.4,89.1] (97.3,100]  (72.7,75.5] (91.8,94.5]
##  [649] (80.9,83.6] (89.1,91.8] (80.9,83.6] (72.7,75.5] (91.8,94.5] (80.9,83.6]
##  [655] (89.1,91.8] (94.5,97.3] (75.5,78.2] (72.7,75.5] (91.8,94.5] (72.7,75.5]
##  [661] (83.6,86.4] (83.6,86.4] (72.7,75.5] (89.1,91.8] (86.4,89.1] (94.5,97.3]
##  [667] (89.1,91.8] (70,72.7]   (72.7,75.5] (86.4,89.1] (86.4,89.1] (72.7,75.5]
##  [673] (75.5,78.2] (94.5,97.3] (72.7,75.5] (75.5,78.2] (75.5,78.2] (83.6,86.4]
##  [679] (72.7,75.5] (75.5,78.2] (75.5,78.2] (94.5,97.3] (97.3,100]  (89.1,91.8]
##  [685] (97.3,100]  (80.9,83.6] (83.6,86.4] (97.3,100]  (94.5,97.3] (72.7,75.5]
##  [691] (75.5,78.2] (89.1,91.8] (83.6,86.4] (86.4,89.1] (89.1,91.8] (94.5,97.3]
##  [697] (78.2,80.9] (94.5,97.3] (97.3,100]  (94.5,97.3] (70,72.7]   (70,72.7]  
##  [703] (83.6,86.4] (78.2,80.9] (78.2,80.9] (78.2,80.9] (80.9,83.6] (72.7,75.5]
##  [709] (86.4,89.1] (80.9,83.6] (91.8,94.5] (75.5,78.2] (75.5,78.2] (80.9,83.6]
##  [715] (89.1,91.8] (91.8,94.5] (75.5,78.2] (97.3,100]  (70,72.7]   (94.5,97.3]
##  [721] (75.5,78.2] (91.8,94.5] (80.9,83.6] (83.6,86.4] (70,72.7]   (80.9,83.6]
##  [727] (86.4,89.1] (75.5,78.2] (70,72.7]   (94.5,97.3] (86.4,89.1] (91.8,94.5]
##  [733] (91.8,94.5] (94.5,97.3] (94.5,97.3] (72.7,75.5] (94.5,97.3] (70,72.7]  
##  [739] (97.3,100]  (94.5,97.3] (86.4,89.1] (78.2,80.9] (94.5,97.3] (94.5,97.3]
##  [745] (83.6,86.4] (97.3,100]  (83.6,86.4] (78.2,80.9] (94.5,97.3] (86.4,89.1]
##  [751] (94.5,97.3] (75.5,78.2] (86.4,89.1] (72.7,75.5] (75.5,78.2] (80.9,83.6]
##  [757] (83.6,86.4] (83.6,86.4] (89.1,91.8] (91.8,94.5] (70,72.7]   (86.4,89.1]
##  [763] (86.4,89.1] (97.3,100]  (83.6,86.4] (83.6,86.4] (70,72.7]   (83.6,86.4]
##  [769] (75.5,78.2] (97.3,100]  (89.1,91.8] (78.2,80.9] (80.9,83.6] (86.4,89.1]
##  [775] (72.7,75.5] (83.6,86.4] (72.7,75.5] (70,72.7]   (80.9,83.6] (91.8,94.5]
##  [781] (91.8,94.5] (80.9,83.6] (70,72.7]   (89.1,91.8] (80.9,83.6] (86.4,89.1]
##  [787] (75.5,78.2] (75.5,78.2] (78.2,80.9] (80.9,83.6] (91.8,94.5] (94.5,97.3]
##  [793] (86.4,89.1] (72.7,75.5] (70,72.7]   (83.6,86.4] (75.5,78.2] (91.8,94.5]
##  [799] (78.2,80.9] (72.7,75.5] (70,72.7]   (80.9,83.6] (91.8,94.5] (89.1,91.8]
##  [805] (78.2,80.9] (89.1,91.8] (80.9,83.6] (83.6,86.4] (97.3,100]  (89.1,91.8]
##  [811] (94.5,97.3] (72.7,75.5] (83.6,86.4] (94.5,97.3] (72.7,75.5] (94.5,97.3]
##  [817] (72.7,75.5] (94.5,97.3] (97.3,100]  (78.2,80.9] (91.8,94.5] (75.5,78.2]
##  [823] (80.9,83.6] (80.9,83.6] (89.1,91.8] (97.3,100]  (75.5,78.2] (97.3,100] 
##  [829] (94.5,97.3] (70,72.7]   (80.9,83.6] (75.5,78.2] (91.8,94.5] (78.2,80.9]
##  [835] (70,72.7]   (83.6,86.4] (70,72.7]   (75.5,78.2] (80.9,83.6] (86.4,89.1]
##  [841] (86.4,89.1] (94.5,97.3] (97.3,100]  (86.4,89.1] (80.9,83.6] (86.4,89.1]
##  [847] (91.8,94.5] (70,72.7]   (72.7,75.5] (91.8,94.5] (75.5,78.2] (72.7,75.5]
##  [853] (83.6,86.4] (80.9,83.6] (97.3,100]  (80.9,83.6] (80.9,83.6] (78.2,80.9]
##  [859] (91.8,94.5] (70,72.7]   (86.4,89.1] (72.7,75.5] (83.6,86.4] (91.8,94.5]
##  [865] (89.1,91.8] (75.5,78.2] (75.5,78.2] (89.1,91.8] (97.3,100]  (70,72.7]  
##  [871] (78.2,80.9] (70,72.7]   (80.9,83.6] (91.8,94.5] (75.5,78.2] (91.8,94.5]
##  [877] (70,72.7]   (72.7,75.5] (75.5,78.2] (72.7,75.5] (86.4,89.1] (78.2,80.9]
##  [883] (91.8,94.5] (97.3,100]  (97.3,100]  (86.4,89.1] (70,72.7]   (94.5,97.3]
##  [889] (75.5,78.2] (91.8,94.5] (72.7,75.5] (94.5,97.3] (80.9,83.6] (70,72.7]  
##  [895] (91.8,94.5] (83.6,86.4] (83.6,86.4] (94.5,97.3] (94.5,97.3] (91.8,94.5]
##  [901] (75.5,78.2] (83.6,86.4] (83.6,86.4] (72.7,75.5] (72.7,75.5] (72.7,75.5]
##  [907] (78.2,80.9] (80.9,83.6] (94.5,97.3] (91.8,94.5] (86.4,89.1] (75.5,78.2]
##  [913] (80.9,83.6] (83.6,86.4] (75.5,78.2] (75.5,78.2] (83.6,86.4] (94.5,97.3]
##  [919] (94.5,97.3] (78.2,80.9] (97.3,100]  (86.4,89.1] (75.5,78.2] (80.9,83.6]
##  [925] (70,72.7]   (97.3,100]  (89.1,91.8] (83.6,86.4] (80.9,83.6] (78.2,80.9]
##  [931] (94.5,97.3] (75.5,78.2] (86.4,89.1] (86.4,89.1] (94.5,97.3] (97.3,100] 
##  [937] (75.5,78.2] (91.8,94.5] (72.7,75.5] (83.6,86.4] (86.4,89.1] (83.6,86.4]
##  [943] (91.8,94.5] (94.5,97.3] (83.6,86.4] (70,72.7]   (75.5,78.2] (97.3,100] 
##  [949] (94.5,97.3] (94.5,97.3] (86.4,89.1] (78.2,80.9] (78.2,80.9] (97.3,100] 
##  [955] (91.8,94.5] (89.1,91.8] (94.5,97.3] (97.3,100]  (94.5,97.3] (80.9,83.6]
##  [961] (83.6,86.4] (94.5,97.3] (75.5,78.2] (70,72.7]   (72.7,75.5] (91.8,94.5]
##  [967] (78.2,80.9] (89.1,91.8] (70,72.7]   (94.5,97.3] (72.7,75.5] (80.9,83.6]
##  [973] (86.4,89.1] (83.6,86.4] (86.4,89.1] (80.9,83.6] (75.5,78.2] (72.7,75.5]
##  [979] (78.2,80.9] (91.8,94.5] (83.6,86.4] (97.3,100]  (94.5,97.3] (70,72.7]  
##  [985] (94.5,97.3] (70,72.7]   (80.9,83.6] (89.1,91.8] (86.4,89.1] (75.5,78.2]
##  [991] (80.9,83.6] (97.3,100]  (86.4,89.1] (72.7,75.5] (80.9,83.6] (83.6,86.4]
##  [997] (83.6,86.4] (86.4,89.1] (97.3,100]  (86.4,89.1]
## 11 Levels: (70,72.7] (72.7,75.5] (75.5,78.2] (78.2,80.9] ... (97.3,100]
tabla.intervalos <- transform(table(cut(muestra, breaks = nointervalos))) # son 6
tabla.intervalos
##           Var1 Freq
## 1    (70,72.7]   88
## 2  (72.7,75.5]   99
## 3  (75.5,78.2]  104
## 4  (78.2,80.9]   56
## 5  (80.9,83.6]  106
## 6  (83.6,86.4]  102
## 7  (86.4,89.1]  106
## 8  (89.1,91.8]   52
## 9  (91.8,94.5]   85
## 10 (94.5,97.3]  103
## 11  (97.3,100]   99
pie(tabla.intervalos$Freq, labels = paste(tabla.intervalos$Var1, " - ", tabla.intervalos$Freq), main = "¿De cuál intervalo hay más y menos elementos?. Sturges")

para esta practica vimos cada uno de los metodos para los datos de agrupacion y su uso correspondiente junto con su clasificacion, al usar tablas para poder mostrarlas de una manera mas detallada al usuario en general, el objetivo es tener la mayor informacion posible de una manera resumida y clara al usuario en una escala facil de interpretar.