library(readr) # Para poder leer datos de un archivo
library(dplyr) # Para usar filtros sobre los datos
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(ggplot2) # Para gráficas
## Warning: package 'ggplot2' was built under R version 3.4.4
datos <- read.csv("https://raw.githubusercontent.com/rpizarrog/DatosPromediosAG2017-EN2018-AD2018-/master/todos%20los%20semestres.csv")
head(datos) # Los primeros seis registros
## Carrera NoSemestre CrAprobados Carga Promedio Semestre
## 1 ADMINISTRACION 1 NA 27 0 Ago-Dic 2017
## 2 ADMINISTRACION 1 NA 27 0 Ago-Dic 2017
## 3 ADMINISTRACION 1 NA 27 0 Ago-Dic 2017
## 4 ADMINISTRACION 1 NA 27 0 Ago-Dic 2017
## 5 ADMINISTRACION 1 NA 27 0 Ago-Dic 2017
## 6 ADMINISTRACION 1 NA 27 0 Ago-Dic 2017
tail(datos) # los últimos seis registros
## Carrera NoSemestre CrAprobados Carga Promedio Semestre
## 18755 TIC 10 225 10 84.39 Ene-Jun 2018
## 18756 TIC 10 231 14 86.54 Ene-Jun 2018
## 18757 TIC 12 179 31 80.44 Ene-Jun 2018
## 18758 TIC 12 245 5 81.92 Ene-Jun 2018
## 18759 TIC 12 213 18 82.22 Ene-Jun 2018
## 18760 TIC 12 246 14 90.23 Ene-Jun 2018
names(datos)
## [1] "Carrera" "NoSemestre" "CrAprobados" "Carga" "Promedio"
## [6] "Semestre"
distinct(datos, Carrera)
## Carrera
## 1 ADMINISTRACION
## 2 ARQUITECTURA
## 3 BIOQUIMICA
## 4 CIVIL
## 5 ELECTRICA
## 6 ELECTRONICA
## 7 GESTION EMPRESARIAL
## 8 INDUSTRIAL
## 9 INFORMATICA
## 10 MECANICA
## 11 MECATRONICA
## 12 QUIMICA
## 13 SISTEMAS
## 14 TIC
## 15 ARQUITECTURA
## 16 BIOQUIMICA
## 17 ELECTRONICA
## 18 INDUSTRIAL
distinct(datos, NoSemestre)
## NoSemestre
## 1 1
## 2 2
## 3 3
## 4 4
## 5 5
## 6 6
## 7 7
## 8 8
## 9 9
## 10 10
## 11 11
## 12 12
## 13 13
## 14 14
## 15 18
## 16 15
## 17 19
## 18 17
## 19 16
distinct(datos, Semestre)
## Semestre
## 1 Ago-Dic 2017
## 2 Ago-Dic 2018
## 3 Ene-Jun 2018
summary(datos) ## Incluye todos los datos
## Carrera NoSemestre CrAprobados
## GESTION EMPRESARIAL:1954 Min. : 1.000 Min. : 0.0
## CIVIL :1952 1st Qu.: 3.000 1st Qu.: 54.0
## MECATRONICA :1622 Median : 5.000 Median :113.0
## INDUSTRIAL :1605 Mean : 5.429 Mean :119.9
## QUIMICA :1485 3rd Qu.: 8.000 3rd Qu.:178.0
## ARQUITECTURA :1444 Max. :19.000 Max. :380.0
## (Other) :8698 NA's :2635
## Carga Promedio Semestre
## Min. : 3.00 Min. : 0.00 Ago-Dic 2017:6556
## 1st Qu.:23.00 1st Qu.: 80.00 Ago-Dic 2018:6258
## Median :27.00 Median : 83.50 Ene-Jun 2018:5946
## Mean :25.75 Mean : 72.89
## 3rd Qu.:30.00 3rd Qu.: 87.17
## Max. :46.00 Max. :100.00
##
# Datos de alumnos de ADMINISTRACION que tienen promedio mayor que 0
administracion <- filter(datos, Carrera == "ADMINISTRACION" & Promedio > 0)
# La media de su promedio
mean(administracion$Promedio)
## [1] 87.44905
# Datos de alumnos de ADMINISTRACION de Ago-Dic 2017, que tienen promedio mayor que 0
administracionAgoDic2017 <- filter(datos, Carrera == "ADMINISTRACION" & Promedio > 0 & Semestre == "Ago-Dic 2017")
# La media de su promedio de ese semestre
mean(administracionAgoDic2017$Promedio)
## [1] 87.1857
# Datos de alumnos de ADMINISTRACION de Ene-Jun 2018, que tienen promedio mayor que 0
administracionEneJun2018 <- filter(datos, Carrera == "ADMINISTRACION" & Promedio > 0 & Semestre == "Ene-Jun 2018")
# La media de su promedio de ese semestre
mean(administracionEneJun2018$Promedio)
## [1] 87.55068
# Datos de alumnos de ADMINISTRACION de Ago-Dic 2018, que tienen promedio mayor que 0
administracionAgoDic2018 <- filter(datos, Carrera == "ADMINISTRACION" & Promedio > 0 & Semestre == "Ago-Dic 2018")
# La media de su promedio de ese semestre
mean(administracionAgoDic2018$Promedio)
## [1] 87.67191
# De cualquier carrera de cualquier semestre, cuyo promedio sea mayor que cero
datosfiltrados <- filter(datos, Carrera == "INDUSTRIAL" & Promedio > 0 & Semestre == "Ago-Dic 2017" & NoSemestre == 9)
mean(datosfiltrados$Promedio)
## [1] 85.01143
filter(datos, Promedio > 0) %>%
group_by(Carrera) %>%
summarise(mean = mean(Promedio), desvstd = sd(Promedio), n = n())
## # A tibble: 18 x 4
## Carrera mean desvstd n
## <fctr> <dbl> <dbl> <int>
## 1 ADMINISTRACION 87.44905 4.117623 1105
## 2 ARQUITECTURA 85.24013 3.779739 1266
## 3 ARQUITECTURA 85.08945 3.624160 586
## 4 BIOQUIMICA 84.25941 4.389943 664
## 5 BIOQUIMICA 84.41139 4.385375 324
## 6 CIVIL 83.89269 4.313781 1690
## 7 ELECTRICA 84.56913 3.524380 710
## 8 ELECTRONICA 84.03612 4.519782 400
## 9 ELECTRONICA 85.14294 5.672286 197
## 10 GESTION EMPRESARIAL 86.88992 4.081610 1707
## 11 INDUSTRIAL 84.74403 4.470359 1409
## 12 INDUSTRIAL 85.18449 4.719669 659
## 13 INFORMATICA 84.23442 4.264997 335
## 14 MECANICA 82.54475 4.121457 885
## 15 MECATRONICA 83.72073 4.100071 1434
## 16 QUIMICA 84.68618 3.791154 1276
## 17 SISTEMAS 84.80859 4.477546 1252
## 18 TIC 84.25411 4.312769 214
filter(datos, Promedio > 0) %>%
group_by(Carrera, Semestre) %>%
summarise(mean = mean(Promedio), desvstd = sd(Promedio), n = n())
## # A tibble: 42 x 5
## # Groups: Carrera [?]
## Carrera Semestre mean desvstd n
## <fctr> <fctr> <dbl> <dbl> <int>
## 1 ADMINISTRACION Ago-Dic 2017 87.18570 4.330804 407
## 2 ADMINISTRACION Ago-Dic 2018 87.67191 3.939032 299
## 3 ADMINISTRACION Ene-Jun 2018 87.55068 4.020138 399
## 4 ARQUITECTURA Ago-Dic 2017 85.04016 3.753101 621
## 5 ARQUITECTURA Ago-Dic 2018 85.43267 3.798172 645
## 6 ARQUITECTURA Ene-Jun 2018 85.08945 3.624160 586
## 7 BIOQUIMICA Ago-Dic 2017 84.35411 4.332458 316
## 8 BIOQUIMICA Ago-Dic 2018 84.17342 4.445977 348
## 9 BIOQUIMICA Ene-Jun 2018 84.41139 4.385375 324
## 10 CIVIL Ago-Dic 2017 83.95414 4.263399 715
## # ... with 32 more rows
parametros <- c("ADMINISTRACION", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 87.0675
parametros <- c("ADMINISTRACION", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 90.23863
parametros <- c("ADMINISTRACION", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 87.41836
# En cuál Periodo Semestral de alumnos de ADMINISTRACION de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("ARQUITECTURA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 84.50449
parametros <- c("ARQUITECTURA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
parametros <- c("ARQUITECTURA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 84.49708
# En cuál Periodo Semestral de alumnos de ARQUITECTURA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("BIOQUIMICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 83.41105
parametros <- c("BIOQUIMICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
parametros <- c("BIOQUIMICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 81.69316
# En cuál Periodo Semestral de alumnos de BIOQUIMICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("CIVIL", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.80843
parametros <- c("CIVIL", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 84.26528
parametros <- c("CIVIL", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 81.69316
# En cuál Periodo Semestral de alumnos de CIVIL de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("ELECTRICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 84.79188
parametros <- c("ELECTRICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.07231
parametros <- c("ELECTRICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.93333
# En cuál Periodo Semestral de alumnos de ELECTRICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("ELECTRONICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.55333
parametros <- c("ELECTRONICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
parametros <- c("ELECTRONICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 87.55333
# En cuál Periodo Semestral de alumnos de ELECTRONICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("GESTION EMPRESARIAL", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.37556
parametros <- c("GESTION EMPRESARIAL", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 88.90451
parametros <- c("GESTION EMPRESARIAL", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.78184
# En cuál Periodo Semestral de alumnos de GESTION EMPRESARIAL de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("INDUSTRIAL", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 83.11696
parametros <- c("INDUSTRIAL", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
parametros <- c("INDUSTRIAL", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 84.46869
# En cuál Periodo Semestral de alumnos de INDUSTRIAL de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("INFORMATICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
parametros <- c("INFORMATICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.6955
parametros <- c("INFORMATICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
# En cuál Periodo Semestral de alumnos de INFORMATICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("MECANICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.735
parametros <- c("MECANICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 84.25909
parametros <- c("MECANICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 81.96684
# En cuál Periodo Semestral de alumnos de MECANICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("QUIMICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.77735
parametros <- c("QUIMICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.29887
parametros <- c("QUIMICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.8519
# En cuál Periodo Semestral de alumnos de QUIMICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("MECATRONICA", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.98918
parametros <- c("MECATRONICA", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 85.11891
parametros <- c("MECATRONICA", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 83.29103
# En cuál Periodo Semestral de alumnos de MECATRONICA de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("SISTEMAS", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 80.68414
parametros <- c("SISTEMAS", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 88.19977
parametros <- c("SISTEMAS", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 82.74018
# En cuál Periodo Semestral de alumnos de SISTEMAS de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
parametros <- c("TIC", "Ago-Dic 2017", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
parametros <- c("TIC", "Ene-Jun 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] 86.64222
parametros <- c("TIC", "Ago-Dic 2018", 4)
datosfiltrados <- filter(datos, Carrera == parametros[1] & Promedio > 0 & Semestre == parametros[2] & NoSemestre == parametros[3])
mean(datosfiltrados$Promedio)
## [1] NaN
# En cuál Periodo Semestral de alumnos de TIC de los tres semestre ("Ago-Dic 2017", "Ene-Jun 2018", "Ago-Dic 2018"), hubo mejor promedio en 4to Semestre.
resumen <- as.data.frame(filter(datos, Promedio > 0) %>%
group_by(Carrera, Semestre, NoSemestre) %>%
summarise(mean = mean(Promedio), desvstd = sd(Promedio), n = n()))
resumen
## Carrera Semestre NoSemestre mean desvstd n
## 1 ADMINISTRACION Ago-Dic 2017 1 81.54667 4.0154742 3
## 2 ADMINISTRACION Ago-Dic 2017 2 85.57083 4.5204838 60
## 3 ADMINISTRACION Ago-Dic 2017 3 89.90392 4.2306931 51
## 4 ADMINISTRACION Ago-Dic 2017 4 87.06750 3.1259724 32
## 5 ADMINISTRACION Ago-Dic 2017 5 87.85796 3.7173871 49
## 6 ADMINISTRACION Ago-Dic 2017 6 85.30531 3.9358731 32
## 7 ADMINISTRACION Ago-Dic 2017 7 87.68661 4.1345834 62
## 8 ADMINISTRACION Ago-Dic 2017 8 85.37882 3.5474566 17
## 9 ADMINISTRACION Ago-Dic 2017 9 88.61683 4.6239802 63
## 10 ADMINISTRACION Ago-Dic 2017 10 85.46364 3.0874933 22
## 11 ADMINISTRACION Ago-Dic 2017 11 83.98167 2.0863227 12
## 12 ADMINISTRACION Ago-Dic 2017 12 80.67000 NaN 1
## 13 ADMINISTRACION Ago-Dic 2017 13 90.34000 NaN 1
## 14 ADMINISTRACION Ago-Dic 2017 14 84.88000 1.3293607 2
## 15 ADMINISTRACION Ago-Dic 2018 2 84.60429 2.2086252 28
## 16 ADMINISTRACION Ago-Dic 2018 3 88.54671 4.3308240 73
## 17 ADMINISTRACION Ago-Dic 2018 4 87.41836 3.8573411 55
## 18 ADMINISTRACION Ago-Dic 2018 5 88.60121 3.5459358 33
## 19 ADMINISTRACION Ago-Dic 2018 6 87.35357 2.1644491 14
## 20 ADMINISTRACION Ago-Dic 2018 7 87.97839 3.5957448 31
## 21 ADMINISTRACION Ago-Dic 2018 8 85.97800 4.4690830 15
## 22 ADMINISTRACION Ago-Dic 2018 9 89.08500 3.9593364 38
## 23 ADMINISTRACION Ago-Dic 2018 10 85.89333 3.0027032 6
## 24 ADMINISTRACION Ago-Dic 2018 11 87.29000 2.6870058 2
## 25 ADMINISTRACION Ago-Dic 2018 12 83.02667 2.1661102 3
## 26 ADMINISTRACION Ago-Dic 2018 13 85.02000 NaN 1
## 27 ADMINISTRACION Ene-Jun 2018 2 88.17299 4.3160618 77
## 28 ADMINISTRACION Ene-Jun 2018 3 86.51873 3.3789359 55
## 29 ADMINISTRACION Ene-Jun 2018 4 90.23863 4.0477698 51
## 30 ADMINISTRACION Ene-Jun 2018 5 87.59161 3.2038426 31
## 31 ADMINISTRACION Ene-Jun 2018 6 87.97167 3.7849615 48
## 32 ADMINISTRACION Ene-Jun 2018 7 85.96742 3.5123335 31
## 33 ADMINISTRACION Ene-Jun 2018 8 88.15639 4.0251377 61
## 34 ADMINISTRACION Ene-Jun 2018 9 84.74286 2.8009268 14
## 35 ADMINISTRACION Ene-Jun 2018 10 84.62263 2.6571013 19
## 36 ADMINISTRACION Ene-Jun 2018 11 83.14000 1.7441617 7
## 37 ADMINISTRACION Ene-Jun 2018 12 85.19600 1.3513808 5
## 38 ARQUITECTURA Ago-Dic 2017 1 82.29600 2.8130642 5
## 39 ARQUITECTURA Ago-Dic 2017 2 83.07063 3.7266319 79
## 40 ARQUITECTURA Ago-Dic 2017 3 86.65947 3.9829342 75
## 41 ARQUITECTURA Ago-Dic 2017 4 84.50449 3.9100044 78
## 42 ARQUITECTURA Ago-Dic 2017 5 85.22852 3.1772608 61
## 43 ARQUITECTURA Ago-Dic 2017 6 84.33969 2.9211032 65
## 44 ARQUITECTURA Ago-Dic 2017 7 85.61547 3.6038070 64
## 45 ARQUITECTURA Ago-Dic 2017 8 84.80643 3.7554220 56
## 46 ARQUITECTURA Ago-Dic 2017 9 87.69294 3.7716566 51
## 47 ARQUITECTURA Ago-Dic 2017 10 84.75339 3.1436946 56
## 48 ARQUITECTURA Ago-Dic 2017 11 84.85571 3.3996641 21
## 49 ARQUITECTURA Ago-Dic 2017 12 83.36857 1.5005602 7
## 50 ARQUITECTURA Ago-Dic 2017 13 83.76000 3.4931075 2
## 51 ARQUITECTURA Ago-Dic 2017 18 83.90000 NaN 1
## 52 ARQUITECTURA Ago-Dic 2018 2 87.50100 4.1721398 80
## 53 ARQUITECTURA Ago-Dic 2018 3 84.93015 3.6409383 67
## 54 ARQUITECTURA Ago-Dic 2018 4 84.49708 4.0423238 72
## 55 ARQUITECTURA Ago-Dic 2018 5 86.33232 3.6304534 69
## 56 ARQUITECTURA Ago-Dic 2018 6 84.54301 3.9948452 73
## 57 ARQUITECTURA Ago-Dic 2018 7 86.07193 3.2119039 57
## 58 ARQUITECTURA Ago-Dic 2018 8 84.62631 3.0486229 65
## 59 ARQUITECTURA Ago-Dic 2018 9 86.00790 3.7191380 62
## 60 ARQUITECTURA Ago-Dic 2018 10 85.24436 3.8566560 55
## 61 ARQUITECTURA Ago-Dic 2018 11 84.87687 2.9765634 16
## 62 ARQUITECTURA Ago-Dic 2018 12 82.85125 1.9780559 16
## 63 ARQUITECTURA Ago-Dic 2018 13 84.18000 2.3491511 10
## 64 ARQUITECTURA Ago-Dic 2018 14 82.34500 0.1060660 2
## 65 ARQUITECTURA Ago-Dic 2018 16 83.43000 NaN 1
## 66 ARQUITECTURA Ene-Jun 2018 2 85.49292 3.7107819 72
## 67 ARQUITECTURA Ene-Jun 2018 3 84.51230 3.7357472 74
## 68 ARQUITECTURA Ene-Jun 2018 4 86.67408 3.8208079 71
## 69 ARQUITECTURA Ene-Jun 2018 5 84.08173 3.7955576 75
## 70 ARQUITECTURA Ene-Jun 2018 6 85.82610 3.2251902 59
## 71 ARQUITECTURA Ene-Jun 2018 7 84.59323 2.8272171 65
## 72 ARQUITECTURA Ene-Jun 2018 8 85.89000 3.6886565 63
## 73 ARQUITECTURA Ene-Jun 2018 9 84.85679 3.8633048 56
## 74 ARQUITECTURA Ene-Jun 2018 10 84.77400 2.9368053 20
## 75 ARQUITECTURA Ene-Jun 2018 11 82.46944 2.0183641 18
## 76 ARQUITECTURA Ene-Jun 2018 12 83.69909 2.2291274 11
## 77 ARQUITECTURA Ene-Jun 2018 13 83.53000 1.7960512 2
## 78 BIOQUIMICA Ago-Dic 2017 1 85.50000 NaN 1
## 79 BIOQUIMICA Ago-Dic 2017 2 85.22421 3.6447699 19
## 80 BIOQUIMICA Ago-Dic 2017 3 86.21512 4.3975249 41
## 81 BIOQUIMICA Ago-Dic 2017 4 83.41105 2.9892453 19
## 82 BIOQUIMICA Ago-Dic 2017 5 83.99556 4.6136789 54
## 83 BIOQUIMICA Ago-Dic 2017 6 82.46412 3.5509489 17
## 84 BIOQUIMICA Ago-Dic 2017 7 85.98778 4.2471723 45
## 85 BIOQUIMICA Ago-Dic 2017 8 82.45097 2.9934054 31
## 86 BIOQUIMICA Ago-Dic 2017 9 86.52204 4.3352547 49
## 87 BIOQUIMICA Ago-Dic 2017 10 80.14267 2.3660862 15
## 88 BIOQUIMICA Ago-Dic 2017 11 81.30389 1.9301208 18
## 89 BIOQUIMICA Ago-Dic 2017 12 79.51500 1.0818734 2
## 90 BIOQUIMICA Ago-Dic 2017 13 80.35250 4.0803298 4
## 91 BIOQUIMICA Ago-Dic 2017 15 82.80000 NaN 1
## 92 BIOQUIMICA Ago-Dic 2018 2 85.88950 4.7906779 40
## 93 BIOQUIMICA Ago-Dic 2018 3 83.99206 4.8017874 63
## 94 BIOQUIMICA Ago-Dic 2018 4 81.69316 2.9149863 19
## 95 BIOQUIMICA Ago-Dic 2018 5 85.46872 4.3051189 39
## 96 BIOQUIMICA Ago-Dic 2018 6 82.74842 2.8181697 19
## 97 BIOQUIMICA Ago-Dic 2018 7 85.05375 4.8412495 48
## 98 BIOQUIMICA Ago-Dic 2018 8 83.03312 3.0815401 16
## 99 BIOQUIMICA Ago-Dic 2018 9 86.00311 4.5542247 45
## 100 BIOQUIMICA Ago-Dic 2018 10 82.40786 3.1062617 28
## 101 BIOQUIMICA Ago-Dic 2018 11 82.90643 2.5297145 14
## 102 BIOQUIMICA Ago-Dic 2018 12 79.01286 2.0678871 7
## 103 BIOQUIMICA Ago-Dic 2018 13 80.55778 1.8923846 9
## 104 BIOQUIMICA Ago-Dic 2018 15 80.13000 NaN 1
## 105 BIOQUIMICA Ene-Jun 2018 2 86.17462 4.3198297 65
## 106 BIOQUIMICA Ene-Jun 2018 3 83.75632 3.0572504 19
## 107 BIOQUIMICA Ene-Jun 2018 4 85.49289 4.7231036 38
## 108 BIOQUIMICA Ene-Jun 2018 5 83.25842 2.8652114 19
## 109 BIOQUIMICA Ene-Jun 2018 6 84.64635 4.8400875 52
## 110 BIOQUIMICA Ene-Jun 2018 7 82.75000 3.5160898 17
## 111 BIOQUIMICA Ene-Jun 2018 8 85.92500 4.5466172 46
## 112 BIOQUIMICA Ene-Jun 2018 9 82.40900 2.7730033 30
## 113 BIOQUIMICA Ene-Jun 2018 10 83.60842 3.2485728 19
## 114 BIOQUIMICA Ene-Jun 2018 11 79.02625 1.6881599 8
## 115 BIOQUIMICA Ene-Jun 2018 12 79.82625 1.6367907 8
## 116 BIOQUIMICA Ene-Jun 2018 13 78.85000 NaN 1
## 117 BIOQUIMICA Ene-Jun 2018 14 77.80000 NaN 1
## 118 BIOQUIMICA Ene-Jun 2018 15 76.72000 NaN 1
## 119 CIVIL Ago-Dic 2017 1 76.25000 NaN 1
## 120 CIVIL Ago-Dic 2017 2 86.84293 4.2028211 75
## 121 CIVIL Ago-Dic 2017 3 84.03861 3.6768684 72
## 122 CIVIL Ago-Dic 2017 4 82.80843 3.2444622 70
## 123 CIVIL Ago-Dic 2017 5 85.52373 4.1774401 67
## 124 CIVIL Ago-Dic 2017 6 83.40329 3.5087380 82
## 125 CIVIL Ago-Dic 2017 7 84.61389 4.6588155 72
## 126 CIVIL Ago-Dic 2017 8 83.99321 4.5051467 81
## 127 CIVIL Ago-Dic 2017 9 84.70671 4.7932586 73
## 128 CIVIL Ago-Dic 2017 10 81.56349 3.3256400 63
## 129 CIVIL Ago-Dic 2017 11 82.99091 3.6196828 22
## 130 CIVIL Ago-Dic 2017 12 80.10087 1.7865404 23
## 131 CIVIL Ago-Dic 2017 13 81.33889 3.5937983 9
## 132 CIVIL Ago-Dic 2017 14 80.66000 1.0314310 5
## 133 CIVIL Ago-Dic 2018 2 85.88950 4.7906779 40
## 134 CIVIL Ago-Dic 2018 3 83.99206 4.8017874 63
## 135 CIVIL Ago-Dic 2018 4 81.69316 2.9149863 19
## 136 CIVIL Ago-Dic 2018 5 85.46872 4.3051189 39
## 137 CIVIL Ago-Dic 2018 6 82.74842 2.8181697 19
## 138 CIVIL Ago-Dic 2018 7 85.05375 4.8412495 48
## 139 CIVIL Ago-Dic 2018 8 83.03312 3.0815401 16
## 140 CIVIL Ago-Dic 2018 9 86.00311 4.5542247 45
## 141 CIVIL Ago-Dic 2018 10 82.40786 3.1062617 28
## 142 CIVIL Ago-Dic 2018 11 82.90643 2.5297145 14
## 143 CIVIL Ago-Dic 2018 12 79.01286 2.0678871 7
## 144 CIVIL Ago-Dic 2018 13 80.55778 1.8923846 9
## 145 CIVIL Ago-Dic 2018 15 80.13000 NaN 1
## 146 CIVIL Ene-Jun 2018 2 86.19672 3.7981357 67
## 147 CIVIL Ene-Jun 2018 3 84.14397 4.7258158 73
## 148 CIVIL Ene-Jun 2018 4 84.26528 4.3918757 72
## 149 CIVIL Ene-Jun 2018 5 82.45731 3.2544601 67
## 150 CIVIL Ene-Jun 2018 6 85.61364 4.3082821 66
## 151 CIVIL Ene-Jun 2018 7 82.90667 3.6509762 81
## 152 CIVIL Ene-Jun 2018 8 84.56901 4.6544615 71
## 153 CIVIL Ene-Jun 2018 9 82.40339 3.5699380 59
## 154 CIVIL Ene-Jun 2018 10 81.37250 3.3506966 28
## 155 CIVIL Ene-Jun 2018 11 79.78071 2.8437155 28
## 156 CIVIL Ene-Jun 2018 12 81.02364 2.4753597 11
## 157 CIVIL Ene-Jun 2018 13 79.54333 1.6121518 3
## 158 CIVIL Ene-Jun 2018 14 75.33000 NaN 1
## 159 ELECTRICA Ago-Dic 2017 2 86.53143 2.2420038 7
## 160 ELECTRICA Ago-Dic 2017 3 85.93808 4.1272267 26
## 161 ELECTRICA Ago-Dic 2017 4 84.79188 2.2815703 16
## 162 ELECTRICA Ago-Dic 2017 5 85.47611 2.7029796 36
## 163 ELECTRICA Ago-Dic 2017 6 83.89571 2.7279232 14
## 164 ELECTRICA Ago-Dic 2017 7 86.46756 3.9039026 45
## 165 ELECTRICA Ago-Dic 2017 8 84.68357 3.2801867 14
## 166 ELECTRICA Ago-Dic 2017 9 83.00792 3.1333219 48
## 167 ELECTRICA Ago-Dic 2017 10 81.91857 2.1593242 7
## 168 ELECTRICA Ago-Dic 2017 11 81.39417 1.9283269 12
## 169 ELECTRICA Ago-Dic 2017 12 81.35286 1.5123019 7
## 170 ELECTRICA Ago-Dic 2017 13 82.96667 3.2808739 3
## 171 ELECTRICA Ago-Dic 2017 14 78.70000 NaN 1
## 172 ELECTRICA Ago-Dic 2018 2 81.39294 4.4695103 17
## 173 ELECTRICA Ago-Dic 2018 3 86.96758 3.3041943 33
## 174 ELECTRICA Ago-Dic 2018 4 85.93333 0.9159622 6
## 175 ELECTRICA Ago-Dic 2018 5 85.05522 3.6022832 23
## 176 ELECTRICA Ago-Dic 2018 6 83.58267 2.0780192 15
## 177 ELECTRICA Ago-Dic 2018 7 84.84647 2.7019980 34
## 178 ELECTRICA Ago-Dic 2018 8 82.81231 2.3897669 13
## 179 ELECTRICA Ago-Dic 2018 9 86.19659 3.6542261 41
## 180 ELECTRICA Ago-Dic 2018 10 84.33615 3.4283318 13
## 181 ELECTRICA Ago-Dic 2018 11 81.60559 2.2176266 34
## 182 ELECTRICA Ago-Dic 2018 12 81.08000 0.8986657 4
## 183 ELECTRICA Ago-Dic 2018 13 81.96500 2.3342165 4
## 184 ELECTRICA Ago-Dic 2018 14 80.41000 NaN 1
## 185 ELECTRICA Ene-Jun 2018 2 86.96135 3.0046077 37
## 186 ELECTRICA Ene-Jun 2018 3 85.99000 0.7589466 7
## 187 ELECTRICA Ene-Jun 2018 4 85.07231 3.6314089 26
## 188 ELECTRICA Ene-Jun 2018 5 83.79600 2.2276150 15
## 189 ELECTRICA Ene-Jun 2018 6 85.35371 2.6899323 35
## 190 ELECTRICA Ene-Jun 2018 7 83.17615 2.5775975 13
## 191 ELECTRICA Ene-Jun 2018 8 86.33884 3.7885933 43
## 192 ELECTRICA Ene-Jun 2018 9 84.28857 3.3357016 14
## 193 ELECTRICA Ene-Jun 2018 10 81.78324 1.9621521 34
## 194 ELECTRICA Ene-Jun 2018 11 81.30333 0.9546238 6
## 195 ELECTRICA Ene-Jun 2018 12 82.06400 2.0661147 5
## 196 ELECTRICA Ene-Jun 2018 13 80.86000 NaN 1
## 197 ELECTRONICA Ago-Dic 2017 2 86.33667 5.7724193 9
## 198 ELECTRONICA Ago-Dic 2017 3 86.05636 4.7421796 33
## 199 ELECTRONICA Ago-Dic 2017 4 82.55333 3.2139540 9
## 200 ELECTRONICA Ago-Dic 2017 5 85.89419 3.7400863 31
## 201 ELECTRONICA Ago-Dic 2017 7 81.93885 2.8634809 26
## 202 ELECTRONICA Ago-Dic 2017 8 82.15000 5.2221528 6
## 203 ELECTRONICA Ago-Dic 2017 9 83.77340 3.5025303 47
## 204 ELECTRONICA Ago-Dic 2017 10 80.37000 1.3772073 3
## 205 ELECTRONICA Ago-Dic 2017 11 81.27056 2.6943219 18
## 206 ELECTRONICA Ago-Dic 2017 12 79.57900 1.4778622 10
## 207 ELECTRONICA Ago-Dic 2017 13 78.91000 1.6808569 6
## 208 ELECTRONICA Ago-Dic 2017 14 79.41000 0.3818377 2
## 209 ELECTRONICA Ago-Dic 2017 15 78.29500 1.5716128 4
## 210 ELECTRONICA Ago-Dic 2017 19 79.42000 NaN 1
## 211 ELECTRONICA Ago-Dic 2018 2 87.18769 4.0737087 13
## 212 ELECTRONICA Ago-Dic 2018 3 91.13033 2.9300565 30
## 213 ELECTRONICA Ago-Dic 2018 4 87.55333 5.4618739 6
## 214 ELECTRONICA Ago-Dic 2018 5 84.77179 3.7144972 28
## 215 ELECTRONICA Ago-Dic 2018 6 81.22500 2.7702243 8
## 216 ELECTRONICA Ago-Dic 2018 7 84.96750 3.8125102 28
## 217 ELECTRONICA Ago-Dic 2018 9 82.16833 3.1651357 24
## 218 ELECTRONICA Ago-Dic 2018 10 82.20600 6.2195241 5
## 219 ELECTRONICA Ago-Dic 2018 11 82.87000 2.7556815 32
## 220 ELECTRONICA Ago-Dic 2018 12 80.61000 1.6292329 3
## 221 ELECTRONICA Ago-Dic 2018 13 79.76800 1.5377892 10
## 222 ELECTRONICA Ago-Dic 2018 14 79.53500 1.8625520 4
## 223 ELECTRONICA Ago-Dic 2018 15 79.59333 1.2150857 3
## 224 ELECTRONICA Ago-Dic 2018 16 80.04000 NaN 1
## 225 ELECTRONICA Ene-Jun 2018 2 93.27743 4.8019202 35
## 226 ELECTRONICA Ene-Jun 2018 3 87.50750 6.6826315 8
## 227 ELECTRONICA Ene-Jun 2018 4 85.42679 3.8868611 28
## 228 ELECTRONICA Ene-Jun 2018 5 82.42000 3.2509471 8
## 229 ELECTRONICA Ene-Jun 2018 6 84.96800 3.6001412 30
## 230 ELECTRONICA Ene-Jun 2018 8 82.09240 3.0859322 25
## 231 ELECTRONICA Ene-Jun 2018 9 82.24000 6.0227901 5
## 232 ELECTRONICA Ene-Jun 2018 10 83.14314 3.5438910 35
## 233 ELECTRONICA Ene-Jun 2018 11 80.21667 1.6685722 3
## 234 ELECTRONICA Ene-Jun 2018 12 79.75364 1.6306948 11
## 235 ELECTRONICA Ene-Jun 2018 13 79.55800 1.4633250 5
## 236 ELECTRONICA Ene-Jun 2018 14 79.62667 1.6873747 3
## 237 ELECTRONICA Ene-Jun 2018 15 79.91000 NaN 1
## 238 GESTION EMPRESARIAL Ago-Dic 2017 1 83.30000 4.1012193 2
## 239 GESTION EMPRESARIAL Ago-Dic 2017 2 83.40722 4.4496024 79
## 240 GESTION EMPRESARIAL Ago-Dic 2017 3 89.77239 4.1191398 71
## 241 GESTION EMPRESARIAL Ago-Dic 2017 4 85.37556 3.0313091 63
## 242 GESTION EMPRESARIAL Ago-Dic 2017 5 87.76810 3.9204741 58
## 243 GESTION EMPRESARIAL Ago-Dic 2017 6 87.15761 3.6818614 67
## 244 GESTION EMPRESARIAL Ago-Dic 2017 7 89.19540 3.6858758 63
## 245 GESTION EMPRESARIAL Ago-Dic 2017 8 85.40925 3.8196057 53
## 246 GESTION EMPRESARIAL Ago-Dic 2017 9 87.87426 4.6189630 68
## 247 GESTION EMPRESARIAL Ago-Dic 2017 10 85.94943 2.8362547 35
## 248 GESTION EMPRESARIAL Ago-Dic 2017 11 86.48636 3.9129995 11
## 249 GESTION EMPRESARIAL Ago-Dic 2017 12 84.15000 1.9378682 7
## 250 GESTION EMPRESARIAL Ago-Dic 2017 13 85.27750 0.2794489 4
## 251 GESTION EMPRESARIAL Ago-Dic 2017 14 84.95167 2.3670523 6
## 252 GESTION EMPRESARIAL Ago-Dic 2018 2 84.68200 3.5824663 55
## 253 GESTION EMPRESARIAL Ago-Dic 2018 3 87.11879 3.5309430 66
## 254 GESTION EMPRESARIAL Ago-Dic 2018 4 85.78184 3.4494713 76
## 255 GESTION EMPRESARIAL Ago-Dic 2018 5 89.31913 3.3721283 69
## 256 GESTION EMPRESARIAL Ago-Dic 2018 6 85.64963 2.5139580 54
## 257 GESTION EMPRESARIAL Ago-Dic 2018 7 87.98745 3.9578966 55
## 258 GESTION EMPRESARIAL Ago-Dic 2018 8 87.82836 3.4225693 61
## 259 GESTION EMPRESARIAL Ago-Dic 2018 9 89.57129 3.5839439 62
## 260 GESTION EMPRESARIAL Ago-Dic 2018 10 85.03650 3.4687931 40
## 261 GESTION EMPRESARIAL Ago-Dic 2018 11 85.63429 3.3202820 14
## 262 GESTION EMPRESARIAL Ago-Dic 2018 12 84.78611 2.9177331 18
## 263 GESTION EMPRESARIAL Ago-Dic 2018 13 86.50333 2.3215799 3
## 264 GESTION EMPRESARIAL Ago-Dic 2018 16 87.50000 NaN 1
## 265 GESTION EMPRESARIAL Ene-Jun 2018 2 86.24143 5.1807538 70
## 266 GESTION EMPRESARIAL Ene-Jun 2018 3 85.57975 3.5009735 79
## 267 GESTION EMPRESARIAL Ene-Jun 2018 4 88.90451 3.8251524 71
## 268 GESTION EMPRESARIAL Ene-Jun 2018 5 85.28900 2.8308127 60
## 269 GESTION EMPRESARIAL Ene-Jun 2018 6 87.82643 3.9740195 56
## 270 GESTION EMPRESARIAL Ene-Jun 2018 7 87.44859 3.4307401 64
## 271 GESTION EMPRESARIAL Ene-Jun 2018 8 89.52689 3.7319935 61
## 272 GESTION EMPRESARIAL Ene-Jun 2018 9 85.06511 3.6707042 47
## 273 GESTION EMPRESARIAL Ene-Jun 2018 10 85.20765 3.5202619 17
## 274 GESTION EMPRESARIAL Ene-Jun 2018 11 84.14750 2.6476342 16
## 275 GESTION EMPRESARIAL Ene-Jun 2018 12 85.36800 3.3489954 5
## 276 INDUSTRIAL Ago-Dic 2017 2 85.68699 3.5969698 83
## 277 INDUSTRIAL Ago-Dic 2017 3 88.71957 3.6310254 69
## 278 INDUSTRIAL Ago-Dic 2017 4 83.11696 3.3836202 79
## 279 INDUSTRIAL Ago-Dic 2017 5 86.30055 5.0334555 73
## 280 INDUSTRIAL Ago-Dic 2017 6 83.91757 3.1690311 74
## 281 INDUSTRIAL Ago-Dic 2017 7 85.63141 4.7758505 85
## 282 INDUSTRIAL Ago-Dic 2017 8 82.15709 3.5613434 86
## 283 INDUSTRIAL Ago-Dic 2017 9 85.01143 5.0522752 70
## 284 INDUSTRIAL Ago-Dic 2017 10 80.55500 3.5431326 50
## 285 INDUSTRIAL Ago-Dic 2017 11 83.18769 2.8939741 13
## 286 INDUSTRIAL Ago-Dic 2017 12 78.83909 2.5317403 11
## 287 INDUSTRIAL Ago-Dic 2017 13 79.41000 0.1272792 2
## 288 INDUSTRIAL Ago-Dic 2017 14 78.91000 NaN 1
## 289 INDUSTRIAL Ago-Dic 2018 2 85.65413 3.0713652 75
## 290 INDUSTRIAL Ago-Dic 2018 3 88.50154 3.0843619 78
## 291 INDUSTRIAL Ago-Dic 2018 4 84.46869 2.5894279 84
## 292 INDUSTRIAL Ago-Dic 2018 5 88.00200 3.9017341 70
## 293 INDUSTRIAL Ago-Dic 2018 6 83.34446 3.3611435 74
## 294 INDUSTRIAL Ago-Dic 2018 7 86.94676 5.0535789 71
## 295 INDUSTRIAL Ago-Dic 2018 8 83.81493 3.4670994 69
## 296 INDUSTRIAL Ago-Dic 2018 9 85.59687 4.5528591 80
## 297 INDUSTRIAL Ago-Dic 2018 10 81.01734 2.9105213 64
## 298 INDUSTRIAL Ago-Dic 2018 11 80.82895 3.0715810 19
## 299 INDUSTRIAL Ago-Dic 2018 12 79.32571 3.1846170 21
## 300 INDUSTRIAL Ago-Dic 2018 13 82.43000 3.1291213 5
## 301 INDUSTRIAL Ago-Dic 2018 14 77.41000 2.0002250 3
## 302 INDUSTRIAL Ene-Jun 2018 2 90.46408 2.8710083 76
## 303 INDUSTRIAL Ene-Jun 2018 3 85.74133 3.0683911 83
## 304 INDUSTRIAL Ene-Jun 2018 4 88.27100 3.6647206 70
## 305 INDUSTRIAL Ene-Jun 2018 5 83.08779 3.3962714 77
## 306 INDUSTRIAL Ene-Jun 2018 6 86.85861 5.0123173 72
## 307 INDUSTRIAL Ene-Jun 2018 7 84.05070 3.3067232 71
## 308 INDUSTRIAL Ene-Jun 2018 8 85.60735 4.5845451 83
## 309 INDUSTRIAL Ene-Jun 2018 9 81.15292 3.0186290 65
## 310 INDUSTRIAL Ene-Jun 2018 10 81.26500 2.7300183 24
## 311 INDUSTRIAL Ene-Jun 2018 11 79.60200 2.8023382 30
## 312 INDUSTRIAL Ene-Jun 2018 12 80.23333 2.1522159 3
## 313 INDUSTRIAL Ene-Jun 2018 13 77.43200 1.3928999 5
## 314 INFORMATICA Ago-Dic 2017 3 87.39667 4.5406391 21
## 315 INFORMATICA Ago-Dic 2017 5 84.55409 4.0782964 22
## 316 INFORMATICA Ago-Dic 2017 7 85.52833 5.6030833 12
## 317 INFORMATICA Ago-Dic 2017 8 82.48636 4.6544221 11
## 318 INFORMATICA Ago-Dic 2017 9 84.44080 3.4762239 25
## 319 INFORMATICA Ago-Dic 2017 10 82.62250 4.4766384 4
## 320 INFORMATICA Ago-Dic 2017 11 82.76250 3.7842484 8
## 321 INFORMATICA Ago-Dic 2017 12 80.18200 3.6088311 10
## 322 INFORMATICA Ago-Dic 2017 13 81.44000 NaN 1
## 323 INFORMATICA Ago-Dic 2018 3 83.77542 3.5246498 24
## 324 INFORMATICA Ago-Dic 2018 5 85.49737 4.0801019 19
## 325 INFORMATICA Ago-Dic 2018 7 85.12714 3.8866157 21
## 326 INFORMATICA Ago-Dic 2018 9 87.92900 5.1969787 10
## 327 INFORMATICA Ago-Dic 2018 10 80.93000 3.3971949 4
## 328 INFORMATICA Ago-Dic 2018 11 83.63200 3.2851004 10
## 329 INFORMATICA Ago-Dic 2018 12 82.07667 2.8293521 3
## 330 INFORMATICA Ago-Dic 2018 13 81.83800 1.8288849 5
## 331 INFORMATICA Ago-Dic 2018 14 80.27250 2.0402713 8
## 332 INFORMATICA Ene-Jun 2018 2 84.66111 2.8607467 27
## 333 INFORMATICA Ene-Jun 2018 4 85.69550 4.1993464 20
## 334 INFORMATICA Ene-Jun 2018 6 84.46048 4.0821961 21
## 335 INFORMATICA Ene-Jun 2018 8 86.79545 5.5179133 11
## 336 INFORMATICA Ene-Jun 2018 9 82.96909 4.9712985 11
## 337 INFORMATICA Ene-Jun 2018 10 82.78182 2.5009031 11
## 338 INFORMATICA Ene-Jun 2018 11 80.67000 5.0204581 2
## 339 INFORMATICA Ene-Jun 2018 12 82.10000 3.2332646 6
## 340 INFORMATICA Ene-Jun 2018 13 79.67625 2.3655923 8
## 341 MECANICA Ago-Dic 2017 1 82.75000 NaN 1
## 342 MECANICA Ago-Dic 2017 2 81.14850 5.5224730 20
## 343 MECANICA Ago-Dic 2017 3 85.33077 4.3351795 39
## 344 MECANICA Ago-Dic 2017 4 82.73500 2.8215776 20
## 345 MECANICA Ago-Dic 2017 5 82.86238 3.9804601 42
## 346 MECANICA Ago-Dic 2017 6 79.14750 1.7269689 8
## 347 MECANICA Ago-Dic 2017 7 82.40560 3.9067812 50
## 348 MECANICA Ago-Dic 2017 8 82.56000 3.9327281 9
## 349 MECANICA Ago-Dic 2017 9 82.81868 4.1530665 53
## 350 MECANICA Ago-Dic 2017 10 79.12429 1.3684563 14
## 351 MECANICA Ago-Dic 2017 11 81.22000 2.4488847 23
## 352 MECANICA Ago-Dic 2017 12 80.38429 1.2087164 7
## 353 MECANICA Ago-Dic 2017 13 80.21000 1.7819091 2
## 354 MECANICA Ago-Dic 2017 14 80.30800 0.6294204 5
## 355 MECANICA Ago-Dic 2018 2 83.89962 2.1583076 26
## 356 MECANICA Ago-Dic 2018 3 82.85741 4.4015075 58
## 357 MECANICA Ago-Dic 2018 4 81.96684 4.6496261 19
## 358 MECANICA Ago-Dic 2018 5 83.17833 5.2063092 30
## 359 MECANICA Ago-Dic 2018 6 80.98562 2.3376226 16
## 360 MECANICA Ago-Dic 2018 7 82.65763 4.0778230 38
## 361 MECANICA Ago-Dic 2018 8 78.77800 2.4843852 5
## 362 MECANICA Ago-Dic 2018 9 82.96809 4.1582729 47
## 363 MECANICA Ago-Dic 2018 10 82.65333 4.0473603 9
## 364 MECANICA Ago-Dic 2018 11 81.41296 2.2638969 27
## 365 MECANICA Ago-Dic 2018 12 79.11300 1.4668640 10
## 366 MECANICA Ago-Dic 2018 13 80.21000 1.9111829 11
## 367 MECANICA Ago-Dic 2018 14 80.45333 1.2341124 3
## 368 MECANICA Ene-Jun 2018 2 85.15413 4.9203451 63
## 369 MECANICA Ene-Jun 2018 3 81.48667 4.9517697 21
## 370 MECANICA Ene-Jun 2018 4 84.25909 4.9396909 33
## 371 MECANICA Ene-Jun 2018 5 81.64526 2.4500983 19
## 372 MECANICA Ene-Jun 2018 6 82.89211 4.1695124 38
## 373 MECANICA Ene-Jun 2018 7 79.00800 2.5018933 5
## 374 MECANICA Ene-Jun 2018 8 82.76702 3.8893941 47
## 375 MECANICA Ene-Jun 2018 9 82.71000 3.9396256 9
## 376 MECANICA Ene-Jun 2018 10 81.39187 3.1504802 32
## 377 MECANICA Ene-Jun 2018 11 79.03700 1.3510000 10
## 378 MECANICA Ene-Jun 2018 12 80.58667 1.6758842 12
## 379 MECANICA Ene-Jun 2018 13 80.33250 1.1142524 4
## 380 MECATRONICA Ago-Dic 2017 2 84.35737 3.1188561 38
## 381 MECATRONICA Ago-Dic 2017 3 84.63543 4.3488592 46
## 382 MECATRONICA Ago-Dic 2017 4 82.98918 4.4016127 61
## 383 MECATRONICA Ago-Dic 2017 5 85.18515 4.5685245 66
## 384 MECATRONICA Ago-Dic 2017 6 81.51959 2.9342397 49
## 385 MECATRONICA Ago-Dic 2017 7 83.81803 3.8420276 61
## 386 MECATRONICA Ago-Dic 2017 8 81.37542 3.6760351 48
## 387 MECATRONICA Ago-Dic 2017 9 85.08346 3.6614981 52
## 388 MECATRONICA Ago-Dic 2017 10 81.82243 3.0902557 37
## 389 MECATRONICA Ago-Dic 2017 11 84.38800 2.4024458 15
## 390 MECATRONICA Ago-Dic 2017 12 80.46286 1.9171656 7
## 391 MECATRONICA Ago-Dic 2017 13 79.23000 1.5903302 5
## 392 MECATRONICA Ago-Dic 2017 14 80.28250 1.6219191 8
## 393 MECATRONICA Ago-Dic 2018 2 84.01462 3.4100853 26
## 394 MECATRONICA Ago-Dic 2018 3 84.65046 4.0428496 65
## 395 MECATRONICA Ago-Dic 2018 4 83.29103 2.8551337 39
## 396 MECATRONICA Ago-Dic 2018 5 85.11295 4.3595170 44
## 397 MECATRONICA Ago-Dic 2018 6 83.00965 4.2659913 57
## 398 MECATRONICA Ago-Dic 2018 7 85.76714 4.8723610 63
## 399 MECATRONICA Ago-Dic 2018 8 81.66396 2.5090065 48
## 400 MECATRONICA Ago-Dic 2018 9 84.57362 3.8200026 58
## 401 MECATRONICA Ago-Dic 2018 10 82.14950 3.6787191 40
## 402 MECATRONICA Ago-Dic 2018 11 83.60412 3.6346373 17
## 403 MECATRONICA Ago-Dic 2018 12 80.15643 2.6206095 14
## 404 MECATRONICA Ago-Dic 2018 13 80.85000 0.9899495 2
## 405 MECATRONICA Ago-Dic 2018 15 80.12000 NaN 1
## 406 MECATRONICA Ene-Jun 2018 2 86.49157 3.6804645 70
## 407 MECATRONICA Ene-Jun 2018 3 83.71650 3.3325201 40
## 408 MECATRONICA Ene-Jun 2018 4 85.11891 4.4342466 46
## 409 MECATRONICA Ene-Jun 2018 5 83.20797 4.2798976 59
## 410 MECATRONICA Ene-Jun 2018 6 85.50778 4.5448299 63
## 411 MECATRONICA Ene-Jun 2018 7 81.79240 2.6610460 50
## 412 MECATRONICA Ene-Jun 2018 8 84.28525 3.8420757 61
## 413 MECATRONICA Ene-Jun 2018 9 81.96511 3.7990367 45
## 414 MECATRONICA Ene-Jun 2018 10 82.65812 3.3148539 16
## 415 MECATRONICA Ene-Jun 2018 11 80.64000 3.0061245 14
## 416 MECATRONICA Ene-Jun 2018 12 82.32500 0.7848885 2
## 417 MECATRONICA Ene-Jun 2018 14 77.89000 NaN 1
## 418 QUIMICA Ago-Dic 2017 2 85.56569 3.7538297 65
## 419 QUIMICA Ago-Dic 2017 3 86.50258 3.3738536 62
## 420 QUIMICA Ago-Dic 2017 4 82.77735 3.6333804 49
## 421 QUIMICA Ago-Dic 2017 5 84.89948 2.8461402 58
## 422 QUIMICA Ago-Dic 2017 6 82.04483 3.5687119 29
## 423 QUIMICA Ago-Dic 2017 7 84.53276 2.6759040 58
## 424 QUIMICA Ago-Dic 2017 8 84.03600 4.7168877 5
## 425 QUIMICA Ago-Dic 2017 9 85.36196 4.0620527 51
## 426 QUIMICA Ago-Dic 2017 10 85.80000 NaN 1
## 427 QUIMICA Ago-Dic 2017 11 84.23000 3.2817320 18
## 428 QUIMICA Ago-Dic 2017 13 82.94700 3.4980282 10
## 429 QUIMICA Ago-Dic 2017 15 82.98500 0.1484924 2
## 430 QUIMICA Ago-Dic 2017 17 79.15000 NaN 1
## 431 QUIMICA Ago-Dic 2018 2 83.21714 3.6751753 42
## 432 QUIMICA Ago-Dic 2018 3 88.02087 4.5026870 69
## 433 QUIMICA Ago-Dic 2018 4 82.85190 2.0873146 58
## 434 QUIMICA Ago-Dic 2018 5 84.73508 3.9057520 61
## 435 QUIMICA Ago-Dic 2018 6 83.37800 4.0210843 40
## 436 QUIMICA Ago-Dic 2018 7 85.46000 3.0495735 58
## 437 QUIMICA Ago-Dic 2018 8 82.93800 3.7300134 25
## 438 QUIMICA Ago-Dic 2018 9 84.58382 2.6937091 55
## 439 QUIMICA Ago-Dic 2018 10 86.08333 3.9648749 3
## 440 QUIMICA Ago-Dic 2018 11 82.78875 2.3367188 24
## 441 QUIMICA Ago-Dic 2018 13 81.29167 0.9853815 6
## 442 QUIMICA Ago-Dic 2018 15 81.00000 NaN 1
## 443 QUIMICA Ene-Jun 2018 2 88.18794 4.7143793 68
## 444 QUIMICA Ene-Jun 2018 3 83.82000 2.2756386 62
## 445 QUIMICA Ene-Jun 2018 4 85.29887 3.6947424 62
## 446 QUIMICA Ene-Jun 2018 5 82.96907 3.8061841 43
## 447 QUIMICA Ene-Jun 2018 6 85.22263 3.0420714 57
## 448 QUIMICA Ene-Jun 2018 7 82.52704 3.6303494 27
## 449 QUIMICA Ene-Jun 2018 8 84.83643 2.8969435 56
## 450 QUIMICA Ene-Jun 2018 9 84.36000 4.6845010 5
## 451 QUIMICA Ene-Jun 2018 10 83.75448 3.4760123 29
## 452 QUIMICA Ene-Jun 2018 11 86.06000 NaN 1
## 453 QUIMICA Ene-Jun 2018 12 81.79714 1.6906381 7
## 454 QUIMICA Ene-Jun 2018 14 81.81714 1.5039361 7
## 455 QUIMICA Ene-Jun 2018 18 79.28000 NaN 1
## 456 SISTEMAS Ago-Dic 2017 2 82.26338 3.6560862 65
## 457 SISTEMAS Ago-Dic 2017 3 87.02362 5.3847153 47
## 458 SISTEMAS Ago-Dic 2017 4 80.68414 2.9943524 29
## 459 SISTEMAS Ago-Dic 2017 5 83.51929 3.3863952 56
## 460 SISTEMAS Ago-Dic 2017 6 83.47571 4.8955962 28
## 461 SISTEMAS Ago-Dic 2017 7 86.27567 4.4349805 60
## 462 SISTEMAS Ago-Dic 2017 8 85.94813 3.7202874 32
## 463 SISTEMAS Ago-Dic 2017 9 89.47075 4.2468743 53
## 464 SISTEMAS Ago-Dic 2017 10 83.54423 3.4401909 26
## 465 SISTEMAS Ago-Dic 2017 11 83.69857 2.9079895 21
## 466 SISTEMAS Ago-Dic 2017 12 81.99545 2.2688736 11
## 467 SISTEMAS Ago-Dic 2017 13 82.89857 4.1721434 7
## 468 SISTEMAS Ago-Dic 2017 14 79.77000 0.7264067 4
## 469 SISTEMAS Ago-Dic 2017 17 83.72333 0.2821938 3
## 470 SISTEMAS Ago-Dic 2018 2 86.17812 3.0862906 16
## 471 SISTEMAS Ago-Dic 2018 3 85.10985 4.1345146 65
## 472 SISTEMAS Ago-Dic 2018 4 82.74018 3.5732990 57
## 473 SISTEMAS Ago-Dic 2018 5 89.00550 4.5629118 40
## 474 SISTEMAS Ago-Dic 2018 6 81.32625 2.2903670 24
## 475 SISTEMAS Ago-Dic 2018 7 85.01604 3.6760453 53
## 476 SISTEMAS Ago-Dic 2018 8 84.26714 4.6937357 28
## 477 SISTEMAS Ago-Dic 2018 9 87.15593 4.2199576 59
## 478 SISTEMAS Ago-Dic 2018 10 84.01529 1.8255072 17
## 479 SISTEMAS Ago-Dic 2018 11 86.09375 3.3110701 16
## 480 SISTEMAS Ago-Dic 2018 12 82.00667 3.4864030 12
## 481 SISTEMAS Ago-Dic 2018 13 82.73400 2.3879761 5
## 482 SISTEMAS Ago-Dic 2018 14 81.39000 1.5192103 5
## 483 SISTEMAS Ago-Dic 2018 15 77.41000 2.0506097 2
## 484 SISTEMAS Ene-Jun 2018 2 85.47716 4.2506270 67
## 485 SISTEMAS Ene-Jun 2018 3 82.34567 3.4658300 60
## 486 SISTEMAS Ene-Jun 2018 4 88.19977 4.3409358 44
## 487 SISTEMAS Ene-Jun 2018 5 80.96038 3.1691696 26
## 488 SISTEMAS Ene-Jun 2018 6 84.30036 3.4055575 55
## 489 SISTEMAS Ene-Jun 2018 7 84.13000 4.5546631 28
## 490 SISTEMAS Ene-Jun 2018 8 86.59133 4.3199190 60
## 491 SISTEMAS Ene-Jun 2018 9 85.45593 3.0615422 27
## 492 SISTEMAS Ene-Jun 2018 10 85.83000 3.7671771 18
## 493 SISTEMAS Ene-Jun 2018 11 82.27750 4.0301751 12
## 494 SISTEMAS Ene-Jun 2018 12 82.55222 3.1464654 9
## 495 SISTEMAS Ene-Jun 2018 13 81.51500 2.0535579 4
## 496 SISTEMAS Ene-Jun 2018 14 75.98000 NaN 1
## 497 TIC Ago-Dic 2017 3 86.33778 5.6841595 9
## 498 TIC Ago-Dic 2017 5 83.77118 4.6589335 17
## 499 TIC Ago-Dic 2017 7 82.51882 3.6843552 17
## 500 TIC Ago-Dic 2017 9 85.62950 2.8187632 20
## 501 TIC Ago-Dic 2017 11 82.37857 3.3061076 7
## 502 TIC Ago-Dic 2018 3 82.35000 4.0692881 18
## 503 TIC Ago-Dic 2018 5 86.78375 4.4279952 8
## 504 TIC Ago-Dic 2018 7 84.08059 4.6862905 17
## 505 TIC Ago-Dic 2018 9 83.96941 4.4321136 17
## 506 TIC Ago-Dic 2018 11 85.61667 2.6959352 6
## 507 TIC Ago-Dic 2018 13 82.54500 1.8738330 2
## 508 TIC Ene-Jun 2018 2 85.79045 4.9725365 22
## 509 TIC Ene-Jun 2018 4 86.64222 4.2584028 9
## 510 TIC Ene-Jun 2018 6 83.71588 4.6873514 17
## 511 TIC Ene-Jun 2018 8 83.41118 4.1272553 17
## 512 TIC Ene-Jun 2018 10 83.11714 2.1767691 7
## 513 TIC Ene-Jun 2018 12 83.70250 4.4206815 4
resadmin <- subset(resumen, resumen$Carrera == "ADMINISTRACION")
mi.grafica <- ggplot(data = resadmin)
mi.grafica <- ggplot(data = resadmin)
mi.grafica <- mi.grafica + aes(x = resadmin$Semestre, y = resadmin$mean)
mi.grafica <- mi.grafica + aes(group = resadmin$Semestre,resadmin$NoSemestre, colour = resadmin$Semestre)
mi.grafica <- mi.grafica + geom_line()
mi.grafica <- mi.grafica + ggtitle("ADMINISTRACIÓN, Media de promedios de alumnos inscritos en semestres..")
mi.grafica <- mi.grafica + ylab("Media de cada semestre")
mi.grafica <- mi.grafica + xlab("Periodo Semestral, No de Semestre")
mi.grafica