data/Problem10.2.R

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

Problem10.2 <- data.frame(
	"Pollution" = c(
		1.1,
		1.45,
		1.36,
		1.59,
		1.08,
		0.75,
		1.2,
		0.99,
		0.83,
		1.22,
		1.47,
		1.81,
		2.03,
		1.75,
		1.68
	),
	"Purity" = c(
		93.3,
		92,
		92.4,
		91.7,
		94,
		94.6,
		93.6,
		93.1,
		93.2,
		92.9,
		92.2,
		91.3,
		90.1,
		91.6,
		91.9
	))