data/age.universe.R

In jverzani/UsingR: Data Sets, Etc. for the Text "Using R for Introductory Statistics", Second Edition

age.universe <-
structure(list(lower = c(7.5e-05, 0.24, 1, 0.02, 2, 10, 16, 12.07, 
10, 12, 11, 9.5, 13, 11.2, 13.56, 13.713), upper = c(NA, NA, 
10, NA, NA, 15, 20, NA, NA, NA, 20.2, 15.5, 14, 20, 13.84, 13.831
), year = c(1760, 1831, 1852, 1897, 1929, 1970, 1980, 1996, 1997, 
1999, 1999, 2001, 2002, 2003, 2003, 2013), source = c("Buffon. time of cooling from molten state. Earth", 
"Lyell. age of mollusks. Earth", "Bok. galactic clusters", "Thomson. Thermodynamics of earth. Min is between 20-400million", 
"E. Hubble. Redshift", "various", "various", "Chaboyer", "Krauss", 
"Hubble telescope. Hubble constant", "Cowan ", "Cayrel", "Hubble telescope", 
"Krauss, Chaboyer, Science, 2003", "WMAP satellite. Microwave radiation", 
"Nine-Year Wilkinson Microwave Anisotropy Probe (WMAP) Observations: Final Maps and Results"
)), .Names = c("lower", "upper", "year", "source"), row.names = c(NA, 
16L), class = "data.frame")