ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/UserCode/cbrown/AnalysisFramework/Plotting/Modules/Systematics.C
Revision: 1.22
Committed: Wed Aug 31 06:53:52 2011 UTC (13 years, 8 months ago) by buchmann
Content type: text/plain
Branch: MAIN
Changes since 1.21: +7 -1 lines
Log Message:
Readied SUSY scan, setup and systematics; included PDF placeholder

File Contents

# User Rev Content
1 buchmann 1.1 #include <iostream>
2     #include <vector>
3     #include <sys/stat.h>
4    
5     #include <TMath.h>
6     #include <TColor.h>
7     #include <TPaveText.h>
8     #include <TRandom.h>
9     #include <TF1.h>
10    
11     #ifndef SampleClassLoaded
12     #include "ActiveSamples.C"
13     #endif
14    
15     #ifndef Verbosity
16     #define Verbosity 0
17     #endif
18    
19     #include <TFile.h>
20     #include <TTree.h>
21     #include <TH1.h>
22     #include <TCut.h>
23     #include <TMath.h>
24     #include <TLine.h>
25     #include <TCanvas.h>
26     #include <TProfile.h>
27     #include <TF1.h>
28    
29    
30    
31     Int_t nBins = 100;
32     Float_t jzbMin = -207;
33     Float_t jzbMax = 243;
34     Float_t jzbSel = 100;
35     int iplot=0;
36     int verbose=0;
37 buchmann 1.2 string geqleq;
38     string mcjzbexpression;
39 buchmann 1.4 bool automatized=false;//if we're running this fully automatized we don't want each function to flood the screen
40 buchmann 1.2
41     TString geq_or_leq() {
42     if(geqleq=="geq") return TString(">=");
43     if(geqleq=="leq") return TString("<=");
44     return TString("GEQ_OR_LEQ_ERROR");
45     }
46 buchmann 1.1
47 buchmann 1.6 TString ngeq_or_leq() {
48     if(geqleq=="geq") return TString("<=");
49     if(geqleq=="leq") return TString(">=");
50     return TString("NGEQ_OR_LEQ_ERROR");
51     }
52    
53 buchmann 1.1 //______________________________________________________________________________
54     Double_t Interpolate(Double_t x, TH1 *histo)
55     {
56     // Given a point x, approximates the value via linear interpolation
57     // based on the two nearest bin centers
58     // Andy Mastbaum 10/21/08
59     // in newer ROOT versions but not in the one I have so I had to work around that ...
60    
61     Int_t xbin = histo->FindBin(x);
62     Double_t x0,x1,y0,y1;
63    
64     if(x<=histo->GetBinCenter(1)) {
65     return histo->GetBinContent(1);
66     } else if(x>=histo->GetBinCenter(histo->GetNbinsX())) {
67     return histo->GetBinContent(histo->GetNbinsX());
68     } else {
69     if(x<=histo->GetBinCenter(xbin)) {
70     y0 = histo->GetBinContent(xbin-1);
71     x0 = histo->GetBinCenter(xbin-1);
72     y1 = histo->GetBinContent(xbin);
73     x1 = histo->GetBinCenter(xbin);
74     } else {
75     y0 = histo->GetBinContent(xbin);
76     x0 = histo->GetBinCenter(xbin);
77     y1 = histo->GetBinContent(xbin+1);
78     x1 = histo->GetBinCenter(xbin+1);
79     }
80     return y0 + (x-x0)*((y1-y0)/(x1-x0));
81     }
82     }
83    
84 buchmann 1.7 //____________________________________________________________________________________
85     // Plotting with all contributions, i.e. sidebands, peak, osof,ossf ... (for a systematic)
86     float allcontributionsplot(TTree* events, TCut kBaseCut, TCut kMassCut, TCut kSidebandCut, TCut JZBPosCut, TCut JZBNegCut) {
87     iplot++;
88     int count=iplot;
89     // Define new histogram
90     string hname=GetNumericHistoName();
91     TH1F* hossfp = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
92     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kMassCut&&JZBPosCut&&cutOSSF,"goff");
93     hname=GetNumericHistoName();
94     TH1F* hossfn = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
95     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kMassCut&&JZBNegCut&&cutOSSF,"goff");
96    
97     hname=GetNumericHistoName();
98     TH1F* hosofp = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
99     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kMassCut&&JZBPosCut&&cutOSOF,"goff");
100     hname=GetNumericHistoName();
101     TH1F* hosofn = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
102     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kMassCut&&JZBNegCut&&cutOSOF,"goff");
103    
104     hname=GetNumericHistoName();
105     TH1F* sbhossfp = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
106     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kSidebandCut&&JZBPosCut&&cutOSSF,"goff");
107     hname=GetNumericHistoName();
108     TH1F* sbhossfn = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
109     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kSidebandCut&&JZBNegCut&&cutOSSF,"goff");
110    
111     hname=GetNumericHistoName();
112     TH1F* sbhosofp = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
113     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kSidebandCut&&JZBPosCut&&cutOSOF,"goff");
114     hname=GetNumericHistoName();
115     TH1F* sbhosofn = new TH1F(hname.c_str(),hname.c_str(),1,-14000,14000);
116     events->Draw(TString(mcjzbexpression)+">>"+TString(hname),kBaseCut&&kSidebandCut&&JZBNegCut&&cutOSOF,"goff");
117    
118     float obs = hossfp->Integral();
119     float pred= hossfn->Integral() + (1.0/3)*( hosofp->Integral() - hosofn->Integral() + sbhossfp->Integral() - sbhossfn->Integral() + sbhosofp->Integral() - sbhosofn->Integral());
120    
121     delete hossfp,hossfn,hosofp,hosofn;
122     delete sbhossfp,sbhossfn,sbhosofp,sbhosofn;
123     return obs-pred;
124     }
125    
126 buchmann 1.1
127     //____________________________________________________________________________________
128     // Efficiency plot
129     TH1F* plotEff(TTree* events, TCut kbase, TString informalname) {
130     iplot++;
131     int count=iplot;
132     // Define new histogram
133     char hname[30]; sprintf(hname,"hJzbEff%d",count);
134     TH1F* hJzbEff = new TH1F(hname,"JZB selection efficiency ; JZB (GeV/c); Efficiency",
135     nBins,jzbMin,jzbMax);
136     Float_t step = (jzbMax-jzbMin)/static_cast<Float_t>(nBins);
137    
138 buchmann 1.6 events->Draw(mcjzbexpression.c_str(),"genJZB>-400"&&kbase,"goff");
139 buchmann 1.1 Float_t maxEff = events->GetSelectedRows();
140 buchmann 1.5 if(verbose>0) dout << hname << " (" << informalname <<") " << maxEff << std::endl;
141 buchmann 1.1
142 buchmann 1.5 if(verbose>0) dout << "JZB max = " << jzbMax << std::endl;
143 buchmann 1.1 // Loop over steps to get efficiency curve
144     char cut[256];
145     for ( Int_t iBin = 0; iBin<nBins; ++iBin ) {
146 buchmann 1.6 sprintf(cut,"genJZB>%3f",jzbMin+iBin*step);
147 buchmann 1.2 events->Draw(mcjzbexpression.c_str(),TCut(cut)&&kbase,"goff");
148 buchmann 1.1 Float_t eff = static_cast<Float_t>(events->GetSelectedRows())/maxEff;
149 buchmann 1.5 // dout << "COUCOU " << __LINE__ << std::endl;
150 buchmann 1.1 hJzbEff->SetBinContent(iBin+1,eff);
151     hJzbEff->SetBinError(iBin+1,TMath::Sqrt(eff*(1-eff)/maxEff));
152     }
153     return hJzbEff;
154    
155    
156     }
157    
158    
159     //________________________________________________________________________________________
160     // Pile-up efficiency
161 buchmann 1.10 float pileup(TTree *events, bool requireZ, string informalname, string addcut="",Float_t myJzbMax = 140. ) {
162 buchmann 1.1 nBins = 16;
163     jzbMax = myJzbMax;
164    
165     // Acceptance cuts
166 buchmann 1.6 TCut kbase("abs(genMll-91.2)<20&&genNjets>2&&genZPt>0&&abs(mll-91.2)<20&&((id1+1)*(id2+1)*ch1*ch2)!=-2");
167 buchmann 1.10 if(addcut!="") kbase=kbase&&addcut.c_str();//this is mostly for SUSY scans (adding requirements on masses)
168    
169 buchmann 1.8 if(requireZ) kbase=kbase&&"TMath::Abs(genMID)==23";
170 buchmann 1.1 TH1F* hLM4 = plotEff(events,kbase,informalname);
171     hLM4->SetMinimum(0.);
172    
173     // Nominal function
174     TF1* func = new TF1("func","0.5*TMath::Erfc([0]*x-[1])",jzbMin,jzbMax);
175     func->SetParameter(0,0.03);
176     func->SetParameter(1,0.);
177     hLM4->Fit(func,"Q");
178    
179     // Pimped-up function
180     TF1* funcUp = (TF1*)func->Clone();
181     funcUp->SetParameter( 0., func->GetParameter(0)/1.1); // 10% systematic error (up in sigma => 0.1 in erfc)
182 buchmann 1.5 if(!automatized) dout << " PU: " << funcUp->Eval(jzbSel) << " " << func->Eval(jzbSel)
183 buchmann 1.1 << "(" << (funcUp->Eval(jzbSel)-func->Eval(jzbSel))/func->Eval(jzbSel)*100. << "%)" << std::endl;
184    
185 buchmann 1.18 return (funcUp->Eval(jzbSel)-func->Eval(jzbSel))/func->Eval(jzbSel);
186 buchmann 1.1
187     }
188    
189     //____________________________________________________________________________________
190 buchmann 1.6 // Effect of peak shifting
191 buchmann 1.10 void PeakError(TTree *events,float &result, string mcjzb, float peakerr,string addcut="") {
192 buchmann 1.6 TString peakup("("+TString(mcjzb)+"+"+TString(any2string(TMath::Abs(peakerr)))+")"+geq_or_leq()+TString(any2string(jzbSel)));
193     TString peakdown("("+TString(mcjzb)+"-"+TString(any2string(TMath::Abs(peakerr)))+")"+geq_or_leq()+TString(any2string(jzbSel)));
194     TString peakcentral("("+TString(mcjzb)+")"+geq_or_leq()+TString(any2string(jzbSel)));
195     TString npeakup("("+TString(mcjzb)+"+"+TString(any2string(TMath::Abs(peakerr)))+")"+ngeq_or_leq()+"-"+TString(any2string(jzbSel)));
196     TString npeakdown("("+TString(mcjzb)+"-"+TString(any2string(TMath::Abs(peakerr)))+")"+ngeq_or_leq()+"-"+TString(any2string(jzbSel)));
197     TString npeakcentral("("+TString(mcjzb)+")"+ngeq_or_leq()+"-"+TString(any2string(jzbSel)));
198    
199     nBins = 1;
200     string informalname="PeakErrorCalculation";
201     float resup,resdown,rescent;
202     for(int i=0;i<3;i++) {
203     string poscut,negcut;
204     if(i==0) {
205     poscut=peakcentral;
206     negcut=npeakcentral;
207     } else if(i==1) {
208     poscut=peakdown;
209     negcut=npeakdown;
210     } else if(i==2) {
211     poscut=peakup;
212     negcut=npeakup;
213     }
214 buchmann 1.10 float res;
215     if(addcut=="") res=allcontributionsplot(events,cutnJets,cutmass,sidebandcut,poscut.c_str(),negcut.c_str());
216     else res=allcontributionsplot(events,cutnJets&&addcut.c_str(),cutmass,sidebandcut,poscut.c_str(),negcut.c_str());
217 buchmann 1.7 if(i==0) rescent=res;
218     else if(i==1) resdown=res;
219     else if(i==2) resup=res;
220 buchmann 1.6 }
221 buchmann 1.18 if(TMath::Abs(rescent-resup)>TMath::Abs(rescent-resdown)) result=(TMath::Abs(rescent-resup)/rescent);
222     else result=(TMath::Abs(rescent-resdown)/rescent);
223 buchmann 1.6 }
224    
225     //____________________________________________________________________________________
226 buchmann 1.1 // Total selection efficiency (MC)
227 buchmann 1.13 void MCefficiency(TTree *events,float &result, float &resulterr,string mcjzb,bool requireZ,int Neventsinfile, string addcut="") {
228 buchmann 1.1
229     char jzbSelStr[256]; sprintf(jzbSelStr,"%f",jzbSel);
230     // All acceptance cuts at gen. level
231 buchmann 1.14 //TCut kbase("abs(genMll-91.2)<20&&genNjets>2&&genZPt>0&&genJZB"+geq_or_leq()+TString(jzbSelStr)+"&&genId1==-genId2");
232     TCut kbase("");
233 buchmann 1.8 if(requireZ) kbase=kbase&&"TMath::Abs(genMID)==23";
234 buchmann 1.9 if(addcut!="") kbase=kbase&&addcut.c_str();//this is mostly for SUSY scans (adding requirements on masses)
235 buchmann 1.1 // Corresponding reco. cuts
236 buchmann 1.11 TCut ksel("pfJetGoodNum>2&&abs(mll-91.2)<20&&id1==id2&&"+TString(mcjzb)+geq_or_leq()+TString(jzbSelStr));
237 buchmann 1.15 TCut ksel2("pfJetGoodNum>2&&abs(mll-91.2)<20&&id1==id2&&"+TString(mcjzb)+ngeq_or_leq()+TString("-")+TString(jzbSelStr));
238 buchmann 1.2 events->Draw(mcjzbexpression.c_str(),kbase&&ksel,"goff");
239 buchmann 1.1 Float_t sel = events->GetSelectedRows();
240 buchmann 1.21 Float_t nsel=0;
241     if(ConsiderSignalContaminationForLimits) {
242     events->Draw(mcjzbexpression.c_str(),kbase&&ksel2,"goff");
243     nsel = events->GetSelectedRows();
244     }
245 buchmann 1.13 // events->Draw(mcjzbexpression.c_str(),kbase,"goff");
246     // Float_t tot = events->GetSelectedRows();
247     Float_t tot = Neventsinfile;
248 buchmann 1.1
249 buchmann 1.21 if(ConsiderSignalContaminationForLimits) {
250     result=(sel-nsel)/tot;
251     resulterr=(1.0/tot)*TMath::Sqrt(sel+nsel+(sel-nsel)*(sel-nsel)/tot);
252     } else {//no signal contamination considered:
253     result=(sel)/tot;
254     resulterr=TMath::Sqrt(sel/tot*(1+sel/tot)/tot);
255     }
256 buchmann 1.19 if(!automatized) dout << " MC efficiency: " << result << "+-" << resulterr << " ( JZB>" << jzbSel << " : " << sel << " , JZB<-" << jzbSel << " : " << nsel << " and nevents=" << tot << ")" << std::endl;
257 buchmann 1.1 }
258    
259 buchmann 1.10 void JZBefficiency(TTree *events, string informalname, float &jzbeff, float &jzbefferr, bool requireZ, string addcut="") {
260 buchmann 1.6 TCut kbase("abs(genMll-91.2)<20&&genNjets>2&&genZPt>0&&abs(mll-91.2)<20&&((id1+1)*(id2+1)*ch1*ch2)!=-2");
261 buchmann 1.10 if(addcut!="") kbase=kbase&&addcut.c_str();//this is mostly for SUSY scans (adding requirements on masses)
262 buchmann 1.8 if(requireZ) kbase=kbase&&"TMath::Abs(genMID)==23";
263 buchmann 1.1 TH1F* hLM4 = plotEff(events,kbase,informalname);
264     Int_t bin = hLM4->FindBin(jzbSel); // To get the error
265 buchmann 1.8 jzbeff=Interpolate(jzbSel,hLM4);
266     jzbefferr=hLM4->GetBinError(bin);
267 buchmann 1.5 if(!automatized) dout << " Efficiency at JZB==" << jzbSel << std::endl;
268 buchmann 1.8 if(!automatized) dout << " " << jzbeff << "+-" << jzbefferr << std::endl;
269 buchmann 1.1 }
270    
271     //________________________________________________________________________
272     // Effect of energy scale on efficiency
273 buchmann 1.10 void JZBjetScale(TTree *events, float &jesdown, float &jesup, string informalname,bool requireZ,string addcut="",float syst=0.1, Float_t jzbSelection=-1, TString plotName = "" ) {
274 buchmann 1.6 TCut kbase("abs(genMll-91.2)<20&&genZPt>0");
275 buchmann 1.10 if(addcut!="") kbase=kbase&&addcut.c_str();//this is mostly for SUSY scans (adding requirements on masses)
276 buchmann 1.8 if(requireZ) kbase=kbase&&"TMath::Abs(genMID)==23";
277    
278 buchmann 1.1 TCut ksel("abs(mll-91.2)<20&&((id1+1)*(id2+1)*ch1*ch2)!=-2");
279     TCut nJets("pfJetGoodNum>2");
280     stringstream down,up;
281     down << "pfJetGoodNum"<<30*(1-syst)<<">=3";
282     up << "pfJetGoodNum"<<30*(1+syst)<<">=3";
283    
284     TCut nJetsP(up.str().c_str());
285     TCut nJetsM(down.str().c_str());
286    
287     if ( !(plotName.Length()>1) ) plotName = informalname;
288    
289     nBins = 1; jzbMin = jzbSel*0.95; jzbMax = jzbSel*1.05;
290     TH1F* hist = plotEff(events,(kbase&&ksel&&nJets),informalname);
291    
292     TH1F* histp = plotEff(events,(kbase&&ksel&&nJetsP),informalname);
293    
294     TH1F* histm = plotEff(events,(kbase&&ksel&&nJetsM),informalname);
295    
296     // Dump some information
297     Float_t eff = Interpolate(jzbSel,hist);
298     Float_t effp = Interpolate(jzbSel,histp);
299     Float_t effm = Interpolate(jzbSel,histm);
300 buchmann 1.5 if(!automatized) dout << " Efficiency at JZB==" << jzbSel << std::endl;
301     if(!automatized) dout << " JESup: " << effp << " (" << (effp-eff)/eff*100. << "%)" << std::endl;
302     if(!automatized) dout << " central: " << eff << std::endl;
303     if(!automatized) dout << " JESdown: " << effm << " (" << (effm-eff)/eff*100. << "%)" << std::endl;
304 buchmann 1.18 jesup=(effp-eff)/eff;
305     jesdown=(effm-eff)/eff;
306 buchmann 1.1 }
307    
308     //________________________________________________________________________
309     // Effect of energy scale on JZB efficiency
310 buchmann 1.10 void doJZBscale(TTree *events, float &down, float &up, float &syst, float systematic, string informalname, bool requireZ, string addcut) {
311 buchmann 1.1
312 buchmann 1.6 TCut kbase("abs(genMll-91.2)<20&&genZPt>0&&genNjets>2");
313 buchmann 1.10 if(addcut!="") kbase=kbase&&addcut.c_str();//this is mostly for SUSY scans (adding requirements on masses)
314 buchmann 1.8 if(requireZ) kbase=kbase&&"TMath::Abs(genMID)==23";
315 buchmann 1.1 TCut ksel("abs(mll-91.2)<20&&((id1+1)*(id2+1)*ch1*ch2)!=-2");
316    
317     nBins = 50;
318     jzbMin = 0.5*jzbSel;
319     jzbMax = 2.0*jzbSel;
320    
321     TH1F* hist = plotEff(events,kbase&&ksel,informalname);
322    
323     // Dump some information
324     Float_t eff = Interpolate(jzbSel,hist);
325     Float_t effp = Interpolate(jzbSel*(1.+systematic),hist);
326     Float_t effm = Interpolate(jzbSel*(1.-systematic),hist);
327 buchmann 1.5 if(!automatized) dout << " efficiency at JZB==" << jzbSel*(1.+systematic) << "(-"<<syst*100<<"%) : " << effp << " (" << ((effp-eff)/eff)*100. << "%)" << std::endl;
328     if(!automatized) dout << " efficiency at JZB==" << jzbSel << ": " << eff << std::endl;
329     if(!automatized) dout << " efficiency at JZB==" << jzbSel*(1.-systematic) << "(-"<<syst*100<<"%) : " << effm << " (" << ((effm-eff)/eff)*100. << "%)" << std::endl;
330 buchmann 1.18 up=((effp-eff)/eff);
331     down=((effm-eff)/eff);
332 buchmann 1.1 }
333    
334     //________________________________________________________________________
335     // JZB response (true/reco. vs. true)
336 buchmann 1.10 void JZBresponse(TTree *events, bool requireZ, float &resp, float &resperr, string addcut="",bool isMET = kFALSE, Float_t myJzbMax = 200., Int_t nPeriods = 9 ) {
337 buchmann 1.1
338     jzbMin = 20;
339 buchmann 1.6 TCut kbase("abs(genMll-91.2)<20&&genZPt>0&&genNjets>2");
340 buchmann 1.10 if(addcut!="") kbase=kbase&&addcut.c_str();//this is mostly for SUSY scans (adding requirements on masses)
341 buchmann 1.8 if(requireZ) kbase=kbase&&"TMath::Abs(genMID)==23";
342 buchmann 1.1 TCut ksel("abs(mll-91.2)<20&&((id1+1)*(id2+1)*ch1*ch2)!=-2");
343    
344 buchmann 1.8 TProfile* hJzbResp = new TProfile("hJzbResp","JZB response ; JZB true (GeV/c); JZB reco. / JZB true", nPeriods, jzbMin, myJzbMax, "" );
345 buchmann 1.1
346 buchmann 1.6 if (!isMET) events->Project("hJzbResp","("+TString(mcjzbexpression)+")/genJZB:genJZB",kbase&&ksel);
347 buchmann 1.1 else events->Project("hJzbResp","met[4]/genMET:genMET",kbase&&ksel);
348    
349     hJzbResp->SetMaximum(1.2);
350     hJzbResp->SetMinimum(0.2);
351     hJzbResp->Fit("pol0","Q");
352     TF1 *fittedfunction = hJzbResp->GetFunction("pol0");
353 buchmann 1.8 resp=fittedfunction->GetParameter(0);
354     resperr=fittedfunction->GetParError(0);
355     if(!automatized) dout << " Response: " << resp << " +/- " << resperr << endl;
356 buchmann 1.5 delete hJzbResp;
357 buchmann 1.1 }
358    
359    
360 buchmann 1.22 void do_systematics_for_one_file(TTree *events,int Neventsinfile,string informalname, vector<vector<float> > &results,string mcjzb,string datajzb,float peakerror,bool requireZ=false, string addcut="", bool ismSUGRA=false) {
361 buchmann 1.1
362     float JetEnergyScaleUncert=0.1;
363     float JZBScaleUncert=0.1;
364 buchmann 1.2 mcjzbexpression=mcjzb;
365 buchmann 1.18 float triggereff=4.0/100;// in range [0,1]
366 buchmann 1.5 dout << "Trigger efficiency not implemented in this script yet, still using external one" << endl;
367 buchmann 1.18 float leptonseleff=2.0/100;// in range [0,1]
368 buchmann 1.5 dout << "Lepton selection efficiency not implemented in this script yet, still using external one" << endl;
369 buchmann 1.1
370 buchmann 1.8 float mceff,mcefferr,jzbeff,jzbefferr;
371 buchmann 1.5 if(!automatized) dout << "MC efficiencies:" << endl;
372 buchmann 1.13 MCefficiency(events,mceff,mcefferr,mcjzb,requireZ,Neventsinfile,addcut);
373 buchmann 1.10 JZBefficiency(events,informalname,jzbeff,jzbefferr,requireZ,addcut);
374 buchmann 1.8 if(!automatized) dout << "JZB efficiency: " << jzbeff << "+/-" << jzbefferr << endl;
375 buchmann 1.1
376 buchmann 1.6 if(!automatized) dout << "Error from Peak position:" << endl;
377     float sysfrompeak=0;
378 buchmann 1.10 PeakError(events,sysfrompeak,mcjzb,peakerror,addcut);
379 buchmann 1.6
380 buchmann 1.5 if(!automatized) dout << "Jet energy scale: " << std::endl;
381 buchmann 1.1 float jesup,jesdown;
382 buchmann 1.10 JZBjetScale(events,jesdown,jesup,informalname,requireZ,addcut,JetEnergyScaleUncert);
383 buchmann 1.1
384 buchmann 1.5 if(!automatized) dout << "JZB scale: " << std::endl;
385 buchmann 1.1 float scaleup,scaledown,scalesyst;
386 buchmann 1.10 doJZBscale(events,scaledown,scaleup,scalesyst,JZBScaleUncert,informalname,requireZ,addcut);
387 buchmann 1.1
388 buchmann 1.5 if(!automatized) dout << "JZB response: " << std::endl;
389 buchmann 1.8 float resp,resperr;
390 buchmann 1.10 JZBresponse(events,requireZ,resp,resperr,addcut);
391 buchmann 1.1
392 buchmann 1.5 if(!automatized) dout << "Pileup: " << std::endl;
393 buchmann 1.10 float resolution=pileup(events,requireZ,informalname,addcut);
394 buchmann 1.1
395 buchmann 1.22 float PDFuncert=0;
396     if(ismSUGRA) PDFuncert=999;//Pablo will complete this
397    
398 buchmann 1.5 dout << "_______________________________________________" << endl;
399 buchmann 1.10 dout << " SUMMARY FOR " << informalname << " with JZB>" << jzbSel << " (all in %) ";
400     if(addcut!="") dout << "With additional cut: " << addcut;
401     dout << endl;
402 buchmann 1.18 dout << "MC efficiency: " << mceff << "+/-" << mcefferr << endl; // in range [0,1]
403     dout << "Trigger efficiency: " << triggereff << endl; // in range [0,1]
404     dout << "Lepton Sel Eff: " << leptonseleff << endl; // in range [0,1]
405     dout << "Jet energy scale: " << jesup << " " << jesdown << endl; // in range [0,1]
406     dout << "JZB Scale Uncert: " << scaledown << " " << scaleup << endl; // in range [0,1]
407     dout << "Resolution : " << resolution << endl; // in range [0,1]
408     dout << "From peak : " << sysfrompeak << endl; // in range [0,1]
409 buchmann 1.22 dout << "PDF uncertainty : " << PDFuncert << " (not yet included below) " << endl; // in range [0,1]
410 buchmann 1.18 dout << "JZB efficiency: " << jzbeff << "+/-" << jzbefferr << " (not yet included below) " << endl; // in range [0,1]
411     dout << "JZB response : " << resp << " +/-" << resperr << " (not yet included below) " << endl; // in range [0,1]
412 buchmann 1.1
413 buchmann 1.4 float toterr=0;
414 buchmann 1.18 toterr+=(triggereff)*(triggereff);
415     toterr+=(leptonseleff)*(leptonseleff);
416     if(fabs(jesup)>fabs(jesdown)) toterr+=(jesup*jesup); else toterr+=(jesdown*jesdown);
417     if(fabs(scaleup)>fabs(scaledown)) toterr+=(scaleup*scaleup); else toterr+=(scaledown*scaledown);
418     toterr+=(resolution*resolution);
419     toterr+=(sysfrompeak*sysfrompeak);
420 buchmann 1.22 if(ismSUGRA) toterr+=(PDFuncert*PDFuncert);
421 buchmann 1.18 dout << "TOTAL SYSTEMATICS: " << TMath::Sqrt(toterr) << " --> " << TMath::Sqrt(toterr)*mceff << endl;
422 buchmann 1.19 float systerr=TMath::Sqrt(toterr)*mceff;
423     toterr=TMath::Sqrt(toterr*mceff*mceff+mcefferr*mcefferr);//also includes stat err!
424    
425     dout << "FINAL RESULT : " << 100*mceff << " +/- "<< 100*mcefferr << " (stat) +/- " << 100*systerr << " (syst) %" << endl;
426     dout << " we thus use the sqrt of the sum of the squares of the stat & syst err, which is : " << 100*toterr << endl;
427    
428     //Do not modify the lines below or mess with the order; this order is expected by all limit calculating functions!
429 buchmann 1.4 vector<float> res;
430     res.push_back(jzbSel);
431     res.push_back(mceff);
432     res.push_back(mcefferr);
433     res.push_back(toterr);
434     res.push_back(TMath::Sqrt((mcefferr)*(mcefferr)+(toterr*toterr)));
435 buchmann 1.18 if(fabs(jesup)>fabs(jesdown)) res.push_back(fabs(jesup)); else res.push_back(fabs(jesdown));
436     if(fabs(scaleup)>fabs(scaledown)) res.push_back(fabs(scaleup)); else res.push_back(fabs(scaledown));
437     res.push_back(fabs(resolution));
438 buchmann 1.22 if(ismSUGRA) res.push_back(PDFuncert);
439 buchmann 1.4 results.push_back(res);
440 buchmann 1.1 }
441    
442 buchmann 1.8 vector<vector<float> > compute_systematics(string mcjzb, float mcpeakerror, string datajzb, samplecollection &signalsamples, vector<float> bins, bool requireZ=false) {
443 buchmann 1.4 automatized=true;
444     vector< vector<float> > systematics;
445 buchmann 1.1 for (int isignal=0; isignal<signalsamples.collection.size();isignal++) {
446 buchmann 1.5 dout << "Looking at signal " << (signalsamples.collection)[isignal].filename << endl;
447 buchmann 1.1 for(int ibin=0;ibin<bins.size();ibin++) {
448     jzbSel=bins[ibin];
449 buchmann 1.2 geqleq="geq";
450 buchmann 1.13 do_systematics_for_one_file((signalsamples.collection)[isignal].events,(signalsamples.collection)[isignal].Nentries,(signalsamples.collection)[isignal].samplename,systematics,mcjzb,datajzb,mcpeakerror,requireZ);
451 buchmann 1.1 }//end of bin loop
452     }//end of signal loop
453 buchmann 1.4 return systematics;
454 buchmann 1.1 }