data/Problem5.31.R

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

Problem5.31 <- data.frame(
	"Battery" = c(
		'A',
		'A',
		'B',
		'B',
		'A',
		'A',
		'B',
		'B',
		'A',
		'A',
		'B',
		'B'
	),
	"Device" = c(
		'Radio',
		'Radio',
		'Radio',
		'Radio',
		'Camera',
		'Camera',
		'Camera',
		'Camera',
		'DVD',
		'DVD',
		'DVD',
		'DVD'
	),
	"LifeHours" = c(
		8.6,
		8.2,
		9.4,
		8.8,
		7.9,
		8.4,
		8.5,
		8.9,
		5.4,
		5.7,
		5.8,
		5.9
	))