f(x)=sin x に対して

RowBox[{Cell[TextData[Cell[BoxData[f ' (x) = cos x]]]], ,, , Cell[TextData[Cell[BoxData[f'' (x) = -sin x ]]]], ,, , Cell[TextData[Cell[BoxData[f''' (x) = -cos x ]]]]}]

だから

Cell[TextData[{Cell[BoxData[f(0) = 0, f ' (0) = 1 ]], , f''(1)=0, f'''(0)=-1 }]]

よって

y = F_3(x) = (f''' (0))/3 ! x^3 + (f'' (0))/2 ! x^2 + (f ' (0))/1 ! x + f(0) = -1/6x^3 + x

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