Practica4
Angel
20/2/2020
Equipo
Jesus Ruiz Tinajero
No de Control: 19041250
Link:
Angel Rafael Olivas Garcia
No de Control: 19041232
Link:
Oscar Ivan Alonso Simental
No de Control: 19041186
Link:
Juan Manuel Salcido Ruelas
No de Control: 19041252
Link:
#Empezamos declarando los datos, éstos irán desde 70 a 100 siendo 1000 en total y pueden repetirse.
datos <- sample(70:100, 1000, replace = TRUE)
datos## [1] 100 74 89 70 74 77 92 89 100 81 80 80 100 76 94 95 93 100
## [19] 92 91 80 99 100 74 88 85 77 88 96 92 78 70 97 82 97 93
## [37] 93 95 80 78 76 99 93 71 83 78 82 83 86 87 97 73 80 95
## [55] 95 74 86 87 70 76 88 78 93 99 95 77 81 78 88 71 98 96
## [73] 83 87 84 98 79 83 93 71 72 82 91 75 80 94 70 88 87 99
## [91] 74 81 94 73 88 97 92 73 78 74 92 81 77 80 93 79 76 79
## [109] 90 70 78 94 92 84 74 75 74 100 99 91 71 93 80 76 83 99
## [127] 84 100 79 90 90 85 79 77 70 75 84 80 91 85 74 78 97 70
## [145] 74 70 83 89 78 93 95 78 99 95 79 87 98 71 78 87 72 82
## [163] 94 91 71 85 76 87 71 90 72 98 74 74 85 83 76 74 73 84
## [181] 83 93 74 73 79 75 95 91 99 84 86 85 99 79 79 79 70 76
## [199] 75 100 92 72 73 92 93 94 82 89 79 89 71 99 81 90 76 80
## [217] 89 92 80 91 80 79 93 94 96 92 76 95 83 79 87 77 89 89
## [235] 92 94 90 77 87 87 87 86 75 90 82 82 95 74 79 86 79 82
## [253] 70 72 90 90 72 95 93 99 91 77 91 75 74 95 89 87 99 74
## [271] 99 100 74 95 75 85 76 99 72 100 79 89 91 96 97 74 73 99
## [289] 93 96 79 95 74 71 79 93 77 72 96 95 72 72 88 83 76 80
## [307] 87 70 100 81 86 70 96 83 73 86 93 87 100 90 70 76 78 82
## [325] 86 78 81 91 72 88 95 84 70 96 88 80 99 92 80 75 83 93
## [343] 100 76 97 94 74 74 88 98 83 82 79 92 86 85 80 87 75 83
## [361] 79 80 99 97 91 83 72 98 70 71 95 91 84 78 70 92 98 98
## [379] 99 74 100 71 90 86 99 91 85 100 85 82 81 73 80 79 83 74
## [397] 91 90 80 81 81 91 90 78 85 73 91 74 100 80 71 95 92 96
## [415] 95 83 92 80 82 75 81 86 98 90 70 71 93 81 85 81 82 89
## [433] 99 93 97 98 82 72 93 71 94 72 87 74 85 96 82 83 98 84
## [451] 89 80 77 99 86 96 96 98 99 81 73 92 88 93 96 91 74 72
## [469] 80 86 76 71 88 83 90 90 75 83 77 86 93 95 73 77 93 79
## [487] 94 97 100 81 71 98 73 72 70 82 91 87 96 71 99 86 90 70
## [505] 90 95 75 93 77 70 96 92 91 73 85 99 93 75 85 71 97 73
## [523] 93 70 85 83 86 76 94 98 98 94 82 82 88 90 74 84 81 92
## [541] 96 84 85 72 96 76 95 89 76 75 78 87 88 87 81 94 76 71
## [559] 75 81 75 96 84 71 70 78 77 82 94 73 96 76 76 80 74 85
## [577] 84 83 89 80 83 80 70 96 96 85 79 77 75 73 76 92 99 73
## [595] 86 77 96 74 100 89 80 77 72 84 86 88 100 100 99 71 95 80
## [613] 90 95 88 85 78 83 78 84 95 75 83 91 89 99 95 88 84 96
## [631] 92 73 72 79 88 86 71 100 87 90 85 72 94 95 71 93 91 75
## [649] 85 97 97 73 86 70 93 97 73 73 79 87 77 97 71 89 80 72
## [667] 71 84 73 89 88 86 100 100 97 98 77 87 70 88 90 84 96 82
## [685] 88 87 73 73 74 76 74 78 89 81 86 95 100 94 87 70 99 91
## [703] 97 86 73 97 74 97 98 94 87 72 85 88 77 92 79 81 75 89
## [721] 96 71 89 76 82 71 88 82 71 89 98 70 88 87 89 85 100 83
## [739] 78 82 92 100 71 80 78 91 85 100 89 85 82 99 70 96 80 92
## [757] 73 76 96 78 98 92 92 99 71 78 79 77 87 84 96 96 92 86
## [775] 87 97 90 77 97 75 74 94 99 82 98 84 74 94 72 90 92 71
## [793] 81 91 98 92 88 78 97 79 81 87 84 88 81 95 97 96 89 97
## [811] 99 76 92 90 84 74 78 98 93 85 96 99 86 99 71 98 88 83
## [829] 96 79 80 94 77 71 97 85 82 82 92 75 93 76 96 93 96 70
## [847] 88 78 88 80 83 87 78 77 87 95 94 89 85 75 82 73 88 76
## [865] 75 98 76 82 72 88 85 92 89 81 75 90 71 78 70 77 76 83
## [883] 81 90 98 99 98 78 88 85 96 94 87 97 79 96 85 88 74 92
## [901] 89 99 95 89 90 74 91 74 75 76 93 78 100 93 82 76 98 87
## [919] 80 85 75 73 75 93 98 86 100 72 75 82 97 100 79 70 89 81
## [937] 80 76 79 81 76 98 95 94 99 77 77 98 100 83 92 90 81 70
## [955] 92 80 79 96 93 88 90 95 93 89 71 76 86 86 80 87 76 89
## [973] 100 89 86 92 70 78 72 71 88 90 78 77 76 88 73 90 70 73
## [991] 90 87 82 83 81 77 84 98 80 71#Aquí se ordenan y muestran los datos
datosord <- sort(datos)
datosord## [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 70 70 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 71 71 71 71 71 71 71 71 72
## [73] 72 72 72 72 72 72 72 72 72 72 72 72 72 72 72 72 72 72
## [91] 72 72 72 72 72 72 72 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 73 73 73 73
## [127] 73 73 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 74 74 74 74 74 74 74 74 74 74
## [163] 74 74 74 74 74 75 75 75 75 75 75 75 75 75 75 75 75 75
## [181] 75 75 75 75 75 75 75 75 75 75 75 75 75 75 75 75 75 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 76 76 76 76 76 76 76 76 76 76 76 76 76 76
## [235] 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77
## [253] 77 77 77 77 77 77 77 77 77 77 77 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 78 78 78 78 78 79 79 79 79 79 79 79 79 79 79
## [307] 79 79 79 79 79 79 79 79 79 79 79 79 79 79 79 79 79 79
## [325] 79 79 79 79 79 80 80 80 80 80 80 80 80 80 80 80 80 80
## [343] 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80
## [361] 80 80 80 80 80 80 80 81 81 81 81 81 81 81 81 81 81 81
## [379] 81 81 81 81 81 81 81 81 81 81 81 81 81 81 81 81 81 81
## [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 82 82 82 82 82 82 82 82 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 83 83 83 83 83 83 84 84 84 84 84 84 84 84 84
## [469] 84 84 84 84 84 84 84 84 84 84 84 84 84 84 85 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 86 86 86 86 86 86 86
## [523] 86 86 86 86 86 86 86 86 86 86 86 86 86 86 86 86 86 86
## [541] 86 86 86 86 87 87 87 87 87 87 87 87 87 87 87 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 88 88 88 88 88 88 88 88 88 88 88 88 88 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 89 89 89 89 89 89 89 89 89 89 89 89 89 89 89
## [631] 89 89 89 89 89 89 89 89 89 89 89 89 89 89 89 89 89 89
## [649] 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90
## [667] 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90 91 91 91
## [685] 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91
## [703] 91 91 91 91 91 92 92 92 92 92 92 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 93 93 93 93 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 93 94 94 94 94 94 94 94 94 94 94 94 94 94
## [793] 94 94 94 94 94 94 94 94 94 94 94 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 96 96 96 96 96 96 96 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 96 96 96 96 96 96 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] 98 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 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 99 99 99 99 99 99 99 99 99 99 99 99 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(datos)
n## [1] 1000#valor maximo y minimo de los datos
max(datos)## [1] 100min(datos)## [1] 70#rango de los datos
rango <- range(datos)
rango## [1] 70 100#amplitud
amplitud <- diff(rango)
amplitud## [1] 30#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(datos, breaks = 5)))
tabla.intervalos## Var1 Freq
## 1 (70,76] 234
## 2 (76,82] 194
## 3 (82,88] 187
## 4 (88,94] 188
## 5 (94,100] 197#Graficar la tabla de frecuencia utilizando la función plot
plot(tabla.intervalos, main = "¿De cuál intervalo hay más y menos elementos?")
#¿De manera mantemática sugiere los intérvalos y las amplitudes de cada intervalo ¿Cuáles intérvalos genra? ¿cual es la amplitud de cada intérvalo?
1 + 3.3222* (log10(n))## [1] 10.9666nointervalos <- nclass.Sturges(datos)
nointervalos## [1] 11cut(datos, breaks = nointervalos)## [1] (97.3,100] (72.7,75.5] (86.4,89.1] (70,72.7] (72.7,75.5] (75.5,78.2]
## [7] (91.8,94.5] (86.4,89.1] (97.3,100] (80.9,83.6] (78.2,80.9] (78.2,80.9]
## [13] (97.3,100] (75.5,78.2] (91.8,94.5] (94.5,97.3] (91.8,94.5] (97.3,100]
## [19] (91.8,94.5] (89.1,91.8] (78.2,80.9] (97.3,100] (97.3,100] (72.7,75.5]
## [25] (86.4,89.1] (83.6,86.4] (75.5,78.2] (86.4,89.1] (94.5,97.3] (91.8,94.5]
## [31] (75.5,78.2] (70,72.7] (94.5,97.3] (80.9,83.6] (94.5,97.3] (91.8,94.5]
## [37] (91.8,94.5] (94.5,97.3] (78.2,80.9] (75.5,78.2] (75.5,78.2] (97.3,100]
## [43] (91.8,94.5] (70,72.7] (80.9,83.6] (75.5,78.2] (80.9,83.6] (80.9,83.6]
## [49] (83.6,86.4] (86.4,89.1] (94.5,97.3] (72.7,75.5] (78.2,80.9] (94.5,97.3]
## [55] (94.5,97.3] (72.7,75.5] (83.6,86.4] (86.4,89.1] (70,72.7] (75.5,78.2]
## [61] (86.4,89.1] (75.5,78.2] (91.8,94.5] (97.3,100] (94.5,97.3] (75.5,78.2]
## [67] (80.9,83.6] (75.5,78.2] (86.4,89.1] (70,72.7] (97.3,100] (94.5,97.3]
## [73] (80.9,83.6] (86.4,89.1] (83.6,86.4] (97.3,100] (78.2,80.9] (80.9,83.6]
## [79] (91.8,94.5] (70,72.7] (70,72.7] (80.9,83.6] (89.1,91.8] (72.7,75.5]
## [85] (78.2,80.9] (91.8,94.5] (70,72.7] (86.4,89.1] (86.4,89.1] (97.3,100]
## [91] (72.7,75.5] (80.9,83.6] (91.8,94.5] (72.7,75.5] (86.4,89.1] (94.5,97.3]
## [97] (91.8,94.5] (72.7,75.5] (75.5,78.2] (72.7,75.5] (91.8,94.5] (80.9,83.6]
## [103] (75.5,78.2] (78.2,80.9] (91.8,94.5] (78.2,80.9] (75.5,78.2] (78.2,80.9]
## [109] (89.1,91.8] (70,72.7] (75.5,78.2] (91.8,94.5] (91.8,94.5] (83.6,86.4]
## [115] (72.7,75.5] (72.7,75.5] (72.7,75.5] (97.3,100] (97.3,100] (89.1,91.8]
## [121] (70,72.7] (91.8,94.5] (78.2,80.9] (75.5,78.2] (80.9,83.6] (97.3,100]
## [127] (83.6,86.4] (97.3,100] (78.2,80.9] (89.1,91.8] (89.1,91.8] (83.6,86.4]
## [133] (78.2,80.9] (75.5,78.2] (70,72.7] (72.7,75.5] (83.6,86.4] (78.2,80.9]
## [139] (89.1,91.8] (83.6,86.4] (72.7,75.5] (75.5,78.2] (94.5,97.3] (70,72.7]
## [145] (72.7,75.5] (70,72.7] (80.9,83.6] (86.4,89.1] (75.5,78.2] (91.8,94.5]
## [151] (94.5,97.3] (75.5,78.2] (97.3,100] (94.5,97.3] (78.2,80.9] (86.4,89.1]
## [157] (97.3,100] (70,72.7] (75.5,78.2] (86.4,89.1] (70,72.7] (80.9,83.6]
## [163] (91.8,94.5] (89.1,91.8] (70,72.7] (83.6,86.4] (75.5,78.2] (86.4,89.1]
## [169] (70,72.7] (89.1,91.8] (70,72.7] (97.3,100] (72.7,75.5] (72.7,75.5]
## [175] (83.6,86.4] (80.9,83.6] (75.5,78.2] (72.7,75.5] (72.7,75.5] (83.6,86.4]
## [181] (80.9,83.6] (91.8,94.5] (72.7,75.5] (72.7,75.5] (78.2,80.9] (72.7,75.5]
## [187] (94.5,97.3] (89.1,91.8] (97.3,100] (83.6,86.4] (83.6,86.4] (83.6,86.4]
## [193] (97.3,100] (78.2,80.9] (78.2,80.9] (78.2,80.9] (70,72.7] (75.5,78.2]
## [199] (72.7,75.5] (97.3,100] (91.8,94.5] (70,72.7] (72.7,75.5] (91.8,94.5]
## [205] (91.8,94.5] (91.8,94.5] (80.9,83.6] (86.4,89.1] (78.2,80.9] (86.4,89.1]
## [211] (70,72.7] (97.3,100] (80.9,83.6] (89.1,91.8] (75.5,78.2] (78.2,80.9]
## [217] (86.4,89.1] (91.8,94.5] (78.2,80.9] (89.1,91.8] (78.2,80.9] (78.2,80.9]
## [223] (91.8,94.5] (91.8,94.5] (94.5,97.3] (91.8,94.5] (75.5,78.2] (94.5,97.3]
## [229] (80.9,83.6] (78.2,80.9] (86.4,89.1] (75.5,78.2] (86.4,89.1] (86.4,89.1]
## [235] (91.8,94.5] (91.8,94.5] (89.1,91.8] (75.5,78.2] (86.4,89.1] (86.4,89.1]
## [241] (86.4,89.1] (83.6,86.4] (72.7,75.5] (89.1,91.8] (80.9,83.6] (80.9,83.6]
## [247] (94.5,97.3] (72.7,75.5] (78.2,80.9] (83.6,86.4] (78.2,80.9] (80.9,83.6]
## [253] (70,72.7] (70,72.7] (89.1,91.8] (89.1,91.8] (70,72.7] (94.5,97.3]
## [259] (91.8,94.5] (97.3,100] (89.1,91.8] (75.5,78.2] (89.1,91.8] (72.7,75.5]
## [265] (72.7,75.5] (94.5,97.3] (86.4,89.1] (86.4,89.1] (97.3,100] (72.7,75.5]
## [271] (97.3,100] (97.3,100] (72.7,75.5] (94.5,97.3] (72.7,75.5] (83.6,86.4]
## [277] (75.5,78.2] (97.3,100] (70,72.7] (97.3,100] (78.2,80.9] (86.4,89.1]
## [283] (89.1,91.8] (94.5,97.3] (94.5,97.3] (72.7,75.5] (72.7,75.5] (97.3,100]
## [289] (91.8,94.5] (94.5,97.3] (78.2,80.9] (94.5,97.3] (72.7,75.5] (70,72.7]
## [295] (78.2,80.9] (91.8,94.5] (75.5,78.2] (70,72.7] (94.5,97.3] (94.5,97.3]
## [301] (70,72.7] (70,72.7] (86.4,89.1] (80.9,83.6] (75.5,78.2] (78.2,80.9]
## [307] (86.4,89.1] (70,72.7] (97.3,100] (80.9,83.6] (83.6,86.4] (70,72.7]
## [313] (94.5,97.3] (80.9,83.6] (72.7,75.5] (83.6,86.4] (91.8,94.5] (86.4,89.1]
## [319] (97.3,100] (89.1,91.8] (70,72.7] (75.5,78.2] (75.5,78.2] (80.9,83.6]
## [325] (83.6,86.4] (75.5,78.2] (80.9,83.6] (89.1,91.8] (70,72.7] (86.4,89.1]
## [331] (94.5,97.3] (83.6,86.4] (70,72.7] (94.5,97.3] (86.4,89.1] (78.2,80.9]
## [337] (97.3,100] (91.8,94.5] (78.2,80.9] (72.7,75.5] (80.9,83.6] (91.8,94.5]
## [343] (97.3,100] (75.5,78.2] (94.5,97.3] (91.8,94.5] (72.7,75.5] (72.7,75.5]
## [349] (86.4,89.1] (97.3,100] (80.9,83.6] (80.9,83.6] (78.2,80.9] (91.8,94.5]
## [355] (83.6,86.4] (83.6,86.4] (78.2,80.9] (86.4,89.1] (72.7,75.5] (80.9,83.6]
## [361] (78.2,80.9] (78.2,80.9] (97.3,100] (94.5,97.3] (89.1,91.8] (80.9,83.6]
## [367] (70,72.7] (97.3,100] (70,72.7] (70,72.7] (94.5,97.3] (89.1,91.8]
## [373] (83.6,86.4] (75.5,78.2] (70,72.7] (91.8,94.5] (97.3,100] (97.3,100]
## [379] (97.3,100] (72.7,75.5] (97.3,100] (70,72.7] (89.1,91.8] (83.6,86.4]
## [385] (97.3,100] (89.1,91.8] (83.6,86.4] (97.3,100] (83.6,86.4] (80.9,83.6]
## [391] (80.9,83.6] (72.7,75.5] (78.2,80.9] (78.2,80.9] (80.9,83.6] (72.7,75.5]
## [397] (89.1,91.8] (89.1,91.8] (78.2,80.9] (80.9,83.6] (80.9,83.6] (89.1,91.8]
## [403] (89.1,91.8] (75.5,78.2] (83.6,86.4] (72.7,75.5] (89.1,91.8] (72.7,75.5]
## [409] (97.3,100] (78.2,80.9] (70,72.7] (94.5,97.3] (91.8,94.5] (94.5,97.3]
## [415] (94.5,97.3] (80.9,83.6] (91.8,94.5] (78.2,80.9] (80.9,83.6] (72.7,75.5]
## [421] (80.9,83.6] (83.6,86.4] (97.3,100] (89.1,91.8] (70,72.7] (70,72.7]
## [427] (91.8,94.5] (80.9,83.6] (83.6,86.4] (80.9,83.6] (80.9,83.6] (86.4,89.1]
## [433] (97.3,100] (91.8,94.5] (94.5,97.3] (97.3,100] (80.9,83.6] (70,72.7]
## [439] (91.8,94.5] (70,72.7] (91.8,94.5] (70,72.7] (86.4,89.1] (72.7,75.5]
## [445] (83.6,86.4] (94.5,97.3] (80.9,83.6] (80.9,83.6] (97.3,100] (83.6,86.4]
## [451] (86.4,89.1] (78.2,80.9] (75.5,78.2] (97.3,100] (83.6,86.4] (94.5,97.3]
## [457] (94.5,97.3] (97.3,100] (97.3,100] (80.9,83.6] (72.7,75.5] (91.8,94.5]
## [463] (86.4,89.1] (91.8,94.5] (94.5,97.3] (89.1,91.8] (72.7,75.5] (70,72.7]
## [469] (78.2,80.9] (83.6,86.4] (75.5,78.2] (70,72.7] (86.4,89.1] (80.9,83.6]
## [475] (89.1,91.8] (89.1,91.8] (72.7,75.5] (80.9,83.6] (75.5,78.2] (83.6,86.4]
## [481] (91.8,94.5] (94.5,97.3] (72.7,75.5] (75.5,78.2] (91.8,94.5] (78.2,80.9]
## [487] (91.8,94.5] (94.5,97.3] (97.3,100] (80.9,83.6] (70,72.7] (97.3,100]
## [493] (72.7,75.5] (70,72.7] (70,72.7] (80.9,83.6] (89.1,91.8] (86.4,89.1]
## [499] (94.5,97.3] (70,72.7] (97.3,100] (83.6,86.4] (89.1,91.8] (70,72.7]
## [505] (89.1,91.8] (94.5,97.3] (72.7,75.5] (91.8,94.5] (75.5,78.2] (70,72.7]
## [511] (94.5,97.3] (91.8,94.5] (89.1,91.8] (72.7,75.5] (83.6,86.4] (97.3,100]
## [517] (91.8,94.5] (72.7,75.5] (83.6,86.4] (70,72.7] (94.5,97.3] (72.7,75.5]
## [523] (91.8,94.5] (70,72.7] (83.6,86.4] (80.9,83.6] (83.6,86.4] (75.5,78.2]
## [529] (91.8,94.5] (97.3,100] (97.3,100] (91.8,94.5] (80.9,83.6] (80.9,83.6]
## [535] (86.4,89.1] (89.1,91.8] (72.7,75.5] (83.6,86.4] (80.9,83.6] (91.8,94.5]
## [541] (94.5,97.3] (83.6,86.4] (83.6,86.4] (70,72.7] (94.5,97.3] (75.5,78.2]
## [547] (94.5,97.3] (86.4,89.1] (75.5,78.2] (72.7,75.5] (75.5,78.2] (86.4,89.1]
## [553] (86.4,89.1] (86.4,89.1] (80.9,83.6] (91.8,94.5] (75.5,78.2] (70,72.7]
## [559] (72.7,75.5] (80.9,83.6] (72.7,75.5] (94.5,97.3] (83.6,86.4] (70,72.7]
## [565] (70,72.7] (75.5,78.2] (75.5,78.2] (80.9,83.6] (91.8,94.5] (72.7,75.5]
## [571] (94.5,97.3] (75.5,78.2] (75.5,78.2] (78.2,80.9] (72.7,75.5] (83.6,86.4]
## [577] (83.6,86.4] (80.9,83.6] (86.4,89.1] (78.2,80.9] (80.9,83.6] (78.2,80.9]
## [583] (70,72.7] (94.5,97.3] (94.5,97.3] (83.6,86.4] (78.2,80.9] (75.5,78.2]
## [589] (72.7,75.5] (72.7,75.5] (75.5,78.2] (91.8,94.5] (97.3,100] (72.7,75.5]
## [595] (83.6,86.4] (75.5,78.2] (94.5,97.3] (72.7,75.5] (97.3,100] (86.4,89.1]
## [601] (78.2,80.9] (75.5,78.2] (70,72.7] (83.6,86.4] (83.6,86.4] (86.4,89.1]
## [607] (97.3,100] (97.3,100] (97.3,100] (70,72.7] (94.5,97.3] (78.2,80.9]
## [613] (89.1,91.8] (94.5,97.3] (86.4,89.1] (83.6,86.4] (75.5,78.2] (80.9,83.6]
## [619] (75.5,78.2] (83.6,86.4] (94.5,97.3] (72.7,75.5] (80.9,83.6] (89.1,91.8]
## [625] (86.4,89.1] (97.3,100] (94.5,97.3] (86.4,89.1] (83.6,86.4] (94.5,97.3]
## [631] (91.8,94.5] (72.7,75.5] (70,72.7] (78.2,80.9] (86.4,89.1] (83.6,86.4]
## [637] (70,72.7] (97.3,100] (86.4,89.1] (89.1,91.8] (83.6,86.4] (70,72.7]
## [643] (91.8,94.5] (94.5,97.3] (70,72.7] (91.8,94.5] (89.1,91.8] (72.7,75.5]
## [649] (83.6,86.4] (94.5,97.3] (94.5,97.3] (72.7,75.5] (83.6,86.4] (70,72.7]
## [655] (91.8,94.5] (94.5,97.3] (72.7,75.5] (72.7,75.5] (78.2,80.9] (86.4,89.1]
## [661] (75.5,78.2] (94.5,97.3] (70,72.7] (86.4,89.1] (78.2,80.9] (70,72.7]
## [667] (70,72.7] (83.6,86.4] (72.7,75.5] (86.4,89.1] (86.4,89.1] (83.6,86.4]
## [673] (97.3,100] (97.3,100] (94.5,97.3] (97.3,100] (75.5,78.2] (86.4,89.1]
## [679] (70,72.7] (86.4,89.1] (89.1,91.8] (83.6,86.4] (94.5,97.3] (80.9,83.6]
## [685] (86.4,89.1] (86.4,89.1] (72.7,75.5] (72.7,75.5] (72.7,75.5] (75.5,78.2]
## [691] (72.7,75.5] (75.5,78.2] (86.4,89.1] (80.9,83.6] (83.6,86.4] (94.5,97.3]
## [697] (97.3,100] (91.8,94.5] (86.4,89.1] (70,72.7] (97.3,100] (89.1,91.8]
## [703] (94.5,97.3] (83.6,86.4] (72.7,75.5] (94.5,97.3] (72.7,75.5] (94.5,97.3]
## [709] (97.3,100] (91.8,94.5] (86.4,89.1] (70,72.7] (83.6,86.4] (86.4,89.1]
## [715] (75.5,78.2] (91.8,94.5] (78.2,80.9] (80.9,83.6] (72.7,75.5] (86.4,89.1]
## [721] (94.5,97.3] (70,72.7] (86.4,89.1] (75.5,78.2] (80.9,83.6] (70,72.7]
## [727] (86.4,89.1] (80.9,83.6] (70,72.7] (86.4,89.1] (97.3,100] (70,72.7]
## [733] (86.4,89.1] (86.4,89.1] (86.4,89.1] (83.6,86.4] (97.3,100] (80.9,83.6]
## [739] (75.5,78.2] (80.9,83.6] (91.8,94.5] (97.3,100] (70,72.7] (78.2,80.9]
## [745] (75.5,78.2] (89.1,91.8] (83.6,86.4] (97.3,100] (86.4,89.1] (83.6,86.4]
## [751] (80.9,83.6] (97.3,100] (70,72.7] (94.5,97.3] (78.2,80.9] (91.8,94.5]
## [757] (72.7,75.5] (75.5,78.2] (94.5,97.3] (75.5,78.2] (97.3,100] (91.8,94.5]
## [763] (91.8,94.5] (97.3,100] (70,72.7] (75.5,78.2] (78.2,80.9] (75.5,78.2]
## [769] (86.4,89.1] (83.6,86.4] (94.5,97.3] (94.5,97.3] (91.8,94.5] (83.6,86.4]
## [775] (86.4,89.1] (94.5,97.3] (89.1,91.8] (75.5,78.2] (94.5,97.3] (72.7,75.5]
## [781] (72.7,75.5] (91.8,94.5] (97.3,100] (80.9,83.6] (97.3,100] (83.6,86.4]
## [787] (72.7,75.5] (91.8,94.5] (70,72.7] (89.1,91.8] (91.8,94.5] (70,72.7]
## [793] (80.9,83.6] (89.1,91.8] (97.3,100] (91.8,94.5] (86.4,89.1] (75.5,78.2]
## [799] (94.5,97.3] (78.2,80.9] (80.9,83.6] (86.4,89.1] (83.6,86.4] (86.4,89.1]
## [805] (80.9,83.6] (94.5,97.3] (94.5,97.3] (94.5,97.3] (86.4,89.1] (94.5,97.3]
## [811] (97.3,100] (75.5,78.2] (91.8,94.5] (89.1,91.8] (83.6,86.4] (72.7,75.5]
## [817] (75.5,78.2] (97.3,100] (91.8,94.5] (83.6,86.4] (94.5,97.3] (97.3,100]
## [823] (83.6,86.4] (97.3,100] (70,72.7] (97.3,100] (86.4,89.1] (80.9,83.6]
## [829] (94.5,97.3] (78.2,80.9] (78.2,80.9] (91.8,94.5] (75.5,78.2] (70,72.7]
## [835] (94.5,97.3] (83.6,86.4] (80.9,83.6] (80.9,83.6] (91.8,94.5] (72.7,75.5]
## [841] (91.8,94.5] (75.5,78.2] (94.5,97.3] (91.8,94.5] (94.5,97.3] (70,72.7]
## [847] (86.4,89.1] (75.5,78.2] (86.4,89.1] (78.2,80.9] (80.9,83.6] (86.4,89.1]
## [853] (75.5,78.2] (75.5,78.2] (86.4,89.1] (94.5,97.3] (91.8,94.5] (86.4,89.1]
## [859] (83.6,86.4] (72.7,75.5] (80.9,83.6] (72.7,75.5] (86.4,89.1] (75.5,78.2]
## [865] (72.7,75.5] (97.3,100] (75.5,78.2] (80.9,83.6] (70,72.7] (86.4,89.1]
## [871] (83.6,86.4] (91.8,94.5] (86.4,89.1] (80.9,83.6] (72.7,75.5] (89.1,91.8]
## [877] (70,72.7] (75.5,78.2] (70,72.7] (75.5,78.2] (75.5,78.2] (80.9,83.6]
## [883] (80.9,83.6] (89.1,91.8] (97.3,100] (97.3,100] (97.3,100] (75.5,78.2]
## [889] (86.4,89.1] (83.6,86.4] (94.5,97.3] (91.8,94.5] (86.4,89.1] (94.5,97.3]
## [895] (78.2,80.9] (94.5,97.3] (83.6,86.4] (86.4,89.1] (72.7,75.5] (91.8,94.5]
## [901] (86.4,89.1] (97.3,100] (94.5,97.3] (86.4,89.1] (89.1,91.8] (72.7,75.5]
## [907] (89.1,91.8] (72.7,75.5] (72.7,75.5] (75.5,78.2] (91.8,94.5] (75.5,78.2]
## [913] (97.3,100] (91.8,94.5] (80.9,83.6] (75.5,78.2] (97.3,100] (86.4,89.1]
## [919] (78.2,80.9] (83.6,86.4] (72.7,75.5] (72.7,75.5] (72.7,75.5] (91.8,94.5]
## [925] (97.3,100] (83.6,86.4] (97.3,100] (70,72.7] (72.7,75.5] (80.9,83.6]
## [931] (94.5,97.3] (97.3,100] (78.2,80.9] (70,72.7] (86.4,89.1] (80.9,83.6]
## [937] (78.2,80.9] (75.5,78.2] (78.2,80.9] (80.9,83.6] (75.5,78.2] (97.3,100]
## [943] (94.5,97.3] (91.8,94.5] (97.3,100] (75.5,78.2] (75.5,78.2] (97.3,100]
## [949] (97.3,100] (80.9,83.6] (91.8,94.5] (89.1,91.8] (80.9,83.6] (70,72.7]
## [955] (91.8,94.5] (78.2,80.9] (78.2,80.9] (94.5,97.3] (91.8,94.5] (86.4,89.1]
## [961] (89.1,91.8] (94.5,97.3] (91.8,94.5] (86.4,89.1] (70,72.7] (75.5,78.2]
## [967] (83.6,86.4] (83.6,86.4] (78.2,80.9] (86.4,89.1] (75.5,78.2] (86.4,89.1]
## [973] (97.3,100] (86.4,89.1] (83.6,86.4] (91.8,94.5] (70,72.7] (75.5,78.2]
## [979] (70,72.7] (70,72.7] (86.4,89.1] (89.1,91.8] (75.5,78.2] (75.5,78.2]
## [985] (75.5,78.2] (86.4,89.1] (72.7,75.5] (89.1,91.8] (70,72.7] (72.7,75.5]
## [991] (89.1,91.8] (86.4,89.1] (80.9,83.6] (80.9,83.6] (80.9,83.6] (75.5,78.2]
## [997] (83.6,86.4] (97.3,100] (78.2,80.9] (70,72.7]
## 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(datos, breaks = nointervalos)))
tabla.intervalos## Var1 Freq
## 1 (70,72.7] 97
## 2 (72.7,75.5] 100
## 3 (75.5,78.2] 99
## 4 (78.2,80.9] 71
## 5 (80.9,83.6] 92
## 6 (83.6,86.4] 85
## 7 (86.4,89.1] 104
## 8 (89.1,91.8] 59
## 9 (91.8,94.5] 96
## 10 (94.5,97.3] 97
## 11 (97.3,100] 100pie(tabla.intervalos$Freq, labels = paste(tabla.intervalos$Var1, " - ", tabla.intervalos$Freq), main = "¿De cuál intervalo hay más y menos elementos?. Sturges")