data/Problem15.17.R

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

Problem15.17 <- data.frame(
	"Hardness" = c(
		120,
		140,
		150,
		125,
		136,
		165,
		140,
		120,
		125,
		133,
		175,
		132,
		124,
		141,
		130
	),
	"Speed" = c(
		1000,
		1000,
		1000,
		1000,
		1000,
		1200,
		1200,
		1200,
		1200,
		1200,
		1400,
		1400,
		1400,
		1400,
		1400
	),
	"Removal" = c(
		68,
		90,
		98,
		77,
		88,
		112,
		94,
		65,
		74,
		85,
		118,
		82,
		73,
		92,
		80
	))