Here are the statistics of the midterm. If you got less than 30 points, you need to start working harder in order to earn a C or more. If you are too close to 30, this should be a wake up call. 

The average was 58.8 

The median was 61. 

 

> scores:=[18,18,27,28,36, 37,47,48,51,53,53,57,58,60, 60, 62,62,66,66,67,71,72, 74,76,76,79,83,86,86,87]:
 

> evalf(describe[mean](scores)); describe[median](scores);
 

 

58.80000000
61 (1)
 

> with(stats):
with(stats[statplots]):
 

> histogram(scores,area=count,numbars=11);
 

Plot_2d
 

Scores 

Percentage 

Number of students 

Aprox. Grade 

More than 81 

13.33% 

4 

A 

Between 74 and 81 

10% 

3 

A- 

Between  67 and 74  

10% 

3 

B+ 

Beteween 62 and 67 

16.7% 

5 

B, B- 

Between 56 and 62 

10% 

3 

C+ 

Betwen 42 and 56 

16.7 

5 

C 

Between 31 and 42 

6.6% 

2 

C- 

Less than 31 

13.3% 

4 

D 

 

 

 

 

>
 

>