69 MsgStream log(
msgSvc(), name());
70 log<<MSG::INFO<<
"DedxCalibEAng::FillHists()"<<endreq;
77 float runNO=0,evtNO=0,runFlag=0,pathlength=0,wid=0,layid=0,dd_in=0,driftdist=0,eangle=0,zhit=0,
costheta=0,tes=0,
ptrk=0,
charge=0;
80 vector<double> m_phlist(0);
81 vector<double> m_phlist_test(0);
82 vector<int> m_iEAng_list(0);
83 double old_costheta(0), old_ptrk(0);
88 cout<<
"runlist: "<<runlist.c_str()<<endl;
89 f =
new TFile(runlist.c_str());
90 n102 = (TTree*)
f->Get(
"n102");
104 n102->SetBranchAddress(
"ptrk1",&
ptrk);
105 n102->SetBranchAddress(
"charge",&
charge);
106 for(
int j=0;j<n102->GetEntries();j++)
110 if((fabs(
costheta-old_costheta)>0.001 || fabs(
ptrk-old_ptrk>0.001)) && m_phlist.size()>=2){
111 sort(m_phlist_test.begin(), m_phlist_test.end());
112 unsigned int nsample = (
unsigned int)(m_phlist_test.size()*m_truncate);
113 double m_trunc_value = m_phlist_test[nsample];
114 for(
unsigned int i=0; i<m_phlist.size(); i++){
115 if(m_phlist[i]>m_trunc_value)
continue;
116 m_trunc_eangle[m_iEAng_list[i]]->Fill(m_phlist[i]);
119 m_phlist_test.clear();
120 m_iEAng_list.clear();
125 if(eangle >0.25) eangle = eangle -0.5;
126 else if(eangle <-0.25) eangle = eangle +0.5;
129 if(
ptrk>pMax ||
ptrk<pMin)
continue;
130 if(tes>1400)
continue;
132 if(layid <4)
continue;
139 dedx =
exsvc->
StandardHitCorrec(0,runFlag,2,runNO,evtNO,pathlength,wid,layid,dedx,dd_in,eangle,
costheta);
141 m_eangle[iEAng]->Fill(dedx);
142 m_phlist.push_back(dedx);
143 m_phlist_test.push_back(dedx);
144 m_iEAng_list.push_back(iEAng);
145 if(
charge>0) m_pos_eangle[iEAng]->Fill(dedx);
146 if(
charge<0) m_neg_eangle[iEAng]->Fill(dedx);
154 MsgStream log(
msgSvc(), name());
155 log<<MSG::INFO<<
"DedxCalibEAng::AnalyseHists()"<<endreq;
158 Double_t entry=0,mean=0,rms=0;
161 gStyle->SetOptFit(1111);
164 entry = m_eangle[ip]->Integral();
165 if(entry<10)
continue;
166 mean = m_eangle[ip]->GetMean();
167 rms = m_eangle[ip]->GetRMS();
168 binmax = m_eangle[ip]->GetMaximumBin();
169 lp[1] = m_eangle[ip]->GetBinCenter(binmax);
171 lp[0] = (m_eangle[ip]->GetBinContent(binmax)+m_eangle[ip]->GetBinContent(binmax-1)+m_eangle[ip]->GetBinContent(binmax+1))/3;
175 func =
new TF1(
"mylan",
mylan,10,3000,4);
176 func->SetParLimits(0, 0, entry);
177 func->SetParLimits(1, 0, mean);
178 func->SetParLimits(2, 10, rms);
179 func->SetParLimits(3, -1, 0);
180 func->SetParameters(entry/36., mean-200, rms/2.3, -0.5);
184 func =
new TF1(
"landaun",
landaun,10,3000,3);
185 func->SetParameters(lp[0], lp[1], lp[2] );
189 func =
new TF1(
"Landau",
Landau,10,3000,2);
190 func->SetParameters(0.7*mean, rms );
194 func =
new TF1(
"Vavilov",
Vavilov,10,3000,2);
195 func->SetParameters(0.05, 0.6);
199 func =
new TF1(
"AsymGauss",
AsymGauss,10,3000,4);
200 func->SetParameters(entry, mean, rms, 1.0 );
202 func->SetLineWidth(2.1);
203 func->SetLineColor(2);
205 m_eangle[ip]->Fit(func,
"rq" );
206 m_pos_eangle[ip]->Fit(func,
"rq");
207 m_neg_eangle[ip]->Fit(func,
"rq");
213 MsgStream log(
msgSvc(), name());
214 log<<MSG::INFO<<
"DedxCalibEAng::WriteHists()"<<endreq;
222 double Norm(0), trunc_Norm(0);
229 entryNo[ip]= m_eangle[ip]->Integral();
230 trunc_mean[ip] = m_trunc_eangle[ip]->GetMean();
231 trunc_sigma[ip] = m_trunc_eangle[ip]->GetRMS();
232 pos_entryNo[ip]= m_pos_eangle[ip]->Integral();
233 pos_mean[ip] = m_pos_eangle[ip]->GetMean();
234 pos_sigma[ip] = m_pos_eangle[ip]->GetRMS();
235 neg_entryNo[ip]= m_neg_eangle[ip]->Integral();
236 neg_mean[ip] = m_neg_eangle[ip]->GetMean();
237 neg_sigma[ip] = m_neg_eangle[ip]->GetRMS();
238 if(entryNo[ip]<10 || pos_entryNo[ip]<10 || neg_entryNo[ip]<10)
continue;
242 fitmean[ip] = m_eangle[ip]->GetFunction(
"mylan")->GetParameter(1);
243 fitmeanerr[ip] = m_eangle[ip]->GetFunction(
"mylan")->GetParError(1);
244 fitsigma[ip] = m_eangle[ip]->GetFunction(
"mylan")->GetParameter(2);
245 chisq[ip] = (m_eangle[ip]->GetFunction(
"mylan")-> GetChisquare())/(m_eangle[ip]->GetFunction(
"mylan")-> GetNDF());
247 pos_fitmean[ip] = m_pos_eangle[ip]->GetFunction(
"mylan")->GetParameter(1);
248 pos_fitmeanerr[ip] = m_pos_eangle[ip]->GetFunction(
"mylan")->GetParError(1);
249 pos_fitsigma[ip] = m_pos_eangle[ip]->GetFunction(
"mylan")->GetParameter(2);
250 pos_chisq[ip] = (m_pos_eangle[ip]->GetFunction(
"mylan")-> GetChisquare())/(m_pos_eangle[ip]->GetFunction(
"mylan")-> GetNDF());
252 neg_fitmean[ip] = m_neg_eangle[ip]->GetFunction(
"mylan")->GetParameter(1);
253 neg_fitmeanerr[ip] = m_neg_eangle[ip]->GetFunction(
"mylan")->GetParError(1);
254 neg_fitsigma[ip] = m_neg_eangle[ip]->GetFunction(
"mylan")->GetParameter(2);
255 neg_chisq[ip] = (m_neg_eangle[ip]->GetFunction(
"mylan")-> GetChisquare())/(m_neg_eangle[ip]->GetFunction(
"mylan")-> GetNDF());
259 fitmean[ip] = m_eangle[ip]->GetFunction(
"landaun")->GetParameter(1);
260 fitmeanerr[ip] = m_eangle[ip]->GetFunction(
"landaun")->GetParError(1);
261 fitsigma[ip] = m_eangle[ip]->GetFunction(
"landaun")->GetParameter(2);
262 chisq[ip] = (m_eangle[ip]->GetFunction(
"landaun")-> GetChisquare())/(m_eangle[ip]->GetFunction(
"mylan")-> GetNDF());
264 pos_fitmean[ip] = m_pos_eangle[ip]->GetFunction(
"landaun")->GetParameter(1);
265 pos_fitmeanerr[ip] = m_pos_eangle[ip]->GetFunction(
"landaun")->GetParError(1);
266 pos_fitsigma[ip] = m_pos_eangle[ip]->GetFunction(
"landaun")->GetParameter(2);
267 pos_chisq[ip] = (m_pos_eangle[ip]->GetFunction(
"landaun")-> GetChisquare())/(m_pos_eangle[ip]->GetFunction(
"landaun")-> GetNDF());
269 neg_fitmean[ip] = m_neg_eangle[ip]->GetFunction(
"landaun")->GetParameter(1);
270 neg_fitmeanerr[ip] = m_neg_eangle[ip]->GetFunction(
"landaun")->GetParError(1);
271 neg_fitsigma[ip] = m_neg_eangle[ip]->GetFunction(
"landaun")->GetParameter(2);
272 neg_chisq[ip] = (m_neg_eangle[ip]->GetFunction(
"landaun")-> GetChisquare())/(m_neg_eangle[ip]->GetFunction(
"landaun")-> GetNDF());
276 fitmean[ip] = m_eangle[ip]->GetFunction(
"Landau")->GetParameter(1);
277 fitmeanerr[ip] = m_eangle[ip]->GetFunction(
"Landau")->GetParError(1);
278 fitsigma[ip] = m_eangle[ip]->GetFunction(
"Landau")->GetParameter(2);
279 chisq[ip] = (m_eangle[ip]->GetFunction(
"Landau")-> GetChisquare())/(m_eangle[ip]->GetFunction(
"Landau")-> GetNDF());
281 pos_fitmean[ip] = m_pos_eangle[ip]->GetFunction(
"Landau")->GetParameter(1);
282 pos_fitmeanerr[ip] = m_pos_eangle[ip]->GetFunction(
"Landau")->GetParError(1);
283 pos_fitsigma[ip] = m_pos_eangle[ip]->GetFunction(
"Landau")->GetParameter(2);
284 pos_chisq[ip] = (m_pos_eangle[ip]->GetFunction(
"Landau")-> GetChisquare())/(m_pos_eangle[ip]->GetFunction(
"Landau")-> GetNDF());
286 neg_fitmean[ip] = m_neg_eangle[ip]->GetFunction(
"Landau")->GetParameter(1);
287 neg_fitmeanerr[ip] = m_neg_eangle[ip]->GetFunction(
"Landau")->GetParError(1);
288 neg_fitsigma[ip] = m_neg_eangle[ip]->GetFunction(
"Landau")->GetParameter(2);
289 neg_chisq[ip] = (m_neg_eangle[ip]->GetFunction(
"Landau")-> GetChisquare())/(m_neg_eangle[ip]->GetFunction(
"Landau")-> GetNDF());
293 fitmean[ip] = m_eangle[ip]->GetFunction(
"Vavilov")->GetParameter(1);
294 fitmeanerr[ip] = m_eangle[ip]->GetFunction(
"Vavilov")->GetParError(1);
295 fitsigma[ip] = m_eangle[ip]->GetFunction(
"Vavilov")->GetParameter(2);
296 chisq[ip] = (m_eangle[ip]->GetFunction(
"Vavilov")-> GetChisquare())/(m_eangle[ip]->GetFunction(
"Vavilov")-> GetNDF());
298 pos_fitmean[ip] = m_pos_eangle[ip]->GetFunction(
"Vavilov")->GetParameter(1);
299 pos_fitmeanerr[ip] = m_pos_eangle[ip]->GetFunction(
"Vavilov")->GetParError(1);
300 pos_fitsigma[ip] = m_pos_eangle[ip]->GetFunction(
"Vavilov")->GetParameter(2);
301 pos_chisq[ip] = (m_pos_eangle[ip]->GetFunction(
"Vavilov")-> GetChisquare())/(m_pos_eangle[ip]->GetFunction(
"Vavilov")-> GetNDF());
303 neg_fitmean[ip] = m_neg_eangle[ip]->GetFunction(
"Vavilov")->GetParameter(1);
304 neg_fitmeanerr[ip] = m_neg_eangle[ip]->GetFunction(
"Vavilov")->GetParError(1);
305 neg_fitsigma[ip] = m_neg_eangle[ip]->GetFunction(
"Vavilov")->GetParameter(2);
306 neg_chisq[ip] = (m_neg_eangle[ip]->GetFunction(
"Vavilov")-> GetChisquare())/(m_neg_eangle[ip]->GetFunction(
"Vavilov")-> GetNDF());
310 fitmean[ip] = m_eangle[ip]->GetFunction(
"AsymGauss")->GetParameter(1);
311 fitmeanerr[ip] = m_eangle[ip]->GetFunction(
"AsymGauss")->GetParError(1);
312 fitsigma[ip] = m_eangle[ip]->GetFunction(
"AsymGauss")->GetParameter(2);
313 chisq[ip] = (m_eangle[ip]->GetFunction(
"AsymGauss")-> GetChisquare())/(m_eangle[ip]->GetFunction(
"AsymGauss")-> GetNDF());
315 pos_fitmean[ip] = m_pos_eangle[ip]->GetFunction(
"AsymGauss")->GetParameter(1);
316 pos_fitmeanerr[ip] = m_pos_eangle[ip]->GetFunction(
"AsymGauss")->GetParError(1);
317 pos_fitsigma[ip] = m_pos_eangle[ip]->GetFunction(
"AsymGauss")->GetParameter(2);
318 pos_chisq[ip] = (m_pos_eangle[ip]->GetFunction(
"AsymGauss")-> GetChisquare())/(m_pos_eangle[ip]->GetFunction(
"AsymGauss")-> GetNDF());
320 neg_fitmean[ip] = m_neg_eangle[ip]->GetFunction(
"AsymGauss")->GetParameter(1);
321 neg_fitmeanerr[ip] = m_neg_eangle[ip]->GetFunction(
"AsymGauss")->GetParError(1);
322 neg_fitsigma[ip] = m_neg_eangle[ip]->GetFunction(
"AsymGauss")->GetParameter(2);
323 neg_chisq[ip] = (m_neg_eangle[ip]->GetFunction(
"AsymGauss")-> GetChisquare())/(m_neg_eangle[ip]->GetFunction(
"AsymGauss")-> GetNDF());
325 if(entryNo[ip]>1500 && fitmean[ip]>0 && fitmeanerr[ip]>0 && fitmeanerr[ip]<10 && fitsigma[ip]>0 && fitsigma[ip]<200){
327 trunc_Norm += trunc_mean[ip];
332 trunc_Norm = trunc_Norm/
count;
334 cout<<
"count= "<<
count<<
" average value: "<< Norm <<
" truncted: " << trunc_Norm << endl;
337 if(entryNo[i]>10 && fitmean[i]>0 && fitsigma[i]>0) gain[i]=fitmean[i]/Norm;
339 if(entryNo[i]>10) trunc_gain[i]=trunc_mean[i]/trunc_Norm;
340 else trunc_mean[i] = 1;
341 if(pos_entryNo[i]>10 && pos_fitmean[i]>0 && pos_fitsigma[i]>0) pos_gain[i]=pos_fitmean[i]/Norm;
342 else pos_gain[i] = 1;
343 if(neg_entryNo[i]>10 && neg_fitmean[i]>0 && neg_fitsigma[i]>0) neg_gain[i]=neg_fitmean[i]/Norm;
344 else neg_gain[i] = 1;
346 m_EAngAverdE -> SetBinContent(i+1, gain[i]);
347 m_EAngAverdE->SetBinError(i+1, fitmeanerr[i]/Norm);
349 if(trunc_gain[i] != 1){
350 m_trunc_EAngAverdE -> SetBinContent(i+1, trunc_gain[i]);
351 m_trunc_EAngAverdE->SetBinError(i+1, trunc_sigma[i]/trunc_Norm);
353 if(pos_gain[i] != 1){
354 m_pos_EAngAverdE -> SetBinContent(i+1, pos_gain[i]);
355 m_pos_EAngAverdE->SetBinError(i+1, pos_fitmeanerr[i]/Norm);
357 if(neg_gain[i] != 1){
358 m_neg_EAngAverdE -> SetBinContent(i+1, neg_gain[i]);
359 m_neg_EAngAverdE->SetBinError(i+1, neg_fitmeanerr[i]/Norm);
363 log<<MSG::INFO<<
"begin getting calibration constant!!! "<<endreq;
365 int denangle_entry[1] = {100};
366 m_EAngAverdE->Fit(
"pol1",
"r",
"",-0.25,0.25);
367 double par0 = m_EAngAverdE->GetFunction(
"pol1")->GetParameter(0);
368 double par1 = m_EAngAverdE->GetFunction(
"pol1")->GetParameter(1);
372 for(
int i=0;i<
NumSlices;i++) denangle[i] = gain[i];
374 log<<MSG::INFO<<
"begin generating root file!!! "<<endreq;
375 TFile*
f =
new TFile(
m_rootfile.c_str(),
"recreate");
377 m_eangle[ip]->Write();
378 m_trunc_eangle[ip]->Write();
379 m_pos_eangle[ip]->Write();
380 m_neg_eangle[ip]->Write();
382 m_EAngAverdE->Write();
383 m_trunc_EAngAverdE->Write();
384 m_pos_EAngAverdE->Write();
385 m_neg_EAngAverdE->Write();
387 TTree* entracalib =
new TTree(
"entracalib",
"entracalib");
388 entracalib->Branch(
"1denangle", denangle,
"denangle[100]/D");
389 entracalib->Branch(
"1denangle_entry", denangle_entry,
"denangle_entry[1]/I");
391 entracalib->
Write();
393 TTree* ddgcalib =
new TTree(
"ddgcalib",
"ddgcalib");
394 ddgcalib ->
Branch(
"hits", entryNo,
"entryNo[100]/D");
395 ddgcalib ->
Branch(
"truncmean", trunc_mean,
"trunc_mean[100]/D");
396 ddgcalib ->
Branch(
"truncsigma", trunc_sigma,
"trunc_sigma[100]/D");
397 ddgcalib ->
Branch(
"fitmean", fitmean,
"fitmean[100]/D");
398 ddgcalib ->
Branch(
"fitmeanerr", fitmeanerr,
"fitmeanerr[100]/D");
399 ddgcalib ->
Branch(
"chi", fitsigma,
"fitsigma[100]/D");
400 ddgcalib ->
Branch(
"gain", gain,
"gain[100]/D");
401 ddgcalib ->
Branch(
"truncgain", trunc_gain,
"trunc_gain[100]/D");
402 ddgcalib ->
Branch(
"chisq", chisq,
"chisq[100]/D");
403 ddgcalib ->
Branch(
"pos_hits", pos_entryNo,
"pos_entryNo[100]/D");
404 ddgcalib ->
Branch(
"pos_mean", pos_mean,
"pos_mean[100]/D");
405 ddgcalib ->
Branch(
"pos_sigma", pos_sigma,
"pos_sigma[100]/D");
406 ddgcalib ->
Branch(
"pos_fitmean", pos_fitmean,
"pos_fitmean[100]/D");
407 ddgcalib ->
Branch(
"pos_fitmeanerr", pos_fitmeanerr,
"pos_fitmeanerr[100]/D");
408 ddgcalib ->
Branch(
"pos_chi", pos_fitsigma,
"pos_fitsigma[100]/D");
409 ddgcalib ->
Branch(
"pos_gain", pos_gain,
"pos_gain[100]/D");
410 ddgcalib ->
Branch(
"pos_chisq", pos_chisq,
"pos_chisq[100]/D");
411 ddgcalib ->
Branch(
"neg_hits", neg_entryNo,
"neg_entryNo[100]/D");
412 ddgcalib ->
Branch(
"neg_mean", neg_mean,
"neg_mean[100]/D");
413 ddgcalib ->
Branch(
"neg_sigma", neg_sigma,
"neg_sigma[100]/D");
414 ddgcalib ->
Branch(
"neg_fitmean", neg_fitmean,
"neg_fitmean[100]/D");
415 ddgcalib ->
Branch(
"neg_fitmeanerr", neg_fitmeanerr,
"neg_fitmeanerr[100]/D");
416 ddgcalib ->
Branch(
"neg_chi", neg_fitsigma,
"neg_fitsigma[100]/D");
417 ddgcalib ->
Branch(
"neg_gain", neg_gain,
"neg_gain[100]/D");
418 ddgcalib ->
Branch(
"neg_chisq", neg_chisq,
"neg_chisq[100]/D");
419 ddgcalib ->
Branch(
"Ip_eangle", Ip_eangle,
"Ip_eangle[100]/D");
420 ddgcalib ->
Branch(
"eangle", eangle,
"eangle[100]/D");
425 TCanvas c1(
"c1",
"canvas", 500, 400);
427 m_EAngAverdE->Draw();
429 m_trunc_EAngAverdE->Draw();
431 m_pos_EAngAverdE->Draw();
433 m_neg_EAngAverdE->Draw();
437 m_eangle[ip]->Draw();
442 m_trunc_eangle[ip]->Draw();
447 m_pos_eangle[ip]->Draw();
452 m_neg_eangle[ip]->Draw();
460 delete m_trunc_eangle[ip];
461 delete m_pos_eangle[ip];
462 delete m_neg_eangle[ip];
465 delete m_trunc_EAngAverdE;
466 delete m_pos_EAngAverdE;
467 delete m_neg_EAngAverdE;