data/Problem9.6.R

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

Problem9.6 <- data.frame(
	"Pressure" = c(
		'100',
		'100',
		'120',
		'120',
		'140',
		'140',
		'100',
		'100',
		'120',
		'120',
		'140',
		'140',
		'100',
		'100',
		'120',
		'120',
		'140',
		'140'
	),
	"Temperature" = c(
		'80',
		'80',
		'80',
		'80',
		'80',
		'80',
		'90',
		'90',
		'90',
		'90',
		'90',
		'90',
		'100',
		'100',
		'100',
		'100',
		'100',
		'100'
	),
	"Yield" = c(
		47.58,
		48.77,
		64.97,
		69.22,
		80.92,
		72.6,
		51.86,
		82.43,
		88.47,
		84.23,
		93.95,
		88.54,
		71.18,
		92.77,
		96.57,
		88.72,
		76.58,
		83.04
	))