Determinar promedio de alumnos que cursan segundo semestre en adelante
# Cargar la libreria previamente instalada
library (readr)
## Warning: package 'readr' was built under R version 3.6.2
# C:\Users\Usuario\Documents\Mis clases ITD\Semestre Enero Junio 2020\Analisis Inteligente de Datos\datos
ruta <- "C:/Users/Usuario/Documents/Mis clases ITD/Semestre Enero Junio 2020/Analisis Inteligente de Datos/datos"
setwd(ruta)
promedios <- read.csv("promedios.csv")
head(promedios)
## No..Control Semestre Cr..Apr. Carga Promedio
## 1 10040001 8 154 23 83.24
## 2 10040002 8 193 32 88.19
## 3 10040003 1 NA 27 0.00
## 4 10040004 2 22 28 82.40
## 5 10040005 5 77 28 81.59
## 6 10040006 1 NA 27 0.00
tail(promedios)
## No..Control Semestre Cr..Apr. Carga Promedio
## 467 10040467 3 55 27 87.92
## 468 10040468 7 175 34 90.03
## 469 10040469 11 202 29 82.43
## 470 10040470 2 22 23 83.20
## 471 10040471 3 50 27 86.00
## 472 10040472 4 73 28 82.44