ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/UserCode/cbrown/AnalysisFramework/Plotting/Modules/SUSYScan.C
Revision: 1.40
Committed: Wed Sep 28 15:31:25 2011 UTC (13 years, 7 months ago) by buchmann
Content type: text/plain
Branch: MAIN
Changes since 1.39: +19 -11 lines
Log Message: 
Adapted the susy scan algorithm for testing to be able to split scan into zones

File Contents

# User Rev Content
1 buchmann 1.1 #include <iostream>
2     #include <vector>
3     #include <sys/stat.h>
4     #include <fstream>
5 buchmann 1.7 #include <pthread.h>
6 buchmann 1.1
7     #include <TCut.h>
8     #include <TROOT.h>
9     #include <TCanvas.h>
10     #include <TMath.h>
11     #include <TColor.h>
12     #include <TPaveText.h>
13     #include <TRandom.h>
14     #include <TH1.h>
15     #include <TH2.h>
16     #include <TF1.h>
17     #include <TSQLResult.h>
18     #include <TProfile.h>
19 buchmann 1.31 #include <TKey.h>
20 buchmann 1.1
21     //#include "TTbar_stuff.C"
22     using namespace std;
23    
24     using namespace PlottingSetup;
25    
26     void susy_scan_axis_labeling(TH2F *histo) {
27 buchmann 1.37 histo->GetXaxis()->SetTitle("m_{#Chi_{2}^{0}}-m_{LSP}");
28 buchmann 1.1 histo->GetXaxis()->CenterTitle();
29     histo->GetYaxis()->SetTitle("m_{#tilde{q}}");
30     histo->GetYaxis()->CenterTitle();
31     }
32    
33 buchmann 1.7 bool isThreadActive=false;
34    
35     struct limit_args {
36     float mceff;
37     float toterr;
38     int ibin;
39     string mcjzb;
40     vector<float> sigmas;
41 buchmann 1.25 string plotfilename;
42 buchmann 1.35 };
43 buchmann 1.7
44     void* compute_one_upper_limit_wrapper(void* data) {
45     isThreadActive=true;
46     limit_args* args = (limit_args*) data;
47     std::cout << "Thread to compute limits has been started" << std::endl;
48 buchmann 1.25 args->sigmas=compute_one_upper_limit(args->mceff,args->toterr,args->ibin,args->mcjzb,args->plotfilename,true);
49 buchmann 1.7 std::cout << "Thread to compute limits has finished" << std::endl;
50     isThreadActive=false;
51 buchmann 1.37 return NULL;
52 buchmann 1.7 }
53    
54 buchmann 1.25 void do_limit_wrapper(float mceff,float toterr,int ibin,string mcjzb,vector<float> &sigmas,string plotfilename) {
55 buchmann 1.7 pthread_t limitthread;
56 buchmann 1.25 limit_args limargs={mceff,toterr,ibin,mcjzb,sigmas,plotfilename};
57 buchmann 1.7 pthread_create( &limitthread, NULL, compute_one_upper_limit_wrapper, (void*) &limargs);
58     int counter=0;
59 buchmann 1.29 int counterinterval=5;
60 buchmann 1.7 sleep(1); //waiting a second for the process to become active
61     while(counter<limitpatience*60 && isThreadActive) {
62 buchmann 1.38 std::cout << "Limits are being calculated; Checking round " << counter/counterinterval << " ( corresponds to " << seconds_to_time(counter) << " ) , patience will end in " << seconds_to_time(60*limitpatience-counter) << std::endl;
63 buchmann 1.29 counter+=counterinterval;
64     sleep(counterinterval);
65 buchmann 1.7 }
66    
67     if(!isThreadActive) {
68     cout << "Thread finished sucessfully" << endl;
69     pthread_join( limitthread, NULL );
70     std::cout<< __FUNCTION__ << " : going to save sigmas " << std::endl;
71     sigmas=limargs.sigmas;
72     } else {
73     pthread_cancel(limitthread);
74     std::cout << "DID NOT TERMINATE IN TIME - ABORTED!" << std::endl;
75     sigmas.push_back(-1);sigmas.push_back(-1);sigmas.push_back(-1);
76     }
77     }
78    
79 buchmann 1.22 void prepare_scan_axis(TH2 *variablemap,bool ismSUGRA) {
80 buchmann 1.9 variablemap->GetXaxis()->SetTitle("m_{glu}");
81     variablemap->GetYaxis()->SetTitle("m_{LSP}");
82 buchmann 1.35
83 buchmann 1.22 if(ismSUGRA) {
84     variablemap->GetXaxis()->SetTitle("m_{0}");
85     variablemap->GetYaxis()->SetTitle("m_{1/2}");
86     }
87 buchmann 1.35
88 buchmann 1.9 variablemap->GetXaxis()->CenterTitle();
89     variablemap->GetYaxis()->CenterTitle();
90     }
91    
92 buchmann 1.31 void set_SUSY_style() {
93     Int_t MyPalette[100];
94     Double_t r[] = {0., 0.0, 1.0, 1.0, 1.0};
95     Double_t g[] = {0., 0.0, 0.0, 1.0, 1.0};
96     Double_t b[] = {0., 1.0, 0.0, 0.0, 1.0};
97     Double_t stop[] = {0., .25, .50, .75, 1.0};
98     Int_t FI = TColor::CreateGradientColorTable(5, stop, r, g, b, 110);
99     for (int i=0;i<100;i++) MyPalette[i] = FI+i;
100 buchmann 1.35
101 buchmann 1.31 gStyle->SetPalette(100, MyPalette);
102 buchmann 1.35
103 buchmann 1.31 float rightmargin=gStyle->GetPadRightMargin();
104     gStyle->SetPadRightMargin(0.15);
105    
106     }
107    
108 buchmann 1.35 float get_xs(float mglu, float mlsp, string massgluname, string massLSPname, map < pair<float, float>, map<string, float> > &xsec, string mcjzb, bool requireZ) {
109     float weightedpointxs=0;
110     stringstream addcut;
111     addcut << "(TMath::Abs("<<massgluname<<"-"<<mglu<<")<5)&&(TMath::Abs("<<massLSPname<<"-"<<mlsp<<")<5)";
112     cout << "About to calculate the process efficiencies " << endl;
113 buchmann 1.37 /* for(int iproc=1;iproc<=10;iproc++) {
114 buchmann 1.35 float process_xs = GetXSecForPointAndChannel(mglu,mlsp,xsec,iproc);
115     stringstream addcutplus;
116     addcutplus<<addcut.str()<<"&&(pfJetGoodNum=="<<iproc<<")";
117     write_warning(__FUNCTION__,"replaced process with pfJetGoodNum for testing purposes only!");
118     (scansample.collection)[0].events->Draw("eventNum",addcutplus.str().c_str(),"goff");
119     float nprocessevents = (scansample.collection)[0].events->GetSelectedRows();
120     float nselectedprocessevents,nselectedprocesseventserr;
121     cout << "nprocessevents = " << nprocessevents << endl;
122     MCefficiency((scansample.collection)[0].events,nselectedprocessevents,nselectedprocesseventserr,mcjzb,requireZ,1,addcutplus.str(),-1);//1 is the number to normalize to :-)
123     float weight=0;
124     if(nprocessevents>0) weight=(process_xs)/(nprocessevents);//*luminosity;
125     weightedpointxs+=weight*nselectedprocessevents;
126     }
127     return weightedpointxs;
128 buchmann 1.37 */
129     return 1.0;
130 buchmann 1.35 }
131    
132 buchmann 1.31 void establish_SUSY_limits(string mcjzb,string datajzb,vector<float> jzb_cut,bool requireZ, float peakerror, TFile *fsyst, int ibin,float njobs=-1, float jobnumber=-1) {
133     bool runninglocally=true;
134     if(njobs>-1&&jobnumber>-1) {
135     runninglocally=false;
136     dout << "Running on the GRID (this is job " << jobnumber << "/" << njobs << ") for a jzb cut at " << jzb_cut[ibin] << endl;
137     } else {
138     dout << "Running locally " << endl;
139 buchmann 1.37 dout << "This will take a really, really long time - if you want to see the results within hours instead of weeks try running the worker script on the grid (DistributedModelCalculation/Limits/)" << endl;
140 buchmann 1.31 }
141 buchmann 1.35
142 buchmann 1.31 string massgluname="MassGlu";
143     string massLSPname="MassLSP";
144 buchmann 1.39 jzbSel=jzb_cut[ibin];
145     geqleq="geq";
146     automatized=true;
147     mcjzbexpression=mcjzb;
148    
149 buchmann 1.31 string prefix="SMS_";
150     // up to here, everything is set up for SMS; now we need to switch stuff around if we're dealing with an mSUGRA scan!
151     bool ismSUGRA=false;
152     TIter nextkey(fsyst->GetListOfKeys());
153     TKey *key;
154     while ((key = (TKey*)nextkey()))
155     {
156     TObject *obj = key->ReadObj();
157     if(Contains((string)(obj->GetName()),"mSUGRA")) ismSUGRA=true;
158     }
159 buchmann 1.35
160     map < pair<float, float>, map<string, float> > xsec;
161 buchmann 1.31
162     if(ismSUGRA) {
163     massgluname="M0"; // this is the "x axis" in the limit plot (like the gluino in the SMS case)
164     massLSPname="M12"; // this is the "y axis" in the limit plot (like the LSP in the SMS case)
165     mglustart=m0start;
166 buchmann 1.35 xsec=getXsec("/scratch/buchmann/C/scale_xsection_nlo1.0_m0_m12_10_0_1v1.txt");
167     write_warning(__FUNCTION__,"Don't have the correct XS file yet");
168 buchmann 1.31 mgluend=m0end;
169     mglustep=m0step;
170     mLSPstart=m12start;
171     mLSPend=m12end;
172     mLSPstep=m12step;
173     prefix="mSUGRA_";
174     cout << "mSUGRA scan has been set up." << endl;
175     } else {
176     cout << "SMS scan has been set up." << endl;
177 buchmann 1.35 write_warning(__FUNCTION__,"Don't have the correct XS file yet");
178     xsec=getXsec("/scratch/buchmann/C/scale_xsection_nlo1.0_m0_m12_10_0_1v1.txt");
179 buchmann 1.31 }
180 buchmann 1.35
181 buchmann 1.31 set_SUSY_style();
182 buchmann 1.35
183 buchmann 1.31 TCanvas *limcanvas = new TCanvas("limcanvas","Limit canvas");
184 buchmann 1.35
185 buchmann 1.31 int Npoints=0;
186     for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
187     for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep) Npoints++;
188     }
189 buchmann 1.37 TH2F *mceff = (TH2F*)fsyst->Get((prefix+"efficiencymap"+any2string(jzb_cut[ibin])).c_str());
190     //write_warning(__FUNCTION__,"Currently the efficiencymap name was switched to Pablo's convention. This NEEDS to be switched BACK!");TH2F *mceff = (TH2F*)fsyst->Get(("efficiency_jzbdiff"+any2string(jzb_cut[ibin])).c_str());
191 buchmann 1.31 TH2F *fullerr = (TH2F*)fsyst->Get((prefix+"systotmap"+any2string(jzb_cut[ibin])).c_str());
192 buchmann 1.33 TH2F *NEvents = (TH2F*)fsyst->Get((prefix+"Neventsmap"+any2string(jzb_cut[ibin])).c_str());
193 buchmann 1.35
194 buchmann 1.37 TH2F *limitmap = new TH2F((prefix+"limitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//observed limit
195     TH2F *explimitmap = new TH2F((prefix+"explimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit
196     TH2F *exp1plimitmap = new TH2F((prefix+"exp1plimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit + 1 sigma
197     TH2F *exp2plimitmap = new TH2F((prefix+"exp2plimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit + 2 sigma
198     TH2F *exp1mlimitmap = new TH2F((prefix+"exp1mlimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit - 1 sigma
199     TH2F *exp2mlimitmap = new TH2F((prefix+"exp2mlimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit - 2 sigma
200    
201 buchmann 1.32 TH2F *exclmap = new TH2F((prefix+"exclusionmap"+any2string(jzb_cut[ibin])).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
202     TH2F *xsmap = new TH2F((prefix+"crosssectionmap"+any2string(jzb_cut[ibin])).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
203 buchmann 1.35
204 buchmann 1.32 if(!fullerr || !mceff || !NEvents) {
205 buchmann 1.31 write_error(__FUNCTION__,"The supplied systematics file did not contain the correct histograms - please check the file");
206 buchmann 1.34 dout << "mc eff address: " << mceff << " , error address: " << fullerr << " , NEvents address: " << NEvents << endl;
207 buchmann 1.31 delete limcanvas;
208     return;
209     }
210 buchmann 1.37
211     bool doexpected=true;
212 buchmann 1.35
213 buchmann 1.31 int ipoint=-1;
214     for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
215     for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep)
216     {
217     ipoint++;
218     if(!runninglocally&&!do_this_point(ipoint,Npoints,jobnumber,njobs)) continue;
219     float currmceff=mceff->GetBinContent(mceff->FindBin(mglu,mlsp));
220 buchmann 1.33 float currtoterr=(fullerr->GetBinContent(fullerr->FindBin(mglu,mlsp)))*currmceff;
221 buchmann 1.32 float nevents=NEvents->GetBinContent(NEvents->FindBin(mglu,mlsp));
222 buchmann 1.34 dout << "Looking at point " << ipoint << " / " << Npoints << " with masses " << massgluname << " = " << mglu << " and " << massLSPname << " = " << mlsp << endl;
223 buchmann 1.35 dout << "Found : MCeff=" << currmceff << " and total error=" << currtoterr << " and Nevents=" << nevents << endl;
224 buchmann 1.31 string plotfilename=(string)(TString(massgluname)+TString(any2string(mglu))+TString("__")+TString(massLSPname)+TString(any2string(mlsp))+TString(".png"));
225 buchmann 1.34 if(currmceff<=0||currtoterr<=0||nevents==0) {
226     dout << " Nothing to work with, skipping this point." << endl;
227     continue;
228     }
229 buchmann 1.31 vector<float> sigmas;
230 buchmann 1.32 //do_limit_wrapper(currmceff,currtoterr,ibin,mcjzb,sigmas,plotfilename); // no threading right now.
231     sigmas=compute_one_upper_limit(currmceff,currtoterr,ibin,mcjzb,plotfilename,true);
232 buchmann 1.34 if(sigmas[0]>0) limitmap->Fill(mglu,mlsp,sigmas[0]); //anything else is an error code
233 buchmann 1.37 if(sigmas.size()>1) {
234     explimitmap->Fill(mglu,mlsp,sigmas[1]);
235     exp1plimitmap->Fill(mglu,mlsp,sigmas[2]);
236     exp1mlimitmap->Fill(mglu,mlsp,sigmas[3]);
237     exp2plimitmap->Fill(mglu,mlsp,sigmas[4]);
238     exp2mlimitmap->Fill(mglu,mlsp,sigmas[5]);
239     }
240    
241 buchmann 1.35 dout << "An upper limit has been added for this point ( " << massgluname << " = " << mglu << " and " << massLSPname << " = " << mlsp << " ) at " << sigmas[0] << endl;
242 buchmann 1.39 if(ismSUGRA) { // for SMS this is a bit easier at the moment - we have a reference XS file which we use when plotting
243 buchmann 1.35 dout << "Computing exclusion status" << endl;
244     float rel_limit=0;
245     float xs=get_xs(mglu,mlsp,massgluname,massLSPname,xsec,mcjzb,requireZ);
246     if(xs>0) rel_limit=sigmas[0]/xs;
247     // stringstream addcut;
248     // addcut << "(TMath::Abs("<<massgluname<<"-"<<mglu<<")<5)&&(TMath::Abs("<<massLSPname<<"-"<<mlsp<<")<5)";
249     // vector<float> xs_weights = processMCefficiency((scansample.collection)[0].events,mcjzb,requireZ,nevents, addcut.str());
250     exclmap->Fill(mglu,mlsp,rel_limit);
251     xsmap->Fill(mglu,mlsp,xs);
252 buchmann 1.32 }
253 buchmann 1.31 }
254     }
255 buchmann 1.35
256 buchmann 1.31 prepare_scan_axis(limitmap,ismSUGRA);
257 buchmann 1.32 TFile *outputfile=new TFile(("output/DistributedLimitsFromSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");//needs to be "UPDATE" as we can get to this point for different JZB cuts and don't want to erase the previous data :-)
258     outputfile->cd();
259 buchmann 1.31 limitmap->Write();
260 buchmann 1.37 if(doexpected) {
261     explimitmap->Write();
262     exp1plimitmap->Write();
263     exp1mlimitmap->Write();
264     exp2plimitmap->Write();
265     exp2mlimitmap->Write();
266     }
267 buchmann 1.32 if(ismSUGRA) {
268     exclmap->Write();
269     xsmap->Write();
270     }
271     outputfile->Close();
272 buchmann 1.31 delete limcanvas;
273     }
274    
275     void establish_SUSY_limits(string mcjzb,string datajzb,vector<float> jzb_cut,bool requireZ, float peakerror, string fsystfilename, float njobs=-1, float jobnumber=-1) {
276     dout << "Starting the SUSY scan from systematics file now with all " << jzb_cut.size() << " bin(s)" << " and using " << fsystfilename << endl;
277     TFile *fsyst = new TFile(fsystfilename.c_str());
278     if(!fsyst) {
279     write_error(__FUNCTION__,"You provided an invalid systematics file. Please change it ... ");
280     return;
281     }
282     for(int ibin=0;ibin<jzb_cut.size();ibin++) {
283     establish_SUSY_limits(mcjzb,datajzb,jzb_cut,requireZ, peakerror, fsyst, ibin,njobs, jobnumber);
284     }
285     }
286    
287    
288    
289    
290 buchmann 1.13 void scan_SUSY_parameter_space(string mcjzb,string datajzb,vector<float> jzb_cut,bool requireZ, float peakerror, int ibin,float njobs=-1, float jobnumber=-1, bool systematicsonly=false,bool efficiencyonly=false) {
291 buchmann 1.6 bool runninglocally=true;
292     if(njobs>-1&&jobnumber>-1) {
293     runninglocally=false;
294 buchmann 1.13 dout << "Running on the GRID (this is job " << jobnumber << "/" << njobs << ") for a jzb cut at " << jzb_cut[ibin] << endl;
295 buchmann 1.6 } else {
296 buchmann 1.7 dout << "Running locally " << endl;
297 buchmann 1.40 dout << "This will take a really, really long time - if you want to see the results THIS month try running the LimitWorkerScript on the grid (DistributedModelCalculation/Limits/)" << endl;
298 buchmann 1.6 }
299 buchmann 1.35
300 buchmann 1.4 jzbSel=jzb_cut[ibin];
301     geqleq="geq";
302     automatized=true;
303     mcjzbexpression=mcjzb;
304 buchmann 1.35
305 buchmann 1.4 string massgluname="MassGlu";
306     string massLSPname="MassLSP";
307 buchmann 1.35
308 buchmann 1.23 string prefix="SMS_";
309 buchmann 1.22 // up to here, everything is set up for SMS; now we need to switch stuff around if we're dealing with an mSUGRA scan!
310     bool ismSUGRA=false;
311 buchmann 1.24 if(Contains((scansample.collection)[0].samplename,"mSUGRA")) ismSUGRA=true;
312 buchmann 1.22 if(ismSUGRA) {
313     massgluname="M0"; // this is the "x axis" in the limit plot (like the gluino in the SMS case)
314     massLSPname="M12"; // this is the "y axis" in the limit plot (like the LSP in the SMS case)
315     mglustart=m0start;
316     mgluend=m0end;
317     mglustep=m0step;
318     mLSPstart=m12start;
319     mLSPend=m12end;
320     mLSPstep=m12step;
321 buchmann 1.23 prefix="mSUGRA_";
322 buchmann 1.24 cout << "mSUGRA scan has been set up." << endl;
323     } else {
324     cout << "SMS scan has been set up." << endl;
325     }
326 buchmann 1.35
327 buchmann 1.4 Int_t MyPalette[100];
328     Double_t r[] = {0., 0.0, 1.0, 1.0, 1.0};
329     Double_t g[] = {0., 0.0, 0.0, 1.0, 1.0};
330     Double_t b[] = {0., 1.0, 0.0, 0.0, 1.0};
331     Double_t stop[] = {0., .25, .50, .75, 1.0};
332     Int_t FI = TColor::CreateGradientColorTable(5, stop, r, g, b, 110);
333     for (int i=0;i<100;i++) MyPalette[i] = FI+i;
334 buchmann 1.35
335 buchmann 1.4 gStyle->SetPalette(100, MyPalette);
336 buchmann 1.35
337 buchmann 1.37 TH2F *limitmap = new TH2F((prefix+"limitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//observed limit
338     TH2F *explimitmap = new TH2F((prefix+"explimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit
339     TH2F *exp1plimitmap = new TH2F((prefix+"exp1plimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit + 1 sigma
340     TH2F *exp2plimitmap = new TH2F((prefix+"exp2plimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit + 2 sigma
341     TH2F *exp1mlimitmap = new TH2F((prefix+"exp1mlimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit - 1 sigma
342     TH2F *exp2mlimitmap = new TH2F((prefix+"exp2mlimitmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);//expected limit - 2 sigma
343    
344     TH2F *exclmap = new TH2F((prefix+"exclusionmap"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
345     TH2F *sysjesmap = new TH2F((prefix+"sysjes"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
346     TH2F *sysjsumap = new TH2F((prefix+"sysjsu"+any2string(jzbSel)).c_str(), "",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
347     TH2F *sysresmap = new TH2F((prefix+"sysresmap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
348     TH2F *efficiencymap = new TH2F((prefix+"efficiencymap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
349     TH2F *noscefficiencymap = new TH2F((prefix+"nosc_efficiencymap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
350     TH2F *Neventsmap = new TH2F((prefix+"Neventsmap"+any2string(jzbSel)).c_str(),"", (mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
351 buchmann 1.38 TH2F *ipointmap = new TH2F((prefix+"ipointmap"+any2string(jzbSel)).c_str(),"", (mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
352 buchmann 1.37 TH2F *syspdfmap = new TH2F((prefix+"syspdfmap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
353     TH2F *systotmap = new TH2F((prefix+"systotmap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
354     TH2F *sysstatmap = new TH2F((prefix+"sysstatmap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
355 buchmann 1.27
356 buchmann 1.37 TH2F *timemap = new TH2F((prefix+"timemap"+any2string(jzbSel)).c_str(),"",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
357 buchmann 1.36
358 buchmann 1.29 write_warning(__FUNCTION__,"CURRENTLY SWITCHING AUTOMATIZED MODE OFF!");automatized=false;
359 buchmann 1.35
360 buchmann 1.4 float rightmargin=gStyle->GetPadRightMargin();
361     gStyle->SetPadRightMargin(0.15);
362 buchmann 1.35
363 buchmann 1.4 TCanvas *limcanvas = new TCanvas("limcanvas","Limit canvas");
364 buchmann 1.35
365 buchmann 1.37
366     bool doexpected=true;
367    
368 buchmann 1.6 int Npoints=0;
369     for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
370     for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep) Npoints++;
371     }
372 buchmann 1.35
373 buchmann 1.6 int ipoint=-1;
374 buchmann 1.4 for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
375     for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep)
376     {
377 buchmann 1.6 ipoint++;
378     if(!runninglocally&&!do_this_point(ipoint,Npoints,jobnumber,njobs)) continue;
379 buchmann 1.19 float result=-987,resulterr=-987;
380 buchmann 1.40 int scanfileindex=0;
381     if(ismSUGRA) {
382     // at the moment only the mSUGRA scan is split up into different zones, this is still pending for SMS
383     int m0trees = PlottingSetup::m0end;
384     int m12trees = PlottingSetup::m12end;
385    
386     int a = int((PlottingSetup::ScanXzones*mlsp)/(m12trees+1));
387     int b = int((PlottingSetup::ScanYzones*mglu)/(m0trees+1));
388     scanfileindex=10*a+b;
389     }
390 buchmann 1.36 clock_t start,finish;
391     start = clock(); // starting the clock to measure how long the computation takes!
392 buchmann 1.4 stringstream addcut;
393     addcut << "(TMath::Abs("<<massgluname<<"-"<<mglu<<")<5)&&(TMath::Abs("<<massLSPname<<"-"<<mlsp<<")<5)";
394 buchmann 1.40 (scansample.collection)[scanfileindex].events->Draw("eventNum",addcut.str().c_str(),"goff");
395     float nevents = (scansample.collection)[scanfileindex].events->GetSelectedRows();
396 buchmann 1.4 vector<vector<float> > systematics;
397 buchmann 1.30 if(nevents<10) {
398 buchmann 1.40 dout << "This point ("<<ipoint<<") with configuration ("<<massgluname<<"="<<mglu<<" , "<<massLSPname<<"="<<mlsp << ") does not contain enough events and will be skipped."<< endl;
399     continue;
400 buchmann 1.6 } else {
401 buchmann 1.40 dout << "OK! This point ("<<ipoint<<") with configuration ("<<massgluname<<"="<<mglu<<" , "<<massLSPname<<"="<<mlsp << ") contains " << nevents << " and will therefore not be skipped."<< endl;
402 buchmann 1.22 }
403     if(nevents!=0&&efficiencyonly) {
404 buchmann 1.40 Value effwosigcont = MCefficiency((scansample.collection)[scanfileindex].events,result,resulterr,mcjzb,requireZ,nevents,addcut.str(),-1);
405 buchmann 1.36 efficiencymap->Fill(mglu,mlsp,result);
406 buchmann 1.37 noscefficiencymap->Fill(mglu,mlsp,effwosigcont.getValue());
407     noscefficiencymap->SetBinError(mglu,mlsp,effwosigcont.getError());
408 buchmann 1.36 finish = clock();
409     timemap->Fill(mglu,mlsp,((float(finish)-float(start))/CLOCKS_PER_SEC));
410 buchmann 1.13 }
411 buchmann 1.17 Neventsmap->Fill(mglu,mlsp,nevents);
412 buchmann 1.24 ipointmap->Fill(mglu,mlsp,ipoint);
413 buchmann 1.17 if(efficiencyonly) continue;
414    
415 buchmann 1.40 do_systematics_for_one_file((scansample.collection)[scanfileindex].events,nevents,"SUSY SCAN", systematics,mcjzb,datajzb,peakerror,requireZ, addcut.str(),ismSUGRA);
416 buchmann 1.9 float JZBcutat = systematics[0][0];
417     float mceff = systematics[0][1];
418 buchmann 1.22 float mcefferr = systematics[0][2];//MC stat error
419 buchmann 1.9 float toterr = systematics[0][4];
420     float sys_jes = systematics[0][5]; // Jet Energy Scale
421     float sys_jsu = systematics[0][6]; // JZB scale uncertainty
422     float sys_res = systematics[0][7]; // resolution
423 buchmann 1.37 float mcwoscef = systematics[0][8]; // efficiency without signal contamination
424     float mcwoscefr= systematics[0][9]; // error on efficiency without signal contamination
425 buchmann 1.27 float sys_pdf = 0;
426 buchmann 1.37 if(systematics[0].size()>10) sys_pdf = systematics[0][10]; // PDF
427 buchmann 1.22 efficiencymap->Fill(mglu,mlsp,mceff);
428 buchmann 1.37 efficiencymap->SetBinError(efficiencymap->FindBin(mglu,mlsp),mcefferr);
429     noscefficiencymap->Fill(mglu,mlsp,mcwoscef);
430     noscefficiencymap->SetBinError(efficiencymap->FindBin(mglu,mlsp),mcwoscefr);
431 buchmann 1.35
432 buchmann 1.15 if(mceff!=mceff||toterr!=toterr||mceff<0) {
433 buchmann 1.35 dout << "Limits can't be calculated for this configuration (mglu="<<mglu<<" , mlsp="<<mlsp << ") as either the efficiency or its error are not positive numbers! (mceff="<<mceff<<" and toterr="<<toterr<<")"<< endl;
434     continue;
435 buchmann 1.5 } else {
436 buchmann 1.35 if(!systematicsonly&&!efficiencyonly) {
437     dout << "Calculating limit now for "<<massgluname<<"="<<mglu<<" , "<<massLSPname<<"="<<mlsp <<endl;
438     vector<float> sigmas;
439 buchmann 1.40 string plotfilename=(string)(TString((scansample.collection)[scanfileindex].samplename)+TString(massgluname)+TString(any2string(mglu))+TString("__")+TString(massLSPname)+TString(any2string(mlsp))+TString(".png"));
440 buchmann 1.35 do_limit_wrapper(mceff,toterr,ibin,mcjzb,sigmas,plotfilename);
441     cout << "back in " << __FUNCTION__ << endl;
442     if(sigmas[0]>-0.5) { // negative sigmas are the error signature of do_limit_wrapper, so we want to exclude them.
443     limitmap->Fill(mglu,mlsp,sigmas[0]);
444 buchmann 1.37 if(sigmas.size()>1) {
445     explimitmap->Fill(mglu,mlsp,sigmas[1]);
446     exp1plimitmap->Fill(mglu,mlsp,sigmas[2]);
447     exp1mlimitmap->Fill(mglu,mlsp,sigmas[3]);
448     exp2plimitmap->Fill(mglu,mlsp,sigmas[4]);
449     exp2mlimitmap->Fill(mglu,mlsp,sigmas[5]);
450 buchmann 1.38 }
451 buchmann 1.37
452 buchmann 1.35 sysjesmap->Fill(mglu,mlsp,sys_jes);
453     sysjsumap->Fill(mglu,mlsp,sys_jsu);
454     sysresmap->Fill(mglu,mlsp,sys_res);
455     syspdfmap->Fill(mglu,mlsp,sys_pdf);
456     systotmap->Fill(mglu,mlsp,toterr/mceff);//total relative (!) error
457     sysstatmap->Fill(mglu,mlsp,mcefferr);//total relative (!) error
458     dout << "A limit has been added at " << sigmas[0] << " for m_{glu}="<<mglu << " and m_{lsp}="<<mlsp<<endl;
459     } //end of if sigma is positive
460 buchmann 1.36 finish = clock();
461     timemap->Fill(mglu,mlsp,((float(finish)-float(start))/CLOCKS_PER_SEC));
462    
463 buchmann 1.35 //end of not systematics only condition
464     }
465     if(systematicsonly) {
466     sysjesmap->Fill(mglu,mlsp,sys_jes);
467     sysjsumap->Fill(mglu,mlsp,sys_jsu);
468     sysresmap->Fill(mglu,mlsp,sys_res);
469     syspdfmap->Fill(mglu,mlsp,sys_pdf);
470     systotmap->Fill(mglu,mlsp,toterr/mceff);//total relative (!) error
471     sysstatmap->Fill(mglu,mlsp,mcefferr);//total relative (!) error
472 buchmann 1.36 finish = clock();
473     timemap->Fill(mglu,mlsp,((float(finish)-float(start))/CLOCKS_PER_SEC));
474 buchmann 1.35 }
475 buchmann 1.15 }//efficiency is valid
476 buchmann 1.4 }
477     }
478 buchmann 1.35
479 buchmann 1.22 prepare_scan_axis(limitmap,ismSUGRA);
480     prepare_scan_axis(sysjesmap,ismSUGRA);
481     prepare_scan_axis(sysjsumap,ismSUGRA);
482     prepare_scan_axis(sysresmap,ismSUGRA);
483 buchmann 1.27 prepare_scan_axis(syspdfmap,ismSUGRA);
484     prepare_scan_axis(systotmap,ismSUGRA);
485     prepare_scan_axis(sysstatmap,ismSUGRA);
486 buchmann 1.36 prepare_scan_axis(timemap,ismSUGRA);
487 buchmann 1.35
488 buchmann 1.13 if(!systematicsonly&&!efficiencyonly) {
489 buchmann 1.9 limcanvas->cd();
490     limitmap->Draw("COLZ");
491 buchmann 1.22 string titletobewritten="Limits in LSP-Glu plane";
492     if(ismSUGRA) titletobewritten="Limits in m_{1/2}-m_{0} plane";
493     TText *title = write_title(titletobewritten);
494 buchmann 1.9 title->Draw();
495     if(runninglocally) {
496     CompleteSave(limcanvas,"SUSYScan/Limits_JZB_geq"+any2string(jzb_cut[ibin]));
497     } else {
498 buchmann 1.12 TFile *outputfile;
499     if(systematicsonly) outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");//needs to be "UPDATE" as we can get to this point for different JZB cuts and don't want to erase the previous data :-)
500 buchmann 1.35 else outputfile=new TFile(("output/DistributedLimits_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");//needs to be "UPDATE" as we can get to this point for
501 buchmann 1.9 limitmap->Write();
502 buchmann 1.37 if(doexpected) {
503     explimitmap->Write();
504     exp1plimitmap->Write();
505     exp1mlimitmap->Write();
506     exp2plimitmap->Write();
507     exp2mlimitmap->Write();
508     }
509 buchmann 1.18 sysjesmap->Write();
510     sysjsumap->Write();
511 buchmann 1.28 sysresmap->Write();
512 buchmann 1.18 efficiencymap->Write();
513 buchmann 1.37 noscefficiencymap->Write();
514 buchmann 1.27 syspdfmap->Write();
515     systotmap->Write();
516     sysstatmap->Write();
517 buchmann 1.18 Neventsmap->Write();
518 buchmann 1.24 ipointmap->Write();
519 buchmann 1.36 timemap->Write();
520 buchmann 1.9 outputfile->Close();
521     }
522 buchmann 1.35 }
523 buchmann 1.13 if(systematicsonly) { // systematics only :
524 buchmann 1.9 limcanvas->cd();
525     sysjesmap->Draw("COLZ");
526 buchmann 1.22 string titletobewritten="Jet Energy scale in LSP-Glu plane";
527     if(ismSUGRA) titletobewritten="Limits in m_{1/2}-m_{0} plane";
528     TText *title = write_title(titletobewritten);
529 buchmann 1.9 title->Draw();
530     if(runninglocally) {
531     CompleteSave(limcanvas,"SUSYScan/JES_geq"+any2string(jzb_cut[ibin]));
532     }
533     sysjsumap->Draw("COLZ");
534 buchmann 1.22 titletobewritten="JZB Scale Uncertainty in LSP-Glu plane";
535     if(ismSUGRA) titletobewritten="JZB Scale Uncertainty in m_{1/2}-m_{0} plane";
536     TText *title2 = write_title(titletobewritten);
537 buchmann 1.9 title2->Draw();
538     if(runninglocally) {
539     CompleteSave(limcanvas,"SUSYScan/JSU_geq"+any2string(jzb_cut[ibin]));
540     }
541     sysresmap->Draw("COLZ");
542 buchmann 1.22 titletobewritten="Resolution in LSP-Glu plane";
543     if(ismSUGRA) titletobewritten="Resolution in m_{1/2}-m_{0} plane";
544     TText *title3 = write_title(titletobewritten);
545 buchmann 1.9 title3->Draw();
546     if(runninglocally) {
547     CompleteSave(limcanvas,"SUSYScan/Resolution_geq"+any2string(jzb_cut[ibin]));
548     }
549 buchmann 1.35
550 buchmann 1.9 if(!runninglocally) {
551     TFile *outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");
552     sysjesmap->Write();
553     sysjsumap->Write();
554     sysresmap->Write();
555 buchmann 1.18 efficiencymap->Write();
556 buchmann 1.37 noscefficiencymap->Write();
557 buchmann 1.18 Neventsmap->Write();
558 buchmann 1.24 ipointmap->Write();
559 buchmann 1.27 syspdfmap->Write();
560     systotmap->Write();
561     sysstatmap->Write();
562 buchmann 1.36 timemap->Write();
563 buchmann 1.9 outputfile->Close();
564     }
565     }//end of systematics only
566 buchmann 1.13 if(efficiencyonly) {
567     limcanvas->cd();
568     efficiencymap->Draw("COLZ");
569 buchmann 1.22 string titletobewritten="Efficiencies in LSP-Glu plane";
570     if(ismSUGRA) titletobewritten="Efficiencies in m_{1/2}-m_{0} plane";
571     TText *title = write_title(titletobewritten);
572 buchmann 1.13 title->Draw();
573     if(runninglocally) {
574     CompleteSave(limcanvas,"SUSYScan/Efficiency_geq"+any2string(jzb_cut[ibin]));
575     }
576     limcanvas->cd();
577     sysjesmap->Draw("COLZ");
578 buchmann 1.22 titletobewritten="N(events) in LSP-Glu plane";
579     if(ismSUGRA) titletobewritten="N(events) in m_{1/2}-m_{0} plane";
580     TText *title2 = write_title(titletobewritten);
581 buchmann 1.13 title2->Draw();
582     if(runninglocally) {
583     CompleteSave(limcanvas,"SUSYScan/Nevents_geq"+any2string(jzb_cut[ibin]));
584     }
585     if(!runninglocally) {
586     TFile *outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");
587 buchmann 1.24 ipointmap->Write();
588 buchmann 1.13 Neventsmap->Write();
589 buchmann 1.37 noscefficiencymap->Write();
590 buchmann 1.13 efficiencymap->Write();
591 buchmann 1.36 timemap->Write();
592 buchmann 1.13 outputfile->Close();
593     }
594     }//end of efficiencies only
595 buchmann 1.35
596 buchmann 1.31 delete limitmap;
597     delete exclmap;
598     delete sysjesmap;
599     delete sysjsumap;
600     delete sysresmap;
601 buchmann 1.37 delete noscefficiencymap;
602 buchmann 1.31 delete efficiencymap;
603     delete Neventsmap;
604     delete ipointmap;
605     delete syspdfmap;
606     delete systotmap;
607     delete sysstatmap;
608 buchmann 1.13 delete limcanvas;
609 buchmann 1.1 }
610 buchmann 1.4
611 buchmann 1.13 void scan_SUSY_parameter_space(string mcjzb,string datajzb,vector<float> jzb_cut,bool requireZ, float peakerror, float njobs=-1, float jobnumber=-1, bool systonly=false, bool effonly=false) {
612 buchmann 1.10 dout << "Starting the SUSY scan now with all " << jzb_cut.size() << " bin(s)" << endl;
613 buchmann 1.4 for(int ibin=0;ibin<jzb_cut.size();ibin++) {
614 buchmann 1.13 scan_SUSY_parameter_space(mcjzb,datajzb,jzb_cut,requireZ, peakerror, ibin, njobs, jobnumber,systonly,effonly);
615 buchmann 1.4 }
616 buchmann 1.6 }
617 buchmann 1.35