data/Problem5.41.R

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

Problem5.41 <- data.frame(
	"Block" = c(
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2'
	),
	"Operator" = c(
		1,
		1,
		2,
		2,
		3,
		3,
		1,
		1,
		2,
		2,
		3,
		3,
		1,
		1,
		2,
		2,
		3,
		3,
		1,
		1,
		2,
		2,
		3,
		3
	),
	"Machine" = c(
		1,
		1,
		1,
		1,
		1,
		1,
		2,
		2,
		2,
		2,
		2,
		2,
		3,
		3,
		3,
		3,
		3,
		3,
		4,
		4,
		4,
		4,
		4,
		4
	),
	"Strength" = c(
		109,
		110,
		110,
		112,
		116,
		114,
		110,
		115,
		110,
		111,
		112,
		115,
		108,
		109,
		111,
		109,
		114,
		119,
		110,
		108,
		114,
		112,
		120,
		117
	))