data/Problem4.8.R

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

Problem4.8 <- data.frame(
	"Chemist" = c(
		'1',
		'1',
		'1',
		'1',
		'1',
		'2',
		'2',
		'2',
		'2',
		'2',
		'3',
		'3',
		'3',
		'3',
		'3',
		'4',
		'4',
		'4',
		'4',
		'4'
	),
	"Bolt" = c(
		1,
		2,
		3,
		4,
		5,
		1,
		2,
		3,
		4,
		5,
		1,
		2,
		3,
		4,
		5,
		1,
		2,
		3,
		4,
		5
	),
	"Strength" = c(
		73,
		68,
		74,
		71,
		67,
		73,
		67,
		75,
		72,
		70,
		75,
		68,
		78,
		73,
		68,
		73,
		71,
		75,
		75,
		69
	))