data/Problem8.46.R

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

Problem8.46 <- data.frame(
	"Run" = c(
		1,
		2,
		3,
		4,
		5,
		6,
		7,
		8,
		9,
		10,
		11,
		12,
		13,
		14,
		15,
		16
	),
	"A" = c(
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1
	),
	"B" = c(
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1
	),
	"C" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1
	),
	"D" = c(
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1
	),
	"E" = c(
		-1,
		1,
		1,
		-1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		-1,
		1,
		1,
		-1
	),
	"Y" = c(
		65,
		25,
		30,
		89,
		25,
		60,
		70,
		50,
		20,
		70,
		80,
		30,
		60,
		20,
		40,
		90
	),
	"Block" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1
	))