1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
#ifndef BROKEN_POWER_LAW_MODEL_H_
#define BROKEN_POWER_LAW_MODEL_H_
#define OPT_HEADER
#include <core/fitter.hpp>
#include <cmath>
namespace opt_utilities
{
template <typename T>
class bpl1d
:public model<T,T,std::vector<T>,std::string>
{
private:
model<T,T,std::vector<T> >* do_clone()const
{
return new bpl1d<T>(*this);
}
const char* do_get_type_name()const
{
return "broken power law";
}
public:
bpl1d()
{
this->push_param_info(param_info<std::vector<T> >("bpx",1));
this->push_param_info(param_info<std::vector<T> >("bpy",1));
this->push_param_info(param_info<std::vector<T> >("gamma1",1));
this->push_param_info(param_info<std::vector<T> >("gamma2",1));
}
T do_eval(const T& x,const std::vector<T>& param)
{
T x_b=get_element(param,0);
T f_b=get_element(param,1);
T gamma1=get_element(param,2);
T gamma2=get_element(param,3);
if(x<x_b)
{
return f_b*pow(x,gamma1)/pow(x_b,gamma1);
}
else
{
return f_b*pow(x,gamma2)/pow(x_b,gamma2);
}
}
private:
std::string do_to_string()const
{
return "broken power law\n"
"y=y_b*(x/x_b)^gamma1 for x<x_b\n"
"y=y_b*(x/x_b)^gamma2 otherwise\n";
}
};
}
#endif
//EOF
|
