[u/mrichter/AliRoot.git] / TPC / AliTPCcalibBase.cxx

/**************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/


///////////////////////////////////////////////////////////////////////////////
//                                                                           //
//  Base class for the calibration components using 
//  as input TPCseeds and ESDs
//  Event loop outside of the component
//
//
// Base functionality to be implemeneted by component 
/* 
   //In some cases only one of this function to be implemented
   virtual void     Process(AliESDEvent *event)
   virtual void     Process(AliTPCseed *track)
   //
   virtual Long64_t Merge(TCollection *li);
   virtual void     Analyze()
   void             Terminate();
*/
// Functionality provided by base class for Algorith debuging:
//  TTreeSRedirector * cstream =  GetDebugStreamer() - get debug streamer which can be use for numerical debugging
//                      


//  marian.ivanov@cern.ch
// 
#include "AliTPCcalibBase.h"
#include "TSystem.h"
#include "TFile.h"
#include "TTreeStream.h"
#include "TTimeStamp.h"
#include "TGraph.h"
#include "TGraphErrors.h"
#include "TF1.h"
#include "TH1.h"
#include "THnSparse.h"
#include "TH1D.h"
#include "TH2D.h"
#include "TAxis.h"


#include "AliLog.h"
#include "AliESDEvent.h"


ClassImp(AliTPCcalibBase)

AliTPCcalibBase::AliTPCcalibBase():
    TNamed(),
    fDebugStreamer(0),
    fStreamLevel(0),   
    fRun(0),                  //!  current Run number
    fEvent(0),                //!  current Event number
    fTime(0),                 //!  current Time
    fTrigger(0),              //! current trigger type
    fMagF(0),                 //! current magnetic field
    fTriggerMaskReject(-1),   //trigger mask - reject trigger
    fTriggerMaskAccept(-1),   //trigger mask - accept trigger
    fHasLaser(kFALSE),                    //flag the laser is overlayed with given event 
    fRejectLaser(kTRUE),                 //flag- reject laser
    fTriggerClass(),
    fCurrentEvent(0),           //! current event
    fCurrentTrack(0),           //! current esd track
    fCurrentSeed(0),            //! current seed
    fDebugLevel(0)
{
  //
  // Constructor
  //
}

AliTPCcalibBase::AliTPCcalibBase(const char * name, const char * title):
  TNamed(name,title),
  fDebugStreamer(0),
  fStreamLevel(0),   
  fRun(0),                  //!  current Run number
  fEvent(0),                //!  current Event number
  fTime(0),                 //!  current Time
  fTrigger(0),              //! current trigger type
  fMagF(0),                 //! current magnetic field
  fTriggerMaskReject(-1),   //trigger mask - reject trigger
  fTriggerMaskAccept(-1),   //trigger mask - accept trigger
  fHasLaser(kFALSE),                    //flag the laser is overlayed with given event 
  fRejectLaser(kTRUE),                 //flag- reject laser
  fTriggerClass(),
  fCurrentEvent(0),           //! current event
  fCurrentTrack(0),           //! current esd track
  fCurrentSeed(0),            //! current seed
  fDebugLevel(0)
{
  //
  // Constructor
  //
}

AliTPCcalibBase::AliTPCcalibBase(const AliTPCcalibBase&calib):
  TNamed(calib),
  fDebugStreamer(0),
  fStreamLevel(calib.fStreamLevel),
  fRun(0),                  //!  current Run number
  fEvent(0),                //!  current Event number
  fTime(0),                 //!  current Time
  fTrigger(0),              //! current trigger type
  fMagF(0),                 //! current magnetic field
  fTriggerMaskReject(calib.fTriggerMaskReject),   //trigger mask - reject trigger
  fTriggerMaskAccept(calib.fTriggerMaskAccept),   //trigger mask - accept trigger
  fHasLaser(calib.fHasLaser),                    //flag the laser is overlayed with given event
  fRejectLaser(calib.fRejectLaser),                 //flag- reject laser
  fTriggerClass(calib.fTriggerClass),
  fCurrentEvent(0),           //! current event
  fCurrentTrack(0),           //! current esd track
  fCurrentSeed(0),            //! current seed
  fDebugLevel(calib.fDebugLevel)
{
  //
  // copy constructor
  //
}

AliTPCcalibBase &AliTPCcalibBase::operator=(const AliTPCcalibBase&calib){
  //
  //
  //
  ((TNamed *)this)->operator=(calib);
  fDebugStreamer=0;
  fStreamLevel=calib.fStreamLevel;
  fDebugLevel=calib.fDebugLevel;
  return *this;
}


AliTPCcalibBase::~AliTPCcalibBase() {
  //
  // destructor
  //
  if (fDebugLevel>0) printf("AliTPCcalibBase::~AliTPCcalibBase\n");
  if (fDebugStreamer) delete fDebugStreamer;
  fDebugStreamer=0;
}

void  AliTPCcalibBase::Terminate(){
  //
  //
  //
  if (fDebugLevel>0) printf("AliTPCcalibBase::Terminate\n");
  if (fDebugStreamer) delete fDebugStreamer;
  fDebugStreamer = 0;
  return;
}

TTreeSRedirector *AliTPCcalibBase::GetDebugStreamer(){
  //
  // Get Debug streamer
  // In case debug streamer not yet initialized and StreamLevel>0 create new one
  //
  if (fStreamLevel==0) return 0;
  if (fDebugStreamer) return fDebugStreamer;
  TString dsName;
  dsName=GetName();
  dsName+="Debug.root";
  dsName.ReplaceAll(" ",""); 
  fDebugStreamer = new TTreeSRedirector(dsName.Data());
  return fDebugStreamer;
}


void    AliTPCcalibBase::UpdateEventInfo(AliESDEvent * event){
  //
  //
  //
  fRun     = event->GetRunNumber();
  fEvent   = event->GetEventNumberInFile();
  fTime    = event->GetTimeStamp();
  fTrigger = event->GetTriggerMask();
  fMagF    = event->GetMagneticField();
  fTriggerClass = event->GetFiredTriggerClasses().Data();
  fHasLaser = HasLaser(event); 
  
}


Bool_t AliTPCcalibBase::HasLaser(AliESDEvent *event){
  //
  //
  //
  // Thresholds more than 8 tracks with small dip angle
  
  const Int_t kMinLaserTracks = 8;
  const Float_t kThrLaser       = 0.3;
  const Float_t kLaserTgl       = 0.01;

  Int_t ntracks = event->GetNumberOfTracks();
  if (ntracks<kMinLaserTracks) return kFALSE;
  Float_t nlaser=0;
  Float_t nall=0;
  for (Int_t i=0;i<ntracks;++i) {
    AliESDtrack *track=event->GetTrack(i);
    if (!track) continue;
    if (track->GetTPCNcls()<=0) continue; 
    nall++;
    if (TMath::Abs(track->GetTgl())<kLaserTgl) nlaser++;
  }
  if (nlaser>kMinLaserTracks) return kTRUE;
  if (nall>0 && nlaser/nall>kThrLaser) return kTRUE;
  return kFALSE;
}


Bool_t AliTPCcalibBase::AcceptTrigger(){
  //
  // Apply trigger mask - Don't do calibration for non proper triggers
  // 
  if (fTriggerMaskReject==(Int_t)fTrigger) return kFALSE;
  if (fTriggerMaskAccept>0 && fTriggerMaskAccept!=(Int_t)fTrigger) return kFALSE;
  if (fHasLaser && fRejectLaser) return kFALSE;
  return kTRUE;
}


void AliTPCcalibBase::RegisterDebugOutput(const char *path){
  //
  // store  - copy debug output to the destination position
  // currently ONLY for local copy
  if (fDebugLevel>0) printf("AliTPCcalibBase::RegisterDebugOutput(%s)\n",path);
  if (fStreamLevel==0) return;
  TString dsName;
  dsName=GetName();
  dsName+="Debug.root";
  dsName.ReplaceAll(" ",""); 
  TString dsName2=path;
  gSystem->MakeDirectory(dsName2.Data());
  dsName2+=gSystem->HostName();
  gSystem->MakeDirectory(dsName2.Data());
  dsName2+="/";
  TTimeStamp s;
  dsName2+=Int_t(s.GetNanoSec());
  dsName2+="/";
  gSystem->MakeDirectory(dsName2.Data());
  dsName2+=dsName;
  AliInfo(Form("copy %s\t%s\n",dsName.Data(),dsName2.Data()));
  printf("copy %s\t%s\n",dsName.Data(),dsName2.Data());
  TFile::Cp(dsName.Data(),dsName2.Data());
}


TGraphErrors * AliTPCcalibBase::FitSlices(THnSparse *h, Int_t axisDim1, Int_t axisDim2, Int_t minEntries, Int_t nmaxBin, Float_t fracLow, Float_t fracUp, Bool_t useMedian, TTreeSRedirector *cstream, Int_t ival){
  //
  // Fitting slices of the projection(axisDim1,axisDim2) of a sparse histogram
  // 
  TF1 funcGaus("funcGaus","gaus");
  TH2D * hist = h->Projection(axisDim1, axisDim2);
  Double_t *xvec = new Double_t[hist->GetNbinsX()];
  Double_t *yvec = new Double_t[hist->GetNbinsX()];
  Double_t *xerr = new Double_t[hist->GetNbinsX()];
  Double_t *yerr = new Double_t[hist->GetNbinsX()];
  Int_t counter  = 0;
  TH1D * projectionHist =0;
  //

  for(Int_t i=1; i < hist->GetNbinsX(); i++) {
    Int_t nsum=0;
    Int_t imin   =  i;
    Int_t imax   =  i;

    for (Int_t idelta=0; idelta<nmaxBin; idelta++){
      //
      imin   =  TMath::Max(i-idelta,1);
      imax   =  TMath::Min(i+idelta,hist->GetNbinsX());
      nsum = TMath::Nint(hist->Integral(imin,imax,0,hist->GetNbinsY()));
      if (nsum==0) break;
      if (nsum>minEntries) break;
    }
    if (nsum<minEntries) continue;
    //
    hist->GetXaxis()->SetRange(imin,imax);
    projectionHist = hist->ProjectionY("gain",imin,imax);
    // Determine Median:
    Float_t xMin = projectionHist->GetXaxis()->GetXmin();
    Float_t xMax = projectionHist->GetXaxis()->GetXmax();
    Float_t xMedian = (xMin+xMax)*0.5;
    Float_t integral = 0;
    for(Int_t jbin=1; jbin<projectionHist->GetNbinsX()-1; jbin++) {
      integral+=projectionHist->GetBinContent(jbin);
    }
    //printf("Integral %f\t%f\n",integral, projectionHist->GetSum());
    //
    //
    Float_t currentSum=0;
    for(Int_t jbin=1; jbin<projectionHist->GetNbinsX()-1; jbin++) {
      currentSum += projectionHist->GetBinContent(jbin);
      if (currentSum<fracLow*integral) xMin = projectionHist->GetBinCenter(jbin);
      if (currentSum<fracUp*integral)  xMax = projectionHist->GetBinCenter(jbin+1);      
      if (currentSum<0.5*integral && projectionHist->GetBinContent(jbin)>0){
	xMedian = (projectionHist->GetBinCenter(jbin)*projectionHist->GetBinContent(jbin)+
		   projectionHist->GetBinCenter(jbin+1)*projectionHist->GetBinContent(jbin+1))/
	  (projectionHist->GetBinContent(jbin)+projectionHist->GetBinContent(jbin+1));
      }
    }
    //
    Float_t rms  = projectionHist->GetRMS();
    //    i += interval;
    //
    Double_t xcenter =  hist->GetMean(); 
    Double_t xrms    =  hist->GetRMS()+hist->GetXaxis()->GetBinWidth(1)/TMath::Sqrt(12.); 
    Double_t binWidth = projectionHist->GetXaxis()->GetBinWidth(1);
    if (rms>0){
      // cut on +- 4 RMS
      projectionHist->Fit(&funcGaus,"QN","",xMin, xMax);
      Double_t chi2 = funcGaus.GetChisquare();
      //  
      xvec[counter] = xcenter;
      yvec[counter] = funcGaus.GetParameter(ival);
      xerr[counter] = xrms;
      yerr[counter] = funcGaus.GetParError(ival); 
      if (useMedian) yvec[counter] = xMedian;
      if (cstream){
	(*cstream)<<"fitDebug"<<
	  "xcenter="<<xcenter<<
	  "xMin="<<xMin<<
	  "xMax="<<xMax<<
	  "xMedian="<<xMedian<<
	  "xFitM"<<yvec[counter]<<
	  "xFitS"<<yerr[counter]<<
	  "chi2="<<chi2<<	  
	  "\n";
      }
      counter++;
    }else{
      xvec[counter] = xcenter;
      yvec[counter] = xMedian;
      xerr[counter] = xrms;
      yerr[counter] = binWidth/TMath::Sqrt(12.); 
      counter++;
    }
    delete projectionHist;
  }
  
  TGraphErrors * graphErrors = new TGraphErrors(counter, xvec, yvec, xerr, yerr);
  delete [] xvec;
  delete [] yvec;
  delete [] xerr;
  delete [] yerr;
  delete hist;
  return graphErrors;
}


void AliTPCcalibBase::BinLogX(THnSparse *h, Int_t axisDim) {

  // Method for the correct logarithmic binning of histograms

  TAxis *axis = h->GetAxis(axisDim);
  int bins = axis->GetNbins();

  Double_t from = axis->GetXmin();
  Double_t to = axis->GetXmax();
  Double_t *new_bins = new Double_t[bins + 1];

  new_bins[0] = from;
  Double_t factor = pow(to/from, 1./bins);

  for (int i = 1; i <= bins; i++) {
   new_bins[i] = factor * new_bins[i-1];
  }
  axis->Set(bins, new_bins);
  delete new_bins;

}
void AliTPCcalibBase::BinLogX(TH1 *h) {

  // Method for the correct logarithmic binning of histograms

  TAxis *axis = h->GetXaxis();
  int bins = axis->GetNbins();

  Double_t from = axis->GetXmin();
  Double_t to = axis->GetXmax();
  Double_t *new_bins = new Double_t[bins + 1];

  new_bins[0] = from;
  Double_t factor = pow(to/from, 1./bins);

  for (int i = 1; i <= bins; i++) {
   new_bins[i] = factor * new_bins[i-1];
  }
  axis->Set(bins, new_bins);
  delete new_bins;

}
Commit	Line	Data
3ab35fc5	1	/**************************************************************************
	2	* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
	3	* *
	4	* Author: The ALICE Off-line Project. *
	5	* Contributors are mentioned in the code where appropriate. *
	6	* *
	7	* Permission to use, copy, modify and distribute this software and its *
	8	* documentation strictly for non-commercial purposes is hereby granted *
	9	* without fee, provided that the above copyright notice appears in all *
	10	* copies and that both the copyright notice and this permission notice *
	11	* appear in the supporting documentation. The authors make no claims *
	12	* about the suitability of this software for any purpose. It is *
	13	* provided "as is" without express or implied warranty. *
	14	**************************************************************************/
	15
	16
	17	///////////////////////////////////////////////////////////////////////////////
	18	// //
	19	// Base class for the calibration components using
	20	// as input TPCseeds and ESDs
	21	// Event loop outside of the component
	22	//
	23	//
ae28e92e	24	// Base functionality to be implemeneted by component
	25	/*
	26	//In some cases only one of this function to be implemented
	27	virtual void Process(AliESDEvent *event)
	28	virtual void Process(AliTPCseed *track)
	29	//
	30	virtual Long64_t Merge(TCollection *li);
	31	virtual void Analyze()
	32	void Terminate();
	33	*/
	34	// Functionality provided by base class for Algorith debuging:
	35	// TTreeSRedirector * cstream = GetDebugStreamer() - get debug streamer which can be use for numerical debugging
	36	//
	37
	38
	39
	40	// marian.ivanov@cern.ch
3ab35fc5	41	//
3ab35fc5	42	#include "AliTPCcalibBase.h"
f7f33dec	43	#include "TSystem.h"
f7f33dec	44	#include "TFile.h"
ae28e92e	45	#include "TTreeStream.h"
47328338	46	#include "TTimeStamp.h"
52a5850f	47	#include "TGraph.h"
	48	#include "TGraphErrors.h"
	49	#include "TF1.h"
3226e48f	50	#include "TH1.h"
3226e48f	51	#include "THnSparse.h"
52a5850f	52	#include "TH1D.h"
52a5850f	53	#include "TH2D.h"
3226e48f	54	#include "TAxis.h"
52a5850f	55
	56
	57	#include "AliLog.h"
108953e9	58	#include "AliESDEvent.h"
f7f33dec	59
3ab35fc5	60
	61	ClassImp(AliTPCcalibBase)
	62
ae28e92e	63	AliTPCcalibBase::AliTPCcalibBase():
	64	TNamed(),
	65	fDebugStreamer(0),
108953e9	66	fStreamLevel(0),
	67	fRun(0), //! current Run number
	68	fEvent(0), //! current Event number
	69	fTime(0), //! current Time
	70	fTrigger(0), //! current trigger type
	71	fMagF(0), //! current magnetic field
c51653e8	72	fTriggerMaskReject(-1), //trigger mask - reject trigger
c51653e8	73	fTriggerMaskAccept(-1), //trigger mask - accept trigger
2d22fa36	74	fHasLaser(kFALSE), //flag the laser is overlayed with given event
2d22fa36	75	fRejectLaser(kTRUE), //flag- reject laser
15e48021	76	fTriggerClass(),
b842d904	77	fCurrentEvent(0), //! current event
	78	fCurrentTrack(0), //! current esd track
	79	fCurrentSeed(0), //! current seed
ae28e92e	80	fDebugLevel(0)
3ab35fc5	81	{
	82	//
	83	// Constructor
	84	//
	85	}
	86
8cf12c96	87	AliTPCcalibBase::AliTPCcalibBase(const char * name, const char * title):
	88	TNamed(name,title),
	89	fDebugStreamer(0),
	90	fStreamLevel(0),
	91	fRun(0), //! current Run number
	92	fEvent(0), //! current Event number
	93	fTime(0), //! current Time
	94	fTrigger(0), //! current trigger type
	95	fMagF(0), //! current magnetic field
	96	fTriggerMaskReject(-1), //trigger mask - reject trigger
	97	fTriggerMaskAccept(-1), //trigger mask - accept trigger
	98	fHasLaser(kFALSE), //flag the laser is overlayed with given event
	99	fRejectLaser(kTRUE), //flag- reject laser
15e48021	100	fTriggerClass(),
b842d904	101	fCurrentEvent(0), //! current event
	102	fCurrentTrack(0), //! current esd track
	103	fCurrentSeed(0), //! current seed
8cf12c96	104	fDebugLevel(0)
	105	{
	106	//
	107	// Constructor
	108	//
	109	}
	110
ae28e92e	111	AliTPCcalibBase::AliTPCcalibBase(const AliTPCcalibBase&calib):
	112	TNamed(calib),
	113	fDebugStreamer(0),
	114	fStreamLevel(calib.fStreamLevel),
e5cbd73f	115	fRun(0), //! current Run number
	116	fEvent(0), //! current Event number
	117	fTime(0), //! current Time
	118	fTrigger(0), //! current trigger type
	119	fMagF(0), //! current magnetic field
c51653e8	120	fTriggerMaskReject(calib.fTriggerMaskReject), //trigger mask - reject trigger
c51653e8	121	fTriggerMaskAccept(calib.fTriggerMaskAccept), //trigger mask - accept trigger
2d22fa36	122	fHasLaser(calib.fHasLaser), //flag the laser is overlayed with given event
2d22fa36	123	fRejectLaser(calib.fRejectLaser), //flag- reject laser
fe8454d9	124	fTriggerClass(calib.fTriggerClass),
b842d904	125	fCurrentEvent(0), //! current event
	126	fCurrentTrack(0), //! current esd track
	127	fCurrentSeed(0), //! current seed
ae28e92e	128	fDebugLevel(calib.fDebugLevel)
	129	{
	130	//
	131	// copy constructor
	132	//
	133	}
	134
	135	AliTPCcalibBase &AliTPCcalibBase::operator=(const AliTPCcalibBase&calib){
	136	//
	137	//
	138	//
	139	((TNamed *)this)->operator=(calib);
	140	fDebugStreamer=0;
	141	fStreamLevel=calib.fStreamLevel;
	142	fDebugLevel=calib.fDebugLevel;
525062ee	143	return *this;
ae28e92e	144	}
	145
	146
3ab35fc5	147	AliTPCcalibBase::~AliTPCcalibBase() {
	148	//
	149	// destructor
	150	//
f7f33dec	151	if (fDebugLevel>0) printf("AliTPCcalibBase::~AliTPCcalibBase\n");
ae28e92e	152	if (fDebugStreamer) delete fDebugStreamer;
	153	fDebugStreamer=0;
	154	}
	155
	156	void AliTPCcalibBase::Terminate(){
	157	//
	158	//
	159	//
f7f33dec	160	if (fDebugLevel>0) printf("AliTPCcalibBase::Terminate\n");
ae28e92e	161	if (fDebugStreamer) delete fDebugStreamer;
	162	fDebugStreamer = 0;
	163	return;
	164	}
	165
	166	TTreeSRedirector *AliTPCcalibBase::GetDebugStreamer(){
	167	//
	168	// Get Debug streamer
	169	// In case debug streamer not yet initialized and StreamLevel>0 create new one
	170	//
	171	if (fStreamLevel==0) return 0;
	172	if (fDebugStreamer) return fDebugStreamer;
	173	TString dsName;
	174	dsName=GetName();
	175	dsName+="Debug.root";
	176	dsName.ReplaceAll(" ","");
	177	fDebugStreamer = new TTreeSRedirector(dsName.Data());
	178	return fDebugStreamer;
3ab35fc5	179	}
f7f33dec	180
f7f33dec	181
108953e9	182	void AliTPCcalibBase::UpdateEventInfo(AliESDEvent * event){
	183	//
	184	//
	185	//
	186	fRun = event->GetRunNumber();
	187	fEvent = event->GetEventNumberInFile();
	188	fTime = event->GetTimeStamp();
	189	fTrigger = event->GetTriggerMask();
	190	fMagF = event->GetMagneticField();
15e48021	191	fTriggerClass = event->GetFiredTriggerClasses().Data();
2d22fa36	192	fHasLaser = HasLaser(event);
15e48021	193
108953e9	194	}
108953e9	195
2d22fa36	196
	197	Bool_t AliTPCcalibBase::HasLaser(AliESDEvent *event){
	198	//
	199	//
	200	//
	201	// Thresholds more than 8 tracks with small dip angle
	202
	203	const Int_t kMinLaserTracks = 8;
	204	const Float_t kThrLaser = 0.3;
	205	const Float_t kLaserTgl = 0.01;
	206
	207	Int_t ntracks = event->GetNumberOfTracks();
	208	if (ntracks<kMinLaserTracks) return kFALSE;
	209	Float_t nlaser=0;
	210	Float_t nall=0;
	211	for (Int_t i=0;i<ntracks;++i) {
	212	AliESDtrack *track=event->GetTrack(i);
	213	if (!track) continue;
	214	if (track->GetTPCNcls()<=0) continue;
	215	nall++;
	216	if (TMath::Abs(track->GetTgl())<kLaserTgl) nlaser++;
	217	}
	218	if (nlaser>kMinLaserTracks) return kTRUE;
	219	if (nall>0 && nlaser/nall>kThrLaser) return kTRUE;
	220	return kFALSE;
	221	}
	222
	223
	224
c51653e8	225	Bool_t AliTPCcalibBase::AcceptTrigger(){
	226	//
	227	// Apply trigger mask - Don't do calibration for non proper triggers
	228	//
2d22fa36	229	if (fTriggerMaskReject==(Int_t)fTrigger) return kFALSE;
	230	if (fTriggerMaskAccept>0 && fTriggerMaskAccept!=(Int_t)fTrigger) return kFALSE;
	231	if (fHasLaser && fRejectLaser) return kFALSE;
c51653e8	232	return kTRUE;
	233	}
	234
	235
f7f33dec	236	void AliTPCcalibBase::RegisterDebugOutput(const char *path){
	237	//
	238	// store - copy debug output to the destination position
	239	// currently ONLY for local copy
	240	if (fDebugLevel>0) printf("AliTPCcalibBase::RegisterDebugOutput(%s)\n",path);
	241	if (fStreamLevel==0) return;
	242	TString dsName;
	243	dsName=GetName();
	244	dsName+="Debug.root";
	245	dsName.ReplaceAll(" ","");
	246	TString dsName2=path;
	247	gSystem->MakeDirectory(dsName2.Data());
	248	dsName2+=gSystem->HostName();
	249	gSystem->MakeDirectory(dsName2.Data());
	250	dsName2+="/";
47328338	251	TTimeStamp s;
	252	dsName2+=Int_t(s.GetNanoSec());
	253	dsName2+="/";
	254	gSystem->MakeDirectory(dsName2.Data());
f7f33dec	255	dsName2+=dsName;
	256	AliInfo(Form("copy %s\t%s\n",dsName.Data(),dsName2.Data()));
	257	printf("copy %s\t%s\n",dsName.Data(),dsName2.Data());
	258	TFile::Cp(dsName.Data(),dsName2.Data());
	259	}
52a5850f	260
	261
	262
70b0f0bf	263	TGraphErrors * AliTPCcalibBase::FitSlices(THnSparse h, Int_t axisDim1, Int_t axisDim2, Int_t minEntries, Int_t nmaxBin, Float_t fracLow, Float_t fracUp, Bool_t useMedian, TTreeSRedirector cstream, Int_t ival){
52a5850f	264	//
	265	// Fitting slices of the projection(axisDim1,axisDim2) of a sparse histogram
	266	//
3d549531	267	TF1 funcGaus("funcGaus","gaus");
52a5850f	268	TH2D * hist = h->Projection(axisDim1, axisDim2);
	269	Double_t *xvec = new Double_t[hist->GetNbinsX()];
	270	Double_t *yvec = new Double_t[hist->GetNbinsX()];
	271	Double_t *xerr = new Double_t[hist->GetNbinsX()];
	272	Double_t *yerr = new Double_t[hist->GetNbinsX()];
	273	Int_t counter = 0;
	274	TH1D * projectionHist =0;
	275	//
	276
	277	for(Int_t i=1; i < hist->GetNbinsX(); i++) {
	278	Int_t nsum=0;
	279	Int_t imin = i;
	280	Int_t imax = i;
	281
	282	for (Int_t idelta=0; idelta<nmaxBin; idelta++){
	283	//
	284	imin = TMath::Max(i-idelta,1);
	285	imax = TMath::Min(i+idelta,hist->GetNbinsX());
	286	nsum = TMath::Nint(hist->Integral(imin,imax,0,hist->GetNbinsY()));
	287	if (nsum==0) break;
	288	if (nsum>minEntries) break;
	289	}
	290	if (nsum<minEntries) continue;
	291	//
	292	hist->GetXaxis()->SetRange(imin,imax);
	293	projectionHist = hist->ProjectionY("gain",imin,imax);
	294	// Determine Median:
	295	Float_t xMin = projectionHist->GetXaxis()->GetXmin();
	296	Float_t xMax = projectionHist->GetXaxis()->GetXmax();
	297	Float_t xMedian = (xMin+xMax)*0.5;
d0b31f57	298	Float_t integral = 0;
	299	for(Int_t jbin=1; jbin<projectionHist->GetNbinsX()-1; jbin++) {
	300	integral+=projectionHist->GetBinContent(jbin);
	301	}
7f766801	302	//printf("Integral %f\t%f\n",integral, projectionHist->GetSum());
52a5850f	303	//
	304	//
	305	Float_t currentSum=0;
	306	for(Int_t jbin=1; jbin<projectionHist->GetNbinsX()-1; jbin++) {
	307	currentSum += projectionHist->GetBinContent(jbin);
d0b31f57	308	if (currentSum<fracLow*integral) xMin = projectionHist->GetBinCenter(jbin);
	309	if (currentSum<fracUp*integral) xMax = projectionHist->GetBinCenter(jbin+1);
	310	if (currentSum<0.5*integral && projectionHist->GetBinContent(jbin)>0){
52a5850f	311	xMedian = (projectionHist->GetBinCenter(jbin)*projectionHist->GetBinContent(jbin)+
	312	projectionHist->GetBinCenter(jbin+1)*projectionHist->GetBinContent(jbin+1))/
	313	(projectionHist->GetBinContent(jbin)+projectionHist->GetBinContent(jbin+1));
	314	}
	315	}
	316	//
	317	Float_t rms = projectionHist->GetRMS();
	318	// i += interval;
	319	//
	320	Double_t xcenter = hist->GetMean();
	321	Double_t xrms = hist->GetRMS()+hist->GetXaxis()->GetBinWidth(1)/TMath::Sqrt(12.);
	322	Double_t binWidth = projectionHist->GetXaxis()->GetBinWidth(1);
	323	if (rms>0){
52a5850f	324	// cut on +- 4 RMS
52a5850f	325	projectionHist->Fit(&funcGaus,"QN","",xMin, xMax);
3d549531	326	Double_t chi2 = funcGaus.GetChisquare();
52a5850f	327	//
52a5850f	328	xvec[counter] = xcenter;
70b0f0bf	329	yvec[counter] = funcGaus.GetParameter(ival);
52a5850f	330	xerr[counter] = xrms;
70b0f0bf	331	yerr[counter] = funcGaus.GetParError(ival);
3d549531	332	if (useMedian) yvec[counter] = xMedian;
	333	if (cstream){
	334	(*cstream)<<"fitDebug"<<
	335	"xcenter="<<xcenter<<
	336	"xMin="<<xMin<<
	337	"xMax="<<xMax<<
	338	"xMedian="<<xMedian<<
	339	"xFitM"<<yvec[counter]<<
	340	"xFitS"<<yerr[counter]<<
	341	"chi2="<<chi2<<
	342	"\n";
	343	}
52a5850f	344	counter++;
	345	}else{
	346	xvec[counter] = xcenter;
	347	yvec[counter] = xMedian;
	348	xerr[counter] = xrms;
	349	yerr[counter] = binWidth/TMath::Sqrt(12.);
	350	counter++;
	351	}
	352	delete projectionHist;
	353	}
	354
	355	TGraphErrors * graphErrors = new TGraphErrors(counter, xvec, yvec, xerr, yerr);
	356	delete [] xvec;
	357	delete [] yvec;
	358	delete [] xerr;
	359	delete [] yerr;
	360	delete hist;
	361	return graphErrors;
	362	}
3226e48f	363
	364
	365	void AliTPCcalibBase::BinLogX(THnSparse *h, Int_t axisDim) {
	366
	367	// Method for the correct logarithmic binning of histograms
	368
	369	TAxis *axis = h->GetAxis(axisDim);
	370	int bins = axis->GetNbins();
	371
	372	Double_t from = axis->GetXmin();
	373	Double_t to = axis->GetXmax();
	374	Double_t *new_bins = new Double_t[bins + 1];
	375
	376	new_bins[0] = from;
	377	Double_t factor = pow(to/from, 1./bins);
	378
	379	for (int i = 1; i <= bins; i++) {
	380	new_bins[i] = factor * new_bins[i-1];
	381	}
	382	axis->Set(bins, new_bins);
	383	delete new_bins;
	384
	385	}
	386	void AliTPCcalibBase::BinLogX(TH1 *h) {
	387
	388	// Method for the correct logarithmic binning of histograms
	389
	390	TAxis *axis = h->GetXaxis();
	391	int bins = axis->GetNbins();
	392
	393	Double_t from = axis->GetXmin();
	394	Double_t to = axis->GetXmax();
	395	Double_t *new_bins = new Double_t[bins + 1];
	396
	397	new_bins[0] = from;
	398	Double_t factor = pow(to/from, 1./bins);
	399
	400	for (int i = 1; i <= bins; i++) {
	401	new_bins[i] = factor * new_bins[i-1];
	402	}
	403	axis->Set(bins, new_bins);
	404	delete new_bins;
	405
	406	}