13 const Int_t nbins = 1024;
15 Double_t xmax = nbins;
16 Double_t source[nbins];
19 TString dir = gROOT->GetTutorialDir();
20 TString file = dir+
"/spectrum/TSpectrum.root";
21 TFile *f =
new TFile(file.Data());
22 TH1F *h = (TH1F*) f->Get(
"back1");
23 h->SetTitle(
"Smoothed spectrum for m=3");
25 for (i = 0; i < nbins; i++) source[i]=h->GetBinContent(i + 1);
26 h->SetAxisRange(1,1024);
29 TSpectrum *s =
new TSpectrum();
31 TH1F *smooth =
new TH1F(
"smooth",
"smooth",nbins,0.,nbins);
32 smooth->SetLineColor(kRed);
34 s->SmoothMarkov(source,1024,3);
35 for (i = 0; i < nbins; i++) smooth->SetBinContent(i + 1,source[i]);
36 smooth->Draw(
"L SAME");