StyleBox[RowBox[{関数,  , Cell[TextData[Cell[BoxData[f(x)]]]], と,  , n,  , 次多項式,  , Cell[TextD ...                                                                                                n

RowBox[{区間,  , StyleBox[Cell[[a-m,a+m] ], FontColor -> RGBColor[0., 0.501961, 0.]], で,  , 関数 ...                                                                                                n

                                                                                             ...                                                                                               24

[Graphics:HTMLFiles/17(3)-8_4.gif]

RowBox[{RowBox[{StyleBox[Cell[TextData[{Cell[BoxData[x = 0]],  }]], FontColor -> RGBColor[0. ... 0., 0.]],  , StyleBox[RowBox[{に等しい, ., Cell[]}], FontColor -> RGBColor[0.501961, 0., 0.]]}],  }]

この差は式で表すとテ - ラ - の定理によって

                                                                                             ...                                                                                      4        24

                                                                                             ...                                                                                      4        24

StyleBox[RowBox[{しかも差を表すグラフは単調だから, ,, RowBox[{ある点,   , x_0,  , で,  , 差が,  &nb ...                                  0                                                             3

                                                                 π                           ...                                            2                                                   3

N[Sin[π/2] - (π/2 - 1/6 * (π/2)^3), 10]

0.07516777071

RowBox[{一般に, ,, テ - ラ - の定理によって, ,,  , StyleBox[RowBox[{差,   , Cell[TextData[Cell[ ...                                                                                                n

R_ (n + 1)(x)=f^(n + 1)(a + θ(x - a))/(n + 1) !(x - a)^(n + 1)  (0<θ<1)  

で表され, この式はラグランジュの剰余項と呼ばれています .                  

このことより

                                                          R     (x)                          ...                 x -> a        n                                                           (x - a)

RowBox[{(, RowBox[{このとき, ,,  , RowBox[{StyleBox[Cell[TextData[Cell[BoxData[f(x) ]]]], FontSi ...                                                                                                n

                                                                                             ... xtData[Cell[BoxData[n ]]]], FontColor -> RGBColor[0.501961, 0., 0.]], を大きくすればより正確な近似が可能になる .}]}]

RowBox[{StyleBox[RowBox[{(3),   , Cell[TextData[Cell[BoxData[n ]]]], を大きくすれば}], Fo ...                                                                                            n + 1

                                                           (k)                               ... ntColor -> RGBColor[0., 0., 1.]]                                                     k = 0   k !

が成立する .


Created by Mathematica  (May 18, 2005) Valid XHTML 1.1!