data/Problem8.50.R

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

Problem8.50 <- data.frame(
	"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
	),
	"F" = c(
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1
	),
	"G" = c(
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1
	),
	"H" = c(
		1,
		-1,
		1,
		-1,
		-1,
		1,
		-1,
		1,
		1,
		-1,
		1,
		-1,
		-1,
		1,
		-1,
		1
	),
	"J" = c(
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1
	),
	"K" = c(
		-1,
		1,
		1,
		-1,
		1,
		-1,
		-1,
		1,
		-1,
		1,
		1,
		-1,
		1,
		-1,
		-1,
		1
	),
	"P" = c(
		0.958,
		1,
		0.977,
		0.775,
		0.958,
		0.958,
		0.813,
		0.906,
		0.679,
		0.781,
		1,
		0.896,
		0.958,
		0.818,
		0.841,
		0.955
	),
	"Arcsin" = c(
		1.364,
		1.571,
		1.419,
		1.077,
		1.364,
		1.364,
		1.124,
		1.259,
		0.969,
		1.081,
		1.571,
		1.241,
		1.364,
		1.13,
		1.161,
		1.357
	),
	"FAndT" = c(
		1.363,
		1.555,
		1.417,
		1.076,
		1.363,
		1.363,
		1.123,
		1.259,
		0.968,
		1.083,
		1.556,
		1.242,
		1.363,
		1.13,
		1.16,
		1.356
	))