prod/acrcaf/qa_pp/plot_macros/plotEtaPtVz.C

   1 {
   2 gROOT->SetStyle("Plain");
   3 gStyle->SetOptStat(0);
   4 gStyle->SetPalette(1);
   5
   6 //open files and get lists
   7 TList *l;
   8 TFile f0("QAsym.proof.root");
   9 l = (TList *)f0.Get("QAsymHists");
  10
  11
  12 TH2F* fHpos;
  13 TH2F* fHpneg;
  14
  15 fHpos=  (TH2F*) l->FindObject("fRecEtaPtPosVz");
  16 fHneg=  (TH2F*) l->FindObject("fRecEtaPtNegVz");
  17
  18
  19
  20
  21
  22
  23 TCanvas * dca = new TCanvas("pt", "pt", 100, 100, 1020, 520);
  24 dca->Divide(2,1);
  25 dca->cd(1);
  26 gPad->SetRightMargin(0.15);
  27 fHpos->Draw("colz");
  28 fHpos->SetTitle("positive tracks");
  29 fHpos->SetYTitle("esdtrack->Zv()");
  30 fHpos->SetXTitle("#eta/p_{T}");
  31
  32
  33 dca->cd(2);
  34 gPad->SetRightMargin(0.15);
  35 fHneg->Draw("colz");
  36 fHneg->SetMaximum(fHpos->GetMaximum());
  37 fHneg->SetTitle("negative tracks");
  38 fHneg->SetYTitle("esdtrack->Zv()");
  39 fHneg->SetXTitle("#eta/p_{T}");
  40
  41
  42
  43 }
  44
  45
  46
  47 }