inst/extdata/Machines.O.R

In forsearch: Diagnostic Analysis Using Forward Search Procedure for Various Models

Machines.O <-
structure(list(Observation = 1:54, Worker = structure(c(4L, 4L, 
4L, 2L, 2L, 2L, 5L, 5L, 5L, 3L, 3L, 3L, 6L, 6L, 6L, 1L, 1L, 1L, 
4L, 4L, 4L, 2L, 2L, 2L, 5L, 5L, 5L, 3L, 3L, 3L, 6L, 6L, 6L, 1L, 
1L, 1L, 4L, 4L, 4L, 2L, 2L, 2L, 5L, 5L, 5L, 3L, 3L, 3L, 6L, 6L, 
6L, 1L, 1L, 1L), .Label = c("6", "2", "4", "1", "3", "5"), class = c("ordered", 
"factor")), Machine = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L), .Label = c("A", 
"B", "C"), class = "factor"), score = c(52, 52.799999999999997, 
53.100000000000001, 51.799999999999997, 52.799999999999997, 53.100000000000001, 
60, 60.200000000000003, 58.399999999999999, 51.100000000000001, 
52.299999999999997, 50.299999999999997, 50.899999999999999, 51.799999999999997, 
51.399999999999999, 46.399999999999999, 44.799999999999997, 49.200000000000003, 
62.100000000000001, 62.600000000000001, 64, 59.700000000000003, 
60, 59, 68.599999999999994, 65.799999999999997, 69.700000000000003, 
63.200000000000003, 62.799999999999997, 62.200000000000003, 64.799999999999997, 
65, 65.400000000000006, 43.700000000000003, 44.200000000000003, 
43, 67.5, 67.200000000000003, 66.900000000000006, 61.5, 61.700000000000003, 
62.299999999999997, 70.799999999999997, 70.599999999999994, 71, 
64.099999999999994, 66.200000000000003, 64, 72.099999999999994, 
72, 71.099999999999994, 62, 61.399999999999999, 60.5)), 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", "54"))