]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - PWG0/dNdEta/dNdEtaAnalysis.cxx
updating makefile to include evgen headers to compile systematics selector
[u/mrichter/AliRoot.git] / PWG0 / dNdEta / dNdEtaAnalysis.cxx
index ae704487101dbacd3f5aa7a1b3d108dbec312f3f..b6aa85a6e044611885842b65ab75934f108af559 100644 (file)
 #include "dNdEtaAnalysis.h"
 
 #include <TFile.h>
-#include <TH2F.h>
+#include <TH3F.h>
+#include <TH2D.h>
 #include <TH1D.h>
 #include <TMath.h>
 #include <TCanvas.h>
+#include <TCollection.h>
+#include <TIterator.h>
+#include <TList.h>
+#include <TLegend.h>
+
+#include "AlidNdEtaCorrection.h"
+#include "AliPWG0Helper.h"
 
 //____________________________________________________________________
 ClassImp(dNdEtaAnalysis)
 
 //____________________________________________________________________
-dNdEtaAnalysis::dNdEtaAnalysis(Char_t* name) {
+dNdEtaAnalysis::dNdEtaAnalysis() :
+  TNamed(),
+  fData(0),
+  fDataUncorrected(0),
+  fVtx(0),
+  fPtDist(0)
+{
+  // default constructor
+
+  for (Int_t i=0; i<kVertexBinning; ++i)
+  {
+    fdNdEta[i] = 0;
+    fdNdEtaPtCutOffCorrected[i] = 0;
+  }
+}
+
+//____________________________________________________________________
+dNdEtaAnalysis::dNdEtaAnalysis(Char_t* name, Char_t* title) :
+  TNamed(name, title),
+  fData(0),
+  fDataUncorrected(0),
+  fVtx(0),
+  fPtDist(0)
+{
+  // constructor
 
-  fName = TString(name);
+  fData  = new TH3F(Form("%s_analysis", name),"Input data",80,-20,20,40,-2,2,100, 0, 10);
+  fData->SetXTitle("vtx z [cm]");
+  fData->SetYTitle("#eta");
+  fData->SetZTitle("p_{T}");
+  fData->Sumw2();
 
-  hEtaVsVtx  = new TH2F("eta_vs_vtx","",80,-20,20,120,-6,6);
-  hEtaVsVtx->SetXTitle("vtx z [cm]");
-  hEtaVsVtx->SetYTitle("#eta");
+  fDataUncorrected = dynamic_cast<TH3F*> (fData->Clone(Form("%s_analysis_uncorrected", name)));
+  fDataUncorrected->SetTitle(Form("%s uncorrected", fData->GetTitle()));
+  fVtx       = dynamic_cast<TH1D*> (fData->Project3D("x"));
+  fVtx->SetName(Form("%s_vtx", name));
+  fVtx->SetTitle("Vertex distribution");
+  fVtx->GetXaxis()->SetTitle(fData->GetXaxis()->GetTitle());
+  //fVtx->Sumw2();
 
-  hEtaVsVtxUncorrected = dynamic_cast<TH2F*> (hEtaVsVtx->Clone("eta_vs_vtx_uncorrected"));
-  hVtx       = hEtaVsVtx->ProjectionX("vtx");
-  hdNdEta    = hEtaVsVtx->ProjectionY("dNdEta");
+  fdNdEta[0] = dynamic_cast<TH1D*> (fData->Project3D("y"));
+  fdNdEta[0]->SetName(Form("%s_dNdEta", name));
+  fdNdEta[0]->SetTitle("dN_{ch}/d#eta");
+  fdNdEta[0]->GetXaxis()->SetTitle(fData->GetYaxis()->GetTitle());
+  fdNdEta[0]->SetYTitle("dN_{ch}/d#eta");
 
-  hdNdEta->SetYTitle("dN/d#eta");
+  fdNdEtaPtCutOffCorrected[0] = dynamic_cast<TH1D*> (fdNdEta[0]->Clone(Form("%s_corrected", fdNdEta[0]->GetName())));
 
-  hEtaVsVtx->Sumw2();
-  hVtx->Sumw2();
+  for (Int_t i=1; i<kVertexBinning; ++i)
+  {
+    fdNdEta[i]    = dynamic_cast<TH1D*> (fdNdEta[0]->Clone(Form("%s_%d", fdNdEta[0]->GetName(), i)));
+    fdNdEtaPtCutOffCorrected[i]    = dynamic_cast<TH1D*> (fdNdEtaPtCutOffCorrected[0]->Clone(Form("%s_%d", fdNdEtaPtCutOffCorrected[0]->GetName(), i)));
+  }
+
+  fPtDist = dynamic_cast<TH1D*> (fData->Project3D("z"));
+  fPtDist->SetName(Form("%s_pt", name));
+  fPtDist->SetTitle("p_{T} [GeV/c]");
+  fPtDist->GetXaxis()->SetTitle(fData->GetZaxis()->GetTitle());
+  fPtDist->SetYTitle("#frac{dN}{d#eta dp_{T}} [c/GeV]");
 }
 
 //____________________________________________________________________
-void
-dNdEtaAnalysis::FillTrack(Float_t vtx, Float_t eta, Float_t weight) {
-  hEtaVsVtx->Fill(vtx, eta, weight);
-  hEtaVsVtxUncorrected->Fill(vtx,eta);
+dNdEtaAnalysis::~dNdEtaAnalysis()
+{
+  // destructor
+
+  if (fData)
+  {
+    delete fData;
+    fData = 0;
+  }
+
+  if (fDataUncorrected)
+  {
+    delete fDataUncorrected;
+    fDataUncorrected = 0;
+  }
+
+  if (fVtx)
+  {
+    delete fVtx;
+    fVtx = 0;
+  }
+
+  for (Int_t i=0; i<kVertexBinning; ++i)
+  {
+    if (fdNdEta[i])
+    {
+      delete fdNdEta[i];
+      fdNdEta[i] = 0;
+    }
+    if (fdNdEtaPtCutOffCorrected[i])
+    {
+      delete fdNdEtaPtCutOffCorrected[i];
+      fdNdEtaPtCutOffCorrected[i] = 0;
+    }
+  }
+
+  if (fPtDist)
+  {
+    delete fPtDist;
+    fPtDist = 0;
+  }
+}
+
+//_____________________________________________________________________________
+dNdEtaAnalysis::dNdEtaAnalysis(const dNdEtaAnalysis &c) :
+  TNamed(c),
+  fData(0),
+  fDataUncorrected(0),
+  fVtx(0),
+  fPtDist(0)
+{
+  //
+  // dNdEtaAnalysis copy constructor
+  //
+
+  ((dNdEtaAnalysis &) c).Copy(*this);
+}
+
+//_____________________________________________________________________________
+dNdEtaAnalysis &dNdEtaAnalysis::operator=(const dNdEtaAnalysis &c)
+{
+  //
+  // Assignment operator
+  //
+
+  if (this != &c) ((dNdEtaAnalysis &) c).Copy(*this);
+  return *this;
+}
+
+//_____________________________________________________________________________
+void dNdEtaAnalysis::Copy(TObject &c) const
+{
+  //
+  // Copy function
+  //
+
+  dNdEtaAnalysis& target = (dNdEtaAnalysis &) c;
+
+  target.fData = dynamic_cast<TH3F*> (fData->Clone());
+  target.fDataUncorrected = dynamic_cast<TH3F*> (fDataUncorrected->Clone());
+  target.fVtx = dynamic_cast<TH1D*> (fVtx->Clone());
+
+  for (Int_t i=0; i<kVertexBinning; ++i)
+  {
+    target.fdNdEta[i] = dynamic_cast<TH1D*> (fdNdEta[i]->Clone());
+    target.fdNdEtaPtCutOffCorrected[i] = dynamic_cast<TH1D*> (fdNdEtaPtCutOffCorrected[i]->Clone());
+  }
+
+  target.fPtDist = dynamic_cast<TH1D*> (fPtDist->Clone());
+
+  TNamed::Copy((TNamed &) c);
+}
+
+//____________________________________________________________________
+void dNdEtaAnalysis::FillTrack(Float_t vtx, Float_t eta, Float_t pt, Float_t weight)
+{
+  // fills a track into the histograms
+
+  fDataUncorrected->Fill(vtx, eta, pt);
+  fData->Fill(vtx, eta, pt, weight);
 }
 
 //____________________________________________________________________
-void
-dNdEtaAnalysis::FillEvent(Float_t vtx) {
-  hVtx->Fill(vtx);
+void dNdEtaAnalysis::FillEvent(Float_t vtx, Float_t weight)
+{
+  // fills an event into the histograms
+
+  fVtx->Fill(vtx, weight);
 }
 
 //____________________________________________________________________
-void
-dNdEtaAnalysis::Finish() {  
-
-  // first normalize with n events (per vtx)
-  for (Int_t i_vtx=0; i_vtx<=hVtx->GetNbinsX(); i_vtx++) {
-    Float_t nEvents      = hVtx->GetBinContent(i_vtx);
-    Float_t nEventsError = hVtx->GetBinError(i_vtx);
-    
-    if (nEvents==0) continue;
-    
-    for (Int_t i_eta=0; i_eta<=hEtaVsVtx->GetNbinsY(); i_eta++) {
-      Float_t value = hEtaVsVtx->GetBinContent(i_vtx, i_eta)/nEvents;
-      if (value==0) continue;
-      Float_t error = hEtaVsVtx->GetBinError(i_vtx, i_eta)/nEvents;
-      error = TMath::Sqrt(TMath::Power(hEtaVsVtx->GetBinError(i_vtx, i_eta)/
-                                      hEtaVsVtx->GetBinContent(i_vtx, i_eta),2) +
-                         TMath::Power(nEventsError/nEvents,2));
-      hEtaVsVtx->SetBinContent(i_vtx, i_eta, value);
-      hEtaVsVtx->SetBinError(i_vtx,   i_eta, error);
+void dNdEtaAnalysis::Finish(AlidNdEtaCorrection* correction, Float_t ptCut)
+{
+  // correct with correction values if available
+
+  // TODO what do we do with the error?
+  if (!correction)
+    printf("INFO: No correction applied\n");
+
+  // In fData we have the track2particle and vertex reconstruction efficiency correction already applied
+
+  // create pt hist
+  {
+    // reset all ranges
+    fData->GetXaxis()->SetRange(0, 0);
+    fData->GetYaxis()->SetRange(0, 0);
+    fData->GetZaxis()->SetRange(0, 0);
+
+    // vtx cut
+    Int_t vertexBinBegin = fData->GetXaxis()->FindBin(-5);
+    Int_t vertexBinEnd = fData->GetXaxis()->FindBin(5);
+    fData->GetXaxis()->SetRange(vertexBinBegin, vertexBinEnd);
+    Float_t nEvents = fVtx->Integral(vertexBinBegin, vertexBinEnd);
+
+    // eta cut
+    fData->GetYaxis()->SetRange(fData->GetYaxis()->FindBin(-0.8), fData->GetYaxis()->FindBin(0.8));
+    Float_t etaWidth = 1.6;
+
+    TH1D* ptHist = dynamic_cast<TH1D*> (fData->Project3D("ze"));
+
+    for (Int_t i=1; i<=fPtDist->GetNbinsX(); ++i)
+    {
+      Float_t binSize = fPtDist->GetBinWidth(i);
+      fPtDist->SetBinContent(i, ptHist->GetBinContent(i) / binSize / nEvents / etaWidth);
+      fPtDist->SetBinError(i, ptHist->GetBinError(i) / binSize / nEvents / etaWidth);
     }
+
+    delete ptHist;
   }
 
-  // then take the wieghted average for each eta
-  // is this the right way to do it???
-  for (Int_t i_eta=0; i_eta<=hEtaVsVtx->GetNbinsY(); i_eta++) {
-    Float_t sum           = 0;
-    Float_t sumError2     = 0;
-    Int_t   nMeasurements = 0;    
+  // reset all ranges
+  fData->GetXaxis()->SetRange(0, 0);
+  fData->GetYaxis()->SetRange(0, 0);
+  fData->GetZaxis()->SetRange(0, 0);
 
-    Float_t sum_xw = 0;
-    Float_t sum_w  = 0;
-    
-    for (Int_t i_vtx=0; i_vtx<=hVtx->GetNbinsX(); i_vtx++) {
-      if (hVtx->GetBinContent(i_vtx)==0)             continue;
-      if (hEtaVsVtx->GetBinContent(i_vtx, i_eta)==0) continue;
+  // integrate over pt (with pt cut)
+  Int_t ptLowBin = 1;
+  if (ptCut > 0)
+    ptLowBin = fData->GetZaxis()->FindBin(ptCut);
 
-      Float_t w = 1/TMath::Power(hEtaVsVtx->GetBinError(i_vtx, i_eta),2);
-      sum_xw = sum_xw + hEtaVsVtx->GetBinContent(i_vtx, i_eta)*w;
-      sum_w  = sum_w + w;
+  fData->GetZaxis()->SetRange(ptLowBin, fData->GetZaxis()->GetNbins());
+  TH2D* vtxVsEta = dynamic_cast<TH2D*> (fData->Project3D("yx2e"));
+  vtxVsEta->GetXaxis()->SetTitle(fData->GetXaxis()->GetTitle());
+  vtxVsEta->GetYaxis()->SetTitle(fData->GetYaxis()->GetTitle());
 
-      sum = sum + hEtaVsVtx->GetBinContent(i_vtx, i_eta);
-      sumError2 = sumError2 + TMath::Power(hEtaVsVtx->GetBinError(i_vtx, i_eta),2);      
-      nMeasurements++;
-    }
-    Float_t dndeta = 0;
-    Float_t error  = 0;
+  if (vtxVsEta == 0)
+  {
+    printf("ERROR: pt integration failed\n");
+    return;
+  }
+
+  //new TCanvas;
+  //vtxVsEta->Draw("COLZ");
+
+  for (Int_t iEta=0; iEta<=vtxVsEta->GetNbinsY(); iEta++)
+  {
+    // do we have several histograms for different vertex positions?
+    Int_t vertexBinWidth = fVtx->GetNbinsX() / (kVertexBinning-1);
+    for (Int_t vertexPos=0; vertexPos<kVertexBinning; ++vertexPos)
+    {
+      Int_t vertexBinBegin = 1;
+      Int_t vertexBinEnd = fVtx->GetNbinsX() + 1;
+
+      // the first histogram is always for the whole vertex range
+      if (vertexPos > 0)
+      {
+        vertexBinBegin = 1 + vertexBinWidth * (vertexPos-1);
+        vertexBinEnd = vertexBinBegin + vertexBinWidth;
+      }
+
+      Float_t totalEvents = fVtx->Integral(vertexBinBegin, vertexBinEnd - 1);
+      if (totalEvents == 0)
+      {
+        printf("WARNING: No events for hist %d %d %d\n", vertexPos, vertexBinBegin, vertexBinEnd);
+        continue;
+      }
+
+      Float_t sum = 0;
+      Float_t sumError2 = 0;
+      for (Int_t iVtx = vertexBinBegin; iVtx < vertexBinEnd; iVtx++)
+      {
+        if (vtxVsEta->GetBinContent(iVtx, iEta) != 0)
+        {
+          sum = sum + vtxVsEta->GetBinContent(iVtx, iEta);
+          sumError2 = sumError2 + TMath::Power(vtxVsEta->GetBinError(iVtx, iEta),2);
+        }
+      }
+
+      Float_t ptCutOffCorrection = 1;
+      if (correction)
+        ptCutOffCorrection = correction->GetMeasuredFraction(ptCut, vtxVsEta->GetYaxis()->GetBinCenter(iEta));
+
+      if (ptCutOffCorrection <= 0)
+      {
+        printf("UNEXPECTED: ptCutOffCorrection is %f for hist %d %d %d\n", ptCutOffCorrection, vertexPos, vertexBinBegin, vertexBinEnd);
+        continue;
+      }
 
-    if (nMeasurements!=0) {
-      dndeta = sum/Float_t(nMeasurements);
-      error  = TMath::Sqrt(sumError2)/Float_t(nMeasurements);
-      
-      dndeta = sum_xw/sum_w;
-      error  = 1/TMath::Sqrt(sum_w);
+      Float_t dndeta = sum / totalEvents;
+      Float_t error  = TMath::Sqrt(sumError2) / totalEvents;
 
-      dndeta = dndeta/hdNdEta->GetBinWidth(i_eta);
-      error  = error/hdNdEta->GetBinWidth(i_eta);
+      dndeta = dndeta/fdNdEta[vertexPos]->GetBinWidth(iEta);
+      error  = error/fdNdEta[vertexPos]->GetBinWidth(iEta);
 
-      hdNdEta->SetBinContent(i_eta, dndeta);
-      hdNdEta->SetBinError(i_eta, error);
+      fdNdEta[vertexPos]->SetBinContent(iEta, dndeta);
+      fdNdEta[vertexPos]->SetBinError(iEta, error);
+
+      dndeta /= ptCutOffCorrection;
+      error  /= ptCutOffCorrection;
+
+      fdNdEtaPtCutOffCorrected[vertexPos]->SetBinContent(iEta, dndeta);
+      fdNdEtaPtCutOffCorrected[vertexPos]->SetBinError(iEta, error);
     }
+  }
+}
+
+//____________________________________________________________________
+void dNdEtaAnalysis::SaveHistograms()
+{
+  // save the histograms to a directory with the name of this class (retrieved from TNamed)
 
+  gDirectory->mkdir(GetName());
+  gDirectory->cd(GetName());
+
+  if (fData)
+  {
+    fData->Write();
+    AliPWG0Helper::CreateProjections(fData);
+  }
+  else
+    printf("dNdEtaAnalysis::SaveHistograms: UNEXPECTED: fData is 0\n");
+
+  if (fDataUncorrected)
+  {
+    fDataUncorrected->Write();
+    AliPWG0Helper::CreateProjections(fDataUncorrected);
+  }
+  else
+    printf("dNdEtaAnalysis::SaveHistograms: UNEXPECTED: fDataUncorrected is 0\n");
+
+  if (fVtx)
+    fVtx       ->Write();
+  else
+    printf("dNdEtaAnalysis::SaveHistograms: UNEXPECTED: fVtx is 0\n");
+
+  if (fPtDist)
+    fPtDist       ->Write();
+  else
+    printf("dNdEtaAnalysis::SaveHistograms: UNEXPECTED: fPtDist is 0\n");
+
+  for (Int_t i=0; i<kVertexBinning; ++i)
+  {
+    if (fdNdEta[i])
+      fdNdEta[i]->Write();
+    else
+      printf("dNdEtaAnalysis::SaveHistograms: UNEXPECTED: fdNdEta[%d] is 0\n", i);
+
+    if (fdNdEtaPtCutOffCorrected[i])
+      fdNdEtaPtCutOffCorrected[i]->Write();
+    else
+      printf("dNdEtaAnalysis::SaveHistograms: UNEXPECTED: fdNdEtaPtCutOffCorrected[%d] is 0\n", i);
   }
+
+  gDirectory->cd("../");
 }
 
+void dNdEtaAnalysis::LoadHistograms()
+{
+  // loads the histograms from a directory with the name of this class (retrieved from TNamed)
 
+  gDirectory->cd(GetName());
 
-//____________________________________________________________________
-void
-dNdEtaAnalysis::SaveHistograms() {
+  fData = dynamic_cast<TH3F*> (gDirectory->Get(fData->GetName()));
+  fDataUncorrected = dynamic_cast<TH3F*> (gDirectory->Get(fDataUncorrected->GetName()));
+
+  fVtx = dynamic_cast<TH1D*> (gDirectory->Get(fVtx->GetName()));
 
-  gDirectory->mkdir(fName.Data());
-  gDirectory->cd(fName.Data());
-  
-  hEtaVsVtx  ->Write();
-  hVtx       ->Write();
-  hdNdEta    ->Write();
+  for (Int_t i=0; i<kVertexBinning; ++i)
+  {
+    fdNdEta[i] = dynamic_cast<TH1D*> (gDirectory->Get(fdNdEta[i]->GetName()));
+    fdNdEtaPtCutOffCorrected[i] = dynamic_cast<TH1D*> (gDirectory->Get(fdNdEtaPtCutOffCorrected[i]->GetName()));
+  }
+
+  fPtDist = dynamic_cast<TH1D*> (gDirectory->Get(fPtDist->GetName()));
 
   gDirectory->cd("../");
 }
@@ -127,22 +393,120 @@ dNdEtaAnalysis::SaveHistograms() {
 //____________________________________________________________________
 void dNdEtaAnalysis::DrawHistograms()
 {
+  // draws the histograms
+
   TCanvas* canvas = new TCanvas("dNdEtaAnalysis", "dNdEtaAnalysis", 800, 800);
   canvas->Divide(2, 2);
 
   canvas->cd(1);
-  if (hEtaVsVtx)
-    hEtaVsVtx->Draw("COLZ");
+  if (fData)
+    fData->Draw("COLZ");
+
+  /*canvas->cd(2);
+  if (fDataUncorrected)
+    fDataUncorrected->Draw("COLZ");*/
 
   canvas->cd(2);
-  if (hEtaVsVtxUncorrected)
-    hEtaVsVtxUncorrected->Draw("COLZ");
+  if (fVtx)
+    fVtx->Draw();
 
   canvas->cd(3);
-  if (hVtx)
-    hVtx->Draw();
+  if (fdNdEtaPtCutOffCorrected[0])
+    fdNdEtaPtCutOffCorrected[0]->Draw();
+
+  if (fdNdEta[0])
+  {
+    fdNdEta[0]->SetLineColor(kRed);
+    fdNdEta[0]->Draw("SAME");
+  }
 
   canvas->cd(4);
-  if (hdNdEta)
-    hdNdEta->Draw();
+  if (fPtDist)
+    fPtDist->Draw();
+
+    // histograms for different vertices?
+  if (kVertexBinning > 0)
+  {
+      // doesnt work, but i dont get it, giving up...
+    /*TCanvas* canvas2 =*/ new TCanvas("dNdEtaAnalysisVtx", "dNdEtaAnalysisVtx", 450, 450);
+    //Int_t yPads = (Int_t) TMath::Ceil(((Double_t) kVertexBinning - 1) / 2);
+    //printf("%d\n", yPads);
+    //canvas2->Divide(2, yPads);
+
+    TLegend* legend = new TLegend(0.7, 0.7, 0.9, 0.9);
+
+    for (Int_t i=0; i<kVertexBinning; ++i)
+    {
+      //canvas2->cd(i-1);
+      //printf("%d\n", i);
+      if (fdNdEtaPtCutOffCorrected[i])
+      {
+        fdNdEtaPtCutOffCorrected[i]->SetLineColor(i+1);
+        fdNdEtaPtCutOffCorrected[i]->Draw((i == 0) ? "" : "SAME");
+        legend->AddEntry(fdNdEtaPtCutOffCorrected[i], (i == 0) ? "Vtx All" : Form("Vtx Bin %d", i-1));
+      }
+    }
+
+    legend->Draw();
+  }
+}
+
+Long64_t dNdEtaAnalysis::Merge(TCollection* list)
+{
+  // Merges a list of dNdEtaAnalysis objects with this one.
+  // This is needed for PROOF.
+  // Returns the number of merged objects (including this)
+
+  if (!list)
+    return 0;
+
+  if (list->IsEmpty())
+    return 1;
+
+  TIterator* iter = list->MakeIterator();
+  TObject* obj;
+
+  // sub collections
+  const Int_t nCollections = 2 * kVertexBinning + 4; // 4 standalone hists, two arrays of size kVertexBinning
+  TList* collections[nCollections];
+  for (Int_t i=0; i<nCollections; ++i)
+    collections[i] = new TList;
+
+  Int_t count = 0;
+  while ((obj = iter->Next()))
+  {
+    dNdEtaAnalysis* entry = dynamic_cast<dNdEtaAnalysis*> (obj);
+    if (entry == 0)
+      continue;
+
+    collections[0]->Add(entry->fData);
+    if (fDataUncorrected)
+      collections[1]->Add(entry->fDataUncorrected);
+    collections[2]->Add(entry->fVtx);
+    collections[3]->Add(entry->fPtDist);
+
+    for (Int_t i=0; i<kVertexBinning; ++i)
+    {
+      collections[4+i]->Add(entry->fdNdEta[i]);
+      collections[4+kVertexBinning+i]->Add(entry->fdNdEtaPtCutOffCorrected[i]);
+    }
+
+    ++count;
+  }
+
+  fData->Merge(collections[0]);
+  if (fDataUncorrected)
+    fDataUncorrected->Merge(collections[1]);
+  fVtx->Merge(collections[2]);
+  fPtDist->Merge(collections[3]);
+  for (Int_t i=0; i<kVertexBinning; ++i)
+  {
+    fdNdEta[i]->Merge(collections[4+i]);
+    fdNdEta[i]->Merge(collections[4+kVertexBinning+i]);
+  }
+
+  for (Int_t i=0; i<nCollections; ++i)
+    delete collections[i];
+
+  return count+1;
 }