From: Jason Stover <jhs@math.gcsu.edu>
Date: Wed, 26 Oct 2005 19:29:18 +0000 (+0000)
Subject: Added var structs to allow easier lookup of model variables
X-Git-Tag: sav-api~2176
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7ca2a9077640efaa6da449396972180684e49243;p=pspp

Added var structs to allow easier lookup of model variables
---

diff --git a/lib/linreg/pspp_linreg.h b/lib/linreg/pspp_linreg.h
index 92e78a0f24..5fa4e63bc4 100644
--- a/lib/linreg/pspp_linreg.h
+++ b/lib/linreg/pspp_linreg.h
@@ -54,6 +54,7 @@
 #include <gsl/gsl_multifit.h>
 #include <gsl/gsl_blas.h>
 #include <gsl/gsl_cblas.h>
+#include <src/var.h>
 enum
 {
   PSPP_LINREG_SWEEP,
@@ -70,8 +71,14 @@ struct pspp_linreg_cache_struct
 {
   int n_obs;			/* Number of observations. */
   int n_indeps;			/* Number of independent variables. */
-  gsl_vector *depvar;
-  gsl_matrix *indepvar;
+
+  /* 
+     The var structs are ignored during estimation.
+     They are here so the calling procedures can
+     find the variables used in the model.
+  */
+  struct var *depvar;
+  struct var **indepvar;   
   gsl_vector *residuals;
   gsl_vector *param_estimates;
   int method;			/* Method to use to estimate parameters. */
@@ -81,8 +88,8 @@ struct pspp_linreg_cache_struct
      called, pspp_linreg() will compute their values.
 
      Entry i of indep_means is the mean of independent
-     variable i, whose observations are stored in column i
-     of indepvar.
+     variable i, whose observations are stored in the ith
+     column of the design matrix.
    */
   double depvar_mean;
   double depvar_std;