datos<-read.csv("C:/Users/Alex/Downloads/alumnos inscritos ene-jun 2018.csv")
civil= datos$promedio[which(datos$carrera == 'CIVIL' & datos$promedio > 0)]
civil
## [1] 85.08 86.24 90.54 78.86 83.68 84.41 76.27 80.50 85.74 84.97 77.54
## [12] 78.53 82.78 80.10 81.77 79.00 88.70 84.83 78.53 79.93 80.34 80.78
## [23] 82.89 86.58 85.00 80.16 81.36 82.18 79.73 80.24 74.71 86.04 81.30
## [34] 81.17 85.05 79.08 92.59 83.10 78.15 79.13 78.72 83.53 83.82 79.16
## [45] 92.91 84.39 78.88 85.22 79.90 81.47 78.85 84.04 80.09 93.79 78.16
## [56] 86.07 81.10 90.66 83.38 82.40 82.83 78.94 82.40 92.03 86.55 80.85
## [67] 78.91 79.62 88.24 80.79 84.76 78.00 82.75 86.94 79.63 85.67 82.48
## [78] 81.43 83.66 79.79 82.00 89.21 86.92 78.58 82.06 85.32 78.54 81.67
## [89] 81.39 80.54 78.86 90.60 85.58 95.22 82.06 92.63 78.94 78.96 77.67
## [100] 80.45 82.56 89.97 79.97 81.87 83.12 88.09 80.33 84.13 81.12 80.52
## [111] 83.25 86.31 81.36 82.11 84.09 81.28 83.45 78.66 79.16 83.94 80.83
## [122] 85.00 88.39 88.84 80.41 83.11 91.38 80.58 80.89 83.60 82.41 81.56
## [133] 86.18 88.77 82.44 79.03 80.31 93.57 82.68 92.14 79.47 83.12 84.31
## [144] 79.59 93.64 89.92 83.38 86.23 84.29 93.34 84.39 83.86 79.87 81.84
## [155] 82.95 82.97 85.96 78.40 80.24 88.10 79.25 90.36 81.27 84.90 83.65
## [166] 84.08 82.79 79.80 76.54 84.70 88.04 86.59 86.98 89.20 82.57 79.57
## [177] 80.41 90.40 84.67 89.12 80.46 82.54 84.13 88.11 93.51 84.00 81.22
## [188] 80.48 81.04 79.00 83.08 86.23 78.11 87.64 82.93 80.48 82.05 80.96
## [199] 83.09 90.16 80.97 81.45 86.91 83.08 92.00 82.64 77.68 75.86 75.65
## [210] 78.21 83.29 79.57 82.90 84.96 85.50 83.33 85.53 82.00 82.11 83.07
## [221] 78.24 86.92 78.74 81.31 80.74 80.37 89.70 83.37 75.33 81.93 84.06
## [232] 85.33 79.17 88.17 83.81 80.23 96.50 80.42 84.18 81.63 82.55 81.62
## [243] 83.00 79.88 85.17 84.60 83.94 84.75 79.33 78.75 86.78 92.00 86.60
## [254] 80.32 87.47 83.00 85.27 78.63 80.39 92.46 82.35 80.69 81.30 81.96
## [265] 92.11 78.50 75.79 83.32 94.96 79.46 79.57 83.37 81.23 89.03 80.67
## [276] 87.11 82.46 76.04 92.48 81.96 78.38 84.48 84.11 85.63 82.34 82.54
## [287] 79.42 81.45 80.38 84.27 89.34 70.00 84.61 83.20 81.45 84.13 89.38
## [298] 86.00 85.17 87.48 78.60 94.13 82.21 81.13 76.63 83.45 81.88 94.39
## [309] 79.06 77.70 80.13 83.06 81.52 78.35 83.41 83.46 78.78 80.68 91.14
## [320] 82.61 88.32 79.68 82.38 84.53 84.93 87.55 80.09 78.79 79.86 84.94
## [331] 78.70 83.47 82.60 82.38 77.58 80.66 74.88 80.76 80.39 81.48 89.42
## [342] 89.29 84.33 92.00 90.59 91.47 82.88 81.50 92.52 86.54 80.67 79.87
## [353] 89.91 79.49 81.00 81.89 83.90 88.18 86.25 84.83 80.88 83.86 78.82
## [364] 84.68 86.74 81.58 78.64 85.94 84.26 81.47 80.66 83.00 78.18 82.81
## [375] 87.94 79.37 85.09 92.83 79.44 90.59 81.60 83.09 81.86 82.19 86.63
## [386] 77.31 79.98 84.00 80.89 86.19 83.17 76.80 78.58 81.28 88.77 86.84
## [397] 79.00 85.00 77.62 81.13 79.25 83.78 78.81 78.91 87.86 81.46 85.88
## [408] 83.30 79.23 77.58 82.54 85.96 85.22 84.42 82.34 84.67 79.22 85.69
## [419] 85.08 88.85 85.96 78.48 89.80 85.89 80.32 88.80 77.76 82.49 79.28
## [430] 78.63 76.09 83.77 83.33 83.75 90.89 88.76 85.56 77.66 88.43 82.98
## [441] 79.46 85.87 89.89 83.18 90.90 79.55 77.50 82.21 84.42 80.68 80.53
## [452] 78.00 82.42 88.72 81.69 85.18 82.39 78.65 81.59 85.46 88.88 79.64
## [463] 79.15 85.72 77.95 86.52 82.32 88.91 95.74 81.84 82.73 88.71 78.15
## [474] 86.76 92.34 86.73 78.07 85.29 87.16 82.20 79.75 89.32 80.53 80.61
## [485] 83.61 80.13 88.36 82.08 82.70 82.80 86.06 88.92 90.00 88.33 83.67
## [496] 77.82 82.67 83.17 84.80 85.00 83.11 92.50 86.50 81.40 87.00 90.00
## [507] 84.13 82.00 84.14 85.25 91.58 85.92 84.00 75.14 81.00 86.20 88.60
## [518] 85.42 81.67 86.67 88.00 72.50 79.00 78.30 89.15 85.33 91.50 87.78
## [529] 94.67 84.55 85.00 81.60 89.00 83.00 88.20 87.25 85.67 81.50 79.00
## [540] 87.50 78.75 85.60 84.83 90.83 92.00 89.17 90.25 93.00 85.00 87.11
## [551] 92.58 79.11 81.00 83.10 78.90 87.43 82.20 76.75 81.89 80.00 88.33
## [562] 82.89 89.17 88.00 83.42 83.43 84.83 89.83 87.17 81.44 87.42 82.50
## [573] 85.17 88.33 82.75 90.50 78.20 82.78 86.33 95.08 79.36 80.67 82.92
## [584] 83.57 91.09 86.00 84.50 92.00 91.33 85.33 83.50 86.33 87.67 86.25
## [595] 86.08 78.27 79.56 83.27 87.00 92.83 86.40 87.67 84.33 77.33 82.25
## [606] 90.36 91.17 85.80 87.67 87.83 89.83 87.00 83.00 84.00 82.00 70.00
## [617] 87.40 76.89 85.20 89.20 83.64 83.00 81.50 89.17 81.50 81.00 88.50
mean(civil)
## [1] 83.66679
var(civil)
## [1] 18.41991
sd(civil)
## [1] 4.291842
sd(civil)/mean(civil)*100
## [1] 5.129684
barplot(table(civil))
barplot(table(sd(civil)/mean(civil)*100))
#ARQUITECTURA ##Datos
Arquitectura= datos$promedio[which(datos$carrera == 'ARQUITECTURA' & datos$promedio > 0)]
Arquitectura
## [1] 82.27 82.59 87.47 83.18 83.72 90.11 91.11 85.12 83.90 87.94 85.60
## [12] 86.11 85.72 82.14 84.08 82.30 88.58 81.72 83.23 80.86 82.50 81.13
## [23] 79.84 89.78 83.67 87.33 82.50 88.00 78.84 90.20 81.63 88.03 83.13
## [34] 82.58 84.76 88.20 87.69 95.79 83.48 88.83 87.89 85.44 84.00 85.21
## [45] 84.17 85.59 91.17 81.76 78.44 87.08 86.81 84.55 82.21 74.85 82.31
## [56] 88.17 82.05 80.85 85.22 81.74 89.53 81.30 78.76 87.10 78.00 85.00
## [67] 86.15 81.06 85.59 87.42 82.33 80.67 85.06 86.64 92.17 83.45 80.58
## [78] 92.11 80.47 86.69 89.87 88.95 88.10 84.20 85.56 90.72 77.00 92.09
## [89] 86.90 85.83 84.59 83.97 87.69 83.69 84.61 83.29 86.77 83.83 82.96
## [100] 90.58 89.83 83.45 84.21 80.32 89.00 85.17 83.69 81.88 85.12 87.55
## [111] 93.88 93.00 86.98 85.38 90.57 84.51 85.33 88.55 81.09 82.61 85.68
## [122] 88.38 90.00 89.26 80.79 81.72 83.51 80.33 84.08 84.45 91.49 82.12
## [133] 86.91 82.76 90.67 86.35 87.45 84.15 82.72 88.59 82.23 86.18 87.50
## [144] 91.28 83.29 82.50 94.50 86.52 84.72 93.43 78.07 81.63 83.88 82.20
## [155] 88.04 82.91 84.67 85.64 94.13 81.03 91.94 88.79 88.63 83.15 85.28
## [166] 81.90 85.70 87.13 79.17 81.20 83.13 90.60 81.64 86.51 90.89 86.97
## [177] 85.04 78.39 84.40 87.07 84.13 89.90 82.40 80.92 77.50 80.00 81.13
## [188] 85.49 82.26 82.85 83.67 77.29 85.00 82.50 84.47 85.83 85.36 86.31
## [199] 89.44 89.22 81.57 85.95 81.60 87.27 83.78 88.40 88.06 85.67 87.88
## [210] 92.88 85.03 85.02 87.33 85.90 82.45 85.28 87.10 83.56 83.75 84.69
## [221] 80.07 82.78 81.69 85.05 85.43 86.02 86.33 83.90 78.62 89.39 82.64
## [232] 83.05 79.58 82.19 81.25 84.70 89.94 82.81 87.18 80.42 82.67 84.94
## [243] 83.73 80.63 86.61 90.48 91.18 79.14 84.37 85.62 81.89 80.33 81.56
## [254] 85.75 87.16 83.60 88.00 89.78 87.91 84.80 83.50 83.46 88.19 84.38
## [265] 80.20 88.02 82.29 91.16 85.80 83.71 85.04 81.81 89.04 83.46 88.15
## [276] 79.40 87.17 80.92 82.29 89.87 83.03 87.13 88.12 87.64 81.41 85.92
## [287] 87.23 78.53 86.39 82.06 87.50 79.11 80.73 89.83 84.64 85.72 82.26
## [298] 82.00 85.04 83.63 88.15 89.26 80.44 80.70 89.28 86.68 82.84 85.09
## [309] 85.88 85.16 81.96 84.34 83.07 81.63 90.44 84.75 88.61 91.11 83.40
## [320] 81.67 82.57 83.69 81.45 87.00 88.70 83.09 84.98 89.70 85.71 84.67
## [331] 90.21 93.21 79.95 83.13 77.96 88.55 82.27 82.95 85.28 89.26 83.08
## [342] 84.24 83.33 88.18 83.25 83.91 90.65 91.22 79.24 88.43 88.58 81.72
## [353] 89.34 79.50 82.80 80.36 81.79 83.00 87.93 83.07 80.60 94.15 80.28
## [364] 80.46 82.12 84.83 81.74 88.04 79.16 83.95 88.02 88.41 78.84 88.22
## [375] 90.63 88.29 83.45 84.59 85.95 83.38 85.73 88.65 83.79 91.16 88.58
## [386] 81.14 89.10 94.42 85.07 89.71 89.08 89.17 85.35 83.23 86.41 84.53
## [397] 83.61 85.42 82.65 86.11 83.71 88.93 81.48 85.69 83.07 86.35 83.34
## [408] 88.00 86.13 82.13 84.69 82.47 82.13 80.67 82.52 84.17 89.45 86.57
## [419] 86.26 88.42 88.33 90.61 80.71 89.46 80.20 82.02 81.22 82.80 89.48
## [430] 87.90 89.06 83.60 84.70 91.72 84.89 91.06 84.38 93.07 84.18 88.22
## [441] 85.57 84.18 91.81 84.43 82.82 88.33 88.00 89.83 89.67 90.83 87.50
## [452] 95.00 92.00 84.83 80.00 82.80 90.33 83.20 90.00 85.83 86.73 87.20
## [463] 86.58 88.00 82.50 85.50 84.64 90.17 86.83 90.17 83.67 87.33 90.00
## [474] 82.44 84.56 81.82 88.25 88.75 87.40 88.17 85.55 92.83 88.58 84.00
## [485] 85.00 86.58 86.33 82.60 84.67 90.08 83.67 87.58 86.00 88.75 80.82
## [496] 89.36 84.83 81.10 90.00 91.50 84.75 82.83 85.60 80.70 88.27 89.75
## [507] 81.80 79.55 84.42 78.00 82.00 80.44 82.20 81.00 79.83 81.40 78.38
## [518] 82.27 84.33 81.45 88.00 90.33 77.17 86.33 84.17 91.08 90.50 82.90
## [529] 86.17 86.92 81.40 81.80 86.67 86.67 87.33 88.17 83.50 91.33 82.60
## [540] 77.33 83.91 89.50 87.58 84.50 81.00 90.50 84.83 82.00 79.33 87.00
## [551] 83.63 81.33 85.17 81.00 84.33 77.50 88.17 85.60 78.75 88.33 84.00
## [562] 79.20 88.00 88.67 84.92 84.71 84.08 79.40 83.50 78.43 79.25 78.63
## [573] 84.50 84.91 82.17 88.00 79.45 80.14 83.67 83.17 79.20 84.45 82.36
## [584] 83.80 85.67 83.45
mean(Arquitectura)
## [1] 85.08945
var(Arquitectura)
## [1] 13.13453
sd(Arquitectura)
## [1] 3.62416
sd(Arquitectura)/mean(Arquitectura)*100
## [1] 4.259235
barplot(table(Arquitectura))
barplot(table(sd(Arquitectura)/mean(Arquitectura)*100))
quimica= datos$promedio[which(datos$carrera == 'QUIMICA' & datos$promedio > 0)]
quimica
## [1] 82.57 80.46 84.70 81.43 86.94 81.20 82.73 87.11 90.32 80.42 82.00
## [12] 89.83 82.71 77.94 88.87 81.00 82.38 86.77 85.82 92.00 79.72 82.31
## [23] 85.25 80.93 79.16 83.23 80.64 87.34 82.40 80.64 85.17 84.59 83.11
## [34] 80.74 83.60 87.35 83.36 80.96 80.14 83.00 87.38 84.67 87.50 82.91
## [45] 84.43 82.15 86.20 83.54 82.13 86.76 89.67 82.85 84.24 85.39 84.37
## [56] 83.00 88.63 80.91 85.95 86.17 88.89 82.50 84.38 80.00 94.39 83.88
## [67] 83.30 82.08 86.20 86.32 90.42 77.87 79.78 86.38 86.50 84.47 86.50
## [78] 83.12 85.67 84.75 85.08 81.38 83.67 84.29 82.50 85.77 86.21 95.17
## [89] 86.14 83.67 83.30 90.67 85.67 80.31 78.45 84.59 91.80 83.55 83.29
## [100] 83.26 83.86 82.83 98.17 87.58 90.33 83.59 82.36 82.92 82.08 80.17
## [111] 79.83 84.27 84.61 84.35 81.91 84.05 87.46 85.61 94.60 83.75 89.00
## [122] 79.28 92.84 85.30 92.43 84.31 85.55 81.03 82.97 81.43 82.69 82.94
## [133] 83.30 79.52 83.56 98.33 81.11 87.18 82.64 89.89 85.12 82.25 80.36
## [144] 90.67 81.00 86.83 82.86 85.72 79.23 91.25 88.95 80.00 78.45 84.46
## [155] 84.64 91.83 83.33 83.64 81.00 82.00 81.83 83.56 84.17 81.79 91.54
## [166] 86.52 86.50 87.60 87.72 81.57 83.00 81.17 86.43 84.26 90.83 85.47
## [177] 81.33 82.18 86.21 81.02 83.10 81.02 84.00 86.33 83.94 83.50 93.73
## [188] 89.64 91.92 85.16 81.55 78.00 85.21 82.33 87.91 78.46 81.27 86.83
## [199] 83.92 91.07 86.44 79.20 86.80 88.02 84.24 88.23 84.06 85.81 78.97
## [210] 81.58 86.33 89.50 95.50 84.44 84.00 81.61 83.54 88.25 86.67 84.53
## [221] 82.62 82.03 82.74 87.17 89.98 85.83 91.33 80.84 90.44 85.08 85.67
## [232] 79.36 86.52 87.40 85.83 95.50 81.13 88.33 83.00 82.79 87.67 88.67
## [243] 81.72 83.18 88.72 87.26 86.79 87.55 79.48 97.17 89.81 82.57 88.10
## [254] 86.31 90.17 78.00 80.63 89.34 83.43 84.33 89.00 82.39 79.51 80.88
## [265] 79.55 86.67 85.74 87.33 83.58 87.63 82.00 84.83 83.61 87.00 87.83
## [276] 82.53 85.00 86.67 90.60 87.20 83.07 88.00 88.40 85.60 83.78 81.63
## [287] 86.48 82.00 80.72 85.11 80.60 87.83 82.57 89.39 81.90 85.17 83.89
## [298] 90.13 87.20 86.33 83.08 86.83 89.84 84.75 88.17 83.90 80.67 93.33
## [309] 82.84 79.40 82.06 86.89 80.09 78.43 80.65 81.42 82.39 83.27 82.91
## [320] 78.80 89.11 86.00 80.84 81.69 80.30 80.35 94.89 86.38 82.00 81.50
## [331] 87.93 87.14 82.18 93.00 86.20 83.47 81.18 82.75 89.32 88.33 84.83
## [342] 85.17 86.84 88.25 79.50 86.97 81.11 84.73 85.80 80.00 84.82 81.20
## [353] 85.40 81.39 79.14 80.30 86.37 83.20 85.00 82.43 79.68 83.60 81.81
## [364] 93.00 79.47 84.89 86.53 89.50 88.33 79.75 85.07 83.70 81.30 86.33
## [375] 78.65 81.28 78.19 81.83 83.33 89.79 82.71 81.07 81.48 86.06 90.83
## [386] 76.00 86.57 82.14 87.58 81.90 94.00 93.17 85.38 88.17 88.64 89.00
## [397] 82.25 83.61 84.67 77.91 87.83 81.64 83.77 80.65 83.89 78.67 81.82
## [408] 89.58 83.80 91.61 87.58 88.00 88.06 91.17 88.40 86.38 84.80 91.00
## [419] 82.42 88.07 95.33 89.83 79.83 81.24 92.40
mean(quimica)
## [1] 84.81859
var(quimica)
## [1] 15.01137
sd(quimica)
## [1] 3.874451
sd(quimica)/mean(quimica)*100
## [1] 4.567926
barplot(table(quimica))
barplot(table(sd(quimica)/mean(quimica)*100))
#MECATRONICA ##Datos
mecatronica= datos$promedio[which(datos$carrera == 'MECATRONICA' & datos$promedio > 0)]
mecatronica
## [1] 79.38 77.55 86.42 82.39 80.33 91.60 88.75 81.15 91.57 76.00 81.77
## [12] 85.39 85.22 88.12 89.10 81.23 85.93 81.95 75.83 79.50 83.36 89.83
## [23] 91.58 89.08 76.50 84.52 88.76 87.38 81.70 79.65 80.65 98.17 98.59
## [34] 87.00 85.19 84.41 84.17 81.76 85.82 93.11 79.06 86.09 91.48 80.44
## [45] 79.75 93.24 85.23 83.08 81.70 81.24 82.82 83.72 91.72 77.38 82.07
## [56] 81.50 81.10 84.55 80.63 86.47 86.17 78.38 80.25 79.10 85.91 82.39
## [67] 77.89 77.29 89.59 83.97 85.59 89.17 81.33 84.14 79.92 88.15 80.83
## [78] 86.96 82.97 81.42 85.67 84.89 86.06 85.07 79.00 87.50 75.74 88.33
## [89] 81.63 84.92 76.75 91.60 76.96 80.12 79.41 82.15 83.50 77.22 86.72
## [100] 80.53 81.82 81.09 81.00 84.46 78.14 77.89 83.85 79.67 81.39 92.10
## [111] 86.46 83.90 81.96 82.30 83.49 83.36 81.37 86.28 84.03 80.11 81.94
## [122] 82.53 80.76 84.17 86.14 89.52 86.02 82.95 83.94 84.00 79.54 82.36
## [133] 87.90 82.48 82.08 82.19 88.85 82.14 84.92 81.92 85.35 78.63 86.32
## [144] 79.53 86.90 81.63 82.68 94.90 85.38 85.30 88.90 80.04 91.10 82.58
## [155] 85.04 87.72 91.63 87.17 83.19 81.98 89.39 80.47 79.90 82.88 81.44
## [166] 90.68 82.75 80.34 78.07 87.90 81.94 78.60 83.85 82.79 80.48 78.38
## [177] 81.34 86.76 90.69 77.89 80.73 81.97 86.89 82.36 87.41 84.63 81.00
## [188] 92.11 81.07 82.47 82.09 91.59 90.49 84.00 80.41 80.19 84.91 81.52
## [199] 83.42 80.15 81.57 82.89 85.63 85.64 80.74 83.82 85.61 80.54 91.88
## [210] 78.53 88.52 84.56 82.74 82.55 81.43 89.48 79.94 89.19 80.70 86.83
## [221] 78.25 80.35 87.83 81.11 76.11 83.71 89.47 86.47 84.06 79.50 82.88
## [232] 95.50 81.86 79.90 87.39 80.27 77.80 89.36 86.04 87.17 83.38 84.97
## [243] 84.62 84.15 86.06 83.60 83.25 80.40 78.83 75.76 77.43 85.00 81.70
## [254] 78.10 87.89 85.00 86.56 81.02 82.47 90.22 77.11 82.52 95.75 84.15
## [265] 87.11 84.21 83.79 83.00 82.39 81.59 83.41 82.70 80.88 82.79 78.93
## [276] 81.19 85.86 92.68 81.96 78.17 83.00 88.52 81.31 80.43 78.54 83.31
## [287] 81.00 81.41 81.74 78.76 86.36 92.00 82.61 86.87 78.88 84.61 81.76
## [298] 79.13 87.02 81.47 86.29 87.67 79.58 81.97 80.80 81.60 86.69 80.68
## [309] 86.15 79.57 80.74 87.63 80.85 84.63 83.50 78.39 82.13 84.34 87.79
## [320] 78.45 81.21 80.13 88.47 81.05 96.00 79.51 92.17 79.54 80.08 85.43
## [331] 85.50 80.52 81.94 78.50 78.40 78.00 77.21 80.78 83.64 79.92 81.43
## [342] 94.14 80.20 79.33 87.15 80.92 80.56 81.00 78.77 81.86 76.56 83.67
## [353] 87.34 82.20 80.35 88.42 88.83 85.67 84.67 83.67 83.71 85.83 81.60
## [364] 86.92 82.20 83.60 90.00 92.20 85.00 88.00 87.33 81.40 80.88 93.17
## [375] 90.67 82.40 81.50 88.00 84.00 86.75 86.67 83.42 81.43 81.00 81.00
## [386] 80.10 84.17 88.17 87.33 84.83 82.09 86.17 88.75 85.80 82.17 84.00
## [397] 81.50 84.67 88.00 82.33 89.67 89.50 86.00 83.44 84.80 82.73 87.50
## [408] 89.67 85.83 83.50 80.25 94.67 83.17 89.50 82.40 83.40 83.17 91.17
## [419] 86.00 85.00 85.92 97.33 80.33 84.83 81.60 89.33 81.00 83.50 88.17
## [430] 86.50 86.75 83.73 88.33 92.00 81.50 89.33 79.56 84.17 82.25 84.83
## [441] 78.80 80.00 87.33 86.00 82.70 81.86 87.17 86.40 79.18 84.33 78.50
## [452] 92.17 83.67 88.18 84.33 85.20 86.33 86.92 92.83 94.60 87.00 82.64
## [463] 89.00 90.50 84.27 91.33 82.80
mean(mecatronica)
## [1] 84.0006
var(mecatronica)
## [1] 17.35334
sd(mecatronica)
## [1] 4.165734
sd(mecatronica)/mean(mecatronica)*100
## [1] 4.959172
barplot(table(mecatronica))
barplot(table(sd(mecatronica)/mean(mecatronica)*100))
sd(civil)/mean(civil)*100
## [1] 5.129684
sd(Arquitectura)/mean(Arquitectura)*100
## [1] 4.259235
sd(quimica)/mean(quimica)*100
## [1] 4.567926
sd(mecatronica)/mean(mecatronica)*100
## [1] 4.959172