;;; $Id: BHHtbl7-11.lsp,v 1.1 1994/02/19 16:36:09 bates Exp $
;;; Data from Table 7.11, page 228 of Box, Hunter, and Hunter,
;;; "Statistics for Experimenters" (Wiley, 1978)

;;; Data are the poison administered, anti-toxin treatment, and
;;; survival time (unit, 10 hours)

(def poison (repeat '(1 2 3) '(16 16 16)))
(def treatment (repeat (repeat '(1 2 3 4) '(4 4 4 4)) 3))
(def survival (list 0.31 0.45 0.46 0.43
		    0.82 1.10 0.88 0.72
		    0.43 0.45 0.63 0.76
		    0.45 0.71 0.66 0.62

		    0.36 0.29 0.40 0.23
		    0.92 0.61 0.49 1.24
		    0.44 0.35 0.31 0.40
		    0.56 1.02 0.71 0.38

		    0.22 0.21 0.18 0.23
		    0.30 0.37 0.38 0.29
		    0.23 0.25 0.24 0.22
		    0.30 0.36 0.31 0.33))
(def rats (list poison treatment survival))