forked from ABAtanasov/Sparse-Grids
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Aitken's Method.nb
78 lines (71 loc) · 1.95 KB
/
Aitken's Method.nb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 1798, 68]
NotebookOptionsPosition[ 1543, 54]
NotebookOutlinePosition[ 1902, 70]
CellTagsIndexPosition[ 1859, 67]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
RowBox[{
RowBox[{"Aitken", "[", "b_", "]"}], ":=",
RowBox[{"Table", "[",
RowBox[{
FractionBox[
RowBox[{
RowBox[{
RowBox[{"b", "[",
RowBox[{"[",
RowBox[{"n", "+", "2"}], "]"}], "]"}],
RowBox[{"b", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "-",
RowBox[{
RowBox[{"b", "[",
RowBox[{"[",
RowBox[{"n", "+", "1"}], "]"}], "]"}], "^", "2"}]}],
RowBox[{
RowBox[{"b", "[",
RowBox[{"[",
RowBox[{"n", "+", "2"}], "]"}], "]"}], "-",
RowBox[{"2",
RowBox[{"b", "[",
RowBox[{"[",
RowBox[{"n", "+", "1"}], "]"}], "]"}]}], "+",
RowBox[{"b", "[",
RowBox[{"[", "n", "]"}], "]"}]}]], ",",
RowBox[{"{",
RowBox[{"n", ",", "1", ",",
RowBox[{
RowBox[{"Length", "[", "b", "]"}], "-", "2"}]}], "}"}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.6742268330345507`*^9, 3.674226893198675*^9}}]
},
WindowSize->{808, 651},
WindowMargins->{{Automatic, -102}, {Automatic, 0}},
FrontEndVersion->"10.4 for Mac OS X x86 (32-bit, 64-bit Kernel) (February 25, \
2016)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 981, 32, 85, "Input"]
}
]
*)
(* End of internal cache information *)