prod/acrcaf/qa_pp/plot_macros/plotDeltaPhi.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 fHpos=  (TH2F*) l->FindObject("fDeltaPhiLeading");
  14
  15 TH1D* px;
  16 TH1D* py;
  17
  18 //pgood= fHpos->ProjectionY();
  19 //pgood->Draw();
  20
  21 TCanvas * c1 = new TCanvas("c1", "c1", 100, 100, 1020, 480);
  22 c1->Divide(2,1);
  23 // c1->cd(1);
  24 // fHpos->Draw("colz");
  25
  26
  27 c1->cd(1);
  28 px= fHpos->ProjectionX();
  29 px->Draw();
  30 px->SetTitle("");
  31
  32 c1->cd(2);
  33 py= fHpos->ProjectionY();
  34 py->Draw();
  35 py->SetMinimum(0);
  36 py->SetTitle("");
  37
  38 TCanvas * c2 = new TCanvas("c2", "c2", 100, 100, 620, 480);
  39 c2->cd();
  40 gPad->SetLeftMargin(0.13);
  41 fHpos->SetTitleOffset(1.2, "Y");
  42 fHpos->Draw("colz");
  43 fHpos->SetTitle("");
  44
  45
  46
  47 }