data/Problem14.3.R

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

Problem14.3 <- data.frame(
	"Variability" = c(
		12,
		9,
		11,
		12,
		14,
		15,
		13,
		14,
		14,
		10,
		12,
		11,
		8,
		9,
		10,
		8,
		12,
		10,
		11,
		13,
		16,
		15,
		15,
		14
	),
	"Machine" = c(
		1,
		1,
		1,
		1,
		2,
		2,
		2,
		2,
		3,
		3,
		3,
		3,
		1,
		1,
		1,
		1,
		2,
		2,
		2,
		2,
		3,
		3,
		3,
		3
	),
	"Spindle" = c(
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		2,
		2,
		2,
		2,
		2,
		2,
		2,
		2,
		2,
		2,
		2,
		2
	))