Below are two datasets, Glucose1 and Glucose2. Both contain data on repeated administrations of glucose tolerance tests to a sample of women who made repeated visits to Boston City Hospital between 1955 and 1960. Glucose1 has data for each of 53 non-pregnant women, measured yearly. Glucose2 has data for 52 women for each of 3 pregnancies during the same period. In each dataset, the variables test1, test2, etc., refer to the change in blood glucose levels measured first after fasting, then again 1 hour after administration a dose of 100 grams of glucose (in mg/100ml). The glucose tolerance test is used to diagnose diabetes. For more details, see the description in Data by Andrews and Herzberg.

The data are in the "data frame" format, which are arrays of data in which each case (here an individual) corresponds to a row, and each variable corresponds to a column. The row labels for these data frames are just row numbers, the column labels are the names of the variables.

"Glucose1" <-
structure(list(test1 = c(14, -3, 32, 24, -23, 15, 25, 9, 20, 
11, 2, 30, 4, 18, -11, 16, 14, -11, 30, -17, 0, -10, 18, -19, 
16, 25, 1, -15, 12, 8, 26, 31, -8, -1, 0, 24, 9, -14, 39, 12, 
30, 9, -18, 28, -5, -22, 9, 50, -2, 11, 18, 16, 0), test2 = c(7, 
0, 22, 25, -12, 7, -13, 34, -37, 16, -10, -4, -5, 30, -26, 53, 
7, -36, 2, -30, -6, -6, 0, 19, 36, 47, 44, 6, 2, 36, 17, -5, 
0, 20, -1, 9, 2, -13, 33, 23, 18, 11, 10, -8, -22, 13, 15, 24, 
16, 10, -15, 3, 20), test3 = c(-23, -7, 0, 69, 0, 6, 0, 3, 20, 
16, 28, 29, 25, 8, 50, 33, -23, 13, 44, -37, 8, -22, 3, 6, 2, 
22, 27, 7, 5, -8, -9, 7, -9, 24, -13, -7, 4, 4, 29, 16, 9, 33, 
3, 10, -20, -8, 2, 31, 7, 4, 20, 22, 41), test4 = c(14, 19, 16, 
50, 4, -7, 13, 0, 4, 24, 12, 13, 52, 23, -1, 52, 21, 35, 23, 
37, 55, 14, -4, 27, 50, 28, 54, 24, 2, 34, 59, -4, -21, 29, 2, 
-11, 11, 22, 50, 39, 18, 11, 30, -9, -6, 26, -18, 9, -3, 4, 6, 
26, 33), test5 = c(21, 9, 10, 11, 3, 0, 4, 10, 5, 44, 9, 35, 
16, 24, -7, 55, 24, 0, 5, -10, 11, 27, 16, 0, 39, 36, 110, 33, 
15, 28, 19, 25, 9, 8, 49, 12, 7, 17, 64, 36, 12, 18, 14, 19, 
24, -9, 52, 45, 21, 4, 11, 31, 72), test6 = c(0, 17, 48, 34, 
-10, 4, 7, 21, 11, 39, 43, 35, 3, 8, -6, 47, -1, -6, 6, 5, 96, 
10, 10, -23, 28, 43, 52, 23, 25, 20, 2, -30, 0, 32, 15, 13, 33, 
20, 37, 35, 21, 47, 29, 32, 20, 24, 11, 23, 7, -2, 13, 61, 42
)), .Names = c("test1", "test2", "test3", "test4", "test5", "test6"
), class = "data.frame", row.names = c("1", "2", "3", "4", "5", 
"6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", 
"17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", 
"28", "29", "30", "31", "32", "33", "34", "35", "36", "37", "38", 
"39", "40", "41", "42", "43", "44", "45", "46", "47", "48", "49", 
"50", "51", "52", "53"))


"Glucose2" <-
structure(list(test1 = c(37, 47, -14, 25, 54, 35, 13, 42, 8, 
3, 70, 80, 84, 16, 51, 86, 57, 67, 11, 44, 2, 27, 104, 78, 69, 
38, -1, 42, -4, 27, 19, -4, 27, 19, 10, 57, 17, 39, 65, 70, 35, 
12, 67, 64, 6, 80, 46, 44, 29, 32, 54, 40), test2 = c(0, 25, 
30, 5, 55, 37, 31, 40, 18, 51, 67, 84, 57, 28, 19, 35, 40, 3, 
5, 23, 5, 41, 72, 50, 34, 43, 16, 4, 16, 57, 28, 16, 57, 28, 
7, 14, 6, 35, 47, 19, 18, 16, 26, 37, 25, 75, 44, 65, 22, -14, 
34, 24), test3 = c(36, 23, 54, 24, 23, 33, 64, 45, 44, 53, 60, 
22, 61, 31, 19, 63, 44, 79, 21, 50, 38, 57, 48, 39, 34, 65, 30, 
-3, 1, 0, 62, 1, 0, 62, 13, -14, 27, 37, 22, 25, 29, 0, 24, 58, 
33, 46, 38, 72, 42, 28, 19, 24)), .Names = c("test1", "test2", 
"test3"), class = "data.frame", row.names = c("1", "2", "3", 
"4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", 
"16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", 
"27", "28", "29", "30", "31", "32", "33", "34", "35", "36", "37", 
"38", "39", "40", "41", "42", "43", "44", "45", "46", "47", "48", 
"49", "50", "51", "52"))