data/Problem6.9.R

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

Problem6.9 <- data.frame(
	"BitSize" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1
	),
	"CuttingSpeed" = c(
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1
	),
	"Vibration" = c(
		18.2,
		18.9,
		12.9,
		14.4,
		27.2,
		24,
		22.4,
		22.5,
		15.9,
		14.5,
		15.1,
		14.2,
		41,
		43.9,
		36.3,
		39.9
	))