1 #ifndef __JCOMPAREHISTOGRAMS__JTESTPOISSONLOGLIKELIHOODRATIO__ 
    2 #define __JCOMPAREHISTOGRAMS__JTESTPOISSONLOGLIKELIHOODRATIO__ 
   17 namespace JCOMPAREHISTOGRAMS {
 
   35       JTest_t(
"Poissonian Log-Likelihood Ratio", 
"NLLR")
 
   52       static const double penalty = -1e9; 
 
   54       const TH1* h1 =  
dynamic_cast<const TH1*
>(o1);
 
   55       const TH1* h2 =  
dynamic_cast<const TH1*
>(o2);
 
   57       if (h1 == NULL || h2 == NULL) {
 
   58         THROW(JValueOutOfRange, 
"JTestPoissonLogLikelihood::test(): Could not cast given TObjects to TH1.");
 
   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);
 
   68       TH1* h3 = (TH1*) h1->Clone(h1->GetName() == h2->GetName() ?
 
   74       double LnLratio = 0.0;
 
   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){
 
   82             const double n0 = h1->GetBinContent(
i,
j,
k);
 
   83             const double n1 = h2->GetBinContent(
i,
j,
k);
 
   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;
 
   93             h3->SetBinContent(
i,
j,
k, contribution);
 
   95             LnLratio -= contribution;
 
  100       const bool passed = (LnLratio < 
threshold);
 
  104       h3->SetTitle(title.
getTitle().c_str());
 
  122     std::istream& 
read(std::istream& 
in)
 override 
  129         THROW(JValueOutOfRange, 
"JTestPoissonLogLikelihoodRatio::read(): Given chi-square threshold " << 
threshold << 
" is invalid");
 
then fatal No hydrophone data file $HYDROPHONE_TXT fi sort gr k
 
Interface to read input and write output for TObject tests. 
 
std::string getTitle() const 
Returns a standard string to be used as title of a graphical root object. 
 
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...
 
#define THROW(JException_t, A)
Marco for throwing exception with std::ostream compatible message. 
 
double threshold
threshold chi-square to decide if test is passed. 
 
#define MAKE_CSTRING(A)
Make C-string. 
 
Auxiliary class to handle file name, ROOT directory and object name. 
 
std::istream & read(std::istream &in) override
Read test parameters from input. 
 
#define MAKE_STRING(A)
Make string. 
 
const std::string resultType
test result type 
 
const std::string testName
test name 
 
JTestPoissonLogLikelihoodRatio()
Default constructor. 
 
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
 
Implementation of the Poisson log-likelihood ratio test. 
 
Structure containing the result of the test. 
 
void test(const TObject *o1, const TObject *o2) override
Applies a Poissonian log-likelihood ratio test to the two given histograms.