From a6c3cb244ee3d27ec7b168bbf170972fddf466ae Mon Sep 17 00:00:00 2001 From: AJ Rossini Date: Tue, 10 Mar 2009 08:50:39 +0100 Subject: [PATCH] Errors in presentation API logic found by Thomas Lumley during explanation. Fixed. Signed-off-by: AJ Rossini --- TODO.lisp | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/TODO.lisp b/TODO.lisp index cbdc14d..39c565d 100644 --- a/TODO.lisp +++ b/TODO.lisp @@ -1,6 +1,6 @@ ;;; -*- mode: lisp -*- -;;; Time-stamp: <2009-02-17 08:37:49 tony> +;;; Time-stamp: <2009-03-08 12:29:51 tony> ;;; Creation: <2008-09-08 08:06:30 tony> ;;; File: TODO.lisp ;;; Author: AJ Rossini @@ -360,12 +360,19 @@ (progn ;; philosophy time (setf my-model (model :name "ex1" - :data-slots (list x y z) + :data-slots (list w x y z) :param-slots (list alpha beta gamma) - :math-form (regression-model :formula '(= y (+ (* beta x) + :math-form (regression-model :formula '(= w (+ (* beta x) (* alpha y) (* gamma z) - normal-error))))) + normal-error)) + :centrality 'median ; 'mean + ))) + +#| or: + #R"W ~ x+ y + z " +|# + (setf my-dataset (statistical-table :table data-frame-contents :metadata (list (:case-names (list )) (:var-names (list )) -- 2.11.4.GIT