data/Problem3.10.R

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

Problem3.10 <- data.frame(
	"Sham" = c(
		4.51,
		7.95,
		4.97,
		3,
		7.97,
		2.23,
		3.95,
		5.64,
		9.35,
		6.52,
		4.96,
		6.1,
		7.19,
		4.03,
		2.72,
		9.19,
		5.17,
		5.7,
		5.85,
		6.45
	),
	"OneHour" = c(
		5.32,
		6,
		5.12,
		7.08,
		5.48,
		6.52,
		4.09,
		6.28,
		7.77,
		5.68,
		8.47,
		4.58,
		4.11,
		5.72,
		5.91,
		6.89,
		6.99,
		4.98,
		9.94,
		6.38
	),
	"TwoHours" = c(
		4.73,
		5.81,
		5.69,
		3.86,
		4.06,
		6.56,
		8.34,
		3.01,
		6.71,
		6.51,
		1.7,
		5.89,
		6.55,
		5.34,
		5.88,
		7.5,
		3.28,
		5.38,
		7.3,
		5.46
	),
	"FourHours" = c(
		7.03,
		4.65,
		6.65,
		5.49,
		6.98,
		4.85,
		7.26,
		5.92,
		5.58,
		7.91,
		4.9,
		4.54,
		8.18,
		5.42,
		6.03,
		7.04,
		5.17,
		7.6,
		7.9,
		7.91
	))