X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fjonckheere-terpstra.c;h=7d654bbecbff4ef86155abbdb354578c09366ef4;hb=710f5de78998ae74020b8a401836dabca4df355e;hp=7e8406f38253e3a2b687d4625886313f57e03128;hpb=5cab4cf3322f29c0ed7134d23740e07382914f20;p=pspp diff --git a/src/language/stats/jonckheere-terpstra.c b/src/language/stats/jonckheere-terpstra.c index 7e8406f382..7d654bbecb 100644 --- a/src/language/stats/jonckheere-terpstra.c +++ b/src/language/stats/jonckheere-terpstra.c @@ -101,16 +101,16 @@ u (const struct group_data *grp0, const struct group_data *grp1) { struct ccase *c1; struct casereader *r1 = casereader_clone (grp1->reader); - double x0 = case_data_idx (c0, 0)->f; - double cc0 = case_data_idx (c0, 1)->f; + double x0 = case_num_idx (c0, 0); + double cc0 = case_num_idx (c0, 1); double w0 = cc0 - prev_cc0; double prev_cc1 = 0; for (; (c1 = casereader_read (r1)); case_unref (c1)) { - double x1 = case_data_idx (c1, 0)->f; - double cc1 = case_data_idx (c1, 1)->f; + double x1 = case_num_idx (c1, 0); + double cc1 = case_num_idx (c1, 1); if (x0 > x1) { @@ -125,7 +125,7 @@ u (const struct group_data *grp0, const struct group_data *grp1) else { #if 1 - usum += w0 * ( (grp1->cc - prev_cc1) / 2.0); + usum += w0 * ((grp1->cc - prev_cc1) / 2.0); #else usum += w0 * (grp1->cc - (prev_cc1 + cc1) / 2.0); #endif @@ -203,7 +203,7 @@ void variance_calculation (struct casereader *ir, const struct variable *var, for (; (c = casereader_read (r)); case_unref (c)) { - double w = case_data_idx (c, w_idx)->f; + double w = case_num_idx (c, w_idx); for (i = 0; i < n; ++i) result[i] += f[i] (w); @@ -285,7 +285,7 @@ jonckheere_terpstra_execute (const struct dataset *ds, jt.levels = 0; jt.n = 0; for (; casegrouper_get_next_group (grouper, &group); - casereader_destroy (group) ) + casereader_destroy (group)) { struct casewriter *writer = autopaging_writer_create (proto); struct ccase *c; @@ -295,12 +295,11 @@ jonckheere_terpstra_execute (const struct dataset *ds, for (; (c = casereader_read (group)); case_unref (c)) { struct ccase *c_out = case_create (proto); - const union value *x = case_data (c, nst->vars[v]); - case_data_rw_idx (c_out, 0)->f = x->f; + *case_num_rw_idx (c_out, 0) = case_num (c, nst->vars[v]); cc += dict_get_case_weight (dict, c, &warn); - case_data_rw_idx (c_out, 1)->f = cc; + *case_num_rw_idx (c_out, 1) = cc; casewriter_write (writer, c_out); }