data/Problem11.8.R

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

Problem11.8 <- data.frame(
	"X1" = c(
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1.6817928305074,
		1.6817928305074,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0
	),
	"X2" = c(
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		0,
		0,
		-1.6817928305074,
		1.6817928305074,
		0,
		0,
		0,
		0,
		0,
		0,
		0,
		0
	),
	"X3" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		0,
		0,
		0,
		0,
		-1.6817928305074,
		1.6817928305074,
		0,
		0,
		0,
		0,
		0,
		0
	),
	"Yield" = c(
		66,
		80,
		78,
		100,
		70,
		70,
		60,
		75,
		100,
		80,
		68,
		63,
		65,
		82,
		113,
		100,
		118,
		88,
		100,
		85
	))