untitled-2.nb

mathematic

(************** Content-type: application/mathematica **************
                     CreatedBy='Mathematica 5.0'

                    Mathematica-Compatible Notebook

This notebook can be used with any Mathematica-compatible
application, such as Mathematica, MathReader or Publicon. The data
for the notebook starts with the line containing stars above.

To get the notebook into a Mathematica-compatible application, do
one of the following:

* Save the data starting with the line of stars above into a file
  with a name ending in .nb, then open the file inside the
  application;

* Copy the data starting with the line of stars above to the
  clipboard, then use the Paste menu command inside the application.

Data for notebooks contains only printable 7-bit ASCII and can be
sent directly in email or through ftp in text mode.  Newlines can be
CR, LF or CRLF (Unix, Macintosh or MS-DOS style).

NOTE: If you modify the data for this notebook not in a Mathematica-
compatible application, you must delete the line below containing
the word CacheID, otherwise Mathematica-compatible applications may
try to use invalid cache data.

For more information on notebooks and Mathematica-compatible 
applications, contact Wolfram Research:
  web: http://www.wolfram.com
  email: [e-mail]
  phone: [phone] (U.S.)

Notebook reader applications are available free of charge from 
Wolfram Research.
*******************************************************************)

(*CacheID: 232*)


(*NotebookFileLineBreakTest
NotebookFileLineBreakTest*)
(*NotebookOptionsPosition[    750061,      20068]*)
(*NotebookOutlinePosition[    751027,      20100]*)
(*  CellTagsIndexPosition[    750891,      20093]*)
(*WindowFrame->Normal*)



Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
    \(\(?PrependTo\)\)], "Input"],

Cell[BoxData[
    RowBox[{"\<\"PrependTo[s, elem] prepends elem to the value of s, and \
resets s to the result.\"\>", " ", 
      ButtonBox[
        StyleBox["More\[Ellipsis]",
          "SR"],
        ButtonData:>"PrependTo",
        Active->True,
        ButtonStyle->"RefGuideLink"]}]], "Print",
  CellTags->"Info3309877681-3721735"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(\(?Append\)\)], "Input"],

Cell[BoxData[
    RowBox[{"\<\"Append[expr, elem] gives expr with elem appended.\"\>", " ", 
      
      ButtonBox[
        StyleBox["More\[Ellipsis]",
          "SR"],
        ButtonData:>"Append",
        Active->True,
        ButtonStyle->"RefGuideLink"]}]], "Print",
  CellTags->"Info3309877806-7890587"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(\(?elem\)\)], "Input"],

Cell[BoxData[
    RowBox[{\(Information::"notfound"\), \(\(:\)\(\ \)\), "\<\"Symbol \
\\!\\(\\\"elem\\\"\\) not found. \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", \
ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \
ButtonData:>\\\"General::notfound\\\"]\\)\"\>"}]], "Message"]
}, Open  ]],

Cell[BoxData[""], "Input"],

Cell[CellGroupData[{

Cell[BoxData[{
    \(f[x_] = ArcSin[x]; g[n_] = D[f[x], {x, n}] /. x \[Rule] 0; 
    s[n_, x_] = 
      Sum[g[k]*\((\ x^k)\)/\(k!\), {k, 0, n}];\), "\[IndentingNewLine]", 
    \(\(\(t = Table[s[n, x], {n, 10}]\)\(;\)\(Plot[
      Evaluate[t], {x, \(-1\), 
        1}]\)\(;\)\(\[IndentingNewLine]\)\)\)}], "Input"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .61803 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.476191 0.309017 0.223516 [
[.02381 .29652 -6 -9 ]
[.02381 .29652 6 0 ]
[.2619 .29652 -12 -9 ]
[.2619 .29652 12 0 ]
[.7381 .29652 -9 -9 ]
[.7381 .29652 9 0 ]
[.97619 .29652 -3 -9 ]
[.97619 .29652 3 0 ]
[.4875 .0855 -12 -4.5 ]
[.4875 .0855 0 4.5 ]
[.4875 .19726 -24 -4.5 ]
[.4875 .19726 0 4.5 ]
[.4875 .42078 -18 -4.5 ]
[.4875 .42078 0 4.5 ]
[.4875 .53253 -6 -4.5 ]
[.4875 .53253 0 4.5 ]
[ 0 0 0 0 ]
[ 1 .61803 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 g
.25 Mabswid
[ ] 0 setdash
.02381 .30902 m
.02381 .31527 L
s
[(-1)] .02381 .29652 0 1 Mshowa
.2619 .30902 m
.2619 .31527 L
s
[(-0.5)] .2619 .29652 0 1 Mshowa
.7381 .30902 m
.7381 .31527 L
s
[(0.5)] .7381 .29652 0 1 Mshowa
.97619 .30902 m
.97619 .31527 L
s
[(1)] .97619 .29652 0 1 Mshowa
.125 Mabswid
.07143 .30902 m
.07143 .31277 L
s
.11905 .30902 m
.11905 .31277 L
s
.16667 .30902 m
.16667 .31277 L
s
.21429 .30902 m
.21429 .31277 L
s
.30952 .30902 m
.30952 .31277 L
s
.35714 .30902 m
.35714 .31277 L
s
.40476 .30902 m
.40476 .31277 L
s
.45238 .30902 m
.45238 .31277 L
s
.54762 .30902 m
.54762 .31277 L
s
.59524 .30902 m
.59524 .31277 L
s
.64286 .30902 m
.64286 .31277 L
s
.69048 .30902 m
.69048 .31277 L
s
.78571 .30902 m
.78571 .31277 L
s
.83333 .30902 m
.83333 .31277 L
s
.88095 .30902 m
.88095 .31277 L
s
.92857 .30902 m
.92857 .31277 L
s
.25 Mabswid
0 .30902 m
1 .30902 L
s
.5 .0855 m
.50625 .0855 L
s
[(-1)] .4875 .0855 1 0 Mshowa
.5 .19726 m
.50625 .19726 L
s
[(-0.5)] .4875 .19726 1 0 Mshowa
.5 .42078 m
.50625 .42078 L
s
[(0.5)] .4875 .42078 1 0 Mshowa
.5 .53253 m
.50625 .53253 L
s
[(1)] .4875 .53253 1 0 Mshowa
.125 Mabswid
.5 .10785 m
.50375 .10785 L
s
.5 .1302 m
.50375 .1302 L
s
.5 .15256 m
.50375 .15256 L
s
.5 .17491 m
.50375 .17491 L
s
.5 .21961 m
.50375 .21961 L
s
.5 .24196 m
.50375 .24196 L
s
.5 .26431 m
.50375 .26431 L
s
.5 .28667 m
.50375 .28667 L
s
.5 .33137 m
.50375 .33137 L
s
.5 .35372 m
.50375 .35372 L
s
.5 .37607 m
.50375 .37607 L
s
.5 .39842 m
.50375 .39842 L
s
.5 .44313 m
.50375 .44313 L
s
.5 .46548 m
.50375 .46548 L
s
.5 .48783 m
.50375 .48783 L
s
.5 .51018 m
.50375 .51018 L
s
.5 .06315 m
.50375 .06315 L
s
.5 .0408 m
.50375 .0408 L
s
.5 .01845 m
.50375 .01845 L
s
.5 .55488 m
.50375 .55488 L
s
.5 .57724 m
.50375 .57724 L
s
.5 .59959 m
.50375 .59959 L
s
.25 Mabswid
.5 0 m
.5 .61803 L
s
0 0 m
1 0 L
1 .61803 L
0 .61803 L
closepath
clip
newpath
.5 Mabswid
.02381 .0855 m
.06244 .10364 L
.10458 .12341 L
.14415 .14199 L
.18221 .15985 L
.22272 .17886 L
.26171 .19717 L
.30316 .21662 L
.34309 .23536 L
.3815 .25339 L
.42237 .27258 L
.46172 .29105 L
.49955 .30881 L
.53984 .32772 L
.57861 .34592 L
.61984 .36527 L
.65954 .3839 L
.69774 .40183 L
.73838 .42091 L
.77751 .43928 L
.81909 .45879 L
.85916 .4776 L
.89771 .4957 L
.93871 .51494 L
.97619 .53253 L
s
.02381 .0855 m
.06244 .10364 L
.10458 .12341 L
.14415 .14199 L
.18221 .15985 L
.22272 .17886 L
.26171 .19717 L
.30316 .21662 L
.34309 .23536 L
.3815 .25339 L
.42237 .27258 L
.46172 .29105 L
.49955 .30881 L
.53984 .32772 L
.57861 .34592 L
.61984 .36527 L
.65954 .3839 L
.69774 .40183 L
.73838 .42091 L
.77751 .43928 L
.81909 .45879 L
.85916 .4776 L
.89771 .4957 L
.93871 .51494 L
.97619 .53253 L
s
.02381 .04825 m