void
HistoCompare::PVCompute(TProfile * oldHisto , TProfile * newHisto , TText * te )
{
myoldProfile = oldHisto;
mynewProfile = newHisto;
myte = te;
Double_t *res ;
Double_t mypv = myoldProfile->Chi2Test(mynewProfile,"WW",res);
TString title = myoldProfile->GetName();
printRes(title, mypv, myte);
return;
}
void drawFracs(string mc_type = "MC", string dt_type="DT", string stp = "tp") {
setTDRStyle();
// The mode of operation can be overridden to compare only MC or only DT.
// The MC mode names are evaluated strictly; DT type can be anything. {
bool all_DT = false, all_MC = false;
if (mc_type!="MC" && mc_type!="HW")
all_DT = true;
if (dt_type=="MC" || dt_type=="HW")
all_MC = true;
assert(!(all_MC && all_DT));
// }
assert(stp=="tp" || stp=="");
bool tp = (stp=="tp");
string smethod = (tp ? "Tag-and-probe method" : "Direct match method");
const char *cmethod = smethod.c_str();
TDirectory *curdir = gDirectory;
setTDRStyle();
// Opening the requested files {
string dt_file = all_MC ? dt_type : "DATA";
dt_file = "output-" + dt_file + (_vspu ? "-1" : "-2b") + ".root";
TFile *fdt = new TFile(Form("%s%s",dt_path.c_str(),dt_file.c_str()),"READ");
assert(fdt && !fdt->IsZombie());
assert(fdt->cd("Standard"));
TDirectory *ddt = gDirectory;
cout << "Opened the data file: ";
cout << Form("%s%s",dt_path.c_str(),dt_file.c_str()) << endl;
string mc_file = all_DT ? "DATA" : mc_type;
mc_file = "output-" + mc_file + (_vspu ? "-1" : "-2b") + ".root";
TFile *fmc = new TFile(Form("%s%s",mc_path.c_str(),mc_file.c_str()),"READ");
assert(fmc && !fdt->IsZombie());
assert(fmc->cd("Standard"));
TDirectory *dmc = gDirectory;
cout << "Opened the mc file: ";
cout << Form("%s%s",mc_path.c_str(),mc_file.c_str()) << endl;
// }
vector<pair<double,double> > etas;
etas.push_back(make_pair<double, double>(0., 1.3));
//etas.push_back(make_pair<double, double>(0.0, 0.5));
//etas.push_back(make_pair<double, double>(0.5, 1.0));
//etas.push_back(make_pair<double, double>(1.0, 1.5));
//etas.push_back(make_pair<double, double>(1.5, 2.0));
//etas.push_back(make_pair<double, double>(2.0, 2.5));
//etas.push_back(make_pair<double, double>(2.5, 3.0));
//etas.push_back(make_pair<double, double>(3.0, 3.2));
//etas.push_back(make_pair<double, double>(3.2, 4.7));
//string fracs[] = {"betastar","chf", "beta", "nef", "nhf", "cef"}; bool dobeta=true;
string fracs[] = {"betastar","chf", "nef", "nhf", "cef"}; bool dobeta=false;
const int nfrac = sizeof(fracs)/sizeof(fracs[0]);
map<string, pair<int, int> > style;
style["betastar"] = make_pair<int, int>(kRed+2, kOpenCircle);
style["chf"] = make_pair<int, int>(dobeta ? kRed+1 : kRed,
dobeta ? kOpenDiamond : kFullCircle);
style["beta"] = make_pair<int, int>(kRed, kFullCircle);
//
style["nef"] = make_pair<int, int>(kBlue, kFullSquare);
style["nhf"] = make_pair<int, int>(kGreen+1, kFullDiamond);
style["cef"] = make_pair<int, int>(kCyan+1, kOpenTriangleUp);
style["muf"] = make_pair<int, int>(kMagenta+1, kOpenTriangleDown);
map<string, string> name;
name["betastar"] = "Charged pile-up";
name["chf"] = (dobeta ? "Charged unassoc." : "Charged hadrons");
name["beta"] = "Charged hadrons";
name["nef"] = "Photons";
name["nhf"] = "Neutral hadrons";
//name["cef"] = "Electrons";
name["muf"] = "Muons";
name["cef"] = "Electrons+muons";
// Wide binning for cleaner graphs and less jitter
const int neta = 6;
double xw[] =
//{1, 15, 18, 21, 24, 28, 32, 37, 43, 49, 56, 64, 74, 84,
//97, 114, 133, 153, 174, 196, 220, 245, 272, 300, 330, 362, 395, 430, 468,
//507, 548, 592, 638, 686, 737, 790, 846, 905, 967,
//1032, 1101, 1172, 1248, 1327, 1410, 1497, 1588, 1684, 1784, 1890, 2000};
//2116, 2238, 2366, 2500, 2640, 2787, 2941, 3103, 3273, 3450, 3637, 3832,
//4037, 4252, 4477, 4713, 4961, 5220, 5492, 5777, 6076, 6389, 6717, 7000};
{1, 15, 21, 28, 37, 49, 64, 84, 114, 153, 196, 245, 300, 395, 468, 548,
686, 846, 1032, 1248, 1588, 2000, 2500, 3103, 3450, 3637, 3832,
4037, 4252, 4477, 4713, 4961, 5220, 5492, 5777, 6076, 6389, 6717, 7000};
const int nbins = sizeof(xw)/sizeof(xw[0]);
for (unsigned int ieta = 0; ieta != etas.size(); ++ieta) {
double y1 = etas[ieta].first; double y2 = etas[ieta].second;
int iy = int(0.5*(y1+y2)/0.5); assert(iy<neta);
cout << "iy = " << iy << endl;
// List of differences
map<string, TH1D*> mdf;
// Build appropriate wide binning
vector<double> x;
if (_vspu) {
for (int i = 0; i < 24; ++i) {
x.push_back(0.5+2*i);
} // for i
} else {
for (int i = 0; i != nbins && xw[i]!=0; ++i) {
x.push_back(xw[i]);
} // for i
}
const int nx = x.size()-1;
THStack *hsdt = new THStack(Form("hsdt%d",ieta),"stacked histograms");
THStack *hsmc = new THStack(Form("hsmc%d",ieta),"stacked histograms");
THStack *hsdf = new THStack(Form("hsdf%d",ieta),"differences");
const double ptmin = 37;
const double ptmax = 3450;//3832;
const double pvmin = 0.5;
const double pvmax = 32.5;
TH1D *h = new TH1D("h",";p_{T} (GeV);PF energy fractions",nx,&x[0]);
if (_vspu) {
h->SetXTitle("N_{PV,good}");
h->GetXaxis()->SetRangeUser(pvmin,pvmax);
} else {
h->GetXaxis()->SetMoreLogLabels();
h->GetXaxis()->SetNoExponent();
h->GetXaxis()->SetRangeUser(ptmin,ptmax);
}
h->SetMaximum(1-1e-5);
h->SetMinimum(0+1e-5);
//TH1D *h2 = new TH1D("h2",";p_{T} (GeV);Data-MC (%)",nx,&x[0]);
TH1D *h2 = new TH1D("h2",Form(";p_{T} (GeV);%s-%s (%%)",dt_type.c_str(),mc_type.c_str()),nx,&x[0]);
if (_vspu) {
h2->SetXTitle("N_{PV,good}");
h2->GetXaxis()->SetRangeUser(pvmin,pvmax);
} else {
h2->GetXaxis()->SetMoreLogLabels();
h2->GetXaxis()->SetNoExponent();
h2->GetXaxis()->SetRangeUser(37,3832);
}
h2->SetMaximum(_vspu ? +6+10-1e-5 : +4-1e-5 +6);
h2->SetMinimum(_vspu ? -6+1e-5 : -4+1e-5 -6);
//lumi_13TeV = "2.1 fb^{-1}";
lumi_13TeV = plot_title.c_str();
TCanvas *c1 = tdrDiCanvas("c1",h,h2,4,0);
c1->cd(1);
TLegend *leg = tdrLeg(0.20,0.23-0.05,0.50,0.53-0.05);
for (int jfrac = 0; jfrac != nfrac; ++jfrac) {
string sf = fracs[jfrac];
const char *cf = fracs[jfrac].c_str();
const char *ctp = stp.c_str();
string spu = (_vspu ? "_vsnpv" : "");
const char *cpu = spu.c_str();
string spudt = (_vspu ? (all_MC ? "mc/" : "jt40/") : "");
const char *cpudt = spudt.c_str();
string spumc = (_vspu ? (all_DT ? "jt40/" : "mc/") : "");
const char *cpumc = spumc.c_str();
assert(ddt->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
const char *hname1 = Form("%sp%s%s%s",cpudt,cf,ctp,cpu);
TProfile *pdt = (TProfile*)gDirectory->Get(hname1);
if (!pdt) cout << hname1 << " not found in "
<< gDirectory->GetName() << endl << flush;
assert(pdt);
pdt->SetName(Form("%s_dt",pdt->GetName()));
assert(dmc->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
const char *hname2 = Form("%sp%s%s%s",cpumc,cf,ctp,cpu);
TProfile *pmc = (TProfile*)gDirectory->Get(hname2);
if (!pmc) cout << hname2 << " not found in "
<< gDirectory->GetName() << endl << flush;
assert(pmc);
pmc->SetName(Form("%s_mc",pmc->GetName()));
// Rebin histogram
TH1D *href = new TH1D("href","", nx, &x[0]);
//TH1D *hmc = (_vspu ? pmc->ProjectionX() : tools::Rebin(pmc, href));
//TH1D *hdt = (_vspu ? pdt->ProjectionX() : tools::Rebin(pdt, href));
TH1D *hmc = tools::Rebin(pmc, href);
TH1D *hdt = tools::Rebin(pdt, href);
// Scale data by response to MC-equivalent energy fractions
if (_shiftJES) {
for (int i = 1; i != hdt->GetNbinsX()+1; ++i) {
//double jec = 1.02;
double jec = jesShift(hdt->GetBinCenter(i));
hdt->SetBinContent(i, hdt->GetBinContent(i)/jec);
} // for i
} // _shiftJES
// For cef, add muf
if (sf=="cef") {
assert(ddt->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pdt2 = (TProfile*)gDirectory->Get(Form("%spmuf%s%s",
cpudt,ctp,cpu));
assert(pdt2);
//TH1D *hdt2 = (_vspu ? pdt2->ProjectionX() : tools::Rebin(pdt2, href));
TH1D *hdt2 = tools::Rebin(pdt2, href);
for (int i = 1; i != hdt2->GetNbinsX()+1; ++i) {
hdt->SetBinContent(i, hdt->GetBinContent(i)+hdt2->GetBinContent(i));
}
delete hdt2;
assert(dmc->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pmc2 = (TProfile*)gDirectory->Get(Form("%spmuf%s%s",
cpumc,ctp,cpu));
assert(pmc2);
//TH1D *hmc2 = (_vspu ? pmc2->ProjectionX() : tools::Rebin(pmc2, href));
TH1D *hmc2 = tools::Rebin(pmc2, href);
for (int i = 1; i != hmc2->GetNbinsX()+1; ++i) {
hmc->SetBinContent(i, hmc->GetBinContent(i)+hmc2->GetBinContent(i));
}
delete hmc2;
} // sf="cef"
// For betastar, multiply by chf
if (sf=="betastar") {
assert(ddt->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pdt2 = (TProfile*)gDirectory->Get(Form("%spchf%s%s",
cpudt,ctp,cpu));
assert(pdt2);
//TH1D *hdt2 = (_vspu ? pdt2->ProjectionX() : tools::Rebin(pdt2, href));
TH1D *hdt2 = tools::Rebin(pdt2, href);
for (int i = 1; i != hdt2->GetNbinsX()+1; ++i) {
hdt->SetBinContent(i, hdt->GetBinContent(i)*hdt2->GetBinContent(i));
}
delete hdt2;
assert(dmc->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pmc2 = (TProfile*)gDirectory->Get(Form("%spchf%s%s",
cpumc,ctp,cpu));
assert(pmc2);
//TH1D *hmc2 = (_vspu ? pmc2->ProjectionX() : tools::Rebin(pmc2, href));
TH1D *hmc2 = tools::Rebin(pmc2, href);
for (int i = 1; i != hmc2->GetNbinsX()+1; ++i) {
hmc->SetBinContent(i, hmc->GetBinContent(i)*hmc2->GetBinContent(i));
}
delete hmc2;
} // betastar -> chf * betastar
// For beta, multiply by chf
if (sf=="beta") {
assert(ddt->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pdt2 = (TProfile*)gDirectory->Get(Form("%spchf%s%s",
cpudt,ctp,cpu));
assert(pdt2);
//TH1D *hdt2 = (_vspu ? pdt2->ProjectionX() : tools::Rebin(pdt2, href));
TH1D *hdt2 = tools::Rebin(pdt2, href);
for (int i = 1; i != hdt2->GetNbinsX()+1; ++i) {
hdt->SetBinContent(i, hdt->GetBinContent(i)*hdt2->GetBinContent(i));
}
delete hdt2;
assert(dmc->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pmc2 = (TProfile*)gDirectory->Get(Form("%spchf%s%s",
cpumc,ctp,cpu));
assert(pmc2);
//TH1D *hmc2 = (_vspu ? pmc2->ProjectionX() : tools::Rebin(pmc2, href));
TH1D *hmc2 = tools::Rebin(pmc2, href);
for (int i = 1; i != hmc2->GetNbinsX()+1; ++i) {
hmc->SetBinContent(i, hmc->GetBinContent(i)*hmc2->GetBinContent(i));
}
delete hmc2;
} // beta -> chf * beta
// For chf, multiply by (1-beta-betastar)
if (sf=="chf") {
assert(ddt->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pdt2 = (TProfile*)gDirectory->Get(Form("%spbeta%s%s",
cpudt,ctp,cpu));
assert(pdt2);
//TH1D *hdt2 = (_vspu ? pdt2->ProjectionX() : tools::Rebin(pdt2, href));
TH1D *hdt2 = tools::Rebin(pdt2, href);
TProfile *pdt3 = (TProfile*)gDirectory->Get(Form("%spbetastar%s%s",
cpudt,ctp,cpu));
assert(pdt3);
//TH1D *hdt3 = (_vspu ? pdt3->ProjectionX() : tools::Rebin(pdt3, href));
TH1D *hdt3 = tools::Rebin(pdt3, href);
for (int i = 1; i != hdt2->GetNbinsX()+1; ++i) {
hdt->SetBinContent(i, hdt->GetBinContent(i)
* (1 - (dobeta ? hdt2->GetBinContent(i) : 0)
- hdt3->GetBinContent(i)));
}
delete hdt2;
delete hdt3;
assert(dmc->cd(Form("Eta_%1.1f-%1.1f",y1,y2)));
TProfile *pmc2 = (TProfile*)gDirectory->Get(Form("%spbeta%s%s",
cpumc,ctp,cpu));
assert(pmc2);
//TH1D *hmc2 = (_vspu ? pmc2->ProjectionX() : tools::Rebin(pmc2, href));
TH1D *hmc2 = tools::Rebin(pmc2, href);
TProfile *pmc3 = (TProfile*)gDirectory->Get(Form("%spbetastar%s%s",
cpumc,ctp,cpu));
assert(pmc3);
//TH1D *hmc3 = (_vspu ? pmc3->ProjectionX() : tools::Rebin(pmc3, href));
TH1D *hmc3 = tools::Rebin(pmc3, href);
for (int i = 1; i != hmc2->GetNbinsX()+1; ++i) {
hmc->SetBinContent(i, hmc->GetBinContent(i)
* (1 - (dobeta ? hmc2->GetBinContent(i) : 0)
- hmc3->GetBinContent(i)));
}
delete hmc2;
delete hmc3;
} // chf -> chf*(1-beta-betastar)
delete href;
hmc->SetMarkerStyle(kNone);
hmc->SetFillStyle(1001);
hmc->SetFillColor(style[cf].first - 7);
hmc->SetLineColor(style[cf].first + 1);
hmc->GetXaxis()->SetRangeUser(_vspu ? pvmin : ptmin, _vspu ? pvmin : ptmax);
hsmc->Add(hmc, "SAME H");
hdt->SetFillStyle(1001); // for legend
hdt->SetFillColor(style[cf].first - 7); // for legend
hdt->SetLineColor(style[cf].first + 1);
hdt->SetMarkerStyle(style[cf].second);
hdt->SetMarkerSize(sf=="nhf"||(sf=="chf"&&dobeta) ? 1.3 : 1.0);
if (!_vspu)
hdt->GetXaxis()->SetRangeUser(_vspu ? pvmin : ptmin, _vspu ? pvmin : ptmax);
hsdt->Add(hdt, "SAME P");
// Then, do the difference
TH1D *hdf = (TH1D*)hdt->Clone(Form("hdf%d",ieta));
hdf->Add(hdt, hmc, 100, -100);
hdf->SetLineColor(style[cf].first + 1);
hdf->SetMarkerColor(style[cf].first + 1);
hdf->SetMarkerStyle(style[cf].second);
hdf->SetLineWidth(ieta==0 ? 2 : 0);
hdf->SetMarkerSize(ieta==0 ? (sf=="nhf"||(sf=="chf"&&dobeta) ? 1.8 : 1.3) : 0.7);
hsdf->Add(hdf, "SAME P");
c1->cd(2);
if (jfrac==0) {
TLine *l = new TLine();
l->DrawLine(_vspu ? pvmin : ptmin, 0, _vspu ? pvmax : ptmax, 0);
TLatex *tex = new TLatex();
tex->SetNDC();
tex->SetTextSize(h2->GetYaxis()->GetLabelSize());
tex->DrawLatex(0.17,0.80,Form("Anti-k_{T} R=0.4%s",
_shiftJES ? ", shifted by JES" : ""));
}
hdf->Draw("SAME");
leg->AddEntry(hdt,name[cf].c_str(),"PF");
mdf[sf] = hdf;
} // for jfrac
c1->cd(1);
if (!_vspu) gPad->SetLogx();
hsmc->Draw("SAME");
hsdt->Draw("SAME");
leg->Draw("SAME"); // redraw
gPad->RedrawAxis();
c1->cd(2);
if (!_vspu) gPad->SetLogx();
//hsdf->Draw("SAME");
gPad->RedrawAxis();
c1->SaveAs(Form("pdf/drawFracs_%1.1f-%1.1f%s%s.pdf",
y1, y2, _shiftJES ? "_shiftJES" : "",
_vspu ? "_vsNPV" : ""));
// Estimate jet response slope by analyzing composition
TLatex *tex = new TLatex();
tex->SetNDC(); tex->SetTextSize(h2->GetYaxis()->GetLabelSize()*0.7);
if (dobeta) {
//TF1 *fchf = new TF1("fchf","[0]+[1]*pow(x,[2])",40,2000);//ptmin,ptmax);
//fchf->SetParameters(0,-2, -0.05);
TF1 *fchf = new TF1("fchf",jesFit,40,3000,2);
fchf->SetParameters( 0.9881-1, 0.2440 ); // Fall15_25nsV2
//mdf["beta"]->Fit(fchf,"QRN");
TH1D *hchfa = (TH1D*)mdf["beta"]->Clone("hcfha");
hchfa->Add(mdf["chf"]);
hchfa->Add(mdf["betastar"]);
hchfa->Fit(fchf,"QRN");
fchf->SetLineColor(kRed+3);
fchf->Draw("SAME");
hchfa->SetMarkerStyle(kFullStar);
hchfa->SetMarkerColor(kRed+3);
hchfa->SetLineColor(kRed+3);
hchfa->Draw("SAMEP");
}
else {
//TF1 *fchf = new TF1("fchf","[0]+[1]*pow(x,[2])",40,2000);//ptmin,ptmax);
//fchf->SetParameters(0,-2, -0.05);
TF1 *fchf = new TF1("fchf",jesFit,40,3000,2);
fchf->SetParameters( 0.9881-1, 0.2440 ); // Fall15_25nsV2
mdf["chf"]->Fit(fchf,"QRN");
fchf->SetLineColor(kRed+2);
fchf->Draw("SAME");
tex->SetTextColor(kRed);
tex->DrawLatex(0.17,0.40,Form("%1.2f#pm%1.2f%%, #chi^2/NDF=%1.1f/%d",
fchf->GetParameter(0), fchf->GetParError(0),
fchf->GetChisquare(), fchf->GetNDF()));
}
//TF1 *fnhf = new TF1("fnhf","[0]+[1]*pow(x,[2])",40,2000);//ptmin,ptmax);
//fnhf->SetParameters(0,-2, -0.05);
TF1 *fnhf = new TF1("fnhf",jesFit,40,3000,2);
fnhf->SetParameters( 0.9881-1, 0.2440 ); // Fall15_25nsV2
mdf["nhf"]->Fit(fnhf,"QRN");
fnhf->SetLineColor(kGreen+2);
fnhf->Draw("SAME");
//TF1 *fnef = new TF1("fnef","[0]+[1]*pow(x,[2])",40,2000);//ptmin,ptmax);
//fnef->SetParameters(0,-2, -0.05);
TF1 *fnef = new TF1("fnef",jesFit,40,3000,2);
fnef->SetParameters( 0.9881-1, 0.2440 ); // Fall15_25nsV2
mdf["nef"]->Fit(fnef,"QRN");
fnef->SetLineColor(kBlue+1);
fnef->Draw("SAME");
//TH1D *hall = (TH1D*)hchfa->Clone("hall");
TH1D *hall = (TH1D*)mdf["chf"]->Clone("hall");
if (dobeta) hall->Add(mdf["beta"]);
hall->Add(mdf["betastar"]);
hall->Add(mdf["nef"]);
hall->Add(mdf["nhf"]);
hall->Add(mdf["cef"]);
hall->SetMarkerStyle(kFullCross);
hall->SetMarkerColor(kBlack);
//hall->Draw("SAMEL");
h2->SetMaximum(+5);//+3.0);
h2->SetMinimum(-5);//-1.5);
if (ieta==0) c1->SaveAs(Form("pdf/drawFracs_WithFit%s%s.pdf",
_shiftJES ? "_shiftJES" : "",
_vspu ? "_vsNPV" : ""));
}
// For ieta
} // drawFracs
