Logo ROOT  

Reference Guide
 
Loading...
Searching...
No Matches
FitAwmi.C File Reference
Tutorials » Spectrum tutorials

Detailed Description

View in nbviewer Open in SWAN
This macro fits the source spectrum using the AWMI algorithm from the "TSpectrumFit" class ("TSpectrum" class is used to find peaks).

To try this macro, in a ROOT (5 or 6) prompt, do:

root > .x FitAwmi.C

or:

root > .x FitAwmi.C++
root > FitAwmi(); // re-run with another random set of peaks
created -9.7 39.8942 10
created -9.1 31.9154 8
created -8.5 39.8942 10
created -7.9 15.9577 4
created -7.3 11.9683 3
created -6.7 31.9154 8
created -6.1 35.9048 9
created -5.5 27.926 7
created -4.9 31.9154 8
created -4.3 35.9048 9
created -3.7 11.9683 3
created -3.1 27.926 7
created -2.5 19.9471 5
created -1.9 7.97885 2
created -1.3 15.9577 4
created -0.7 23.9365 6
created -0.1 31.9154 8
created 0.5 35.9048 9
created 1.1 23.9365 6
created 1.7 35.9048 9
created 2.3 15.9577 4
created 2.9 31.9154 8
created 3.5 27.926 7
created 4.1 35.9048 9
created 4.7 27.926 7
created 5.3 23.9365 6
created 5.9 35.9048 9
created 6.5 3.98942 1
created 7.1 35.9048 9
created 7.7 15.9577 4
created 8.3 15.9577 4
created 8.9 7.97885 2
created 9.5 7.97885 2
the total number of created peaks = 33 with sigma = 0.1
the total number of found peaks = 33 with sigma = 0.100002 (+-2.1185e-05)
fit chi^2 = 1.462e-06
found -9.7 (+-0.000167866) 39.8939 (+-0.065997) 10.0001 (+-0.000541604)
found -8.5 (+-0.00016773) 39.8941 (+-0.0659961) 10.0002 (+-0.000541596)
found -6.1 (+-0.000177262) 35.9049 (+-0.0626292) 9.00019 (+-0.000513966)
found -4.3 (+-0.000176783) 35.9047 (+-0.0626089) 9.00014 (+-0.000513799)
found 0.5 (+-0.000177163) 35.9048 (+-0.0626249) 9.00018 (+-0.00051393)
found 1.7 (+-0.000176742) 35.9046 (+-0.0626065) 9.00013 (+-0.00051378)
found 4.1 (+-0.000177172) 35.9048 (+-0.0626252) 9.00018 (+-0.000513933)
found 5.9 (+-0.000176172) 35.9045 (+-0.062584) 9.00009 (+-0.000513595)
found 7.1 (+-0.000175942) 35.9044 (+-0.062574) 9.00006 (+-0.000513513)
found -9.1 (+-0.000188643) 31.9158 (+-0.0590727) 8.00026 (+-0.000484779)
found -6.7 (+-0.000187747) 31.9154 (+-0.0590377) 8.00015 (+-0.000484492)
found -4.9 (+-0.000188279) 31.9156 (+-0.0590579) 8.00021 (+-0.000484658)
found -0.0999992 (+-0.000188169) 31.9155 (+-0.0590536) 8.00019 (+-0.000484623)
found 2.9 (+-0.000187718) 31.9153 (+-0.059036) 8.00014 (+-0.000484478)
found -5.5 (+-0.000201614) 27.9263 (+-0.0552555) 7.00022 (+-0.000453454)
found 4.7 (+-0.000201379) 27.9262 (+-0.0552473) 7.00019 (+-0.000453386)
found -3.1 (+-0.000200433) 27.9258 (+-0.0552147) 7.0001 (+-0.000453119)
found 3.5 (+-0.000201614) 27.9263 (+-0.0552555) 7.00022 (+-0.000453454)
found 1.1 (+-0.000218188) 23.937 (+-0.0511696) 6.00023 (+-0.000419923)
found -0.699999 (+-0.000217348) 23.9367 (+-0.0511442) 6.00015 (+-0.000419715)
found 5.3 (+-0.000217941) 23.9369 (+-0.051162) 6.00021 (+-0.000419861)
found -2.5 (+-0.000237755) 19.9472 (+-0.0466803) 5.00012 (+-0.000383081)
found -7.9 (+-0.000267147) 15.9581 (+-0.0417792) 4.00017 (+-0.000342861)
found 2.3 (+-0.000268152) 15.9583 (+-0.0417995) 4.00022 (+-0.000343027)
found 7.7 (+-0.000267293) 15.9581 (+-0.0417818) 4.00017 (+-0.000342882)
found -1.3 (+-0.000266083) 15.9578 (+-0.0417572) 4.0001 (+-0.00034268)
found 8.3 (+-0.000265614) 15.9577 (+-0.0417475) 4.00008 (+-0.000342601)
found -3.7 (+-0.000310396) 11.9689 (+-0.0362118) 3.00021 (+-0.000297172)
found -7.3 (+-0.000309317) 11.9687 (+-0.0361946) 3.00016 (+-0.000297031)
found -1.9 (+-0.000379444) 7.97916 (+-0.0295591) 2.00012 (+-0.000242576)
found 8.9 (+-0.000377775) 7.979 (+-0.0295416) 2.00008 (+-0.000242433)
found 9.5 (+-0.000372895) 7.97889 (+-0.0294984) 2.00005 (+-0.000242078)
found 6.5 (+-0.000546918) 3.99028 (+-0.0209608) 1.00023 (+-0.000172015)
#include "TROOT.h"
#include "TMath.h"
#include "TRandom.h"
#include "TH1.h"
#include "TF1.h"
#include "TCanvas.h"
#include "TSpectrum.h"
#include "TSpectrumFit.h"
#include "TPolyMarker.h"
#include "TList.h"
#include <iostream>
TH1F *FitAwmi_Create_Spectrum(void) {
Int_t nbins = 1000;
Double_t xmin = -10., xmax = 10.;
delete gROOT->FindObject("h"); // prevent "memory leak"
TH1F *h = new TH1F("h", "simulated spectrum", nbins, xmin, xmax);
h->SetStats(kFALSE);
TF1 f("f", "TMath::Gaus(x, [0], [1], 1)", xmin, xmax);
// f.SetParNames("mean", "sigma");
gRandom->SetSeed(0); // make it really random
// create well separated peaks with exactly known means and areas
// note: TSpectrumFit assumes that all peaks have the same sigma
Double_t sigma = (xmax - xmin) / Double_t(nbins) * Int_t(gRandom->Uniform(2., 6.));
Int_t npeaks = 0;
while (xmax > (xmin + 6. * sigma)) {
npeaks++;
xmin += 3. * sigma; // "mean"
f.SetParameters(xmin, sigma);
Double_t area = 1. * Int_t(gRandom->Uniform(1., 11.));
h->Add(&f, area, ""); // "" ... or ... "I"
std::cout << "created "
<< xmin << " "
<< (area / sigma / TMath::Sqrt(TMath::TwoPi())) << " "
<< area << std::endl;
xmin += 3. * sigma;
}
std::cout << "the total number of created peaks = " << npeaks
<< " with sigma = " << sigma << std::endl;
return h;
}
void FitAwmi(void) {
TH1F *h = FitAwmi_Create_Spectrum();
TCanvas *cFit = ((TCanvas *)(gROOT->GetListOfCanvases()->FindObject("cFit")));
if (!cFit) cFit = new TCanvas("cFit", "cFit", 10, 10, 1000, 700);
else cFit->Clear();
h->Draw("L");
Int_t i, nfound, bin;
Int_t nbins = h->GetNbinsX();
Double_t *source = new Double_t[nbins];
Double_t *dest = new Double_t[nbins];
for (i = 0; i < nbins; i++) source[i] = h->GetBinContent(i + 1);
TSpectrum *s = new TSpectrum(); // note: default maxpositions = 100
// searching for candidate peaks positions
nfound = s->SearchHighRes(source, dest, nbins, 2., 2., kFALSE, 10000, kFALSE, 0);
// filling in the initial estimates of the input parameters
Bool_t *FixPos = new Bool_t[nfound];
Bool_t *FixAmp = new Bool_t[nfound];
for(i = 0; i < nfound; i++) FixAmp[i] = FixPos[i] = kFALSE;
Double_t *Pos, *Amp = new Double_t[nfound]; // ROOT 6
Pos = s->GetPositionX(); // 0 ... (nbins - 1)
for (i = 0; i < nfound; i++) {
bin = 1 + Int_t(Pos[i] + 0.5); // the "nearest" bin
Amp[i] = h->GetBinContent(bin);
}
TSpectrumFit *pfit = new TSpectrumFit(nfound);
pfit->SetFitParameters(0, (nbins - 1), 1000, 0.1, pfit->kFitOptimChiCounts,
pfit->kFitAlphaHalving, pfit->kFitPower2,
pfit->kFitTaylorOrderFirst);
pfit->SetPeakParameters(2., kFALSE, Pos, FixPos, Amp, FixAmp);
// pfit->SetBackgroundParameters(source[0], kFALSE, 0., kFALSE, 0., kFALSE);
pfit->FitAwmi(source);
Double_t *Positions = pfit->GetPositions();
Double_t *PositionsErrors = pfit->GetPositionsErrors();
Double_t *Amplitudes = pfit->GetAmplitudes();
Double_t *AmplitudesErrors = pfit->GetAmplitudesErrors();
Double_t *Areas = pfit->GetAreas();
Double_t *AreasErrors = pfit->GetAreasErrors();
delete gROOT->FindObject("d"); // prevent "memory leak"
TH1F *d = new TH1F(*h); d->SetNameTitle("d", ""); d->Reset("M");
for (i = 0; i < nbins; i++) d->SetBinContent(i + 1, source[i]);
Double_t x1 = d->GetBinCenter(1), dx = d->GetBinWidth(1);
Double_t sigma, sigmaErr;
pfit->GetSigma(sigma, sigmaErr);
// current TSpectrumFit needs a sqrt(2) correction factor for sigma
sigma /= TMath::Sqrt2(); sigmaErr /= TMath::Sqrt2();
// convert "bin numbers" into "x-axis values"
sigma *= dx; sigmaErr *= dx;
std::cout << "the total number of found peaks = " << nfound
<< " with sigma = " << sigma << " (+-" << sigmaErr << ")"
<< std::endl;
std::cout << "fit chi^2 = " << pfit->GetChi() << std::endl;
for (i = 0; i < nfound; i++) {
bin = 1 + Int_t(Positions[i] + 0.5); // the "nearest" bin
Pos[i] = d->GetBinCenter(bin);
Amp[i] = d->GetBinContent(bin);
// convert "bin numbers" into "x-axis values"
Positions[i] = x1 + Positions[i] * dx;
PositionsErrors[i] *= dx;
Areas[i] *= dx;
AreasErrors[i] *= dx;
std::cout << "found "
<< Positions[i] << " (+-" << PositionsErrors[i] << ") "
<< Amplitudes[i] << " (+-" << AmplitudesErrors[i] << ") "
<< Areas[i] << " (+-" << AreasErrors[i] << ")"
<< std::endl;
}
d->SetLineColor(kRed); d->SetLineWidth(1);
d->Draw("SAME L");
TPolyMarker *pm = ((TPolyMarker*)(h->GetListOfFunctions()->FindObject("TPolyMarker")));
if (pm) {
h->GetListOfFunctions()->Remove(pm);
delete pm;
}
pm = new TPolyMarker(nfound, Pos, Amp);
h->GetListOfFunctions()->Add(pm);
pm->SetMarkerStyle(23);
pm->SetMarkerColor(kRed);
pm->SetMarkerSize(1);
// cleanup
delete pfit;
delete [] Amp;
delete [] FixAmp;
delete [] FixPos;
delete s;
delete [] dest;
delete [] source;
return;
}
d
#define d(i)
Definition RSha256.hxx:102
f
#define f(i)
Definition RSha256.hxx:104
h
#define h(i)
Definition RSha256.hxx:106
Bool_t
bool Bool_t
Definition RtypesCore.h:63
Int_t
int Int_t
Definition RtypesCore.h:45
kFALSE
constexpr Bool_t kFALSE
Definition RtypesCore.h:101
Double_t
double Double_t
Definition RtypesCore.h:59
kRed
@ kRed
Definition Rtypes.h:66
TRangeDynCast
ROOT::Detail::TRangeCast< T, true > TRangeDynCast
TRangeDynCast is an adapter class that allows the typed iteration through a TCollection.
Definition TCollection.h:358
dest
Option_t Option_t TPoint TPoint const char GetTextMagnitude GetFillStyle GetLineColor GetLineWidth GetMarkerStyle GetTextAlign GetTextColor GetTextSize void char Point_t Rectangle_t dest
Definition TGWin32VirtualXProxy.cxx:164
x1
Option_t Option_t TPoint TPoint const char x1
Definition TGWin32VirtualXProxy.cxx:70
xmin
float xmin
Definition THbookFile.cxx:95
xmax
float xmax
Definition THbookFile.cxx:95
gROOT
#define gROOT
Definition TROOT.h:414
gRandom
R__EXTERN TRandom * gRandom
Definition TRandom.h:62
TCanvas
The Canvas class.
Definition TCanvas.h:23
TF1
1-Dim function class
Definition TF1.h:233
TH1F
1-D histogram with a float per channel (see TH1 documentation)
Definition TH1.h:621
TPolyMarker
A PolyMarker is defined by an array on N points in a 2-D space.
Definition TPolyMarker.h:31
TRandom::SetSeed
virtual void SetSeed(ULong_t seed=0)
Set the random generator seed.
Definition TRandom.cxx:615
TRandom::Uniform
virtual Double_t Uniform(Double_t x1=1)
Returns a uniform deviate on the interval (0, x1).
Definition TRandom.cxx:682
TSpectrumFit
Advanced 1-dimensional spectra fitting functions.
Definition TSpectrumFit.h:18
TSpectrum
Advanced Spectra Processing.
Definition TSpectrum.h:18
TSpectrum::SearchHighRes
Int_t SearchHighRes(Double_t *source, Double_t *destVector, Int_t ssize, Double_t sigma, Double_t threshold, bool backgroundRemove, Int_t deconIterations, bool markov, Int_t averWindow)
One-dimensional high-resolution peak search function.
Definition TSpectrum.cxx:2129
TSpectrum::GetPositionX
Double_t * GetPositionX() const
Definition TSpectrum.h:58
sigma
const Double_t sigma
Definition h1analysisProxy.h:11
TMath::Sqrt2
constexpr Double_t Sqrt2()
Definition TMath.h:86
TMath::Sqrt
Double_t Sqrt(Double_t x)
Returns the square root of x.
Definition TMath.h:662
TMath::TwoPi
constexpr Double_t TwoPi()
Definition TMath.h:44
Author

Definition in file FitAwmi.C.