Logo ROOT   6.30.04
Reference Guide
 All Namespaces Files Pages
Background_width2.C
Go to the documentation of this file.
1 /// \file
2 /// \ingroup tutorial_spectrum
3 /// \notebook
4 /// Example to illustrate the influence of the clipping window width on the
5 /// estimated background.
6 ///
7 /// \macro_image
8 /// \macro_code
9 ///
10 /// \authors Miroslav Morhac, Olivier Couet
11 
12 void Background_width2() {
13  Int_t i;
14  const Int_t nbins = 4096;
15  Double_t xmin = 0;
16  Double_t xmax = 4096;
17  Double_t source[nbins];
18  gROOT->ForceStyle();
19 
20  TH1F *d1 = new TH1F("d1","",nbins,xmin,xmax);
21  TH1F *d2 = new TH1F("d2","",nbins,xmin,xmax);
22  TH1F *d3 = new TH1F("d3","",nbins,xmin,xmax);
23  TH1F *d4 = new TH1F("d4","",nbins,xmin,xmax);
24 
25  TString dir = gROOT->GetTutorialDir();
26  TString file = dir+"/spectrum/TSpectrum.root";
27  TFile *f = new TFile(file.Data());
28  TH1F *back = (TH1F*) f->Get("back2");
29 
30  back->SetTitle("Influence of clipping window width on the estimated background");
31  back->SetAxisRange(0,1000);
32  back->SetMaximum(7000);
33  back->Draw("L");
34 
35  TSpectrum *s = new TSpectrum();
36 
37  for (i = 0; i < nbins; i++) source[i]=back->GetBinContent(i + 1);
38  s->Background(source,nbins,10,TSpectrum::kBackDecreasingWindow,
39  TSpectrum::kBackOrder2,kFALSE,
40  TSpectrum::kBackSmoothing3,kFALSE);
41  for (i = 0; i < nbins; i++) d1->SetBinContent(i + 1,source[i]);
42  d1->SetLineColor(kRed);
43  d1->Draw("SAME L");
44 
45  for (i = 0; i < nbins; i++) source[i]=back->GetBinContent(i + 1);
46  s->Background(source,nbins,20,TSpectrum::kBackDecreasingWindow,
47  TSpectrum::kBackOrder2,kFALSE,
48  TSpectrum::kBackSmoothing3,kFALSE);
49  for (i = 0; i < nbins; i++) d2->SetBinContent(i + 1,source[i]);
50  d2->SetLineColor(kBlue);
51  d2->Draw("SAME L");
52 
53  for (i = 0; i < nbins; i++) source[i]=back->GetBinContent(i + 1);
54  s->Background(source,nbins,30,TSpectrum::kBackDecreasingWindow,
55  TSpectrum::kBackOrder2,kFALSE,
56  TSpectrum::kBackSmoothing3,kFALSE);
57  for (i = 0; i < nbins; i++) d3->SetBinContent(i + 1,source[i]);
58  d3->SetLineColor(kGreen);
59  d3->Draw("SAME L");
60 
61  for (i = 0; i < nbins; i++) source[i]=back->GetBinContent(i + 1);
62  s->Background(source,nbins,40,TSpectrum::kBackDecreasingWindow,
63  TSpectrum::kBackOrder2,kFALSE,
64  TSpectrum::kBackSmoothing3,kFALSE);
65  for (i = 0; i < nbins; i++) d4->SetBinContent(i + 1,source[i]);
66  d4->SetLineColor(kMagenta);
67  d4->Draw("SAME L");
68 }