// @(#)root/test:$name: $:$id: stressHistogram.cxx,v 1.15 2002/10/25 10:47:51 rdm exp $ // Authors: David Gonzalez Maline November 2008 //*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*// // // // // // Here there is a set of tests for the histogram classes (including // // histograms and profiles). The methods tested work on: // // // // 1. Projection testing (with and without weights) // // 2. Rebinning // // 3. Addition, multiplication an division operations. // // 4. Building and copying instances. // // 5. I/O functionality (including reference with older versions). // // 6. Labeling. // // 7. Interpolation // // // // To see the tests individually, at the bottom of the file the tests // // are exectued using the structure TTestSuite, that defines the // // subset, the number of routines to be tested as well as the pointes // // for these. Every tests is mean to be simple enough to be understood // // without much comments. // // // // Finally, for debugging reasons, the struct compareOptions can be // // used to define the level of output of the tests, beging set // // generally for the whole suit in defaultEqualOptions. // // >> stressHistogram 1 : to print result for all tests // // >> stressHistogram 2 : ro print each comparison, done for each bin // // // // An example of output when all the tests run OK is shown below: // // **************************************************************************** // * Starting stress H I S T O G R A M * // **************************************************************************** // Test 1: Testing Histogram Projections without weights....................OK // Test 2: Testing Profile Projections without weights......................OK // Test 3: Testing Histogram Projections with weights.......................OK // Test 4: Testing Profile Projections with weights.......................OK // Test 5: Projection with Range for Histograms and Profiles................OK // Test 6: Histogram Rebinning..............................................OK // Test 7: Add tests for 1D, 2D and 3D Histograms and Profiles..............OK // Test 8: Multiply tests for 1D, 2D and 3D Histograms......................OK // Test 9: Divide tests for 1D, 2D and 3D Histograms........................OK // Test 10: Copy tests for 1D, 2D and 3D Histograms and Profiles.............OK // Test 11: Read/Write tests for 1D, 2D and 3D Histograms and Profiles.......OK // Test 12: Merge tests for 1D, 2D and 3D Histograms and Profiles............OK // Test 13: Label tests for 1D and 2D Histograms ............................OK // Test 14: Interpolation tests for Histograms...............................OK // Test 15: Scale tests for Profiles.........................................OK // Test 16: Integral tests for Histograms....................................OK // Test 17: Buffer tests for Histograms......................................OK // Test 18: Extend axis tests for Histograms.................................OK // Test 19: TH1-THn[Sparse] Conversion tests.................................OK // Test 20: FillData tests for Histograms and Sparses........................OK // Test 21: Reference File Read for Histograms and Profiles..................OK // **************************************************************************** // stressHistogram: Real Time = 86.22 seconds Cpu Time = 85.64 seconds // ROOTMARKS = 1292.62 ROOT version: 6.05/01 remotes/origin/master@v6-05-01-336-g5c3d5ff // **************************************************************************** // // //*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*// #include #include #include "TH2.h" #include "TH3.h" #include "TH2.h" #include "THn.h" #include "THnSparse.h" #include "TProfile.h" #include "TProfile2D.h" #include "TProfile3D.h" #include "TF1.h" #include "TF2.h" #include "TF3.h" #include "Fit/SparseData.h" #include "HFitInterface.h" #include "Math/IntegratorOptions.h" #include "TApplication.h" #include "TBenchmark.h" #include "Riostream.h" #include "TMath.h" #include "TRandom2.h" #include "TFile.h" #include "TClass.h" #include "TROOT.h" #include #include using namespace std; const unsigned int __DRAW__ = 0; const Double_t minRange = 1; const Double_t maxRange = 5; const Double_t minRebin = 3; const Double_t maxRebin = 7; const int nEvents = 1000; const int numberOfBins = 10; enum compareOptions { cmpOptNone=0, cmpOptPrint=1, cmpOptDebug=2, cmpOptNoError=4, cmpOptStats=8 }; int defaultEqualOptions = 0; //cmpOptPrint; //int defaultEqualOptions = cmpOptDebug; const double defaultErrorLimit = 1.E-10; enum RefFileEnum { refFileRead = 1, refFileWrite = 2 }; const int refFileOption = 1; TFile * refFile = 0; const char* refFileName = "http://root.cern.ch/files/stressHistogram.5.18.00.root"; TRandom2 r; // set to zero if want to run different every time const int initialSeed = 0; typedef bool ( * pointer2Test) (); struct TTestSuite { unsigned int nTests; char suiteName[75]; pointer2Test* tests; }; // Methods for histogram comparisions (later implemented) void printResult(const char* msg, bool status); void FillVariableRange(Double_t v[numberOfBins+1]); void FillHistograms(TH1D* h1, TH1D* h2, Double_t c1 = 1.0, Double_t c2 = 1.0); void FillProfiles(TProfile* p1, TProfile* p2, Double_t c1 = 1.0, Double_t c2 = 1.0); int equals(const char* msg, TH1D* h1, TH1D* h2, int options = 0, double ERRORLIMIT = defaultErrorLimit); int equals(const char* msg, TH2D* h1, TH2D* h2, int options = 0, double ERRORLIMIT = defaultErrorLimit); int equals(const char* msg, TH3D* h1, TH3D* h2, int options = 0, double ERRORLIMIT = defaultErrorLimit); int equals(const char* msg, THnBase* h1, THnBase* h2, int options = 0, double ERRORLIMIT = defaultErrorLimit); int equals(const char* msg, THnBase* h1, TH1* h2, int options = 0, double ERRORLIMIT = defaultErrorLimit); int equals(Double_t n1, Double_t n2, double ERRORLIMIT = defaultErrorLimit); int compareStatistics( TH1* h1, TH1* h2, bool debug, double ERRORLIMIT = defaultErrorLimit); std::ostream& operator<<(std::ostream& out, TH1D* h); // old stresHistOpts.cxx file bool testAdd1() { // Tests the first Add method for 1D Histograms Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH1D* h1 = new TH1D("t1D1-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("t1D1-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("t1D1-h3", "h3=c1*h1+c2*h2", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); FillHistograms(h1, h3, 1.0, c1); FillHistograms(h2, h3, 1.0, c2); TH1D* h4 = new TH1D("t1D1-h4", "h4=c1*h1+h2*c2", numberOfBins, minRange, maxRange); h4->Add(h1, h2, c1, c2); bool ret = equals("Add1D1", h3, h4, cmpOptStats, 1E-13); delete h1; delete h2; delete h3; return ret; } bool testAddProfile1() { // Tests the first Add method for 1D Profiles Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TProfile* p1 = new TProfile("t1D1-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("t1D1-p2", "p2-Title", numberOfBins, minRange, maxRange); TProfile* p3 = new TProfile("t1D1-p3", "p3=c1*p1+c2*p2", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p3->Fill(x, y, c1); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); p3->Fill(x, y, c2); } TProfile* p4 = new TProfile("t1D1-p4", "p4=c1*p1+p2*c2", numberOfBins, minRange, maxRange); p4->Add(p1, p2, c1, c2); bool ret = equals("Add1DProfile1", p3, p4, cmpOptStats, 1E-13); delete p1; delete p2; delete p3; return ret; } bool testAdd2() { // Tests the second Add method for 1D Histograms Double_t c2 = r.Rndm(); TH1D* h5 = new TH1D("t1D2-h5", "h5= h6+c2*h7", numberOfBins, minRange, maxRange); TH1D* h6 = new TH1D("t1D2-h6", "h6-Title", numberOfBins, minRange, maxRange); TH1D* h7 = new TH1D("t1D2-h7", "h7-Title", numberOfBins, minRange, maxRange); h5->Sumw2();h6->Sumw2();h7->Sumw2(); FillHistograms(h6, h5, 1.0, 1.0); FillHistograms(h7, h5, 1.0, c2); h6->Add(h7, c2); bool ret = equals("Add1D2", h5, h6, cmpOptStats, 1E-13); delete h5; delete h7; return ret; } bool testAddProfile2() { // Tests the second Add method for 1D Profiles Double_t c2 = r.Rndm(); TProfile* p5 = new TProfile("t1D2-p5", "p5= p6+c2*p7", numberOfBins, minRange, maxRange); TProfile* p6 = new TProfile("t1D2-p6", "p6-Title", numberOfBins, minRange, maxRange); TProfile* p7 = new TProfile("t1D2-p7", "p7-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p6->Fill(x, y, 1.0); p5->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p7->Fill(x, y, 1.0); p5->Fill(x, y, c2); } p6->Add(p7, c2); bool ret = equals("Add1DProfile2", p5, p6, cmpOptStats, 1E-13); delete p5; delete p7; return ret; } bool testAdd3() { // Tests the first add method to do scalation of 1D Histograms Double_t c1 = r.Rndm(); TH1D* h1 = new TH1D("t1D1-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("t1D1-h2", "h2=c1*h1+c2*h2", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); h2->Fill(value, c1 / h1->GetBinWidth( h1->FindBin(value) ) ); } TH1D* h3 = new TH1D("t1D1-h3", "h3=c1*h1", numberOfBins, minRange, maxRange); h3->Add(h1, h1, c1, -1); // TH1::Add will reset the stats in this case so we need to do for the reference histogram h2->ResetStats(); bool ret = equals("Add1D3", h2, h3, cmpOptStats, 1E-13); delete h1; delete h2; return ret; } bool testAddVar1() { // Tests the second Add method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH1D* h1 = new TH1D("h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("h2", "h2-Title", numberOfBins, v); TH1D* h3 = new TH1D("h3", "h3=c1*h1+c2*h2", numberOfBins, v); h1->Sumw2();h2->Sumw2();h3->Sumw2(); FillHistograms(h1, h3, 1.0, c1); FillHistograms(h2, h3, 1.0, c2); TH1D* h4 = new TH1D("t1D1-h4", "h4=c1*h1+h2*c2", numberOfBins, v); h4->Add(h1, h2, c1, c2); bool ret = equals("AddVar1D1", h3, h4, cmpOptStats, 1E-13); delete h1; delete h2; delete h3; return ret; } bool testAddVarProf1() { // Tests the first Add method for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TProfile* p1 = new TProfile("t1D1-p1", "p1-Title", numberOfBins, v); TProfile* p2 = new TProfile("t1D1-p2", "p2-Title", numberOfBins, v); TProfile* p3 = new TProfile("t1D1-p3", "p3=c1*p1+c2*p2", numberOfBins, v); FillProfiles(p1, p3, 1.0, c1); FillProfiles(p2, p3, 1.0, c2); TProfile* p4 = new TProfile("t1D1-p4", "p4=c1*p1+p2*c2", numberOfBins, v); p4->Add(p1, p2, c1, c2); bool ret = equals("AddVar1DProf1", p3, p4, cmpOptStats, 1E-13); delete p1; delete p2; delete p3; return ret; } bool testAddVar2() { // Tests the second Add method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c2 = r.Rndm(); TH1D* h5 = new TH1D("t1D2-h5", "h5= h6+c2*h7", numberOfBins, v); TH1D* h6 = new TH1D("t1D2-h6", "h6-Title", numberOfBins, v); TH1D* h7 = new TH1D("t1D2-h7", "h7-Title", numberOfBins, v); h5->Sumw2();h6->Sumw2();h7->Sumw2(); FillHistograms(h6, h5, 1.0, 1.0); FillHistograms(h7, h5, 1.0, c2); h6->Add(h7, c2); bool ret = equals("AddVar1D2", h5, h6, cmpOptStats, 1E-13); delete h5; delete h7; return ret; } bool testAddVarProf2() { // Tests the second Add method for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c2 = r.Rndm(); TProfile* p5 = new TProfile("t1D2-p5", "p5= p6+c2*p7", numberOfBins, v); TProfile* p6 = new TProfile("t1D2-p6", "p6-Title", numberOfBins, v); TProfile* p7 = new TProfile("t1D2-p7", "p7-Title", numberOfBins, v); p5->Sumw2();p6->Sumw2();p7->Sumw2(); FillProfiles(p6, p5, 1.0, 1.0); FillProfiles(p7, p5, 1.0, c2); p6->Add(p7, c2); bool ret = equals("AddVar1D2", p5, p6, cmpOptStats, 1E-13); delete p5; delete p7; return ret; } bool testAddVar3() { // Tests the first add method to do scale of 1D Histograms with variable bin width Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c1 = r.Rndm(); TH1D* h1 = new TH1D("t1D1-h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("t1D1-h2", "h2=c1*h1+c2*h2", numberOfBins, v); h1->Sumw2();h2->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); h2->Fill(value, c1 / h1->GetBinWidth( h1->FindBin(value) ) ); } TH1D* h3 = new TH1D("t1D1-h3", "h3=c1*h1", numberOfBins, v); h3->Add(h1, h1, c1, -1); // TH1::Add will reset the stats in this case so we need to do for the reference histogram h2->ResetStats(); bool ret = equals("Add1D3", h2, h3, cmpOptStats, 1E-13); delete h1; delete h2; return ret; } bool testAdd2D3() { // Tests the first add method to do scale of 2D Histograms Double_t c1 = r.Rndm(); TH2D* h1 = new TH2D("t1D1-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins+2, minRange, maxRange); TH2D* h2 = new TH2D("t1D1-h2", "h2=c1*h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins+2, minRange, maxRange); h1->Sumw2();h2->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); Int_t binx = h1->GetXaxis()->FindBin(x); Int_t biny = h1->GetYaxis()->FindBin(y); Double_t area = h1->GetXaxis()->GetBinWidth( binx ) * h1->GetYaxis()->GetBinWidth( biny ); h2->Fill(x, y, c1 / area); } TH2D* h3 = new TH2D("t1D1-h3", "h3=c1*h1", numberOfBins, minRange, maxRange, numberOfBins+2, minRange, maxRange); h3->Add(h1, h1, c1, -1); // TH1::Add will reset the stats in this case so we need to do for the reference histogram h2->ResetStats(); bool ret = equals("Add1D2", h2, h3, cmpOptStats, 1E-10); delete h1; delete h2; return ret; } bool testAdd3D3() { // Tests the first add method to do scalation of 3D Histograms Double_t c1 = r.Rndm(); TH3D* h1 = new TH3D("t1D1-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins+1, minRange, maxRange, numberOfBins+2, minRange, maxRange); TH3D* h2 = new TH3D("t1D1-h2", "h2=c1*h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins+1, minRange, maxRange, numberOfBins+2, minRange, maxRange); h1->Sumw2();h2->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); Int_t binx = h1->GetXaxis()->FindBin(x); Int_t biny = h1->GetYaxis()->FindBin(y); Int_t binz = h1->GetZaxis()->FindBin(z); Double_t area = h1->GetXaxis()->GetBinWidth( binx ) * h1->GetYaxis()->GetBinWidth( biny ) * h1->GetZaxis()->GetBinWidth( binz ); h2->Fill(x, y, z, c1 / area); } TH3D* h3 = new TH3D("t1D1-h3", "h3=c1*h1", numberOfBins, minRange, maxRange, numberOfBins+1, minRange, maxRange, numberOfBins+2, minRange, maxRange); h3->Add(h1, h1, c1, -1); // TH1::Add will reset the stats in this case so we need to do for the reference histogram h2->ResetStats(); bool ret = equals("Add2D3", h2, h3, cmpOptStats, 1E-10); delete h1; delete h2; return ret; } bool testAdd2D1() { // Tests the first Add method for 2D Histograms Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH2D* h1 = new TH2D("t2D1-h1", "h1", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("t2D1-h2", "h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("t2D1-h3", "h3=c1*h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h3->Fill(x, y, c1); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h3->Fill(x, y, c2); } TH2D* h4 = new TH2D("t2D1-h4", "h4=c1*h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Add(h1, h2, c1, c2); bool ret = equals("Add2D1", h3, h4, cmpOptStats , 1E-10); delete h1; delete h2; delete h3; return ret; } bool testAdd2DProfile1() { // Tests the first Add method for 1D Profiles Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TProfile2D* p1 = new TProfile2D("t2D1-p1", "p1", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("t2D1-p2", "p2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("t2D1-p3", "p3=c1*p1+c2*p2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p3->Fill(x, y, z, c1); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p3->Fill(x, y, z, c2); } TProfile2D* p4 = new TProfile2D("t2D1-p4", "p4=c1*p1+c2*p2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); p4->Add(p1, p2, c1, c2); bool ret = equals("Add2DProfile1", p3, p4, cmpOptStats , 1E-10); delete p1; delete p2; delete p3; return ret; } bool testAdd2D2() { // Tests the second Add method for 2D Histograms Double_t c2 = r.Rndm(); TH2D* h1 = new TH2D("t2D2-h1", "h1", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("t2D2-h2", "h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("t2D2-h3", "h3=h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h3->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h3->Fill(x, y, c2); } h1->Add(h2, c2); bool ret = equals("Add2D2", h3, h1, cmpOptStats, 1E-10); delete h2; delete h3; return ret; } bool testAdd2DProfile2() { // Tests the second Add method for 2D Profiles Double_t c2 = r.Rndm(); TProfile2D* p1 = new TProfile2D("t2D2-p1", "p1", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("t2D2-p2", "p2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("t2D2-p3", "p3=p1+c2*p2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p3->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p3->Fill(x, y, z, c2); } p1->Add(p2, c2); bool ret = equals("Add2DProfile2", p3, p1, cmpOptStats, 1E-10); delete p2; delete p3; return ret; } bool testAdd3D1() { // Tests the first Add method for 3D Histograms Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH3D* h1 = new TH3D("t3D1-h1", "h1", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("t3D1-h2", "h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("t3D1-h3", "h3=c1*h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h3->Fill(x, y, z, c1); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h3->Fill(x, y, z, c2); } TH3D* h4 = new TH3D("t3D1-h4", "h4=c1*h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Add(h1, h2, c1, c2); bool ret = equals("Add3D1", h3, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testAdd3DProfile1() { // Tests the second Add method for 3D Profiles Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TProfile3D* p1 = new TProfile3D("t3D1-p1", "p1", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("t3D1-p2", "p2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("t3D1-p3", "p3=c1*p1+c2*p2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p3->Fill(x, y, z, t, c1); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p3->Fill(x, y, z, t, c2); } TProfile3D* p4 = new TProfile3D("t3D1-p4", "p4=c1*p1+c2*p2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); p4->Add(p1, p2, c1, c2); bool ret = equals("Add3DProfile1", p3, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testAdd3D2() { // Tests the second Add method for 3D Histograms Double_t c2 = r.Rndm(); TH3D* h1 = new TH3D("t3D2-h1", "h1", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("t3D2-h2", "h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("t3D2-h3", "h3=h1+c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h3->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h3->Fill(x, y, z, c2); } h1->Add(h2, c2); bool ret = equals("Add3D2", h3, h1, cmpOptStats, 1E-10); delete h2; delete h3; return ret; } bool testAdd3DProfile2() { // Tests the second Add method for 3D Profiles Double_t c2 = r.Rndm(); TProfile3D* p1 = new TProfile3D("t3D2-p1", "p1", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("t3D2-p2", "p2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("t3D2-p3", "p3=p1+c2*p2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p3->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p3->Fill(x, y, z, t, c2); } p1->Add(p2, c2); bool ret = equals("Add3DProfile2", p3, p1, cmpOptStats, 1E-10); delete p2; delete p3; return ret; } template bool testAddHn() { // Tests the Add method for n-dimensional Histograms Double_t c = r.Rndm(); Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("tS-s1", "s1", 3, bsize, xmin, xmax); HIST* s2 = new HIST("tS-s2", "s2", 3, bsize, xmin, xmax); HIST* s3 = new HIST("tS-s3", "s3=s1+c*s2", 3, bsize, xmin, xmax); s1->Sumw2();s2->Sumw2();s3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s1->Fill(points); s3->Fill(points); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s2->Fill(points); s3->Fill(points, c); } s1->Add(s2, c); bool ret = equals(TString::Format("AddHn<%s>", HIST::Class()->GetName()), s3, s1, cmpOptStats , 1E-10); delete s2; delete s3; return ret; } bool testMul1() { // Tests the first Multiply method for 1D Histograms Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH1D* h1 = new TH1D("m1D1-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("m1D1-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("m1D1-h3", "h3=c1*h1*c2*h2", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); h3->Fill(value, c1*c2*h1->GetBinContent( h1->GetXaxis()->FindBin(value) ) ); } // h3 has to be filled again so that the erros are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(value, c1*c2*h2->GetBinContent( h2->GetXaxis()->FindBin(value) ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Int_t bin = 0; bin <= h3->GetNbinsX() + 1; ++bin ) { h3->SetBinContent(bin, h3->GetBinContent(bin) / 2 ); } TH1D* h4 = new TH1D("m1D1-h4", "h4=h1*h2", numberOfBins, minRange, maxRange); h4->Multiply(h1, h2, c1, c2); bool ret = equals("Multiply1D1", h3, h4, cmpOptStats , 1E-14); delete h1; delete h2; delete h3; return ret; } bool testMulVar1() { // Tests the first Multiply method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH1D* h1 = new TH1D("m1D1-h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("m1D1-h2", "h2-Title", numberOfBins, v); TH1D* h3 = new TH1D("m1D1-h3", "h3=c1*h1*c2*h2", numberOfBins, v); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); h3->Fill(value, c1*c2*h1->GetBinContent( h1->GetXaxis()->FindBin(value) ) ); } // h3 has to be filled again so that the erros are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(value, c1*c2*h2->GetBinContent( h2->GetXaxis()->FindBin(value) ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Int_t bin = 0; bin <= h3->GetNbinsX() + 1; ++bin ) { h3->SetBinContent(bin, h3->GetBinContent(bin) / 2 ); } TH1D* h4 = new TH1D("m1D1-h4", "h4=h1*h2", numberOfBins, v); h4->Multiply(h1, h2, c1, c2); bool ret = equals("MultiVar1D1", h3, h4, cmpOptStats, 1E-14); delete h1; delete h2; delete h3; return ret; } bool testMul2() { // Tests the second Multiply method for 1D Histograms TH1D* h1 = new TH1D("m1D2-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("m1D2-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("m1D2-h3", "h3=h1*h2", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); h3->Fill(value, h1->GetBinContent( h1->GetXaxis()->FindBin(value) ) ); } r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(value, h2->GetBinContent( h2->GetXaxis()->FindBin(value) ) ); } for ( Int_t bin = 0; bin <= h3->GetNbinsX() + 1; ++bin ) { h3->SetBinContent(bin, h3->GetBinContent(bin) / 2 ); } h1->Multiply(h2); bool ret = equals("Multiply1D2", h3, h1, cmpOptStats, 1E-14); delete h2; delete h3; return ret; } bool testMulVar2() { // Tests the second Multiply method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("m1D2-h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("m1D2-h2", "h2-Title", numberOfBins, v); TH1D* h3 = new TH1D("m1D2-h3", "h3=h1*h2", numberOfBins, v); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); h3->Fill(value, h1->GetBinContent( h1->GetXaxis()->FindBin(value) ) ); } r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(value, h2->GetBinContent( h2->GetXaxis()->FindBin(value) ) ); } for ( Int_t bin = 0; bin <= h3->GetNbinsX() + 1; ++bin ) { h3->SetBinContent(bin, h3->GetBinContent(bin) / 2 ); } h1->Multiply(h2); bool ret = equals("MultiVar1D2", h3, h1, cmpOptStats, 1E-14); delete h2; delete h3; return ret; } bool testMul2D1() { // Tests the first Multiply method for 2D Histograms Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH2D* h1 = new TH2D("m2D1-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("m2D1-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("m2D1-h3", "h3=c1*h1*c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h3->Fill(x, y, c1*c2*h1->GetBinContent( h1->GetXaxis()->FindBin(x), h1->GetYaxis()->FindBin(y) ) ); } // h3 has to be filled again so that the erros are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, c1*c2*h2->GetBinContent( h2->GetXaxis()->FindBin(x), h2->GetYaxis()->FindBin(y) ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Int_t i = 0; i <= h3->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h3->GetNbinsY() + 1; ++j ) { h3->SetBinContent(i, j, h3->GetBinContent(i, j) / 2 ); } } TH2D* h4 = new TH2D("m2D1-h4", "h4=h1*h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Multiply(h1, h2, c1, c2); bool ret = equals("Multiply2D1", h3, h4, cmpOptStats, 1E-12); delete h1; delete h2; delete h3; return ret; } bool testMul2D2() { // Tests the second Multiply method for 2D Histograms TH2D* h1 = new TH2D("m2D2-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("m2D2-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("m2D2-h3", "h3=h1*h2", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h3->Fill(x, y, h1->GetBinContent( h1->GetXaxis()->FindBin(x), h1->GetYaxis()->FindBin(y) ) ); } // h3 has to be filled again so that the erros are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, h2->GetBinContent( h2->GetXaxis()->FindBin(x), h2->GetYaxis()->FindBin(y) ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Int_t i = 0; i <= h3->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h3->GetNbinsY() + 1; ++j ) { h3->SetBinContent(i, j, h3->GetBinContent(i, j) / 2 ); } } h1->Multiply(h2); bool ret = equals("Multiply2D2", h3, h1, cmpOptStats, 1E-12); delete h2; delete h3; return ret; } bool testMul3D1() { // Tests the first Multiply method for 3D Histograms Double_t c1 = r.Rndm(); Double_t c2 = r.Rndm(); TH3D* h1 = new TH3D("m3D1-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("m3D1-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("m3D1-h3", "h3=c1*h1*c2*h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h3->Fill(x, y, z, c1*c2*h1->GetBinContent( h1->GetXaxis()->FindBin(x), h1->GetYaxis()->FindBin(y), h1->GetZaxis()->FindBin(z) ) ); } // h3 has to be filled again so that the erros are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, c1*c2*h2->GetBinContent( h2->GetXaxis()->FindBin(x), h2->GetYaxis()->FindBin(y), h2->GetZaxis()->FindBin(z) ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Int_t i = 0; i <= h3->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h3->GetNbinsY() + 1; ++j ) { for ( Int_t h = 0; h <= h3->GetNbinsZ() + 1; ++h ) { h3->SetBinContent(i, j, h, h3->GetBinContent(i, j, h) / 2 ); } } } TH3D* h4 = new TH3D("m3D1-h4", "h4=h1*h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Multiply(h1, h2, c1, c2); bool ret = equals("Multiply3D1", h3, h4, cmpOptStats, 1E-13); delete h1; delete h2; delete h3; return ret; } bool testMul3D2() { // Tests the second Multiply method for 3D Histograms TH3D* h1 = new TH3D("m3D2-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("m3D2-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("m3D2-h3", "h3=h1*h2", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h3->Fill(x, y, z, h1->GetBinContent( h1->GetXaxis()->FindBin(x), h1->GetYaxis()->FindBin(y), h1->GetZaxis()->FindBin(z) ) ); } // h3 has to be filled again so that the errors are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, h2->GetBinContent( h2->GetXaxis()->FindBin(x), h2->GetYaxis()->FindBin(y), h2->GetZaxis()->FindBin(z) ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Int_t i = 0; i <= h3->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h3->GetNbinsY() + 1; ++j ) { for ( Int_t h = 0; h <= h3->GetNbinsZ() + 1; ++h ) { h3->SetBinContent(i, j, h, h3->GetBinContent(i, j, h) / 2 ); } } } h1->Multiply(h2); bool ret = equals("Multiply3D2", h3, h1, cmpOptStats, 1E-13); delete h2; delete h3; return ret; } template bool testMulHn() { // Tests the Multiply method for Sparse Histograms Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("m3D2-s1", "s1-Title", 3, bsize, xmin, xmax); HIST* s2 = new HIST("m3D2-s2", "s2-Title", 3, bsize, xmin, xmax); HIST* s3 = new HIST("m3D2-s3", "s3=s1*s2", 3, bsize, xmin, xmax); s1->Sumw2();s2->Sumw2();s3->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s1->Fill(points, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s2->Fill(points, 1.0); Int_t points_s1[3]; points_s1[0] = s1->GetAxis(0)->FindBin( points[0] ); points_s1[1] = s1->GetAxis(1)->FindBin( points[1] ); points_s1[2] = s1->GetAxis(2)->FindBin( points[2] ); s3->Fill(points, s1->GetBinContent( points_s1 ) ); } // s3 has to be filled again so that the errors are properly calculated r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); Int_t points_s2[3]; points_s2[0] = s2->GetAxis(0)->FindBin( points[0] ); points_s2[1] = s2->GetAxis(1)->FindBin( points[1] ); points_s2[2] = s2->GetAxis(2)->FindBin( points[2] ); s3->Fill(points, s2->GetBinContent( points_s2 ) ); } // No the bin contents has to be reduced, as it was filled twice! for ( Long64_t i = 0; i < s3->GetNbins(); ++i ) { Int_t bin[3]; Double_t v = s3->GetBinContent(i, bin); s3->SetBinContent( bin, v / 2 ); } s1->Multiply(s2); bool ret = equals(TString::Format("MultHn<%s>", HIST::Class()->GetName()), s3, s1, cmpOptNone, 1E-10); delete s2; delete s3; return ret; } bool testMulF1D() { Double_t c1 = r.Rndm(); TH1D* h1 = new TH1D("mf1D-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("mf1D-h2", "h2=h1*c1*f1", numberOfBins, minRange, maxRange); TF1* f = new TF1("sin", "sin(x)", minRange - 2, maxRange + 2); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); h2->Fill(value, f->Eval( h2->GetBinCenter( h2->FindBin(value) ) ) * c1 ); } h1->Multiply(f, c1); // stats fails because of the error precision int status = equals("MULF H1D", h1, h2); //,cmpOptStats | cmpOptDebug); delete h1; delete f; return status; } bool testMulF1D2() { Double_t c1 = r.Rndm(); TH1D* h1 = new TH1D("mf1D2-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("mf1D2-h2", "h2=h1*c1*f1", numberOfBins, minRange, maxRange); TF2* f = new TF2("sin2", "sin(x)*cos(y)", minRange - 2, maxRange + 2, minRange - 2, maxRange + 2); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); h2->Fill(value, f->Eval( h2->GetXaxis()->GetBinCenter( h2->GetXaxis()->FindBin(value) ), h2->GetYaxis()->GetBinCenter( h2->GetYaxis()->FindBin(double(0)) ) ) * c1 ); } h1->Multiply(f, c1); // stats fails because of the error precision int status = equals("MULF H1D2", h1, h2); //,cmpOptStats | cmpOptDebug); delete h1; delete f; return status; } bool testMulF2D() { Double_t c1 = r.Rndm(); TH2D* h1 = new TH2D("mf2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TH2D* h2 = new TH2D("mf2D-h2", "h2=h1*c1*f1", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TF1* f = new TF1("sin", "sin(x)", minRange - 2, maxRange + 2); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h2->Fill(x, y, f->Eval( h2->GetXaxis()->GetBinCenter( h2->GetXaxis()->FindBin(x) ) ) * c1 ); } h1->Multiply(f, c1); // stats fails because of the error precision int status = equals("MULF H2D", h1, h2); //, cmpOptStats | cmpOptDebug); delete h1; delete f; return status; } bool testMulF2D2() { Double_t c1 = r.Rndm(); TH2D* h1 = new TH2D("mf2D2-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TH2D* h2 = new TH2D("mf2D2-h2", "h2=h1*c1*f1", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TF2* f = new TF2("sin2", "sin(x)*cos(y)", minRange - 2, maxRange + 2, minRange - 2, maxRange + 2); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h2->Fill(x, y, f->Eval( h2->GetXaxis()->GetBinCenter( h2->GetXaxis()->FindBin(x) ), h2->GetYaxis()->GetBinCenter( h2->GetYaxis()->FindBin(y) ) ) * c1 ); } h1->Multiply(f, c1); // stats fails because of the error precision int status = equals("MULF H2D2", h1, h2); //, cmpOptStats | cmpOptDebug); delete h1; delete f; return status; } bool testMulF3D() { Double_t c1 = r.Rndm(); TH3D* h1 = new TH3D("mf3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TH3D* h2 = new TH3D("mf3D-h2", "h2=h1*c1*f1", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TF1* f = new TF1("sin", "sin(x)", minRange - 2, maxRange + 2); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h2->Fill(x, y, z, f->Eval( h2->GetXaxis()->GetBinCenter( h2->GetXaxis()->FindBin(x) ) ) * c1 ); } h1->Multiply(f, c1); // stats fails because of the error precision int status = equals("MULF H3D", h1, h2); //, cmpOptStats | cmpOptDebug); delete h1; delete f; return status; } bool testMulF3D2() { Double_t c1 = r.Rndm(); TH3D* h1 = new TH3D("mf3D2-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TH3D* h2 = new TH3D("mf3D2-h2", "h2=h1*c1*f1", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); TF2* f = new TF2("sin2", "sin(x)*cos(y)", minRange - 2, maxRange + 2, minRange - 2, maxRange + 2); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h2->Fill(x, y, z, f->Eval( h2->GetXaxis()->GetBinCenter( h2->GetXaxis()->FindBin(x) ), h2->GetYaxis()->GetBinCenter( h2->GetYaxis()->FindBin(y) ) ) * c1 ); } h1->Multiply(f, c1); // stats fails because of the error precision int status = equals("MULF H3D2", h1, h2); //, cmpOptStats | cmpOptDebug); delete h1; delete f; return status; } template bool testMulFND() { const UInt_t nDims = 3; Double_t c1 = r.Rndm(); Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("mfND-s1", "s1-Title", nDims, bsize, xmin, xmax); HIST* s2 = new HIST("mfND-s2", "s2=f*s2", nDims, bsize, xmin, xmax); TF1* f = new TF1("sin", "sin(x)", minRange - 2, maxRange + 2); s1->Sumw2();s2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[nDims]; for ( UInt_t i = 0; i < nDims; ++ i ) points[i] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s1->Fill(points, 1.0); s2->Fill(points, f->Eval( s2->GetAxis(0)->GetBinCenter( s2->GetAxis(0)->FindBin(points[0]) ) ) * c1); } s1->Multiply(f, c1); int status = equals(TString::Format("MULF HND<%s>", HIST::Class()->GetName()), s1, s2); delete s1; delete f; return status; } template bool testMulFND2() { const UInt_t nDims = 3; Double_t c1 = r.Rndm(); Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("mfND-s1", "s1-Title", nDims, bsize, xmin, xmax); HIST* s2 = new HIST("mfND-s2", "s2=f*s2", nDims, bsize, xmin, xmax); TF2* f = new TF2("sin2", "sin(x)*cos(y)", minRange - 2, maxRange + 2, minRange - 2, maxRange + 2); s1->Sumw2();s2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[nDims]; for ( UInt_t i = 0; i < nDims; ++ i ) points[i] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s1->Fill(points, 1.0); s2->Fill(points, f->Eval( s2->GetAxis(0)->GetBinCenter( s2->GetAxis(0)->FindBin(points[0]) ), s2->GetAxis(1)->GetBinCenter( s2->GetAxis(1)->FindBin(points[1]) ) ) * c1); } s1->Multiply(f, c1); int status = equals(TString::Format("MULF HND2<%s>", HIST::Class()->GetName()), s1, s2); delete s1; delete f; return status; } bool testDivide1() { // Tests the first Divide method for 1D Histograms Double_t c1 = r.Rndm() + 1; Double_t c2 = r.Rndm() + 1; TH1D* h1 = new TH1D("d1D1-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("d1D1-h2", "h2-Title", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value; value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH1D* h3 = new TH1D("d1D1-h3", "h3=(c1*h1)/(c2*h2)", numberOfBins, minRange, maxRange); h3->Divide(h1, h2, c1, c2); TH1D* h4 = new TH1D("d1D1-h4", "h4=h3*h2)", numberOfBins, minRange, maxRange); h4->Multiply(h2, h3, c2/c1, 1); for ( Int_t bin = 0; bin <= h4->GetNbinsX() + 1; ++bin ) { Double_t error = h4->GetBinError(bin) * h4->GetBinError(bin); error -= (2*(c2*c2)/(c1*c1)) * h3->GetBinContent(bin)*h3->GetBinContent(bin)*h2->GetBinError(bin)*h2->GetBinError(bin); h4->SetBinError( bin, sqrt(error) ); } h4->ResetStats(); h1->ResetStats(); bool ret = equals("Divide1D1", h1, h4, cmpOptStats ); delete h1; delete h2; delete h3; return ret; } bool testDivideVar1() { // Tests the first Divide method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); Double_t c1 = r.Rndm() + 1; Double_t c2 = r.Rndm() + 1; TH1D* h1 = new TH1D("d1D1-h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("d1D1-h2", "h2-Title", numberOfBins, v); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value; value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH1D* h3 = new TH1D("d1D1-h3", "h3=(c1*h1)/(c2*h2)", numberOfBins, v); h3->Divide(h1, h2, c1, c2); TH1D* h4 = new TH1D("d1D1-h4", "h4=h3*h2)", numberOfBins, v); h4->Multiply(h2, h3, c2/c1, 1); for ( Int_t bin = 0; bin <= h4->GetNbinsX() + 1; ++bin ) { Double_t error = h4->GetBinError(bin) * h4->GetBinError(bin); error -= (2*(c2*c2)/(c1*c1)) * h3->GetBinContent(bin)*h3->GetBinContent(bin)*h2->GetBinError(bin)*h2->GetBinError(bin); h4->SetBinError( bin, sqrt(error) ); } h4->ResetStats(); h1->ResetStats(); bool ret = equals("DivideVar1D1", h1, h4, cmpOptStats); delete h1; delete h2; delete h3; return ret; } bool testDivideProf1() { // Tests the first Divide method for 1D Profiles Double_t c1 = 1;//r.Rndm(); Double_t c2 = 1;//r.Rndm(); TProfile* p1 = new TProfile("d1D1-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("d1D1-p2", "p2-Title", numberOfBins, minRange, maxRange); p1->Sumw2();p2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x, y; x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); } TProfile* p3 = new TProfile("d1D1-p3", "p3=(c1*p1)/(c2*p2)", numberOfBins, minRange, maxRange); p3->Divide(p1, p2, c1, c2); // There is no Multiply method to tests. And the errors are wrongly // calculated in the TProfile::Division method, so there is no // point to make the tests. Once the method is fixed, the tests // will be finished. return 0; } bool testDivide2() { // Tests the second Divide method for 1D Histograms TH1D* h1 = new TH1D("d1D2-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("d1D2-h2", "h2-Title", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value; value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH1D* h3 = static_cast( h1->Clone() ); h3->Divide(h2); TH1D* h4 = new TH1D("d1D2-h4", "h4=h3*h2)", numberOfBins, minRange, maxRange); h4->Multiply(h2, h3, 1.0, 1.0); for ( Int_t bin = 0; bin <= h4->GetNbinsX() + 1; ++bin ) { Double_t error = h4->GetBinError(bin) * h4->GetBinError(bin); error -= 2 * h3->GetBinContent(bin)*h3->GetBinContent(bin)*h2->GetBinError(bin)*h2->GetBinError(bin); h4->SetBinError( bin, sqrt(error) ); } h4->ResetStats(); h1->ResetStats(); bool ret = equals("Divide1D2", h1, h4, cmpOptStats); delete h1; delete h2; delete h3; return ret; } bool testDivideVar2() { // Tests the second Divide method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("d1D2-h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("d1D2-h2", "h2-Title", numberOfBins, v); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value; value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH1D* h3 = static_cast( h1->Clone() ); h3->Divide(h2); TH1D* h4 = new TH1D("d1D2-h4", "h4=h3*h2)", numberOfBins, v); h4->Multiply(h2, h3, 1.0, 1.0); for ( Int_t bin = 0; bin <= h4->GetNbinsX() + 1; ++bin ) { Double_t error = h4->GetBinError(bin) * h4->GetBinError(bin); error -= 2 * h3->GetBinContent(bin)*h3->GetBinContent(bin)*h2->GetBinError(bin)*h2->GetBinError(bin); h4->SetBinError( bin, sqrt(error) ); } h4->ResetStats(); h1->ResetStats(); bool ret = equals("DivideVar1D2", h1, h4, cmpOptStats); delete h1; delete h2; delete h3; return ret; } bool testDivide2D1() { // Tests the first Divide method for 2D Histograms Double_t c1 = r.Rndm() + 1; Double_t c2 = r.Rndm() + 1; TH2D* h1 = new TH2D("d2D1-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("d2D1-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x,y; x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH2D* h3 = new TH2D("d2D1-h3", "h3=(c1*h1)/(c2*h2)", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h3->Divide(h1, h2, c1, c2); TH2D* h4 = new TH2D("d2D1-h4", "h4=h3*h2)", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Multiply(h2, h3, c2/c1, 1); for ( Int_t i = 0; i <= h4->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h4->GetNbinsY() + 1; ++j ) { Double_t error = h4->GetBinError(i,j) * h4->GetBinError(i,j); error -= (2*(c2*c2)/(c1*c1)) * h3->GetBinContent(i,j)*h3->GetBinContent(i,j)*h2->GetBinError(i,j)*h2->GetBinError(i,j); h4->SetBinError( i, j, sqrt(error) ); } } h4->ResetStats(); h1->ResetStats(); bool ret = equals("Divide2D1", h1, h4, cmpOptStats ); delete h1; delete h2; delete h3; return ret; } bool testDivide2D2() { // Tests the second Divide method for 2D Histograms TH2D* h1 = new TH2D("d2D2-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("d2D2-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x,y; x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH2D* h3 = static_cast( h1->Clone() ); h3->Divide(h2); TH2D* h4 = new TH2D("d2D2-h4", "h4=h3*h2)", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Multiply(h2, h3, 1.0, 1.0); for ( Int_t i = 0; i <= h4->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h4->GetNbinsY() + 1; ++j ) { Double_t error = h4->GetBinError(i,j) * h4->GetBinError(i,j); error -= 2 * h3->GetBinContent(i,j)*h3->GetBinContent(i,j)*h2->GetBinError(i,j)*h2->GetBinError(i,j); h4->SetBinError( i, j, sqrt(error) ); } } h4->ResetStats(); h1->ResetStats(); bool ret = equals("Divide2D2", h1, h4, cmpOptStats); delete h1; delete h2; delete h3; return ret; } bool testDivide3D1() { // Tests the first Divide method for 3D Histograms Double_t c1 = r.Rndm() + 1; Double_t c2 = r.Rndm() + 1; TH3D* h1 = new TH3D("d3D1-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("d3D1-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x,y,z; x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH3D* h3 = new TH3D("d3D1-h3", "h3=(c1*h1)/(c2*h2)", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h3->Divide(h1, h2, c1, c2); TH3D* h4 = new TH3D("d3D1-h4", "h4=h3*h2)", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Multiply(h2, h3, c2/c1, 1.0); for ( Int_t i = 0; i <= h4->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h4->GetNbinsY() + 1; ++j ) { for ( Int_t h = 0; h <= h4->GetNbinsZ() + 1; ++h ) { Double_t error = h4->GetBinError(i,j,h) * h4->GetBinError(i,j,h); //error -= 2 * h3->GetBinContent(i,j,h)*h3->GetBinContent(i,j,h)*h2->GetBinError(i,j,h)*h2->GetBinError(i,j,h); error -= (2*(c2*c2)/(c1*c1)) * h3->GetBinContent(i,j,h)*h3->GetBinContent(i,j,h)*h2->GetBinError(i,j,h)*h2->GetBinError(i,j,h); h4->SetBinError( i, j, h, sqrt(error) ); } } } h4->ResetStats(); h1->ResetStats(); bool ret = equals("Divide3D1", h1, h4, cmpOptStats); delete h1; delete h2; delete h3; return ret; } bool testDivide3D2() { // Tests the second Divide method for 3D Histograms TH3D* h1 = new TH3D("d3D2-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("d3D2-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x,y,z; x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); x = r.Uniform(0.9 * minRange, 1.1 * maxRange); y = r.Uniform(0.9 * minRange, 1.1 * maxRange); z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); } // avoid bins in h2 with zero content for (int i = 0; i < h2->GetSize(); ++i) if (h2->GetBinContent(i) == 0) h2->SetBinContent(i,1); TH3D* h3 = static_cast( h1->Clone() ); h3->Divide(h2); TH3D* h4 = new TH3D("d3D2-h4", "h4=h3*h2)", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h4->Multiply(h2, h3, 1.0, 1.0); for ( Int_t i = 0; i <= h4->GetNbinsX() + 1; ++i ) { for ( Int_t j = 0; j <= h4->GetNbinsY() + 1; ++j ) { for ( Int_t h = 0; h <= h4->GetNbinsZ() + 1; ++h ) { Double_t error = h4->GetBinError(i,j,h) * h4->GetBinError(i,j,h); error -= 2 * h3->GetBinContent(i,j,h)*h3->GetBinContent(i,j,h)*h2->GetBinError(i,j,h)*h2->GetBinError(i,j,h); h4->SetBinError( i, j, h, sqrt(error) ); } } } h4->ResetStats(); h1->ResetStats(); bool ret = equals("Divide3D2", h1, h4, cmpOptStats); delete h1; delete h2; delete h3; return ret; } template bool testDivHn1() { // Tests the first Divide method for 3D Histograms Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; // There is no multiply with coefficients! const Double_t c1 = 1; const Double_t c2 = 1; HIST* s1 = new HIST("dND1-s1", "s1-Title", 3, bsize, xmin, xmax); HIST* s2 = new HIST("dND1-s2", "s2-Title", 3, bsize, xmin, xmax); HIST* s4 = new HIST("dND1-s4", "s4=s3*s2)", 3, bsize, xmin, xmax); s1->Sumw2();s2->Sumw2();s4->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[1] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[2] = r.Uniform(0.9 * minRange, 1.1 * maxRange); s1->Fill(points, 1.0); points[0] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[1] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[2] = r.Uniform(0.9 * minRange, 1.1 * maxRange); s2->Fill(points, 1.0); s4->Fill(points, 1.0); } HIST* s3 = new HIST("dND1-s3", "s3=(c1*s1)/(c2*s2)", 3, bsize, xmin, xmax); s3->Divide(s1, s2, c1, c2); s4->Multiply(s3); // No the bin contents has to be reduced, as it was filled twice! for ( Long64_t i = 0; i < s3->GetNbins(); ++i ) { Int_t coord[3]; s3->GetBinContent(i, coord); Double_t s4BinError = s4->GetBinError(coord); Double_t s2BinError = s2->GetBinError(coord); Double_t s3BinContent = s3->GetBinContent(coord); Double_t error = s4BinError * s4BinError; error -= (2*(c2*c2)/(c1*c1)) * s3BinContent * s3BinContent * s2BinError * s2BinError; s4->SetBinError(coord, sqrt(error)); } bool ret = equals(TString::Format("DivideND1<%s>", HIST::Class()->GetName()), s1, s4, cmpOptStats, 1E-6); delete s1; delete s2; delete s3; return ret; } template bool testDivHn2() { // Tests the second Divide method for 3D Histograms Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; // There is no multiply with coefficients! const Double_t c1 = 1; const Double_t c2 = 1; HIST* s1 = new HIST("dND2-s1", "s1-Title", 3, bsize, xmin, xmax); HIST* s2 = new HIST("dND2-s2", "s2-Title", 3, bsize, xmin, xmax); HIST* s4 = new HIST("dND2-s4", "s4=s3*s2)", 3, bsize, xmin, xmax); s1->Sumw2();s2->Sumw2();s4->Sumw2(); UInt_t seed = r.GetSeed(); // For possible problems r.SetSeed(seed); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[1] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[2] = r.Uniform(0.9 * minRange, 1.1 * maxRange); s1->Fill(points, 1.0); points[0] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[1] = r.Uniform(0.9 * minRange, 1.1 * maxRange); points[2] = r.Uniform(0.9 * minRange, 1.1 * maxRange); s2->Fill(points, 1.0); s4->Fill(points, 1.0); } HIST* s3 = static_cast( s1->Clone() ); s3->Divide(s2); HIST* s5 = new HIST("dND2-s5", "s5=(c1*s1)/(c2*s2)", 3, bsize, xmin, xmax); s5->Divide(s1,s2); s4->Multiply(s3); // No the bin contents has to be reduced, as it was filled twice! for ( Long64_t i = 0; i < s3->GetNbins(); ++i ) { Int_t coord[3]; s3->GetBinContent(i, coord); Double_t s4BinError = s4->GetBinError(coord); Double_t s2BinError = s2->GetBinError(coord); Double_t s3BinContent = s3->GetBinContent(coord); Double_t error = s4BinError * s4BinError; error -= (2*(c2*c2)/(c1*c1)) * s3BinContent * s3BinContent * s2BinError * s2BinError; s4->SetBinError(coord, sqrt(error)); } bool ret = equals(TString::Format("DivideND2<%s>", HIST::Class()->GetName()), s1, s4, cmpOptStats, 1E-6); delete s1; delete s2; delete s3; return ret; } bool testAssign1D() { // Tests the operator=() method for 1D Histograms TH1D* h1 = new TH1D("=1D-h1", "h1-Title", numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TH1D* h2 = new TH1D("=1D-h2", "h2-Title", numberOfBins, minRange, maxRange); *h2 = *h1; bool ret = equals("Assign Oper Hist '=' 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testAssignVar1D() { // Tests the operator=() method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("=1D-h1", "h1-Title", numberOfBins, v); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TH1D* h2 = new TH1D("=1D-h2", "h2-Title", numberOfBins, v); *h2 = *h1; bool ret = equals("Assign Oper VarH '=' 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testAssignProfile1D() { // Tests the operator=() method for 1D Profiles TProfile* p1 = new TProfile("=1D-p1", "p1-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TProfile* p2 = new TProfile("=1D-p2", "p2-Title", numberOfBins, minRange, maxRange); *p2 = *p1; bool ret = equals("Assign Oper Prof '=' 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testAssignProfileVar1D() { // Tests the operator=() method for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TProfile* p1 = new TProfile("=1D-p1", "p1-Title", numberOfBins, v); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TProfile* p2 = new TProfile("=1D-p2", "p2-Title", numberOfBins, v); *p2 = *p1; bool ret = equals("Assign Oper VarP '=' 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testCopyConstructor1D() { // Tests the copy constructor for 1D Histograms TH1D* h1 = new TH1D("cc1D-h1", "h1-Title", numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TH1D* h2 = new TH1D(*h1); bool ret = equals("Copy Constructor Hist 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCopyConstructorVar1D() { // Tests the copy constructor for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("cc1D-h1", "h1-Title", numberOfBins, v); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TH1D* h2 = new TH1D(*h1); bool ret = equals("Copy Constructor VarH 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCopyConstructorProfile1D() { // Tests the copy constructor for 1D Profiles TProfile* p1 = new TProfile("cc1D-p1", "p1-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TProfile* p2 = new TProfile(*p1); bool ret = equals("Copy Constructor Prof 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testCopyConstructorProfileVar1D() { // Tests the copy constructor for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TProfile* p1 = new TProfile("cc1D-p1", "p1-Title", numberOfBins, v); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TProfile* p2 = new TProfile(*p1); bool ret = equals("Copy Constructor VarP 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testClone1D() { // Tests the clone method for 1D Histograms TH1D* h1 = new TH1D("cl1D-h1", "h1-Title", numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TH1D* h2 = static_cast ( h1->Clone() ); bool ret = equals("Clone Function Hist 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCloneVar1D() { // Tests the clone method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("cl1D-h1", "h1-Title", numberOfBins, v); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TH1D* h2 = static_cast ( h1->Clone() ); bool ret = equals("Clone Function VarH 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCloneProfile1D() { // Tests the clone method for 1D Profiles TProfile* p1 = new TProfile("cl1D-p1", "p1-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TProfile* p2 = static_cast ( p1->Clone() ); bool ret = equals("Clone Function Prof 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testCloneProfileVar1D() { // Tests the clone method for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TProfile* p1 = new TProfile("cl1D-p1", "p1-Title", numberOfBins, v); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TProfile* p2 = static_cast ( p1->Clone() ); bool ret = equals("Clone Function VarP 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testAssign2D() { // Tests the operator=() method for 2D Histograms TH2D* h1 = new TH2D("=2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } TH2D* h2 = new TH2D("=2D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); *h2 = *h1; bool ret = equals("Assign Oper Hist '=' 2D", h1, h2, cmpOptStats); delete h1; return ret; } bool testAssignProfile2D() { // Tests the operator=() method for 2D Profiles TProfile2D* p1 = new TProfile2D("=2D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); } TProfile2D* p2 = new TProfile2D("=2D-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); *p2 = *p1; bool ret = equals("Assign Oper Prof '=' 2D", p1, p2, cmpOptStats); delete p1; return ret; } bool testCopyConstructor2D() { // Tests the copy constructor for 2D Histograms TH2D* h1 = new TH2D("cc2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } TH2D* h2 = new TH2D(*h1); bool ret = equals("Copy Constructor Hist 2D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCopyConstructorProfile2D() { // Tests the copy constructor for 2D Profiles TProfile2D* p1 = new TProfile2D("cc2D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); } TProfile2D* p2 = new TProfile2D(*p1); bool ret = equals("Copy Constructor Prof 2D", p1, p2, cmpOptStats); delete p1; return ret; } bool testClone2D() { // Tests the clone method for 2D Histograms TH2D* h1 = new TH2D("cl2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } TH2D* h2 = static_cast ( h1->Clone() ); bool ret = equals("Clone Function Hist 2D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCloneProfile2D() { // Tests the clone method for 2D Profiles TProfile2D* p1 = new TProfile2D("cl2D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); } TProfile2D* p2 = static_cast ( p1->Clone() ); bool ret = equals("Clone Function Prof 2D", p1, p2, cmpOptStats); delete p1; return ret; } bool testAssign3D() { // Tests the operator=() method for 3D Histograms TH3D* h1 = new TH3D("=3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } TH3D* h2 = new TH3D("=3D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); *h2 = *h1; bool ret = equals("Assign Oper Hist '=' 3D", h1, h2, cmpOptStats); delete h1; return ret; } bool testAssignProfile3D() { // Tests the operator=() method for 3D Profiles TProfile3D* p1 = new TProfile3D("=3D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); } TProfile3D* p2 = new TProfile3D("=3D-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); *p2 = *p1; bool ret = equals("Assign Oper Prof '=' 3D", p1, p2); delete p1; return ret; } bool testCopyConstructor3D() { // Tests the copy constructor for 3D Histograms TH3D* h1 = new TH3D("cc3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } TH3D* h2 = new TH3D(*h1); bool ret = equals("Copy Constructor Hist 3D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCopyConstructorProfile3D() { // Tests the copy constructor for 3D Profiles TProfile3D* p1 = new TProfile3D("cc3D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); } TProfile3D* p2 = new TProfile3D(*p1); bool ret = equals("Copy Constructor Prof 3D", p1, p2/*, cmpOptStats*/); delete p1; return ret; } bool testClone3D() { // Tests the clone method for 3D Histograms TH3D* h1 = new TH3D("cl3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } TH3D* h2 = static_cast ( h1->Clone() ); bool ret = equals("Clone Function Hist 3D", h1, h2, cmpOptStats); delete h1; return ret; } bool testCloneProfile3D() { // Tests the clone method for 3D Profiles TProfile3D* p1 = new TProfile3D("cl3D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); } TProfile3D* p2 = static_cast ( p1->Clone() ); bool ret = equals("Clone Function Prof 3D", p1, p2); delete p1; return ret; } template bool testCloneHn() { // Tests the clone method for Sparse histograms Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ) }; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("clS-s1","s1-Title", 3, bsize, xmin, xmax); for ( Int_t i = 0; i < nEvents * nEvents; ++i ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9, maxRange * 1.1); points[1] = r.Uniform( minRange * .9, maxRange * 1.1); points[2] = r.Uniform( minRange * .9, maxRange * 1.1); s1->Fill(points); } HIST* s2 = (HIST*) s1->Clone(); bool ret = equals(TString::Format("Clone Function %s", HIST::Class()->GetName()), s1, s2); delete s1; return ret; } bool testWriteRead1D() { // Tests the write and read methods for 1D Histograms TH1D* h1 = new TH1D("wr1D-h1", "h1-Title", numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TFile f("tmpHist.root", "RECREATE"); h1->Write(); f.Close(); TFile f2("tmpHist.root"); TH1D* h2 = static_cast ( f2.Get("wr1D-h1") ); bool ret = equals("Read/Write Hist 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testWriteReadVar1D() { // Tests the write and read methods for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("wr1D-h1", "h1-Title", numberOfBins, v); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } TFile f("tmpHist.root", "RECREATE"); h1->Write(); f.Close(); TFile f2("tmpHist.root"); TH1D* h2 = static_cast ( f2.Get("wr1D-h1") ); bool ret = equals("Read/Write VarH 1D", h1, h2, cmpOptStats); delete h1; return ret; } bool testWriteReadProfile1D() { // Tests the write and read methods for 1D Profiles TProfile* p1 = new TProfile("wr1D-p1", "p1-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TFile f("tmpHist.root", "RECREATE"); p1->Write(); f.Close(); TFile f2("tmpHist.root"); TProfile* p2 = static_cast ( f2.Get("wr1D-p1") ); bool ret = equals("Read/Write Prof 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testWriteReadProfileVar1D() { // Tests the write and read methods for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TProfile* p1 = new TProfile("wr1D-p1", "p1-Title", numberOfBins, v); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } TFile f("tmpHist.root", "RECREATE"); p1->Write(); f.Close(); TFile f2("tmpHist.root"); TProfile* p2 = static_cast ( f2.Get("wr1D-p1") ); bool ret = equals("Read/Write VarP 1D", p1, p2, cmpOptStats); delete p1; return ret; } bool testWriteRead2D() { // Tests the write and read methods for 2D Histograms TH2D* h1 = new TH2D("wr2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } TFile f("tmpHist.root", "RECREATE"); h1->Write(); f.Close(); TFile f2("tmpHist.root"); TH2D* h2 = static_cast ( f2.Get("wr2D-h1") ); bool ret = equals("Read/Write Hist 2D", h1, h2, cmpOptStats); delete h1; return ret; } bool testWriteReadProfile2D() { // Tests the write and read methods for 2D Profiles TProfile2D* p1 = new TProfile2D("wr2D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); } TFile f("tmpHist.root", "RECREATE"); p1->Write(); f.Close(); TFile f2("tmpHist.root"); TProfile2D* p2 = static_cast ( f2.Get("wr2D-p1") ); bool ret = equals("Read/Write Prof 2D", p1, p2, cmpOptStats); delete p1; return ret; } bool testWriteRead3D() { // Tests the write and read methods for 3D Histograms TH3D* h1 = new TH3D("wr3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } TFile f("tmpHist.root", "RECREATE"); h1->Write(); f.Close(); TFile f2("tmpHist.root"); TH3D* h2 = static_cast ( f2.Get("wr3D-h1") ); bool ret = equals("Read/Write Hist 3D", h1, h2, cmpOptStats); delete h1; return ret; } bool testWriteReadProfile3D() { // Tests the write and read methods for 3D Profile TProfile3D* p1 = new TProfile3D("wr3D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); } TFile f("tmpHist.root", "RECREATE"); p1->Write(); f.Close(); TFile f2("tmpHist.root"); TProfile3D* p2 = static_cast ( f2.Get("wr3D-p1") ); // In this particular case the statistics are not checked. The // Chi2Test is not properly implemented for the TProfile3D // class. If the cmpOptStats flag is set, then there will be a // crash. bool ret = equals("Read/Write Prof 3D", p1, p2); delete p1; return ret; } template bool testWriteReadHn() { // Tests the write and read methods for n-dim Histograms Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ) }; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("wrS-s1","s1-Title", 3, bsize, xmin, xmax); s1->Sumw2(); for ( Int_t i = 0; i < nEvents * nEvents; ++i ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9, maxRange * 1.1); points[1] = r.Uniform( minRange * .9, maxRange * 1.1); points[2] = r.Uniform( minRange * .9, maxRange * 1.1); s1->Fill(points); } TFile f("tmpHist.root", "RECREATE"); s1->Write(); f.Close(); TFile f2("tmpHist.root"); HIST* s2 = static_cast ( f2.Get("wrS-s1") ); bool ret = equals(TString::Format("Read/Write Hist %s", HIST::Class()->GetName()), s1, s2, cmpOptStats); delete s1; return ret; } bool testMerge1D() { // Tests the merge method for 1D Histograms // simple merge with histogram with same limits TH1D* h1 = new TH1D("merge1D-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("merge1D-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("merge1D-h3", "h3-Title", numberOfBins, minRange, maxRange); TH1D* h4 = new TH1D("merge1D-h4", "h4-Title", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); FillHistograms(h1, h4); FillHistograms(h2, h4); FillHistograms(h3, h4); TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("Merge1D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeVar1D() { // Tests the merge method for 1D Histograms with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TH1D* h1 = new TH1D("merge1D-h1", "h1-Title", numberOfBins, v); TH1D* h2 = new TH1D("merge1D-h2", "h2-Title", numberOfBins, v); TH1D* h3 = new TH1D("merge1D-h3", "h3-Title", numberOfBins, v); TH1D* h4 = new TH1D("merge1D-h4", "h4-Title", numberOfBins, v); h1->Sumw2();h2->Sumw2();h3->Sumw2(); FillHistograms(h1, h4); FillHistograms(h2, h4); FillHistograms(h3, h4); TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeVar1D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf1D() { // Tests the merge method for 1D Profiles TProfile* p1 = new TProfile("merge1D-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("merge1D-p2", "p2-Title", numberOfBins, minRange, maxRange); TProfile* p3 = new TProfile("merge1D-p3", "p3-Title", numberOfBins, minRange, maxRange); TProfile* p4 = new TProfile("merge1D-p4", "p4-Title", numberOfBins, minRange, maxRange); FillProfiles(p1, p4); FillProfiles(p2, p4); FillProfiles(p3, p4); TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("Merge1DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProfVar1D() { // Tests the merge method for 1D Profiles with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); TProfile* p1 = new TProfile("merge1D-p1", "p1-Title", numberOfBins, v); TProfile* p2 = new TProfile("merge1D-p2", "p2-Title", numberOfBins, v); TProfile* p3 = new TProfile("merge1D-p3", "p3-Title", numberOfBins, v); TProfile* p4 = new TProfile("merge1D-p4", "p4-Title", numberOfBins, v); FillProfiles(p1, p4); FillProfiles(p2, p4); FillProfiles(p3, p4); TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("Merge1DVarP", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge2D() { // Tests the merge method for 2D Histograms TH2D* h1 = new TH2D("merge2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("merge2D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("merge2D-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h4 = new TH2D("merge2D-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("Merge2D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf2D() { // Tests the merge method for 2D Profiles TProfile2D* p1 = new TProfile2D("merge2D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("merge2D-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("merge2D-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p4 = new TProfile2D("merge2D-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("Merge2DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge3D() { // Tests the merge method for 3D Histograms TH3D* h1 = new TH3D("merge3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("merge3D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("merge3D-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h4 = new TH3D("merge3D-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("Merge3D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf3D() { // Tests the merge method for 3D Profiles TProfile3D* p1 = new TProfile3D("merge3D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("merge3D-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("merge3D-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p4 = new TProfile3D("merge3D-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("Merge3DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } template bool testMergeHn() { // Tests the merge method for n-dim Histograms Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ) }; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("mergeS-s1", "s1-Title", 3, bsize, xmin, xmax); HIST* s2 = new HIST("mergeS-s2", "s2-Title", 3, bsize, xmin, xmax); HIST* s3 = new HIST("mergeS-s3", "s3-Title", 3, bsize, xmin, xmax); HIST* s4 = new HIST("mergeS-s4", "s4-Title", 3, bsize, xmin, xmax); s1->Sumw2();s2->Sumw2();s3->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9, maxRange * 1.1); points[1] = r.Uniform( minRange * .9, maxRange * 1.1); points[2] = r.Uniform( minRange * .9, maxRange * 1.1); s1->Fill(points, 1.0); s4->Fill(points, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9, maxRange * 1.1); points[1] = r.Uniform( minRange * .9, maxRange * 1.1); points[2] = r.Uniform( minRange * .9, maxRange * 1.1); s2->Fill(points, 1.0); s4->Fill(points, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9, maxRange * 1.1); points[1] = r.Uniform( minRange * .9, maxRange * 1.1); points[2] = r.Uniform( minRange * .9, maxRange * 1.1); s3->Fill(points, 1.0); s4->Fill(points, 1.0); } TList *list = new TList; list->Add(s2); list->Add(s3); s1->Merge(list); bool ret = equals(TString::Format("MergeHn<%s>", HIST::Class()->GetName()), s1, s4, cmpOptNone, 1E-10); delete s1; delete s2; delete s3; return ret; } bool testMerge1DLabelSame() { // Tests the merge with some equal labels method for 1D Histograms // number of labels used = number of bins TH1D* h1 = new TH1D("merge1DLabelSame-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("merge1DLabelSame-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("merge1DLabelSame-h3", "h3-Title", numberOfBins, minRange, maxRange); TH1D* h4 = new TH1D("merge1DLabelSame-h4", "h4-Title", numberOfBins, minRange, maxRange); const char labels[10][5] = {"aaa","bbb","ccc","ddd","eee","fff","ggg","hhh","iii","lll"}; for (Int_t i = 0; i < numberOfBins; ++i) { h1->GetXaxis()->SetBinLabel(i+1, labels[i]); h2->GetXaxis()->SetBinLabel(i+1, labels[i]); h3->GetXaxis()->SetBinLabel(i+1, labels[i]); h4->GetXaxis()->SetBinLabel(i+1, labels[i]); } for ( Int_t e = 0; e < nEvents ; ++e ) { Int_t i = r.Integer(11); if (i < 10) { h1->Fill(labels[i], 1.0); h4->Fill(labels[i], 1.0); } else { // add one empty label // should be added in underflow bin // to test merge of underflows h1->Fill("", 1.0); h4->Fill("", 1.0); } } for ( Int_t e = 0; e < nEvents ; ++e ) { Int_t i = r.Integer(10); h2->Fill(labels[i], 1.0); h4->Fill(labels[i],1.0); } for ( Int_t e = 0; e < nEvents ; ++e ) { Int_t i = r.Integer(10); h3->Fill(labels[i], 1.0); h4->Fill(labels[i], 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->SetCanExtend(TH1::kAllAxes); h1->Merge(list); bool ret = equals("MergeLabelSame1D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge2DLabelSame() { // Tests the merge with some equal labels method for 2D Histograms // Note by LM (Dec 2010) // In reality in 2D histograms the Merge does not support // histogram with labels - just merges according to the x-values // This test is basically useless TH2D* h1 = new TH2D("merge2DLabelSame-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("merge2DLabelSame-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("merge2DLabelSame-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h4 = new TH2D("merge2DLabelSame-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->GetXaxis()->SetBinLabel(4, "alpha"); h2->GetXaxis()->SetBinLabel(4, "alpha"); h3->GetXaxis()->SetBinLabel(4, "alpha"); h4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelSame2D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge3DLabelSame() { // Tests the merge with some equal labels method for 3D Histograms TH3D* h1 = new TH3D("merge3DLabelSame-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("merge3DLabelSame-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("merge3DLabelSame-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h4 = new TH3D("merge3DLabelSame-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->GetXaxis()->SetBinLabel(4, "alpha"); h2->GetXaxis()->SetBinLabel(4, "alpha"); h3->GetXaxis()->SetBinLabel(4, "alpha"); h4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelSame3D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf1DLabelSame() { // Tests the merge with some equal labels method for 1D Profiles TProfile* p1 = new TProfile("merge1DLabelSame-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("merge1DLabelSame-p2", "p2-Title", numberOfBins, minRange, maxRange); TProfile* p3 = new TProfile("merge1DLabelSame-p3", "p3-Title", numberOfBins, minRange, maxRange); TProfile* p4 = new TProfile("merge1DLabelSame-p4", "p4-Title", numberOfBins, minRange, maxRange); // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() p1->GetXaxis()->SetBinLabel(4, "alpha"); p2->GetXaxis()->SetBinLabel(6, "alpha"); p3->GetXaxis()->SetBinLabel(8, "alpha"); p4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelSame1DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf2DLabelSame() { // Tests the merge with some equal labels method for 2D Profiles TProfile2D* p1 = new TProfile2D("merge2DLabelSame-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("merge2DLabelSame-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("merge2DLabelSame-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p4 = new TProfile2D("merge2DLabelSame-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() p1->GetXaxis()->SetBinLabel(4, "alpha"); p2->GetXaxis()->SetBinLabel(6, "alpha"); p3->GetXaxis()->SetBinLabel(8, "alpha"); p4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelSame2DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf3DLabelSame() { // Tests the merge with some equal labels method for 3D Profiles TProfile3D* p1 = new TProfile3D("merge3DLabelSame-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("merge3DLabelSame-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("merge3DLabelSame-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p4 = new TProfile3D("merge3DLabelSame-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() p1->GetXaxis()->SetBinLabel(4, "alpha"); p2->GetXaxis()->SetBinLabel(6, "alpha"); p3->GetXaxis()->SetBinLabel(8, "alpha"); p4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelSame3DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge1DLabelDiff() { // Tests the merge with some different labels for 1D Histograms TH1D* h1 = new TH1D("merge1DLabelDiff-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("merge1DLabelDiff-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("merge1DLabelDiff-h3", "h3-Title", numberOfBins, minRange, maxRange); TH1D* h4 = new TH1D("merge1DLabelDiff-h4", "h4-Title", numberOfBins, minRange, maxRange); // This test fails, as expected! That is why it is not run in the tests suite. const char labels[10][5] = {"aaa","bbb","ccc","ddd","eee","fff","ggg","hhh","iii","lll"}; //choose random same labels (nbins -2) std::vector labels2(8); for (int i = 0; i < 8; ++i) labels2[i] = labels[r.Integer(10)]; for ( Int_t e = 0; e < nEvents ; ++e ) { int i = r.Integer(8); if (i < 8) { h1->Fill(labels2[i], 1.0); h4->Fill(labels2[i], 1.0); } else { // add one empty label h1->Fill("", 1.0); h4->Fill("", 1.0); } } for (int i = 0; i < 8; ++i) labels2[i] = labels[r.Integer(10)]; for ( Int_t e = 0; e < nEvents ; ++e ) { Int_t i = r.Integer(8); h2->Fill(labels2[i], 1.0); h4->Fill(labels2[i],1.0); } for (int i = 0; i < 8; ++i) labels2[i] = labels[r.Integer(10)]; for ( Int_t e = 0; e < nEvents ; ++e ) { Int_t i = r.Integer(8); h3->Fill(labels2[i], 1.0); h4->Fill(labels2[i], 1.0); } // test ordering label for one histo h2->LabelsOption("a"); h3->LabelsOption(">"); TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); // need to order the histo to compare them h1->LabelsOption("a"); h4->LabelsOption("a"); bool ret = equals("MergeLabelDiff1D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge2DLabelDiff() { // Tests the merge with some different labels method for 2D Histograms // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() TH2D* h1 = new TH2D("merge2DLabelDiff-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("merge2DLabelDiff-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("merge2DLabelDiff-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h4 = new TH2D("merge2DLabelDiff-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->GetXaxis()->SetBinLabel(2, "gamma"); h2->GetXaxis()->SetBinLabel(6, "beta"); h3->GetXaxis()->SetBinLabel(4, "alpha"); h4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelDiff2D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge3DLabelDiff() { // Tests the merge with some different labels method for 3D Histograms // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() TH3D* h1 = new TH3D("merge3DLabelDiff-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("merge3DLabelDiff-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("merge3DLabelDiff-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h4 = new TH3D("merge3DLabelDiff-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->GetXaxis()->SetBinLabel(2, "gamma"); h2->GetXaxis()->SetBinLabel(6, "beta"); h3->GetXaxis()->SetBinLabel(4, "alpha"); h4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelDiff3D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf1DLabelDiff() { // Tests the merge with some different labels method for 1D Profiles TProfile* p1 = new TProfile("merge1DLabelDiff-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("merge1DLabelDiff-p2", "p2-Title", numberOfBins, minRange, maxRange); TProfile* p3 = new TProfile("merge1DLabelDiff-p3", "p3-Title", numberOfBins, minRange, maxRange); TProfile* p4 = new TProfile("merge1DLabelDiff-p4", "p4-Title", numberOfBins, minRange, maxRange); // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() p1->GetXaxis()->SetBinLabel(2, "gamma"); p2->GetXaxis()->SetBinLabel(6, "beta"); p3->GetXaxis()->SetBinLabel(4, "alpha"); p4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelDiff1DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf2DLabelDiff() { // Tests the merge with some different labels method for 2D Profiles TProfile2D* p1 = new TProfile2D("merge2DLabelDiff-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("merge2DLabelDiff-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("merge2DLabelDiff-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p4 = new TProfile2D("merge2DLabelDiff-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() p1->GetXaxis()->SetBinLabel(2, "gamma"); p2->GetXaxis()->SetBinLabel(6, "beta"); p3->GetXaxis()->SetBinLabel(4, "alpha"); p4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelDiff2DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf3DLabelDiff() { // Tests the merge with some different labels method for 3D Profiles TProfile3D* p1 = new TProfile3D("merge3DLabelDiff-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("merge3DLabelDiff-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("merge3DLabelDiff-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p4 = new TProfile3D("merge3DLabelDiff-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() p1->GetXaxis()->SetBinLabel(2, "gamma"); p2->GetXaxis()->SetBinLabel(6, "beta"); p3->GetXaxis()->SetBinLabel(4, "alpha"); p4->GetXaxis()->SetBinLabel(4, "alpha"); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelDiff3DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge1DLabelAll() { // Tests the merge method with fully equally labelled 1D Histograms TH1D* h1 = new TH1D("merge1DLabelAll-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("merge1DLabelAll-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("merge1DLabelAll-h3", "h3-Title", numberOfBins, minRange, maxRange); TH1D* h4 = new TH1D("merge1DLabelAll-h4", "h4-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, 1.0); h4->Fill(x, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, 1.0); h4->Fill(x, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, 1.0); h4->Fill(x, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); h1->GetXaxis()->SetBinLabel(i, name.str().c_str()); h2->GetXaxis()->SetBinLabel(i, name.str().c_str()); h3->GetXaxis()->SetBinLabel(i, name.str().c_str()); h4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(h2); list->Add(h3); // test to re-order some histos h1->LabelsOption("a"); h2->LabelsOption("<"); h3->LabelsOption(">"); h1->Merge(list); h4->LabelsOption("a"); bool ret = equals("MergeLabelAll1D", h1, h4, cmpOptNone, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge2DLabelAll() { // Tests the merge method with fully equally labelled 2D Histograms TH2D* h1 = new TH2D("merge2DLabelAll-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("merge2DLabelAll-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("merge2DLabelAll-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h4 = new TH2D("merge2DLabelAll-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); h1->GetXaxis()->SetBinLabel(i, name.str().c_str()); h2->GetXaxis()->SetBinLabel(i, name.str().c_str()); h3->GetXaxis()->SetBinLabel(i, name.str().c_str()); h4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelAll2D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge3DLabelAll() { // Tests the merge method with fully equally labelled 3D Histograms TH3D* h1 = new TH3D("merge3DLabelAll-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("merge3DLabelAll-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("merge3DLabelAll-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h4 = new TH3D("merge3DLabelAll-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); h1->GetXaxis()->SetBinLabel(i, name.str().c_str()); h2->GetXaxis()->SetBinLabel(i, name.str().c_str()); h3->GetXaxis()->SetBinLabel(i, name.str().c_str()); h4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelAll3D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf1DLabelAll() { // Tests the merge method with fully equally labelled 1D Profiles TProfile* p1 = new TProfile("merge1DLabelAll-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("merge1DLabelAll-p2", "p2-Title", numberOfBins, minRange, maxRange); TProfile* p3 = new TProfile("merge1DLabelAll-p3", "p3-Title", numberOfBins, minRange, maxRange); TProfile* p4 = new TProfile("merge1DLabelAll-p4", "p4-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); p1->GetXaxis()->SetBinLabel(i, name.str().c_str()); p2->GetXaxis()->SetBinLabel(i, name.str().c_str()); p3->GetXaxis()->SetBinLabel(i, name.str().c_str()); p4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelAll1DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf2DLabelAll() { // Tests the merge method with fully equally labelled 2D Profiles TProfile2D* p1 = new TProfile2D("merge2DLabelAll-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("merge2DLabelAll-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("merge2DLabelAll-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p4 = new TProfile2D("merge2DLabelAll-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); p1->GetXaxis()->SetBinLabel(i, name.str().c_str()); p2->GetXaxis()->SetBinLabel(i, name.str().c_str()); p3->GetXaxis()->SetBinLabel(i, name.str().c_str()); p4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelAll2DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf3DLabelAll() { // Tests the merge method with fully equally labelled 3D Profiles TProfile3D* p1 = new TProfile3D("merge3DLabelAll-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("merge3DLabelAll-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("merge3DLabelAll-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p4 = new TProfile3D("merge3DLabelAll-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); p1->GetXaxis()->SetBinLabel(i, name.str().c_str()); p2->GetXaxis()->SetBinLabel(i, name.str().c_str()); p3->GetXaxis()->SetBinLabel(i, name.str().c_str()); p4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelAll3DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge1DLabelAllDiff() { //LM: Dec 2010 : rmeake this test as // a test of histogram with some different labels not all filled TH1D* h1 = new TH1D("merge1DLabelAllDiff-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("merge1DLabelAllDiff-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h3 = new TH1D("merge1DLabelAllDiff-h3", "h3-Title", numberOfBins, minRange, maxRange); TH1D* h4 = new TH1D("merge1DLabelAllDiff-h4", "h4-Title", numberOfBins, minRange, maxRange); Int_t ibin = r.Integer(numberOfBins)+1; h1->GetXaxis()->SetBinLabel(ibin,"aaa"); ibin = r.Integer(numberOfBins)+1; h2->GetXaxis()->SetBinLabel(ibin,"bbb"); ibin = r.Integer(numberOfBins)+1; h3->GetXaxis()->SetBinLabel(ibin,"ccc"); for ( Int_t e = 0; e < nEvents ; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, 1.0); h4->Fill(x, 1.0); } for ( Int_t e = 0; e < nEvents ; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, 1.0); h4->Fill(x, 1.0); } for ( Int_t e = 0; e < nEvents ; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, 1.0); h4->Fill(x, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); Int_t prevErrorLevel = gErrorIgnoreLevel; // // to suppress a Warning message // Warning in : Histogram FirstClone contains non-empty bins without labels - // falling back to bin numbering mode gErrorIgnoreLevel = kError; h1->Merge(list); gErrorIgnoreLevel = prevErrorLevel; bool ret = equals("MergeLabelAllDiff1D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge2DLabelAllDiff() { // Tests the merge method with fully differently labelled 2D Histograms // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() TH2D* h1 = new TH2D("merge2DLabelAllDiff-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("merge2DLabelAllDiff-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h3 = new TH2D("merge2DLabelAllDiff-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h4 = new TH2D("merge2DLabelAllDiff-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); h1->GetXaxis()->SetBinLabel(i, name.str().c_str()); h1->GetYaxis()->SetBinLabel(i, name.str().c_str()); name << 1; h2->GetXaxis()->SetBinLabel(i, name.str().c_str()); h2->GetYaxis()->SetBinLabel(i, name.str().c_str()); name << 2; h3->GetXaxis()->SetBinLabel(i, name.str().c_str()); h3->GetYaxis()->SetBinLabel(i, name.str().c_str()); name << 3; h4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelAllDiff2D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge3DLabelAllDiff() { // Tests the merge method with fully differently labelled 3D Histograms // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() TH3D* h1 = new TH3D("merge3DLabelAllDiff-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("merge3DLabelAllDiff-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h3 = new TH3D("merge3DLabelAllDiff-h3", "h3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h4 = new TH3D("merge3DLabelAllDiff-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); h1->GetXaxis()->SetBinLabel(i, name.str().c_str()); h1->GetYaxis()->SetBinLabel(i, name.str().c_str()); h1->GetZaxis()->SetBinLabel(i, name.str().c_str()); name << 1; h2->GetXaxis()->SetBinLabel(i, name.str().c_str()); h2->GetYaxis()->SetBinLabel(i, name.str().c_str()); h2->GetZaxis()->SetBinLabel(i, name.str().c_str()); name << 2; h3->GetXaxis()->SetBinLabel(i, name.str().c_str()); h3->GetYaxis()->SetBinLabel(i, name.str().c_str()); h3->GetZaxis()->SetBinLabel(i, name.str().c_str()); name << 3; h4->GetXaxis()->SetBinLabel(i, name.str().c_str()); h4->GetYaxis()->SetBinLabel(i, name.str().c_str()); h4->GetZaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); bool ret = equals("MergeLabelAllDiff3D", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMergeProf1DLabelAllDiff() { // Tests the merge method with fully differently labelled 1D Profiles TProfile* p1 = new TProfile("merge1DLabelAllDiff-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("merge1DLabelAllDiff-p2", "p2-Title", numberOfBins, minRange, maxRange); TProfile* p3 = new TProfile("merge1DLabelAllDiff-p3", "p3-Title", numberOfBins, minRange, maxRange); TProfile* p4 = new TProfile("merge1DLabelAllDiff-p4", "p4-Title", numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); p1->GetXaxis()->SetBinLabel(i, name.str().c_str()); name << 1; p2->GetXaxis()->SetBinLabel(i, name.str().c_str()); name << 2; p3->GetXaxis()->SetBinLabel(i, name.str().c_str()); name << 3; p4->GetXaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelAllDiff1DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf2DLabelAllDiff() { // Tests the merge method with fully differently labelled 2D Profiles TProfile2D* p1 = new TProfile2D("merge2DLabelAllDiff-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("merge2DLabelAllDiff-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p3 = new TProfile2D("merge2DLabelAllDiff-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p4 = new TProfile2D("merge2DLabelAllDiff-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); p1->GetXaxis()->SetBinLabel(i, name.str().c_str()); p1->GetYaxis()->SetBinLabel(i, name.str().c_str()); name << 1; p2->GetXaxis()->SetBinLabel(i, name.str().c_str()); p2->GetYaxis()->SetBinLabel(i, name.str().c_str()); name << 2; p3->GetXaxis()->SetBinLabel(i, name.str().c_str()); p3->GetYaxis()->SetBinLabel(i, name.str().c_str()); name << 3; p4->GetXaxis()->SetBinLabel(i, name.str().c_str()); p4->GetYaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelAllDiff2DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf3DLabelAllDiff() { // Tests the merge method with fully differently labelled 3D Profiles TProfile3D* p1 = new TProfile3D("merge3DLabelAllDiff-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("merge3DLabelAllDiff-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p3 = new TProfile3D("merge3DLabelAllDiff-p3", "p3-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p4 = new TProfile3D("merge3DLabelAllDiff-p4", "p4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } // It does not work properly! Look, the bins with the same labels // are different ones and still the tests passes! This is not // consistent with TH1::Merge() for ( Int_t i = 1; i <= numberOfBins; ++ i) { ostringstream name; name << (char) ((int) 'a' + i - 1); p1->GetXaxis()->SetBinLabel(i, name.str().c_str()); p1->GetYaxis()->SetBinLabel(i, name.str().c_str()); p1->GetZaxis()->SetBinLabel(i, name.str().c_str()); name << 1; p2->GetXaxis()->SetBinLabel(i, name.str().c_str()); p2->GetYaxis()->SetBinLabel(i, name.str().c_str()); p2->GetZaxis()->SetBinLabel(i, name.str().c_str()); name << 2; p3->GetXaxis()->SetBinLabel(i, name.str().c_str()); p3->GetYaxis()->SetBinLabel(i, name.str().c_str()); p3->GetZaxis()->SetBinLabel(i, name.str().c_str()); name << 3; p4->GetXaxis()->SetBinLabel(i, name.str().c_str()); p4->GetYaxis()->SetBinLabel(i, name.str().c_str()); p4->GetZaxis()->SetBinLabel(i, name.str().c_str()); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeLabelAllDiff3DProf", p1, p4, cmpOptStats, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge1D_Diff(bool testEmpty=false) { // Tests the merge method with different binned 1D Histograms // test also case when the first histogram is empty (bug Savannah 95190) TH1D *h1 = new TH1D("merge1DDiff-h1","h1-Title",100,-100,0); TH1D *h2 = new TH1D("merge1DDiff-h2","h2-Title",200,0,100); TH1D *h3 = new TH1D("merge1DDiff-h3","h3-Title",25,-50,50); // resulting histogram will have the bigger range and the larger bin width // eventually range is extended by half bin width to have correct bin boundaries // of largest bin width histogram TH1D *h4 = new TH1D("merge1DDiff-h4","h4-Title",51,-102,102); h1->Sumw2();h2->Sumw2();h3->Sumw2();h4->Sumw2(); if (!testEmpty) { for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Gaus(-50,10); h1->Fill(value, 1.0); h4->Fill(value, 1.0); } } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Gaus(50,10); h2->Fill(value, 1.0); h4->Fill(value, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Gaus(0,10); h3->Fill(value, 1.0); h4->Fill(value, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); const char * testName = (!testEmpty) ? "Merge1D-Diff" : "Merge1D-DiffEmpty"; bool ret = equals(testName, h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge1DDiff() { return testMerge1D_Diff(false); } bool testMerge1DDiffEmpty() { return testMerge1D_Diff(true); } bool testMerge2D_Diff(bool testEmpty = false) { // Tests the merge method with different binned 2D Histograms //LM. t.b.u.: for 1D can make h3 with 330 bins , while in 2D if I make h3 with 33 bins // routine which check axis fails. Needs to be improved ??? TH2D *h1 = new TH2D("merge2DDiff-h1","h1-Title", 11,-110,0, 11,-110,0); TH2D *h2 = new TH2D("merge2DDiff-h2","h2-Title", 22,0,110, 22,0,110); TH2D *h3 = new TH2D("merge2DDiff-h3","h3-Title", 44,-55,55, 44,-55,55); TH2D *h4 = new TH2D("merge2DDiff-h4","h4-Title", 22,-110,110, 22,-110,110); h1->Sumw2();h2->Sumw2();h3->Sumw2();h4->Sumw2(); if (!testEmpty) { for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Gaus(-55,10); Double_t y = r.Gaus(-55,10); h1->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Gaus(55,10); Double_t y = r.Gaus(55,10); h2->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Gaus(0,10); Double_t y = r.Gaus(0,10); h3->Fill(x, y, 1.0); h4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); const char * testName = (!testEmpty) ? "Merge2D-Diff" : "Merge2D-DiffEmpty"; bool ret = equals(testName, h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge2DDiff() { return testMerge2D_Diff(false); } bool testMerge2DDiffEmpty() { return testMerge2D_Diff(true); } bool testMerge3D_Diff(bool testEmpty = false) { // Tests the merge method with different binned 3D Histograms TH3D *h1 = new TH3D("merge3DDiff-h1","h1-Title", 11,-110,0, 11,-110,0, 11,-110,0); TH3D *h2 = new TH3D("merge3DDiff-h2","h2-Title", 22,0,110, 22,0,110, 22,0,110); TH3D *h3 = new TH3D("merge3DDiff-h3","h3-Title", 44,-55,55, 44,-55,55, 44,-55,55); TH3D *h4 = new TH3D("merge3DDiff-h4","h4-Title", 22,-110,110, 22,-110,110, 22,-110,110); h1->Sumw2();h2->Sumw2();h3->Sumw2();h4->Sumw2(); if (!testEmpty) { for ( Int_t e = 0; e < nEvents ; ++e ) { Double_t x = r.Gaus(-55,10); Double_t y = r.Gaus(-55,10); Double_t z = r.Gaus(-55,10); h1->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } } for ( Int_t e = 0; e < nEvents ; ++e ) { Double_t x = r.Gaus(55,10); Double_t y = r.Gaus(55,10); Double_t z = r.Gaus(55,10); h2->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents ; ++e ) { Double_t x = r.Gaus(0,10); Double_t y = r.Gaus(0,10); Double_t z = r.Gaus(0,10); h3->Fill(x, y, z, 1.0); h4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(h2); list->Add(h3); h1->Merge(list); const char * testName = (!testEmpty) ? "Merge3D-Diff" : "Merge3D-DiffEmpty"; bool ret = equals(testName, h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; delete h3; return ret; } bool testMerge3DDiff() { return testMerge3D_Diff(false); } bool testMerge3DDiffEmpty() { return testMerge3D_Diff(true); } bool testMergeProf1D_Diff(bool testEmpty = false) { // Tests the merge method with different binned 1D Profile // Stats fail, for a reason I do not know :S TProfile *p1 = new TProfile("merge1DDiff-p1","p1-Title",110,-110,0); TProfile *p2 = new TProfile("merge1DDiff-p2","p2-Title",220,0,110); TProfile *p3 = new TProfile("merge1DDiff-p3","p3-Title",330,-55,55); TProfile *p4 = new TProfile("merge1DDiff-p4","p4-Title",220,-110,110); if (!testEmpty) { for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Gaus(-55,10); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Gaus(55,10); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Gaus(0,10); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, 1.0); p4->Fill(x, y, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); const char * testName = (!testEmpty) ? "MergeProf1D-Diff" : "MergeProf1D-DiffEmpty"; bool ret = equals(testName, p1, p4, cmpOptNone , 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMergeProf1DDiff() { return testMergeProf1D_Diff(false); } bool testMergeProf1DDiffEmpty() { return testMergeProf1D_Diff(true); } bool testMergeProf2DDiff() { // Tests the merge method with different binned 2D Profile // This tests fails! It should not! TProfile2D *p1 = new TProfile2D("merge2DDiff-p1","p1-Title", 11,-110,0, 11,-110,0); TProfile2D *p2 = new TProfile2D("merge2DDiff-p2","p2-Title", 22,0,110, 22,0,110); TProfile2D *p3 = new TProfile2D("merge2DDiff-p3","p3-Title", 44,-55,55, 44,-55,55); TProfile2D *p4 = new TProfile2D("merge2DDiff-p4","p4-Title", 22,-110,110, 22,-110,110); for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x = r.Uniform(-110,0); Double_t y = r.Uniform(-110,0); Double_t z = r.Gaus(5, 2); p1->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x = r.Uniform(0,110); Double_t y = r.Uniform(0,110); Double_t z = r.Gaus(10,3); p2->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } for ( Int_t e = 0; e < nEvents*nEvents; ++e ) { Double_t x = r.Uniform(-55,55); Double_t y = r.Uniform(-55,55); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, 1.0); p4->Fill(x, y, z, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); bool ret = equals("MergeDiff2DProf", p1, p4, cmpOptStats, 1E-8); delete p1; delete p2; delete p3; return ret; } bool testMergeProf3DDiff() { // Tests the merge method with different binned 3D Profile // This tests fails! Segmentation Fault!!It should not! TProfile3D *p1 = new TProfile3D("merge3DDiff-p1","p1-Title", 11,-110,0, 11,-110,0, 11,-110,0); TProfile3D *p2 = new TProfile3D("merge3DDiff-p2","p2-Title", 22,0,110, 22,0,110, 22,0,110); TProfile3D *p3 = new TProfile3D("merge3DDiff-p3","p3-Title", 44,-55,55, 44,-55,55, 44,-55,55); TProfile3D *p4 = new TProfile3D("merge3DDiff-p4","p4-Title", 22,-110,110, 22,-110,110, 22,-110,110); for ( Int_t e = 0; e < 10*nEvents; ++e ) { Double_t x = r.Uniform(-110,0); Double_t y = r.Uniform(-110,0); Double_t z = r.Uniform(-110,0); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < 10*nEvents; ++e ) { Double_t x = r.Uniform(0,110); Double_t y = r.Uniform(0,110); Double_t z = r.Uniform(0,110); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } for ( Int_t e = 0; e < 10*nEvents; ++e ) { Double_t x = r.Uniform(-55,55); Double_t y = r.Uniform(-55,55); Double_t z = r.Uniform(-55,55); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p3->Fill(x, y, z, t, 1.0); p4->Fill(x, y, z, t, 1.0); } TList *list = new TList; list->Add(p2); list->Add(p3); p1->Merge(list); // exclude statistics in comparison since chi2 test will fail with low // bin statistics bool ret = equals("MergeDiff3DProf", p1, p4, cmpOptNone, 1E-10); delete p1; delete p2; delete p3; return ret; } bool testMerge1DRebin() { // Tests the merge method for diferent 1D Histograms // when axis can rebin (e.g. for time histograms) TH1D* h1 = new TH1D("merge1D-h1", "h1-Title", numberOfBins, minRange, maxRange); TH1D* h2 = new TH1D("merge1D-h2", "h2-Title", numberOfBins, minRange, maxRange); TH1D* h4 = new TH1D("merge1D-h4", "h4-Title", numberOfBins, minRange, maxRange); h1->Sumw2();h2->Sumw2();h4->Sumw2(); h1->SetCanExtend(TH1::kAllAxes); h2->SetCanExtend(TH1::kAllAxes); h4->SetCanExtend(TH1::kAllAxes); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform( minRange, maxRange); h1->Fill(value,1.); h4->Fill(value,1.); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9*maxRange, 2.1 * maxRange); h2->Fill(value,1.); h4->Fill(value,1.); } TList *list = new TList; list->Add(h2); h1->Merge(list); bool ret = equals("Merge1DRebin", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; return ret; } bool testMerge2DRebin() { // Tests the merge method for diferent 1D Histograms // when axis can rebin (e.g. for time histograms) TH2D* h1 = new TH2D("merge2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h2 = new TH2D("merge2D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH2D* h4 = new TH2D("merge2D-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->Sumw2();h2->Sumw2();h4->Sumw2(); h1->SetCanExtend(TH1::kAllAxes); h2->SetCanExtend(TH1::kAllAxes); h4->SetCanExtend(TH1::kAllAxes); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform( minRange, maxRange); Double_t y = r.Uniform( minRange, maxRange); h1->Fill(x,y,1.); h4->Fill(x,y,1.); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9*maxRange, 2.1 * maxRange); Double_t y = r.Uniform(0.8*maxRange, 3. * maxRange); h2->Fill(x,y,1.); h4->Fill(x,y,1.); } TList *list = new TList; list->Add(h2); h1->Merge(list); bool ret = equals("Merge2DRebin", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; return ret; } bool testMerge3DRebin() { // Tests the merge method for diferent 1D Histograms // when axis can rebin (e.g. for time histograms) TH3D* h1 = new TH3D("merge3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h2 = new TH3D("merge3D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TH3D* h4 = new TH3D("merge3D-h4", "h4-Title", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); h1->SetCanExtend(TH1::kAllAxes); h2->SetCanExtend(TH1::kAllAxes); h4->SetCanExtend(TH1::kAllAxes); for ( Int_t e = 0; e < 10*nEvents; ++e ) { Double_t x = r.Uniform( minRange, maxRange); Double_t y = r.Uniform( minRange, 1.1*maxRange); Double_t z = r.Uniform( minRange, 1.1*maxRange); h1->Fill(x,y,z,1.); h4->Fill(x,y,z,1.); } for ( Int_t e = 0; e < 10*nEvents; ++e ) { Double_t x = r.Uniform(0.9*maxRange, 2.1 * maxRange); Double_t y = r.Uniform(maxRange, 3 * maxRange); Double_t z = r.Uniform(0.8*maxRange, 4.1 * maxRange); h2->Fill(x,y,z,1.); h4->Fill(x,y,z,1.); } TList *list = new TList; list->Add(h2); h1->Merge(list); bool ret = equals("Merge3DRebin", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; return ret; } bool testMerge1DRebinProf() { // Tests the merge method for diferent 1D Histograms // when axis can rebin (e.g. for time histograms) TProfile* h1 = new TProfile("merge1D-p1", "h1-Title", numberOfBins, minRange, maxRange); TProfile* h2 = new TProfile("merge1D-p2", "h2-Title", numberOfBins, minRange, maxRange); TProfile* h4 = new TProfile("merge1D-p4", "h4-Title", numberOfBins, minRange, maxRange); h1->SetCanExtend(TH1::kAllAxes); h2->SetCanExtend(TH1::kAllAxes); h4->SetCanExtend(TH1::kAllAxes); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform( minRange, maxRange); double t = r.Gaus(std::sin(value),0.5); h1->Fill(value,t); h4->Fill(value,t); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9*maxRange, 2.1 * maxRange); double t = r.Gaus(std::sin(value),0.5); h2->Fill(value,t); h4->Fill(value,t); } TList *list = new TList; list->Add(h2); h1->Merge(list); bool ret = equals("Merge1DRebinProf", h1, h4, cmpOptStats, 1E-10); delete h1; delete h2; return ret; } bool testMerge1DWithBuffer(bool allNoLimits) { // Tests the merge method for different 1D Histograms // where different axis are used, BUT the largest bin width must be // a multiple of the smallest bin width double x1 = 1; double x2 = 0; if (!allNoLimits) { // case when one of the histogram has limits (mix mode) x1 = minRange; x2 = maxRange; } TH1D* h0 = new TH1D("merge1D-h0", "h1-Title", numberOfBins, 1, 0); TH1D* h1 = new TH1D("merge1D-h1", "h1-Title", numberOfBins, x1, x2); TH1D* h2 = new TH1D("merge1D-h2", "h2-Title", 1,1,0); TH1D* h3 = new TH1D("merge1D-h3", "h3-Title", 1,1,0); TH1D* h4 = new TH1D("merge1D-h4", "h4-Title", numberOfBins, x1,x2); h0->Sumw2(); h1->Sumw2();h2->Sumw2();h4->Sumw2(); h1->SetBuffer(nEvents*10); h2->SetBuffer(nEvents*10); h3->SetBuffer(nEvents*10); h4->SetBuffer(nEvents*10); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform( minRange, maxRange); Double_t weight = std::exp(r.Gaus(0,1)); h1->Fill(value,weight); h4->Fill(value,weight); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform( (maxRange-minRange)/2, maxRange); Double_t weight = std::exp(r.Gaus(0,1)); h2->Fill(value,weight); h4->Fill(value,weight); } for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(minRange, (maxRange-minRange)/2); Double_t weight = std::exp(r.Gaus(0,1)); h3->Fill(value,weight); h4->Fill(value,weight); } TList *list = new TList; list->Add(h1); list->Add(h2); list->Add(h3); h0->Merge(list); // flush buffer before comparing h0->BufferEmpty(); h4->BufferEmpty(); const char * testName = (allNoLimits) ? "Merge1DNoLimits" : "Merge1DMixedLimits"; bool ret = equals(testName, h0, h4, cmpOptStats, 1E-10); delete h0; delete h1; delete h2; delete h3; return ret; } bool testMerge1DNoLimits() { return testMerge1DWithBuffer(true); } bool testMerge1DMixedLimits() { return testMerge1DWithBuffer(false); } bool testLabel() { // Tests labelling a 1D Histogram TH1D* h1 = new TH1D("lD1-h1", "h1-Title", 2*numberOfBins, minRange, maxRange); // build histo with extra labels to tets the deflate option int extraBins = 20; TH1D* h2 = new TH1D("lD1-h2", "h2-Title", 2*numberOfBins+20, minRange, maxRange + extraBins*h1->GetXaxis()->GetBinWidth(1)); // set labels std::vector vLabels; for ( Int_t bin = 1; bin <= h1->GetNbinsX() ; ++bin ) { ostringstream label; label << bin; vLabels.push_back(label.str()); h2->GetXaxis()->SetBinLabel(bin, label.str().c_str()); } // sort labels in alphabetic order std::sort(vLabels.begin(), vLabels.end() ); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(minRange, maxRange); Int_t bin = h1->GetXaxis()->FindBin(value); h1->Fill(h1->GetXaxis()->GetBinCenter(bin), 1.0); h2->Fill(vLabels[bin-1].c_str(), 1.0); } h2->LabelsOption("a"); h2->LabelsDeflate(); bool status = equals("Fill(char*)", h1, h2, cmpOptStats, 1E-13); delete h1; return status; } bool testLabel2DX() { // Tests labelling a 1D Histogram TH2D* h1 = new TH2D("lD2-h1", "h1-Title", 2*numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); // build histo with extra labels to tets the deflate option TH2D* h2 = new TH2D("lD2-h2", "h2-Title", 2*numberOfBins+20, minRange, maxRange + 20*h1->GetXaxis()->GetBinWidth(1), numberOfBins, minRange, maxRange); // set labels std::vector vLabels; for ( Int_t bin = 1; bin <= h1->GetNbinsX() ; ++bin ) { ostringstream label; label << bin; vLabels.push_back(label.str()); h2->GetXaxis()->SetBinLabel(bin, label.str().c_str()); } // sort labels in alphabetic order std::sort(vLabels.begin(), vLabels.end() ); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t xvalue = r.Uniform(minRange, maxRange); Double_t yvalue = r.Uniform(minRange, maxRange); Int_t binx = h1->GetXaxis()->FindBin(xvalue); Int_t biny = h1->GetYaxis()->FindBin(yvalue); h1->Fill(h1->GetXaxis()->GetBinCenter(binx), h1->GetYaxis()->GetBinCenter(biny), 1.0); h2->Fill( vLabels[binx-1].c_str(), h1->GetYaxis()->GetBinCenter(biny), 1.0); } h2->LabelsOption("a"); h2->LabelsDeflate(); bool status = equals("Fill(char*)", h1, h2, cmpOptStats, 1E-13); delete h1; return status; } bool testLabel2DY() { // Tests labelling a 1D Histogram TH2D* h1 = new TH2D("lD2-h1", "h1-Title", numberOfBins, minRange, maxRange, 2*numberOfBins, minRange, maxRange); // build histo with extra labels to tets the deflate option TH2D* h2 = new TH2D("lD2-h2", "h2-Title", numberOfBins, minRange, maxRange, 2*numberOfBins+20, minRange, maxRange + 20*h1->GetYaxis()->GetBinWidth(1)); // set labels std::vector vLabels; for ( Int_t bin = 1; bin <= h1->GetNbinsY() ; ++bin ) { ostringstream label; label << bin; vLabels.push_back(label.str()); h2->GetYaxis()->SetBinLabel(bin, label.str().c_str()); } // sort labels in alphabetic order std::sort(vLabels.begin(), vLabels.end() ); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t xvalue = r.Uniform(minRange, maxRange); Double_t yvalue = r.Uniform(minRange, maxRange); Int_t binx = h1->GetXaxis()->FindBin(xvalue); Int_t biny = h1->GetYaxis()->FindBin(yvalue); h1->Fill(h1->GetXaxis()->GetBinCenter(binx), h1->GetYaxis()->GetBinCenter(biny), 1.0); h2->Fill( h1->GetXaxis()->GetBinCenter(binx), vLabels[biny-1].c_str(), 1.0); } h2->GetYaxis()->LabelsOption("a"); h2->LabelsDeflate("Y"); bool status = equals("Fill(char*)", h1, h2, cmpOptStats, 1E-13); delete h1; return status; } bool testLabelsInflateProf1D() { // Tests labelling a 1D Profile Int_t numberOfInflates=4; Int_t numberOfFills = numberOfBins; Double_t maxRangeInflate = maxRange; for ( Int_t i = 0; i < numberOfInflates; ++i ) { numberOfFills *= 2; maxRangeInflate = 2*maxRangeInflate - 1; } TProfile* p1 = new TProfile("tLI1D-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("tLI1D-p2", "p2-Title", numberOfFills, minRange, maxRangeInflate); p1->GetXaxis()->SetTimeDisplay(1); for ( Int_t e = 0; e < numberOfFills; ++e ) { Double_t x = e; Double_t y = sin(x/10); p1->SetBinContent(int(x+0.5)+1, y ); p1->SetBinEntries(int(x+0.5)+1, 10.0); p2->SetBinContent(int(x+0.5)+1, y ); p2->SetBinEntries(int(x+0.5)+1, 10.0); } bool ret = equals("LabelsInflateProf1D", p1, p2); delete p1; return ret; } Double_t function1D(Double_t x) { Double_t a = -1.8; return a * x; } bool testInterpolation1D() { // Tests interpolation method for 1D Histogram bool status = false; TH1D* h1 = new TH1D("h1", "h1", numberOfBins, minRange, maxRange); h1->Reset(); for ( Int_t nbinsx = 1; nbinsx <= h1->GetXaxis()->GetNbins(); ++nbinsx ) { Double_t x = h1->GetXaxis()->GetBinCenter(nbinsx); h1->Fill(x, function1D(x)); } int itest = 0; for (itest = 0; itest < 1000; ++itest) { double xp = r.Uniform( h1->GetXaxis()->GetBinCenter(1), h1->GetXaxis()->GetBinCenter(numberOfBins) ); double ip = h1->Interpolate(xp); if ( fabs(ip - function1D(xp) ) > 1.E-13*fabs(ip) ) { status = true; std::cout << "x: " << xp << " h3->Inter: " << ip << " functionD: " << function1D(xp) << " diff: " << fabs(ip - function1D(xp)) << std::endl; } } delete h1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testInterpolation1D: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testInterpolationVar1D() { // Tests interpolation method for 1D Histogram with variable bin size Double_t v[numberOfBins+1]; FillVariableRange(v); bool status = false; TH1D* h1 = new TH1D("h1", "h1", numberOfBins, v); h1->Reset(); for ( Int_t nbinsx = 1; nbinsx <= h1->GetXaxis()->GetNbins(); ++nbinsx ) { Double_t x = h1->GetXaxis()->GetBinCenter(nbinsx); h1->Fill(x, function1D(x)); } int itest = 0; for (itest = 0; itest < 1000; ++itest) { double xp = r.Uniform( h1->GetXaxis()->GetBinCenter(1), h1->GetXaxis()->GetBinCenter(numberOfBins) ); double ip = h1->Interpolate(xp); if ( fabs(ip - function1D(xp) ) > 1.E-13*fabs(ip) ) { status = true; std::cout << "x: " << xp << " h3->Inter: " << ip << " functionD: " << function1D(xp) << " diff: " << fabs(ip - function1D(xp)) << std::endl; } } delete h1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testInterpolaVar1D: \t" << (status?"FAILED":"OK") << std::endl; return status; } Double_t function2D(Double_t x, Double_t y) { Double_t a = -2.1; Double_t b = 0.6; return a * x + b * y; } bool testInterpolation2D() { // Tests interpolation method for 2D Histogram bool status = false; TH2D* h1 = new TH2D("h1", "h1", numberOfBins, minRange, maxRange, 2*numberOfBins, minRange, maxRange); h1->Reset(); for ( Int_t nbinsx = 1; nbinsx <= h1->GetXaxis()->GetNbins(); ++nbinsx ) for ( Int_t nbinsy = 1; nbinsy <= h1->GetYaxis()->GetNbins(); ++nbinsy ) { Double_t x = h1->GetXaxis()->GetBinCenter(nbinsx); Double_t y = h1->GetYaxis()->GetBinCenter(nbinsy); h1->Fill(x, y, function2D(x, y)); } int itest = 0; for (itest = 0; itest < 1000; ++itest) { double xp = r.Uniform( h1->GetXaxis()->GetBinCenter(1), h1->GetXaxis()->GetBinCenter(numberOfBins) ); double yp = r.Uniform( h1->GetYaxis()->GetBinCenter(1), h1->GetYaxis()->GetBinCenter(numberOfBins) ); double ip = h1->Interpolate(xp, yp); if ( fabs(ip - function2D(xp, yp) ) > 1.E-13*fabs(ip) ) { status = true; std::cout << "x: " << xp << " y: " << yp << " h3->Inter: " << ip << " function: " << function2D(xp, yp) << " diff: " << fabs(ip - function2D(xp, yp)) << std::endl; } } delete h1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testInterpolation2D: \t" << (status?"FAILED":"OK") << std::endl; return status; } Double_t function3D(Double_t x, Double_t y, Double_t z) { Double_t a = 0.3; Double_t b = 6; Double_t c = -2; return a * x + b * y + c * z; } bool testInterpolation3D() { // Tests interpolation method for 3D Histogram bool status = false; TH3D* h1 = new TH3D("h1", "h1", numberOfBins, minRange, maxRange, 2*numberOfBins, minRange, maxRange, 4*numberOfBins, minRange, maxRange); h1->Reset(); for ( Int_t nbinsx = 1; nbinsx <= h1->GetXaxis()->GetNbins(); ++nbinsx ) for ( Int_t nbinsy = 1; nbinsy <= h1->GetYaxis()->GetNbins(); ++nbinsy ) for ( Int_t nbinsz = 1; nbinsz <= h1->GetZaxis()->GetNbins(); ++nbinsz ) { Double_t x = h1->GetXaxis()->GetBinCenter(nbinsx); Double_t y = h1->GetYaxis()->GetBinCenter(nbinsy); Double_t z = h1->GetZaxis()->GetBinCenter(nbinsz); h1->Fill(x, y, z, function3D(x, y, z)); } int itest = 0; for (itest = 0; itest < 1000; ++itest) { double xp = r.Uniform( h1->GetXaxis()->GetBinCenter(1), h1->GetXaxis()->GetBinCenter(numberOfBins) ); double yp = r.Uniform( h1->GetYaxis()->GetBinCenter(1), h1->GetYaxis()->GetBinCenter(numberOfBins) ); double zp = r.Uniform( h1->GetZaxis()->GetBinCenter(1), h1->GetZaxis()->GetBinCenter(numberOfBins) ); double ip = h1->Interpolate(xp, yp, zp); if ( fabs(ip - function3D(xp, yp, zp) ) > 1.E-15*fabs(ip) ) status = true; } delete h1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testInterpolation3D: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testScale1DProf() { TProfile* p1 = new TProfile("scD1-p1", "p1-Title", numberOfBins, minRange, maxRange); TProfile* p2 = new TProfile("scD1-p2", "p2=c1*p1", numberOfBins, minRange, maxRange); Double_t c1 = r.Rndm(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); p2->Fill(x, c1 * y, 1.0); } p1->Scale(c1); int status = equals("testScale Prof 1D", p1, p2, cmpOptStats); delete p1; return status; } bool testScale2DProf() { TProfile2D* p1 = new TProfile2D("scD2-p1", "p1", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile2D* p2 = new TProfile2D("scD2-p2", "p2=c1*p1", numberOfBins, minRange, maxRange, numberOfBins + 2, minRange, maxRange); Double_t c1 = r.Rndm(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z , 1.0); p2->Fill(x, y, c1 * z, 1.0); } p1->Scale(c1); int status = equals("testScale Prof 2D", p1, p2, cmpOptStats); delete p1; return status; } bool testScale3DProf() { TProfile3D* p1 = new TProfile3D("scD3-p1", "p1", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); TProfile3D* p2 = new TProfile3D("scD3-p2", "p2=c1*p1", numberOfBins, minRange, maxRange, numberOfBins + 1, minRange, maxRange, numberOfBins + 2, minRange, maxRange); Double_t c1 = r.Rndm(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t , 1.0); p2->Fill(x, y, z, c1 * t, 1.0); } p1->Scale(c1); int status = equals("testScale Prof 3D", p1, p2, cmpOptStats); delete p1; return status; } bool normGaussfunc = true; double gaus1d(const double *x, const double * p) { return p[0] * TMath::Gaus( x[0], p[1], p[2], normGaussfunc); } double gaus2d(const double *x, const double * p) { return p[0] * TMath::Gaus( x[0], p[1], p[2], normGaussfunc ) * TMath::Gaus( x[1], p[3], p[4], normGaussfunc ); } double gaus3d(const double *x, const double * p) { return p[0] * TMath::Gaus( x[0], p[1], p[2], normGaussfunc ) * TMath::Gaus( x[1], p[3], p[4], normGaussfunc ) * TMath::Gaus( x[2], p[5], p[6], normGaussfunc ); } bool testH1Integral() { int i1 = 1; int i2 = 100; int n = 10000; TH1D * h1 = new TH1D("h1","h1",100,-5,5); TF1 * gaus = new TF1("gaus1d",gaus1d,-5,5,3); gaus->SetParameters(1,0,1); h1->FillRandom("gaus1d",n); TString fitOpt = "LQ0"; if ( defaultEqualOptions & cmpOptDebug ) fitOpt = "L0"; h1->Fit(gaus, fitOpt); // test first nentries double err = 0; double nent = h1->IntegralAndError(0, -1, err); int iret = 0; iret |= (nent != h1->GetEntries() ); double err1 = 0; double igh = h1->IntegralAndError(i1,i2,err1,"width"); double x1 = h1->GetXaxis()->GetBinLowEdge(i1); double x2 = h1->GetXaxis()->GetBinUpEdge(i2); double igf = gaus->Integral(x1,x2); double err2 = gaus->IntegralError(x1,x2); double delta = fabs( igh - igf)/ err2; if ( defaultEqualOptions & cmpOptDebug ) { std::cout << "Estimated entries = " << nent << " +/- " << err << std::endl; std::cout << "Histogram integral = " << igh << " +/- " << err1 << std::endl; std::cout << "Function integral = " << igf << " +/- " << err2 << std::endl; std::cout << " Difference (histogram - function) in nsigma = " << delta << std::endl; } iret |= (delta > 3); if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Integral H1:\t" << (iret?"FAILED":"OK") << std::endl; delete h1; return iret; } bool testH2Integral() { int ix1 = 1; int ix2 = 50; int iy1 = 1; int iy2 = 50; int n = 10000; TH2D * h2 = new TH2D("h2","h2",50,-5,5, 50, -5, 5); TF2 * gaus = new TF2("gaus2d",gaus2d,-5,5,-5,5,5); gaus->SetParameters(100,0,1.2,1.,1); h2->FillRandom("gaus2d",n); TString fitOpt = "LQ0"; if ( defaultEqualOptions & cmpOptDebug ) fitOpt = "L0"; h2->Fit(gaus,fitOpt); // test first nentries double err = 0; double nent = h2->IntegralAndError(0,-1, 0, -1, err); int iret = 0; iret |= (nent != h2->GetEntries() ); double err1 = 0; double igh = h2->IntegralAndError(ix1,ix2, iy1, iy2, err1,"width"); double x1 = h2->GetXaxis()->GetBinLowEdge(ix1); double x2 = h2->GetXaxis()->GetBinUpEdge(ix2); double y1 = h2->GetYaxis()->GetBinLowEdge(iy1); double y2 = h2->GetYaxis()->GetBinUpEdge(iy2); double a[2]; double b[2]; a[0] = x1; a[1] = y1; b[0] = x2; b[1] = y2; //double igf = gaus->Integral(x1,x2,y1,y2,1.E-4); double relerr = 0; double igf = gaus->IntegralMultiple(2, a, b, 1.E-4, relerr); // don't need high tolerance (use 10-4) double err2 = gaus->IntegralError(2,a,b); double delta = fabs( igh - igf)/ err1; if ( defaultEqualOptions & cmpOptDebug ) { std::cout << "Estimated entries = " << nent << " +/- " << err << std::endl; std::cout << "Histogram integral = " << igh << " +/- " << err1 << std::endl; std::cout << "Function integral = " << igf << " +/- " << err2 << " +/- " << igf*relerr << std::endl; std::cout << " Difference (histogram - function) in nsigma = " << delta << std::endl; } iret |= (delta > 3); if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Integral H2:\t" << (iret?"FAILED":"OK") << std::endl; delete h2; return iret; } bool testH3Integral() { int ix1 = 1; int ix2 = 50; int iy1= 1; int iy2 = 50; int iz1 = 1; int iz2 = 50; TStopwatch w; int n = 1000000; TH3D * h3 = new TH3D("h3","h3",50,-5,5, 50, -5, 5, 50, -5, 5); //TF3 * gaus = new TF3("gaus3d",gaus3d,-5,5,-5,5,-5,5,7); TF3 * gaus = new TF3("gaus3d",gaus3d,-5,5,-5,5,-5,5,7); gaus->SetParameters(100,0,1.3,1.,1.,-1,0.9); w.Start(); h3->FillRandom("gaus3d",n); //gaus->SetParameter(0, h3->GetMaximum() ); TString fitOpt = "LQ0"; w.Stop(); if ( defaultEqualOptions & cmpOptDebug ) { std::cout << "Time to fill random " << w.RealTime() << std::endl; fitOpt = "L0"; } w.Start(); h3->Fit(gaus,fitOpt); if ( defaultEqualOptions & cmpOptDebug ) std::cout << "Time to fit " << w.RealTime() << std::endl; // test first nentries double err = 0; w.Start(); double nent = h3->IntegralAndError(0, -1, 0, -1, 0, -1, err); w.Stop(); if ( defaultEqualOptions & cmpOptDebug ) { std::cout << "Estimated entries = " << nent << " +/- " << err << std::endl; std::cout << "Time to integral of all " << w.RealTime() << std::endl; } int iret = 0; iret |= (nent != h3->GetEntries() ); double err1 = 0; w.Start(); double igh = h3->IntegralAndError(ix1,ix2, iy1, iy2, iz1, iz2, err1,"width"); w.Stop(); if ( defaultEqualOptions & cmpOptDebug ) std::cout << "Time to integral of selected " << w.RealTime() << std::endl; double x1 = h3->GetXaxis()->GetBinLowEdge(ix1); double x2 = h3->GetXaxis()->GetBinUpEdge(ix2); double y1 = h3->GetYaxis()->GetBinLowEdge(iy1); double y2 = h3->GetYaxis()->GetBinUpEdge(iy2); double z1 = h3->GetZaxis()->GetBinLowEdge(iz1); double z2 = h3->GetZaxis()->GetBinUpEdge(iz2); double a[3]; double b[3]; a[0] = x1; a[1] = y1; a[2] = z1; b[0] = x2; b[1] = y2; b[2] = z2; w.Start(); double relerr = 0; double igf = gaus->IntegralMultiple(3, a, b, 1.E-4, relerr); // don't need high tolerance (use 10-4) //double igf = gaus->Integral(x1,x2,y1,y2,z1,z2,1.E-4); // don't need high tolerance double err2 = gaus->IntegralError(3,a,b); w.Stop(); double delta = fabs( igh - igf)/ err1; if ( defaultEqualOptions & cmpOptDebug ) { std::cout << "Time to function integral " << w.RealTime() << std::endl; std::cout << "Histogram integral = " << igh << " +/- " << err1 << std::endl; std::cout << "Function integral = " << igf << " +/- " << err2 << " +/- " << igf*relerr << std::endl; std::cout << " Difference (histogram - function) in nsigma = " << delta << std::endl; } iret |= (delta > 3); if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Integral H3:\t" << (iret?"FAILED":"OK") << std::endl; delete h3; return iret; } // test histogram buffer bool testH1Buffer() { int iret = 0; TH1D * h1 = new TH1D("h1","h1",30,-3,3); TH1D * h2 = new TH1D("h2","h2",30,-3,3); // this activate the buffer for the histogram h1->SetBuffer(1000); // fill the histograms int nevt = 800; double x = 0; for (int i = 0; i < nevt ; ++i) { x = gRandom->Gaus(0,1); h1->Fill(x); h2->Fill(x); } //h2->BufferEmpty(); // empty buffer for h2 int pr = std::cout.precision(15); double eps = TMath::Limits::Epsilon(); bool itest = false; // now test that functions are consistent //itest = (h1->GetMean() != h2->GetMean() ); itest = equals(h1->GetMean(),h2->GetMean(),eps ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram Mean = " << h1->GetMean() << " " << h2->GetMean() << " - " << itest << std::endl; } iret |= itest; double s1[TH1::kNstat]; double s2[TH1::kNstat]; h1->GetStats(s1); h2->GetStats(s2); std::vector snames = {"sumw","sumw2","sumwx","sumwx2"}; for (unsigned int i =0; i < snames.size(); ++i) { itest = equals(s1[i],s2[i],eps ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Statistics " << snames[i] << " = " << s1[i] << " " << s2[i] << " - " << itest << std::endl; } iret |= itest; } // another fill will reset the histogram x = gRandom->Uniform(-3,3); h1->Fill(x); h2->Fill(x); //h2->BufferEmpty(); itest = (h1->Integral() != h2->Integral() || h1->Integral() != h1->GetSumOfWeights()); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram Integral = " << h1->Integral() << " " << h2->Integral() << " s.o.w. = " << h1->GetSumOfWeights() << " - " << itest << std::endl; } x = gRandom->Uniform(-3,3); h1->Fill(x); h2->Fill(x); //h2->BufferEmpty(); itest |= (h1->GetMaximum() != h2->GetMaximum() ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram maximum = " << h1->GetMaximum() << " " << h2->GetMaximum() << " - " << itest << std::endl; } iret |= itest; x = gRandom->Uniform(-3,3); h1->Fill(x); h2->Fill(x); //h2->BufferEmpty(); itest = (h1->GetMinimum() != h2->GetMinimum() ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram minimum = " << h1->GetMinimum() << " " << h2->GetMinimum() << " - " << itest << std::endl; } iret |= itest; x = gRandom->Uniform(-3,3); h1->Fill(x); h2->Fill(x); //h2->BufferEmpty(); int i1 = h1->FindFirstBinAbove(10); int i2 = h2->FindFirstBinAbove(10); itest = (i1 != i2 ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram first bin above " << i1 << " " << i2 << " - " << itest << std::endl; } iret |= itest; x = gRandom->Uniform(-3,3); h1->Fill(x); h2->Fill(x); h2->BufferEmpty(); i1 = h1->FindLastBinAbove(10); i2 = h2->FindLastBinAbove(10); itest = (i1 != i2 ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram last bin above " << i1 << " " << i2 << " - " << itest << std::endl; } iret |= itest; x = gRandom->Uniform(-3,3); h1->Fill(x); h2->Fill(x); h2->BufferEmpty(); double v1 = h1->Interpolate(0.1); double v2 = h2->Interpolate(0.1); itest = equals(v1,v2,eps); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram interpolated value " << v1 << " " << v2 << " - " << itest << std::endl; } iret |= itest; iret |= equals("testh1buffer",h1,h2,cmpOptStats,eps); std::cout.precision(pr); if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Buffer H1:\t" << (iret?"FAILED":"OK") << std::endl; delete h1; return iret; } // test histogram buffer with weights bool testH1BufferWeights() { int iret = 0; TH1D * h1 = new TH1D("h1","h1",30,-5,5); TH1D * h2 = new TH1D("h2","h2",30,-5,5); // set the buffer h1->SetBuffer(1000); // fill the histograms int nevt = 800; double x,w = 0; for (int i = 0; i < nevt ; ++i) { x = gRandom->Gaus(0,1); w = gRandom->Gaus(1,0.1); h1->Fill(x,w); h2->Fill(x,w); } int pr = std::cout.precision(15); double eps = TMath::Limits::Epsilon(); // Adjust the threshold on ARM64 bits. On this RISC architecture, // there is a difference when incrementing the sumwx with variables // saved in memory (in the histogram buffer) and passed as function // arguments (Fill(x,w)). #ifdef __aarch64__ eps*=28; #endif bool itest = false; double s1[TH1::kNstat]; double s2[TH1::kNstat]; h1->GetStats(s1); h2->GetStats(s2); std::vector snames = {"sumw","sumw2","sumwx","sumwx2"}; for (unsigned int i =0; i < snames.size(); ++i) { itest = equals(s1[i],s2[i],eps ); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Statistics " << snames[i] << " = " << s1[i] << " " << s2[i] << " - " << itest << std::endl; } iret |= itest; } // another fill will reset the histogram x = gRandom->Uniform(-3,3); w = 2; h1->Fill(x,w); h2->Fill(x,w); itest = (h1->Integral() != h2->Integral() || h1->Integral() != h1->GetSumOfWeights()); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram Integral = " << h1->Integral() << " " << h2->Integral() << " s.o.w. = " << h1->GetSumOfWeights() << " - " << itest << std::endl; } iret |= itest; iret |= equals("testh1bufferweight",h1,h2,cmpOptStats,eps); std::cout.precision(pr); delete h1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Buffer Weighted H1:\t" << (iret?"FAILED":"OK") << std::endl; return iret; } bool testH2Buffer() { int iret = 0; TH2D * h1 = new TH2D("h1","h1",10,-5,5,10,-5,5); TH2D * h2 = new TH2D("h2","h2",10,-5,5,10,-5,5); // set the buffer h1->SetBuffer(1000); // fill the histograms int nevt = 800; double x,y = 0; for (int i = 0; i < nevt ; ++i) { x = gRandom->Gaus(0,2); y = gRandom->Gaus(1,3); h1->Fill(x,y); h2->Fill(x,y); } bool itest = (h1->Integral() != h2->Integral() || h1->Integral() != h1->GetSumOfWeights()); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram Integral = " << h1->Integral() << " " << h2->Integral() << " s.o.w. = " << h1->GetSumOfWeights() << " - " << itest << std::endl; } iret |= itest; // test adding an extra fill x = gRandom->Uniform(-3,3); y = gRandom->Uniform(-3,3); double w = 2; h1->Fill(x,y,w); h2->Fill(x,y,w); iret |= equals("testh2buffer",h1,h2,cmpOptStats,1.E-15); if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Buffer H2:\t" << (iret?"FAILED":"OK") << std::endl; delete h1; return iret; } bool testH3Buffer() { int iret = 0; TH3D * h1 = new TH3D("h1","h1",4,-5,5,4,-5,5,4,-5,5); TH3D * h2 = new TH3D("h2","h2",4,-5,5,4,-5,5,4,-5,5); // set the buffer h1->SetBuffer(10000); // fill the histograms int nevt = 8000; double x,y,z = 0; for (int i = 0; i < nevt ; ++i) { x = gRandom->Gaus(0,2); y = gRandom->Gaus(1,3); z = gRandom->Uniform(-5,5); h1->Fill(x,y,z); h2->Fill(x,y,z); } bool itest = (h1->Integral() != h2->Integral() || h1->Integral() != h1->GetSumOfWeights()); if (defaultEqualOptions & cmpOptDebug ) { std::cout << "Histogram Integral = " << h1->Integral() << " " << h2->Integral() << " s.o.w. = " << h1->GetSumOfWeights() << " - " << itest << std::endl; } iret |= itest; // test adding extra fills with weights for (int i = 0; i < nevt ; ++i) { x = gRandom->Uniform(-3,3); y = gRandom->Uniform(-3,3); z = gRandom->Uniform(-5,5); double w = 2; h1->Fill(x,y,z,w); h2->Fill(x,y,z,w); } iret |= equals("testh2buffer",h1,h2,cmpOptStats,1.E-15); if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Buffer H3:\t" << (iret?"FAILED":"OK") << std::endl; delete h1; return iret; } bool testH1Extend() { TH1D * h1 = new TH1D("h1","h1",10,0,10); TH1D * h0 = new TH1D("h0","h0",10,0,20); h1->SetCanExtend(TH1::kXaxis); for (int i = 0; i < nEvents; ++i) { double x = gRandom->Gaus(10,3); if (x <= 0 || x >= 20) continue; // do not want overflow in h0 h1->Fill(x); h0->Fill(x); } bool ret = equals("testh1extend", h1, h0, cmpOptStats, 1E-10); delete h1; return ret; } bool testH2Extend() { TRandom2 r; // sometime test fails is using gRandom t.b.i. TH2D * h1 = new TH2D("h1","h1",10,0,10,10,0,10); TH2D * h2 = new TH2D("h2","h0",10,0,10,10,0,20); h1->SetCanExtend(TH1::kYaxis); for (int i = 0; i < nEvents; ++i) { double x = r.Uniform(-1,11); double y = r.Gaus(10,3); if (y <= 0 || y >= 20) continue; // do not want overflow in h0 h1->Fill(x,y); h2->Fill(x,y); } bool ret = equals("testh2extend", h1, h2, cmpOptStats, 1E-10); delete h1; return ret; } bool testProfileExtend() { TProfile::Approximate(true); TProfile * h1 = new TProfile("h1","h1",10,0,10); TProfile * h0 = new TProfile("h0","h0",10,0,20); h1->SetCanExtend(TH1::kXaxis); for (int i = 0; i < nEvents; ++i) { double x = gRandom->Gaus(10,3); double y = gRandom->Gaus(10+2*x,1); if (x <= 0 || x >= 20) continue; // do not want overflow in h0 h1->Fill(x,y); h0->Fill(x,y); } bool ret = equals("testProfileextend", h1, h0, cmpOptStats, 1E-10); delete h1; TProfile::Approximate(false); return ret; } bool testProfile2Extend() { TRandom2 r; // sometime test fails is using gRandom t.b.i. TProfile2D::Approximate(true); TProfile2D * h1 = new TProfile2D("h1","h1",10,0,10,10,0,10); TProfile2D * h2 = new TProfile2D("h2","h0",10,0,10,10,0,20); h1->SetCanExtend(TH1::kYaxis); for (int i = 0; i < 10*nEvents; ++i) { double x = r.Uniform(-1,11); double y = r.Gaus(10,3); double z = r.Gaus(10+2*(x+y),1); if (y <= 0 || y >= 20) continue; // do not want overflow in h0 h1->Fill(x,y,z); h2->Fill(x,y,z); } bool ret = equals("testprofile2extend", h1, h2, cmpOptStats, 1E-10); delete h1; TProfile2D::Approximate(false); return ret; } bool testConversion1D() { const int nbins[3] = {50,11,12}; const double minRangeArray[3] = {2.,4.,4.}; const double maxRangeArray[3] = {5.,8.,10.}; const int nevents = 500; TF1* f = new TF1("gaus1D", gaus1d, minRangeArray[0], maxRangeArray[0], 3); f->SetParameters(10., 3.5, .4); TH1 *h1c = new TH1C("h1c", "h1-title", nbins[0], minRangeArray[0], maxRangeArray[0]); TH1 *h1s = new TH1S("h1s", "h1-title", nbins[0], minRangeArray[0], maxRangeArray[0]); TH1 *h1i = new TH1I("h1i", "h1-title", nbins[0], minRangeArray[0], maxRangeArray[0]); TH1 *h1f = new TH1F("h1f", "h1-title", nbins[0], minRangeArray[0], maxRangeArray[0]); TH1 *h1d = new TH1D("h1d", "h1-title", nbins[0], minRangeArray[0], maxRangeArray[0]); h1c->FillRandom("gaus1D", nevents); h1s->FillRandom("gaus1D", nevents); h1i->FillRandom("gaus1D", nevents); h1f->FillRandom("gaus1D", nevents); h1d->FillRandom("gaus1D", nevents); THnSparse* s1c = THnSparse::CreateSparse("s1c", "s1cTitle", h1c); THnSparse* s1s = THnSparse::CreateSparse("s1s", "s1sTitle", h1s); THnSparse* s1i = THnSparse::CreateSparse("s1i", "s1iTitle", h1i); THnSparse* s1f = THnSparse::CreateSparse("s1f", "s1fTitle", h1f); THnSparse* s1d = THnSparse::CreateSparse("s1d", "s1dTitle", h1d); TH1* h1cn = (TH1*) h1c->Clone("h1cn"); TH1* h1sn = (TH1*) h1s->Clone("h1sn"); TH1* h1in = (TH1*) h1i->Clone("h1in"); TH1* h1fn = (TH1*) h1f->Clone("h1fn"); TH1* h1dn = (TH1*) h1s->Clone("h1dn"); int status = 0; status += equals("TH1-THnSparseC", s1c, h1c); status += equals("TH1-THnSparseS", s1s, h1s); status += equals("TH1-THnSparseI", s1i, h1i); status += equals("TH1-THnSparseF", s1f, h1f); status += equals("TH1-THnSparseD", s1d, h1d); delete s1c; delete s1s; delete s1i; delete s1f; delete s1d; THn* n1c = THn::CreateHn("n1c", "n1cTitle", h1cn); THn* n1s = THn::CreateHn("n1s", "n1sTitle", h1sn); THn* n1i = THn::CreateHn("n1i", "n1iTitle", h1in); THn* n1f = THn::CreateHn("n1f", "n1fTitle", h1fn); THn* n1d = THn::CreateHn("n1d", "n1dTitle", h1dn); status += equals("TH1-THnC", n1c, h1cn); status += equals("TH1-THnS", n1s, h1sn); status += equals("TH1-THnI", n1i, h1in); status += equals("TH1-THnF", n1f, h1fn); status += equals("TH1-THnD", n1d, h1dn); delete n1c; delete n1s; delete n1i; delete n1f; delete n1d; return status; } bool testConversion2D() { const int nbins[3] = {50,11,12}; const double minRangeArray[3] = {2.,4.,4.}; const double maxRangeArray[3] = {5.,8.,10.}; const int nevents = 500; TF2* f = new TF2("gaus2D", gaus2d, minRangeArray[0], maxRangeArray[0], minRangeArray[1], maxRangeArray[1], 5); f->SetParameters(10., 3.5, .4, 6, 1); TH2 *h2c = new TH2C("h2c", "h2-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1]); TH2 *h2s = new TH2S("h2s", "h2-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1]); TH2 *h2i = new TH2I("h2i", "h2-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1]); TH2 *h2f = new TH2F("h2f", "h2-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1]); TH2 *h2d = new TH2D("h2d", "h2-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1]); h2c->FillRandom("gaus2D", nevents); h2s->FillRandom("gaus2D", nevents); h2i->FillRandom("gaus2D", nevents); h2f->FillRandom("gaus2D", nevents); h2d->FillRandom("gaus2D", nevents); THnSparse* s2c = THnSparse::CreateSparse("s2c", "s2cTitle", h2c); THnSparse* s2s = THnSparse::CreateSparse("s2s", "s2sTitle", h2s); THnSparse* s2i = THnSparse::CreateSparse("s2i", "s2iTitle", h2i); THnSparse* s2f = THnSparse::CreateSparse("s2f", "s2fTitle", h2f); THnSparse* s2d = THnSparse::CreateSparse("s2d", "s2dTitle", h2d); TH2* h2cn = (TH2*) h2c->Clone("h2cn"); TH2* h2sn = (TH2*) h2s->Clone("h2sn"); TH2* h2in = (TH2*) h2i->Clone("h2in"); TH2* h2fn = (TH2*) h2f->Clone("h2fn"); TH2* h2dn = (TH2*) h2d->Clone("h2dn"); int status = 0; status += equals("TH2-THnSparseC", s2c, h2c); status += equals("TH2-THnSparseS", s2s, h2s); status += equals("TH2-THnSparseI", s2i, h2i); status += equals("TH2-THnSparseF", s2f, h2f); status += equals("TH2-THnSparseD", s2d, h2d); delete s2c; delete s2s; delete s2i; delete s2f; delete s2d; THn* n2c = THn::CreateHn("n2c", "n2cTitle", h2cn); THn* n2s = THn::CreateHn("n2s", "n2sTitle", h2sn); THn* n2i = THn::CreateHn("n2i", "n2iTitle", h2in); THn* n2f = THn::CreateHn("n2f", "n2fTitle", h2fn); THn* n2d = THn::CreateHn("n2d", "n2dTitle", h2dn); status += equals("TH2-THnC", n2c, h2cn); status += equals("TH2-THnS", n2s, h2sn); status += equals("TH2-THnI", n2i, h2in); status += equals("TH2-THnF", n2f, h2fn); status += equals("TH2-THnD", n2d, h2dn); delete n2c; delete n2s; delete n2i; delete n2f; delete n2d; return status; } bool testConversion3D() { const int nbins[3] = {50,11,12}; const double minRangeArray[3] = {2.,4.,4.}; const double maxRangeArray[3] = {5.,8.,10.}; const int nevents = 500; TF3* f = new TF3("gaus3D", gaus3d, minRangeArray[0], maxRangeArray[0], minRangeArray[1], maxRangeArray[1], minRangeArray[2], maxRangeArray[2], 7); f->SetParameters(10., 3.5, .4, 6, 1, 7, 2); TH3 *h3c = new TH3C("h3c", "h3-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1], nbins[2], minRangeArray[2], maxRangeArray[2]); TH3 *h3s = new TH3S("h3s", "h3-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1], nbins[2], minRangeArray[2], maxRangeArray[2]); TH3 *h3i = new TH3I("h3i", "h3-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1], nbins[2], minRangeArray[2], maxRangeArray[2]); TH3 *h3f = new TH3F("h3f", "h3-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1], nbins[2], minRangeArray[2], maxRangeArray[2]); TH3 *h3d = new TH3D("h3d", "h3-title", nbins[0], minRangeArray[0], maxRangeArray[0], nbins[1], minRangeArray[1], maxRangeArray[1], nbins[2], minRangeArray[2], maxRangeArray[2]); h3c->FillRandom("gaus3D", nevents); h3s->FillRandom("gaus3D", nevents); h3i->FillRandom("gaus3D", nevents); h3f->FillRandom("gaus3D", nevents); h3d->FillRandom("gaus3D", nevents); THnSparse* s3c = THnSparse::CreateSparse("s3c", "s3cTitle", h3c); THnSparse* s3s = THnSparse::CreateSparse("s3s", "s3sTitle", h3s); THnSparse* s3i = THnSparse::CreateSparse("s3i", "s3iTitle", h3i); THnSparse* s3f = THnSparse::CreateSparse("s3f", "s3fTitle", h3f); THnSparse* s3d = THnSparse::CreateSparse("s3d", "s3dTitle", h3d); TH3* h3cn = (TH3*) h3c->Clone("h3cn"); TH3* h3sn = (TH3*) h3s->Clone("h3sn"); TH3* h3in = (TH3*) h3i->Clone("h3in"); TH3* h3fn = (TH3*) h3f->Clone("h3fn"); TH3* h3dn = (TH3*) h3d->Clone("h3dn"); int status = 0; status += equals("TH3-THnSparseC", s3c, h3c); status += equals("TH3-THnSparseS", s3s, h3s); status += equals("TH3-THnSparseI", s3i, h3i); status += equals("TH3-THnSparseF", s3f, h3f); status += equals("TH3-THnSparseD", s3d, h3d); delete s3c; delete s3s; delete s3i; delete s3f; delete s3d; THn* n3c = THn::CreateHn("n3c", "n3cTitle", h3cn); THn* n3s = THn::CreateHn("n3s", "n3sTitle", h3sn); THn* n3i = THn::CreateHn("n3i", "n3iTitle", h3in); THn* n3f = THn::CreateHn("n3f", "n3fTitle", h3fn); THn* n3d = THn::CreateHn("n3d", "n3dTitle", h3dn); status += equals("TH3-THnC", n3c, h3cn); status += equals("TH3-THnS", n3s, h3sn); status += equals("TH3-THnI", n3i, h3in); status += equals("TH3-THnF", n3f, h3fn); status += equals("TH3-THnD", n3d, h3dn); delete n3c; delete n3s; delete n3i; delete n3f; delete n3d; return status; } int findBin(ROOT::Fit::BinData& bd, const double *x) { const unsigned int ndim = bd.NDim(); const unsigned int npoints = bd.NPoints(); for ( unsigned int i = 0; i < npoints; ++i ) { double value1 = 0, error1 = 0; const double *x1 = bd.GetPoint(i, value1, error1); // std::cout << "\ti: " << i // << " x: "; // std::copy(x1, x1+ndim, ostream_iterator(std::cout, " ")); // std::cout << " val: " << value1 // << " error: " << error1 // << std::endl; bool thisIsIt = true; for ( unsigned int j = 0; j < ndim; ++j ) { thisIsIt &= fabs(x1[j] - x[j]) < 1E-15; } if ( thisIsIt ) { // std::cout << "RETURNED!" << std::endl; return i; } } // std::cout << "ERROR FINDING BIN!" << std::endl; return -1; } bool operator ==(ROOT::Fit::BinData& bd1, ROOT::Fit::BinData& bd2) { const unsigned int ndim = bd1.NDim(); const unsigned int npoints = bd1.NPoints(); bool equals = true; for ( unsigned int i = 0; i < npoints && equals; ++i ) { double value1 = 0, error1 = 0; const double *x1 = bd1.GetPoint(i, value1, error1); // std::cout << "i: " << i // << " x: "; // std::copy(x1, x1+ndim, ostream_iterator(std::cout, " ")); // std::cout << " val: " << value1 // << " error: " << error1 // << std::endl; int bin = findBin(bd2, x1); if ( bin < 0 ) Fatal("operator ==(ROOT::Fit::BinData& bd1, ROOT::Fit::BinData& bd2)","BIN NOT FOUND!"); double value2 = 0, error2 = 0; const double *x2 = bd2.GetPoint(bin, value2, error2); equals &= ( value1 == value2 ); equals &= ( error1 == error2 ); for ( unsigned int j = 0; j < ndim; ++j ) { equals &= fabs(x1[j] - x2[j]) < 1E-15; } } return equals; } int findBin(ROOT::Fit::SparseData& sd, const std::vector& minRef, const std::vector& maxRef, const double valRef, const double errorRef) { const unsigned int ndim = sd.NDim(); const unsigned int npoints = sd.NPoints(); for ( unsigned int i = 0; i < npoints; ++i ) { std::vector min(ndim); std::vector max(ndim); double val; double error; sd.GetPoint(i, min, max, val, error); // std::cout << "\ti: " << i // << " min: "; // std::copy(min.begin(), min.end(), ostream_iterator(std::cout, " ")); // std::cout << " max: "; // std::copy(max.begin(), max.end(), ostream_iterator(std::cout, " ")); // std::cout << " val: " << val // << " error: " << error // << std::endl; bool thisIsIt = true; // std::cout << "\t\t" << thisIsIt << " "; thisIsIt &= !equals(valRef, val, 1E-8); // std::cout << thisIsIt << " "; thisIsIt &= !equals(errorRef, error, 1E-15); // std::cout << thisIsIt << " "; for ( unsigned int j = 0; j < ndim && thisIsIt; ++j ) { thisIsIt &= !equals(minRef[j], min[j]); // std::cout << thisIsIt << " "; thisIsIt &= !equals(maxRef[j], max[j]); // std::cout << thisIsIt << " "; } // std::cout << thisIsIt << " " << std::endl; if ( thisIsIt ) { // std::cout << "RETURNING " << i << std::endl; return i; } } // std::cout << "ERROR FINDING BIN!" << std::endl; return -1; } bool operator ==(ROOT::Fit::SparseData& sd1, ROOT::Fit::SparseData& sd2) { const unsigned int ndim = sd1.NDim(); const unsigned int npoints1 = sd1.NPoints(); const unsigned int npoints2 = sd2.NPoints(); bool equals = (npoints1 == npoints2); for ( unsigned int i = 0; i < npoints1 && equals; ++i ) { std::vector min(ndim); std::vector max(ndim); double val; double error; sd1.GetPoint(i, min, max, val, error); equals &= (findBin(sd2, min, max, val, error) >= 0 ); } for ( unsigned int i = 0; i < npoints2 && equals; ++i ) { std::vector min(ndim); std::vector max(ndim); double val; double error; sd2.GetPoint(i, min, max, val, error); equals &= (findBin(sd1, min, max, val, error) >= 0 ); } return equals; } bool testSparseData1DFull() { TF1* func = new TF1( "GAUS", gaus1d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH1D* h1 = new TH1D("fsdf1D","h1-title",numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } THnSparse* s1 = THnSparse::CreateSparse("fsdf1Ds", "THnSparse 1D - title", h1); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spTH1(dim, min,max); ROOT::Fit::FillData(spTH1,h1, 0); ROOT::Fit::SparseData spSparse(dim, min,max); ROOT::Fit::FillData(spSparse,s1, 0); int status = 1; if ( (spTH1 == spSparse ) && (spSparse == spTH1 ) ) status = 0; delete func; delete h1; delete s1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testSparseData1DFull: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testSparseData1DSparse() { TF1* func = new TF1( "GAUS", gaus1d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH1D* h1 = new TH1D("fsds1D","h1-title",numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < numberOfBins; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } THnSparse* s1 = THnSparse::CreateSparse("fsds1Ds", "THnSparse 1D - title", h1); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spTH1(dim, min,max); ROOT::Fit::FillData(spTH1,h1, 0); ROOT::Fit::SparseData spSparse(dim, min,max); ROOT::Fit::FillData(spSparse,s1, 0); int status = 1; if ( (spTH1 == spSparse ) && (spSparse == spTH1 ) ) status = 0; delete func; delete h1; delete s1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testSparseData1DSpar: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testSparseData2DFull() { TF2* func = new TF2( "GAUS2D", gaus2d, minRange, maxRange, 3); func->SetParameters(500., +.5, 1.5, -.5, 2.0); TH2D* h2 = new TH2D("fsdf2D","h2-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } THnSparse* s2 = THnSparse::CreateSparse("fsdf2Ds", "THnSparse 2D - title", h2); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spTH2(dim, min,max); ROOT::Fit::FillData(spTH2,h2, 0); ROOT::Fit::SparseData spSparse(dim, min,max); ROOT::Fit::FillData(spSparse,s2, 0); int status = 1; if ( (spTH2 == spSparse ) && (spSparse == spTH2 ) ) status = 0; delete func; delete h2; delete s2; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testSparseData2DFull: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testSparseData2DSparse() { TF2* func = new TF2( "GAUS2D", gaus2d, minRange, maxRange, 3); func->SetParameters(500., +.5, 1.5, -.5, 2.0); TH2D* h2 = new TH2D("fsds2D","h2-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < numberOfBins * numberOfBins; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } THnSparse* s2 = THnSparse::CreateSparse("fsds2Ds", "THnSparse 2D - title", h2); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spTH2(dim, min,max); ROOT::Fit::FillData(spTH2,h2, 0); ROOT::Fit::SparseData spSparse(dim, min,max); ROOT::Fit::FillData(spSparse,s2, 0); int status = 1; if ( (spTH2 == spSparse ) && (spSparse == spTH2 ) ) status = 0; delete func; delete h2; delete s2; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testSparseData2DSpar: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testSparseData3DFull() { TF2* func = new TF2( "GAUS3D", gaus3d, minRange, maxRange, 3); func->SetParameters(500., +.5, 1.5, -.5, 2.0); TH3D* h3 = new TH3D("fsdf3D","h3-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); } THnSparse* s3 = THnSparse::CreateSparse("fsdf3Ds", "THnSparse 3D - title", h3); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spTH3(dim, min,max); ROOT::Fit::FillData(spTH3,h3, 0); ROOT::Fit::SparseData spSparse(dim, min,max); ROOT::Fit::FillData(spSparse,s3, 0); int status = 1; if ( (spTH3 == spSparse ) && (spSparse == spTH3 ) ) status = 0; delete func; delete h3; delete s3; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testSparseData3DFull: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testSparseData3DSparse() { TF2* func = new TF2( "GAUS3D", gaus3d, minRange, maxRange, 3); func->SetParameters(500., +.5, 1.5, -.5, 2.0); TH3D* h3 = new TH3D("fsds3D","h3-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < numberOfBins * numberOfBins * numberOfBins; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); } THnSparse* s3 = THnSparse::CreateSparse("fsds3Ds", "THnSparse 3D - title", h3); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spTH3(dim, min,max); ROOT::Fit::FillData(spTH3,h3, 0); ROOT::Fit::SparseData spSparse(dim, min,max); ROOT::Fit::FillData(spSparse,s3, 0); int status = 1; if ( (spTH3 == spSparse ) && (spSparse == spTH3 ) ) status = 0; delete func; delete h3; delete s3; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testSparseData3DSpar: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testBinDataData1D() { TF1* func = new TF1( "GAUS", gaus1d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH1D* h1 = new TH1D("fbd1D","h1-title",numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } THnSparse* s1 = THnSparse::CreateSparse("fbd1Ds", "THnSparse 1D - title", h1); ROOT::Fit::BinData bdTH1; ROOT::Fit::FillData(bdTH1, h1); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spSparseTmp(dim, min,max); ROOT::Fit::FillData(spSparseTmp,s1, 0); ROOT::Fit::BinData bdSparse; spSparseTmp.GetBinData(bdSparse); int status = 1; if ( (bdTH1 == bdSparse ) && (bdSparse == bdTH1 ) ) status = 0; delete func; delete h1; delete s1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testBinDataData1D: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testBinDataData2D() { TF1* func = new TF1( "GAUS", gaus2d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH2D* h2 = new TH2D("fbd2D","h2-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } THnSparse* s2 = THnSparse::CreateSparse("fbd2Ds", "THnSparse 2D - title", h2); ROOT::Fit::BinData bdTH2; ROOT::Fit::FillData(bdTH2, h2); unsigned int const dim = 2; double min[dim] = {minRange, minRange}; double max[dim] = {maxRange, maxRange}; ROOT::Fit::SparseData spSparseTmp(dim, min,max); ROOT::Fit::FillData(spSparseTmp,s2, 0); ROOT::Fit::BinData bdSparse(spSparseTmp.NPoints(), spSparseTmp.NDim()); spSparseTmp.GetBinData(bdSparse); int status = 1; if ( (bdTH2 == bdSparse ) && (bdSparse == bdTH2 ) ) status = 0; delete func; delete h2; delete s2; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testBinDataData2D: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testBinDataData3D() { TF1* func = new TF1( "GAUS", gaus3d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH3D* h3 = new TH3D("fbd3D","h3-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); } THnSparse* s3 = THnSparse::CreateSparse("fbd3Ds", "THnSparse 3D - title", h3); ROOT::Fit::BinData bdTH3; ROOT::Fit::FillData(bdTH3, h3); unsigned int const dim = 3; double min[dim] = {minRange, minRange, minRange}; double max[dim] = {maxRange, maxRange, maxRange}; ROOT::Fit::SparseData spSparseTmp(dim, min,max); ROOT::Fit::FillData(spSparseTmp,s3, 0); ROOT::Fit::BinData bdSparse(spSparseTmp.NPoints(), spSparseTmp.NDim()); spSparseTmp.GetBinData(bdSparse); int status = 1; if ( (bdTH3 == bdSparse ) && (bdSparse == bdTH3 ) ) status = 0; delete func; delete h3; delete s3; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testBinDataData3D: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testBinDataData1DInt() { TF1* func = new TF1( "GAUS", gaus1d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH1D* h1 = new TH1D("fbdi1D","h1-title",numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } THnSparse* s1 = THnSparse::CreateSparse("fbdi1Ds", "THnSparse 1D - title", h1); ROOT::Fit::DataOptions opt; opt.fUseEmpty = true; opt.fIntegral = true; ROOT::Fit::BinData bdTH1(opt); ROOT::Fit::FillData(bdTH1, h1); unsigned int const dim = 1; double min[dim] = {minRange}; double max[dim] = {maxRange}; ROOT::Fit::SparseData spSparseTmp(dim, min,max); ROOT::Fit::FillData(spSparseTmp,s1, 0); ROOT::Fit::BinData bdSparse; spSparseTmp.GetBinDataIntegral(bdSparse); int status = 1; if ( (bdTH1 == bdSparse ) && (bdSparse == bdTH1 ) ) status = 0; delete func; delete h1; delete s1; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testBinDataData1DInt: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testBinDataData2DInt() { TF1* func = new TF1( "GAUS", gaus2d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH2D* h2 = new TH2D("fbdi2D","h2-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } THnSparse* s2 = THnSparse::CreateSparse("fbdi2Ds", "THnSparse 2D - title", h2); ROOT::Fit::DataOptions opt; opt.fUseEmpty = true; opt.fIntegral = true; ROOT::Fit::BinData bdTH2(opt); ROOT::Fit::FillData(bdTH2, h2); unsigned int const dim = 2; double min[dim] = {minRange, minRange}; double max[dim] = {maxRange, maxRange}; ROOT::Fit::SparseData spSparseTmp(dim, min,max); ROOT::Fit::FillData(spSparseTmp,s2, 0); ROOT::Fit::BinData bdSparse(spSparseTmp.NPoints(), spSparseTmp.NDim()); spSparseTmp.GetBinDataIntegral(bdSparse); int status = 1; if ( (bdTH2 == bdSparse ) && (bdSparse == bdTH2 ) ) status = 0; delete func; delete h2; delete s2; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testBinDataData2DInt: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testBinDataData3DInt() { TF1* func = new TF1( "GAUS", gaus3d, minRange, maxRange, 3); func->SetParameters(0., 3., 200.); func->SetParLimits( 1, 0, 5 ); TH3D* h3 = new TH3D("fbdi3D","h3-title", numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange, numberOfBins,minRange,maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h3->Fill(x, y, z, 1.0); } THnSparse* s3 = THnSparse::CreateSparse("fbdi3Ds", "THnSparse 3D - title", h3); ROOT::Fit::DataOptions opt; opt.fUseEmpty = true; opt.fIntegral = true; ROOT::Fit::BinData bdTH3(opt); ROOT::Fit::FillData(bdTH3, h3); unsigned int const dim = 3; double min[dim] = {minRange, minRange, minRange}; double max[dim] = {maxRange, maxRange, maxRange}; ROOT::Fit::SparseData spSparseTmp(dim, min,max); ROOT::Fit::FillData(spSparseTmp,s3, 0); ROOT::Fit::BinData bdSparse(spSparseTmp.NPoints(), spSparseTmp.NDim()); spSparseTmp.GetBinDataIntegral(bdSparse); int status = 1; if ( (bdTH3 == bdSparse ) && (bdSparse == bdTH3 ) ) status = 0; delete func; delete h3; delete s3; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "testBinDataData3DInt: \t" << (status?"FAILED":"OK") << std::endl; return status; } bool testRefRead1D() { // Tests consistency with a reference file for 1D Histogram TH1D* h1 = 0; bool ret = 0; if ( refFileOption == refFileWrite ) { h1 = new TH1D("rr1D-h1", "h1-Title", numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, 1.0); } h1->Write(); } else { h1 = static_cast ( refFile->Get("rr1D-h1") ); TH1D* h2 = new TH1D("rr1D-h2", "h2-Title", numberOfBins, minRange, maxRange); h2->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(value, 1.0); } ret = equals("Ref Read Hist 1D", h1, h2, cmpOptStats); } if ( h1 ) delete h1; return ret; } bool testRefReadProf1D() { // Tests consistency with a reference file for 1D Profile bool ret = 0; TProfile* p1 = 0; if ( refFileOption == refFileWrite ) { p1 = new TProfile("rr1D-p1", "p1-Title", numberOfBins, minRange, maxRange); // p1->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, 1.0); } p1->Write(); } else { TH1::SetDefaultSumw2(false); p1 = static_cast ( refFile->Get("rr1D-p1") ); TProfile* p2 = new TProfile("rr1D-p2", "p2-Title", numberOfBins, minRange, maxRange); // p2->Sumw2(); for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, 1.0); } ret = equals("Ref Read Prof 1D", p1, p2, cmpOptStats); TH1::SetDefaultSumw2(true); } if (p1) delete p1; return ret; } bool testRefRead2D() { // Tests consistency with a reference file for 2D Histogram TH2D* h1 = 0; bool ret = 0; if ( refFileOption == refFileWrite ) { h1 = new TH2D("rr2D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, 1.0); } h1->Write(); } else { h1 = static_cast ( refFile->Get("rr2D-h1") ); TH2D* h2 = new TH2D("rr2D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); h2->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, 1.0); } ret = equals("Ref Read Hist 2D", h1, h2, cmpOptStats); } if ( h1 ) delete h1; return ret; } bool testRefReadProf2D() { // Tests consistency with a reference file for 2D Profile TProfile2D* p1 = 0; bool ret = 0; if ( refFileOption == refFileWrite ) { p1 = new TProfile2D("rr2D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, 1.0); } p1->Write(); } else { p1 = static_cast ( refFile->Get("rr2D-p1") ); TProfile2D* p2 = new TProfile2D("rr2D-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, 1.0); } ret = equals("Ref Read Prof 2D", p1, p2, cmpOptStats ); } if ( p1 ) delete p1; return ret; } bool testRefRead3D() { // Tests consistency with a reference file for 3D Histogram TH3D* h1 = 0; bool ret = 0; if ( refFileOption == refFileWrite ) { h1 = new TH3D("rr3D-h1", "h1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); h1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(x, y, z, 1.0); } h1->Write(); } else { h1 = static_cast ( refFile->Get("rr3D-h1") ); TH3D* h2 = new TH3D("rr3D-h2", "h2-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); h2->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); h2->Fill(x, y, z, 1.0); } ret = equals("Ref Read Hist 3D", h1, h2, cmpOptStats); } if ( h1 ) delete h1; return ret; } bool testRefReadProf3D() { // Tests consistency with a reference file for 3D Profile TProfile3D* p1 = 0; bool ret = 0; if ( refFileOption == refFileWrite ) { p1 = new TProfile3D("rr3D-p1", "p1-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, z, t, 1.0); } p1->Write(); } else { p1 = static_cast ( refFile->Get("rr3D-p1") ); TProfile3D* p2 = new TProfile3D("rr3D-p2", "p2-Title", numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange, numberOfBins, minRange, maxRange); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t z = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t t = r.Uniform(0.9 * minRange, 1.1 * maxRange); p2->Fill(x, y, z, t, 1.0); } ret = equals("Ref Read Prof 3D", p1, p2, cmpOptStats); } if ( p1 ) delete p1; return ret; } bool testRefReadSparse() { // Tests consistency with a reference file for Sparse Histogram Int_t bsize[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; THnSparseD* s1 = 0; bool ret = 0; if ( refFileOption == refFileWrite ) { s1 = new THnSparseD("rr-s1", "s1-Title", 3, bsize, xmin, xmax); s1->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s1->Fill(points); } s1->Write(); } else { s1 = static_cast ( refFile->Get("rr-s1") ); THnSparseD* s2 = new THnSparseD("rr-s1", "s1-Title", 3, bsize, xmin, xmax); s2->Sumw2(); for ( Int_t e = 0; e < nEvents * nEvents; ++e ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s2->Fill(points); } ret = equals("Ref Read Sparse", s1, s2, cmpOptStats); } if ( s1 ) delete s1; return ret; } bool testIntegerRebin() { // Tests rebin method with an integer as input for 1D Histogram const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); UInt_t seed = r.GetSeed(); TH1D* h1 = new TH1D("h1","Original Histogram", TMath::Nint( r.Uniform(1, 5) ) * rebin, minRange, maxRange); r.SetSeed(seed); h1->Sumw2(); for ( Int_t i = 0; i < nEvents; ++i ) h1->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ) , r.Uniform(0,10) ); TH1D* h2 = static_cast( h1->Rebin(rebin, "testIntegerRebin") ); TH1D* h3 = new TH1D("testIntegerRebin2", "testIntegerRebin2", h1->GetNbinsX() / rebin, minRange, maxRange); r.SetSeed(seed); h3->Sumw2(); for ( Int_t i = 0; i < nEvents; ++i ) h3->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ) , r.Uniform(0,10) ); bool ret = equals("TestIntegerRebinHist", h2, h3, cmpOptStats ); delete h1; delete h2; return ret; } bool testIntegerRebinProfile() { // Tests rebin method with an integer as input for 1D Profile const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); TProfile* p1 = new TProfile("p1","p1-Title", TMath::Nint( r.Uniform(1, 5) ) * rebin, minRange, maxRange); TProfile* p3 = new TProfile("testIntRebProf", "testIntRebProf", p1->GetNbinsX() / rebin, minRange, maxRange); for ( Int_t i = 0; i < nEvents; ++i ) { Double_t x = r.Uniform( minRange * .9 , maxRange * 1.1 ); Double_t y = r.Uniform( minRange * .9 , maxRange * 1.1 ); p1->Fill( x, y ); p3->Fill( x, y ); } TProfile* p2 = static_cast( p1->Rebin(rebin, "testIntegerRebin") ); bool ret = equals("TestIntegerRebinProf", p2, p3, cmpOptStats ); delete p1; delete p2; return ret; } bool testIntegerRebinNoName() { // Tests rebin method with an integer as input and without name for 1D Histogram const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); UInt_t seed = r.GetSeed(); TH1D* h1 = new TH1D("h2","Original Histogram", TMath::Nint( r.Uniform(1, 5) ) * rebin, minRange, maxRange); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h1->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ) ); TH1D* h2 = dynamic_cast( h1->Clone() ); h2->Rebin(rebin); TH1D* h3 = new TH1D("testIntegerRebinNoName", "testIntegerRebinNoName", int(h1->GetNbinsX() / rebin + 0.1), minRange, maxRange); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h3->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ) ); bool ret = equals("TestIntRebinNoName", h2, h3, cmpOptStats ); delete h1; delete h2; return ret; } bool testIntegerRebinNoNameProfile() { // Tests rebin method with an integer as input and without name for 1D Profile const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); TProfile* p1 = new TProfile("p1","p1-Title", TMath::Nint( r.Uniform(1, 5) ) * rebin, minRange, maxRange); TProfile* p3 = new TProfile("testIntRebNNProf", "testIntRebNNProf", int(p1->GetNbinsX() / rebin + 0.1), minRange, maxRange); for ( Int_t i = 0; i < nEvents; ++i ) { Double_t x = r.Uniform( minRange * .9 , maxRange * 1.1 ); Double_t y = r.Uniform( minRange * .9 , maxRange * 1.1 ); p1->Fill( x, y ); p3->Fill( x, y ); } TProfile* p2 = dynamic_cast( p1->Clone() ); p2->Rebin(rebin); bool ret = equals("TestIntRebNoNamProf", p2, p3, cmpOptStats); delete p1; delete p2; return ret; } bool testArrayRebin() { // Tests rebin method with an array as input for 1D Histogram const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ) + 1; UInt_t seed = r.GetSeed(); TH1D* h1 = new TH1D("h3","Original Histogram", TMath::Nint( r.Uniform(1, 5) ) * rebin * 2, minRange, maxRange); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h1->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ) ); // Create vector - generate bin edges ( nbins is always > 2) // ignore fact that array may contains bins with zero size Double_t * rebinArray = new Double_t[rebin]; r.RndmArray(rebin, rebinArray); std::sort(rebinArray, rebinArray + rebin); for ( Int_t i = 0; i < rebin; ++i ) { rebinArray[i] = TMath::Nint( rebinArray[i] * ( h1->GetNbinsX() - 2 ) + 2 ); rebinArray[i] = h1->GetBinLowEdge( (Int_t) rebinArray[i] ); } // rebinArray[0] = minRange; // rebinArray[rebin-1] = maxRange; #ifdef __DEBUG__ std::cout << "min range = " << minRange << " max range " << maxRange << std::endl; for ( Int_t i = 0; i < rebin; ++i ) std::cout << rebinArray[i] << std::endl; std::cout << "rebin: " << rebin << std::endl; #endif TH1D* h2 = static_cast( h1->Rebin(rebin - 1, "testArrayRebin", rebinArray) ); TH1D* h3 = new TH1D("testArrayRebin2", "testArrayRebin2", rebin - 1, rebinArray ); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h3->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ) ); delete [] rebinArray; bool ret = equals("TestArrayRebin", h2, h3, cmpOptStats); delete h1; delete h2; return ret; } bool testArrayRebinProfile() { // Tests rebin method with an array as input for 1D Profile const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ) + 1; UInt_t seed = r.GetSeed(); TProfile* p1 = new TProfile("p3","Original Histogram", TMath::Nint( r.Uniform(1, 5) ) * rebin * 2, minRange, maxRange); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) { Double_t x = r.Uniform( minRange * .9 , maxRange * 1.1 ); Double_t y = r.Uniform( minRange * .9 , maxRange * 1.1 ); p1->Fill( x, y ); } // Create vector - generate bin edges ( nbins is always > 2) // ignore fact that array may contains bins with zero size Double_t * rebinArray = new Double_t[rebin]; r.RndmArray(rebin, rebinArray); std::sort(rebinArray, rebinArray + rebin); for ( Int_t i = 0; i < rebin; ++i ) { rebinArray[i] = TMath::Nint( rebinArray[i] * ( p1->GetNbinsX() - 2 ) + 2 ); rebinArray[i] = p1->GetBinLowEdge( (Int_t) rebinArray[i] ); } // rebinArray[0] = minRange; // rebinArray[rebin-1] = maxRange; #ifdef __DEBUG__ for ( Int_t i = 0; i < rebin; ++i ) std::cout << rebinArray[i] << std::endl; std::cout << "rebin: " << rebin << std::endl; #endif TProfile* p2 = static_cast( p1->Rebin(rebin - 1, "testArrayRebinProf", rebinArray) ); TProfile* p3 = new TProfile("testArrayRebinProf2", "testArrayRebinProf2", rebin - 1, rebinArray ); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) { Double_t x = r.Uniform( minRange * .9 , maxRange * 1.1 ); Double_t y = r.Uniform( minRange * .9 , maxRange * 1.1 ); p3->Fill( x, y ); } delete [] rebinArray; bool ret = equals("TestArrayRebinProf", p2, p3, cmpOptStats ); delete p1; delete p2; return ret; } bool test2DRebin() { // Tests rebin method for 2D Histogram Int_t xrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); Int_t yrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); // make the bins of the orginal histo not an exact divider to leave an extra bin TH2D* h2d = new TH2D("h2d","Original Histogram", xrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange, yrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange); h2d->Sumw2(); UInt_t seed = r.GetSeed(); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h2d->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform(0,10.) ); TH2D* h2d2 = (TH2D*) h2d->Rebin2D(xrebin,yrebin, "p2d2"); // range of rebinned histogram may be different than original one TH2D* h3 = new TH2D("test2DRebin", "test2DRebin", h2d->GetNbinsX() / xrebin, h2d2->GetXaxis()->GetXmin(), h2d2->GetXaxis()->GetXmax(), h2d->GetNbinsY() / yrebin, h2d2->GetYaxis()->GetXmin(), h2d2->GetYaxis()->GetXmax()); h3->Sumw2(); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h3->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform(0,10.) ); bool ret = equals("TestIntRebin2D", h2d2, h3, cmpOptStats); // | cmpOptDebug); delete h2d; delete h2d2; return ret; } bool test3DRebin() { // Tests rebin method for 2D Histogram Int_t xrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); Int_t yrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); Int_t zrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); // make the bins of the orginal histo not an exact divider to leave an extra bin TH3D* h3d = new TH3D("h3d","Original Histogram", xrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange, yrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange, zrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange); h3d->Sumw2(); UInt_t seed = r.GetSeed(); r.SetSeed(seed); for ( Int_t i = 0; i < 10*nEvents; ++i ) h3d->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform(0,10.) ); TH3D* h3d2 = (TH3D*) h3d->Rebin3D(xrebin,yrebin, zrebin, "h3-rebin"); // range of rebinned histogram may be different than original one TH3D* h3 = new TH3D("test3DRebin", "test3DRebin", h3d->GetNbinsX() / xrebin, h3d2->GetXaxis()->GetXmin(), h3d2->GetXaxis()->GetXmax(), h3d->GetNbinsY() / yrebin, h3d2->GetYaxis()->GetXmin(), h3d2->GetYaxis()->GetXmax(), h3d->GetNbinsZ() / zrebin, h3d2->GetZaxis()->GetXmin(), h3d2->GetZaxis()->GetXmax() ); h3->Sumw2(); r.SetSeed(seed); for ( Int_t i = 0; i < 10*nEvents; ++i ) h3->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform(0,10.) ); bool ret = equals("TestIntRebin3D", h3d2, h3, cmpOptStats); // | cmpOptDebug); delete h3d; delete h3d2; return ret; } bool test2DRebinProfile() { // Tests rebin method for 2D Profile Histogram Int_t xrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); Int_t yrebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); TProfile2D* h2d = new TProfile2D("p2d","Original Profile Histogram", xrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange, yrebin * TMath::Nint( r.Uniform(1, 5) ), minRange, maxRange); UInt_t seed = r.GetSeed(); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h2d->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform(0,10) ); TProfile2D* h2d2 = (TProfile2D*) h2d->Rebin2D(xrebin,yrebin, "p2d2"); TProfile2D* h3 = new TProfile2D("test2DRebinProfile", "test2DRebin", h2d->GetNbinsX() / xrebin, h2d2->GetXaxis()->GetXmin(), h2d2->GetXaxis()->GetXmax(), h2d->GetNbinsY() / yrebin, h2d2->GetYaxis()->GetXmin(), h2d2->GetYaxis()->GetXmax() ); r.SetSeed(seed); for ( Int_t i = 0; i < nEvents; ++i ) h3->Fill( r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform( minRange * .9 , maxRange * 1.1 ), r.Uniform(0,10) ); bool ret = equals("TestIntRebin2DProfile", h2d2, h3, cmpOptStats); delete h2d; delete h2d2; return ret; } template bool testHnRebin1() { // Tests rebin method for n-dim Histogram const int rebin = TMath::Nint( r.Uniform(minRebin, maxRebin) ); Int_t bsizeRebin[] = { TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) ), TMath::Nint( r.Uniform(1, 5) )}; Int_t bsize[] = { bsizeRebin[0] * rebin, bsizeRebin[1] * rebin, bsizeRebin[2] * rebin}; Double_t xmin[] = {minRange, minRange, minRange}; Double_t xmax[] = {maxRange, maxRange, maxRange}; HIST* s1 = new HIST("rebin1-s1","s1-Title", 3, bsize, xmin, xmax); HIST* s2 = new HIST("rebin1-s2","s2-Title", 3, bsizeRebin, xmin, xmax); for ( Int_t i = 0; i < nEvents; ++i ) { Double_t points[3]; points[0] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[1] = r.Uniform( minRange * .9 , maxRange * 1.1 ); points[2] = r.Uniform( minRange * .9 , maxRange * 1.1 ); s1->Fill(points); s2->Fill(points); } HIST* s3 = (HIST*)s1->Rebin(rebin); bool ret = equals(TString::Format("%s Rebin 1", HIST::Class()->GetName()), s2, s3); delete s1; delete s2; return ret; } bool testTH2toTH1() { const double centre_deviation = 0.3; const unsigned int binsizeX = 10; const unsigned int binsizeY = 11; static const unsigned int minbinX = 2; static const unsigned int maxbinX = 5; static const unsigned int minbinY = 3; static const unsigned int maxbinY = 8; const int lower_limit = 0; const int upper_limit = 10; r.SetSeed(10); TH2D* h2XY = new TH2D("h2XY", "h2XY", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TH1::StatOverflows(kTRUE); TH1D* h1X = new TH1D("h1X", "h1X", binsizeX, lower_limit, upper_limit); TH1D* h1Y = new TH1D("h1Y", "h1Y", binsizeY, lower_limit, upper_limit); TH1D* h1XOR = new TH1D("h1XOR", "h1XOR", binsizeX, lower_limit, upper_limit); TH1D* h1YOR = new TH1D("h1YOR", "h1YOR", binsizeY, lower_limit, upper_limit); TH1D* h1XR = new TH1D("h1XR", "h1XR", maxbinX - minbinX + 1, h1X->GetXaxis()->GetBinLowEdge(minbinX), h1X->GetXaxis()->GetBinUpEdge(maxbinX) ); TH1D* h1YR = new TH1D("h1YR", "h1YR", maxbinY - minbinY + 1, h1Y->GetXaxis()->GetBinLowEdge(minbinY), h1Y->GetXaxis()->GetBinUpEdge(maxbinY) ); TProfile* pe1XY = new TProfile("pe1XY", "pe1XY", binsizeX, lower_limit, upper_limit); TProfile* pe1XYOR = new TProfile("pe1XYOR", "pe1XYOR", binsizeX, lower_limit, upper_limit); TProfile* pe1XYR = new TProfile("pe1XYR", "pe1XYR", maxbinX - minbinX + 1, h1X->GetXaxis()->GetBinLowEdge(minbinX), h1X->GetXaxis()->GetBinUpEdge(maxbinX) ); TProfile* pe1YX = new TProfile("pe1YX", "pe1YX", binsizeY, lower_limit, upper_limit); TProfile* pe1YXOR = new TProfile("pe1YXOR", "pe1YXOR", binsizeY, lower_limit, upper_limit); TProfile* pe1YXR = new TProfile("pe1YXR", "pe1YXR", maxbinY - minbinY + 1, h1Y->GetXaxis()->GetBinLowEdge(minbinY), h1Y->GetXaxis()->GetBinUpEdge(maxbinY)); for ( int ix = 0; ix <= h2XY->GetXaxis()->GetNbins() + 1; ++ix ) { double xc = h2XY->GetXaxis()->GetBinCenter(ix); double x = xc + centre_deviation * h2XY->GetXaxis()->GetBinWidth(ix); for ( int iy = 0; iy <= h2XY->GetYaxis()->GetNbins() + 1; ++iy ) { double yc = h2XY->GetYaxis()->GetBinCenter(iy); double y = yc + centre_deviation * h2XY->GetYaxis()->GetBinWidth(iy); Double_t w = (Double_t) r.Uniform(1,3); h2XY->Fill(x,y,w); h1X->Fill(x,w); h1Y->Fill(y,w); pe1XY->Fill(xc,yc,w); pe1YX->Fill(yc,xc,w); if ( x >= h1X->GetXaxis()->GetBinLowEdge(minbinX) && x <= h1X->GetXaxis()->GetBinUpEdge(maxbinX) && y >= h1Y->GetXaxis()->GetBinLowEdge(minbinY) && y <= h1Y->GetXaxis()->GetBinUpEdge(maxbinY) ) { h1XOR->Fill(x,w); h1YOR->Fill(y,w); h1XR->Fill(x,w); h1YR->Fill(y,w); pe1XYR->Fill(xc,yc,w); pe1YXR->Fill(yc,xc,w); pe1XYOR->Fill(xc,yc,w); pe1YXOR->Fill(yc,xc,w); } } } int status = 0; int options = cmpOptStats; // TH1 derived from h2XY status += equals("TH2XY -> X", h1X, (TH1D*) h2XY->ProjectionX("x"), options); status += equals("TH2XY -> Y", h1Y, (TH1D*) h2XY->ProjectionY("y"), options); status += equals("TH2XYO -> X", h1X, (TH1D*) h2XY->ProjectionX("ox", 0, -1, "o"), options); status += equals("TH2XYO -> Y", h1Y, (TH1D*) h2XY->ProjectionY("oy", 0, -1, "o"), options); status += equals("TH2XY -> PX", pe1XY, (TH1D*) h2XY->ProfileX("PX", 0,h2XY->GetYaxis()->GetNbins()+1), options); status += equals("TH2XY -> PY", pe1YX, (TH1D*) h2XY->ProfileY("PY", 0,h2XY->GetXaxis()->GetNbins()+1), options); status += equals("TH2XYO -> PX", pe1XY, (TH1D*) h2XY->ProfileX("OPX", 0,h2XY->GetYaxis()->GetNbins()+1,"o"), options); status += equals("TH2XYO -> PY", pe1YX, (TH1D*) h2XY->ProfileY("OPY", 0,h2XY->GetXaxis()->GetNbins()+1,"o"), options); h2XY->GetXaxis()->SetRange(minbinX, maxbinX); h2XY->GetYaxis()->SetRange(minbinY, maxbinY); h1X->GetXaxis()->SetRange(minbinX, maxbinX); h1Y->GetXaxis()->SetRange(minbinY, maxbinY); pe1XY->GetXaxis()->SetRange(minbinX, maxbinX); pe1YX->GetXaxis()->SetRange(minbinY, maxbinY); // This two, the statistics should work! options = 0; status += equals("TH2XYR -> X", h1XR, (TH1D*) h2XY->ProjectionX("x"), options); status += equals("TH2XYR -> Y", h1YR, (TH1D*) h2XY->ProjectionY("y"), options); status += equals("TH2XYRO -> X", h1XOR, (TH1D*) h2XY->ProjectionX("ox", 0, -1, "o"), options); status += equals("TH2XYRO -> Y", h1YOR, (TH1D*) h2XY->ProjectionY("oy", 0, -1, "o"), options); status += equals("TH2XYR -> PX", pe1XYR, (TH1D*) h2XY->ProfileX("PX"), options); status += equals("TH2XYR -> PY", pe1YXR, (TH1D*) h2XY->ProfileY("PY"), options); status += equals("TH2XYRO -> PX", pe1XYOR, (TH1D*) h2XY->ProfileX("OPX", 0,-1,"o"), options); status += equals("TH2XYRO -> PY", pe1YXOR, (TH1D*) h2XY->ProfileY("OPY", 0,-1,"o"), options); options = 0; delete h2XY; delete h1X; delete h1Y; delete h1XOR; delete h1YOR; delete h1XR; delete h1YR; delete pe1XY; delete pe1XYOR; delete pe1XYR; delete pe1YX; delete pe1YXOR; delete pe1YXR; return static_cast(status); } bool testTH3toTH1() { const double centre_deviation = 0.3; const unsigned int binsizeX = 10; const unsigned int binsizeY = 11; const unsigned int binsizeZ = 12; static const unsigned int minbinX = 2; static const unsigned int maxbinX = 5; static const unsigned int minbinY = 3; static const unsigned int maxbinY = 8; static const unsigned int minbinZ = 4; static const unsigned int maxbinZ = 10; const int lower_limit = 0; const int upper_limit = 10; r.SetSeed(10); TH3D* h3 = new TH3D("h3","h3", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TH1::StatOverflows(kTRUE); TH1D* h1X = new TH1D("h1X", "h1X", binsizeX, lower_limit, upper_limit); TH1D* h1Y = new TH1D("h1Y", "h1Y", binsizeY, lower_limit, upper_limit); TH1D* h1Z = new TH1D("h1Z", "h1Z", binsizeZ, lower_limit, upper_limit); TH1D* h1XR = new TH1D("h1XR", "h1XR", maxbinX - minbinX + 1, h1X->GetXaxis()->GetBinLowEdge(minbinX), h1X->GetXaxis()->GetBinUpEdge(maxbinX) ); TH1D* h1YR = new TH1D("h1YR", "h1YR", maxbinY - minbinY + 1, h1Y->GetXaxis()->GetBinLowEdge(minbinY), h1Y->GetXaxis()->GetBinUpEdge(maxbinY) ); TH1D* h1ZR = new TH1D("h1ZR", "h1ZR", maxbinZ - minbinZ + 1, h1Z->GetXaxis()->GetBinLowEdge(minbinZ), h1Z->GetXaxis()->GetBinUpEdge(maxbinZ) ); TH1D* h1XOR = new TH1D("h1XOR", "h1XOR", binsizeX, lower_limit, upper_limit); TH1D* h1YOR = new TH1D("h1YOR", "h1YOR", binsizeY, lower_limit, upper_limit); TH1D* h1ZOR = new TH1D("h1ZOR", "h1ZOR", binsizeZ, lower_limit, upper_limit); h3->Sumw2(); for ( int ix = 0; ix <= h3->GetXaxis()->GetNbins() + 1; ++ix ) { double x = centre_deviation * h3->GetXaxis()->GetBinWidth(ix) + h3->GetXaxis()->GetBinCenter(ix); for ( int iy = 0; iy <= h3->GetYaxis()->GetNbins() + 1; ++iy ) { double y = centre_deviation * h3->GetYaxis()->GetBinWidth(iy) + h3->GetYaxis()->GetBinCenter(iy); for ( int iz = 0; iz <= h3->GetZaxis()->GetNbins() + 1; ++iz ) { double z = centre_deviation * h3->GetZaxis()->GetBinWidth(iz) + h3->GetZaxis()->GetBinCenter(iz); Double_t w = (Double_t) r.Uniform(1,3); h3->Fill(x,y,z,w); h1X->Fill(x,w); h1Y->Fill(y,w); h1Z->Fill(z,w); if ( x >= h1X->GetXaxis()->GetBinLowEdge(minbinX) && x <= h1X->GetXaxis()->GetBinUpEdge(maxbinX) && y >= h1Y->GetXaxis()->GetBinLowEdge(minbinY) && y <= h1Y->GetXaxis()->GetBinUpEdge(maxbinY) && z >= h1Z->GetXaxis()->GetBinLowEdge(minbinZ) && z <= h1Z->GetXaxis()->GetBinUpEdge(maxbinZ) ) { h1XR->Fill(x,w); h1YR->Fill(y,w); h1ZR->Fill(z,w); h1XOR->Fill(x,w); h1YOR->Fill(y,w); h1ZOR->Fill(z,w); } } } } int status = 0; int options = cmpOptStats; TH1D* tmp1 = 0; options = cmpOptStats; status += equals("TH3 -> X", h1X, (TH1D*) h3->Project3D("x"), options); tmp1 = h3->ProjectionX("x335"); status += equals("TH3 -> X(x2)", tmp1, (TH1D*) h3->Project3D("x2"), options); delete tmp1; tmp1 = 0; status += equals("TH3 -> Y", h1Y, (TH1D*) h3->Project3D("y"), options); tmp1 = h3->ProjectionY("y335"); status += equals("TH3 -> Y(x2)", tmp1, (TH1D*) h3->Project3D("y2"), options); delete tmp1; tmp1 = 0; status += equals("TH3 -> Z", h1Z, (TH1D*) h3->Project3D("z"), options); tmp1 = h3->ProjectionZ("z335"); status += equals("TH3 -> Z(x2)", tmp1, (TH1D*) h3->Project3D("z2"), options); delete tmp1; tmp1 = 0; options = cmpOptStats; status += equals("TH3O -> X", h1X, (TH1D*) h3->Project3D("ox"), options); tmp1 = h3->ProjectionX("x1335"); status += equals("TH3O -> X(x2)", tmp1, (TH1D*) h3->Project3D("ox2"), options); delete tmp1; tmp1 = 0; status += equals("TH3O -> Y", h1Y, (TH1D*) h3->Project3D("oy"), options); tmp1 = h3->ProjectionY("y1335"); status += equals("TH3O -> Y(x2)", tmp1, (TH1D*) h3->Project3D("oy2"), options); delete tmp1; tmp1 = 0; status += equals("TH3O -> Z", h1Z, (TH1D*) h3->Project3D("oz"), options); tmp1 = h3->ProjectionZ("z1335"); status += equals("TH3O -> Z(x2)", tmp1, (TH1D*) h3->Project3D("oz2"), options); delete tmp1; tmp1 = 0; h3->GetXaxis()->SetRange(minbinX, maxbinX); h3->GetYaxis()->SetRange(minbinY, maxbinY); h3->GetZaxis()->SetRange(minbinZ, maxbinZ); h1X->GetXaxis()->SetRange(minbinX, maxbinX); h1Y->GetXaxis()->SetRange(minbinY, maxbinY); h1Z->GetXaxis()->SetRange(minbinZ, maxbinZ); //Statistics are no longer conserved if the center_deviation != 0.0 options = 0; status += equals("TH3R -> X", h1XR, (TH1D*) h3->Project3D("x34"), options ); tmp1 = h3->ProjectionX("x3335", minbinY, maxbinY, minbinZ, maxbinZ); status += equals("TH3R -> X(x2)", tmp1, (TH1D*) h3->Project3D("x22"), options); delete tmp1; tmp1 = 0; status += equals("TH3R -> Y", h1YR, (TH1D*) h3->Project3D("y34"), options); tmp1 = h3->ProjectionY("y3335", minbinX, maxbinX, minbinZ, maxbinZ); status += equals("TH3R -> Y(x2)", tmp1, (TH1D*) h3->Project3D("y22"), options); delete tmp1; tmp1 = 0; status += equals("TH3R -> Z", h1ZR, (TH1D*) h3->Project3D("z34"), options); tmp1 = h3->ProjectionZ("z3335", minbinX, maxbinX, minbinY, maxbinY); status += equals("TH3R -> Z(x2)", tmp1, (TH1D*) h3->Project3D("z22"), options); delete tmp1; tmp1 = 0; options = 0; status += equals("TH3RO -> X", h1XOR, (TH1D*) h3->Project3D("ox"), options); tmp1 = h3->ProjectionX("x1335", minbinY, maxbinY, minbinZ, maxbinZ,"o"); status += equals("TH3RO-> X(x2)", tmp1, (TH1D*) h3->Project3D("ox2"), options ); delete tmp1; tmp1 = 0; status += equals("TH3RO -> Y", h1YOR, (TH1D*) h3->Project3D("oy"), options); tmp1 = h3->ProjectionY("y1335", minbinX, maxbinX, minbinZ, maxbinZ,"o"); status += equals("TH3RO-> Y(x2)", tmp1, (TH1D*) h3->Project3D("oy2"), options); delete tmp1; tmp1 = 0; status += equals("TH3RO-> Z", h1ZOR, (TH1D*) h3->Project3D("oz"), options); tmp1 = h3->ProjectionZ("z1335", minbinX, maxbinX, minbinY, maxbinY,"o"); status += equals("TH3RO-> Z(x2)", tmp1, (TH1D*) h3->Project3D("oz2"), options); delete tmp1; tmp1 = 0; options = 0; delete h3; delete h1X; delete h1Y; delete h1Z; delete h1XR; delete h1YR; delete h1ZR; delete h1XOR; delete h1YOR; delete h1ZOR; return status; } bool testTH3toTH2() { const double centre_deviation = 0.3; const unsigned int binsizeX = 10; const unsigned int binsizeY = 11; const unsigned int binsizeZ = 12; static const unsigned int minbinX = 2; static const unsigned int maxbinX = 5; static const unsigned int minbinY = 3; static const unsigned int maxbinY = 8; static const unsigned int minbinZ = 4; static const unsigned int maxbinZ = 10; const int lower_limit = 0; const int upper_limit = 10; r.SetSeed(10); TH3D* h3 = new TH3D("h3","h3", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TH1::StatOverflows(kTRUE); TH2D* h2XY = new TH2D("h2XY", "h2XY", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TH2D* h2XZ = new TH2D("h2XZ", "h2XZ", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TH2D* h2YX = new TH2D("h2YX", "h2YX", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TH2D* h2YZ = new TH2D("h2YZ", "h2YZ", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TH2D* h2ZX = new TH2D("h2ZX", "h2ZX", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TH2D* h2ZY = new TH2D("h2ZY", "h2ZY", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TH2D* h2XYR = new TH2D("h2XYR", "h2XYR", maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX), maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY) ); TH2D* h2XZR = new TH2D("h2XZR", "h2XZR", maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX), maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ) ); TH2D* h2YXR = new TH2D("h2YXR", "h2YXR", maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY), maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX) ); TH2D* h2YZR = new TH2D("h2YZR", "h2YZR", maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY), maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ) ); TH2D* h2ZXR = new TH2D("h2ZXR", "h2ZXR", maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ), maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX) ); TH2D* h2ZYR = new TH2D("h2ZYR", "h2ZYR", maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ), maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY) ); TH2D* h2XYOR = new TH2D("h2XYOR", "h2XYOR", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TH2D* h2XZOR = new TH2D("h2XZOR", "h2XZOR", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TH2D* h2YXOR = new TH2D("h2YXOR", "h2YXOR", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TH2D* h2YZOR = new TH2D("h2YZOR", "h2YZOR", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TH2D* h2ZXOR = new TH2D("h2ZXOR", "h2ZXOR", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TH2D* h2ZYOR = new TH2D("h2ZYOR", "h2ZYOR", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TProfile2D* pe2XY = new TProfile2D("pe2XY", "pe2XY", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TProfile2D* pe2XZ = new TProfile2D("pe2XZ", "pe2XZ", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TProfile2D* pe2YX = new TProfile2D("pe2YX", "pe2YX", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TProfile2D* pe2YZ = new TProfile2D("pe2YZ", "pe2YZ", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TProfile2D* pe2ZX = new TProfile2D("pe2ZX", "pe2ZX", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TProfile2D* pe2ZY = new TProfile2D("pe2ZY", "pe2ZY", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TProfile2D* pe2XYR = new TProfile2D("pe2XYR", "pe2XYR", maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX), maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY) ); TProfile2D* pe2XZR = new TProfile2D("pe2XZR", "pe2XZR", maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX), maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ) ); TProfile2D* pe2YXR = new TProfile2D("pe2YXR", "pe2YXR", maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY), maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX) ); TProfile2D* pe2YZR = new TProfile2D("pe2YZR", "pe2YZR", maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY), maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ) ); TProfile2D* pe2ZXR = new TProfile2D("pe2ZXR", "pe2ZXR", maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ), maxbinX - minbinX + 1, h3->GetXaxis()->GetBinLowEdge(minbinX), h3->GetXaxis()->GetBinUpEdge(maxbinX) ); TProfile2D* pe2ZYR = new TProfile2D("pe2ZYR", "pe2ZYR", maxbinZ - minbinZ + 1, h3->GetZaxis()->GetBinLowEdge(minbinZ), h3->GetZaxis()->GetBinUpEdge(maxbinZ), maxbinY - minbinY + 1, h3->GetYaxis()->GetBinLowEdge(minbinY), h3->GetYaxis()->GetBinUpEdge(maxbinY) ); TProfile2D* pe2XYOR = new TProfile2D("pe2XYOR", "pe2XYOR", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); TProfile2D* pe2XZOR = new TProfile2D("pe2XZOR", "pe2XZOR", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TProfile2D* pe2YXOR = new TProfile2D("pe2YXOR", "pe2YXOR", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TProfile2D* pe2YZOR = new TProfile2D("pe2YZOR", "pe2YZOR", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); TProfile2D* pe2ZXOR = new TProfile2D("pe2ZXOR", "pe2ZXOR", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); TProfile2D* pe2ZYOR = new TProfile2D("pe2ZYOR", "pe2ZYOR", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); for ( int ix = 0; ix <= h3->GetXaxis()->GetNbins() + 1; ++ix ) { double xc = h3->GetXaxis()->GetBinCenter(ix); double x = xc + centre_deviation * h3->GetXaxis()->GetBinWidth(ix); for ( int iy = 0; iy <= h3->GetYaxis()->GetNbins() + 1; ++iy ) { double yc = h3->GetYaxis()->GetBinCenter(iy); double y = yc + centre_deviation * h3->GetYaxis()->GetBinWidth(iy); for ( int iz = 0; iz <= h3->GetZaxis()->GetNbins() + 1; ++iz ) { double zc = h3->GetZaxis()->GetBinCenter(iz); double z = zc + centre_deviation * h3->GetZaxis()->GetBinWidth(iz); // for ( int ix = 0; ix <= h3->GetXaxis()->GetNbins() + 1; ++ix ) { // double x = centre_deviation * h3->GetXaxis()->GetBinWidth(ix) + h3->GetXaxis()->GetBinCenter(ix); // for ( int iy = 0; iy <= h3->GetYaxis()->GetNbins() + 1; ++iy ) { // double y = centre_deviation * h3->GetYaxis()->GetBinWidth(iy) + h3->GetYaxis()->GetBinCenter(iy); // for ( int iz = 0; iz <= h3->GetZaxis()->GetNbins() + 1; ++iz ) { // double z = centre_deviation * h3->GetZaxis()->GetBinWidth(iz) + h3->GetZaxis()->GetBinCenter(iz); Double_t w = (Double_t) r.Uniform(1,3); h3->Fill(x,y,z,w); h2XY->Fill(x,y,w); h2XZ->Fill(x,z,w); h2YX->Fill(y,x,w); h2YZ->Fill(y,z,w); h2ZX->Fill(z,x,w); h2ZY->Fill(z,y,w); pe2XY->Fill(xc,yc,zc,w); pe2XZ->Fill(xc,zc,yc,w); pe2YX->Fill(yc,xc,zc,w); pe2YZ->Fill(yc,zc,xc,w); pe2ZX->Fill(zc,xc,yc,w); pe2ZY->Fill(zc,yc,xc,w); if ( x >= h3->GetXaxis()->GetBinLowEdge(minbinX) && x <= h3->GetXaxis()->GetBinUpEdge(maxbinX) && y >= h3->GetYaxis()->GetBinLowEdge(minbinY) && y <= h3->GetYaxis()->GetBinUpEdge(maxbinY) && z >= h3->GetZaxis()->GetBinLowEdge(minbinZ) && z <= h3->GetZaxis()->GetBinUpEdge(maxbinZ) ) { h2XYR->Fill(x,y,w); h2XZR->Fill(x,z,w); h2YXR->Fill(y,x,w); h2YZR->Fill(y,z,w); h2ZXR->Fill(z,x,w); h2ZYR->Fill(z,y,w); h2XYOR->Fill(x,y,w); h2XZOR->Fill(x,z,w); h2YXOR->Fill(y,x,w); h2YZOR->Fill(y,z,w); h2ZXOR->Fill(z,x,w); h2ZYOR->Fill(z,y,w); pe2XYR->Fill(xc,yc,zc,w); pe2XZR->Fill(xc,zc,yc,w); pe2YXR->Fill(yc,xc,zc,w); pe2YZR->Fill(yc,zc,xc,w); pe2ZXR->Fill(zc,xc,yc,w); pe2ZYR->Fill(zc,yc,xc,w); pe2XYOR->Fill(xc,yc,zc,w); pe2XZOR->Fill(xc,zc,yc,w); pe2YXOR->Fill(yc,xc,zc,w); pe2YZOR->Fill(yc,zc,xc,w); pe2ZXOR->Fill(zc,xc,yc,w); pe2ZYOR->Fill(zc,yc,xc,w); } } } } int status = 0; int options = cmpOptStats; options = cmpOptStats; status += equals("TH3 -> XY", h2XY, (TH2D*) h3->Project3D("yx"), options); status += equals("TH3 -> XZ", h2XZ, (TH2D*) h3->Project3D("zx"), options); status += equals("TH3 -> YX", h2YX, (TH2D*) h3->Project3D("XY"), options); status += equals("TH3 -> YZ", h2YZ, (TH2D*) h3->Project3D("ZY"), options); status += equals("TH3 -> ZX", h2ZX, (TH2D*) h3->Project3D("XZ"), options); status += equals("TH3 -> ZY", h2ZY, (TH2D*) h3->Project3D("YZ"), options); options = 0; options = cmpOptStats; status += equals("TH3O -> XY", h2XY, (TH2D*) h3->Project3D("oyx"), options); status += equals("TH3O -> XZ", h2XZ, (TH2D*) h3->Project3D("ozx"), options); status += equals("TH3O -> YX", h2YX, (TH2D*) h3->Project3D("oXY"), options); status += equals("TH3O -> YZ", h2YZ, (TH2D*) h3->Project3D("oZY"), options); status += equals("TH3O -> ZX", h2ZX, (TH2D*) h3->Project3D("oXZ"), options); status += equals("TH3O -> ZY", h2ZY, (TH2D*) h3->Project3D("oYZ"), options); options = 0; options = cmpOptStats; status += equals("TH3 -> PXY", (TH2D*) pe2XY, (TH2D*) h3->Project3DProfile("yx UF OF"), options); status += equals("TH3 -> PXZ", (TH2D*) pe2XZ, (TH2D*) h3->Project3DProfile("zx UF OF"), options); status += equals("TH3 -> PYX", (TH2D*) pe2YX, (TH2D*) h3->Project3DProfile("xy UF OF"), options); status += equals("TH3 -> PYZ", (TH2D*) pe2YZ, (TH2D*) h3->Project3DProfile("zy UF OF"), options); status += equals("TH3 -> PZX", (TH2D*) pe2ZX, (TH2D*) h3->Project3DProfile("xz UF OF"), options); status += equals("TH3 -> PZY", (TH2D*) pe2ZY, (TH2D*) h3->Project3DProfile("yz UF OF"), options); options = 0; options = cmpOptStats; status += equals("TH3O -> PXY", (TH2D*) pe2XY, (TH2D*) h3->Project3DProfile("oyx UF OF"), options); status += equals("TH3O -> PXZ", (TH2D*) pe2XZ, (TH2D*) h3->Project3DProfile("ozx UF OF"), options); status += equals("TH3O -> PYX", (TH2D*) pe2YX, (TH2D*) h3->Project3DProfile("oxy UF OF"), options); status += equals("TH3O -> PYZ", (TH2D*) pe2YZ, (TH2D*) h3->Project3DProfile("ozy UF OF"), options); status += equals("TH3O -> PZX", (TH2D*) pe2ZX, (TH2D*) h3->Project3DProfile("oxz UF OF"), options); status += equals("TH3O -> PZY", (TH2D*) pe2ZY, (TH2D*) h3->Project3DProfile("oyz UF OF"), options); options = 0; h3->GetXaxis()->SetRange(minbinX, maxbinX); h3->GetYaxis()->SetRange(minbinY, maxbinY); h3->GetZaxis()->SetRange(minbinZ, maxbinZ); // Stats won't work here, unless centre_deviation == 0.0 options = 0; status += equals("TH3R -> XY", h2XYR, (TH2D*) h3->Project3D("yx"), options); status += equals("TH3R -> XZ", h2XZR, (TH2D*) h3->Project3D("zx"), options); status += equals("TH3R -> YX", h2YXR, (TH2D*) h3->Project3D("XY"), options); status += equals("TH3R -> YZ", h2YZR, (TH2D*) h3->Project3D("ZY"), options); status += equals("TH3R -> ZX", h2ZXR, (TH2D*) h3->Project3D("XZ"), options); status += equals("TH3R -> ZY", h2ZYR, (TH2D*) h3->Project3D("YZ"), options); options = 0; // Stats won't work here, unless centre_deviation == 0.0 options = 0; status += equals("TH3OR -> XY", h2XYOR, (TH2D*) h3->Project3D("oyx"), options ); status += equals("TH3OR -> XZ", h2XZOR, (TH2D*) h3->Project3D("ozx"), options); status += equals("TH3OR -> YX", h2YXOR, (TH2D*) h3->Project3D("oXY"), options); status += equals("TH3OR -> YZ", h2YZOR, (TH2D*) h3->Project3D("oZY"), options); status += equals("TH3OR -> ZX", h2ZXOR, (TH2D*) h3->Project3D("oXZ"), options); status += equals("TH3OR -> ZY", h2ZYOR, (TH2D*) h3->Project3D("oYZ"), options); options = 0; options = cmpOptStats; status += equals("TH3R -> PXY", (TH2D*) pe2XYR, (TH2D*) h3->Project3DProfile("yx UF OF"), options); status += equals("TH3R -> PXZ", (TH2D*) pe2XZR, (TH2D*) h3->Project3DProfile("zx UF OF"), options); status += equals("TH3R -> PYX", (TH2D*) pe2YXR, (TH2D*) h3->Project3DProfile("xy UF OF"), options); status += equals("TH3R -> PYZ", (TH2D*) pe2YZR, (TH2D*) h3->Project3DProfile("zy UF OF"), options); status += equals("TH3R -> PZX", (TH2D*) pe2ZXR, (TH2D*) h3->Project3DProfile("xz UF OF"), options); status += equals("TH3R -> PZY", (TH2D*) pe2ZYR, (TH2D*) h3->Project3DProfile("yz UF OF"), options); options = 0; options = cmpOptStats; status += equals("TH3OR -> PXY", (TH2D*) pe2XYOR, (TH2D*) h3->Project3DProfile("oyx UF OF"), options); status += equals("TH3OR -> PXZ", (TH2D*) pe2XZOR, (TH2D*) h3->Project3DProfile("ozx UF OF"), options); status += equals("TH3OR -> PYX", (TH2D*) pe2YXOR, (TH2D*) h3->Project3DProfile("oxy UF OF"), options); status += equals("TH3OR -> PYZ", (TH2D*) pe2YZOR, (TH2D*) h3->Project3DProfile("ozy UF OF"), options); status += equals("TH3OR -> PZX", (TH2D*) pe2ZXOR, (TH2D*) h3->Project3DProfile("oxz UF OF"), options); status += equals("TH3OR -> PZY", (TH2D*) pe2ZYOR, (TH2D*) h3->Project3DProfile("oyz UF OF"), options); options = 0; options = 0; delete h3; delete h2XY; delete h2XZ; delete h2YX; delete h2YZ; delete h2ZX; delete h2ZY; delete h2XYR; delete h2XZR; delete h2YXR; delete h2YZR; delete h2ZXR; delete h2ZYR; delete h2XYOR; delete h2XZOR; delete h2YXOR; delete h2YZOR; delete h2ZXOR; delete h2ZYOR; delete pe2XY; delete pe2XZ; delete pe2YX; delete pe2YZ; delete pe2ZX; delete pe2ZY; delete pe2XYR; delete pe2XZR; delete pe2YXR; delete pe2YZR; delete pe2ZXR; delete pe2ZYR; delete pe2XYOR; delete pe2XZOR; delete pe2YXOR; delete pe2YZOR; delete pe2ZXOR; delete pe2ZYOR; return status; } // In case of deviation, the profiles' content will not work anymore // try only for testing the statistics static const double centre_deviation = 0.3; struct ProjectionTester { // This class implements the tests for all types of projections of // all the classes tested in this file. //public: static const unsigned int binsizeX = 8; static const unsigned int binsizeY = 10; static const unsigned int binsizeZ = 12; static const int lower_limit = 0; static const int upper_limit = 10; static const int lower_limitX = 0; static const int upper_limitX = 10; static const int lower_limitY = -5; static const int upper_limitY = 10; static const int lower_limitZ = -10; static const int upper_limitZ = 10; TH3D* h3; TH2D* h2XY; TH2D* h2XZ; TH2D* h2YX; TH2D* h2YZ; TH2D* h2ZX; TH2D* h2ZY; TH1D* h1X; TH1D* h1Y; TH1D* h1Z; TH1D* h1XStats; TH1D* h1YStats; TH1D* h1ZStats; TProfile2D* pe2XY; TProfile2D* pe2XZ; TProfile2D* pe2YX; TProfile2D* pe2YZ; TProfile2D* pe2ZX; TProfile2D* pe2ZY; TH2D* h2wXY; TH2D* h2wXZ; TH2D* h2wYX; TH2D* h2wYZ; TH2D* h2wZX; TH2D* h2wZY; TProfile* pe1XY; TProfile* pe1XZ; TProfile* pe1YX; TProfile* pe1YZ; TProfile* pe1ZX; TProfile* pe1ZY; TH1D* hw1XZ; TH1D* hw1XY; TH1D* hw1YX; TH1D* hw1YZ; TH1D* hw1ZX; TH1D* hw1ZY; TProfile3D* p3; TProfile2D* p2XY; TProfile2D* p2XZ; TProfile2D* p2YX; TProfile2D* p2YZ; TProfile2D* p2ZX; TProfile2D* p2ZY; TProfile* p1X; TProfile* p1Y; TProfile* p1Z; THnSparseD* s3; THnD* n3; bool buildWithWeights; public: ProjectionTester(bool useWeights = false) { buildWithWeights = useWeights; CreateProfiles(); CreateHistograms(); } void CreateHistograms() { h3 = new TH3D("h3","h3", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); h2XY = new TH2D("h2XY", "h2XY", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); h2XZ = new TH2D("h2XZ", "h2XZ", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); h2YX = new TH2D("h2YX", "h2YX", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); h2YZ = new TH2D("h2YZ", "h2YZ", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); h2ZX = new TH2D("h2ZX", "h2ZX", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); h2ZY = new TH2D("h2ZY", "h2ZY", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); // The bit is set for all the histograms (It's a statistic variable) TH1::StatOverflows(kTRUE); h1X = new TH1D("h1X", "h1X", binsizeX, lower_limit, upper_limit); h1Y = new TH1D("h1Y", "h1Y", binsizeY, lower_limit, upper_limit); h1Z = new TH1D("h1Z", "h1Z", binsizeZ, lower_limit, upper_limit); h1XStats = new TH1D("h1XStats", "h1XStats", binsizeX, lower_limit, upper_limit); h1YStats = new TH1D("h1YStats", "h1YStats", binsizeY, lower_limit, upper_limit); h1ZStats = new TH1D("h1ZStats", "h1ZStats", binsizeZ, lower_limit, upper_limit); pe2XY = new TProfile2D("pe2XY", "pe2XY", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); pe2XZ = new TProfile2D("pe2XZ", "pe2XZ", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); pe2YX = new TProfile2D("pe2YX", "pe2YX", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); pe2YZ = new TProfile2D("pe2YZ", "pe2YZ", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); pe2ZX = new TProfile2D("pe2ZX", "pe2ZX", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); pe2ZY = new TProfile2D("pe2ZY", "pe2ZY", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); h2wXY = new TH2D("h2wXY", "h2wXY", binsizeX, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); h2wXZ = new TH2D("h2wXZ", "h2wXZ", binsizeX, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); h2wYX = new TH2D("h2wYX", "h2wYX", binsizeY, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); h2wYZ = new TH2D("h2wYZ", "h2wYZ", binsizeY, lower_limit, upper_limit, binsizeZ, lower_limit, upper_limit); h2wZX = new TH2D("h2wZX", "h2wZX", binsizeZ, lower_limit, upper_limit, binsizeX, lower_limit, upper_limit); h2wZY = new TH2D("h2wZY", "h2wZY", binsizeZ, lower_limit, upper_limit, binsizeY, lower_limit, upper_limit); h2wXY->Sumw2(); h2wXZ->Sumw2(); h2wYX->Sumw2(); h2wYZ->Sumw2(); h2wZX->Sumw2(); h2wZY->Sumw2(); pe1XY = new TProfile("pe1XY", "pe1XY", binsizeX, lower_limit, upper_limit); pe1XZ = new TProfile("pe1XZ", "pe1XZ", binsizeX, lower_limit, upper_limit); pe1YX = new TProfile("pe1YX", "pe1YX", binsizeY, lower_limit, upper_limit); pe1YZ = new TProfile("pe1YZ", "pe1YZ", binsizeY, lower_limit, upper_limit); pe1ZX = new TProfile("pe1ZX", "pe1ZX", binsizeZ, lower_limit, upper_limit); pe1ZY = new TProfile("pe1ZY", "pe1ZY", binsizeZ, lower_limit, upper_limit); hw1XY = new TH1D("hw1XY", "hw1XY", binsizeX, lower_limit, upper_limit); hw1XZ = new TH1D("hw1XZ", "hw1XZ", binsizeX, lower_limit, upper_limit); hw1YX = new TH1D("hw1YX", "hw1YX", binsizeY, lower_limit, upper_limit); hw1YZ = new TH1D("hw1YZ", "hw1YZ", binsizeY, lower_limit, upper_limit); hw1ZX = new TH1D("hw1ZX", "hw1ZX", binsizeZ, lower_limit, upper_limit); hw1ZY = new TH1D("hw1ZY", "hw1ZY", binsizeZ, lower_limit, upper_limit); hw1XZ->Sumw2(); hw1XY->Sumw2(); hw1YX->Sumw2(); hw1YZ->Sumw2(); hw1ZX->Sumw2(); hw1ZY->Sumw2(); Int_t bsize[] = {binsizeX, binsizeY, binsizeZ}; Double_t xmin[] = {lower_limit, lower_limit, lower_limit}; Double_t xmax[] = {upper_limit, upper_limit, upper_limit}; s3 = new THnSparseD("s3","s3", 3, bsize, xmin, xmax); n3 = new THnD("n3","n3", 3, bsize, xmin, xmax); } void CreateProfiles() { // create Profile histograms p3 = new TProfile3D("p3","p3", binsizeX, lower_limitX, upper_limitX, binsizeY, lower_limitY, upper_limitY, binsizeZ, lower_limitZ, upper_limitZ); p2XY = new TProfile2D("p2XY", "p2XY", binsizeX, lower_limitX, upper_limitX, binsizeY, lower_limitY, upper_limitY); p2XZ = new TProfile2D("p2XZ", "p2XZ", binsizeX, lower_limitX, upper_limitX, binsizeZ, lower_limitZ, upper_limitZ); p2YX = new TProfile2D("p2YX", "p2YX", binsizeY, lower_limitY, upper_limitY, binsizeX, lower_limitX, upper_limitX); p2YZ = new TProfile2D("p2YZ", "p2YZ", binsizeY, lower_limitY, upper_limitY, binsizeZ, lower_limitZ, upper_limitZ); p2ZX = new TProfile2D("p2ZX", "p2ZX", binsizeZ, lower_limitZ, upper_limitZ, binsizeX, lower_limitX, upper_limitX); p2ZY = new TProfile2D("p2ZY", "p2ZY", binsizeZ, lower_limitZ, upper_limitZ, binsizeY, lower_limitY, upper_limitY); p1X = new TProfile("p1X", "pe1X", binsizeX, lower_limitX, upper_limitX); p1Y = new TProfile("p1Y", "pe1Y", binsizeY, lower_limitY, upper_limitY); p1Z = new TProfile("p1Z", "pe1Z", binsizeZ, lower_limitZ, upper_limitZ); } void DeleteHistograms() { delete h3; delete h2XY; delete h2XZ; delete h2YX; delete h2YZ; delete h2ZX; delete h2ZY; delete h1X; delete h1Y; delete h1Z; delete h1XStats; delete h1YStats; delete h1ZStats; delete pe2XY; delete pe2XZ; delete pe2YX; delete pe2YZ; delete pe2ZX; delete pe2ZY; delete h2wXY; delete h2wXZ; delete h2wYX; delete h2wYZ; delete h2wZX; delete h2wZY; delete pe1XY; delete pe1XZ; delete pe1YX; delete pe1YZ; delete pe1ZY; delete pe1ZX; delete hw1XY; delete hw1XZ; delete hw1YX; delete hw1YZ; delete hw1ZX; delete hw1ZY; delete s3; delete n3; // profiles delete p3; delete p2XY; delete p2XZ; delete p2YX; delete p2YZ; delete p2ZX; delete p2ZY; delete p1X; delete p1Y; delete p1Z; // delete all histogram in gROOT TList * l = gROOT->GetList(); TIter next(l); TObject * obj = 0; while ((obj = next())) if (obj->InheritsFrom(TH1::Class()) ) delete obj; } virtual ~ProjectionTester() { DeleteHistograms(); } void buildHistograms() { if (h3->GetSumw2N() ) {s3->Sumw2(); n3->Sumw2();} for ( int ix = 0; ix <= h3->GetXaxis()->GetNbins() + 1; ++ix ) { double xc = h3->GetXaxis()->GetBinCenter(ix); double x = xc + centre_deviation * h3->GetXaxis()->GetBinWidth(ix); for ( int iy = 0; iy <= h3->GetYaxis()->GetNbins() + 1; ++iy ) { double yc = h3->GetYaxis()->GetBinCenter(iy); double y = yc + centre_deviation * h3->GetYaxis()->GetBinWidth(iy); for ( int iz = 0; iz <= h3->GetZaxis()->GetNbins() + 1; ++iz ) { double zc = h3->GetZaxis()->GetBinCenter(iz); double z = zc + centre_deviation * h3->GetZaxis()->GetBinWidth(iz); for ( int i = 0; i < (int) r.Uniform(1,3); ++i ) { h3->Fill(x,y,z); Double_t points[] = {x,y,z}; s3->Fill(points); n3->Fill(points); h2XY->Fill(x,y); h2XZ->Fill(x,z); h2YX->Fill(y,x); h2YZ->Fill(y,z); h2ZX->Fill(z,x); h2ZY->Fill(z,y); h1X->Fill(x); h1Y->Fill(y); h1Z->Fill(z); if ( ix > 0 && ix < h3->GetXaxis()->GetNbins() + 1 && iy > 0 && iy < h3->GetYaxis()->GetNbins() + 1 && iz > 0 && iz < h3->GetZaxis()->GetNbins() + 1 ) { h1XStats->Fill(x); h1YStats->Fill(y); h1ZStats->Fill(z); } // for filling reference profile need to use bin center // because projection from histogram can use only bin center pe2XY->Fill(xc,yc,zc); pe2XZ->Fill(xc,zc,yc); pe2YX->Fill(yc,xc,zc); pe2YZ->Fill(yc,zc,xc); pe2ZX->Fill(zc,xc,yc); pe2ZY->Fill(zc,yc,xc); // reference histogram to test with option W. // need to use bin center for the weight h2wXY->Fill(x,y,zc); h2wXZ->Fill(x,z,yc); h2wYX->Fill(y,x,zc); h2wYZ->Fill(y,z,xc); h2wZX->Fill(z,x,yc); h2wZY->Fill(z,y,xc); pe1XY->Fill(xc,yc); pe1XZ->Fill(xc,zc); pe1YX->Fill(yc,xc); pe1YZ->Fill(yc,zc); pe1ZX->Fill(zc,xc); pe1ZY->Fill(zc,yc); hw1XY->Fill(x,yc); hw1XZ->Fill(x,zc); hw1YX->Fill(y,xc); hw1YZ->Fill(y,zc); hw1ZX->Fill(z,xc); hw1ZY->Fill(z,yc); } } } } buildWithWeights = false; } void buildHistogramsWithWeights() { s3->Sumw2(); n3->Sumw2(); for ( int ix = 0; ix <= h3->GetXaxis()->GetNbins() + 1; ++ix ) { double xc = h3->GetXaxis()->GetBinCenter(ix); double x = xc + centre_deviation * h3->GetXaxis()->GetBinWidth(ix); for ( int iy = 0; iy <= h3->GetYaxis()->GetNbins() + 1; ++iy ) { double yc = h3->GetYaxis()->GetBinCenter(iy); double y = yc + centre_deviation * h3->GetYaxis()->GetBinWidth(iy); for ( int iz = 0; iz <= h3->GetZaxis()->GetNbins() + 1; ++iz ) { double zc = h3->GetZaxis()->GetBinCenter(iz); double z = zc + centre_deviation * h3->GetZaxis()->GetBinWidth(iz); Double_t w = (Double_t) r.Uniform(1,3); h3->Fill(x,y,z,w); Double_t points[] = {x,y,z}; s3->Fill(points,w); n3->Fill(points,w); h2XY->Fill(x,y,w); h2XZ->Fill(x,z,w); h2YX->Fill(y,x,w); h2YZ->Fill(y,z,w); h2ZX->Fill(z,x,w); h2ZY->Fill(z,y,w); h1X->Fill(x,w); h1Y->Fill(y,w); h1Z->Fill(z,w); if ( ix > 0 && ix < h3->GetXaxis()->GetNbins() + 1 && iy > 0 && iy < h3->GetYaxis()->GetNbins() + 1 && iz > 0 && iz < h3->GetZaxis()->GetNbins() + 1 ) { h1XStats->Fill(x,w); h1YStats->Fill(y,w); h1ZStats->Fill(z,w); } pe2XY->Fill(xc,yc,zc,w); pe2XZ->Fill(xc,zc,yc,w); pe2YX->Fill(yc,xc,zc,w); pe2YZ->Fill(yc,zc,xc,w); pe2ZX->Fill(zc,xc,yc,w); pe2ZY->Fill(zc,yc,xc,w); h2wXY->Fill(x,y,zc*w); h2wXZ->Fill(x,z,yc*w); h2wYX->Fill(y,x,zc*w); h2wYZ->Fill(y,z,xc*w); h2wZX->Fill(z,x,yc*w); h2wZY->Fill(z,y,xc*w); pe1XY->Fill(xc,yc,w); pe1XZ->Fill(xc,zc,w); pe1YX->Fill(yc,xc,w); pe1YZ->Fill(yc,zc,w); pe1ZX->Fill(zc,xc,w); pe1ZY->Fill(zc,yc,w); hw1XY->Fill(x,yc*w); hw1XZ->Fill(x,zc*w); hw1YX->Fill(y,xc*w); hw1YZ->Fill(y,zc*w); hw1ZX->Fill(z,xc*w); hw1ZY->Fill(z,yc*w); } } } buildWithWeights = true; } void buildHistograms(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) { for ( int ix = 0; ix <= h3->GetXaxis()->GetNbins() + 1; ++ix ) { double xc = h3->GetXaxis()->GetBinCenter(ix); double x = xc + centre_deviation * h3->GetXaxis()->GetBinWidth(ix); for ( int iy = 0; iy <= h3->GetYaxis()->GetNbins() + 1; ++iy ) { double yc = h3->GetYaxis()->GetBinCenter(iy); double y = yc + centre_deviation * h3->GetYaxis()->GetBinWidth(iy); for ( int iz = 0; iz <= h3->GetZaxis()->GetNbins() + 1; ++iz ) { double zc = h3->GetZaxis()->GetBinCenter(iz); double z = zc + centre_deviation * h3->GetZaxis()->GetBinWidth(iz); for ( int i = 0; i < (int) r.Uniform(1,3); ++i ) { h3->Fill(x,y,z); Double_t points[] = {x,y,z}; s3->Fill(points); n3->Fill(points); if ( h3->GetXaxis()->FindBin(x) >= xmin && h3->GetXaxis()->FindBin(x) <= xmax && h3->GetYaxis()->FindBin(y) >= ymin && h3->GetYaxis()->FindBin(y) <= ymax && h3->GetZaxis()->FindBin(z) >= zmin && h3->GetZaxis()->FindBin(z) <= zmax ) { if ( defaultEqualOptions & cmpOptPrint ) std::cout << "Filling (" << x << "," << y << "," << z << ")!" << std::endl; h2XY->Fill(x,y); h2XZ->Fill(x,z); h2YX->Fill(y,x); h2YZ->Fill(y,z); h2ZX->Fill(z,x); h2ZY->Fill(z,y); h1X->Fill(x); h1Y->Fill(y); h1Z->Fill(z); pe2XY->Fill(xc,yc,zc); pe2XZ->Fill(xc,zc,yc); pe2YX->Fill(yc,xc,zc); pe2YZ->Fill(yc,zc,xc); pe2ZX->Fill(zc,xc,yc); pe2ZY->Fill(zc,yc,xc); h2wXY->Fill(x,y,z); h2wXZ->Fill(x,z,y); h2wYX->Fill(y,x,z); h2wYZ->Fill(y,z,x); h2wZX->Fill(z,x,y); h2wZY->Fill(z,y,x); pe1XY->Fill(xc,yc); pe1XZ->Fill(xc,zc); pe1YX->Fill(yc,xc); pe1YZ->Fill(yc,zc); pe1ZX->Fill(zc,xc); pe1ZY->Fill(zc,yc); hw1XY->Fill(x,y); hw1XZ->Fill(x,z); hw1YX->Fill(y,x); hw1YZ->Fill(y,z); hw1ZX->Fill(z,x); hw1ZY->Fill(z,y); } } } } } h3->GetXaxis()->SetRange(xmin, xmax); h3->GetYaxis()->SetRange(ymin, ymax); h3->GetZaxis()->SetRange(zmin, zmax); h2XY->GetXaxis()->SetRange(xmin, xmax); h2XY->GetYaxis()->SetRange(ymin, ymax); h2XZ->GetXaxis()->SetRange(xmin, xmax); h2XZ->GetZaxis()->SetRange(zmin, zmax); h2YX->GetYaxis()->SetRange(ymin, ymax); h2YX->GetXaxis()->SetRange(xmin, xmax); h2YZ->GetYaxis()->SetRange(ymin, ymax); h2YZ->GetZaxis()->SetRange(zmin, zmax); h2ZX->GetZaxis()->SetRange(zmin, zmax); h2ZX->GetXaxis()->SetRange(xmin, xmax); h2ZY->GetZaxis()->SetRange(zmin, zmax); h2ZY->GetYaxis()->SetRange(ymin, ymax); h1X->GetXaxis()->SetRange(xmin, xmax); h1Y->GetXaxis()->SetRange(ymin, ymax); h1Z->GetXaxis()->SetRange(zmin, zmax); // Need to set up the rest of the ranges! s3->GetAxis(1)->SetRange(xmin, xmax); s3->GetAxis(2)->SetRange(ymin, ymax); s3->GetAxis(3)->SetRange(zmin, zmax); n3->GetAxis(1)->SetRange(xmin, xmax); n3->GetAxis(2)->SetRange(ymin, ymax); n3->GetAxis(3)->SetRange(zmin, zmax); buildWithWeights = false; } int compareHistograms() { int status = 0; int options = 0; // TH2 derived from TH3 options = cmpOptStats; status += equals("TH3 -> XY", h2XY, (TH2D*) h3->Project3D("yx"), options); status += equals("TH3 -> XZ", h2XZ, (TH2D*) h3->Project3D("zx"), options); status += equals("TH3 -> YX", h2YX, (TH2D*) h3->Project3D("XY"), options); status += equals("TH3 -> YZ", h2YZ, (TH2D*) h3->Project3D("ZY"), options); status += equals("TH3 -> ZX", h2ZX, (TH2D*) h3->Project3D("XZ"), options); status += equals("TH3 -> ZY", h2ZY, (TH2D*) h3->Project3D("YZ"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // TH1 derived from TH3 options = cmpOptStats; TH1D* tmp1 = 0; status += equals("TH3 -> X", h1X, (TH1D*) h3->Project3D("x"), options); tmp1 = h3->ProjectionX("x335"); status += equals("TH3 -> X(x2)", tmp1, (TH1D*) h3->Project3D("x2"), options); delete tmp1; tmp1 = 0; status += equals("TH3 -> Y", h1Y, (TH1D*) h3->Project3D("y"), options); tmp1 = h3->ProjectionY("y335"); status += equals("TH3 -> Y(x2)", tmp1, (TH1D*) h3->Project3D("y2"), options); delete tmp1; tmp1 = 0; status += equals("TH3 -> Z", h1Z, (TH1D*) h3->Project3D("z"), options); tmp1 = h3->ProjectionZ("z335"); status += equals("TH3 -> Z(x2)", tmp1, (TH1D*) h3->Project3D("z2"), options); delete tmp1; tmp1 = 0; options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // TH1 derived from h2XY options = cmpOptStats; status += equals("TH2XY -> X", h1X, (TH1D*) h2XY->ProjectionX("x"), options); status += equals("TH2XY -> Y", h1Y, (TH1D*) h2XY->ProjectionY("y"), options); // TH1 derived from h2XZ status += equals("TH2XZ -> X", h1X, (TH1D*) h2XZ->ProjectionX("x"), options); status += equals("TH2XZ -> Z", h1Z, (TH1D*) h2XZ->ProjectionY("z"), options); // TH1 derived from h2YX status += equals("TH2YX -> Y", h1Y, (TH1D*) h2YX->ProjectionX("y"), options); status += equals("TH2YX -> X", h1X, (TH1D*) h2YX->ProjectionY("x"), options); // TH1 derived from h2YZ status += equals("TH2YZ -> Y", h1Y, (TH1D*) h2YZ->ProjectionX("y"), options); status += equals("TH2YZ -> Z", h1Z, (TH1D*) h2YZ->ProjectionY("z"), options); // TH1 derived from h2ZX status += equals("TH2ZX -> Z", h1Z, (TH1D*) h2ZX->ProjectionX("z"), options); status += equals("TH2ZX -> X", h1X, (TH1D*) h2ZX->ProjectionY("x"), options); // TH1 derived from h2ZY status += equals("TH2ZY -> Z", h1Z, (TH1D*) h2ZY->ProjectionX("z"), options); status += equals("TH2ZY -> Y", h1Y, (TH1D*) h2ZY->ProjectionY("y"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // in the following comparison with profiles we need to re-calculate statistics using bin centers // on the reference histograms if (centre_deviation != 0) { h2XY->ResetStats(); h2YX->ResetStats(); h2XZ->ResetStats(); h2ZX->ResetStats(); h2YZ->ResetStats(); h2ZY->ResetStats(); h1X->ResetStats(); h1Y->ResetStats(); h1Z->ResetStats(); } // Now the histograms coming from the Profiles! options = cmpOptStats; status += equals("TH3 -> PBXY", h2XY, (TH2D*) h3->Project3DProfile("yx UF OF")->ProjectionXY("1", "B"), options ); status += equals("TH3 -> PBXZ", h2XZ, (TH2D*) h3->Project3DProfile("zx UF OF")->ProjectionXY("2", "B"), options); status += equals("TH3 -> PBYX", h2YX, (TH2D*) h3->Project3DProfile("xy UF OF")->ProjectionXY("3", "B"), options); status += equals("TH3 -> PBYZ", h2YZ, (TH2D*) h3->Project3DProfile("zy UF OF")->ProjectionXY("4", "B"), options); status += equals("TH3 -> PBZX", h2ZX, (TH2D*) h3->Project3DProfile("xz UF OF")->ProjectionXY("5", "B"), options); status += equals("TH3 -> PBZY", h2ZY, (TH2D*) h3->Project3DProfile("yz UF OF")->ProjectionXY("6", "B"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // test directly project3dprofile options = cmpOptStats; status += equals("TH3 -> PXY", (TH2D*) pe2XY, (TH2D*) h3->Project3DProfile("yx UF OF"), options); status += equals("TH3 -> PXZ", (TH2D*) pe2XZ, (TH2D*) h3->Project3DProfile("zx UF OF"), options); status += equals("TH3 -> PYX", (TH2D*) pe2YX, (TH2D*) h3->Project3DProfile("xy UF OF"), options); status += equals("TH3 -> PYZ", (TH2D*) pe2YZ, (TH2D*) h3->Project3DProfile("zy UF OF"), options); status += equals("TH3 -> PZX", (TH2D*) pe2ZX, (TH2D*) h3->Project3DProfile("xz UF OF"), options); status += equals("TH3 -> PZY", (TH2D*) pe2ZY, (TH2D*) h3->Project3DProfile("yz UF OF"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // test option E of ProjectionXY options = 0; status += equals("TH3 -> PEXY", (TH2D*) pe2XY, (TH2D*) h3->Project3DProfile("yx UF OF")->ProjectionXY("1", "E"), options); status += equals("TH3 -> PEXZ", (TH2D*) pe2XZ, (TH2D*) h3->Project3DProfile("zx UF OF")->ProjectionXY("2", "E"), options); status += equals("TH3 -> PEYX", (TH2D*) pe2YX, (TH2D*) h3->Project3DProfile("xy UF OF")->ProjectionXY("3", "E"), options); status += equals("TH3 -> PEYZ", (TH2D*) pe2YZ, (TH2D*) h3->Project3DProfile("zy UF OF")->ProjectionXY("4", "E"), options); status += equals("TH3 -> PEZX", (TH2D*) pe2ZX, (TH2D*) h3->Project3DProfile("xz UF OF")->ProjectionXY("5", "E"), options); status += equals("TH3 -> PEZY", (TH2D*) pe2ZY, (TH2D*) h3->Project3DProfile("yz UF OF")->ProjectionXY("6", "E"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // test option W of ProjectionXY // The error fails when built with weights. It is not properly calculated if ( buildWithWeights ) options = cmpOptNoError; status += equals("TH3 -> PWXY", (TH2D*) h2wXY, (TH2D*) h3->Project3DProfile("yx UF OF")->ProjectionXY("1", "W"), options); status += equals("TH3 -> PWXZ", (TH2D*) h2wXZ, (TH2D*) h3->Project3DProfile("zx UF OF")->ProjectionXY("2", "W"), options); status += equals("TH3 -> PWYX", (TH2D*) h2wYX, (TH2D*) h3->Project3DProfile("xy UF OF")->ProjectionXY("3", "W"), options); status += equals("TH3 -> PWYZ", (TH2D*) h2wYZ, (TH2D*) h3->Project3DProfile("zy UF OF")->ProjectionXY("4", "W"), options); status += equals("TH3 -> PWZX", (TH2D*) h2wZX, (TH2D*) h3->Project3DProfile("xz UF OF")->ProjectionXY("5", "W"), options); status += equals("TH3 -> PWZY", (TH2D*) h2wZY, (TH2D*) h3->Project3DProfile("yz UF OF")->ProjectionXY("6", "W"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // test 1D histograms options = cmpOptStats; // ProfileX re-use the same histo if sme name is given. // need to give a diffrent name for each projectino (x,y,Z) otherwise we end-up in different bins // t.b.d: ProfileX make a new histo if non compatible status += equals("TH2XY -> PBX", h1X, (TH1D*) h2XY->ProfileX("PBX", 0,h2XY->GetYaxis()->GetNbins()+1)->ProjectionX("1", "B"),options ); status += equals("TH2XY -> PBY", h1Y, (TH1D*) h2XY->ProfileY("PBY", 0,h2XY->GetXaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); status += equals("TH2XZ -> PBX", h1X, (TH1D*) h2XZ->ProfileX("PBX", 0,h2XZ->GetYaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); status += equals("TH2XZ -> PBZ", h1Z, (TH1D*) h2XZ->ProfileY("PBZ", 0,h2XZ->GetXaxis()->GetNbins()+1)->ProjectionX("1", "B"),options,1E-12); status += equals("TH2YX -> PBY", h1Y, (TH1D*) h2YX->ProfileX("PBY", 0,h2YX->GetYaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); status += equals("TH2YX -> PBX", h1X, (TH1D*) h2YX->ProfileY("PBX", 0,h2YX->GetXaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); status += equals("TH2YZ -> PBY", h1Y, (TH1D*) h2YZ->ProfileX("PBY", 0,h2YZ->GetYaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); status += equals("TH2YZ -> PBZ", h1Z, (TH1D*) h2YZ->ProfileY("PBZ", 0,h2YZ->GetXaxis()->GetNbins()+1)->ProjectionX("1", "B"),options,1E-12); status += equals("TH2ZX -> PBZ", h1Z, (TH1D*) h2ZX->ProfileX("PBZ", 0,h2ZX->GetYaxis()->GetNbins()+1)->ProjectionX("1", "B"),options,1E-12); status += equals("TH2ZX -> PBX", h1X, (TH1D*) h2ZX->ProfileY("PBX", 0,h2ZX->GetXaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); status += equals("TH2ZY -> PBZ", h1Z, (TH1D*) h2ZY->ProfileX("PBZ", 0,h2ZY->GetYaxis()->GetNbins()+1)->ProjectionX("1", "B"),options,1E-12); status += equals("TH2ZY -> PBY", h1Y, (TH1D*) h2ZY->ProfileY("PBY", 0,h2ZY->GetXaxis()->GetNbins()+1)->ProjectionX("1", "B"),options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // 1D testing direct profiles options = cmpOptStats; status += equals("TH2XY -> PX", pe1XY, (TH1D*) h2XY->ProfileX("PX", 0,h2XY->GetYaxis()->GetNbins()+1), options); status += equals("TH2XY -> PY", pe1YX, (TH1D*) h2XY->ProfileY("PY", 0,h2XY->GetXaxis()->GetNbins()+1), options); status += equals("TH2XZ -> PX", pe1XZ, (TH1D*) h2XZ->ProfileX("PX", 0,h2XZ->GetYaxis()->GetNbins()+1), options); status += equals("TH2XZ -> PZ", pe1ZX, (TH1D*) h2XZ->ProfileY("PZ", 0,h2XZ->GetXaxis()->GetNbins()+1), options); status += equals("TH2YX -> PY", pe1YX, (TH1D*) h2YX->ProfileX("PY", 0,h2YX->GetYaxis()->GetNbins()+1), options); status += equals("TH2YX -> PX", pe1XY, (TH1D*) h2YX->ProfileY("PX", 0,h2YX->GetXaxis()->GetNbins()+1), options); status += equals("TH2YZ -> PY", pe1YZ, (TH1D*) h2YZ->ProfileX("PY", 0,h2YZ->GetYaxis()->GetNbins()+1), options); status += equals("TH2YZ -> PZ", pe1ZY, (TH1D*) h2YZ->ProfileY("PZ", 0,h2YZ->GetXaxis()->GetNbins()+1), options); status += equals("TH2ZX -> PZ", pe1ZX, (TH1D*) h2ZX->ProfileX("PZ", 0,h2ZX->GetYaxis()->GetNbins()+1), options); status += equals("TH2ZX -> PX", pe1XZ, (TH1D*) h2ZX->ProfileY("PX", 0,h2ZX->GetXaxis()->GetNbins()+1), options); status += equals("TH2ZY -> PZ", pe1ZY, (TH1D*) h2ZY->ProfileX("PZ", 0,h2ZY->GetYaxis()->GetNbins()+1), options); status += equals("TH2ZY -> PY", pe1YZ, (TH1D*) h2ZY->ProfileY("PY", 0,h2ZY->GetXaxis()->GetNbins()+1), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // 1D testing e profiles options = 0; status += equals("TH2XY -> PEX", pe1XY, (TH1D*) h2XY->ProfileX("PEX", 0,h2XY->GetYaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2XY -> PEY", pe1YX, (TH1D*) h2XY->ProfileY("PEY", 0,h2XY->GetXaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2XZ -> PEX", pe1XZ, (TH1D*) h2XZ->ProfileX("PEX", 0,h2XZ->GetYaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2XZ -> PEZ", pe1ZX, (TH1D*) h2XZ->ProfileY("PEZ", 0,h2XZ->GetXaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2YX -> PEY", pe1YX, (TH1D*) h2YX->ProfileX("PEY", 0,h2YX->GetYaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2YX -> PEX", pe1XY, (TH1D*) h2YX->ProfileY("PEX", 0,h2YX->GetXaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2YZ -> PEY", pe1YZ, (TH1D*) h2YZ->ProfileX("PEY", 0,h2YZ->GetYaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2YZ -> PEZ", pe1ZY, (TH1D*) h2YZ->ProfileY("PEZ", 0,h2YZ->GetXaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2ZX -> PEZ", pe1ZX, (TH1D*) h2ZX->ProfileX("PEZ", 0,h2ZX->GetYaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2ZX -> PEX", pe1XZ, (TH1D*) h2ZX->ProfileY("PEX", 0,h2ZX->GetXaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2ZY -> PEZ", pe1ZY, (TH1D*) h2ZY->ProfileX("PEZ", 0,h2ZY->GetYaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); status += equals("TH2ZY -> PEY", pe1YZ, (TH1D*) h2ZY->ProfileY("PEY", 0,h2ZY->GetXaxis()->GetNbins()+1)->ProjectionX("1", "E"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // 1D testing w profiles // The error is not properly propagated when build with weights :S if ( buildWithWeights ) options = cmpOptNoError; status += equals("TH2XY -> PWX", hw1XY, (TH1D*) h2XY->ProfileX("PWX", 0,h2XY->GetYaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2XY -> PWY", hw1YX, (TH1D*) h2XY->ProfileY("PWY", 0,h2XY->GetXaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2XZ -> PWX", hw1XZ, (TH1D*) h2XZ->ProfileX("PWX", 0,h2XZ->GetYaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2XZ -> PWZ", hw1ZX, (TH1D*) h2XZ->ProfileY("PWZ", 0,h2XZ->GetXaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2YX -> PWY", hw1YX, (TH1D*) h2YX->ProfileX("PWY", 0,h2YX->GetYaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2YX -> PWX", hw1XY, (TH1D*) h2YX->ProfileY("PWX", 0,h2YX->GetXaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2YZ -> PWY", hw1YZ, (TH1D*) h2YZ->ProfileX("PWY", 0,h2YZ->GetYaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2YZ -> PWZ", hw1ZY, (TH1D*) h2YZ->ProfileY("PWZ", 0,h2YZ->GetXaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2ZX -> PWZ", hw1ZX, (TH1D*) h2ZX->ProfileX("PWZ", 0,h2ZX->GetYaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2ZX -> PWX", hw1XZ, (TH1D*) h2ZX->ProfileY("PWX", 0,h2ZX->GetXaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2ZY -> PWZ", hw1ZY, (TH1D*) h2ZY->ProfileX("PWZ", 0,h2ZY->GetYaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); status += equals("TH2ZY -> PWY", hw1YZ, (TH1D*) h2ZY->ProfileY("PWY", 0,h2ZY->GetXaxis()->GetNbins()+1)->ProjectionX("1", "W"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // do THNsparse after Profile because reference histograms need to have a ResetStats // the statistics coming from a projected THNsparse has been computed using the bin centers // TH2 derived from STH3 options = cmpOptStats; status += equals("STH3 -> XY", h2XY, (TH2D*) s3->Projection(1,0), options); status += equals("STH3 -> XZ", h2XZ, (TH2D*) s3->Projection(2,0), options); status += equals("STH3 -> YX", h2YX, (TH2D*) s3->Projection(0,1), options); status += equals("STH3 -> YZ", h2YZ, (TH2D*) s3->Projection(2,1), options); status += equals("STH3 -> ZX", h2ZX, (TH2D*) s3->Projection(0,2), options); status += equals("STH3 -> ZY", h2ZY, (TH2D*) s3->Projection(1,2), options); status += equals("THn3 -> XY", h2XY, (TH2D*) n3->Projection(1,0), options); status += equals("THn3 -> XZ", h2XZ, (TH2D*) n3->Projection(2,0), options); status += equals("THn3 -> YX", h2YX, (TH2D*) n3->Projection(0,1), options); status += equals("THn3 -> YZ", h2YZ, (TH2D*) n3->Projection(2,1), options); status += equals("THn3 -> ZX", h2ZX, (TH2D*) n3->Projection(0,2), options); status += equals("THn3 -> ZY", h2ZY, (TH2D*) n3->Projection(1,2), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; // TH1 derived from STH3 options = cmpOptStats; status += equals("STH3 -> X", h1X, (TH1D*) s3->Projection(0), options); status += equals("STH3 -> Y", h1Y, (TH1D*) s3->Projection(1), options); status += equals("STH3 -> Z", h1Z, (TH1D*) s3->Projection(2), options); status += equals("THn3 -> X", h1X, (TH1D*) n3->Projection(0), options); status += equals("THn3 -> Y", h1Y, (TH1D*) n3->Projection(1), options); status += equals("THn3 -> Z", h1Z, (TH1D*) n3->Projection(2), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) std::cout << "----------------------------------------------" << std::endl; return status; } void buildProfiles() { if (buildWithWeights) { p3->Sumw2(); p2XY->Sumw2(); p2YX->Sumw2(); p2YZ->Sumw2(); p2XZ->Sumw2(); p2ZX->Sumw2(); p2ZY->Sumw2(); p1X->Sumw2(); p1Y->Sumw2(); p1Z->Sumw2(); } // use a different way to fill the histogram for (int i = 0; i < 100000; ++i) { // use in range in X but only overflow in Y and underflow/overflow in Z double x = gRandom->Uniform(lower_limitX, upper_limitX ); double y = gRandom->Uniform(lower_limitY, upper_limitY+2.); double z = gRandom->Uniform(lower_limitZ-1, upper_limitZ+1); double u = TMath::Gaus(x,0,3)*TMath::Gaus(y,3,5)*TMath::Gaus(z,-3,10); double w = 1; if (buildWithWeights) w += x*x + (y-2)*(y-2) + (z+2)*(z+2); p3->Fill(x,y,z,u,w); p2XY->Fill(x,y,u,w); p2YX->Fill(y,x,u,w); p2XZ->Fill(x,z,u,w); p2ZX->Fill(z,x,u,w); p2YZ->Fill(y,z,u,w); p2ZY->Fill(z,y,u,w); p1X->Fill(x,u,w); p1Y->Fill(y,u,w); p1Z->Fill(z,u,w); } // reset the statistics to get same statistics computed from bin centers p1X->ResetStats(); p1Y->ResetStats(); p1Z->ResetStats(); p2XY->ResetStats(); p2YX->ResetStats(); p2XZ->ResetStats(); p2ZX->ResetStats(); p2YZ->ResetStats(); p2ZY->ResetStats(); } // actual test of profile projections int compareProfiles() { int status = 0; int options = 0; // TProfile2d derived from TProfile3d options = cmpOptStats; //options = cmpOptPrint; status += equals("TProfile3D -> XY", p2XY, p3->Project3DProfile("yx"), options); status += equals("TProfile3D -> YX", p2YX, p3->Project3DProfile("xy"), options); status += equals("TProfile3D -> XZ", p2XZ, p3->Project3DProfile("zx"), options); status += equals("TProfile3D -> ZX", p2ZX, p3->Project3DProfile("xz"), options); status += equals("TProfile3D -> YZ", p2YZ, p3->Project3DProfile("zy"), options); status += equals("TProfile3D -> ZY", p2ZY, p3->Project3DProfile("yz"), options); options = 0; if ( defaultEqualOptions & cmpOptPrint ) cout << "----------------------------------------------" << endl; // TProfile1 derived from TProfile2D from TProfile3D options = cmpOptStats; //options = cmpOptDebug; TProfile2D* tmp1 = 0; status += equals("TProfile2D -> X", p1X, p2XY->ProfileX(), options); tmp1 = p3->Project3DProfile("xz"); status += equals("TProfile3D -> X", p1X, tmp1->ProfileY(), options); delete tmp1; tmp1 = 0; status += equals("TProfile2D -> Y", p1Y, p2ZY->ProfileY(), options); tmp1 = p3->Project3DProfile("xy"); status += equals("TProfile3D -> X", p1Y, tmp1->ProfileX(), options); delete tmp1; tmp1 = 0; status += equals("TProfile2D -> Z", p1Z, p2ZX->ProfileX(), options); tmp1 = p3->Project3DProfile("zy"); status += equals("TProfile3D -> Z", p1Z, tmp1->ProfileY(), options); delete tmp1; tmp1 = 0; return status; } }; int stressHistogram() { #ifdef R__WIN32 // On windows there is an order of initialization problem that lead to // 'Int_t not being in the list of types when TProfile's TClass is // initialized (via a call to IsA()->InheritsFrom(); on linux this is // not a problem because G__Base1 is initialized early; on windows with // root.exe this is not a problem because GetListOfType(kTRUE) is called // via a call to TClass::GetClass induces by the initialization of the // plugin manager. gROOT->GetListOfTypes(kTRUE); #endif r.SetSeed(initialSeed); int GlobalStatus = false; int status = false; TBenchmark bm; bm.Start("stressHistogram"); std::cout << "****************************************************************************" <buildHistograms(); //Ht->buildHistograms(2,4,5,6,8,10); status = ht->compareHistograms(); GlobalStatus += status; delete ht; printResult("Testing Histogram Projections without weights....................", status); ProjectionTester* htp = new ProjectionTester(); htp->buildProfiles(); status = htp->compareProfiles(); GlobalStatus += status; delete htp; printResult("Testing Profile Projections without weights......................", status); // Test 3-4 if ( defaultEqualOptions & cmpOptPrint ) std::cout << "**********************************\n" << " Test with weights \n" << "**********************************\n" << std::endl; TH1::SetDefaultSumw2(); ProjectionTester* ht2 = new ProjectionTester(); ht2->buildHistogramsWithWeights(); status = ht2->compareHistograms(); GlobalStatus += status; printResult("Testing Histogram Projections with weights.......................", status); delete ht2; ProjectionTester* htp2 = new ProjectionTester(true); htp2->buildProfiles(); status = htp2->compareProfiles(); GlobalStatus += status; printResult("Testing Profile Projections with weights.......................", status); delete htp2; // Test 3 // Range Tests const unsigned int numberOfRange = 3; pointer2Test rangeTestPointer[numberOfRange] = { testTH2toTH1, testTH3toTH1, testTH3toTH2 }; struct TTestSuite rangeTestSuite = { numberOfRange, "Projection with Range for Histograms and Profiles................", rangeTestPointer }; // Test 4 const unsigned int numberOfRebin = 11; pointer2Test rebinTestPointer[numberOfRebin] = { testIntegerRebin, testIntegerRebinProfile, testIntegerRebinNoName, testIntegerRebinNoNameProfile, testArrayRebin, testArrayRebinProfile, test2DRebin, test3DRebin, test2DRebinProfile, testHnRebin1, testHnRebin1}; struct TTestSuite rebinTestSuite = { numberOfRebin, "Histogram Rebinning..............................................", rebinTestPointer }; // Test 5 // Add Tests const unsigned int numberOfAdds = 22; pointer2Test addTestPointer[numberOfAdds] = { testAdd1, testAddProfile1, testAdd2, testAddProfile2, testAdd3, testAddVar1, testAddVarProf1, testAddVar2, testAddVarProf2, testAddVar3, testAdd2D3, testAdd3D3, testAdd2D1, testAdd2DProfile1, testAdd2D2, testAdd2DProfile2, testAdd3D1, testAdd3DProfile1, testAdd3D2, testAdd3DProfile2, testAddHn, testAddHn }; struct TTestSuite addTestSuite = { numberOfAdds, "Add tests for 1D, 2D and 3D Histograms and Profiles..............", addTestPointer }; // Test 6 // Multiply Tests const unsigned int numberOfMultiply = 20; pointer2Test multiplyTestPointer[numberOfMultiply] = { testMul1, testMul2, testMulVar1, testMulVar2, testMul2D1, testMul2D2, testMul3D1, testMul3D2, testMulHn, testMulHn, testMulF1D, testMulF1D2, testMulF2D, testMulF2D2, testMulF3D, testMulF3D2, testMulFND, testMulFND, testMulFND2, testMulFND2 }; struct TTestSuite multiplyTestSuite = { numberOfMultiply, "Multiply tests for 1D, 2D and 3D Histograms......................", multiplyTestPointer }; // Test 7 // Divide Tests const unsigned int numberOfDivide = 12; pointer2Test divideTestPointer[numberOfDivide] = { testDivide1, testDivide2, testDivideVar1, testDivideVar2, testDivide2D1, testDivide2D2, testDivide3D1, testDivide3D2, testDivHn1, testDivHn1, testDivHn2, testDivHn2 }; struct TTestSuite divideTestSuite = { numberOfDivide, "Divide tests for 1D, 2D and 3D Histograms........................", divideTestPointer }; // Still to do: Division for profiles // The division methods for the profiles have to be changed to // calculate the errors correctly. // Test 8 // Copy Tests const unsigned int numberOfCopy = 26; pointer2Test copyTestPointer[numberOfCopy] = { testAssign1D, testAssignProfile1D, testAssignVar1D, testAssignProfileVar1D, testCopyConstructor1D, testCopyConstructorProfile1D, testCopyConstructorVar1D, testCopyConstructorProfileVar1D, testClone1D, testCloneProfile1D, testCloneVar1D, testCloneProfileVar1D, testAssign2D, testAssignProfile2D, testCopyConstructor2D, testCopyConstructorProfile2D, testClone2D, testCloneProfile2D, testAssign3D, testAssignProfile3D, testCopyConstructor3D, testCopyConstructorProfile3D, testClone3D, testCloneProfile3D, testCloneHn, testCloneHn }; struct TTestSuite copyTestSuite = { numberOfCopy, "Copy tests for 1D, 2D and 3D Histograms and Profiles.............", copyTestPointer }; // Test 9 // WriteRead Tests const unsigned int numberOfReadwrite = 10; pointer2Test readwriteTestPointer[numberOfReadwrite] = { testWriteRead1D, testWriteReadProfile1D, testWriteReadVar1D, testWriteReadProfileVar1D, testWriteRead2D, testWriteReadProfile2D, testWriteRead3D, testWriteReadProfile3D, testWriteReadHn,testWriteReadHn }; struct TTestSuite readwriteTestSuite = { numberOfReadwrite, "Read/Write tests for 1D, 2D and 3D Histograms and Profiles.......", readwriteTestPointer }; // Test 10 // Merge Tests const unsigned int numberOfMerge = 49; pointer2Test mergeTestPointer[numberOfMerge] = { testMerge1D, testMergeProf1D, testMergeVar1D, testMergeProfVar1D, testMerge2D, testMergeProf2D, testMerge3D, testMergeProf3D, testMergeHn, testMergeHn, testMerge1DLabelSame, testMergeProf1DLabelSame, testMerge2DLabelSame, testMergeProf2DLabelSame, testMerge3DLabelSame, testMergeProf3DLabelSame, testMerge1DLabelDiff, testMergeProf1DLabelDiff, testMerge2DLabelDiff, testMergeProf2DLabelDiff, testMerge3DLabelDiff, testMergeProf3DLabelDiff, testMerge1DLabelAll, testMergeProf1DLabelAll, testMerge2DLabelAll, testMergeProf2DLabelAll, testMerge3DLabelAll, testMergeProf3DLabelAll, testMerge1DLabelAllDiff, testMergeProf1DLabelAllDiff, testMerge2DLabelAllDiff, testMergeProf2DLabelAllDiff, testMerge3DLabelAllDiff, testMergeProf3DLabelAllDiff, testMerge1DDiff, testMergeProf1DDiff, testMerge2DDiff, testMergeProf2DDiff, testMerge3DDiff, testMergeProf3DDiff, testMerge1DDiffEmpty, testMerge2DDiffEmpty, testMerge3DDiffEmpty, testMergeProf1DDiffEmpty, testMerge1DRebin, testMerge2DRebin, testMerge3DRebin, testMerge1DRebinProf, testMerge1DNoLimits }; struct TTestSuite mergeTestSuite = { numberOfMerge, "Merge tests for 1D, 2D and 3D Histograms and Profiles............", mergeTestPointer }; // Test 11 // Label Tests const unsigned int numberOfLabel = 4; pointer2Test labelTestPointer[numberOfLabel] = { testLabel, testLabel2DX, testLabel2DY, testLabelsInflateProf1D }; struct TTestSuite labelTestSuite = { numberOfLabel, "Label tests for 1D and 2D Histograms ............................", labelTestPointer }; // Test 12 // Interpolation Tests const unsigned int numberOfInterpolation = 4; pointer2Test interpolationTestPointer[numberOfInterpolation] = { testInterpolation1D, testInterpolationVar1D, testInterpolation2D, testInterpolation3D }; struct TTestSuite interpolationTestSuite = { numberOfInterpolation, "Interpolation tests for Histograms...............................", interpolationTestPointer }; // Test 13 // Scale Tests const unsigned int numberOfScale = 3; pointer2Test scaleTestPointer[numberOfScale] = { testScale1DProf, testScale2DProf, testScale3DProf }; struct TTestSuite scaleTestSuite = { numberOfScale, "Scale tests for Profiles.........................................", scaleTestPointer }; // Test 14 // Integral Tests const unsigned int numberOfIntegral = 3; pointer2Test integralTestPointer[numberOfIntegral] = { testH1Integral, testH2Integral, testH3Integral }; struct TTestSuite integralTestSuite = { numberOfIntegral, "Integral tests for Histograms....................................", integralTestPointer }; const unsigned int numberOfBufferTest = 4; pointer2Test bufferTestPointer[numberOfBufferTest] = { testH1Buffer, testH1BufferWeights, testH2Buffer, testH3Buffer }; struct TTestSuite bufferTestSuite = { numberOfBufferTest, "Buffer tests for Histograms......................................", bufferTestPointer }; const unsigned int numberOfExtendTest = 4; pointer2Test extendTestPointer[numberOfExtendTest] = { testH1Extend, testH2Extend, testProfileExtend, testProfile2Extend }; struct TTestSuite extendTestSuite = { numberOfExtendTest, "Extend axis tests for Histograms.................................", extendTestPointer }; // Test 15 // TH1-THn[Sparse] Conversions Tests const unsigned int numberOfConversions = 3; pointer2Test conversionsTestPointer[numberOfConversions] = { testConversion1D, testConversion2D, testConversion3D, }; struct TTestSuite conversionsTestSuite = { numberOfConversions, "TH1-THn[Sparse] Conversion tests.................................", conversionsTestPointer }; // Test 16 // FillData Tests const unsigned int numberOfFillData = 12; pointer2Test fillDataTestPointer[numberOfFillData] = { testSparseData1DFull, testSparseData1DSparse, testSparseData2DFull, testSparseData2DSparse, testSparseData3DFull, testSparseData3DSparse, testBinDataData1D, testBinDataData2D, testBinDataData3D, testBinDataData1DInt, testBinDataData2DInt, testBinDataData3DInt, }; struct TTestSuite fillDataTestSuite = { numberOfFillData, "FillData tests for Histograms and Sparses........................", fillDataTestPointer }; // Combination of tests const unsigned int numberOfSuits = 16; struct TTestSuite* testSuite[numberOfSuits]; testSuite[ 0] = &rangeTestSuite; testSuite[ 1] = &rebinTestSuite; testSuite[ 2] = &addTestSuite; testSuite[ 3] = &multiplyTestSuite; testSuite[ 4] = ÷TestSuite; testSuite[ 5] = ©TestSuite; testSuite[ 6] = &readwriteTestSuite; testSuite[ 7] = &mergeTestSuite; testSuite[ 8] = &labelTestSuite; testSuite[ 9] = &interpolationTestSuite; testSuite[10] = &scaleTestSuite; testSuite[11] = &integralTestSuite; testSuite[12] = &bufferTestSuite; testSuite[13] = &extendTestSuite; testSuite[14] = &conversionsTestSuite; testSuite[15] = &fillDataTestSuite; status = 0; for ( unsigned int i = 0; i < numberOfSuits; ++i ) { bool internalStatus = false; // #pragma omp parallel // #pragma omp for reduction(|: internalStatus) for ( unsigned int j = 0; j < testSuite[i]->nTests; ++j ) { internalStatus |= testSuite[i]->tests[j](); } printResult( testSuite[i]->suiteName, internalStatus); status += internalStatus; } GlobalStatus += status; // Test 17 // Reference Tests const unsigned int numberOfRefRead = 7; pointer2Test refReadTestPointer[numberOfRefRead] = { testRefRead1D, testRefReadProf1D, testRefRead2D, testRefReadProf2D, testRefRead3D, testRefReadProf3D, testRefReadSparse }; struct TTestSuite refReadTestSuite = { numberOfRefRead, "Reference File Read for Histograms and Profiles..................", refReadTestPointer }; if ( refFileOption == refFileWrite ) { refFile = TFile::Open(refFileName, "RECREATE"); } else { refFile = TFile::Open(refFileName); } if ( refFile != 0 ) { r.SetSeed(8652); status = 0; for ( unsigned int j = 0; j < refReadTestSuite.nTests; ++j ) { status += refReadTestSuite.tests[j](); } printResult( refReadTestSuite.suiteName, status); GlobalStatus += status; } else { Warning("stressHistogram", "No reference file found"); } bm.Stop("stressHistogram"); std::cout <<"****************************************************************************\n"; bm.Print("stressHistogram"); const double reftime = 123; // needs to be updated // ref time on pcbrun4 double rootmarks = 900 * reftime / bm.GetCpuTime("stressHistogram"); std::cout << " ROOTMARKS = " << rootmarks << " ROOT version: " << gROOT->GetVersion() << "\t" << gROOT->GetGitBranch() << "@" << gROOT->GetGitCommit() << std::endl; std::cout <<"****************************************************************************\n"; return GlobalStatus; } std::ostream& operator<<(std::ostream& out, TH1D* h) { out << h->GetName() << ": [" << h->GetBinContent(1); for ( Int_t i = 1; i < h->GetNbinsX(); ++i ) out << ", " << h->GetBinContent(i); out << "] "; return out; } void printResult(const char* msg, bool status) { static int counter = 1; std::cout << "Test "; std::cout.width(2); std::cout<< counter << ": " << msg << (status?"FAILED":"OK") << std::endl; counter += 1; } void FillVariableRange(Double_t v[numberOfBins+1]) { //Double_t v[numberOfBins+1]; Double_t minLimit = (maxRange-minRange) / (numberOfBins*2); Double_t maxLimit = (maxRange-minRange)*4/ (numberOfBins); v[0] = 0; for ( Int_t i = 1; i < numberOfBins + 1; ++i ) { Double_t limit = r.Uniform(minLimit, maxLimit); v[i] = v[i-1] + limit; } Double_t k = (maxRange-minRange)/v[numberOfBins]; for ( Int_t i = 0; i < numberOfBins + 1; ++i ) { v[i] = v[i] * k + minRange; } } void FillHistograms(TH1D* h1, TH1D* h2, Double_t c1, Double_t c2) { for ( Int_t e = 0; e < nEvents; ++e ) { Double_t value = r.Uniform(0.9 * minRange, 1.1 * maxRange); h1->Fill(value, c1); h2->Fill(value, c2); } } void FillProfiles(TProfile* p1, TProfile* p2, Double_t c1, Double_t c2) { for ( Int_t e = 0; e < nEvents; ++e ) { Double_t x = r.Uniform(0.9 * minRange, 1.1 * maxRange); Double_t y = r.Uniform(0.9 * minRange, 1.1 * maxRange); p1->Fill(x, y, c1); p2->Fill(x, y, c2); } } // Methods for histogram comparisions int equals(const char* msg, THnBase* h1, THnBase* h2, int options, double ERRORLIMIT) { options = options | defaultEqualOptions; bool print = options & cmpOptPrint; bool debug = options & cmpOptDebug; bool compareError = ! (options & cmpOptNoError); int differents = 0; for ( int i = 0; i <= h1->GetAxis(0)->GetNbins() + 1; ++i ) for ( int j = 0; j <= h1->GetAxis(1)->GetNbins() + 1; ++j ) for ( int h = 0; h <= h1->GetAxis(2)->GetNbins() + 1; ++h ) { Double_t x = h1->GetAxis(0)->GetBinCenter(i); Double_t y = h1->GetAxis(1)->GetBinCenter(j); Double_t z = h1->GetAxis(2)->GetBinCenter(h); Int_t bin[3] = {i, j, h}; if (debug) { std::cout << equals(x, h2->GetAxis(0)->GetBinCenter(i), ERRORLIMIT) << " " << equals(y, h2->GetAxis(1)->GetBinCenter(j), ERRORLIMIT) << " " << equals(z, h2->GetAxis(2)->GetBinCenter(h), ERRORLIMIT) << " " << "[" << x << "," << y << "," << z << "]: " << h1->GetBinContent(bin) << " +/- " << h1->GetBinError(bin) << " | " << h2->GetBinContent(bin) << " +/- " << h2->GetBinError(bin) << " | " << equals(h1->GetBinContent(bin), h2->GetBinContent(bin), ERRORLIMIT) << " " << equals(h1->GetBinError(bin) , h2->GetBinError(bin), ERRORLIMIT) << " " << differents << " " << (fabs(h1->GetBinContent(bin) - h2->GetBinContent(bin))) << std::endl; } differents += equals(x, h2->GetAxis(0)->GetBinCenter(i), ERRORLIMIT); differents += equals(y, h2->GetAxis(1)->GetBinCenter(j), ERRORLIMIT); differents += equals(z, h2->GetAxis(2)->GetBinCenter(h), ERRORLIMIT); differents += equals(h1->GetBinContent(bin), h2->GetBinContent(bin), ERRORLIMIT); if ( compareError ) differents += equals(h1->GetBinError(bin) , h2->GetBinError(bin), ERRORLIMIT); } // Statistical tests: // No statistical tests possible for THnBase so far... // if ( compareStats ) // differents += compareStatistics( h1, h2, debug, ERRORLIMIT); if ( print || debug ) std::cout << msg << ": \t" << (differents?"FAILED":"OK") << std::endl; delete h2; return differents; } int equals(const char* msg, THnBase* s, TH1* h2, int options, double ERRORLIMIT) { options = options | defaultEqualOptions; bool print = options & cmpOptPrint; bool debug = options & cmpOptDebug; bool compareError = ! (options & cmpOptNoError); int differents = 0; const int dim ( s->GetNdimensions() ); if ( dynamic_cast(h2) ) { if ( dim != 3 ) return 1; } else if ( dynamic_cast(h2) ) { if ( dim != 2 ) return 1; } else if ( dim != 1 ) return 1; TArray* array = dynamic_cast(h2); if ( !array ) Fatal( "equals(const char* msg, THnBase* s, TH1* h2, int options, double ERRORLIMIT)" ,"NO ARRAY!"); Int_t* coord = new Int_t[3]; for (Long64_t i = 0; i < s->GetNbins(); ++i) { Double_t v1 = s->GetBinContent(i, coord); Double_t err1 = s->GetBinError(coord); int bin = h2->GetBin(coord[0], coord[1], coord[2]); Double_t v2 = h2->GetBinContent(bin); Double_t err2 = h2->GetBinError(bin); differents += equals(v1, v2, ERRORLIMIT); if ( compareError ) differents += equals(err1 , err2, ERRORLIMIT); } for (Long64_t i = 0; i < array->GetSize(); ++i) { h2->GetBinXYZ(i, coord[0], coord[1], coord[2]); Double_t v1 = s->GetBinContent(coord); Double_t err1 = s->GetBinError(coord); Double_t v2 = h2->GetBinContent(i); Double_t err2 = h2->GetBinError(i); differents += equals(v1, v2, ERRORLIMIT); if ( compareError ) differents += equals(err1 , err2, ERRORLIMIT); } if ( print || debug ) std::cout << msg << ": \t" << (differents?"FAILED":"OK") << std::endl; delete h2; return differents; } int equals(const char* msg, TH3D* h1, TH3D* h2, int options, double ERRORLIMIT) { options = options | defaultEqualOptions; bool print = options & cmpOptPrint; bool debug = options & cmpOptDebug; bool compareError = ! (options & cmpOptNoError); bool compareStats = options & cmpOptStats; int differents = ( h1 == h2 ); // Check they are not the same histogram! if (debug) { std::cout << static_cast(h1) << " " << static_cast(h2) << " " << (h1 == h2 ) << " " << differents << std::endl; } for ( int i = 0; i <= h1->GetNbinsX() + 1; ++i ) for ( int j = 0; j <= h1->GetNbinsY() + 1; ++j ) for ( int h = 0; h <= h1->GetNbinsZ() + 1; ++h ) { Double_t x = h1->GetXaxis()->GetBinCenter(i); Double_t y = h1->GetYaxis()->GetBinCenter(j); Double_t z = h1->GetZaxis()->GetBinCenter(h); if (debug) { std::cout << equals(x, h2->GetXaxis()->GetBinCenter(i), ERRORLIMIT) << " " << equals(y, h2->GetYaxis()->GetBinCenter(j), ERRORLIMIT) << " " << equals(z, h2->GetZaxis()->GetBinCenter(h), ERRORLIMIT) << " " << "[" << x << "," << y << "," << z << "]: " << h1->GetBinContent(i,j,h) << " +/- " << h1->GetBinError(i,j,h) << " | " << h2->GetBinContent(i,j,h) << " +/- " << h2->GetBinError(i,j,h) << " | " << equals(h1->GetBinContent(i,j,h), h2->GetBinContent(i,j,h), ERRORLIMIT) << " " << equals(h1->GetBinError(i,j,h) , h2->GetBinError(i,j,h), ERRORLIMIT) << " " << differents << " " << (fabs(h1->GetBinContent(i,j,h) - h2->GetBinContent(i,j,h))) << std::endl; } differents += (bool) equals(x, h2->GetXaxis()->GetBinCenter(i), ERRORLIMIT); differents += (bool) equals(y, h2->GetYaxis()->GetBinCenter(j), ERRORLIMIT); differents += (bool) equals(z, h2->GetZaxis()->GetBinCenter(h), ERRORLIMIT); differents += (bool) equals(h1->GetBinContent(i,j,h), h2->GetBinContent(i,j,h), ERRORLIMIT); if ( compareError ) differents += (bool) equals(h1->GetBinError(i,j,h) , h2->GetBinError(i,j,h), ERRORLIMIT); } // Statistical tests: if ( compareStats ) differents += compareStatistics( h1, h2, debug, ERRORLIMIT); if ( print || debug ) std::cout << msg << ": \t" << (differents?"FAILED":"OK") << std::endl; delete h2; return differents; } int equals(const char* msg, TH2D* h1, TH2D* h2, int options, double ERRORLIMIT) { options = options | defaultEqualOptions; bool print = options & cmpOptPrint; bool debug = options & cmpOptDebug; bool compareError = ! (options & cmpOptNoError); bool compareStats = options & cmpOptStats; int differents = ( h1 == h2 ); // Check they are not the same histogram! if (debug) { std::cout << static_cast(h1) << " " << static_cast(h2) << " " << (h1 == h2 ) << " " << differents << std::endl; } for ( int i = 0; i <= h1->GetNbinsX() + 1; ++i ) for ( int j = 0; j <= h1->GetNbinsY() + 1; ++j ) { Double_t x = h1->GetXaxis()->GetBinCenter(i); Double_t y = h1->GetYaxis()->GetBinCenter(j); if (debug) { std::cout << equals(x, h2->GetXaxis()->GetBinCenter(i), ERRORLIMIT) << " " << equals(y, h2->GetYaxis()->GetBinCenter(j), ERRORLIMIT) << " " << "[" << x << "," << y << "]: " << h1->GetBinContent(i,j) << " +/- " << h1->GetBinError(i,j) << " | " << h2->GetBinContent(i,j) << " +/- " << h2->GetBinError(i,j) << " | " << equals(h1->GetBinContent(i,j), h2->GetBinContent(i,j), ERRORLIMIT) << " " << equals(h1->GetBinError(i,j) , h2->GetBinError(i,j), ERRORLIMIT) << " " << differents << " " << (fabs(h1->GetBinContent(i,j) - h2->GetBinContent(i,j))) << std::endl; } differents += (bool) equals(x, h2->GetXaxis()->GetBinCenter(i), ERRORLIMIT); differents += (bool) equals(y, h2->GetYaxis()->GetBinCenter(j), ERRORLIMIT); differents += (bool) equals(h1->GetBinContent(i,j), h2->GetBinContent(i,j), ERRORLIMIT); if ( compareError ) differents += (bool) equals(h1->GetBinError(i,j) , h2->GetBinError(i,j), ERRORLIMIT); } // Statistical tests: if ( compareStats ) differents += compareStatistics( h1, h2, debug, ERRORLIMIT); if ( print || debug ) std::cout << msg << ": \t" << (differents?"FAILED":"OK") << std::endl; delete h2; return differents; } int equals(const char* msg, TH1D* h1, TH1D* h2, int options, double ERRORLIMIT) { options = options | defaultEqualOptions; bool print = options & cmpOptPrint; bool debug = options & cmpOptDebug; bool compareError = ! (options & cmpOptNoError); bool compareStats = options & cmpOptStats; int differents = ( h1 == h2 ); // Check they are not the same histogram! if (debug) { std::cout << static_cast(h1) << " " << static_cast(h2) << " " << (h1 == h2 ) << " " << differents << std::endl; } // check axis differents += (bool) equals(h1->GetXaxis()->GetNbins() , h2->GetXaxis()->GetNbins() ); if (debug) { cout << "Nbins = " << h1->GetXaxis()->GetNbins() << " | " << h2->GetXaxis()->GetNbins() << " | " << differents << std::endl; } differents += (bool) equals(h1->GetXaxis()->GetXmin() , h2->GetXaxis()->GetXmin() ); if (debug) { cout << "Xmin = " << h1->GetXaxis()->GetXmin() << " | " << h2->GetXaxis()->GetXmin() << " | " << differents << std::endl; } differents += (bool) equals(h1->GetXaxis()->GetXmax() , h2->GetXaxis()->GetXmax() ); if (debug) { cout << "Xmax = " << h1->GetXaxis()->GetXmax() << " | " << h2->GetXaxis()->GetXmax() << endl; } for ( int i = 0; i <= h1->GetNbinsX() + 1; ++i ) { Double_t x = h1->GetXaxis()->GetBinCenter(i); differents += (bool) equals(x, h2->GetXaxis()->GetBinCenter(i), ERRORLIMIT); differents += (bool) equals(h1->GetBinContent(i), h2->GetBinContent(i), ERRORLIMIT); if ( compareError ) differents += (bool) equals(h1->GetBinError(i), h2->GetBinError(i), ERRORLIMIT); if ( debug ) { std::cout << equals(x, h2->GetXaxis()->GetBinCenter(i), ERRORLIMIT) << " [" << x << "]: " << h1->GetBinContent(i) << " +/- " << h1->GetBinError(i) << " | " << h2->GetBinContent(i) << " +/- " << h2->GetBinError(i) << " | " << equals(h1->GetBinContent(i), h2->GetBinContent(i), ERRORLIMIT) << " " << equals(h1->GetBinError(i), h2->GetBinError(i), ERRORLIMIT) << " " << differents << std::endl; } } // Statistical tests: if ( compareStats ) differents += compareStatistics( h1, h2, debug, ERRORLIMIT); if ( print || debug ) std::cout << msg << ": \t" << (differents?"FAILED":"OK") << std::endl; delete h2; return differents; } int equals(Double_t n1, Double_t n2, double ERRORLIMIT) { if (n1 != 0) return fabs( n1 - n2 ) > ERRORLIMIT * fabs(n1); else return fabs(n2) > ERRORLIMIT; } int compareStatistics( TH1* h1, TH1* h2, bool debug, double ERRORLIMIT) { int differents = 0; int pr = std::cout.precision(12); int precLevel = gErrorIgnoreLevel; // switch off Info mesaage from chi2 test if (!debug) gErrorIgnoreLevel = 1001; if (debug) h2->Print(); std::string option = "WW OF UF"; const char * opt = option.c_str(); double chi_12 = h1->Chi2Test(h2, opt); double chi_21 = h2->Chi2Test(h1, opt); differents += (bool) equals(chi_12, 1, ERRORLIMIT); differents += (bool) equals(chi_21, 1, ERRORLIMIT); differents += (bool) equals(chi_12, chi_21, ERRORLIMIT); if ( debug ) std::cout << "Chi2Test " << chi_12 << " " << chi_21 << " | " << differents << std::endl; if (!debug) gErrorIgnoreLevel = precLevel; // Mean differents += (bool) equals(h1->GetMean(1), h2->GetMean(1), ERRORLIMIT); if ( debug ) std::cout << "Mean: " << h1->GetMean(1) << " " << h2->GetMean(1) << " | " << fabs( h1->GetMean(1) - h2->GetMean(1) ) << " " << differents << std::endl; // RMS differents += (bool) equals( h1->GetRMS(1), h2->GetRMS(1), ERRORLIMIT); if ( debug ) std::cout << "RMS: " << h1->GetRMS(1) << " " << h2->GetRMS(1) << " | " << fabs( h1->GetRMS(1) - h2->GetRMS(1) ) << " " << differents << std::endl; // Number of Entries // check if is an unweighted histogram compare entries and effective entries // otherwise only effective entries since entries do not make sense for an unweighted histogram // to check if is weighted - check if sum of weights == effective entries // if (h1->GetEntries() == h1->GetEffectiveEntries() ) { double stats1[TH1::kNstat]; h1->GetStats(stats1); double stats2[TH1::kNstat]; h2->GetStats(stats2); // check first sum of weights differents += (bool) equals( stats1[0], stats2[0], 100*ERRORLIMIT); if ( debug ) std::cout << "Sum Of Weigths: " << stats1[0] << " " << stats2[0] << " | " << fabs( stats1[0] - stats2[0] ) << " " << differents << std::endl; if (TMath::AreEqualRel(stats1[0], h1->GetEffectiveEntries() , 1.E-12) ) { // unweighted histograms - check also number of entries differents += (bool) equals( h1->GetEntries(), h2->GetEntries(), 100*ERRORLIMIT); if ( debug ) std::cout << "Entries: " << h1->GetEntries() << " " << h2->GetEntries() << " | " << fabs( h1->GetEntries() - h2->GetEntries() ) << " " << differents << std::endl; } // Number of Effective Entries differents += (bool) equals( h1->GetEffectiveEntries(), h2->GetEffectiveEntries(), 100*ERRORLIMIT); if ( debug ) std::cout << "Eff Entries: " << h1->GetEffectiveEntries() << " " << h2->GetEffectiveEntries() << " | " << fabs( h1->GetEffectiveEntries() - h2->GetEffectiveEntries() ) << " " << differents << std::endl; std::cout.precision(pr); return differents; } int main(int argc, char** argv) { TApplication* theApp = 0; //TH1::SetDefaultSumw2(); if ( __DRAW__ ) theApp = new TApplication("App",&argc,argv); if (argc > 1) { // for changing printing option (0 default, 1 print all test, 2 debug) defaultEqualOptions = atoi(argv[1] ); } int ret = stressHistogram(); if ( __DRAW__ ) { theApp->Run(); delete theApp; theApp = 0; } gROOT->CloseFiles(); return ret; }