ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/UserCode/cbrown/AnalysisFramework/Plotting/Modules/SUSYScan.C
Revision: 1.17
Committed: Wed Aug 17 17:27:40 2011 UTC (13 years, 8 months ago) by buchmann
Content type: text/plain
Branch: MAIN
Changes since 1.16: +11 -5 lines
Log Message:
Now storing everything we calculate in simplified model scans (though not plotting afterwards) so we can recycle the files

File Contents

# Content
1 #include <iostream>
2 #include <vector>
3 #include <sys/stat.h>
4 #include <fstream>
5 #include <pthread.h>
6
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 void scan_susy_space(string mcjzb, string datajzb) {
33 TCanvas *c3 = new TCanvas("c3","c3");
34 vector<float> binning;
35 binning=allsamples.get_optimal_binsize(mcjzb,cutmass&&cutOSSF&&cutnJets,20,50,800);
36 float arrbinning[binning.size()];
37 for(int i=0;i<binning.size();i++) arrbinning[i]=binning[i];
38 TH1F *puredata = allsamples.Draw("puredata", datajzb,binning, "JZB [GeV]", "events", cutmass&&cutOSSF&&cutnJets,data,luminosity);
39 puredata->SetMarkerSize(DataMarkerSize);
40 TH1F *allbgs = allsamples.Draw("allbgs", "-"+datajzb,binning, "JZB [GeV]", "events", cutmass&&cutOSSF&&cutnJets,data,luminosity);
41 TH1F *allbgsb = allsamples.Draw("allbgsb", "-"+datajzb,binning, "JZB [GeV]", "events", cutmass&&cutOSOF&&cutnJets,data,luminosity);
42 TH1F *allbgsc = allsamples.Draw("allbgsc", datajzb,binning, "JZB [GeV]", "events", cutmass&&cutOSOF&&cutnJets,data,luminosity);
43 allbgs->Add(allbgsb,-1);
44 allbgs->Add(allbgsc);
45 int ndata=puredata->Integral();
46 ofstream myfile;
47 myfile.open ("susyscan_log.txt");
48 TFile *susyscanfile = new TFile("/scratch/fronga/SMS/T5z_SqSqToQZQZ_38xFall10.root");
49 TTree *suevents = (TTree*)susyscanfile->Get("events");
50 TH2F *exclusionmap = new TH2F("exclusionmap","",20,0,500,20,0,1000);
51 TH2F *exclusionmap1s = new TH2F("exclusionmap1s","",20,0,500,20,0,1000);
52 TH2F *exclusionmap2s = new TH2F("exclusionmap2s","",20,0,500,20,0,1000);
53 TH2F *exclusionmap3s = new TH2F("exclusionmap3s","",20,0,500,20,0,1000);
54
55 susy_scan_axis_labeling(exclusionmap);
56 susy_scan_axis_labeling(exclusionmap1s);
57 susy_scan_axis_labeling(exclusionmap2s);
58 susy_scan_axis_labeling(exclusionmap3s);
59
60 Int_t MyPalette[100];
61 Double_t r[] = {0., 0.0, 1.0, 1.0, 1.0};
62 Double_t g[] = {0., 0.0, 0.0, 1.0, 1.0};
63 Double_t b[] = {0., 1.0, 0.0, 0.0, 1.0};
64 Double_t stop[] = {0., .25, .50, .75, 1.0};
65 Int_t FI = TColor::CreateGradientColorTable(5, stop, r, g, b, 100);
66 for (int i=0;i<100;i++) MyPalette[i] = FI+i;
67
68 gStyle->SetPalette(100, MyPalette);
69
70 for(int m23=50;m23<500;m23+=25) {
71 for (int m0=(2*(m23-50)+150);m0<=1000;m0+=50)
72 {
73 c3->cd();
74 stringstream drawcondition;
75 drawcondition << "pfJetGoodNum>=3&&(TMath::Abs(masses[0]-"<<m0<<")<10&&TMath::Abs(masses[2]-masses[3]-"<<m23<<")<10)&&mll>5&&id1==id2";
76 TH1F *puresignal = new TH1F("puresignal","puresignal",binning.size()-1,arrbinning);
77 TH1F *puresignall= new TH1F("puresignall","puresignal",binning.size()-1,arrbinning);
78 stringstream drawvar,drawvar2;
79 drawvar<<mcjzb<<">>puresignal";
80 drawvar2<<"-"<<mcjzb<<">>puresignall";
81 suevents->Draw(drawvar.str().c_str(),drawcondition.str().c_str());
82 suevents->Draw(drawvar2.str().c_str(),drawcondition.str().c_str());
83 if(puresignal->Integral()<60) {
84 delete puresignal;
85 continue;
86 }
87 puresignal->Add(puresignall,-1);//we need to correct for the signal contamination - we effectively only see (JZB>0)-(JZB<0) !!
88 puresignal->Scale(ndata/(20*puresignal->Integral()));//normalizing it to 5% of the data
89 stringstream saveas;
90 saveas<<"Model_Scan/m0_"<<m0<<"__m23_"<<m23;
91 dout << "PLEASE KEEP IN MIND THAT SIGNAL CONTAMINATION IS NOT REALLY TAKEN CARE OF YET DUE TO LOW STATISTICS! SHOULD BE SOMETHING LIKE THIS : "<< endl;
92 // TH1F *signalpredlo = allsamples.Draw("signalpredlo", "-"+mcjzb, binning, "JZB [GeV]", "events", cutmass&&cutOSOF&&cutnJets,mc, luminosity,allsamples.FindSample("LM4"));
93 // TH1F *signalpredro = allsamples.Draw("signalpredro", mcjzb, binning, "JZB [GeV]", "events", cutmass&&cutOSOF&&cutnJets,mc, luminosity,allsamples.FindSample("LM4"));
94 // TH1F *puredata = allsamples.Draw("puredata", datajzb,binning, "JZB [GeV]", "events", cutmass&&cutOSSF&&cutnJets,data,luminosity);
95 // signalpred->Add(signalpredlo,-1);
96 // signalpred->Add(signalpredro);
97 // puresignal->Add(signalpred,-1);//subtracting signal contamination
98 //---------------------
99 // dout << "(m0,m23)=("<<m0<<","<<m23<<") contains " << puresignal->Integral() << endl;
100 // TH1F *puresignal = allsamples.Draw("puresignal",mcjzb, binning, "JZB [GeV]", "events", cutmass&&cutOSSF&&cutnJets,mc, luminosity,allsamples.FindSample("LM4"));
101 vector<float> results=establish_upper_limits(puredata,allbgs,puresignal,saveas.str(),myfile);
102 if(results.size()==0) {
103 delete puresignal;
104 continue;
105 }
106 exclusionmap->Fill(m23,m0,results[0]);
107 exclusionmap1s->Fill(m23,m0,results[1]);
108 exclusionmap2s->Fill(m23,m0,results[2]);
109 exclusionmap3s->Fill(m23,m0,results[3]);
110 delete puresignal;
111 dout << "(m0,m23)=("<<m0<<","<<m23<<") : 3 sigma at " << results[3] << endl;
112 }
113 }//end of model scan for loop
114
115 dout << "Exclusion Map contains" << exclusionmap->Integral() << " (integral) and entries: " << exclusionmap->GetEntries() << endl;
116 c3->cd();
117 exclusionmap->Draw("CONTZ");
118 CompleteSave(c3,"Model_Scan/CONT/Model_Scan_Mean_values");
119 exclusionmap->Draw("COLZ");
120 CompleteSave(c3,"Model_Scan/COL/Model_Scan_Mean_values");
121
122 exclusionmap1s->Draw("CONTZ");
123 CompleteSave(c3,"Model_Scan/CONT/Model_Scan_1sigma_values");
124 exclusionmap1s->Draw("COLZ");
125 CompleteSave(c3,"Model_Scan/COL/Model_Scan_1sigma_values");
126
127 exclusionmap2s->Draw("CONTZ");
128 CompleteSave(c3,"Model_Scan/CONT/Model_Scan_2sigma_values");
129 exclusionmap2s->Draw("COLZ");
130 CompleteSave(c3,"Model_Scan/COL/Model_Scan_2sigma_values");
131
132 exclusionmap3s->Draw("CONTZ");
133 CompleteSave(c3,"Model_Scan/CONT/Model_Scan_3sigma_values");
134 exclusionmap3s->Draw("COLZ");
135 CompleteSave(c3,"Model_Scan/COL/Model_Scan_3sigma_values");
136
137 TFile *exclusion_limits = new TFile("exclusion_limits.root","RECREATE");
138 exclusionmap->Write();
139 exclusionmap1s->Write();
140 exclusionmap2s->Write();
141 exclusionmap3s->Write();
142 exclusion_limits->Close();
143 susyscanfile->Close();
144
145 myfile.close();
146 }
147
148 bool isThreadActive=false;
149
150 struct limit_args {
151 float mceff;
152 float toterr;
153 int ibin;
154 string mcjzb;
155 vector<float> sigmas;
156 };
157
158 void* compute_one_upper_limit_wrapper(void* data) {
159 isThreadActive=true;
160 limit_args* args = (limit_args*) data;
161 std::cout << "Thread to compute limits has been started" << std::endl;
162 args->sigmas=compute_one_upper_limit(args->mceff,args->toterr,args->ibin,args->mcjzb);
163 std::cout << "Thread to compute limits has finished" << std::endl;
164 isThreadActive=false;
165 return NULL; // oder in C++: return 0;// Damit kann man Werte zurückgeben
166 }
167
168 void do_limit_wrapper(float mceff,float toterr,int ibin,string mcjzb,vector<float> &sigmas) {
169 pthread_t limitthread;
170 limit_args limargs={mceff,toterr,ibin,mcjzb,sigmas};
171 pthread_create( &limitthread, NULL, compute_one_upper_limit_wrapper, (void*) &limargs);
172 int counter=0;
173 sleep(1); //waiting a second for the process to become active
174 while(counter<limitpatience*60 && isThreadActive) {
175 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;
176 counter++;
177 sleep(1);
178 }
179
180 if(!isThreadActive) {
181 cout << "Thread finished sucessfully" << endl;
182 pthread_join( limitthread, NULL );
183 std::cout<< __FUNCTION__ << " : going to save sigmas " << std::endl;
184 sigmas=limargs.sigmas;
185 } else {
186 pthread_cancel(limitthread);
187 std::cout << "DID NOT TERMINATE IN TIME - ABORTED!" << std::endl;
188 sigmas.push_back(-1);sigmas.push_back(-1);sigmas.push_back(-1);
189 }
190 }
191
192 void prepare_scan_axis(TH2 *variablemap) {
193 variablemap->GetXaxis()->SetTitle("m_{glu}");
194 variablemap->GetXaxis()->CenterTitle();
195 variablemap->GetYaxis()->SetTitle("m_{LSP}");
196 variablemap->GetYaxis()->CenterTitle();
197
198 variablemap->GetXaxis()->SetTitle("m_{glu}");
199 variablemap->GetXaxis()->CenterTitle();
200 variablemap->GetYaxis()->SetTitle("m_{LSP}");
201 variablemap->GetYaxis()->CenterTitle();
202 }
203
204 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) {
205 bool runninglocally=true;
206 if(njobs>-1&&jobnumber>-1) {
207 runninglocally=false;
208 dout << "Running on the GRID (this is job " << jobnumber << "/" << njobs << ") for a jzb cut at " << jzb_cut[ibin] << endl;
209 } else {
210 dout << "Running locally " << endl;
211 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;
212 }
213
214 jzbSel=jzb_cut[ibin];
215 geqleq="geq";
216 automatized=true;
217 mcjzbexpression=mcjzb;
218
219 string massgluname="MassGlu";
220 string massLSPname="MassLSP";
221
222 Int_t MyPalette[100];
223 Double_t r[] = {0., 0.0, 1.0, 1.0, 1.0};
224 Double_t g[] = {0., 0.0, 0.0, 1.0, 1.0};
225 Double_t b[] = {0., 1.0, 0.0, 0.0, 1.0};
226 Double_t stop[] = {0., .25, .50, .75, 1.0};
227 Int_t FI = TColor::CreateGradientColorTable(5, stop, r, g, b, 110);
228 for (int i=0;i<100;i++) MyPalette[i] = FI+i;
229
230 gStyle->SetPalette(100, MyPalette);
231
232 TH2F *limitmap = new TH2F(("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);
233 TH2F *sysjesmap = new TH2F(("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);
234 TH2F *sysjsumap = new TH2F(("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);
235 TH2F *sysresmap = new TH2F(("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);
236 TH2F *efficiencymap = new TH2F("efficiencymap","",(mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
237 TH2F *Neventsmap = new TH2F("Neventsmap","", (mgluend-mglustart)/mglustep+1,mglustart-0.5*mglustep,mgluend+0.5*mglustep,(mLSPend-mLSPstart)/mLSPstep+1,mLSPstart-0.5*mLSPstep,mLSPend+0.5*mLSPstep);
238 float rightmargin=gStyle->GetPadRightMargin();
239 gStyle->SetPadRightMargin(0.15);
240
241 TCanvas *limcanvas = new TCanvas("limcanvas","Limit canvas");
242
243
244 int Npoints=0;
245 for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
246 for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep) Npoints++;
247 }
248
249 int ipoint=-1;
250 for(int mglu=mglustart;mglu<=mgluend;mglu+=mglustep) {
251 for (int mlsp=mLSPstart;mlsp<=mLSPend&&mlsp<=mglu;mlsp+=mLSPstep)
252 {
253 ipoint++;
254 if(!runninglocally&&!do_this_point(ipoint,Npoints,jobnumber,njobs)) continue;
255 float result,resulterr;
256 stringstream addcut;
257 addcut << "(TMath::Abs("<<massgluname<<"-"<<mglu<<")<5)&&(TMath::Abs("<<massLSPname<<"-"<<mlsp<<")<5)";
258 (scansample.collection)[0].events->Draw("eventNum",addcut.str().c_str(),"goff");
259 float nevents = (scansample.collection)[0].events->GetSelectedRows();
260 vector<vector<float> > systematics;
261 if(nevents!=0) MCefficiency((scansample.collection)[0].events,result,resulterr,mcjzb,requireZ,nevents,addcut.str());
262 if(nevents==0||result!=result||resulterr!=resulterr) {
263 dout << "Limits can't be calculated for this configuration (mglu="<<mglu<<" , mlsp="<<mlsp << ") as either the efficiency or its error are not numbers or the number of events is zero! (result="<<result<<" and resulterr="<<resulterr<<"; Nevents=" << nevents << ")"<< endl;
264 continue;
265 } else {
266 dout << "Configuration (mglu="<<mglu<<" , mlsp="<<mlsp << ") passed the mcefficiency test." << endl;
267 }
268 efficiencymap->Fill(mglu,mlsp,result);
269 Neventsmap->Fill(mglu,mlsp,nevents);
270 if(efficiencyonly) continue;
271
272 do_systematics_for_one_file((scansample.collection)[0].events,nevents,"SUSY SCAN", systematics,mcjzb,datajzb,peakerror,requireZ, addcut.str());
273 float JZBcutat = systematics[0][0];
274 float mceff = systematics[0][1];
275 float toterr = systematics[0][4];
276 float sys_jes = systematics[0][5]; // Jet Energy Scale
277 float sys_jsu = systematics[0][6]; // JZB scale uncertainty
278 float sys_res = systematics[0][7]; // resolution
279
280 // cout << "EXTRACTED THE FOLLOWING INFORMATION: mceff=" << mceff << " , toterr=" << toterr << " , sys_jes=" << sys_jes << " , sys_jsu=" << sys_jsu << " , sys_res = " << sys_res << endl;
281
282 if(mceff!=mceff||toterr!=toterr||mceff<0) {
283 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;
284 continue;
285 } else {
286 if(!systematicsonly&&!efficiencyonly) {
287 dout << "Calculating limit now for m_{glu}="<<mglu << " and m_{lsp}="<<mlsp<<endl;
288 vector<float> sigmas;
289 do_limit_wrapper(mceff,toterr,ibin,mcjzb,sigmas);
290 cout << "back in " << __FUNCTION__ << endl;
291 if(sigmas[0]>-0.5) { // negative sigmas are the error signature of do_limit_wrapper, so we want to exclude them.
292 limitmap->Fill(mglu,mlsp,sigmas[0]);
293 sysjesmap->Fill(mglu,mlsp,sys_jes);
294 sysjsumap->Fill(mglu,mlsp,sys_jsu);
295 sysresmap->Fill(mglu,mlsp,sys_res);
296 efficiencymap->Fill(mglu,mlsp,result);
297 Neventsmap->Fill(mglu,mlsp,nevents);
298 dout << "A limit has been added at " << sigmas[0] << " for m_{glu}="<<mglu << " and m_{lsp}="<<mlsp<<endl;
299 } //end of if sigma is positive
300 //end of not systematics only condition
301 }
302 if(systematicsonly) {
303 sysjesmap->Fill(mglu,mlsp,sys_jes);
304 sysjsumap->Fill(mglu,mlsp,sys_jsu);
305 sysresmap->Fill(mglu,mlsp,sys_res);
306 efficiencymap->Fill(mglu,mlsp,result);
307 Neventsmap->Fill(mglu,mlsp,nevents);
308 }
309 }//efficiency is valid
310 }
311 }
312
313 prepare_scan_axis(limitmap);
314 prepare_scan_axis(sysjesmap);
315 prepare_scan_axis(sysjsumap);
316 prepare_scan_axis(sysresmap);
317
318 if(!systematicsonly&&!efficiencyonly) {
319 limcanvas->cd();
320 limitmap->Draw("COLZ");
321 TText *title = write_title("Limits in LSP-Glu plane");
322 title->Draw();
323 if(runninglocally) {
324 CompleteSave(limcanvas,"SUSYScan/Limits_JZB_geq"+any2string(jzb_cut[ibin]));
325 } else {
326 TFile *outputfile;
327 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 :-)
328 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
329 limitmap->Write();
330 outputfile->Close();
331 }
332 }
333 if(systematicsonly) { // systematics only :
334 limcanvas->cd();
335 sysjesmap->Draw("COLZ");
336 TText *title = write_title("Jet Energy scale in LSP-Glu plane");
337 title->Draw();
338 if(runninglocally) {
339 CompleteSave(limcanvas,"SUSYScan/JES_geq"+any2string(jzb_cut[ibin]));
340 }
341 sysjsumap->Draw("COLZ");
342 TText *title2 = write_title("JZB Scale Uncertainty in LSP-Glu plane");
343 title2->Draw();
344 if(runninglocally) {
345 CompleteSave(limcanvas,"SUSYScan/JSU_geq"+any2string(jzb_cut[ibin]));
346 }
347 sysresmap->Draw("COLZ");
348 TText *title3 = write_title("Resolution in LSP-Glu plane");
349 title3->Draw();
350 if(runninglocally) {
351 CompleteSave(limcanvas,"SUSYScan/Resolution_geq"+any2string(jzb_cut[ibin]));
352 }
353
354 if(!runninglocally) {
355 TFile *outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");
356 sysjesmap->Write();
357 sysjsumap->Write();
358 sysresmap->Write();
359 outputfile->Close();
360 }
361 }//end of systematics only
362 if(efficiencyonly) {
363 limcanvas->cd();
364 efficiencymap->Draw("COLZ");
365 TText *title = write_title("Efficiencies in LSP-Glu plane");
366 title->Draw();
367 if(runninglocally) {
368 CompleteSave(limcanvas,"SUSYScan/Efficiency_geq"+any2string(jzb_cut[ibin]));
369 }
370 limcanvas->cd();
371 sysjesmap->Draw("COLZ");
372 TText *title2 = write_title("N(events) in LSP-Glu plane");
373 title2->Draw();
374 if(runninglocally) {
375 CompleteSave(limcanvas,"SUSYScan/Nevents_geq"+any2string(jzb_cut[ibin]));
376 }
377 if(!runninglocally) {
378 TFile *outputfile=new TFile(("output/DistributedSystematics_job"+string(any2string(jobnumber))+"_of_"+string(any2string(njobs))+".root").c_str(),"UPDATE");
379 Neventsmap->Write();
380 efficiencymap->Write();
381 outputfile->Close();
382 }
383 }//end of efficiencies only
384 delete limcanvas;
385 }
386
387 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) {
388 dout << "Starting the SUSY scan now with all " << jzb_cut.size() << " bin(s)" << endl;
389 for(int ibin=0;ibin<jzb_cut.size();ibin++) {
390 scan_SUSY_parameter_space(mcjzb,datajzb,jzb_cut,requireZ, peakerror, ibin, njobs, jobnumber,systonly,effonly);
391 }
392 }