From 104c338cbe752ebc5a519e12cfa13b630e3dac68 Mon Sep 17 00:00:00 2001 From: AJ Rossini Date: Sun, 11 Nov 2007 13:29:24 +0100 Subject: [PATCH] more natural test order. --- ls-demo.lisp | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/ls-demo.lisp b/ls-demo.lisp index 2ea53e2..014b46d 100644 --- a/ls-demo.lisp +++ b/ls-demo.lisp @@ -83,7 +83,7 @@ my-chol-decomp-test ;; (0.0 -0.7453559924999292 -1.1925695879998877) ;; (0.0 0.0 -1.3416407864998738))) -(rcondest #2A((2 3 4) (1 2 4) (2 4 5))) +(rcondest #2A((2 3 4) (1 2 4) (2 4 5))) ;; 6.8157451e7 (eigen #2A((2 3 4) (1 2 4) (2 4 5))) @@ -215,11 +215,12 @@ my-chol-decomp-test (last-test-status) ;;(failures) +(describe (run-tests :suite 'lisp-stat-testsupport)) + (testsuite-tests 'lisp-stat) (run-tests :suite 'lisp-stat) (describe (run-tests :suite 'lisp-stat)) -(describe (run-tests :suite 'lisp-stat-testsupport)) (run-tests :suite 'lisp-stat-probdistn) (describe (run-tests :suite 'lisp-stat-probdistn)) (run-tests :suite 'lisp-stat-spec-fns) @@ -282,9 +283,6 @@ absorbtion (send fit1 :display) (send fit1 :residuals) - - - (def m (regression-model (list iron aluminum) absorbtion)) (send m :help) (send m :plot-residuals) -- 2.11.4.GIT