data/Problem3.53.R

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

Problem3.53 <- data.frame(
	"Power" = c(
		160,
		160,
		160,
		160,
		160,
		180,
		180,
		180,
		180,
		180,
		200,
		200,
		200,
		200,
		200,
		220,
		220,
		220,
		220,
		220
	),
	"EtchRate" = c(
		575,
		542,
		530,
		539,
		570,
		565,
		593,
		590,
		579,
		610,
		600,
		651,
		610,
		637,
		629,
		725,
		700,
		715,
		685,
		710
	))