data/Problem6.35.R

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

Problem6.35 <- data.frame(
	"Temperature" = c(
		100,
		120,
		100,
		120,
		100,
		120,
		100,
		120,
		100,
		120,
		100,
		120,
		100,
		120,
		100,
		120,
		110,
		110,
		110,
		110
	),
	"CatalystConcentration" = c(
		4,
		4,
		8,
		8,
		4,
		4,
		8,
		8,
		4,
		4,
		8,
		8,
		4,
		4,
		8,
		8,
		6,
		6,
		6,
		6
	),
	"Time" = c(
		20,
		20,
		20,
		20,
		30,
		30,
		30,
		30,
		20,
		20,
		20,
		20,
		30,
		30,
		30,
		30,
		25,
		25,
		25,
		25
	),
	"Pressure" = c(
		60,
		60,
		60,
		60,
		60,
		60,
		60,
		60,
		75,
		75,
		75,
		75,
		75,
		75,
		75,
		75,
		67.5,
		67.5,
		67.5,
		67.5
	),
	"MolecularWeight" = c(
		2400,
		2410,
		2315,
		2510,
		2615,
		2625,
		2400,
		2750,
		2400,
		2390,
		2300,
		2520,
		2625,
		2630,
		2500,
		2710,
		2515,
		2500,
		2400,
		2475
	),
	"Viscosity" = c(
		1400,
		1500,
		1520,
		1630,
		1380,
		1525,
		1500,
		1620,
		1400,
		1525,
		1500,
		1500,
		1420,
		1490,
		1500,
		1600,
		1500,
		1460,
		1525,
		1500
	))