data/Problem9.1.R

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

Problem9.1 <- data.frame(
	"Strength" = c(
		'1',
		'1',
		'1',
		'1',
		'2',
		'2',
		'2',
		'2',
		'3',
		'3',
		'3',
		'3',
		'1',
		'1',
		'1',
		'1',
		'2',
		'2',
		'2',
		'2',
		'3',
		'3',
		'3',
		'3',
		'1',
		'1',
		'1',
		'1',
		'2',
		'2',
		'2',
		'2',
		'3',
		'3',
		'3',
		'3'
	),
	"Time" = c(
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'10',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'14',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18',
		'18'
	),
	"Density" = c(
		0,
		5,
		2,
		4,
		4,
		7,
		6,
		5,
		7,
		8,
		10,
		7,
		1,
		4,
		3,
		2,
		6,
		7,
		8,
		7,
		10,
		8,
		10,
		7,
		2,
		4,
		5,
		6,
		9,
		8,
		10,
		5,
		12,
		9,
		10,
		8
	))