data/Problem8.9.R

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

Problem8.9 <- data.frame(
	"Solvent" = c(
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1
	),
	"Catalyst" = c(
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1
	),
	"Temperature" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1
	),
	"Purity" = c(
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1
	),
	"ReactantPh" = c(
		1,
		-1,
		-1,
		1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		1,
		-1,
		-1,
		1
	),
	"Color" = c(
		-0.63,
		2.51,
		-2.68,
		1.66,
		2.06,
		1.22,
		-2.09,
		1.93,
		6.79,
		5.47,
		3.45,
		5.68,
		5.22,
		4.38,
		4.3,
		4.05
	))