31{
34
36 int numberOfEvents;
38 JGauss precision;
40
41 try {
42
43 JParser<> zap(
"Program to test ROOT fit.");
44
47 zap[
'@'] =
make_field(gauss) = JGauss(0.0, 1.0, 1000.0, 100.0);
48 zap[
'e'] =
make_field(precision) = JGauss(0.05, 0.05, 25.0, 25.0);
50
51 zap(argc, argv);
52 }
53 catch(const exception& error) {
54 FATAL(error.what() << endl);
55 }
56
57
58 ASSERT(numberOfEvents > 0);
59
60 TF1 fs("fs", "exp(-0.5 * (x-[0])*(x-[0]) / ([1]*[1]))");
61 TF1 fb("fb", "1.0");
62
63 fs.FixParameter(0,
gauss.mean);
64 fs.FixParameter(1,
gauss.sigma);
65
66 const Int_t nx = 21;
67 const Double_t xmin = -5.0;
68 const Double_t xmax = +5.0;
69
75 };
76
77 TH1D H[] = {
78 TH1D("ha", "", 101, -0.1, +0.1),
79 TH1D("hb", "", 101, -0.1, +0.1),
80 TH1D("hc", "", 101, -100.0, +100.0),
81 TH1D("hd", "", 101, -100.0, +100.0)
82 };
83
85
86 for (int i = 0; i != numberOfEvents; ++i) {
87
88 STATUS(
"event: " << setw(10) << i <<
'\r');
DEBUG(endl);
89
90 TH1D h0("h0", NULL, nx, xmin, xmax);
91
92 h0.Sumw2();
93
94 h0.FillRandom(
"fs", (Int_t)
gauss.signal);
95 h0.FillRandom(
"fb", (Int_t)
gauss.background);
96
97 TF1 f1("f1", "[2]*exp(-0.5 * (x-[0])*(x-[0]) / ([1]*[1])) / (TMath::Sqrt(2.0*TMath::Pi())*[1]) + [3]");
98
99 f1.SetParameter(0, h0.GetMean());
100 f1.SetParameter(1, h0.GetRMS());
101 f1.SetParameter(2, h0.GetEntries() - h0.GetMinimum() * h0.GetNbinsX());
102 f1.SetParameter(3, h0.GetMinimum());
103
104 f1.SetParError(0, 1.0e-3);
105 f1.SetParError(1, 1.0e-3);
106 f1.SetParError(2, 0.5);
107 f1.SetParError(3, 0.5);
108
109 string option = "NWL";
110
111 if (
debug < debug_t && option.find(
'Q') == string::npos) {
112 option += "Q";
113 }
114
116
117 h0.Fit(&f1, option.c_str());
118
120
121 const double Y[] = { f1.GetParameter(0) -
gauss.mean,
122 f1.GetParameter(1) -
gauss.sigma,
123 f1.GetParameter(2) * nx / (xmax - xmin) -
gauss.signal,
124 f1.GetParameter(3) * nx -
gauss.background };
125
126 for (int i = 0; i != sizeof(Q)/sizeof(Q[0]); ++i) {
128 H[i].Fill(Y[i]);
129 }
130 }
131
132 for (int i = 0; i != sizeof(Q)/sizeof(Q[0]); ++i) {
134 }
135
136 if (
debug >= notice_t) {
137 timer.
print(cout,
true, micro_t);
138 }
139
141
143
144 for (int i = 0; i != sizeof(H)/sizeof(H[0]); ++i) {
145 out << H[i];
146 }
147
148 out.Write();
149 out.Close();
150 }
151
152 for (int i = 0; i != sizeof(Q)/sizeof(Q[0]); ++i) {
154 }
155
156 ASSERT(Q[0].getSTDev() < precision.mean);
157 ASSERT(Q[1].getSTDev() < precision.sigma);
158 ASSERT(Q[2].getSTDev() < precision.signal);
159 ASSERT(Q[3].getSTDev() < precision.background);
160
161 return 0;
162}
double getMean(vector< double > &v)
get mean of vector content
std::ostream & longprint(std::ostream &out)
Set long printing.
std::ostream & shortprint(std::ostream &out)
Set short printing.
#define DEBUG(A)
Message macros.
#define ASSERT(A,...)
Assert macro.
#define make_field(A,...)
macro to convert parameter to JParserTemplateElement object
Auxiliary class for CPU timing and usage.
void print(std::ostream &out, const JScale_t scale=milli_t) const
Print timer data.
Utility class to parse command line options.
double gauss(const double x, const double sigma)
Gauss function (normalised to 1 at x = 0).
This name space includes all other name spaces (except KM3NETDAQ, KM3NET and ANTARES).