;;; $Id: BHH281-1.lsp,v 1.1 1994/02/22 22:22:00 bates Exp bates $
;;; Data for problem 1, page 281 of Box, Hunter, and Hunter,
;;; "Statistics for Experimenters" (Wiley, 1978)

(def operator (repeat '(1 2 3 4) 5))
(def batch (repeat '(1 2 3 4 5) '(4 4 4 4 4)))
(def strength (list 89 88 97 94
		    84 77 92 79
		    81 87 87 85
		    87 92 89 84
		    79 81 80 88))
(def ingots (list operator batch strength))