data/Problem12.12.R

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

Problem12.12 <- data.frame(
	"A" = c(
		1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		-1,
		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,
		-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,
		-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,
		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,
		-1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1
	),
	"F" = c(
		1,
		-1,
		-1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1
	))