1 /* PSPP - A program for statistical analysis . -*-c-*-
3 Copyright (C) 2004 Free Software Foundation, Inc.
5 This program is free software; you can redistribute it and/or
6 modify it under the terms of the GNU General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 License, or (at your option) any later version.
10 This program is distributed in the hope that it will be useful, but
11 WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
24 /* FIXME: These things should probably be amalgamated with the
25 group_statistics struct */
27 #include <libpspp/hash.h>
28 #include <data/value.h>
30 #include <gsl/gsl_histogram.h>
31 #include "percentiles.h"
54 struct moments1 *moments;
56 gsl_histogram *histogram;
63 /* A hash of data for this factor. */
64 struct hsh_table *ordered_data;
66 /* A Pointer to this hash table AFTER it has been SORTED and crunched */
67 struct weighted_value **wvp;
69 /* The number of values in the above array
70 (if all the weights are 1, then this will
74 /* Percentile stuff */
76 /* A hash of struct percentiles */
77 struct hsh_table *ptile_hash;
79 /* Algorithm to be used for calculating percentiles */
80 enum pc_alg ptile_alg;
88 struct metrics * metrics_create(void);
90 void metrics_precalc(struct metrics *m);
92 void metrics_calc(struct metrics *m, const union value *f, double weight,
95 void metrics_postcalc(struct metrics *m);
97 void metrics_destroy(struct metrics *m);
101 /* Linked list of case nos */
105 struct case_node *next;
108 struct weighted_value
115 /* The cumulative weight */
121 /* Linked list of cases nos which have this value */
122 struct case_node *case_nos;
127 struct weighted_value *weighted_value_create(void);
129 void weighted_value_free(struct weighted_value *wv);
133 struct factor_statistics {
135 /* The values of the independent variables */
138 /* The an array stats for this factor, one for each dependent var */
141 /* The number of dependent variables */
146 /* Create a factor statistics object with for N dependent vars
147 and ID as the value of the independent variable */
148 struct factor_statistics * create_factor_statistics (int n,
153 void factor_statistics_free(struct factor_statistics *f);
156 /* Compare f0 and f1.
157 width is the width of the independent variable */
159 factor_statistics_compare(const struct factor_statistics *f0,
160 const struct factor_statistics *f1, int width);
163 factor_statistics_hash(const struct factor_statistics *f, int width);