source: trunk/c++_tools/statistics/tScore.cc @ 616

Last change on this file since 616 was 616, checked in by Jari Häkkinen, 15 years ago

Removed gslapi namespace and put the code into utility namespace.
Move #ifndef _header_ idiom to top of touched header files.
Removed unneccesary #includes, and added needed #includes.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.8 KB
Line 
1// $Id: tScore.cc 616 2006-08-31 08:52:02Z jari $
2
3// System includes
4#include <cassert>
5#include <cmath>
6
7// Thep C++ Tools
8#include <c++_tools/statistics/tScore.h>
9#include <c++_tools/statistics/Averager.h>
10#include <c++_tools/statistics/AveragerWeighted.h>
11#include <c++_tools/classifier/Target.h>
12
13namespace theplu {
14namespace statistics { 
15
16  tScore::tScore(bool b) 
17    : Score(b),  t_(0)
18  {
19  }
20
21  double tScore::score(const classifier::Target& target, 
22                       const utility::vector& value)
23  {
24    weighted_=false;
25    statistics::Averager positive;
26    statistics::Averager negative;
27    for(size_t i=0; i<target.size(); i++){
28      if (target.binary(i))
29        positive.add(value(i));
30      else
31        negative.add(value(i));
32    }
33    double diff = positive.mean() - negative.mean();
34    dof_=positive.n()+negative.n()-2;
35    double s2=(positive.sum_xx_centered()+negative.sum_xx_centered())/dof_;
36
37    t_=diff/sqrt(s2/positive.n()+s2/negative.n());
38    if (t_<0 && absolute_)
39      t_=-t_;
40     
41    return t_;
42  }
43
44  double tScore::score(const classifier::Target& target, 
45                       const utility::vector& value,
46                       const utility::vector& weight)
47  {
48    weighted_=true;
49
50    statistics::AveragerWeighted positive;
51    statistics::AveragerWeighted negative;
52    for(size_t i=0; i<target.size(); i++){
53      if (target.binary(i))
54        positive.add(value(i),weight(i));
55      else
56        negative.add(value(i),weight(i));
57    }
58    double diff = positive.mean() - negative.mean();
59    dof_=positive.n()+negative.n()-2;
60    double s2=(positive.sum_xx_centered()+negative.sum_xx_centered())/dof_;
61    t_=diff/sqrt(s2/positive.n()+s2/(negative.n()));
62    if (t_<0 && absolute_)
63      t_=-t_;
64
65    if(positive.sum_w()==0 || negative.sum_w()==0)
66      t_=0;
67    return t_;
68  }
69
70  double tScore::p_value(void) const
71  {
72    double p = gsl_cdf_tdist_Q(t_, dof_);
73    return (dof_ > 0 && !weighted_) ? p : 1;
74  }
75
76
77
78}} // of namespace statistics and namespace theplu
Note: See TracBrowser for help on using the repository browser.