Thrusday March 16: In-class Midterm Exam,
You may use:
1 sheet (8 1/2 x 11) two-side of notes
Calculator
Tables for critical values will be provided
1. Bumpus's Data on Natural Selection: p. 29 is a description of the data.
(a) Using, R, you should be able to reproduce the Summary of Statistical Findings
on p. 29-30.
There are also Conceptual Exercises on p.50 about this dataset (and answers).
You may read in the data from the the class web page by:
> bump <- read.csv("http://www-math.cudenver.edu/~bbailey/4830/bumpus.csv")
> bumpus <- list(P=bump$HUMERUS[bump$STATUS=="PERISHED"],S=bump$HUMERUS[bump$STATUS=="SURVIVED"])
> bumpus
$P
[1] 659 689 703 702 709 713 720 729 726 726 720 737 739 731 738 736 738 744 745[20] 743 754 752 752 765
$S
[1] 687 703 709 715 728 721 729 723 728 723 726 728 736 733 730 733 730 739 735[20] 741 741 749 741 743 741 752 752 751 756 755 766 767 769 770 780
(b) p. 107 Problem 19: Using the R wilcox.test function
2. p. 107, Problem 28, Darwin Data: By hand (except histograms).
The data is
on p. 108 or can be found off the class web page (just in case you want to
check your answers!) by
> darwin <- read.csv("http://www-math.cudenver.edu/~bbailey/4830/darwin.csv")
3. Also, look over all homework and Chapter 18.1-18.2 on Comparison of Proportions.