X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Flinreg.h;h=31bf5651051564774d0417571a99f929a562f270;hb=95b6394d56fe347634a207f2e65a3ef9cfe05ca8;hp=f6c7e2e8c43d3f37d4fa451e1fb2e835fede9d4c;hpb=3aa2d5510442a459946a2e9bada801ac86e07fd4;p=pspp

diff --git a/src/math/linreg.h b/src/math/linreg.h
index f6c7e2e8c4..31bf565105 100644
--- a/src/math/linreg.h
+++ b/src/math/linreg.h
@@ -129,11 +129,6 @@ struct linreg_struct
 				   dfe, but since it is the best unbiased
 				   estimate of the population variance, it
 				   has its own entry here. */
-  gsl_vector *ssx;		/* Centered sums of squares for independent
-				   variables, i.e. \sum (x[i] - mean(x))^2. */
-  double ssy;			/* Centered sums of squares for dependent
-				   variable.
-				 */
   /*
      Covariance matrix of the parameter estimates.
    */
@@ -145,15 +140,9 @@ struct linreg_struct
   double dfe;
   double dfm;
 
-  /*
-     'Hat' or Hessian matrix, i.e. (X'X)^{-1}, where X is our
-     design matrix.
-   */
-  gsl_matrix *hat;
-
-  struct variable *resid;
   struct variable *pred;
-
+  struct variable *resid;
+  int dependent_column; /* Column containing the dependent variable. Defaults to last column. */
 };
 
 typedef struct linreg_struct linreg;
@@ -198,7 +187,11 @@ gsl_matrix * linreg_cov (const linreg *);
 double linreg_coeff (const linreg *, size_t);
 const struct variable * linreg_indep_var (const linreg *, size_t);
 size_t linreg_n_coeffs (const linreg *);
-size_t linreg_n_obs (const linreg *);
+double linreg_n_obs (const linreg *);
+double linreg_sse (const linreg *);
 double linreg_ssreg (const linreg *);
 double linreg_dfmodel (const linreg *);
+double linreg_sst (const linreg *);
+void linreg_set_depvar_mean (linreg *, double);
+double linreg_get_depvar_mean (linreg *);
 #endif