PWGHF/hfe/macros/configs/pPb/ConfigWeightFactors.C

   1 void ConfigWeightFactors(AliAnalysisTaskHFE *task, Bool_t syst = kFALSE, Int_t collType = 1, TString filename = "nonHFEcorrect.root"){
   2   //
   3   // Set weighting factors for nonHFE backgrounds
   4   // Option "collType": 0 for pp 2.76 TeV; 1 for pp 7 TeV; 2 for PbPb; 3 for DPMJET pPb; 4 for HIJING pPb; 5 for DPMJET/HIJING pPb
   5   //
   6   //Get the correction factors for Non-HF electron yields from a root-file
   7   Double_t elecBackGroundWeight[11][6][44][3];//centrality, species, momentum, background level
   8   for(Int_t iCent = 0; iCent < 11; iCent++){
   9     for(Int_t iSpecies = 0; iSpecies < 6; iSpecies++){
  10       for(Int_t iBin = 0; iBin < 44; iBin++){
  11         for(Int_t iError = 0; iError < 3; iError++){
  12           elecBackGroundWeight[iCent][iSpecies][iBin][iError] = 0;
  13         }
  14       }
  15     }
  16   }
  17   const Char_t *backNameMC[6] = {"pion","eta","omega","phi","etap","rho"};
  18   printf("Take the weights from %s\n",Form("$ALICE_ROOT/PWGHF/hfe/macros/configs/pPb/%s", filename.Data()));
  19   TFile *weightFile = TFile::Open(Form("$ALICE_ROOT/PWGHF/hfe/macros/configs/pPb/%s", filename.Data()));
  20   if(weightFile){
  21     if(syst){
  22       TH1F *hRelErr[2][2];//errors for pion yields, which form the correlated component of the relative error for all other decaying mesons, except for eta, which are parameterized independently
  23       if(collType == 1){
  24         hRelErr[0][0] = (TH1F*)weightFile->Get("hErrorspionLower");
  25         hRelErr[0][1] = (TH1F*)weightFile->Get("hErrorspionUpper");
  26         hRelErr[1][0] = (TH1F*)weightFile->Get("hErrorsetaLower");
  27         hRelErr[1][1] = (TH1F*)weightFile->Get("hErrorsetaUpper");
  28       }
  29       else if(collType == 0){
  30         hRelErr[0][0] = (TH1F*)weightFile->Get("hErrors_2.76TeV_pionLower");
  31         hRelErr[0][1] = (TH1F*)weightFile->Get("hErrors_2.76TeV_pionUpper");
  32         //hRelErr[1][0] = (TH1F*)weightFile->Get("hErrors_2.76TeV_etaLower");
  33         //hRelErr[1][1] = (TH1F*)weightFile->Get("hErrors_2.76TeV_etaUpper");
  34       }
  35       else if(collType == 3 || collType == 4 || collType == 5){
  36         hRelErr[0][0] = (TH1F*)weightFile->Get("hErrors_pPb_5.023TeV_pionLower");
  37         hRelErr[0][1] = (TH1F*)weightFile->Get("hErrors_pPb_5.023TeV_pionUpper");
  38         for(int i=0; i<hRelErr[0][0]->GetNbinsX(); i++){ //assign 7% systematic uncertainties for pPb
  39           hRelErr[0][0]->SetBinContent(i+1, -0.07);
  40           hRelErr[0][1]->SetBinContent(i+1, 0.07);
  41         }
  42       }
  43     }
  44     for(Int_t iCent = 0; iCent < 11; iCent++){//centrality bins
  45       for(Int_t iSpecies = 0; iSpecies < 6; iSpecies++){//species of decaying mesons
  46         TH1F *hRatio = 0x0;
  47         if(collType == 1){
  48           hRatio = (TH1F*)weightFile->Get(Form("hRatio%s",backNameMC[iSpecies]));
  49         }
  50         else if(collType == 0){
  51           hRatio = (TH1F*)weightFile->Get(Form("hRatio_2.76TeV_%s",backNameMC[iSpecies]));
  52         }
  53         else if(collType == 3){
  54           hRatio = (TH1F*)weightFile->Get(Form("hRatio_pPb_5.023TeV_DPMJET_%s",backNameMC[iSpecies]));
  55         }
  56         else if(collType == 4){
  57           hRatio = (TH1F*)weightFile->Get(Form("hRatio_pPb_5.023TeV_HIJING_%s",backNameMC[iSpecies]));
  58         }
  59         else if(collType == 5){
  60           hRatio = (TH1F*)weightFile->Get(Form("hRatio_pPb_5.023TeV_DvsH_%s",backNameMC[iSpecies]));
  61         }
  62         else{
  63           if((iCent == 1)||(iCent == 4)){
  64             hRatio = (TH1F*)weightFile->Get(Form("hRatio%s%d",backNameMC[iSpecies],iCent-1));
  65           }
  66           else if(iCent > 7){
  67             hRatio = (TH1F*)weightFile->Get(Form("hRatio%s7",backNameMC[iSpecies]));
  68           }
  69           else{
  70             hRatio = (TH1F*)weightFile->Get(Form("hRatio%s%d",backNameMC[iSpecies],iCent));
  71           }
  72         }
  73         for(Int_t iBin = 1; iBin < 45; iBin++){//momentum bin of mother meson
  74           if(iCent == 0){
  75             elecBackGroundWeight[iCent][iSpecies][iBin-1][0] = hRatio->GetBinContent(iBin);
  76             if(syst && (collType != 2)){
  77               for(Int_t iError = 0; iError < 2; iError++){//0: best estimate, 1,2: lower, upper uncertainty level
  78                 if((iSpecies == 1) && (collType == 1))
  79                   elecBackGroundWeight[iCent][iSpecies][iBin-1][iError+1]=elecBackGroundWeight[iCent][iSpecies][iBin-1][0]*(1+hRelErr[1][iError]->GetBinContent(iBin));
  80                 else
  81                   elecBackGroundWeight[iCent][iSpecies][iBin-1][iError+1]=elecBackGroundWeight[iCent][iSpecies][iBin-1][0]*(1+hRelErr[0][iError]->GetBinContent(iBin));//Addition of relative errors from histograms with "+", because lower errors are defined as negative numbers in the reference histograms!
  82               }
  83             }
  84           }
  85           else{
  86             if(collType == 2){
  87               elecBackGroundWeight[iCent][iSpecies][iBin-1][0] = hRatio->GetBinContent(iBin);
  88             }
  89           }
  90         }
  91       }
  92     }
  93     weightFile->Close();
  94   }
  95   else{
  96     printf("No reference file for background electron weighting found!\n");
  97   }
  98
  99   const Double_t binLimit[45] =  {0.1,0.112797,0.127231,0.143512,0.161877,0.182592,0.205957,0.232313,0.262041,0.295573,0.333397,0.37606,0.424183,0.478465,0.539692,0.608754,0.686654,0.774523,0.873636,0.985432,1.11153,1.25377,1.41421,1.59519,1.79932,2.02957,2.28928,2.58223,2.91267,3.2854,3.70582,4.18004,4.71494,5.3183,5.99886,6.76651,7.6324,8.60909,9.71076,10.9534,12.3551,13.9361,15.7195,17.731,20};//bin limits from the measured pi0 spectrum
 100
 101   for(Int_t iCent = 0; iCent < 11; iCent++){//centrality bins
 102     for(Int_t iBin = 1; iBin < 45; iBin++){//for all centralities, pt bins and all meson decays, set weighting factors for daughter electrons
 103       task->SetBinLimits(iBin-1,binLimit[iBin-1]);
 104       for(Int_t iSpecies = 0; iSpecies < 6; iSpecies++){
 105         for(Int_t iError = 0; iError < 3; iError++)
 106           task->SetElecBackGroundFactors(iBin-1, iSpecies, iCent, iError, elecBackGroundWeight[iCent][iSpecies][iBin-1][iError]);
 107       }
 108     }
 109   }
 110 }