data/Problem4.26.R

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

Problem4.26 <- data.frame(
	"Distance" = c(
		'4',
		'4',
		'4',
		'4',
		'4',
		'6',
		'6',
		'6',
		'6',
		'6',
		'8',
		'8',
		'8',
		'8',
		'8',
		'10',
		'10',
		'10',
		'10',
		'10'
	),
	"Subject" = c(
		1,
		2,
		3,
		4,
		5,
		1,
		2,
		3,
		4,
		5,
		1,
		2,
		3,
		4,
		5,
		1,
		2,
		3,
		4,
		5
	),
	"FocusTime" = c(
		10,
		6,
		6,
		6,
		6,
		7,
		6,
		6,
		1,
		6,
		5,
		3,
		3,
		2,
		5,
		6,
		4,
		4,
		2,
		3
	))