 
 
 
 
 
   
 公式を比較する
 公式を比較する
http://nalab.mind.meiji.ac.jp/~mk/syori2-2006/jouhousyori2-2006-05/node16.htmlで紹介した公式を比較してみるのも面白いです。
こういうのは実際に試してみて初めて分かることが多く、 挑戦できる腕力のある人は是非やってみることをお勧めします。
いくつかアドバイスをします。
 を計算するので、
 を計算するので、
 の計算を副プログラム (関数またはサブルーチン) にすることを
お勧めします。
次のサンプル・プログラムは、
piarctan.bas を外部副関数を使って計算するように書き換えたものです。
 の計算を副プログラム (関数またはサブルーチン) にすることを
お勧めします。
次のサンプル・プログラムは、
piarctan.bas を外部副関数を使って計算するように書き換えたものです。
| REM piarctan2.bas --- マーダヴァ・グレゴリー・ライプニッツ級数でπを計算 REM arctanの級数の計算は外部副関数に任せることにした。 DECLARE EXTERNAL FUNCTION arctan INPUT x INPUT n LET s=arctan(x,n) PRINT "arctan(x)≒";s print "その4倍";4*s PRINT USING "πとの差=-%.###^^^^^^":4*s-PI END EXTERNAL FUNCTION arctan(x,n) REM arctan x の級数を第 n 項まで計算 LET f=-x*x LET t=x LET s=0 for j=1 to n LET a=t/(2*j-1) LET s=s+a LET t=f*t NEXT j LET arctan=s END FUNCTION | 
 は、
 は、
 をどこまで大きく取れば十分な精度を持つのか?
一般にはそれほど簡単ではありませんが、
今考えている
 をどこまで大きく取れば十分な精度を持つのか?
一般にはそれほど簡単ではありませんが、
今考えている  の級数の場合は、
各項の絶対値が単調に減少する交代級数になるので、
次の Leibniz の定理によって簡単に分かります
(
 の級数の場合は、
各項の絶対値が単調に減少する交代級数になるので、
次の Leibniz の定理によって簡単に分かります
( の誤差は、次に足す項の絶対値
 の誤差は、次に足す項の絶対値  以下である)。
 以下である)。
| 交代級数に関する Leibniz の定理 | 
| 数列  は単調減少 (  ) で、  を満たすとき、級数    部分和を  とすると、          | 
次に掲げる結果は、 100桁程度の精度を得るために、 級数の和を何項加える必要があるか概算し、 実際にそれを実行するとどれくらいので精度になるかを計算したものです。
| 大体どれくらいか… | 
| シャープ 第 205 項まで加えて要求精度を達成しました。 9.81E-101 マチン 2項公式 第 71 項まで加えて要求精度を達成しました。 第 22 項まで加えて要求精度を達成しました。 1.20E-101 Gauss 3項公式 第 40 項まで加えて要求精度を達成しました。 第 29 項まで加えて要求精度を達成しました。 第 22 項まで加えて要求精度を達成しました。 1.23E-102 Gauss 4項公式 第 32 項まで加えて要求精度を達成しました。 第 29 項まで加えて要求精度を達成しました。 第 22 項まで加えて要求精度を達成しました。 第 21 項まで加えて要求精度を達成しました。 1.09E-103 Gauss 9項公式 第 14 項まで加えて要求精度を達成しました。 第 13 項まで加えて要求精度を達成しました。 第 13 項まで加えて要求精度を達成しました。 第 12 項まで加えて要求精度を達成しました。 第 12 項まで加えて要求精度を達成しました。 第 11 項まで加えて要求精度を達成しました。 第 11 項まで加えて要求精度を達成しました。 第 10 項まで加えて要求精度を達成しました。 第 10 項まで加えて要求精度を達成しました。 7.45E-106 高野喜久雄の4項公式 第 30 項まで加えて要求精度を達成しました。 第 29 項まで加えて要求精度を達成しました。 第 22 項まで加えて要求精度を達成しました。 第 11 項まで加えて要求精度を達成しました。 7.29E-105 Stormerの4項公式 第 29 項まで加えて要求精度を達成しました。 第 22 項まで加えて要求精度を達成しました。 第 18 項まで加えて要求精度を達成しました。 第 13 項まで加えて要求精度を達成しました。 7.73E-104 | 
この結果をどう分析すべきか… 書きたくてむずむずするけれど、 誰かにやって欲しいので書きません。
(一言だけ: Gauss は色々大理論を作った偉い人だけど、 こういう計算も大好きだったのが良く分かります。)
 
 
 
 
