data/Problem8.37.R

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

Problem8.37 <- data.frame(
	"SqueegeePressure" = c(
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3,
		0.1,
		0.3
	),
	"PrintingSpeed" = c(
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32,
		24,
		24,
		32,
		32
	),
	"SqueegeeAngle" = c(
		45,
		45,
		45,
		45,
		65,
		65,
		65,
		65,
		45,
		45,
		45,
		45,
		65,
		65,
		65,
		65,
		45,
		45,
		45,
		45,
		65,
		65,
		65,
		65,
		45,
		45,
		45,
		45,
		65,
		65,
		65,
		65
	),
	"Temperature" = c(
		20,
		20,
		20,
		20,
		20,
		20,
		20,
		20,
		28,
		28,
		28,
		28,
		28,
		28,
		28,
		28,
		20,
		20,
		20,
		20,
		20,
		20,
		20,
		20,
		28,
		28,
		28,
		28,
		28,
		28,
		28,
		28
	),
	"Viscosity" = c(
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1125,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275,
		1275
	),
	"CleaningInterval" = c(
		8,
		15,
		15,
		8,
		15,
		8,
		8,
		15,
		8,
		15,
		15,
		8,
		15,
		8,
		8,
		15,
		8,
		15,
		15,
		8,
		15,
		8,
		8,
		15,
		8,
		15,
		15,
		8,
		15,
		8,
		8,
		15
	),
	"SeparationSpeed" = c(
		0.4,
		0.8,
		0.8,
		0.4,
		0.4,
		0.8,
		0.8,
		0.4,
		0.8,
		0.4,
		0.4,
		0.8,
		0.8,
		0.4,
		0.4,
		0.8,
		0.4,
		0.8,
		0.8,
		0.4,
		0.4,
		0.8,
		0.8,
		0.4,
		0.8,
		0.4,
		0.4,
		0.8,
		0.8,
		0.4,
		0.4,
		0.8
	),
	"RelativeHumidity" = c(
		70,
		70,
		30,
		30,
		30,
		30,
		70,
		70,
		30,
		30,
		70,
		70,
		70,
		70,
		30,
		30,
		30,
		30,
		70,
		70,
		70,
		70,
		30,
		30,
		70,
		70,
		30,
		30,
		30,
		30,
		70,
		70
	),
	"Pvm" = c(
		1,
		1.04,
		1.02,
		0.99,
		1.02,
		1.01,
		1.01,
		1.03,
		1.04,
		1.14,
		1.2,
		1.13,
		1.14,
		1.07,
		1.06,
		1.13,
		1.02,
		1.1,
		1.09,
		0.96,
		1.02,
		1.07,
		0.98,
		0.95,
		1.1,
		1.12,
		1.19,
		1.13,
		1.2,
		1.07,
		1.12,
		1.21
	),
	"Npu" = c(
		5,
		13,
		16,
		12,
		15,
		9,
		12,
		17,
		21,
		20,
		25,
		21,
		25,
		13,
		20,
		26,
		10,
		13,
		17,
		13,
		14,
		11,
		10,
		14,
		28,
		24,
		22,
		15,
		21,
		19,
		21,
		27
	))