data/Problem7.5.R

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

Problem7.5 <- data.frame(
	"Block" = c(
		'Block 2',
		'Block 1',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 2',
		'Block 1',
		'Block 1',
		'Block 2',
		'Block 2',
		'Block 1',
		'Block 2',
		'Block 1',
		'Block 1',
		'Block 2'
	),
	"A" = c(
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1,
		-1,
		1
	),
	"B" = c(
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1,
		-1,
		-1,
		1,
		1
	),
	"C" = c(
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1
	),
	"D" = c(
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		-1,
		1,
		1,
		1,
		1,
		1,
		1,
		1,
		1
	),
	"Yield" = c(
		90,
		74,
		81,
		83,
		77,
		81,
		88,
		73,
		98,
		72,
		87,
		85,
		99,
		79,
		87,
		80
	))