data/Problem8.4.R

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

Problem8.4 <- data.frame(
	"Aperture" = c(
		'small',
		'large',
		'small',
		'large',
		'small',
		'large',
		'small',
		'large'
	),
	"ExposureTime" = c(
		-20,
		-20,
		20,
		20,
		-20,
		-20,
		20,
		20
	),
	"DevelopTime" = c(
		30,
		30,
		30,
		30,
		45,
		45,
		45,
		45
	),
	"MaskDimension" = c(
		'Large',
		'Small',
		'Small',
		'Large',
		'Large',
		'Small',
		'Small',
		'Large'
	),
	"EtchTime" = c(
		15.5,
		14.5,
		15.5,
		14.5,
		14.5,
		15.5,
		14.5,
		15.5
	),
	"Yield" = c(
		6,
		9,
		35,
		50,
		18,
		22,
		40,
		63
	))