X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Ffrequencies.q;h=adc4f16b359876ff350f2c5b36c2ecdaa37a6ee6;hb=26ff6fce95fb38f0986017dd922c36d4b1b239c7;hp=ecaefdf64e421196160009769ffe2e4438797262;hpb=55e6e7ba37a30570f5a31e2d78c22dfa7b61a36f;p=pspp-builds.git diff --git a/src/language/stats/frequencies.q b/src/language/stats/frequencies.q index ecaefdf6..adc4f16b 100644 --- a/src/language/stats/frequencies.q +++ b/src/language/stats/frequencies.q @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 1997-9, 2000, 2007, 2009, 2010 Free Software Foundation, Inc. + Copyright (C) 1997-9, 2000, 2007, 2009, 2010, 2011 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -922,8 +922,7 @@ calc_percentiles (const struct frq_proc *frq, const struct var_freqs *vf) if (rank <= tp) break; - if (f->count > 1 - && (rank - (f->count - 1) > tp || f + 1 >= ft->missing)) + if (tp + 1 < rank || f + 1 >= ft->missing) pc->value = f->value.f; else pc->value = calc_percentile (pc->p, W, f->value.f, f[1].value.f);