2 // Process ESD tracks -
3 // Extract TPC tracks - write them to tree
8 AnalyzeESDtracks(567); // process tracks
9 // Tracks are written to the file "TPCtracks.root"
10 // Now yo can analyze it
11 TFile fesd("AliESDs.root");
12 TTree * treeE = (TTree*)fesd.Get("esdTree");
13 TFile f("TPCtracks.root")
14 TTree * tree =(TTree*)f.Get("Tracks");
15 AliComparisonDraw comp;
23 .L AnalyzeESDtracks.C+
26 //AnalyzeESDtracks(567);
29 TFile fesd("AliESDs.root");
30 TTree * treeE = (TTree*)fesd.Get("esdTree");
31 TFile f("TPCtracks.root")
32 TTree * tree =(TTree*)f.Get("Tracks");
33 AliComparisonDraw comp;
36 TFile fs("TPCsignal.root");
37 TTree *treeB =(TTree*)fs.Get("SignalB");
38 TTree *treeN =(TTree*)fs.Get("SignalN");
39 TTree *treeS =(TTree*)fs.Get("Signal");
40 TTree *treef =(TTree*)fs.Get("Fit");
43 FitSignals(treeB,"Max-Median>100&&RMS06<2.5")
44 TFile ffit("FitSignal.root");
45 TTree * treeF = (TTree*)ffit->Get("Fit");
48 TChain chaincl("TreeR","TreeR")
49 chaincl.Add("TPC.RecPoints.root/Event0/TreeR")
50 chaincl.Add("TPC.RecPoints1.root/Event1/TreeR")
51 chaincl.Add("TPC.RecPoints2.root/Event2/TreeR")
52 chaincl.Add("TPC.RecPoints3.root/Event3/TreeR")
63 #include "TTreeStream.h"
64 #include "TEventList.h"
68 #include "TRobustEstimator.h"
69 #include "TTimeStamp.h"
75 #include "AliESDfriend.h"
76 #include "AliESDtrack.h"
77 #include "AliTracker.h"
78 #include "AliTPCseed.h"
79 #include "AliTPCclusterMI.h"
80 #include "AliTPCParamSR.h"
81 #include "AliTPCROC.h"
84 #include "TTreeStream.h"
87 #include "AliSignalProcesor.h"
91 void FitSignals(TTree * treeB, TCut cut="Max-Median>150&&RMS06<2&&abs(Median-Mean09)<0.5", Int_t maxS=100);
92 void LaserCalib(TTreeSRedirector & cstream, TTree * chain, Float_t tmin, Float_t tmax, Float_t fraction=0.7);
94 void AnalyzeESDtracks(Int_t run){
97 TTreeSRedirector * pcstream = new TTreeSRedirector("TPCtracks.root");
98 TTreeSRedirector &cstream = *pcstream;
100 // dummy magnetic field
101 AliMagF mag("aaa","aaa",1,1,10);
102 AliTracker::SetFieldMap(&mag,kTRUE);
103 TFile f("AliESDs.root");
104 TTree * tree =(TTree*)f.Get("esdTree");
106 tree->SetBranchAddress("ESD",&esd);
108 tree->AddFriend("esdFriendTree","AliESDfriends.root");
109 tree->SetBranchAddress("ESDfriend",&evf);
111 Int_t nevents = tree->GetEntries();
112 TClonesArray *clusters = new TClonesArray("AliTPCclusterMI",160);
113 for (Int_t irow=0; irow<160; irow++){
114 new ((*clusters)[irow]) AliTPCclusterMI; // iitial dummy clusters
117 for (Int_t ievent=0; ievent<nevents; ievent++){
118 tree->GetEntry(ievent);
121 esd->SetESDfriend(evf); //Attach the friend to the ESD
122 for (Int_t itrack =0; itrack<esd->GetNumberOfTracks(); itrack++){
124 if (esd->GetTrack(itrack)->GetFriendTrack()==0) continue;
125 AliESDtrack * etrack = esd->GetTrack(itrack);
126 AliESDfriendTrack * ftrack = (AliESDfriendTrack *)esd->GetTrack(itrack)->GetFriendTrack();
127 AliTPCseed * seed = (AliTPCseed*)(ftrack->GetCalibObject(0));
129 for (Int_t irow=0; irow<160; irow++){
130 if (seed->GetClusterFast(irow)){
131 AliTPCclusterMI * cl = new ((*clusters)[irow]) AliTPCclusterMI(*(seed->GetClusterFast(irow)));
132 cl->SetLabel(itrack,0);
135 AliTPCclusterMI * cl = (AliTPCclusterMI*)clusters->At(irow);
136 cl->SetX(0); cl->SetY(0); cl->SetZ(0); cl->SetQ(0); cl->SetLabel(-1,0);
139 Float_t dEdx = seed->GetdEdx();
140 Float_t dEdxI = seed->CookdEdx(0.05,0.6,0,77);
141 Float_t dEdxO = seed->CookdEdx(0.05,0.6,78,155);
142 Int_t ncl = seed->GetNumberOfClusters();
160 TFile fs("TPCsignal.root");
161 TTree *treeB =(TTree*)fs.Get("SignalB");
163 // Fit central electrode part
165 TTreeSRedirector * pcestream = new TTreeSRedirector("TimeRoot.root");
166 TTree * treece = (TTree*)fs.Get("Signalce");
168 LaserCalib(*pcestream, treece, 800,1000, 0.7);
171 FitSignals(treeB,"Max-Median>150&&RMS06<1.0&&RMS09<1.5&&abs(Median-Mean09)<0.2&&abs(Mean06-Mean09)<0.2",1000);
176 void FitSignals(TTree * treeB, TCut cut, Int_t max){
177 AliSignalProcesor proc;
178 TF1 * f1 = proc.GetAsymGauss();
179 TTreeSRedirector cstream("FitSignal.root");
180 TFile *f = cstream.GetFile();
183 sprintf(lname,"Fit%s", cut.GetTitle());
184 TEventList *list = new TEventList(lname,lname);
185 sprintf(lname,">>Fit%s", cut.GetTitle());
186 treeB->Draw(lname,cut);
187 treeB->SetEventList(list);
189 for (Int_t ievent=0; ievent<list->GetN(); ievent++){
190 if (nFits>max) break;
191 if (nFits%50==0) printf("%d\n",nFits);
193 sprintf(ename,"Fit%d", ievent);
194 Double_t nsample = treeB->Draw("Graph.fY-Mean09:Graph.fX","","",1,ievent);
195 Double_t * signal = treeB->GetV1();
196 Double_t * time = treeB->GetV2();
199 for (Int_t ipos = 0; ipos<nsample; ipos++){
200 if (signal[ipos]>max){
206 Int_t first = TMath::Max(maxpos-10,0.);
207 Int_t last = TMath::Min(maxpos+60, nsample);
210 TH1F his(ename,ename,last-first,first,last);
211 for (Int_t ipos=0; ipos<last-first; ipos++){
212 his.SetBinContent(ipos+1,signal[ipos+first]);
214 treeB->Draw("Sector:Row:Pad","","",1,ievent);
215 Double_t sector = treeB->GetV1()[0];
216 Double_t row = treeB->GetV2()[0];
217 Double_t pad = treeB->GetV3()[0];
218 // TGraph graph(last-first,&time[first],&signal[first]);
219 f1->SetParameters(0.75*max,maxpos,1.1,0.8,0.25,0.2);
220 // TH1F * his = (TH1F*)graph.GetHistogram();
227 for (Int_t ipar=0; ipar<6; ipar++) params[ipar] = f1->GetParameters()[ipar];
228 Double_t chi2 = TFitter::GetFitter()->Chisquare(6,params);
230 cov.SetMatrixArray(TFitter::GetFitter()->GetCovarianceMatrix());
237 for (Int_t ipos=0; ipos<last-first; ipos++){
238 x0[ipos] = signal[ipos+first];
240 proc.TailCancelationALTRO1(x0,x1,0.85*0.339,0.09,last-first);
241 proc.TailCancelationALTRO1(x1,x2,0.85,0.789,last-first);
243 sprintf(ename,"Cancel1_%d", ievent);
244 TH1F his1(ename,ename,last-first,first,last);
245 for (Int_t ipos=0; ipos<last-first; ipos++){
246 his1.SetBinContent(ipos+1,x1[ipos]);
249 sprintf(ename,"Cancel2_%d", ievent);
250 TH1F his2(ename,ename,last-first,first,last);
251 for (Int_t ipos=0; ipos<last-first; ipos++){
252 his2.SetBinContent(ipos+1,x1[ipos]);
254 f1->SetParameters(0.75*max,maxpos,1.1,0.8,0.25,0.2);
258 for (Int_t ipar=0; ipar<6; ipar++) params2[ipar] = f1->GetParameters()[ipar];
259 Double_t chi22 = TFitter::GetFitter()->Chisquare(6,params2);
261 cov2.SetMatrixArray(TFitter::GetFitter()->GetCovarianceMatrix());
263 TGraph gr0(last-first, &time[first],x0);
264 TGraph gr1(last-first, &time[first],x1);
265 TGraph gr2(last-first, &time[first],x2);
301 void LaserCalib(TTreeSRedirector & cstream, TTree * chain, Float_t tmin, Float_t tmax, Float_t fraction){
305 const Double_t kMaxDelta=10;
308 TFile fce("TPCsignal.root");
309 TTree * treece =(TTree*)fce.Get("Signalce");
310 if (chain) treece=chain;
312 TBranch * brsector = treece->GetBranch("Sector");
313 TBranch * brpad = treece->GetBranch("Pad");
314 TBranch * brrow = treece->GetBranch("Row");
315 TBranch * brTimeStamp = treece->GetBranch("TimeStamp");
317 TBranch * brtime = treece->GetBranch("Time");
318 TBranch * brrms = treece->GetBranch("RMS06");
319 TBranch * brmax = treece->GetBranch("Max");
320 TBranch * brsum = treece->GetBranch("Qsum");
322 Int_t sector, pad, row=0;
323 Double_t time=0, rms=0, qMax=0, qSum=0;
325 brsector->SetAddress(§or);
326 brrow->SetAddress(&row);
327 brpad->SetAddress(&pad);
328 brTimeStamp->SetAddress(&timeStamp);
330 brtime->SetAddress(&time);
331 brrms->SetAddress(&rms);
332 brmax->SetAddress(&qMax);
333 brsum->SetAddress(&qSum);
336 brsector->GetEntry(0);
338 Int_t firstSector = sector;
339 Int_t lastSector = sector;
343 // find time offset for differnt events
346 Double_t padTimes[500000];
347 TRobustEstimator restim;
348 Double_t meanS[72], sigmaS[72];
349 Int_t firstS[72], lastS[72];
350 Double_t sectorsID[72];
351 for (Int_t isector=0;isector<72; isector++){
355 TH1F hisT("hisT","hisT",100,tmin,tmax);
356 treece->Draw("Time>>hisT","");
357 Float_t cbin = hisT.GetBinCenter(hisT.GetMaximumBin());
359 for (Int_t ientry=0; ientry<treece->GetEntriesFast(); ientry++){
360 treece->GetEvent(ientry);
362 if (sector!=lastSector && sector==firstSector){
363 //if (sector!=lastSector){
365 TTimeStamp stamp(timeStamp);
367 printf("\nEvent\t%d\tFirst\t%d\tLast\t%d\t%d\n",count, fentry, lentry, lentry-fentry);
371 for (Int_t ientry2=fentry; ientry2<lentry; ientry2++){
372 // brtime->GetEvent(ientry2);
373 // brsector->GetEvent(ientry2);
374 treece->GetEvent(ientry2);
375 if (time>tmin&&time<tmax && TMath::Abs(time-cbin)<kMaxDelta){
376 padTimes[ngood]=time;
378 if (firstS[sector]<0) firstS[sector]= ngood;
379 if (firstS[sector]>=0) lastS[sector] = ngood;
385 restim.EvaluateUni(ngood,padTimes,mean, sigma,int(float(ngood)*fraction));
386 printf("Event\t%d\t%f\t%f\n",count, mean, sigma);
387 for (Int_t isector=0; isector<72; isector++){
388 sectorsID[isector]=sector;
389 if (firstS[isector]>=0 &&lastS[isector]>=0 && lastS[isector]>firstS[isector] ){
390 Int_t ngoodS = lastS[isector]-firstS[isector];
391 restim.EvaluateUni(ngoodS, &padTimes[firstS[isector]],meanS[isector],
392 sigmaS[isector],int(float(ngoodS)*fraction));
395 TGraph graphM(72,sectorsID,meanS);
396 TGraph graphS(72,sectorsID,sigmaS);
405 for (Int_t ientry2=fentry; ientry2<lentry-1; ientry2++){
406 treece->GetEvent(ientry2);
407 Double_t x = param.GetPadRowRadii(sector,row);
408 Int_t maxpad = AliTPCROC::Instance()->GetNPads(sector,row);
409 Double_t y = (pad - 2.5 - 0.5*maxpad)*param.GetPadPitchWidth(sector);
410 Double_t alpha = TMath::DegToRad()*(10.+20.*(sector%18));
411 Double_t gx = x*TMath::Cos(alpha)-y*TMath::Sin(alpha);
412 Double_t gy = y*TMath::Cos(alpha)+x*TMath::Sin(alpha);
414 Int_t npadS = lastS[sector]-firstS[sector];
417 "TimeStamp="<<timeStamp<<
430 "TimeS0="<<meanS[sector]<<
431 "SigmaS0="<<sigmaS[sector]<<
438 treece->GetEvent(ientry);
441 for (Int_t isector=0;isector<72; isector++){
453 TChain *MakeChainCL(Int_t first, Int_t last){
454 TChain *chaincl = new TChain("TreeR","TreeR");
457 for (Int_t i=first;i<last; i++){
458 if (i>0) sprintf(fname,"TPC.RecPoints%d.root/Event%d/TreeR",i,i);
459 if (i==0) sprintf(fname,"TPC.RecPoints.root/Event%d/TreeR",i);
465 TTree* GetTree(Int_t ievent){
468 if (ievent>0) sprintf(fname,"TPC.RecPoints%d.root",ievent);
469 if (ievent==0) sprintf(fname,"TPC.RecPoints.root");
470 sprintf(tname,"Event%d/TreeR",ievent);
471 TFile * f = new TFile(fname);
472 TTree * tree = (TTree*)f->Get(tname);