data/Problem9.22.R

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

Problem9.22 <- data.frame(
	"Clone" = c(
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard',
		'Wadenswil',
		'Pommard'
	),
	"BerrySize" = c(
		'Small',
		'Small',
		'Large',
		'Large',
		'Small',
		'Small',
		'Large',
		'Large',
		'Small',
		'Small',
		'Large',
		'Large',
		'Small',
		'Small',
		'Large',
		'Large'
	),
	"FermTemp1" = c(
		'C1',
		'C1',
		'C1',
		'C1',
		'C2',
		'C2',
		'C2',
		'C2',
		'C1',
		'C1',
		'C1',
		'C1',
		'C2',
		'C2',
		'C2',
		'C2'
	),
	"FermTemp2" = c(
		'D1',
		'D1',
		'D1',
		'D1',
		'D1',
		'D1',
		'D1',
		'D1',
		'D2',
		'D2',
		'D2',
		'D2',
		'D2',
		'D2',
		'D2',
		'D2'
	),
	"WholeBerry" = c(
		'E1',
		'E1',
		'E2',
		'E2',
		'E2',
		'E2',
		'E1',
		'E1',
		'E2',
		'E2',
		'E1',
		'E1',
		'E1',
		'E1',
		'E2',
		'E2'
	),
	"MacerTime" = c(
		10,
		21,
		10,
		21,
		21,
		10,
		21,
		10,
		21,
		10,
		21,
		10,
		10,
		21,
		10,
		21
	),
	"Yeast" = c(
		'Assmanhau',
		'Champagne',
		'Champagne',
		'Assmanhau',
		'Champagne',
		'Assmanhau',
		'Assmanhau',
		'Champagne',
		'Assmanhau',
		'Champagne',
		'Champagne',
		'Assmanhau',
		'Champagne',
		'Assmanhau',
		'Assmanhau',
		'Champagne'
	),
	"Oak" = c(
		'Troncais',
		'Allier',
		'Allier',
		'Troncais',
		'Troncais',
		'Allier',
		'Allier',
		'Troncais',
		'Allier',
		'Troncais',
		'Troncais',
		'Allier',
		'Allier',
		'Troncais',
		'Troncais',
		'Allier'
	),
	"Rank" = c(
		4,
		10,
		6,
		9,
		11,
		1,
		15,
		5,
		12,
		2,
		16,
		3,
		8,
		14,
		7,
		13
	))