Fix bug 25677

[pspp-builds.git] / src / math / linreg.c

diff --git a/src/math/linreg.c b/src/math/linreg.c
index 2fb98cf76822d020c4369d31acdf8ce0a91b1457..609a78b6dc9cd98a1d228110e533c396578d996d 100644 (file)
--- a/src/math/linreg.c
+++ b/src/math/linreg.c
@@ -741,3 +741,8 @@ pspp_linreg_with_cov (const struct design_matrix *full_cov,
   covariance_matrix_destroy (cov);
 }
 
+double pspp_linreg_mse (const pspp_linreg_cache *c)
+{
+  assert (c != NULL);
+  return (c->sse / c->dfe);
+}