case0201: Bumpus's Data on Natural Selection (Humerus)

In Sleuth2: Data Sets from Ramsey and Schafer's "Statistical Sleuth (2nd Ed)"

Description

As evidence in support of natural selection, Bumpus presented measurements on house sparrows brought to the Anatomical Laboratory of Brown University after an uncommonly severe winter storm. Some of these birds had survived and some had perished. Bumpus asked whether those that perished did so because they lacked physical characteristics enabling them to withstand the intensity of that particular instance of selective elimination. The data are on the humerus (arm bone) lengths for the 24 adult male sparrows that perished and for the 35 adult males that survived.

Usage

case0201

Format

A data frame with 59 observations on the following 2 variables.

Humerus

Humerus length of adult male sparrows (in inches)

Status

factor variable indicating whether the sparrow perished or survived in a winter storm

Source

Ramsey, F.L. and Schafer, D.W. (2002). The Statistical Sleuth: A Course in Methods of Data Analysis (2nd ed), Duxbury.

See Also

ex0221, ex2016

Examples

str(case0201)
with(subset(case0201, Status=="Perished"), stem(Humerus, scale=10))
with(subset(case0201, Status=="Survived"), stem(Humerus))

Example output

'data.frame':	59 obs. of  2 variables:
 $ Humerus: num  659 689 703 702 709 713 720 729 726 726 ...
 $ Status : Factor w/ 2 levels "Perished","Survived": 1 1 1 1 1 1 1 1 1 1 ...

  The decimal point is 1 digit(s) to the right of the |

  65 | 9
  66 | 
  66 | 
  67 | 
  67 | 
  68 | 
  68 | 9
  69 | 
  69 | 
  70 | 23
  70 | 9
  71 | 3
  71 | 
  72 | 00
  72 | 669
  73 | 1
  73 | 67889
  74 | 34
  74 | 5
  75 | 224
  75 | 
  76 | 
  76 | 5


  The decimal point is 1 digit(s) to the right of the |

  68 | 7
  69 | 
  70 | 39
  71 | 5
  72 | 13368889
  73 | 0033569
  74 | 111139
  75 | 12256
  76 | 679
  77 | 0
  78 | 0

Sleuth2 documentation built on May 2, 2019, 7:01 a.m.