data/Problem11.36.R

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

Problem11.36 <- data.frame(
	"StdOrd" = c(
		1,
		2,
		3,
		4,
		5,
		6,
		7,
		8,
		9,
		10,
		11,
		12,
		13,
		14,
		15,
		16,
		17,
		18,
		19,
		20
	),
	"X1" = c(
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1.68,
		1.68,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0
	),
	"X2" = c(
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		0,
		0,
		-1.68,
		1.68,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0
	),
	"X3" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		0,
		0,
		0,
		0,
		-1.68,
		1.68,
		0,
		0,
		0,
		0,
		0,
		0
	),
	"Cef" = c(
		17.3,
		45.5,
		10.3,
		11757.1,
		16.942,
		25.4,
		31697.2,
		12039.2,
		7.5,
		6.3,
		11.1,
		6.6664,
		16548.7,
		26351.8,
		9.9,
		9.6,
		8.9,
		8.8,
		8.013,
		8.059
	))