data/Problem7.15.R

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

Problem7.15 <- 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'
	),
	"AcidStrength" = c(
		87,
		93,
		87,
		93,
		87,
		93,
		87,
		93,
		87,
		93,
		87,
		93,
		87,
		93,
		87,
		93
	),
	"ReactionTime" = c(
		15,
		15,
		30,
		30,
		15,
		15,
		30,
		30,
		15,
		15,
		30,
		30,
		15,
		15,
		30,
		30
	),
	"AmountOfAcid" = c(
		35,
		35,
		35,
		35,
		45,
		45,
		45,
		45,
		35,
		35,
		35,
		35,
		45,
		45,
		45,
		45
	),
	"ReactionTemperature" = c(
		60,
		60,
		60,
		60,
		60,
		60,
		60,
		60,
		70,
		70,
		70,
		70,
		70,
		70,
		70,
		70
	),
	"Yield" = c(
		6.08,
		6.04,
		6.53,
		6.43,
		6.31,
		6.09,
		6.12,
		6.36,
		6.79,
		6.68,
		6.73,
		6.08,
		6.77,
		6.38,
		6.49,
		6.23
	))