The R Project SVN R

Rev

Rev 30412 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 30412 Rev 40012
Line 1... Line 1...
1
### $Id: Loblolly.R,v 1.1 2003/12/11 07:16:04 ripley Exp $
1
### $Id: Loblolly.R,v 1.1 2003/12/11 07:16:04 ripley Exp $
2
### Growth of Loblolly pine trees
2
### Growth of Loblolly pine trees
3
### Kung (1986), ASA Proc. of the Statistical Computing Section, 340-343.
3
### Kung (1986), ASA Proc. of the Statistical Computing Section, 340-343.
4
"Loblolly" <-
4
"Loblolly" <-
5
  structure(list
5
  structure(list
6
  (height = c(4.51, 10.89, 28.72, 41.74, 52.7, 60.92, 
6
  (height = c(4.51, 10.89, 28.72, 41.74, 52.7, 60.92,
7
     4.55, 10.92, 29.07, 42.83, 53.88, 63.39, 4.79, 11.37, 30.21, 
7
     4.55, 10.92, 29.07, 42.83, 53.88, 63.39, 4.79, 11.37, 30.21,
8
     44.4, 55.82, 64.1, 3.91, 9.48, 25.66, 39.07, 50.78, 59.07, 4.81, 
8
     44.4, 55.82, 64.1, 3.91, 9.48, 25.66, 39.07, 50.78, 59.07, 4.81,
9
     11.2, 28.66, 41.66, 53.31, 63.05, 3.88, 9.4, 25.99, 39.55, 51.46, 
9
     11.2, 28.66, 41.66, 53.31, 63.05, 3.88, 9.4, 25.99, 39.55, 51.46,
10
     59.64, 4.32, 10.43, 27.16, 40.85, 51.33, 60.07, 4.57, 10.57, 
10
     59.64, 4.32, 10.43, 27.16, 40.85, 51.33, 60.07, 4.57, 10.57,
11
     27.9, 41.13, 52.43, 60.69, 3.77, 9.03, 25.45, 38.98, 49.76, 60.28, 
11
     27.9, 41.13, 52.43, 60.69, 3.77, 9.03, 25.45, 38.98, 49.76, 60.28,
12
     4.33, 10.79, 28.97, 42.44, 53.17, 61.62, 4.38, 10.48, 27.93, 
12
     4.33, 10.79, 28.97, 42.44, 53.17, 61.62, 4.38, 10.48, 27.93,
13
     40.2, 50.06, 58.49, 4.12, 9.92, 26.54, 37.82, 48.43, 56.81, 3.93, 
13
     40.2, 50.06, 58.49, 4.12, 9.92, 26.54, 37.82, 48.43, 56.81, 3.93,
14
     9.34, 26.08, 37.79, 48.31, 56.43, 3.46, 9.05, 25.85, 39.15, 49.12, 
14
     9.34, 26.08, 37.79, 48.31, 56.43, 3.46, 9.05, 25.85, 39.15, 49.12,
15
     59.49),
15
     59.49),
16
   age = c(3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 
16
   age = c(3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3,
17
     5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 
17
     5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25,
18
     3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 
18
     3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20,
19
     25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 
19
     25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15,
20
     20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 
20
     20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10, 15, 20, 25, 3, 5, 10,
21
     15, 20, 25),
21
     15, 20, 25),
22
   Seed = structure(ordered(c(10, 10, 10, 10, 10, 10, 
22
   Seed = structure(ordered(c(10, 10, 10, 10, 10, 10,
23
     13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 4, 4, 4, 4, 4, 
23
     13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 4, 4, 4, 4, 4,
24
     4, 12, 12, 12, 12, 12, 12, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 
24
     4, 12, 12, 12, 12, 12, 12, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7,
25
     9, 9, 9, 9, 9, 9, 8, 8, 8, 8, 8, 8, 11, 11, 11, 11, 11, 11, 3, 
25
     9, 9, 9, 9, 9, 9, 8, 8, 8, 8, 8, 8, 11, 11, 11, 11, 11, 11, 3,
26
     3, 3, 3, 3, 3, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 5, 5, 5, 5, 
26
     3, 3, 3, 3, 3, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 5, 5, 5, 5,
27
     5, 5), levels=1:14), class = c("ordered", "factor"),
27
     5, 5), levels=1:14), class = c("ordered", "factor"),
28
     .Label = c("329", "327", "325", "307", "331", "311",
28
     .Label = c("329", "327", "325", "307", "331", "311",
29
       "315", "321", "319", "301", "323", "309", "303",
29
       "315", "321", "319", "301", "323", "309", "303",
30
       "305"))), 
30
       "305"))),
31
row.names = c("1", "15", "29", 
31
row.names = c("1", "15", "29",
32
  "43", "57", "71", "2", "16", "30", "44", "58", "72", "3", "17", 
32
  "43", "57", "71", "2", "16", "30", "44", "58", "72", "3", "17",
33
  "31", "45", "59", "73", "4", "18", "32", "46", "60", "74", "5", 
33
  "31", "45", "59", "73", "4", "18", "32", "46", "60", "74", "5",
34
  "19", "33", "47", "61", "75", "6", "20", "34", "48", "62", "76", 
34
  "19", "33", "47", "61", "75", "6", "20", "34", "48", "62", "76",
35
  "7", "21", "35", "49", "63", "77", "8", "22", "36", "50", "64", 
35
  "7", "21", "35", "49", "63", "77", "8", "22", "36", "50", "64",
36
  "78", "9", "23", "37", "51", "65", "79", "10", "24", "38", "52", 
36
  "78", "9", "23", "37", "51", "65", "79", "10", "24", "38", "52",
37
  "66", "80", "11", "25", "39", "53", "67", "81", "12", "26", "40", 
37
  "66", "80", "11", "25", "39", "53", "67", "81", "12", "26", "40",
38
  "54", "68", "82", "13", "27", "41", "55", "69", "83", "14", "28", 
38
  "54", "68", "82", "13", "27", "41", "55", "69", "83", "14", "28",
39
  "42", "56", "70", "84"),
39
  "42", "56", "70", "84"),
40
class = c("nfnGroupedData", "nfGroupedData", "groupedData", "data.frame"),
40
class = c("nfnGroupedData", "nfGroupedData", "groupedData", "data.frame"),
41
formula = height ~ age | Seed,
41
formula = height ~ age | Seed,
42
labels = list(x = "Age of tree", y = "Height of tree"),
42
labels = list(x = "Age of tree", y = "Height of tree"),
43
units = list(x = "(yr)", y = "(ft)"))
43
units = list(x = "(yr)", y = "(ft)"))
-
 
44
environment(attr(Loblolly, "formula")) <- emptyenv()