library(ggplot2)
Grades <- c(50, 52, 58, 67, 71, 81, 82, 82, 87, 88, 89, 92, 98, 98, 100)
summary(Grades)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 50.0 69.0 82.0 79.7 90.5 100.0
c <- qplot(Grades, main = "Midterm 2 Grade Distribution", binwidth = 10)
c + geom_histogram(fill = "darkgray", color = "black", binwidth = 10)
| Problem | Concept | Class Average |
|---|---|---|
| 1 | Polynomial long division | 82.00% |
| 2 | Volume of revolution: shells method | 76.11% |
| 3 | Tabular integration | 93.33% |
| 4 | Partial fractions | 88.33% |
| 5 | Trigonometric integrals | 64.67% |
| 6 | Improper integrals | 77.33% |
| 7 | Work and area under a curve | 78.67% |
| 8 | Integration by parts | 75.33% |
| 9 | Trigonometric substitution | 80.00% |