From 485fa89ac746753a46dd5fb3e5ba816b5206dd88 Mon Sep 17 00:00:00 2001 From: AJ Rossini Date: Thu, 16 Apr 2009 08:30:27 +0200 Subject: [PATCH] reality check for linear regression syntax. Works, needs labels. Signed-off-by: AJ Rossini --- TODO.lisp | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/TODO.lisp b/TODO.lisp index db329d3..ec022c9 100644 --- a/TODO.lisp +++ b/TODO.lisp @@ -1,6 +1,6 @@ ;;; -*- mode: lisp -*- -;;; Time-stamp: <2009-04-13 12:14:44 tony> +;;; Time-stamp: <2009-04-15 16:34:53 tony> ;;; Creation: <2008-09-08 08:06:30 tony> ;;; File: TODO.lisp ;;; Author: AJ Rossini @@ -23,7 +23,7 @@ (in-package :lisp-stat-unittests) -;; tests = 78, failures = 7, errors = 15 +;; tests = 80, failures = 8, errors = 15 (run-tests :suite 'lisp-stat-ut) (describe (run-tests :suite 'lisp-stat-ut)) @@ -45,11 +45,15 @@ (defparameter *m-fit* (fit-model *m*)) + + (princ *m*) + (princ *m-fit*) + (estimates *m-fit*) - (covariation-matrix *m-fit*) + (covariance-matrix *m-fit*) (defparameter *m3* - (regression-model (listoflists->matrix-like (list iron aluminum)) + (regression-model (listoflist->matrix-like (list iron aluminum)) (list->vector-like absorbtion) :print nil)) (defparameter *m3-fit* (fit-model *m3*)) -- 2.11.4.GIT