[英]C++ wrapper for GSL root finding algorithm with derivative
所以,雖然我很高興在Stack Overflow上找到很多答案,但我決定是時候自己提問了。
我試圖使用衍生的根查找算法 。 根據GSL,我必須事先定義函數及其派生。 但我想知道這是否可以用包裝器做得更優雅。
前段時間我發現了一個非常方便的模板(GSL C ++包裝器) ,它適用於一個功能,例如集成,我大量使用它。
現在我想知道這種方法是否可以擴展為GSL提供兩個函數,即函數本身及其派生。
編輯:解決方案
template <typename F, typename G>
class gsl_root_deriv : public gsl_function_fdf
{
private:
const F& _f;
const G& _df;
static double invoke_f(double x, void* params){
return static_cast<gsl_root_deriv*>(params) -> _f(x);
}
static double invoke_df(double x, void* params){
return static_cast<gsl_root_deriv*>(params) -> _df(x);
}
static void invoke_fdf(double x, void* params, double* f, double* df){
(*f) = static_cast<gsl_root_deriv*>(params) -> _f(x);
(*df) = static_cast<gsl_root_deriv*>(params) -> _df(x);
}
public:
gsl_root_deriv(const F& f_init, const G& df_init)
: _f(f_init), _df(df_init)
{
f = &gsl_root_deriv::invoke_f;
df = &gsl_root_deriv::invoke_df;
fdf = &gsl_root_deriv::invoke_fdf;
params = this;
}
};
一個類似於GSL示例的最小示例:
#include <iostream>
#include <gsl/gsl_errno.h>
#include <gsl/gsl_roots.h>
#include <memory>
#include "gsl_root_deriv.h"
int main()
{
auto f = [](double x) -> double { return 0.25 * x*x - 1.0; };
auto df = [](double x) -> double { return 0.5 * x; };
gsl_root_deriv<decltype(f),decltype(df)> Fp(f,df);
int status(0), iter(0), max_iter(100);
const gsl_root_fdfsolver_type* T( gsl_root_fdfsolver_newton);
std::unique_ptr<gsl_root_fdfsolver,void(*)(gsl_root_fdfsolver*)>
s(gsl_root_fdfsolver_alloc(T),gsl_root_fdfsolver_free);
double x_0(0.0), x(5.0);
gsl_root_fdfsolver_set( s.get(), &Fp, x );
do
{
iter++;
std::cout << "Iteration " << iter << std::endl;
status = gsl_root_fdfsolver_iterate( s.get() );
x_0 = x;
x = gsl_root_fdfsolver_root( s.get() );
status = gsl_root_test_delta( x, x_0, 0.0, 1.0e-3 );
} while( status == GSL_CONTINUE && iter < max_iter );
std::cout << "Converged to root " << x << std::endl;
return 0;
}
親切的問候,
- 克勞斯
您需要做一些修改
Gsl fdf結構如下
struct gsl_function_fdf_struct
{
double (* f) (double x, void * params);
double (* df) (double x, void * params);
void (* fdf) (double x, void * params, double * f, double * df);
void * params;
};
typedef struct gsl_function_fdf_struct gsl_function_fdf ;
如果你理解了包裝器實際上做了什么,那么你會發現泛化非常簡單
class gsl_function_fdf_pp : public gsl_function_fdf
{
public:
gsl_function_fdf_pp
(
std::function<double(double)> const& kf,
std::function<double(double)> const& kdf
) : _f(kf), _df(kdf)
{
f = &gsl_function_fdf_pp::invoke;
df = &gsl_function_fdf_pp::invoke2;
fdf = &gsl_function_fdf_pp::invoke3;
params=this;
}
private:
std::function<double(double)> _f;
std::function<double(double)> _df;
static double invoke(double x, void *params)
{
return static_cast<gsl_function_fdf_pp*>(params)->_f(x);
}
static double invoke2(double x, void *params)
{
return static_cast<gsl_function_fdf_pp*>(params)->_df(x);
}
static void invoke3(double x, void * params, double* f, double* df)
{
(*f) = static_cast<gsl_function_fdf_pp*>(params)->_f(x);
(*df) = static_cast<gsl_function_fdf_pp*>(params)->_df(x);
}
};
模板版本。
template< typename F, typename U > class gsl_function_fdf_pp : public gsl_function_fdf
{
public:
gsl_function_fdf_pp(const F& kf, const U& kdf) : _f(kf), _df(kdf)
{
f = &gsl_function_fdf_pp::invoke;
df = &gsl_function_fdf_pp::invoke2;
fdf = &gsl_function_fdf_pp::invoke3;
params=this;
}
private:
const F& _f;
const U& _df;
static double invoke(double x, void *params)
{
return static_cast<gsl_function_fdf_pp*>(params)->_f(x);
}
static double invoke2(double x, void *params)
{
return static_cast<gsl_function_fdf_pp*>(params)->_df(x);
}
static void invoke3(double x, void * params, double* f, double* df)
{
(*f) = static_cast<gsl_function_fdf_pp*>(params)->_f(x);
(*df) = static_cast<gsl_function_fdf_pp*>(params)->_df(x);
}
};
編輯2:修復2個小問題后,這個例子有效
int main()
{
auto f = [](double x)->double{ return x*x; };
auto df = [](double x)->double{ return 2.0 * x; };
gsl_function_fdf_pp<decltype(f),decltype(df)> Fp(f,df);
return 0;
}
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.