regula falsi メソッドを実装しました。正割法になるように修正しようとしています。私が読んだ pdf は、それが 1 つの変更だけで本質的に同じであると述べました。私の「m」値の将来の推測は、次の代わりに、わずかに異なる式を持つ必要があります。
m = a - f(a) * ( (b-a)/( f(b)-f(a) ) );
そのはず:
m = a - f(a) * ( (m-a)/( f(m)-f(a) ) );
残念ながら、それは機能しません (ルートが見つかりません)。これを正割法に入れるには何を修正すればよいですか?
ソースコードは次のとおりです。
#include <stdio.h>
#include <math.h>
void
secant(double a, double b, double e, double (*f)(double), int maxiter ) {
double m, fm, fa, fb;
int i;
fa=(*f)(a);
fb=(*f)(b);
m = a - fa * ( (b-a)/( fb - fa ) );
fm=(*f)(m);
for(i=0; i<maxiter; i++) {
if ( fabs(fm) <= e ) {
printf("f(%f) = %f\n", m, fm);
return;
} else if ((fa*fm) < 0) {
b=m;
fb=fm;
} else {
a=m;
fa=fm;
}
// the guess below works for regula falsi method:
// m = a - fa * ( (b-a)/(fb - fa));
//this was supposed to be the change to turn this into the secant method
m = a - fa * ( (m-a)/(fm - fa) );
fm=(*f)(m);
}
}
int main(){
secant(1,4,0.0001,sin,500);
return 0;
}
前もって感謝します
編集:ペンと紙で遊んだ後、最初に考えたような単純な変更ではなかったことが最終的にわかりました:
void secant(double a, double b, double e, double (*f)(double), int maxiter ) {
double m, fm, fa, fb;
int i;
fa=(*f)(a);
fb=(*f)(b);
for(i=0; i<maxiter; i++) {
m = a - fa * ( (b-a)/(fb - fa) );
fm=(*f)(m);
if ( fabs(fm) <= e ) {
printf("f(%f)=%f, iter: %d\n", m,fm,i);
return;
}
a=b;
b=m;
fa=fb;
fb=fm;
}
}