Logo ROOT  
Reference Guide
 
Loading...
Searching...
No Matches
hlquantiles.C
Go to the documentation of this file.
1/// \file
2/// \ingroup tutorial_math
3/// Demo for quantiles (with highlight mode)
4///
5/// \macro_image
6/// \macro_code
7///
8/// \authors Rene Brun, Eddy Offermann, Jan Musinsky
9
10TList *lq = 0;
11TGraph *gr = 0;
12
13void hlquantiles() {
14 const Int_t nq = 100;
15 const Int_t nshots = 10;
16 Double_t xq[nq]; // position where to compute the quantiles in [0,1]
17 Double_t yq[nq]; // array to contain the quantiles
18 for (Int_t i=0;i<nq;i++) xq[i] = Float_t(i+1)/nq;
19
20 TGraph *gr70 = new TGraph(nshots);
21 TGraph *gr90 = new TGraph(nshots);
22 TGraph *gr98 = new TGraph(nshots);
23 TGraph *grq[nq];
24 for (Int_t ig = 0; ig < nq; ig++) grq[ig] = new TGraph(nshots);
25 TH1F *h = new TH1F("h","demo quantiles",50,-3,3);
26
27 for (Int_t shot=0;shot<nshots;shot++) {
28 h->FillRandom("gaus",50);
29 h->GetQuantiles(nq,yq,xq);
30 gr70->SetPoint(shot,shot+1,yq[70]);
31 gr90->SetPoint(shot,shot+1,yq[90]);
32 gr98->SetPoint(shot,shot+1,yq[98]);
33 for (Int_t ig = 0; ig < nq; ig++)
34 grq[ig]->SetPoint(shot,shot+1,yq[ig]);
35 }
36
37 //show the original histogram in the top pad
38 TCanvas *c1 = new TCanvas("c1","demo quantiles",10,10,600,900);
39 c1->SetFillColor(41);
40 c1->Divide(1,3);
41 c1->cd(1);
42 h->SetFillColor(38);
43 h->Draw();
44
45 // show the final quantiles in the middle pad
46 c1->cd(2);
47 gPad->SetFrameFillColor(33);
48 gPad->SetGrid();
49 gr = new TGraph(nq,xq,yq);
50 gr->SetTitle("final quantiles");
51 gr->SetMarkerStyle(21);
53 gr->SetMarkerSize(0.3);
54 gr->Draw("ap");
55
56 // prepare quantiles
57 lq = new TList();
58 for (Int_t ig = 0; ig < nq; ig++) {
59 grq[ig]->SetMinimum(gr->GetYaxis()->GetXmin());
60 grq[ig]->SetMaximum(gr->GetYaxis()->GetXmax());
61 grq[ig]->SetMarkerStyle(23);
62 grq[ig]->SetMarkerColor(ig%100);
63 grq[ig]->SetTitle(TString::Format("q%02d", ig));
64 lq->Add(grq[ig]);
65 }
66
67 TText *info = new TText(0.1, 2.4, "please move the mouse over the graph");
68 info->SetTextSize(0.08);
70 info->SetBit(kCannotPick);
71 info->Draw();
72
74 c1->HighlightConnect("HighlightQuantile(TVirtualPad*,TObject*,Int_t,Int_t)");
75
76 // show the evolution of some quantiles in the bottom pad
77 c1->cd(3);
78 gPad->SetFrameFillColor(17);
79 gPad->DrawFrame(0,0,nshots+1,3.2);
80 gPad->SetGrid();
81 gr98->SetMarkerStyle(22);
82 gr98->SetMarkerColor(kRed);
83 gr98->Draw("lp");
84 gr90->SetMarkerStyle(21);
85 gr90->SetMarkerColor(kBlue);
86 gr90->Draw("lp");
87 gr70->SetMarkerStyle(20);
89 gr70->Draw("lp");
90 // add a legend
91 TLegend *legend = new TLegend(0.85,0.74,0.95,0.95);
92 legend->SetTextFont(72);
93 legend->SetTextSize(0.05);
94 legend->AddEntry(gr98," q98","lp");
95 legend->AddEntry(gr90," q90","lp");
96 legend->AddEntry(gr70," q70","lp");
97 legend->Draw();
98}
99
100void HighlightQuantile(TVirtualPad *pad, TObject *obj, Int_t ihp, Int_t y)
101{
102 // show the evolution of all quantiles in the bottom pad
103 if (obj != gr) return;
104 if (ihp == -1) return;
105
106 TVirtualPad *savepad = gPad;
107 pad->GetCanvas()->cd(3);
108 lq->At(ihp)->Draw("alp");
109 gPad->Update();
110 savepad->cd();
111}
#define h(i)
Definition RSha256.hxx:106
int Int_t
Definition RtypesCore.h:45
double Double_t
Definition RtypesCore.h:59
float Float_t
Definition RtypesCore.h:57
@ kRed
Definition Rtypes.h:66
@ kMagenta
Definition Rtypes.h:66
@ kBlue
Definition Rtypes.h:66
int * lq
@ kCannotPick
Definition TObject.h:359
#define gPad
virtual void SetMarkerColor(Color_t mcolor=1)
Set the marker color.
Definition TAttMarker.h:38
virtual Color_t GetMarkerColor() const
Return the marker color.
Definition TAttMarker.h:31
virtual void SetMarkerStyle(Style_t mstyle=1)
Set the marker style.
Definition TAttMarker.h:40
virtual void SetMarkerSize(Size_t msize=1)
Set the marker size.
Definition TAttMarker.h:41
virtual void SetTextColor(Color_t tcolor=1)
Set the text color.
Definition TAttText.h:43
virtual void SetTextFont(Font_t tfont=62)
Set the text font.
Definition TAttText.h:45
virtual void SetTextSize(Float_t tsize=1)
Set the text size.
Definition TAttText.h:46
Double_t GetXmax() const
Definition TAxis.h:134
Double_t GetXmin() const
Definition TAxis.h:133
The Canvas class.
Definition TCanvas.h:23
TVirtualPad * cd(Int_t subpadnumber=0) override
Set current canvas & pad.
Definition TCanvas.cxx:708
A TGraph is an object made of two arrays X and Y with npoints each.
Definition TGraph.h:41
virtual void SetPoint(Int_t i, Double_t x, Double_t y)
Set x and y values for point number i.
Definition TGraph.cxx:2284
virtual void SetMaximum(Double_t maximum=-1111)
Set the maximum of the graph.
Definition TGraph.cxx:2266
virtual void SetTitle(const char *title="")
Change (i.e.
Definition TGraph.cxx:2339
virtual void Draw(Option_t *chopt="")
Draw this graph with its current attributes.
Definition TGraph.cxx:769
virtual void SetHighlight(Bool_t set=kTRUE)
Set highlight (enable/disble) mode for the graph by default highlight mode is disable.
Definition TGraph.cxx:2253
TAxis * GetYaxis() const
Get y axis of the graph.
Definition TGraph.cxx:1650
virtual void SetMinimum(Double_t minimum=-1111)
Set the minimum of the graph.
Definition TGraph.cxx:2275
1-D histogram with a float per channel (see TH1 documentation)}
Definition TH1.h:575
This class displays a legend box (TPaveText) containing several legend entries.
Definition TLegend.h:23
TLegendEntry * AddEntry(const TObject *obj, const char *label="", Option_t *option="lpf")
Add a new entry to this legend.
Definition TLegend.cxx:330
virtual void Draw(Option_t *option="")
Draw this legend with its current attributes.
Definition TLegend.cxx:423
A doubly linked list.
Definition TList.h:44
Mother of all ROOT objects.
Definition TObject.h:37
void SetBit(UInt_t f, Bool_t set)
Set or unset the user status bits as specified in f.
Definition TObject.cxx:696
virtual void Draw(Option_t *option="")
Default Draw method for all objects.
Definition TObject.cxx:197
static TString Format(const char *fmt,...)
Static method which formats a string using a printf style format descriptor and return a TString.
Definition TString.cxx:2331
Base class for several text objects.
Definition TText.h:22
TVirtualPad is an abstract base class for the Pad and Canvas classes.
Definition TVirtualPad.h:51
virtual TVirtualPad * cd(Int_t subpadnumber=0)=0
virtual TCanvas * GetCanvas() const =0
return c1
Definition legend1.C:41
Double_t y[n]
Definition legend1.C:17
TGraphErrors * gr
Definition legend1.C:25