JGizmo/JHistogram2D.cc

Go to the documentation of this file.

#include <string>
#include <iostream>
#include <fstream>
#include <vector>
 
#include "TROOT.h"
#include "TFile.h"
#include "TH2D.h"
#include "TF2.h"
#include "TRandom3.h"
 
#include "JLang/JToken.hh"
#include "JTools/JAbstractHistogram.hh"
#include "JGizmo/JGizmoToolkit.hh"
 
#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"
 
 
/**
 * \file
 *
 * Program to create TH2D and fill according given formula.
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;
 
  typedef JToken<';'>                  JToken_t;
  typedef JAbstractHistogram<Double_t> JHistogram_t;
 
  string            outputFile;
  string            inputFile;
  string            formula;
  vector<JToken_t>  parameters;
  size_t            numberOfEvents;
  string            title;
  JHistogram_t      X;
  JHistogram_t      Y;
  bool              logx;
  bool              logy;
  bool              sumw2;
  UInt_t            seed;
  int               debug;
 
  try {
 
    JParser<> zap("Program to create TH2D and fill according given formula.");
    
    zap['o'] = make_field(outputFile);
    zap['f'] = make_field(inputFile)       = "";
    zap['F'] = make_field(formula)         = "";
    zap['@'] = make_field(parameters)      = JPARSER::initialised();
    zap['n'] = make_field(numberOfEvents)  = 0;
    zap['T'] = make_field(title)           = "h0";
    zap['x'] = make_field(X)               = JHistogram_t(100, -1.0, +1.0);
    zap['y'] = make_field(Y)               = JHistogram_t(100, -1.0, +1.0);
    zap['X'] = make_field(logx);
    zap['Y'] = make_field(logy);
    zap['s'] = make_field(sumw2);
    zap['S'] = make_field(seed)            = 0;
    zap['d'] = make_field(debug)           = 1;
 
    zap(argc, argv);
  }
  catch(const exception &error) {
    FATAL(error.what() << endl);
  }
 
 
  if ((formula != "" && inputFile != "") ||
      (formula == "" && inputFile == "")) {
    FATAL("Specify input file or formula." << endl);
  }
 
  gRandom->SetSeed(seed);
 
  TFile out(outputFile.c_str(), "recreate");
 
  const string::size_type pos = title.rfind('/');
 
  if (pos != string::npos) {
 
    const string dir = title.substr(0, pos);
 
    out.mkdir(dir.c_str());
    out.cd   (dir.c_str());
 
    title = title.substr(pos + 1);
  }
 
  TH2D h0(title.c_str(), NULL,
          X.getNumberOfBins(), X.getLowerLimit(), X.getUpperLimit(),
          Y.getNumberOfBins(), Y.getLowerLimit(), Y.getUpperLimit());
 
  if        (formula != "") {
 
    TF2 f2("f2", formula.c_str(),
           logx ? pow(10.0, X.getLowerLimit()) : X.getLowerLimit(),
           logx ? pow(10.0, X.getUpperLimit()) : X.getUpperLimit(),
           logy ? pow(10.0, Y.getLowerLimit()) : Y.getLowerLimit(),
           logy ? pow(10.0, Y.getUpperLimit()) : Y.getUpperLimit());
 
    for (vector<JToken_t>::const_iterator i = parameters.begin(); i != parameters.end(); ++i) {
      f2.FixParameter(getParameter(*i), getValue(*i));
    }
 
    if (numberOfEvents > 0) {
 
      h0.Sumw2();
 
      Double_t x, y;
 
      for (size_t i = 0; i != numberOfEvents; ++i) {
 
        f2.GetRandom2(x, y, gRandom);
 
        h0.Fill(logx ? log10(x) : x,
                logy ? log10(y) : y);
      }
 
    } else {
 
      for (Int_t ix = 1; ix <= h0.GetXaxis()->GetNbins(); ++ix) {
        for (Int_t iy = 1; iy <= h0.GetYaxis()->GetNbins(); ++iy) {
          h0.SetBinContent(ix, iy, f2.Eval(h0.GetXaxis()->GetBinCenter(ix),
                                           h0.GetYaxis()->GetBinCenter(iy)));
        }
      }
    }
  } else if (inputFile != "") {
 
    if (sumw2) {
      h0.Sumw2();
    }
 
    ifstream in(inputFile.c_str());
 
    for (double x, y; in >> x >> y; ) {
      h0.Fill(x, y);
    }
 
    in.close();
  }
 
  out.Write();
  out.Close();
}