Jpp  18.3.0-rc.1
the software that should make you happy
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
JTestRuns_1D.hh
Go to the documentation of this file.
1 #ifndef __JCOMPAREHISTOGRAMS__JTESTRUNS_1D__
2 #define __JCOMPAREHISTOGRAMS__JTESTRUNS_1D__
3 
4 #include <istream>
5 #include <ostream>
6 
7 #include "JLang/JException.hh"
8 
10 
11 #include "TH1.h"
12 
13 
14 /**
15  * \author rgruiz, bjung
16  */
17 namespace JCOMPAREHISTOGRAMS {}
18 namespace JPP { using namespace JCOMPAREHISTOGRAMS; }
19 
20 namespace JCOMPAREHISTOGRAMS {
21 
22  /**
23  * Implementation of the Runs test for 1D histograms.\n
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  * This test uses the input parameter `threshold` to evaluate whether the test is passed or failed.\n
26  * The evaluation is done by comparing the threshold value with the result of the runs test.
27  */
28  class JTestRuns_1D:
29  public JTest_t
30  {
31  public:
32 
33  /**
34  * Default constructor.
35  */
37  JTest_t("Runs_1D", "#sigma")
38  {}
39 
40 
41  /**
42  * Tests the statistical compatibility of two ROOT TObjects
43  *
44  * \param o1 First object
45  * \param o2 Second object
46  */
47  void test(const TObject* o1, const TObject* o2) override
48  {
49  using namespace std;
50  using namespace JPP;
51 
52  const TH1* h1 = dynamic_cast<const TH1*>(o1);
53  const TH1* h2 = dynamic_cast<const TH1*>(o2);
54 
55  if (h1 == NULL || h2 == NULL) {
56  THROW(JValueOutOfRange, "JTestRuns_1D::test(): Could not cast given TObjects to TH1.");
57  }
58 
59  if (h1->GetDimension() != 1 || h2->GetDimension() != 1) {
60  THROW(JValueOutOfRange, "JTestRuns_1D::test(): Given histograms must be 1-D.");
61  }
62 
63  if(h1->GetNbinsX() != h2->GetNbinsX()) {
64  THROW(JValueOutOfRange, "JTestIdentical::test(): Histograms with different bining. The objects: " <<
65  h1->GetName() << " and " << h2->GetName() << " can not be compared." << endl);
66  }
67 
68  const double R = h1->Integral();
69  const double T = h2->Integral();
70 
71  TH1* h3 = (TH1*) h1->Clone(h1->GetName() == h2->GetName() ?
72  MAKE_CSTRING(h1->GetName() << "_" << testName) :
73  MAKE_CSTRING(h1->GetName() << "_VS_" << h2->GetName() << "_" << testName));
74 
75  for (int i=1 ; i<h1->GetNbinsX() ; ++i) {
76  h3->SetBinContent(i, (T/R)*h1->GetBinContent(i) - h2->GetBinContent(i));
77  }
78 
79  bool a = ((T/R)*h1->GetBinContent(1) - h2->GetBinContent(1)) < 0;
80 
81  int n = 1;
82  double p = (a ? 1 : 0);
83  double q = (a ? 0 : 1);
84 
85  for (int i = 2 ; i<h1->GetNbinsX() ; ++i){
86 
87  const bool b = ((T/R)*h1->GetBinContent(i) - h2->GetBinContent(i)) < 0;
88 
89  (b ? ++p : ++q);
90 
91  if (b != a){
92  ++n;
93  a=b;
94  }
95  }
96 
97  const double N = 1 + 2*p*q/(p+q) ;
98  const double s = sqrt( 2*p*q*(2*p*q-p-q)/(p+q)/(p+q)/(p+q-1) );
99  const double d = (n-N)/s;
100 
101  const bool passed = (fabs(d) < threshold);
102 
103  const JResultTitle title(testName, resultType , passed , fabs(d));
104 
105  h3->SetTitle(title.getTitle().c_str());
106  h3->GetYaxis()->SetTitle(resultType.c_str());
107 
108  const JTestResult r(testName,
109  JRootObjectID(MAKE_STRING(h1->GetDirectory()->GetPath() << h1->GetName())),
110  JRootObjectID(MAKE_STRING(h2->GetDirectory()->GetPath() << h1->GetName())),
111  resultType, fabs(d), threshold, h3, passed);
112 
113  this->push_back(r);
114  }
115 
116 
117  /**
118  * Read test parameters from input.
119  *
120  * \param in input stream
121  * \return input stream
122  */
123  std::istream& read(std::istream& in) override
124  {
125  using namespace JPP;
126 
127  in >> threshold;
128 
129  if (threshold < 0.0) {
130  THROW(JValueOutOfRange, "JTestRuns_1D::read(): Invalid threshold value " << threshold);
131  }
132 
133  return in;
134  }
135 
136  private:
137 
138  double threshold; //!< threshold value to decide if test is passed.
139  };
140 }
141 
142 #endif
Exceptions.
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
std::istream & read(std::istream &in) override
Read test parameters from input.
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
#define MAKE_CSTRING(A)
Make C-string.
Definition: JPrint.hh:136
void test(const TObject *o1, const TObject *o2) override
Tests the statistical compatibility of two ROOT TObjects.
Definition: JTestRuns_1D.hh:47
Auxiliary class to handle file name, ROOT directory and object name.
data_type r[M+1]
Definition: JPolint.hh:868
#define MAKE_STRING(A)
Make string.
Definition: JPrint.hh:127
const int n
Definition: JPolint.hh:786
then JCalibrateToT a
Definition: JTuneHV.sh:113
do set_variable OUTPUT_DIRECTORY $WORKDIR T
Implementation of the Runs test for 1D histograms.
Definition: JTestRuns_1D.hh:28
const std::string resultType
test result type
Definition: JTest_t.hh:181
const std::string testName
test name
Definition: JTest_t.hh:180
then JCookie sh JDataQuality D $DETECTOR_ID R
Definition: JDataQuality.sh:41
then usage $script< input file >[option[primary[working directory]]] nWhere option can be N
Definition: JMuonPostfit.sh:40
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
Definition: JMuonPath.sh:47
double threshold
threshold value to decide if test is passed.
Structure containing the result of the test.
Definition: JTestResult.hh:28
JTestRuns_1D()
Default constructor.
Definition: JTestRuns_1D.hh:36
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