Midterm 2 Grade Results

Grades <- c(38, 50, 59, 64, 64, 65, 73, 73, 74, 75, 75, 83, 83, 84, 85, 92, 
    95, 96, 98, 98, 100)
summary(Grades)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    38.0    65.0    75.0    77.3    92.0   100.0

hist(Grades, col = "gray", main = "Midterm 2 Grade Distribution", 9)

plot of chunk GradeInfo2