data/Problem3.22.R

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

Problem3.22 <- data.frame(
	"CoatingType" = c(
		'1',
		'1',
		'1',
		'1',
		'2',
		'2',
		'2',
		'2',
		'3',
		'3',
		'3',
		'3',
		'4',
		'4',
		'4',
		'4'
	),
	"Conductivity" = c(
		143,
		141,
		150,
		146,
		152,
		149,
		137,
		143,
		134,
		136,
		132,
		127,
		129,
		127,
		132,
		129
	))