(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 44853, 1172] NotebookOptionsPosition[ 44427, 1153] NotebookOutlinePosition[ 44823, 1170] CellTagsIndexPosition[ 44780, 1167] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"P", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.1", ",", " ", "0.2", ",", " ", "0.7"}], "}"}], ",", RowBox[{"{", RowBox[{"0.2", ",", " ", "0.4", ",", " ", "0.4"}], "}"}], ",", RowBox[{"{", RowBox[{"0.1", ",", " ", "0.3", ",", " ", "0.6"}], "}"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{"\[Alpha]", "=", RowBox[{"{", RowBox[{"0.2", ",", " ", "0.3", ",", " ", "0.5"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"n", ",", RowBox[{"MatrixForm", "[", RowBox[{"MatrixPower", "[", RowBox[{"P", ",", "n"}], "]"}], "]"}], ",", RowBox[{"MatrixForm", "[", RowBox[{"\[Alpha]", ".", RowBox[{"MatrixPower", "[", RowBox[{"P", ",", "n"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "1", ",", "4", ",", "1"}], "}"}]}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"n", ",", RowBox[{"MatrixForm", "[", RowBox[{"MatrixPower", "[", RowBox[{"P", ",", "n"}], "]"}], "]"}], ",", RowBox[{"MatrixForm", "[", RowBox[{"\[Alpha]", ".", RowBox[{"MatrixPower", "[", RowBox[{"P", ",", "n"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "5", ",", "100", ",", "5"}], "}"}]}], "]"}], "]"}], Cell[""]}]}], "Input", CellChangeTimes->{{3.607682720443488*^9, 3.607682721902609*^9}, { 3.607682790205782*^9, 3.6076828271334343`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.1`", "0.2`", "0.7`"}, {"0.2`", "0.4`", "0.4`"}, {"0.1`", "0.3`", "0.6`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13`"}, {"0.31`"}, {"0.56`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"2", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.12`", "0.31`", "0.5700000000000001`"}, {"0.14`", "0.32000000000000006`", "0.54`"}, {"0.13`", "0.32`", "0.55`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.131`"}, {"0.31800000000000006`"}, {"0.551`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"3", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.131`", "0.319`", "0.55`"}, {"0.132`", "0.31800000000000006`", "0.55`"}, {"0.132`", "0.319`", "0.549`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.1318`"}, {"0.3187`"}, {"0.5495000000000001`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"4", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13190000000000002`", "0.3188000000000001`", "0.5493000000000001`"}, {"0.13180000000000003`", "0.31860000000000005`", "0.5496000000000001`"}, {"0.13190000000000002`", "0.31870000000000004`", "0.5494000000000001`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13187000000000001`"}, {"0.31869000000000003`"}, {"0.5494400000000002`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.607682816530802*^9, 3.607682828135364*^9}}], Cell[BoxData[ RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"5", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13188000000000002`", "0.31869000000000003`", "0.5494300000000001`"}, {"0.13186000000000003`", "0.3186800000000001`", "0.5494600000000001`"}, {"0.13187000000000001`", "0.3186800000000001`", "0.5494500000000001`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186900000000001`"}, {"0.3186820000000001`"}, {"0.5494490000000001`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"10", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813190000005`", "0.3186813188000001`", "0.5494505493000001`"}, {"0.13186813180000004`", "0.31868131860000015`", "0.5494505496000002`"}, {"0.13186813190000005`", "0.31868131870000016`", "0.5494505494000002`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813187000004`"}, {"0.31868131869000016`"}, {"0.5494505494400002`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"15", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813104`", "0.318681318681319`", "0.5494505494505502`"}, {"0.13186813186813207`", "0.318681318681318`", "0.5494505494505502`"}, {"0.13186813186813204`", "0.318681318681319`", "0.5494505494505492`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813184`"}, {"0.31868131868131866`"}, {"0.5494505494505497`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"20", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813195`", "0.31868131868131894`", "0.5494505494505498`"}, {"0.13186813186813195`", "0.318681318681319`", "0.5494505494505497`"}, {"0.13186813186813195`", "0.318681318681319`", "0.5494505494505498`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813195`"}, {"0.318681318681319`"}, {"0.5494505494505497`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"25", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813195`", "0.3186813186813188`", "0.5494505494505498`"}, {"0.13186813186813195`", "0.3186813186813188`", "0.5494505494505499`"}, {"0.13186813186813195`", "0.31868131868131877`", "0.5494505494505498`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813195`"}, {"0.31868131868131877`"}, {"0.5494505494505499`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"30", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813195`", "0.31868131868131877`", "0.5494505494505497`"}, {"0.13186813186813195`", "0.31868131868131877`", "0.5494505494505497`"}, {"0.13186813186813195`", "0.31868131868131877`", "0.5494505494505497`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813195`"}, {"0.31868131868131877`"}, {"0.5494505494505497`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"35", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813204`", "0.31868131868131905`", "0.54945054945055`"}, {"0.13186813186813204`", "0.3186813186813191`", "0.5494505494505502`"}, {"0.131868131868132`", "0.31868131868131905`", "0.54945054945055`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.131868131868132`"}, {"0.3186813186813191`"}, {"0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"40", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813207`", "0.3186813186813192`", "0.5494505494505502`"}, {"0.13186813186813204`", "0.3186813186813192`", "0.5494505494505502`"}, {"0.13186813186813207`", "0.3186813186813192`", "0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813207`"}, {"0.3186813186813192`"}, {"0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"45", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813207`", "0.3186813186813192`", "0.5494505494505502`"}, {"0.13186813186813207`", "0.3186813186813192`", "0.5494505494505502`"}, {"0.13186813186813207`", "0.3186813186813192`", "0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813207`"}, {"0.3186813186813192`"}, {"0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"50", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813204`", "0.318681318681319`", "0.5494505494505502`"}, {"0.13186813186813207`", "0.318681318681319`", "0.5494505494505503`"}, {"0.13186813186813204`", "0.318681318681319`", "0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813207`"}, {"0.318681318681319`"}, {"0.5494505494505502`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"55", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.131868131868132`", "0.3186813186813189`", "0.5494505494505499`"}, {"0.131868131868132`", "0.3186813186813189`", "0.5494505494505499`"}, {"0.131868131868132`", "0.3186813186813189`", "0.5494505494505499`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.131868131868132`"}, {"0.3186813186813189`"}, {"0.5494505494505499`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"60", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.131868131868132`", "0.3186813186813189`", "0.5494505494505499`"}, {"0.131868131868132`", "0.3186813186813189`", "0.5494505494505499`"}, {"0.131868131868132`", "0.3186813186813189`", "0.5494505494505499`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.131868131868132`"}, {"0.3186813186813189`"}, {"0.5494505494505499`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"65", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.1318681318681322`", "0.31868131868131944`", "0.5494505494505508`"}, {"0.1318681318681322`", "0.31868131868131944`", "0.5494505494505508`"}, {"0.1318681318681322`", "0.31868131868131944`", "0.5494505494505508`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.1318681318681322`"}, {"0.31868131868131944`"}, {"0.5494505494505508`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"70", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813218`", "0.31868131868131944`", "0.5494505494505507`"}, {"0.13186813186813218`", "0.3186813186813195`", "0.5494505494505508`"}, {"0.13186813186813218`", "0.31868131868131944`", "0.5494505494505507`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813218`"}, {"0.31868131868131944`"}, {"0.5494505494505508`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"75", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813212`", "0.3186813186813193`", "0.5494505494505505`"}, {"0.13186813186813212`", "0.3186813186813193`", "0.5494505494505506`"}, {"0.13186813186813212`", "0.3186813186813193`", "0.5494505494505505`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813212`"}, {"0.3186813186813193`"}, {"0.5494505494505506`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"80", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813223`", "0.31868131868131966`", "0.5494505494505509`"}, {"0.13186813186813223`", "0.31868131868131966`", "0.5494505494505509`"}, {"0.13186813186813223`", "0.31868131868131966`", "0.5494505494505509`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813223`"}, {"0.31868131868131966`"}, {"0.5494505494505509`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"85", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813223`", "0.31868131868131966`", "0.5494505494505509`"}, {"0.13186813186813223`", "0.31868131868131966`", "0.549450549450551`"}, {"0.13186813186813223`", "0.31868131868131966`", "0.5494505494505509`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813223`"}, {"0.31868131868131966`"}, {"0.549450549450551`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"90", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.13186813186813226`", "0.31868131868131966`", "0.5494505494505509`"}, {"0.13186813186813226`", "0.31868131868131966`", "0.5494505494505509`"}, {"0.13186813186813226`", "0.31868131868131966`", "0.5494505494505509`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813226`"}, {"0.31868131868131966`"}, {"0.5494505494505509`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"95", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.1318681318681322`", "0.31868131868131966`", "0.5494505494505509`"}, {"0.1318681318681322`", "0.31868131868131966`", "0.549450549450551`"}, {"0.1318681318681322`", "0.31868131868131966`", "0.5494505494505509`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.1318681318681322`"}, {"0.31868131868131966`"}, {"0.549450549450551`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, {"100", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0.1318681318681322`", "0.3186813186813194`", "0.5494505494505508`"}, {"0.13186813186813223`", "0.31868131868131944`", "0.5494505494505509`"}, {"0.1318681318681322`", "0.3186813186813194`", "0.5494505494505508`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], TagBox[ RowBox[{"(", "\[NoBreak]", TagBox[GridBox[{ {"0.13186813186813223`"}, {"0.31868131868131944`"}, {"0.5494505494505508`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Column], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], " ", InterpretationBox[Cell[""], TextCell[""]]}]], "Output", CellChangeTimes->{{3.607682816530802*^9, 3.607682828187508*^9}}] }, Open ]] }, WindowSize->{520, 594}, WindowMargins->{{Automatic, 145}, {Automatic, 123}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, FrontEndVersion->"7.0 for Mac OS X x86 (32-bit) (November 10, 2008)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 1695, 49, 148, "Input"], Cell[2265, 73, 6792, 179, 221, "Output"], Cell[9060, 254, 35351, 896, 993, "Output"] }, Open ]] } ] *) (* End of internal cache information *)