Tarea 2 - Grafícos y Medidas Estadísticas

Base de datos - Calificaciones

library(ggplot2)
library(Hmisc)

## 
## Attaching package: 'Hmisc'

## The following objects are masked from 'package:base':
## 
##     format.pval, units

df_calificaciones = read.csv("calificaciones_T2.csv")

Tabla de Frecuencia

df_tabla_frecuencias <- as.data.frame(table(df_calificaciones$Calificaciones))
colnames(df_tabla_frecuencias)[1] <- "Calificaciones"

df_tabla_frecuencias <- df_tabla_frecuencias[order(-df_tabla_frecuencias$Freq), ]

print(df_tabla_frecuencias)

##    Calificaciones Freq
## 21             70    4
## 11             57    3
## 12             59    3
## 15             62    3
## 17             64    3
## 18             65    3
## 14             61    2
## 23             73    2
## 24             76    2
## 26             80    2
## 27             82    2
## 1              29    1
## 2              36    1
## 3              37    1
## 4              42    1
## 5              47    1
## 6              50    1
## 7              51    1
## 8              54    1
## 9              55    1
## 10             56    1
## 13             60    1
## 16             63    1
## 19             66    1
## 20             68    1
## 22             72    1
## 25             77    1
## 28             84    1
## 29             85    1
## 30             87    1

Histograma de Calificaciones

hist(df_calificaciones$Calificaciones)

Resumen Estadístico

#Promedio
mean(df_calificaciones$Calificaciones)

## [1] 63.83333

#Mediana
median(df_calificaciones$Calificaciones)

## [1] 64

#Varianza
var(df_calificaciones$Calificaciones)

## [1] 165.2908

#Desviación Estandar
sd(df_calificaciones$Calificaciones)

## [1] 12.85655

Boxplot de Calificaciones

boxplot(df_calificaciones$Calificaciones, main = "Boxplot de Calificaciones", ylab = "Calificaciones")

#Resultados Boxplot
summary(df_calificaciones$Calificaciones)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   29.00   57.00   64.00   63.83   72.25   87.00

Conclusión - Análisis de Resultados

El promedio de calificaciones puede que se encuentre sesgado debido a outliers que cuentan los datos, esto tomando en cuenta que se tiene una varianza de 165, lo cual nos dice que es hay estudiantes con calificaciones muy altas o muy bajas (calificación minima de 27 y maxima de 87).Tomando en cuenta lo anterior, se recomienda utilizar mejor la mediana como medida de tendencia central. El grupo cuenta con una tendencia central (mediana) de 64, lo cual podemos observar de manera general dentro del boxplot y el histograma.

De igual forma, el 75% de las calificaciones son iguales o menores 72.25 (3er Quartil), por lo que en general las calificaciones del grupo no se pueden considerar relativamente como “sobresalientes”.