data/Problem8.54.R

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

Problem8.54 <- data.frame(
	"MixerPorts" = c(
		'1',
		'2',
		'1',
		'2',
		'1',
		'2',
		'1',
		'2',
		'1',
		'2',
		'1',
		'2',
		'1',
		'2',
		'1',
		'2'
	),
	"Temperature" = c(
		'Cool',
		'Cool',
		'Ambient',
		'Ambient',
		'Cool',
		'Cool',
		'Ambient',
		'Ambient',
		'Cool',
		'Cool',
		'Ambient',
		'Ambient',
		'Cool',
		'Cool',
		'Ambient',
		'Ambient'
	),
	"MixingTime" = c(
		60,
		60,
		60,
		60,
		80,
		80,
		80,
		80,
		60,
		60,
		60,
		60,
		80,
		80,
		80,
		80
	),
	"BatchWeight" = c(
		1500,
		1500,
		1500,
		1500,
		1500,
		1500,
		1500,
		1500,
		2000,
		2000,
		2000,
		2000,
		2000,
		2000,
		2000,
		2000
	),
	"Delays" = c(
		1,
		7,
		7,
		1,
		7,
		1,
		1,
		7,
		7,
		1,
		1,
		7,
		1,
		7,
		7,
		1
	),
	"StdDev" = c(
		1.13,
		1.25,
		0.97,
		1.7,
		1.47,
		1.28,
		1.18,
		0.98,
		0.78,
		1.36,
		1.85,
		0.62,
		1.09,
		1.1,
		0.76,
		2.1
	))