projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
case: Introduce new functions for numbers and substrings in cases.
[pspp]
/
src
/
language
/
stats
/
reliability.c
diff --git
a/src/language/stats/reliability.c
b/src/language/stats/reliability.c
index 615e108a78c61b9cdc1ce2084faf132d31526f1c..86c1add760eb2faad211df850d53fadd020c28ab 100644
(file)
--- a/
src/language/stats/reliability.c
+++ b/
src/language/stats/reliability.c
@@
-426,11
+426,8
@@
append_sum (const struct ccase *c, casenumber n UNUSED, void *aux)
double sum = 0;
const struct cronbach *s = aux;
double sum = 0;
const struct cronbach *s = aux;
- int v;
- for (v = 0 ; v < s->n_items; ++v)
- {
- sum += case_data (c, s->items[v])->f;
- }
+ for (int v = 0 ; v < s->n_items; ++v)
+ sum += case_num (c, s->items[v]);
return sum;
};
return sum;
};
@@
-495,9
+492,9
@@
do_reliability (struct casereader *input, struct dataset *ds,
struct cronbach *s = &rel->sc[si];
for (i = 0 ; i < s->n_items ; ++i)
struct cronbach *s = &rel->sc[si];
for (i = 0 ; i < s->n_items ; ++i)
- moments1_add (s->m[i], case_
data (c, s->items[i])->f
, weight);
+ moments1_add (s->m[i], case_
num (c, s->items[i])
, weight);
- moments1_add (s->total, case_
data_idx (c, s->totals_idx)->f
, weight);
+ moments1_add (s->total, case_
num_idx (c, s->totals_idx)
, weight);
}
}
casereader_destroy (input);
}
}
casereader_destroy (input);