12 void Background_width2() {
14 const Int_t nbins = 4096;
17 Double_t source[nbins];
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);
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");
30 back->SetTitle(
"Influence of clipping window width on the estimated background");
31 back->SetAxisRange(0,1000);
32 back->SetMaximum(7000);
35 TSpectrum *s =
new TSpectrum();
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);
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);
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);
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);