data/Table15.4.R

In ehassler/MontgomeryDAE: MontgomeryDAE - Data and examples from Montgomery's "Design and Analysis of Experiments"

Table15.4 <- data.frame(
	'Run'=c(1.0, 2.0, 3.0, 4.0, 5.0, 6.0, 7.0, 8.0, 9.0, 10.0, 11.0, 12.0, 13.0, 14.0, 15.0, 16.0, 17.0, 18.0, 19.0, 20.0, 21.0, 22.0, 23.0, 24.0, 25.0, 26.0, 27.0),
	'x1'=c(rep(-1, 9), rep(0, 9), rep(1, 9)),
	'x2'=rep(c(rep(-1, 3), rep(0, 3), rep(1, 3)), 3),
	'x3'=rep(c(-1.0, 0.0, 1.0), 9),
	'CyclesToFailure'=c(674.0, 370.0, 292.0, 338.0, 266.0, 210.0, 170.0, 118.0, 90.0, 1414.0, 1198.0, 634.0, 1022.0, 620.0, 438.0, 442.0, 332.0, 220.0, 3636.0, 3184.0, 2000.0, 1568.0, 1070.0, 566.0, 1140.0, 884.0, 360.0)
);