projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
ref count the linreg structure so as to avoid double free problems
[pspp]
/
src
/
math
/
moments.c
diff --git
a/src/math/moments.c
b/src/math/moments.c
index e289e8aec0ef27c2372e2c007eeb30e6b2f6d469..83cbbe4ca1fb3e4c2d4e2a6497ed84ced68b0c31 100644
(file)
--- a/
src/math/moments.c
+++ b/
src/math/moments.c
@@
-461,6
+461,13
@@
moments1_destroy (struct moments1 *m)
free (m);
}
\f
+
+double
+calc_semean (double var, double W)
+{
+ return sqrt (var / W);
+}
+
/* Returns the standard error of the skewness for the given total
weight W.