#|
An example of a logistic regression analysis
|#

(def yvals '(1.94 2.23 1.94 1.98 2.23 1.59 2.13 1.8 2.32 1.92 2.15 2.05 2.48
		  2.42 2.56 2.56))
(def ages '(42 67 62 52 57 58 55 63 44 62 51 64 54 64 54 57))
(def performance '(4 6 4 6 5 6 6 7 5 7 7 10 8 3 9 9))
(def xvals (bind-columns ages performance))
(logistic xvals (exp (- yvals)) :guess '(0 0 0) :scale '(50 6))