29{
32
35 bool reverse;
37
38 try {
39
40 JParser<> zap(
"Auxiliary program to print quantiles from 1D histogram.");
41
46
47 zap(argc, argv);
48 }
49 catch(const exception &error) {
50 FATAL(error.what() << endl);
51 }
52
53
54 if (Q.empty()) {
55 FATAL(
"No quantiles." << endl);
56 }
57
58
59 for (vector<JRootObjectID>::const_iterator input = inputFile.begin(); input != inputFile.end(); ++input) {
60
61 DEBUG(
"Input: " << *input << endl);
62
64
65 if (dir == NULL) {
66 ERROR(
"File: " << input->getFullFilename() <<
" not opened." << endl);
67 continue;
68 }
69
70 const TRegexp regexp(input->getObjectName());
71
72 TIter iter(dir->GetListOfKeys());
73
74 for (TKey* key; (
key = (TKey*) iter.Next()) != NULL; ) {
75
76 const TString tag(
key->GetName());
77
78 DEBUG(
"Key: " << tag <<
" match = " << tag.Contains(regexp) << endl);
79
80
81
82 if (tag.Contains(regexp) &&
isTObject(key)) {
83
85
86 try {
87
88 TH1& h1 = dynamic_cast<TH1&>(*object);
89
90 Double_t W = 0.0;
91
92 for (Int_t i = 0; i <= h1.GetXaxis()->GetNbins() + 1; ++i) {
93 W += h1.GetBinContent(i);
94 }
95
96 if (W != 0.0) {
97
98 Double_t w = 0.0;
99
100 if (!reverse) {
101
102 for (int i = 0, k = 0; i <= h1.GetXaxis()->GetNbins() + 1; ++i) {
103
104 w += h1.GetBinContent(i);
105
106 for ( ; k != (int) Q.size() && w >= Q[k]*W; ++k) {
107 cout << h1.GetName() <<
' ' <<
FIXED(4,2) << Q[k] <<
' ' <<
FIXED(20,10) << h1.GetXaxis()->GetBinCenter(i) << endl;
108 }
109
110 }
111
112 } else {
113
114 for (int i = h1.GetXaxis()->GetNbins() + 1, k = 0; i >= 0; --i) {
115
116 w += h1.GetBinContent(i);
117
118 for ( ; k != (int) Q.size() && w >= Q[k]*W; ++k) {
119 cout << h1.GetName() <<
' ' <<
FIXED(4,2) << Q[k] <<
' ' <<
FIXED(20,10) << h1.GetXaxis()->GetBinCenter(i) << endl;
120 }
121 }
122 }
123 }
124 }
125 catch(exception&) {
126 ERROR(
"Not available for other objects than 1D histograms." << endl);
127 }
128 }
129 }
130 }
131}
#define DEBUG(A)
Message macros.
#define make_field(A,...)
macro to convert parameter to JParserTemplateElement object
Utility class to parse command line options.
TDirectory * getDirectory(const JRootObjectID &id)
Get TDirectory pointer.
bool isTObject(const TKey *key)
Check if given key corresponds to a TObject.
This name space includes all other name spaces (except KM3NETDAQ, KM3NET and ANTARES).
Auxiliary data structure for floating point format specification.