;;; $Id: BHHtbl7-1.lsp,v 1.1 1994/02/19 15:19:36 bates Exp $
;;; Data from Table 7.1, page 209 of Box, Hunter, and Hunter,
;;; "Statistics for Experimenters" (Wiley, 1978)

;;; Data are the treatment (variant of basic process), blend (a
;;; blocking variable), and yield of penicillin.

(def blend (repeat '(1 2 3 4 5) '(4 4 4 4 4)))
(def treatment (repeat '(1 2 3 4) 5))
(def yield (list 89 88 97 94
		 84 77 92 79
		 81 87 87 85
		 87 92 89 84
		 79 81 80 88))
(def pen (list blend treatment yield))