R/sittingHeights.R
sittingHeights.RdFrom measurements made by Francis Galton at London's International Health Exhibition in 1884, published in 1885.
sittingHeights
A data frame with 9 rows and 8 variates, the first 5 of which are as recorded by Galton:
Sitting height greater than or equal to this lower bound in inches.
Sitting height strictly less than this upper bound in inches.
Number of cases observed with sitting height between the two bounds.
Number of cases observed with sitting height up to but not including the upper bound.
Cumulative number of cases expressed as a percent.
Average of the lower and upper bounds.
Number of cases assigned to the binCentre; half of cases observed with sitting height between the two bounds is assigned to be below the binCentre, half above (avoids producing 100 percent for last entry).
Cumulative proportions using nCasesCentred.
"The Application of a Graphic Method to Fallible Measures", Francis Galton, (1885), Journal of the Statistical Society of London, Jubilee Volume (June 22-24, 1885), pp. 262-265.
with(sittingHeights, plot(percentCumulative,upperBound, type="o", lwd=2, xlim=c(0,100), ylim=c(20,40),xlab="Percentage of women", ylab="Sitting heights in inches")) will effect Galton's Ogive.
with(sittingHeights, qqtest(binCentre, dist="normal", p = proportionCumulativeAdjusted, np=775, main="Sitting heights of women in inches")) will effect a normal qqplot for this data.