source: trunk/MagicSoft/Mars/mhflux/MAlphaFitter.h@ 8462

Last change on this file since 8462 was 7777, checked in by tbretz, 19 years ago
*** empty log message ***
File size: 9.2 KB
Line 
1#ifndef MARS_MAlphaFitter
2#define MARS_MAlphaFitter
3
4#ifndef MARS_MParContainer
5#include "MParContainer.h"
6#endif
7
8#ifndef ROOT_TArrayD
9#include <TArrayD.h>
10#endif
11
12#ifndef ROOT_TF1
13#include <TF1.h>
14#endif
15
16class TH1D;
17class TH3D;
18
19class MAlphaFitter : public MParContainer
20{
21public:
22 enum ScaleMode_t {
23 kNone, // No scaling
24 kEntries, // scale by the number of entries in on and off
25 kIntegral, // scale by the integral in on and off
26 kOffRegion, // scale by the integral between fScaleMin, fScaleMax in on and off
27 kBackground, // scale by the integral between fBgMin, fBgMax in on and off
28 kLeastSquare, // not yet implemented
29 kUserScale // scale by fixed factor set by SetScaleUser
30 };
31 enum Strategy_t {
32 kSignificance,
33 kSignificanceChi2,
34 kSignificanceLogExcess,
35 kSignificanceExcess,
36 kExcess,
37 kGaussSigma,
38 kWeakSource
39 };
40 enum SignalFunc_t {
41 kGauss, kThetaSq
42 };
43
44private:
45 // Fitting Setup
46 Float_t fSigInt; // minimum of range to fit the signal
47 Float_t fSigMax; // maximum of range to fit the signal
48 Float_t fBgMin; // minimum of range to fit the background
49 Float_t fBgMax; // minimum of range to fit the background
50 Float_t fScaleMin; // minimum of range to determin the scale factor of the background
51 Float_t fScaleMax; // maximum of range to determin the scale factor of the background
52 Int_t fPolynomOrder; // order of polyom to be fitted to the background
53 Bool_t fFitBackground; // Backround fit: yes/no
54 SignalFunc_t fSignalFunc; // Type of signal function
55 // Result
56 Double_t fSignificance; // significance of an unknown signal (Li/Ma 17)
57 Double_t fSignificanceExc; // significance of a known excess (Li/Ma 5)
58 Double_t fEventsExcess; // calculated number of excess events (signal-bg)
59 Double_t fEventsSignal; // calculated number of signal events
60 Double_t fEventsBackground; // calculated number of bg events (fScaleFactor already applied)
61
62 Double_t fChiSqSignal; // Reduced (chi^2/NDF) chisq of signal fit
63 Double_t fChiSqBg; // Reduced (chi^2/NDF) chisq of bg fit
64 Double_t fIntegralMax; // Calculated bin border to which it was integrated
65 Double_t fScaleFactor; // Scale factor determined for off-data
66
67 TArrayD fCoefficients; // Fit result
68 TArrayD fErrors; // Fit errors
69
70 // Function
71 TF1 *fFunc; // fit function (gauss + polynom)
72
73 // Scaling setup
74 ScaleMode_t fScaleMode; // scaling mode
75 Double_t fScaleUser; // user scale factor
76
77 // Minimization strategy
78 Strategy_t fStrategy; // How to calc minimization value
79
80 Double_t DoOffFit(const TH1D &hon, const TH1D &hof, Bool_t paint);
81 Bool_t FitOff(TH1D &h, Int_t paint);
82 void FitResult(const TH1D &h);
83
84public:
85 // Implementing the function yourself is only about 5% faster
86 MAlphaFitter(const char *name=0, const char *title=0) : fSigInt(15),
87 fSigMax(75), fBgMin(45), fBgMax(85), fScaleMin(40), fScaleMax(80),
88 fPolynomOrder(2), fFitBackground(kTRUE), fSignalFunc(kGauss),
89 fCoefficients(3+fPolynomOrder+1), fErrors(3+fPolynomOrder+1),
90 fFunc(new TF1("", Form("gaus(0) + pol%d(3)", fPolynomOrder), 0, 90)),
91 fScaleMode(kOffRegion), fScaleUser(1), fStrategy(kSignificance)
92 {
93 fName = name ? name : "MAlphaFitter";
94 fTitle = title ? title : "Fit alpha";
95
96 fFunc->SetName("Dummy");
97 gROOT->GetListOfFunctions()->Remove(fFunc);
98
99 Clear();
100 }
101
102 MAlphaFitter(const MAlphaFitter &f) : fFunc(0)
103 {
104 f.Copy(*this);
105 }
106 ~MAlphaFitter()
107 {
108 delete fFunc;
109 }
110
111 // TObject
112 void Clear(Option_t *o="");
113 void Print(Option_t *o="") const; //*MENU*
114 void Copy(TObject &o) const;
115
116 // Setter
117 void SetScaleUser(Float_t scale) { fScaleUser = scale; fScaleMode=kUserScale; }
118 void SetScaleMode(ScaleMode_t mode) { fScaleMode = mode; }
119 void SetMinimizationStrategy(Strategy_t mode) { fStrategy = mode; }
120 void SetSignalIntegralMax(Float_t s) { fSigInt = s; }
121 void SetSignalFitMax(Float_t s) { fSigMax = s; }
122 void SetBackgroundFitMin(Float_t s) { fBgMin = s; }
123 void SetBackgroundFitMax(Float_t s) { fBgMax = s; }
124 void SetScaleMin(Float_t s) { fScaleMin = s; }
125 void SetScaleMax(Float_t s) { fScaleMax = s; }
126 void SetPolynomOrder(Int_t s)
127 {
128 if (s==fPolynomOrder)
129 return;
130
131 fPolynomOrder = s;
132
133 SetSignalFunction(fSignalFunc);
134 }
135 void SetSignalFunction(SignalFunc_t func)
136 {
137 delete fFunc;
138 switch (func)
139 {
140 case kGauss:
141 fFunc=new TF1 ("", Form("gaus(0) + pol%d(3)", fPolynomOrder));
142 break;
143 case kThetaSq:
144// if (fPolynomOrder==0)
145// fFunc=new TF1("", "[0]*exp(-0.5*((sqrt(x)-[1])/[2])^2) + pol0(3)");
146// else
147 // {
148 if (fPolynomOrder>0)
149 fPolynomOrder = 1;
150 fFunc=new TF1("", "[0]*exp(-0.5*((sqrt(x)-[1])/[2])^2) + expo(3)");
151// }
152 break;
153 }
154 fSignalFunc=func;
155 fFunc->SetName("Dummy");
156 gROOT->GetListOfFunctions()->Remove(fFunc);
157
158 fCoefficients.Set(3+fPolynomOrder+1);
159 fCoefficients.Reset();
160
161 fErrors.Set(3+fPolynomOrder+1);
162 fErrors.Reset();
163 }
164 void EnableBackgroundFit(Bool_t b=kTRUE) { fFitBackground=b; }
165
166 // Getter
167 Double_t GetSignalIntegralMax() const { return fSigInt; }
168
169 Double_t GetEventsExcess() const { return fEventsExcess; }
170 Double_t GetEventsSignal() const { return fEventsSignal; }
171 Double_t GetEventsBackground() const { return fEventsBackground; }
172
173 Double_t GetSignificance() const { return fSignificance; }
174 Double_t GetSignificanceExc() const { return fSignificanceExc; }
175 Double_t GetChiSqSignal() const { return fChiSqSignal; }
176 Double_t GetChiSqBg() const { return fChiSqBg; }
177 Double_t GetScaleFactor() const { return fScaleFactor; }
178 Double_t GetMinimizationValue() const;
179
180 ScaleMode_t GetScaleMode() const { return fScaleMode; }
181
182 Double_t GetGausSigma() const { return fCoefficients[2]; }
183 Double_t GetGausMu() const { return fCoefficients[1]; }
184 Double_t GetGausA() const { return fCoefficients[0]; }
185 Double_t GetCoefficient(Int_t i) const { return fCoefficients[i]; }
186 const TArrayD &GetCoefficients() const { return fCoefficients; }
187 const TArrayD &GetErrors() const { return fErrors; }
188 Double_t Eval(Double_t d) const { return fFunc ? fFunc->Eval(d) : 0; }
189
190 Double_t CalcUpperLimit() const;
191
192 // Interface to fit
193 Bool_t Fit(TH1D &h, Bool_t paint=kFALSE);
194 Bool_t Fit(const TH1D &on, const TH1D &off, Double_t alpha, Bool_t paint=kFALSE);
195 Bool_t Fit(TH1D &on, TH1D *off, Double_t alpha, Bool_t paint=kFALSE)
196 {
197 return off ? Fit(on, *off, alpha, paint) : Fit(on, paint);
198 }
199 Bool_t Fit(TH1D &on, TH1D *off, Bool_t paint=kFALSE)
200 {
201 return off ? Fit(on, *off, 1, paint) : Fit(on, paint);
202 }
203 Bool_t ScaleAndFit(TH1D &on, TH1D *off, Bool_t paint=kFALSE)
204 {
205 const Double_t alpha = off ? Scale(*off, on) : 1;
206 return off ? Fit(on, *off, alpha, paint) : Fit(on, paint);
207 }
208
209 Bool_t FitAlpha(const TH3D &h, Bool_t paint=kFALSE);
210 Bool_t FitEnergy(const TH3D &h, UInt_t bin, Bool_t paint=kFALSE);
211 Bool_t FitTheta(const TH3D &h, UInt_t bin, Bool_t paint=kFALSE);
212 //Bool_t FitTime(const TH3D &h, UInt_t bin, Bool_t paint=kFALSE);
213
214 Bool_t FitAlpha(const TH3D &on, const TH3D &off, Bool_t paint=kFALSE);
215 Bool_t FitEnergy(const TH3D &on, const TH3D &off, UInt_t bin, Bool_t paint=kFALSE);
216 Bool_t FitTheta(const TH3D &on, const TH3D &off, UInt_t bin, Bool_t paint=kFALSE);
217 //Bool_t FitTime(const TH3D &on, const TH3D &off, UInt_t bin, Bool_t paint=kFALSE);
218
219 Bool_t FitAlpha(const TH3D &on, const TH3D *off, Bool_t paint=kFALSE)
220 {
221 return off ? FitAlpha(on, *off, paint) : FitAlpha(on, paint);
222 }
223 Bool_t FitEnergy(const TH3D &on, const TH3D *off, UInt_t bin, Bool_t paint=kFALSE)
224 {
225 return off ? FitEnergy(on, *off, bin, paint) : FitEnergy(on, bin, paint);
226 }
227 Bool_t FitTheta(const TH3D &on, const TH3D *off, UInt_t bin, Bool_t paint=kFALSE)
228 {
229 return off ? FitTheta(on, *off, bin, paint) : FitTheta(on, bin, paint);
230 }/*
231 Bool_t FitTime(const TH3D &on, const TH3D *off, UInt_t bin, Bool_t paint=kFALSE)
232 {
233 return off ? FitTime(on, *off, bin, paint) : FitTime(on, bin, paint);
234 }*/
235
236 Double_t Scale(TH1D &off, const TH1D &on) const;
237
238 // Interface to result
239 void PaintResult(Float_t x=0.04, Float_t y=0.94, Float_t size=0.035, Bool_t draw=kFALSE) const;
240 void DrawResult(Float_t x=0.04, Float_t y=0.94, Float_t size=0.035) const { PaintResult(x, y, size, kTRUE); }
241
242 // MTask
243 Int_t ReadEnv(const TEnv &env, TString prefix, Bool_t print=kFALSE);
244
245 ClassDef(MAlphaFitter, 3)
246};
247
248#endif
Note: See TracBrowser for help on using the repository browser.