]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TPC/AliTPCCalPad.cxx
Fix leaks in AliIsolationCut and AlianaOmegaToPi0Gamma
[u/mrichter/AliRoot.git] / TPC / AliTPCCalPad.cxx
index 1c4ce236315dc55203e520781af9b8314fe46b20..e91e4e8d36c192138e63fbaac2ec556f4aae0d27 100644 (file)
 
 ///////////////////////////////////////////////////////////////////////////////
 //                                                                           //
-//  TPC calibration class for parameters which saved per pad                 //
+//  TPC calibration class for parameters which are saved per pad             //
+//  Each AliTPCCalPad consists of 72 AliTPCCalROC-objects                    //
 //                                                                           //
 ///////////////////////////////////////////////////////////////////////////////
 
 #include "AliTPCCalPad.h"
 #include "AliTPCCalROC.h"
+#include <TObjArray.h>
+#include <TAxis.h>
+#include <TGraph.h>
+#include <TGraph2D.h>
+#include <TH2F.h>
+#include "TTreeStream.h"
+#include "TFile.h"
+#include "TKey.h"
+#include <TFormula.h>
+#include <TString.h>
+#include <TObjString.h>
+#include <iostream>
+#include <AliLog.h>
+
+//graphic includes
+#include <TTree.h>
+#include <TH1.h>
+#include <TCanvas.h>
+#include <TLegend.h>
+#include <TCut.h>
+#include <TVirtualPad.h>
+
 
 ClassImp(AliTPCCalPad)
 
@@ -59,10 +82,27 @@ AliTPCCalPad::AliTPCCalPad(const AliTPCCalPad &c):TNamed(c)
   // AliTPCCalPad copy constructor
   //
 
-  ((AliTPCCalPad &) c).Copy(*this);
+  for (Int_t isec = 0; isec < kNsec; isec++) {
+         fROC[isec] = 0;
+     if (c.fROC[isec])
+       fROC[isec] = new AliTPCCalROC(*(c.fROC[isec]));
+  }
+}
+
+//_____________________________________________________________________________
+AliTPCCalPad::AliTPCCalPad(TObjArray * array):TNamed()
+{
+  //
+  // AliTPCCalPad default constructor
+  //
+
+  for (Int_t isec = 0; isec < kNsec; isec++) {
+    fROC[isec] = (AliTPCCalROC *)array->At(isec);
+  }
 
 }
 
+
 ///_____________________________________________________________________________
 AliTPCCalPad::~AliTPCCalPad()
 {
@@ -105,3 +145,742 @@ void AliTPCCalPad::Copy(TObject &c) const
   }
   TObject::Copy(c);
 }
+
+
+void AliTPCCalPad::SetCalROC(AliTPCCalROC* roc, Int_t sector){
+   //
+   // Set AliTPCCalROC copies values from 'roc'
+   // if sector == -1 the sector specified in 'roc' is used
+   // else sector specified in 'roc' is ignored and specified sector is filled
+   //
+   if (sector == -1) sector = roc->GetSector();
+   if (!fROC[sector]) fROC[sector] = new AliTPCCalROC(sector);
+   for (UInt_t ichannel = 0; ichannel < roc->GetNchannels(); ichannel++) 
+      fROC[sector]->SetValue(ichannel, roc->GetValue(ichannel));
+}
+
+
+
+//_____________________________________________________________________________
+void AliTPCCalPad::Add(Float_t c1)
+{
+    //
+    // add constant c1 to all channels of all ROCs
+    //
+
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       if (fROC[isec]){
+           fROC[isec]->Add(c1);
+       }
+    }
+}
+
+//_____________________________________________________________________________
+void AliTPCCalPad::Multiply(Float_t c1)
+{
+  //
+  // multiply each channel of all ROCs with c1
+  //    
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       if (fROC[isec]){
+           fROC[isec]->Multiply(c1);
+       }
+    }
+}
+
+//_____________________________________________________________________________
+void AliTPCCalPad::Add(const AliTPCCalPad * pad, Double_t c1)
+{
+  //
+  // multiply AliTPCCalPad 'pad' by c1 and add each channel to the coresponing channel in all ROCs
+  //  - pad by pad -
+  //
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       if (fROC[isec] && pad->GetCalROC(isec)){
+           fROC[isec]->Add(pad->GetCalROC(isec),c1);
+       }
+    }
+}
+
+//_____________________________________________________________________________
+void AliTPCCalPad::Multiply(const AliTPCCalPad * pad)
+{
+  //
+  // multiply each channel of all ROCs with the coresponding channel of 'pad'
+  //     - pad by pad -
+  //
+   for (Int_t isec = 0; isec < kNsec; isec++) {
+       if (fROC[isec]){
+           fROC[isec]->Multiply(pad->GetCalROC(isec));
+       }
+    }
+}
+
+//_____________________________________________________________________________
+void AliTPCCalPad::Divide(const AliTPCCalPad * pad)
+{
+  //
+  // divide each channel of all ROCs by the coresponding channel of 'pad'
+  //     - pad by pad -
+  //    
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       if (fROC[isec]){
+           fROC[isec]->Divide(pad->GetCalROC(isec));
+       }
+    }
+}
+
+//_____________________________________________________________________________
+TGraph  *  AliTPCCalPad::MakeGraph(Int_t type, Float_t ratio){
+  //
+  //   type=1 - mean
+  //        2 - median
+  //        3 - LTM
+  //
+  Int_t npoints = 0;
+  for (Int_t i=0;i<72;i++) if (fROC[i]) npoints++;
+  TGraph * graph = new TGraph(npoints);
+  npoints=0;   
+  for (Int_t isec=0;isec<72;isec++){
+    if (!fROC[isec]) continue;
+    if (type==0)  graph->SetPoint(npoints,isec,fROC[isec]->GetMean());      
+    if (type==1)  graph->SetPoint(npoints,isec,fROC[isec]->GetMedian());
+    if (type==2)  graph->SetPoint(npoints,isec,fROC[isec]->GetLTM(0,ratio));    
+    npoints++;
+  }
+
+  graph->GetXaxis()->SetTitle("Sector"); 
+  if (type==0) {
+    graph->GetYaxis()->SetTitle("Mean");   
+    graph->SetMarkerStyle(22);    
+  }
+  if (type==1) {
+    graph->GetYaxis()->SetTitle("Median");   
+    graph->SetMarkerStyle(22);    
+  }
+  if (type==2) {
+      graph->GetYaxis()->SetTitle(Form("Mean%f",ratio));      
+      graph->SetMarkerStyle(24);
+  }
+
+  return graph;
+}
+
+//_____________________________________________________________________________
+Double_t AliTPCCalPad::GetMeanRMS(Double_t &rms)
+{
+    //
+    // Calculates mean and RMS of all ROCs
+    //
+    Double_t sum = 0, sum2 = 0, n=0, val=0;
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+        AliTPCCalROC *calRoc = fROC[isec];
+       if ( calRoc ){
+           for (UInt_t irow=0; irow<calRoc->GetNrows(); irow++){
+               for (UInt_t ipad=0; ipad<calRoc->GetNPads(irow); ipad++){
+                   val = calRoc->GetValue(irow,ipad);
+                   sum+=val;
+                   sum2+=val*val;
+                    n++;
+               }
+           }
+
+       }
+    }
+    Double_t n1 = 1./n;
+    Double_t mean = sum*n1;
+    rms  = TMath::Sqrt(TMath::Abs(sum2*n1-mean*mean));
+    return mean;
+}
+
+
+//_____________________________________________________________________________
+Double_t AliTPCCalPad::GetMean(AliTPCCalPad* outlierPad)
+{
+    //
+    // return mean of the mean of all ROCs
+    //
+    Double_t arr[kNsec];
+    Int_t n=0;
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       AliTPCCalROC *calRoc = fROC[isec];
+       if ( calRoc ){
+          AliTPCCalROC* outlierROC = 0;
+          if (outlierPad) outlierROC = outlierPad->GetCalROC(isec);
+              arr[n] = calRoc->GetMean(outlierROC);
+          n++;
+       }
+    }
+    return TMath::Mean(n,arr);
+}
+
+//_____________________________________________________________________________
+Double_t AliTPCCalPad::GetRMS(AliTPCCalPad* outlierPad)
+{
+    //
+    // return mean of the RMS of all ROCs
+    //
+    Double_t arr[kNsec];
+    Int_t n=0;
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       AliTPCCalROC *calRoc = fROC[isec];
+       if ( calRoc ){
+          AliTPCCalROC* outlierROC = 0;
+          if (outlierPad) outlierROC = outlierPad->GetCalROC(isec);
+          arr[n] = calRoc->GetRMS(outlierROC);
+          n++;
+       }
+    }
+    return TMath::Mean(n,arr);
+}
+
+//_____________________________________________________________________________
+Double_t AliTPCCalPad::GetMedian(AliTPCCalPad* outlierPad)
+{
+    //
+    // return mean of the median of all ROCs
+    //
+    Double_t arr[kNsec];
+    Int_t n=0;
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+       AliTPCCalROC *calRoc = fROC[isec];
+       if ( calRoc ){
+          AliTPCCalROC* outlierROC = 0;
+          if (outlierPad) outlierROC = outlierPad->GetCalROC(isec);
+          arr[n] = calRoc->GetMedian(outlierROC);
+          n++;
+       }
+    }
+    return TMath::Mean(n,arr);
+}
+
+//_____________________________________________________________________________
+Double_t AliTPCCalPad::GetLTM(Double_t *sigma, Double_t fraction, AliTPCCalPad* outlierPad)
+{
+    //
+    // return mean of the LTM and sigma of all ROCs
+    //
+    Double_t arrm[kNsec];
+    Double_t arrs[kNsec];
+    Double_t *sTemp=0x0;
+    Int_t n=0;
+
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+        AliTPCCalROC *calRoc = fROC[isec];
+       if ( calRoc ){
+           if ( sigma ) sTemp=arrs+n;
+       AliTPCCalROC* outlierROC = 0;
+       if (outlierPad) outlierROC = outlierPad->GetCalROC(isec);
+           arrm[n] = calRoc->GetLTM(sTemp,fraction, outlierROC);
+            n++;
+       }
+    }
+    if ( sigma ) *sigma = TMath::Mean(n,arrs);
+    return TMath::Mean(n,arrm);
+}
+
+//_____________________________________________________________________________
+TH1F * AliTPCCalPad::MakeHisto1D(Float_t min, Float_t max,Int_t type, Int_t side){
+  //
+  // make 1D histo
+  // type -1 = user defined range
+  //       0 = nsigma cut nsigma=min
+  //
+  if (type>=0){
+    if (type==0){
+      // nsigma range
+      Float_t mean  = GetMean();
+      Float_t sigma = GetRMS();
+      Float_t nsigma = TMath::Abs(min);
+      min = mean-nsigma*sigma;
+      max = mean+nsigma*sigma;
+    }
+    if (type==1){
+      // fixed range
+      Float_t mean   = GetMedian();
+      Float_t  delta = min;
+      min = mean-delta;
+      max = mean+delta;
+    }
+    if (type==2){
+      //
+      // LTM mean +- nsigma
+      //
+      Double_t sigma;
+      Float_t mean  = GetLTM(&sigma,max);
+      sigma*=min;
+      min = mean-sigma;
+      max = mean+sigma;
+    }
+  }
+  TString name=Form("%s Pad 1D",GetTitle());
+  TH1F * his = new TH1F(name.Data(),name.Data(),100, min,max);
+    for (Int_t isec = 0; isec < kNsec; isec++) {
+      if (side==1 && isec%36>18) continue;
+      if (side==-1 && isec%36<18) continue;
+       if (fROC[isec]){
+           for (UInt_t irow=0; irow<fROC[isec]->GetNrows(); irow++){
+               UInt_t npads = (Int_t)fROC[isec]->GetNPads(irow);
+               for (UInt_t ipad=0; ipad<npads; ipad++){
+                   his->Fill(fROC[isec]->GetValue(irow,ipad));
+               }
+           }
+       }
+    }
+  return his;
+}
+
+//_____________________________________________________________________________
+TH2F *AliTPCCalPad::MakeHisto2D(Int_t side){
+  //
+  // Make 2D graph
+  // side  -  specify the side A = 0 C = 1
+  // type  -  used types of determination of boundaries in z
+  //
+  Float_t kEpsilon = 0.000000000001;
+  TH2F * his = new TH2F(GetName(), GetName(), 250,-250,250,250,-250,250);
+  AliTPCROC * roc  = AliTPCROC::Instance(); 
+  for (Int_t isec=0; isec<72; isec++){
+    if (side==0 && isec%36>=18) continue;
+    if (side>0 && isec%36<18) continue;
+    if (fROC[isec]){
+      AliTPCCalROC * calRoc = fROC[isec];
+      for (UInt_t irow=0; irow<calRoc->GetNrows(); irow++)
+       for (UInt_t ipad=0; ipad<calRoc->GetNPads(irow); ipad++)
+         if (TMath::Abs(calRoc->GetValue(irow,ipad))>kEpsilon){
+           Float_t xyz[3];
+           roc->GetPositionGlobal(isec,irow,ipad,xyz);
+           Int_t binx = 1+TMath::Nint((xyz[0]+250.)*0.5);
+           Int_t biny = 1+TMath::Nint((xyz[1]+250.)*0.5);
+           Float_t value = calRoc->GetValue(irow,ipad);            
+           his->SetBinContent(binx,biny,value);
+         }
+    }
+  }
+  his->SetXTitle("x (cm)");
+  his->SetYTitle("y (cm)");
+  return his;
+}
+
+
+AliTPCCalPad* AliTPCCalPad::LocalFit(const char* padName, Int_t rowRadius, Int_t padRadius, AliTPCCalPad* PadOutliers, Bool_t robust, Double_t chi2Threshold, Double_t robustFraction, Bool_t printCurrentSector) const {
+   //
+   // Loops over all AliTPCCalROCs and performs a localFit in each ROC
+   // AliTPCCalPad with fit-data is returned
+   // rowRadius and padRadius specifies a window around a given pad in one sector. 
+   // The data of this window are fitted with a parabolic function. 
+   // This function is evaluated at the pad's position.
+   // At the edges the window is shifted, so that the specified pad is not anymore in the center of the window. 
+   // rowRadius  -  radius - rows to be used for smoothing
+   // padradius  -  radius - pads to be used for smoothing
+   // ROCoutlier -  map of outliers - pads not to be used for local smoothing
+   // robust     -  robust method of fitting  - (much slower)
+   // chi2Threshold: Threshold for chi2 when EvalRobust is called
+   // robustFraction: Fraction of data that will be used in EvalRobust
+   //
+   //
+   AliTPCCalPad* pad = new AliTPCCalPad(padName, padName);
+   for (Int_t isec = 0; isec < 72; isec++){
+      if (printCurrentSector) std::cout << "LocalFit in sector " << isec << "\r" << std::flush;
+      if (PadOutliers)
+         pad->SetCalROC(GetCalROC(isec)->LocalFit(rowRadius, padRadius, PadOutliers->GetCalROC(isec), robust, chi2Threshold, robustFraction));
+      else 
+         pad->SetCalROC(GetCalROC(isec)->LocalFit(rowRadius, padRadius, 0, robust, chi2Threshold, robustFraction));
+   }
+   return pad;
+}
+
+
+AliTPCCalPad* AliTPCCalPad::GlobalFit(const char* padName, AliTPCCalPad* PadOutliers, Bool_t robust, Int_t fitType, Double_t chi2Threshold, Double_t robustFraction, Double_t err, TObjArray *fitParArr, TObjArray *fitCovArr){
+   //
+   // Loops over all AliTPCCalROCs and performs a globalFit in each ROC
+   // AliTPCCalPad with fit-data is returned
+   // chi2Threshold: Threshold for chi2 when EvalRobust is called
+   // robustFraction: Fraction of data that will be used in EvalRobust
+   // chi2Threshold: Threshold for chi2 when EvalRobust is called
+   // robustFraction: Fraction of data that will be used in EvalRobust
+   // err: error of the data points
+   // if fitParArr and/or fitCovArr is given, write fitParameters and/or covariance Matrices into the array
+   //
+   AliTPCCalPad* pad = new AliTPCCalPad(padName, padName);
+   TVectorD fitParam(0);
+   TMatrixD covMatrix(0,0);
+   Float_t chi2 = 0;
+   for (Int_t isec = 0; isec < 72; isec++){
+      if (PadOutliers)
+         GetCalROC(isec)->GlobalFit(PadOutliers->GetCalROC(isec), robust, fitParam, covMatrix, chi2, fitType, chi2Threshold, robustFraction, err);
+      else 
+         GetCalROC(isec)->GlobalFit(0, robust, fitParam, covMatrix, chi2, fitType, chi2Threshold, robustFraction, err);
+
+      AliTPCCalROC *roc=AliTPCCalROC::CreateGlobalFitCalROC(fitParam, isec);
+      pad->SetCalROC(roc);
+      delete roc;
+      if ( fitParArr ) fitParArr->AddAtAndExpand(new TVectorD(fitParam), isec);
+      if ( fitCovArr ) fitCovArr->AddAtAndExpand(new TMatrixD(covMatrix), isec);
+   }
+   return pad;
+}
+//_____________________________________________________________________________
+TObjArray* AliTPCCalPad::CreateFormulaArray(const char *fitFormula)
+{
+  //
+  // create an array of TFormulas for the each parameter of the fit function
+  //
+
+  // split fit string in single parameters
+  // find dimension of the fit:
+  TString fitString(fitFormula);
+  fitString.ReplaceAll("++","#");
+  fitString.ReplaceAll(" ","");
+  TObjArray *arrFitParams = fitString.Tokenize("#");
+  Int_t ndim = arrFitParams->GetEntries();
+  //create array of TFormulas to evaluate the parameters
+  TObjArray *arrFitFormulas = new TObjArray(ndim);
+  arrFitFormulas->SetOwner(kTRUE);
+  for (Int_t idim=0;idim<ndim;++idim){
+    TString s=((TObjString*)arrFitParams->At(idim))->GetString();
+    s.ReplaceAll("gx","[0]");
+    s.ReplaceAll("gy","[1]");
+    s.ReplaceAll("lx","[2]");
+    s.ReplaceAll("ly","[3]");
+    s.ReplaceAll("sector","[4]");
+    arrFitFormulas->AddAt(new TFormula(Form("param%02d",idim),s.Data()),idim);
+  }
+  delete arrFitParams;
+  
+  return arrFitFormulas;
+}
+//_____________________________________________________________________________
+void AliTPCCalPad::EvalFormulaArray(const TObjArray &arrFitFormulas, TVectorD &results,
+                                    const Int_t sec, const Int_t row, const Int_t pad)
+{
+  //
+  // evaluate the fit formulas
+  //
+  Int_t ndim=arrFitFormulas.GetEntries();
+  results.ResizeTo(ndim);
+  
+  AliTPCROC* tpcROCinstance = AliTPCROC::Instance();  // to calculate the pad's position
+  Float_t localXYZ[3];
+  Float_t globalXYZ[3];
+  tpcROCinstance->GetPositionLocal(sec, row, pad, localXYZ);
+  tpcROCinstance->GetPositionGlobal(sec, row, pad, globalXYZ);
+  //calculate parameter values
+  for (Int_t idim=0;idim<ndim;++idim){
+    TFormula *f=(TFormula*)arrFitFormulas.At(idim);
+    f->SetParameters(globalXYZ[0],globalXYZ[1],localXYZ[0],localXYZ[1],sec);
+    results[idim]=f->Eval(0);
+  }
+}
+//_____________________________________________________________________________
+void AliTPCCalPad::GlobalSidesFit(const AliTPCCalPad* PadOutliers, const char* fitFormula, TVectorD &fitParamSideA, TVectorD &fitParamSideC,TMatrixD &covMatrixSideA, TMatrixD &covMatrixSideC, Float_t & chi2SideA, Float_t & chi2SideC, AliTPCCalPad *pointError, Bool_t robust, Double_t robustFraction){
+  //
+  // Performs a fit on both sides.
+  // Valid information for the fitFormula are the variables
+  // - gx, gy, lx ,ly: meaning global x, global y, local x, local y value of the padName
+  // - sector:         the sector number.
+  //  eg. a formula might look 'gy' or '(sector<36) ++ gy' or 'gx ++ gy' or 'gx ++ gy ++ lx ++ lx^2' and so on
+  //
+  // PadOutliers - pads with value !=0 are not used in fitting procedure
+  // chi2Threshold: Threshold for chi2 when EvalRobust is called
+  // robustFraction: Fraction of data that will be used in EvalRobust
+  //
+
+  TObjArray* arrFitFormulas=CreateFormulaArray(fitFormula);
+  Int_t ndim = arrFitFormulas->GetEntries();
+  //resize output data arrays
+  fitParamSideA.ResizeTo(ndim+1);
+  fitParamSideC.ResizeTo(ndim+1);
+  covMatrixSideA.ResizeTo(ndim+1,ndim+1);
+  covMatrixSideC.ResizeTo(ndim+1,ndim+1);
+  // create linear fitter for A- and C- Side
+  TLinearFitter* fitterGA = new TLinearFitter(ndim+1,Form("hyp%d",ndim));
+  TLinearFitter* fitterGC = new TLinearFitter(ndim+1,Form("hyp%d",ndim));
+  fitterGA->StoreData(kTRUE);
+  fitterGC->StoreData(kTRUE);
+  //parameter values
+  TVectorD parValues(ndim);
+
+  AliTPCCalROC *rocErr=0x0;
+  
+  for (UInt_t isec = 0; isec<kNsec; ++isec){
+    AliTPCCalROC *rocOut=PadOutliers->GetCalROC(isec);
+    AliTPCCalROC *rocData=GetCalROC(isec);
+    if (pointError) rocErr=pointError->GetCalROC(isec);
+    if (!rocData) continue;
+    for (UInt_t irow = 0; irow < GetCalROC(isec)->GetNrows(); irow++) {
+      for (UInt_t ipad = 0; ipad < GetCalROC(isec)->GetNPads(irow); ipad++) {
+        //check for outliers
+        if (rocOut && rocOut->GetValue(irow,ipad)) continue;
+        //calculate parameter values
+        EvalFormulaArray(*arrFitFormulas,parValues,isec,irow,ipad);
+        //get value
+        Float_t value=rocData->GetValue(irow,ipad);
+        //point error
+        Int_t err=1;
+        if (rocErr) {
+          err=TMath::Nint(rocErr->GetValue(irow,ipad));
+          if (err==0) err=1;
+        }
+        //add points to the fitters
+        if (isec/18%2==0){
+          fitterGA->AddPoint(parValues.GetMatrixArray(),value,err);
+        }else{
+          fitterGC->AddPoint(parValues.GetMatrixArray(),value,err);
+        }
+      }
+    }
+  }
+  if (robust){
+    fitterGA->EvalRobust(robustFraction);
+    fitterGC->EvalRobust(robustFraction);
+  } else {
+    fitterGA->Eval();
+    fitterGC->Eval();
+  }
+  chi2SideA=fitterGA->GetChisquare()/(fitterGA->GetNpoints()-(ndim+1));
+  chi2SideC=fitterGC->GetChisquare()/(fitterGC->GetNpoints()-(ndim+1));
+  fitterGA->GetParameters(fitParamSideA);
+  fitterGC->GetParameters(fitParamSideC);
+  fitterGA->GetCovarianceMatrix(covMatrixSideA);
+  fitterGC->GetCovarianceMatrix(covMatrixSideC);
+  
+  delete arrFitFormulas;
+  delete fitterGA;
+  delete fitterGC;
+  
+}
+//
+AliTPCCalPad *AliTPCCalPad::CreateCalPadFit(const char* fitFormula, const TVectorD &fitParamSideA, const TVectorD &fitParamSideC)
+{
+  //
+  //
+  //
+  TObjArray *arrFitFormulas=CreateFormulaArray(fitFormula);
+  Int_t ndim = arrFitFormulas->GetEntries();
+  //check if dimension of fit formula and fit parameters agree
+  if (ndim!=fitParamSideA.GetNrows()||ndim!=fitParamSideC.GetNrows()){
+    printf("AliTPCCalPad::CreateCalPadFit: Dimensions of fit formula and fit Parameters does not match!");
+    return 0;
+  }
+  //create cal pad
+  AliTPCCalPad *pad=new AliTPCCalPad("fitResultPad",Form("Fit result: %s",fitFormula));
+  //fill cal pad with fit results if requested
+  for (UInt_t isec = 0; isec<kNsec; ++isec){
+    AliTPCCalROC *roc=pad->GetCalROC(isec);
+    for (UInt_t irow = 0; irow < roc->GetNrows(); irow++) {
+      for (UInt_t ipad = 0; ipad < roc->GetNPads(irow); ipad++) {
+        const TVectorD *fitPar=0;
+        TVectorD fitResArray;
+        if (isec/18%2==0){
+          fitPar=&fitParamSideA;
+        }else{
+          fitPar=&fitParamSideC;
+        }
+        EvalFormulaArray(*arrFitFormulas,fitResArray, isec, irow, ipad);
+        for (Int_t idim=0;idim<ndim;++idim)
+          fitResArray(idim)*=(*fitPar)(idim);
+        roc->SetValue(irow,ipad,fitResArray.Sum());
+      }
+    }
+  }
+  delete arrFitFormulas;
+  return pad;
+}
+
+
+
+TCanvas * AliTPCCalPad::MakeReportPadSector(TTree *chain, const char* varName, const char*varTitle, const char *axisTitle, Float_t min, Float_t max, const char *cutUser){
+  //
+  // Make a report - cal pads per sector
+  // mean valeus per sector and local X
+  //
+  TH1* his=0; 
+  TLegend *legend = 0;
+  TCanvas *canvas = new TCanvas(Form("Sector: %s",varTitle),Form("Sector: %s",varTitle),1500,1100);
+
+  canvas->Divide(2);
+  chain->SetAlias("lX","lx.fElements"); 
+  //
+  canvas->cd(1);
+  TString strDraw=varName;
+  strDraw+=":lX";
+  legend = new TLegend(0.5,0.50,0.9,0.9, Form("%s TPC A side", varTitle));
+  for (Int_t isec=-1; isec<18; isec+=1){
+    TCut cutSec=Form("sector%%36==%d",isec);
+    cutSec+=cutUser;
+    if (isec==-1) cutSec="sector%36<18";
+    chain->SetMarkerColor(1+(isec+2)%5);
+    chain->SetLineColor(1+(isec+2)%5);
+    chain->SetMarkerStyle(25+(isec+2)%4);
+    //
+    chain->Draw(strDraw.Data(),cutSec,"profgoff");
+    his=(TH1*)chain->GetHistogram()->Clone();
+    delete chain->GetHistogram();
+    his->SetMaximum(max);
+    his->SetMinimum(min);
+    his->GetXaxis()->SetTitle("R (cm)");
+    his->GetYaxis()->SetTitle(axisTitle);
+    his->SetTitle(Form("%s- sector %d",varTitle, isec));
+    his->SetName(Form("%s- sector %d",varTitle, isec));
+    if (isec==-1) his->SetTitle(Form("%s A side",varTitle));
+    if (isec==-1) his->Draw();
+    his->Draw("same");
+    legend->AddEntry(his);
+  }
+  legend->Draw();
+  canvas->cd(2);
+  //
+  legend = new TLegend(0.5,0.50,0.9,0.9, Form("%s TPC C side", varTitle));
+  for (Int_t isec=-1; isec<18; isec+=1){
+    TCut cutSec=Form("(sector+18)%%36==%d",isec);
+    cutSec+=cutUser;
+    if (isec==-1) cutSec="sector%36>18";
+    chain->SetMarkerColor(1+(isec+2)%5);
+    chain->SetLineColor(1+(isec+2)%5);
+    chain->SetMarkerStyle(25+isec%4);
+    //
+    chain->Draw(strDraw.Data(),cutSec,"profgoff");
+    his=(TH1*)chain->GetHistogram()->Clone();
+    delete chain->GetHistogram();
+    his->SetMaximum(max);
+    his->SetMinimum(min);
+    his->GetXaxis()->SetTitle("R (cm)");
+    his->GetYaxis()->SetTitle(axisTitle);
+    his->SetTitle(Form("%s- sector %d",varTitle,isec));
+    his->SetName(Form("%s- sector %d",varTitle,isec));
+    if (isec==-1) his->SetTitle(Form("%s C side",varTitle));
+    if (isec==-1) his->Draw();
+    his->Draw("same");
+    legend->AddEntry(his);
+  }
+  legend->Draw();
+  //
+  //
+  return canvas;
+}
+
+
+TCanvas * AliTPCCalPad::MakeReportPadSector2D(TTree *chain, const char* varName, const char*varTitle, const char *axisTitle, Float_t min, Float_t max, const char *cutUser){
+  //
+  // Make a report - cal pads per sector
+  // 2D view
+  // Input tree should be created using AliPreprocesorOnline before
+  // 
+  TH1* his=0; 
+  TCanvas *canvas = new TCanvas(Form("%s2D",varTitle),Form("%s2D",varTitle),1500,1100);
+  canvas->Divide(2);
+  //
+  TString strDraw=varName;
+  strDraw+=":gy.fElements:gx.fElements>>his(250,-250,250,250,-250,250)";
+  //
+  TVirtualPad * pad=0;
+  pad=canvas->cd(1);
+  pad->SetMargin(0.15,0.15,0.15,0.15);
+  TCut cut=cutUser;
+  chain->Draw(strDraw.Data(),"sector%36<18"+cut,"profgoffcolz2");
+  his=(TH1*)chain->GetHistogram()->Clone();
+  delete chain->GetHistogram();
+  his->SetMaximum(max);
+  his->SetMinimum(min);
+  his->GetXaxis()->SetTitle("x (cm)");
+  his->GetYaxis()->SetTitle("y (cm)");
+  his->GetZaxis()->SetTitle(axisTitle);
+  his->SetTitle(Form("%s A side",varTitle));
+  his->SetName(Form("%s A side",varTitle));
+  his->Draw("colz2");
+  //
+  pad=canvas->cd(2);
+  pad->SetMargin(0.15,0.15,0.15,0.15);
+
+  chain->Draw(strDraw.Data(),"sector%36>=18"+cut,"profgoffcolz2");
+  his=(TH1*)chain->GetHistogram()->Clone();
+  delete chain->GetHistogram();
+  his->SetMaximum(max);
+  his->SetMinimum(min);
+  his->GetXaxis()->SetTitle("x (cm)");
+  his->GetYaxis()->SetTitle("y (cm)");
+  his->GetZaxis()->SetTitle(axisTitle);
+  his->SetTitle(Form("%s C side",varTitle));
+  his->SetName(Form("%s C side",varTitle));
+  his->Draw("colz2");
+  //
+  //
+  return canvas;
+}
+
+void  AliTPCCalPad::Draw(Option_t* option){
+  // 
+  // Draw function - standard 2D view
+  //
+  TH1* his=0; 
+  TCanvas *canvas = new TCanvas(Form("%s2D",GetTitle()),Form("%s2D",GetTitle()),900,900);
+  canvas->Divide(2,2);
+  //
+  //
+  TVirtualPad * pad=0;
+  pad=canvas->cd(1);
+  pad->SetMargin(0.15,0.15,0.15,0.15);
+  his=MakeHisto2D(0);
+  his->GetXaxis()->SetTitle("x (cm)");
+  his->GetYaxis()->SetTitle("y (cm)");
+  his->GetZaxis()->SetTitle(GetTitle());
+  his->SetTitle(Form("%s A side",GetTitle()));
+  his->SetName(Form("%s A side",GetTitle()));
+  his->Draw(option);
+  //
+  pad=canvas->cd(2);
+  pad->SetMargin(0.15,0.15,0.15,0.15);
+  his=MakeHisto2D(1);
+  his->GetXaxis()->SetTitle("x (cm)");
+  his->GetYaxis()->SetTitle("y (cm)");
+  his->GetZaxis()->SetTitle(GetTitle());
+  his->SetTitle(Form("%s C side",GetTitle()));
+  his->SetName(Form("%s C side",GetTitle()));
+  his->Draw(option);
+  //
+  pad=canvas->cd(3);
+  pad->SetMargin(0.15,0.15,0.15,0.15);
+  his=MakeHisto1D(-8,8,0,1);
+  his->GetXaxis()->SetTitle(GetTitle());
+  his->SetTitle(Form("%s A side",GetTitle()));
+  his->SetName(Form("%s A side",GetTitle()));
+  his->Draw("err");
+  //
+  pad=canvas->cd(4);
+  pad->SetMargin(0.15,0.15,0.15,0.15);
+  his=MakeHisto1D(-8,8,0,-1);
+  his->GetXaxis()->SetTitle(GetTitle());
+  his->SetTitle(Form("%s C side",GetTitle()));
+  his->SetName(Form("%s C side",GetTitle()));
+  his->Draw("err");
+
+
+}
+
+
+AliTPCCalPad * AliTPCCalPad::MakeCalPadFromHistoRPHI(TH2 * hisA, TH2* hisC){
+  //
+  // Make cal pad from r-phi histograms
+  //
+  AliTPCROC *proc= AliTPCROC::Instance();
+  AliTPCCalPad *calPad = new AliTPCCalPad("his","his");
+  Float_t globalPos[3];
+  for (Int_t isec=0; isec<72; isec++){
+    AliTPCCalROC* calRoc  = calPad->GetCalROC(isec);
+    TH2 * his = ((isec%36<18) ? hisA:hisC);
+    for (UInt_t irow=0; irow<calRoc->GetNrows(); irow+=1){
+      Int_t jrow=irow;
+      if (isec>=36) jrow+=63;
+      for (UInt_t ipad=0;ipad<proc->GetNPads(isec,irow);ipad+=1){
+        proc->GetPositionGlobal(isec,irow,ipad, globalPos);
+        Double_t phi=TMath::ATan2(globalPos[1],globalPos[0]);
+        //if (phi<0) phi+=TMath::Pi()*2;
+        Int_t bin=his->FindBin(phi,jrow);
+        Float_t value= his->GetBinContent(bin);
+       calRoc->SetValue(irow,ipad,value);
+      }
+    }
+  }
+  return calPad;
+}