ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/UserCode/cbrown/AnalysisFramework/Plotting/Modules/SUSYScan.C
Revision: 1.23
Committed: Wed Aug 31 08:08:33 2011 UTC (13 years, 8 months ago) by buchmann
Content type: text/plain
Branch: MAIN
Changes since 1.22: +9 -7 lines
Log Message: 
Included SMS/mSUGRA info in maps as well (for plotting later on)

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    
20     //#include "TTbar_stuff.C"
21     using namespace std;
22    
23     using namespace PlottingSetup;
24    
25     void susy_scan_axis_labeling(TH2F *histo) {
26     histo->GetXaxis()->SetTitle("#Chi_{2}^{0}-LSP");
27     histo->GetXaxis()->CenterTitle();
28     histo->GetYaxis()->SetTitle("m_{#tilde{q}}");
29     histo->GetYaxis()->CenterTitle();
30     }
31    
32 buchmann 1.7 bool isThreadActive=false;
33    
34     struct limit_args {
35     float mceff;
36     float toterr;
37     int ibin;
38     string mcjzb;
39     vector<float> sigmas;
40     };
41    
42     void* compute_one_upper_limit_wrapper(void* data) {
43     isThreadActive=true;
44     limit_args* args = (limit_args*) data;
45     std::cout << "Thread to compute limits has been started" << std::endl;
46     args->sigmas=compute_one_upper_limit(args->mceff,args->toterr,args->ibin,args->mcjzb);
47     std::cout << "Thread to compute limits has finished" << std::endl;
48     isThreadActive=false;
49     return NULL; // oder in C++: return 0;// Damit kann man Werte zurückgeben
50     }
51    
52     void do_limit_wrapper(float mceff,float toterr,int ibin,string mcjzb,vector<float> &sigmas) {
53     pthread_t limitthread;
54 fronga 1.8 limit_args limargs={mceff,toterr,ibin,mcjzb,sigmas};
55 buchmann 1.7 pthread_create( &limitthread, NULL, compute_one_upper_limit_wrapper, (void*) &limargs);
56     int counter=0;
57     sleep(1); //waiting a second for the process to become active
58     while(counter<limitpatience*60 && isThreadActive) {
59 buchmann 1.13 std::cout << "Limits are being calculated; Checking round " << counter << " ( corresponds to " << seconds_to_time(counter) << " ) , patience will end in " << seconds_to_time(60*60*limitpatience-counter) << std::endl;
60 buchmann 1.7 counter++;
61     sleep(1);
62     }
63    
64     if(!isThreadActive) {
65     cout << "Thread finished sucessfully" << endl;
66     pthread_join( limitthread, NULL );
67     std::cout<< __FUNCTION__ << " : going to save sigmas " << std::endl;
68     sigmas=limargs.sigmas;
69     } else {
70     pthread_cancel(limitthread);
71     std::cout << "DID NOT TERMINATE IN TIME - ABORTED!" << std::endl;
72     sigmas.push_back(-1);sigmas.push_back(-1);sigmas.push_back(-1);
73     }
74     }
75    
76 buchmann 1.22 void prepare_scan_axis(TH2 *variablemap,bool ismSUGRA) {
77 buchmann 1.9 variablemap->GetXaxis()->SetTitle("m_{glu}");
78     variablemap->GetYaxis()->SetTitle("m_{LSP}");
79    
80 buchmann 1.22 if(ismSUGRA) {
81     variablemap->GetXaxis()->SetTitle("m_{0}");
82     variablemap->GetYaxis()->SetTitle("m_{1/2}");
83     }
84    
85 buchmann 1.9 variablemap->GetXaxis()->CenterTitle();
86     variablemap->GetYaxis()->CenterTitle();
87     }
88    
89 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) {
90 buchmann 1.6 bool runninglocally=true;
91     if(njobs>-1&&jobnumber>-1) {
92     runninglocally=false;
93 buchmann 1.13 dout << "Running on the GRID (this is job " << jobnumber << "/" << njobs << ") for a jzb cut at " << jzb_cut[ibin] << endl;
94 buchmann 1.6 } else {
95 buchmann 1.7 dout << "Running locally " << endl;
96     dout << "This will take a really, really long time - if you want to see the results THIS week try running the LimitWorkerScript on the grid (DistributedModelCalculation/Limits/)" << endl;
97 buchmann 1.6 }
98 buchmann 1.4
99 buchmann 1.18 cout << "FILE USED: " << (scansample.collection)[0].filename << endl;
100 buchmann 1.4 jzbSel=jzb_cut[ibin];
101     geqleq="geq";
102     automatized=true;
103     mcjzbexpression=mcjzb;
104    
105     string massgluname="MassGlu";
106     string massLSPname="MassLSP";
107    
108 buchmann 1.23 string prefix="SMS_";
109 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!
110     bool ismSUGRA=false;
111     if(Contains((scansample.collection)[0].filename,"mSUGRA")) ismSUGRA=true;
112     if(ismSUGRA) {
113     massgluname="M0"; // this is the "x axis" in the limit plot (like the gluino in the SMS case)
114     massLSPname="M12"; // this is the "y axis" in the limit plot (like the LSP in the SMS case)
115     mglustart=m0start;
116     mgluend=m0end;
117     mglustep=m0step;
118     mLSPstart=m12start;
119     mLSPend=m12end;
120     mLSPstep=m12step;
121 buchmann 1.23 prefix="mSUGRA_";
122 buchmann 1.22 }
123    
124 buchmann 1.4 Int_t MyPalette[100];
125     Double_t r[] = {0., 0.0, 1.0, 1.0, 1.0};
126     Double_t g[] = {0., 0.0, 0.0, 1.0, 1.0};
127     Double_t b[] = {0., 1.0, 0.0, 0.0, 1.0};
128     Double_t stop[] = {0., .25, .50, .75, 1.0};
129     Int_t FI = TColor::CreateGradientColorTable(5, stop, r, g, b, 110);
130     for (int i=0;i<100;i++) MyPalette[i] = FI+i;
131    
132     gStyle->SetPalette(100, MyPalette);
133    
134 buchmann 1.23 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);
135     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);
136     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);
137     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);
138     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);
139     TH2F *efficiencymap = new TH2F((prefix+"efficiencymap").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);
140     TH2F *Neventsmap = new TH2F((prefix+"Neventsmap").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);
141 buchmann 1.4 float rightmargin=gStyle->GetPadRightMargin();
142     gStyle->SetPadRightMargin(0.15);
143    
144     TCanvas *limcanvas = new TCanvas("limcanvas","Limit canvas");
145    
146 buchmann 1.6 int Npoints=0;
147     for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
148     for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep) Npoints++;
149     }
150    
151     int ipoint=-1;
152 buchmann 1.4 for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
153     for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep)
154     {
155 buchmann 1.6 ipoint++;
156     if(!runninglocally&&!do_this_point(ipoint,Npoints,jobnumber,njobs)) continue;
157 buchmann 1.19 float result=-987,resulterr=-987;
158 buchmann 1.4 stringstream addcut;
159     addcut << "(TMath::Abs("<<massgluname<<"-"<<mglu<<")<5)&&(TMath::Abs("<<massLSPname<<"-"<<mlsp<<")<5)";
160 buchmann 1.14 (scansample.collection)[0].events->Draw("eventNum",addcut.str().c_str(),"goff");
161     float nevents = (scansample.collection)[0].events->GetSelectedRows();
162 buchmann 1.4 vector<vector<float> > systematics;
163 buchmann 1.22 if(nevents==0) {
164     dout << "This configuration ("<<massgluname<<"="<<mglu<<" , "<<massLSPname<<"="<<mlsp << ") contains no events and will be skipped."<< endl;
165 buchmann 1.6 continue;
166     } else {
167 buchmann 1.22 dout << "OK! This configuration ("<<massgluname<<"="<<mglu<<" , "<<massLSPname<<"="<<mlsp << ") contains " << nevents << " and will therefore not be skipped."<< endl;
168     }
169     if(nevents!=0&&efficiencyonly) {
170     MCefficiency((scansample.collection)[0].events,result,resulterr,mcjzb,requireZ,nevents,addcut.str());
171     efficiencymap->Fill(mglu,mlsp,result);
172 buchmann 1.13 }
173 buchmann 1.17 Neventsmap->Fill(mglu,mlsp,nevents);
174     if(efficiencyonly) continue;
175    
176 buchmann 1.22 do_systematics_for_one_file((scansample.collection)[0].events,nevents,"SUSY SCAN", systematics,mcjzb,datajzb,peakerror,requireZ, addcut.str(),ismSUGRA);
177 buchmann 1.9 float JZBcutat = systematics[0][0];
178     float mceff = systematics[0][1];
179 buchmann 1.22 float mcefferr = systematics[0][2];//MC stat error
180 buchmann 1.9 float toterr = systematics[0][4];
181     float sys_jes = systematics[0][5]; // Jet Energy Scale
182     float sys_jsu = systematics[0][6]; // JZB scale uncertainty
183     float sys_res = systematics[0][7]; // resolution
184 buchmann 1.22 efficiencymap->Fill(mglu,mlsp,mceff);
185     efficiencymap->SetBinError(efficiencymap->FindBin(mglu,mlsp),mcefferr);//blublu
186 buchmann 1.10
187 buchmann 1.15 if(mceff!=mceff||toterr!=toterr||mceff<0) {
188     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;
189 buchmann 1.4 continue;
190 buchmann 1.5 } else {
191 buchmann 1.13 if(!systematicsonly&&!efficiencyonly) {
192 buchmann 1.22 dout << "Calculating limit now for "<<massgluname<<"="<<mglu<<" , "<<massLSPname<<"="<<mlsp <<endl;
193 buchmann 1.9 vector<float> sigmas;
194     do_limit_wrapper(mceff,toterr,ibin,mcjzb,sigmas);
195     cout << "back in " << __FUNCTION__ << endl;
196     if(sigmas[0]>-0.5) { // negative sigmas are the error signature of do_limit_wrapper, so we want to exclude them.
197     limitmap->Fill(mglu,mlsp,sigmas[0]);
198 buchmann 1.17 sysjesmap->Fill(mglu,mlsp,sys_jes);
199     sysjsumap->Fill(mglu,mlsp,sys_jsu);
200     sysresmap->Fill(mglu,mlsp,sys_res);
201     efficiencymap->Fill(mglu,mlsp,result);
202 buchmann 1.9 dout << "A limit has been added at " << sigmas[0] << " for m_{glu}="<<mglu << " and m_{lsp}="<<mlsp<<endl;
203 buchmann 1.11 } //end of if sigma is positive
204     //end of not systematics only condition
205 buchmann 1.13 }
206     if(systematicsonly) {
207 buchmann 1.9 sysjesmap->Fill(mglu,mlsp,sys_jes);
208     sysjsumap->Fill(mglu,mlsp,sys_jsu);
209     sysresmap->Fill(mglu,mlsp,sys_res);
210 buchmann 1.17 efficiencymap->Fill(mglu,mlsp,result);
211 buchmann 1.11 }
212 buchmann 1.15 }//efficiency is valid
213 buchmann 1.4 }
214     }
215    
216 buchmann 1.22 prepare_scan_axis(limitmap,ismSUGRA);
217     prepare_scan_axis(sysjesmap,ismSUGRA);
218     prepare_scan_axis(sysjsumap,ismSUGRA);
219     prepare_scan_axis(sysresmap,ismSUGRA);
220 buchmann 1.9
221 buchmann 1.13 if(!systematicsonly&&!efficiencyonly) {
222 buchmann 1.9 limcanvas->cd();
223     limitmap->Draw("COLZ");
224 buchmann 1.22 string titletobewritten="Limits in LSP-Glu plane";
225     if(ismSUGRA) titletobewritten="Limits in m_{1/2}-m_{0} plane";
226     TText *title = write_title(titletobewritten);
227 buchmann 1.9 title->Draw();
228     if(runninglocally) {
229     CompleteSave(limcanvas,"SUSYScan/Limits_JZB_geq"+any2string(jzb_cut[ibin]));
230     } else {
231 buchmann 1.12 TFile *outputfile;
232     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 :-)
233     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
234 buchmann 1.9 limitmap->Write();
235 buchmann 1.18 sysjesmap->Write();
236     sysjsumap->Write();
237     efficiencymap->Write();
238     Neventsmap->Write();
239 buchmann 1.9 outputfile->Close();
240     }
241 buchmann 1.13 }
242     if(systematicsonly) { // systematics only :
243 buchmann 1.9 limcanvas->cd();
244     sysjesmap->Draw("COLZ");
245 buchmann 1.22 string titletobewritten="Jet Energy scale in LSP-Glu plane";
246     if(ismSUGRA) titletobewritten="Limits in m_{1/2}-m_{0} plane";
247     TText *title = write_title(titletobewritten);
248 buchmann 1.9 title->Draw();
249     if(runninglocally) {
250     CompleteSave(limcanvas,"SUSYScan/JES_geq"+any2string(jzb_cut[ibin]));
251     }
252     sysjsumap->Draw("COLZ");
253 buchmann 1.22 titletobewritten="JZB Scale Uncertainty in LSP-Glu plane";
254     if(ismSUGRA) titletobewritten="JZB Scale Uncertainty in m_{1/2}-m_{0} plane";
255     TText *title2 = write_title(titletobewritten);
256 buchmann 1.9 title2->Draw();
257     if(runninglocally) {
258     CompleteSave(limcanvas,"SUSYScan/JSU_geq"+any2string(jzb_cut[ibin]));
259     }
260     sysresmap->Draw("COLZ");
261 buchmann 1.22 titletobewritten="Resolution in LSP-Glu plane";
262     if(ismSUGRA) titletobewritten="Resolution in m_{1/2}-m_{0} plane";
263     TText *title3 = write_title(titletobewritten);
264 buchmann 1.9 title3->Draw();
265     if(runninglocally) {
266     CompleteSave(limcanvas,"SUSYScan/Resolution_geq"+any2string(jzb_cut[ibin]));
267     }
268    
269     if(!runninglocally) {
270     TFile *outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");
271     sysjesmap->Write();
272     sysjsumap->Write();
273     sysresmap->Write();
274 buchmann 1.18 efficiencymap->Write();
275     Neventsmap->Write();
276 buchmann 1.9 outputfile->Close();
277     }
278     }//end of systematics only
279 buchmann 1.13 if(efficiencyonly) {
280     limcanvas->cd();
281     efficiencymap->Draw("COLZ");
282 buchmann 1.22 string titletobewritten="Efficiencies in LSP-Glu plane";
283     if(ismSUGRA) titletobewritten="Efficiencies in m_{1/2}-m_{0} plane";
284     TText *title = write_title(titletobewritten);
285 buchmann 1.13 title->Draw();
286     if(runninglocally) {
287     CompleteSave(limcanvas,"SUSYScan/Efficiency_geq"+any2string(jzb_cut[ibin]));
288     }
289     limcanvas->cd();
290     sysjesmap->Draw("COLZ");
291 buchmann 1.22 titletobewritten="N(events) in LSP-Glu plane";
292     if(ismSUGRA) titletobewritten="N(events) in m_{1/2}-m_{0} plane";
293     TText *title2 = write_title(titletobewritten);
294 buchmann 1.13 title2->Draw();
295     if(runninglocally) {
296     CompleteSave(limcanvas,"SUSYScan/Nevents_geq"+any2string(jzb_cut[ibin]));
297     }
298     if(!runninglocally) {
299     TFile *outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");
300     Neventsmap->Write();
301     efficiencymap->Write();
302     outputfile->Close();
303     }
304     }//end of efficiencies only
305     delete limcanvas;
306 buchmann 1.1 }
307 buchmann 1.4
308 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) {
309 buchmann 1.10 dout << "Starting the SUSY scan now with all " << jzb_cut.size() << " bin(s)" << endl;
310 buchmann 1.4 for(int ibin=0;ibin<jzb_cut.size();ibin++) {
311 buchmann 1.13 scan_SUSY_parameter_space(mcjzb,datajzb,jzb_cut,requireZ, peakerror, ibin, njobs, jobnumber,systonly,effonly);
312 buchmann 1.4 }
313 buchmann 1.6 }