X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Flinreg.c;h=609a78b6dc9cd98a1d228110e533c396578d996d;hb=849f1db3053e27a2879542ffebddb55909ce26ae;hp=2fb98cf76822d020c4369d31acdf8ce0a91b1457;hpb=47aaa033c935d0427abd7cbb591a35450eb7db81;p=pspp-builds.git

diff --git a/src/math/linreg.c b/src/math/linreg.c
index 2fb98cf7..609a78b6 100644
--- 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);
+}