Jpp  18.3.1
the software that should make you happy
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
JTestPoissonLogLikelihoodRatio.hh
Go to the documentation of this file.
1 #ifndef __JCOMPAREHISTOGRAMS__JTESTPOISSONLOGLIKELIHOODRATIO__
2 #define __JCOMPAREHISTOGRAMS__JTESTPOISSONLOGLIKELIHOODRATIO__
3 
4 #include <istream>
5 #include <ostream>
6 
7 #include "JLang/JException.hh"
8 
10 
11 #include "TH1.h"
12 
13 
14 /**
15  * \author bjung
16  */
17 namespace JCOMPAREHISTOGRAMS {
18 
19  /**
20  * Implementation of the Poisson log-likelihood ratio test.\n
21  * The first histogram is treated as an Asimov dataset corresponding to a given null hypothesis,\n
22  * which is compared to an alternative hypothesis given by the second histogram.\n\n
23  *
24  * This class is derived from the abstract class JTest_t(). For a general description of the implementation of this and other tests derived from JTest_t(), see its documentation.\n
25  */
27  public JTest_t
28  {
29  public:
30 
31  /**
32  * Default constructor.
33  */
35  JTest_t("Poissonian Log-Likelihood Ratio", "NLLR")
36  {}
37 
38 
39  /**
40  * Applies a Poissonian log-likelihood ratio test to the two given histograms.\n
41  * The first histogram is treated as an Asimov dataset corresponding to a given null hypothesis.\n
42  * The second histogram is treated as the expectation for the alternative hypothesis, to which the null hypothesis is compared.
43  *
44  * \param o1 First histogram
45  * \param o2 Second histogram
46  */
47  void test(const TObject* o1, const TObject* o2) override
48  {
49  using namespace std;
50  using namespace JPP;
51 
52  static const double penalty = -1e9; //!< Penalty factor
53 
54  const TH1* h1 = dynamic_cast<const TH1*>(o1);
55  const TH1* h2 = dynamic_cast<const TH1*>(o2);
56 
57  if (h1 == NULL || h2 == NULL) {
58  THROW(JValueOutOfRange, "JTestPoissonLogLikelihood::test(): Could not cast given TObjects to TH1.");
59  }
60 
61  if(h1->GetNbinsX() != h2->GetNbinsX() ||
62  h1->GetNbinsY() != h2->GetNbinsY() ||
63  h1->GetNbinsZ() != h2->GetNbinsZ()) {
64  THROW(JValueOutOfRange, "JTestPoissonLogLikelihood::test(): Histograms with different binning. The objects: " <<
65  h1->GetName() << " and " << h2->GetName() << " can not be compared." << endl);
66  }
67 
68  TH1* h3 = (TH1*) h1->Clone(h1->GetName() == h2->GetName() ?
69  MAKE_CSTRING(h1->GetName() << "_" << testName) :
70  MAKE_CSTRING(h1->GetName() << "_VS_" << h2->GetName() << "_" << testName));
71 
72  h3->Reset();
73 
74  double LnLratio = 0.0;
75 
76  for (int i=1 ; i <= h1->GetNbinsX() ; ++i){
77  for (int j=1 ; j <= h1->GetNbinsY() ; ++j){
78  for (int k=1 ; k <= h1->GetNbinsZ() ; ++k){
79 
80  double contribution;
81 
82  const double n0 = h1->GetBinContent(i,j,k);
83  const double n1 = h2->GetBinContent(i,j,k);
84 
85  if (n0 > 0.0 && n1 > 0.0) {
86  contribution = 2 * (n0 - n1 - n0 * log(n0/n1));
87  } else if (n0 > 0.0 || n1 > 0.0) {
88  contribution = penalty;
89  } else {
90  contribution = 0.0;
91  }
92 
93  h3->SetBinContent(i,j,k, contribution);
94 
95  LnLratio -= contribution;
96  }
97  }
98  }
99 
100  const bool passed = (LnLratio < threshold);
101 
102  const JResultTitle title(testName, resultType, passed, LnLratio);
103 
104  h3->SetTitle(title.getTitle().c_str());
105  h3->GetYaxis()->SetTitle(resultType.c_str());
106 
107  const JTestResult r (testName,
108  JRootObjectID(MAKE_STRING(h1->GetDirectory()->GetPath() << h1->GetName())),
109  JRootObjectID(MAKE_STRING(h2->GetDirectory()->GetPath() << h1->GetName())),
110  resultType, LnLratio, threshold, h3, passed);
111 
112  this->push_back(r);
113  }
114 
115 
116  /**
117  * Read test parameters from input.
118  *
119  * \param in input stream
120  * \return input stream
121  */
122  std::istream& read(std::istream& in) override
123  {
124  using namespace JPP;
125 
126  in >> threshold;
127 
128  if (!(threshold > 0.0)) {
129  THROW(JValueOutOfRange, "JTestPoissonLogLikelihoodRatio::read(): Given chi-square threshold " << threshold << " is invalid");
130  }
131 
132  return in;
133  }
134 
135  private:
136 
137  double threshold; //!< threshold chi-square to decide if test is passed.
138  };
139 }
140 
141 #endif
Exceptions.
then fatal No hydrophone data file $HYDROPHONE_TXT fi sort gr k
Interface to read input and write output for TObject tests.
Definition: JTest_t.hh:40
std::string getTitle() const
Returns a standard string to be used as title of a graphical root object.
Definition: JResultTitle.hh:57
then set_variable DIR else fatal Wrong number of arguments fi for INPUT_FILE in ls rt $DIR stage * log
Class dedicated to standardize the title of the graphical objects produced by the JTest_t() derived c...
Definition: JResultTitle.hh:25
#define THROW(JException_t, A)
Marco for throwing exception with std::ostream compatible message.
Definition: JException.hh:712
Definition: JRoot.hh:19
double threshold
threshold chi-square to decide if test is passed.
#define MAKE_CSTRING(A)
Make C-string.
Definition: JPrint.hh:136
Auxiliary class to handle file name, ROOT directory and object name.
data_type r[M+1]
Definition: JPolint.hh:868
std::istream & read(std::istream &in) override
Read test parameters from input.
#define MAKE_STRING(A)
Make string.
Definition: JPrint.hh:127
const std::string resultType
test result type
Definition: JTest_t.hh:181
const std::string testName
test name
Definition: JTest_t.hh:180
then fatal Wrong number of arguments fi set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2] eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY JAcoustics sh $DETECTOR_ID source JAcousticsToolkit sh CHECK_EXIT_CODE typeset A EMITTERS get_tripods $WORKDIR tripod txt EMITTERS get_transmitters $WORKDIR transmitter txt EMITTERS for EMITTER in
Definition: JCanberra.sh:48
Implementation of the Poisson log-likelihood ratio test.
Structure containing the result of the test.
Definition: JTestResult.hh:28
int j
Definition: JPolint.hh:792
void test(const TObject *o1, const TObject *o2) override
Applies a Poissonian log-likelihood ratio test to the two given histograms.