Message: "Syntax error in file: xyz" on trying to open saved nb. Ver: 8.0.1
- To: mathgroup at smc.vnet.net
- Subject: [mg117520] Message: "Syntax error in file: xyz" on trying to open saved nb. Ver: 8.0.1
- From: Matthias Bode <lvsaba at hotmail.com>
- Date: Mon, 21 Mar 2011 06:17:22 -0500 (EST)
Hola: When I try to open my file TOPDIVSTRAT.nb I get a warning that a syntax error was detected, I answer "Yes" to open the file as plain text. Then I get the window insert "Why the Beep?" with precisely this message: "There was a syntax error on line 1037 in the file: TOPDIVSTRAT.nb. The error was: *" What am I supposed to do to find "line 1037" and correct the error "*"? This type of error never occured before (since 1991/2); version 8.0.1 HOME EDITION, recently installed. Any hint will be highly appreciated. Best regards, MATTHIAS BODE S 17.35775=B0, W 066.14577=B0 2'740 m AMSL. TOPDIVSTRAT.nb as plain text: (* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy=='Mathematica 8.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 0, 0] NotebookDataLength[ 0, 0] NotebookOptionsPosition[ 0, 0] NotebookOutlinePosition[ 0, 0] CellTagsIndexPosition[ 0, 0] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"DAX", " ", "==", " ", RowBox[{"{", RowBox[{"28.7", ",", " ", RowBox[{"-", "32.4"}], ",", " ", RowBox[{"-", "6.2"}], ",", " ", "22.4", ",", " ", "41.6", ",", " ",= "4.4", ",", " ", "34.3", ",", " ", "\n", " ", RowBox[{"-", "40.7"}], ",", " ", RowBox[{"-", "18.9"}]}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.509231765140625*^9, 3.509231808046875*^9}, { 3.509232028171875*^9, 3.509232095578125*^9}, {3.509232127921875*^9, 3.50923213859375*^9}, {3.5092321768125*^9, 3.509232179703125*^9}, 3.50923347696875*^9, 3.50923945453125*^9, 3.50923990696875*^9, { 3.509240579296875*^9, 3.50924059975*^9}, {3.509241353171875*^9, 3.509241365*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"SMI", " ", "==", " ", RowBox[{"{", RowBox[{"26.6", ",", " ", RowBox[{"-", "31.8"}], ",", " ", RowBox[{"-", "20.1"}], ",", " ", "16.8", ",", " ", "35.6", ",", " ",= "1.5", ",", " ", "\n", " ", RowBox[{"28.1", " ", "-", " ", "30.7"}], ",", " ", RowBox[{"-", "11.4"}]}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.509232242328125*^9, 3.50923229234375*^9}, 3.50923348509375*^9, 3.509239454578125*^9, 3.509239907*^9, { 3.5092405793125*^9, 3.509240599765625*^9}, {3.50924135321875*^9, 3.509241365*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"ESTX50", " ", "==", " ", RowBox[{"{", RowBox[{"18.6", ",", " ", RowBox[{"-", "38.7"}], ",", " ", RowBox[{"-", "12.9"}], ",", " ", "13.7", ",", " ", "29.6", ",", " ",= "4.4", ",", " ", "\n", " ", "20.9", ",", " ", RowBox[{"-", "34.4"}], ",", " ", RowBox[{"-", "20.5"}]}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.509232309640625*^9, 3.50923237875*^9}, 3.50923348965625*^9, 3.509239454625*^9, 3.509239907015625*^9, { 3.509240579328125*^9, 3.509240599765625*^9}, {3.50924135325*^9, 3.509241365046875*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"SP500", " ", "==", " ", RowBox[{"{", RowBox[{"36.", ",", " ", RowBox[{"-", "38."}], ",", " ", RowBox[{"-", "6.5"}], ",", " ", "12.9", ",", " ", "12.9", ",", " ",= "3.9", ",", " ", "19.8", ",", " ", "\n", " ", RowBox[{"-", "15.5"}], ",", " ", RowBox[{"-", "15."}]}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.50923240128125*^9, 3.50923251828125*^9}, 3.509232571765625*^9, 3.50923349346875*^9, 3.509239454671875*^9, 3.50923990703125*^9, {3.509240579328125*^9, 3.50924059978125*^9}, { 3.509241353296875*^9, 3.50924136509375*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"dreiAkt", " ", "==", " ", RowBox[{"{", RowBox[{"0.1", ",", " ", RowBox[{"-", "52.6"}], ",", " ", RowBox[{"-", "4.5"}], ",", " ", "36.2", ",", " ", "84.2", ",", " ",= "16.8", ",", " ", "\n", " ", "42.2", ",", " ", RowBox[{"-", "14.5"}], ",", " ", "38.8"}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.509232543390625*^9, 3.50923274440625*^9}, 3.5092330518125*^9, 3.509233497578125*^9, 3.50923945471875*^9, 3.509239907046875*^9, {3.50924057934375*^9, 3.50924059978125*^9}, { 3.509241353328125*^9, 3.509241365125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"sechsAkt", " ", "==", " ", RowBox[{"{", RowBox[{"15.9", ",", " ", RowBox[{"-", "52.5"}], ",", " ", RowBox[{"-", "10.9"}], ",", " ", "38.8", ",", " ", "57.1", ",", " ",= "15.", ",", " ", "\n", " ", "41.1", ",", " ", RowBox[{"-", "8.5"}], ",", " ", "31.1"}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.509232543390625*^9, 3.50923274440625*^9}, 3.5092330518125*^9, 3.5092335013125*^9, 3.50923945475*^9, 3.5092399070625*^9, {3.50924057934375*^9, 3.509240599796875*^9}, { 3.509241353359375*^9, 3.509241365171875*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"achtAkt", " ", "==", " ", RowBox[{"{", RowBox[{"20.6", ",", " ", RowBox[{"-", "56.1"}], ",", " ", RowBox[{"-", "17.4"}], ",", " ", "36.", ",", " ", "59.", ",", " ", "11.2", ",", " ", "\n", " ", "38.2", ",", " ", RowBox[{"-", "12.6"}], ",", " ", "31.2"}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.50923274834375*^9, 3.509232804453125*^9}, 3.509233505546875*^9, 3.50923945478125*^9, 3.50923990709375*^9, { 3.509240579359375*^9, 3.5092405998125*^9}, {3.509241353390625*^9, 3.509241365203125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"topdiv", " ", "==", " ", RowBox[{"{", RowBox[{"77.6", ",", " ", RowBox[{"-", "58.3"}], ",", " ", RowBox[{"-", "12.6"}], ",", " ", "24.5", ",", " ", "28.2", ",", " ",= "24.8", ",", " ", "\n", " ", "54.2", ",", " ", RowBox[{"-", "25.1"}], ",", " ", "20."}], "}"}]}], ";"}], " "}]], "Input", CellChangeTimes->{{3.509232956515625*^9, 3.5092330085625*^9}, 3.509233062984375*^9, 3.509233510546875*^9, {3.509233615859375*^9, 3.509233651609375*^9}, {3.509238001890625*^9, 3.50923804834375*^9}, 3.5092394548125*^9, 3.509239609640625*^9, 3.509239907109375*^9, { 3.509240579359375*^9, 3.509240599828125*^9}, {3.509241353421875*^9, 3.509241365234375*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"sup", " ", "==", " ", "\"\<== Summe der Prozentsaetze.\>\""}],= ";"}], " "}], "\n", RowBox[{ RowBox[{ RowBox[{"mip", " ", "==", " ", "\"\<== Mittelwert der Prozentsaetze.\>\"= "}], ";"}], " "}], "\n", RowBox[{ RowBox[{ RowBox[{ "stab", " ", "==", " ", "\n", " ", "\"\<== Standardabweichung der Prozentsaetze.\>\""}], ";"}], " "}]}], "Input", CellChangeTimes->{{3.509232956515625*^9, 3.5092330085625*^9}, 3.509233062984375*^9, 3.509233510546875*^9, {3.509233615859375*^9, 3.509233651609375*^9}, {3.509238001890625*^9, 3.50923804834375*^9}, 3.5092394548125*^9, {3.509239609640625*^9, 3.509239617609375*^9}, 3.509239907125*^9, {3.509240579375*^9, 3.509240599828125*^9}, { 3.509241353453125*^9, 3.509241365265625*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "DAX"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "DAX", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "DAX", "]"}], "*", "stab"}], "\n", RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"DAX", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}], "*= ", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"DAX", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}], "]"}= ], " ", "-", " ", "1"}], ")"}], "*", "100", "*", "\n", " ", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, 3.509234260921875*^9, {3.509234450125*^9, 3.509234477375*^9}, {3.509234543984375*^9, 3.509234562734375*^9}, { 3.509236390859375*^9, 3.509236409796875*^9}, {3.50923813403125*^9, 3.509238168859375*^9}, {3.5092382470625*^9, 3.509238275421875*^9}, { 3.50923835625*^9, 3.50923836853125*^9}, 3.509239454828125*^9, { 3.509239640578125*^9, 3.5092396571875*^9}, 3.509239907140625*^9, { 3.509240579375*^9, 3.50924059984375*^9}, {3.50924135346875*^9, 3.509241365296875*^9}}], Cell[BoxData[ RowBox[{"33.199999999999996`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234351375*^9, 3.50923445996875*^9, 3.509234563546875*^9, 3.509236417609375*^9, {3.50923815103125*^9, 3.509238170203125*^9}, 3.509238280359375*^9, {3.509238360015625*^9, 3.50923837328125*^9}, 3.509239454953125*^9, 3.50923954934375*^9, {3.50923965234375*^9, 3.509239658703125*^9}, 3.50923970146875*^9, 3.509239862875*^9, 3.50923990715625*^9, {3.509240579390625*^9, 3.50924059984375*^9}, { 3.5092413535*^9, 3.5092413653125*^9}, 3.5092884679375*^9}], Cell[BoxData[ RowBox[{"3.688888888888888`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234351375*^9, 3.50923445996875*^9, 3.509234563546875*^9, 3.509236417609375*^9, {3.50923815103125*^9, 3.509238170203125*^9}, 3.509238280359375*^9, {3.509238360015625*^9, 3.50923837328125*^9}, 3.509239454953125*^9, 3.50923954934375*^9, {3.50923965234375*^9, 3.509239658703125*^9}, 3.50923970146875*^9, 3.509239862875*^9, 3.50923990715625*^9, {3.509240579390625*^9, 3.50924059984375*^9}, { 3.5092413535*^9, 3.5092413653125*^9}, 3.509288467953125*^9}], Cell[BoxData[ RowBox[{"30.065114520172898`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234351375*^9, 3.50923445996875*^9, 3.509234563546875*^9, 3.509236417609375*^9, {3.50923815103125*^9, 3.509238170203125*^9}, 3.509238280359375*^9, {3.509238360015625*^9, 3.50923837328125*^9}, 3.509239454953125*^9, 3.50923954934375*^9, {3.50923965234375*^9, 3.509239658703125*^9}, 3.50923970146875*^9, 3.509239862875*^9, 3.50923990715625*^9, {3.509240579390625*^9, 3.50924059984375*^9}, { 3.5092413535*^9, 3.5092413653125*^9}, 3.509288468*^9}], Cell[BoxData[ RowBox[{"0.9537286110555445`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.509234351375*^9, 3.50923445996875*^9, 3.509234563546875*^9, 3.509236417609375*^9, {3.50923815103125*^9, 3.509238170203125*^9}, 3.509238280359375*^9, {3.509238360015625*^9, 3.50923837328125*^9}, 3.509239454953125*^9, 3.50923954934375*^9, {3.50923965234375*^9, 3.509239658703125*^9}, 3.50923970146875*^9, 3.509239862875*^9, 3.50923990715625*^9, {3.509240579390625*^9, 3.50924059984375*^9}, { 3.5092413535*^9, 3.5092413653125*^9}, 3.50928846803125*^9}], Cell[BoxData[ RowBox[{ RowBox[{"-", "0.5250183002276199`"}], " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.509234351375*^9, 3.50923445996875*^9, 3.509234563546875*^9, 3.509236417609375*^9, {3.50923815103125*^9, 3.509238170203125*^9}, 3.509238280359375*^9, {3.509238360015625*^9, 3.50923837328125*^9}, 3.509239454953125*^9, 3.50923954934375*^9, {3.50923965234375*^9, 3.509239658703125*^9}, 3.50923970146875*^9, 3.509239862875*^9, 3.50923990715625*^9, {3.509240579390625*^9, 3.50924059984375*^9}, { 3.5092413535*^9, 3.5092413653125*^9}, 3.509288468046875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "SMI"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "SMI", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "SMI", "]"}], "*", "stab"}], "\n", RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"SMI", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}], "*= ", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"SMI", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}], "]"}= ], " ", "-", " ", "1"}], ")"}], "*", "100", "*", "\n", " ", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, {3.509234260921875*^9, 3.5092342655625*^9}, { 3.509234732828125*^9, 3.50923474796875*^9}, {3.5092365049375*^9, 3.509236564234375*^9}, {3.509238422171875*^9, 3.50923848396875*^9}, { 3.509238654703125*^9, 3.509238655765625*^9}, 3.509239455*^9, 3.5092399071875*^9, {3.5092405794375*^9, 3.509240599890625*^9}, { 3.5092413535625*^9, 3.509241365359375*^9}}], Cell[BoxData[ RowBox[{"14.600000000000001`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343489375*^9, 3.50923475115625*^9, {3.509236548421875*^9, 3.50923656596875*^9}, 3.509238437671875*^9, 3.50923848515625*^9, 3.509238657140625*^9, 3.509239455015625*^9, 3.509239549484375*^9, 3.509239701578125*^9, 3.5092398629375*^9, 3.509239907203125*^9, { 3.5092405794375*^9, 3.509240599890625*^9}, {3.509241353578125*^9, 3.509241365375*^9}, 3.509288468078125*^9}], Cell[BoxData[ RowBox[{"1.8250000000000004`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343489375*^9, 3.50923475115625*^9, {3.509236548421875*^9, 3.50923656596875*^9}, 3.509238437671875*^9, 3.50923848515625*^9, 3.509238657140625*^9, 3.509239455015625*^9, 3.509239549484375*^9, 3.509239701578125*^9, 3.5092398629375*^9, 3.509239907203125*^9, { 3.5092405794375*^9, 3.509240599890625*^9}, {3.509241353578125*^9, 3.509241365375*^9}, 3.50928846809375*^9}], Cell[BoxData[ RowBox[{"23.252449947724404`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343489375*^9, 3.50923475115625*^9, {3.509236548421875*^9, 3.50923656596875*^9}, 3.509238437671875*^9, 3.50923848515625*^9, 3.509238657140625*^9, 3.509239455015625*^9, 3.509239549484375*^9, 3.509239701578125*^9, 3.5092398629375*^9, 3.509239907203125*^9, { 3.5092405794375*^9, 3.509240599890625*^9}, {3.509241353578125*^9, 3.509241365375*^9}, 3.509288468125*^9}], Cell[BoxData[ RowBox[{"0.9570312366050214`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343489375*^9, 3.50923475115625*^9, {3.509236548421875*^9, 3.50923656596875*^9}, 3.509238437671875*^9, 3.50923848515625*^9, 3.509238657140625*^9, 3.509239455015625*^9, 3.509239549484375*^9, 3.509239701578125*^9, 3.5092398629375*^9, 3.509239907203125*^9, { 3.5092405794375*^9, 3.509240599890625*^9}, {3.509241353578125*^9, 3.509241365375*^9}, 3.509288468125*^9}], Cell[BoxData[ RowBox[{ RowBox[{"-", "0.4868028989032047`"}], " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343489375*^9, 3.50923475115625*^9, {3.509236548421875*^9, 3.50923656596875*^9}, 3.509238437671875*^9, 3.50923848515625*^9, 3.509238657140625*^9, 3.509239455015625*^9, 3.509239549484375*^9, 3.509239701578125*^9, 3.5092398629375*^9, 3.509239907203125*^9, { 3.5092405794375*^9, 3.509240599890625*^9}, {3.509241353578125*^9, 3.509241365375*^9}, 3.509288468125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "ESTX50"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "ESTX50", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "ESTX50", "]"}], "*", "stab"}], "\n",= RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"ESTX50", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}],= "*", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"ESTX50", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}],= "]"}], " ", "-", " ", "1"}], ")"}], "*", "100", "*", "\n", " ", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, {3.509234260921875*^9, 3.50923427290625*^9}, { 3.50923476046875*^9, 3.50923478734375*^9}, {3.50923659540625*^9, 3.509236619359375*^9}, {3.50923852603125*^9, 3.50923858853125*^9}, { 3.50923864034375*^9, 3.509238641109375*^9}, 3.5092394550625*^9, 3.509239907234375*^9, {3.509240579484375*^9, 3.5092405999375*^9}, { 3.509241353609375*^9, 3.509241365421875*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"-", "19.300000000000004`"}], " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.50923434603125*^9, 3.509234788859375*^9, 3.509236620828125*^9, 3.509238594234375*^9, 3.509238642234375*^9, 3.5092394550625*^9, 3.509239549609375*^9, 3.50923970165625*^9, 3.5092398630625*^9, 3.509239907234375*^9, {3.509240579484375*^9, 3.509240599953125*^9}, { 3.509241353625*^9, 3.509241365421875*^9}, 3.509288468171875*^9}], Cell[BoxData[ RowBox[{ RowBox[{"-", "2.1444444444444444`"}], " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.50923434603125*^9, 3.509234788859375*^9, 3.509236620828125*^9, 3.509238594234375*^9, 3.509238642234375*^9, 3.5092394550625*^9, 3.509239549609375*^9, 3.50923970165625*^9, 3.5092398630625*^9, 3.509239907234375*^9, {3.509240579484375*^9, 3.509240599953125*^9}, { 3.509241353625*^9, 3.509241365421875*^9}, 3.5092884681875*^9}], Cell[BoxData[ RowBox[{"25.229700310899013`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.50923434603125*^9, 3.509234788859375*^9, 3.509236620828125*^9, 3.509238594234375*^9, 3.509238642234375*^9, 3.5092394550625*^9, 3.509239549609375*^9, 3.50923970165625*^9, 3.5092398630625*^9, 3.509239907234375*^9, {3.509240579484375*^9, 3.509240599953125*^9}, { 3.509241353625*^9, 3.509241365421875*^9}, 3.50928846821875*^9}], Cell[BoxData[ RowBox[{"0.6142236752873366`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.50923434603125*^9, 3.509234788859375*^9, 3.509236620828125*^9, 3.509238594234375*^9, 3.509238642234375*^9, 3.5092394550625*^9, 3.509239549609375*^9, 3.50923970165625*^9, 3.5092398630625*^9, 3.509239907234375*^9, {3.509240579484375*^9, 3.509240599953125*^9}, { 3.509241353625*^9, 3.509241365421875*^9}, 3.50928846821875*^9}], Cell[BoxData[ RowBox[{ RowBox[{"-", "5.271485252326535`"}], " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.50923434603125*^9, 3.509234788859375*^9, 3.509236620828125*^9, 3.509238594234375*^9, 3.509238642234375*^9, 3.5092394550625*^9, 3.509239549609375*^9, 3.50923970165625*^9, 3.5092398630625*^9, 3.509239907234375*^9, {3.509240579484375*^9, 3.509240599953125*^9}, { 3.509241353625*^9, 3.509241365421875*^9}, 3.509288468234375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "SP500"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "SP500", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "SP500", "]"}], "*", "stab"}], "\n", RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"SP500", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}],= "*", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"SP500", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}], "]"}], " ", "-", " ", "1"}], ")"}], "*", "100", "*", "\n", " ", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, {3.509234260921875*^9, 3.5092342790625*^9}, { 3.509234799890625*^9, 3.509234818796875*^9}, {3.509236634171875*^9, 3.509236655140625*^9}, {3.50923862028125*^9, 3.50923862471875*^9}, { 3.509238681796875*^9, 3.50923868303125*^9}, {3.509238725640625*^9, 3.509238735515625*^9}, {3.509239184765625*^9, 3.50923919634375*^9}, 3.509239455109375*^9, 3.5092399073125*^9, {3.50924057953125*^9, 3.509240599984375*^9}, {3.50924135365625*^9, 3.50924136546875*^9}}], Cell[BoxData[ RowBox[{"10.5`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343403125*^9, 3.509234819609375*^9, 3.509236656375*^9, 3.5092386840625*^9, 3.50923873659375*^9, 3.509239455109375*^9, 3.50923954975*^9, 3.50923970178125*^9, 3.50923986315625*^9, 3.5092399073125*^9, {3.50924057953125*^9, 3.5092406*^9}, { 3.509241353671875*^9, 3.509241365484375*^9}, 3.509288468265625*^9}], Cell[BoxData[ RowBox[{"1.166666666666667`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343403125*^9, 3.509234819609375*^9, 3.509236656375*^9, 3.5092386840625*^9, 3.50923873659375*^9, 3.509239455109375*^9, 3.50923954975*^9, 3.50923970178125*^9, 3.50923986315625*^9, 3.5092399073125*^9, {3.50924057953125*^9, 3.5092406*^9}, { 3.509241353671875*^9, 3.509241365484375*^9}, 3.50928846828125*^9}], Cell[BoxData[ RowBox[{"22.291590342548467`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343403125*^9, 3.509234819609375*^9, 3.509236656375*^9, 3.5092386840625*^9, 3.50923873659375*^9, 3.509239455109375*^9, 3.50923954975*^9, 3.50923970178125*^9, 3.50923986315625*^9, 3.5092399073125*^9, {3.50924057953125*^9, 3.5092406*^9}, { 3.509241353671875*^9, 3.509241365484375*^9}, 3.5092884683125*^9}], Cell[BoxData[ RowBox[{"0.8984172725277969`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343403125*^9, 3.509234819609375*^9, 3.509236656375*^9, 3.5092386840625*^9, 3.50923873659375*^9, 3.509239455109375*^9, 3.50923954975*^9, 3.50923970178125*^9, 3.50923986315625*^9, 3.5092399073125*^9, {3.50924057953125*^9, 3.5092406*^9}, { 3.509241353671875*^9, 3.509241365484375*^9}, 3.5092884683125*^9}], Cell[BoxData[ RowBox[{ RowBox[{"-", "1.1831742311298687`"}], " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343403125*^9, 3.509234819609375*^9, 3.509236656375*^9, 3.5092386840625*^9, 3.50923873659375*^9, 3.509239455109375*^9, 3.50923954975*^9, 3.50923970178125*^9, 3.50923986315625*^9, 3.5092399073125*^9, {3.50924057953125*^9, 3.5092406*^9}, { 3.509241353671875*^9, 3.509241365484375*^9}, 3.5092884683125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "dreiAkt"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "dreiAkt", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "dreiAkt", "]"}], "*", "stab"}], "\n",= RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"dreiAkt", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}]= , "*", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"dreiAkt", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}],= "]"}], " ", "-", " ", "1"}], ")"}], "*", "\n", " ", "100", "*", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, {3.509234260921875*^9, 3.509234283625*^9}, { 3.50923483103125*^9, 3.509234865625*^9}, {3.509236673171875*^9, 3.50923668303125*^9}, {3.5092367275625*^9, 3.509236829125*^9}, { 3.509236866140625*^9, 3.509236891125*^9}, {3.509236926375*^9, 3.509236928921875*^9}, {3.509237006625*^9, 3.50923701934375*^9}, { 3.50923727996875*^9, 3.50923731453125*^9}, {3.5092373553125*^9, 3.50923742021875*^9}, {3.509237831453125*^9, 3.50923785725*^9}, { 3.509238755640625*^9, 3.509238765515625*^9}, {3.5092388686875*^9, 3.509238877875*^9}, 3.5092394551875*^9, {3.50923974353125*^9, 3.5092397721875*^9}, 3.50923990734375*^9, {3.509240579578125*^9, 3.50924060003125*^9}, {3.509241353703125*^9, 3.50924136553125*^9}}], Cell[BoxData[ RowBox[{"146.7`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234326328125*^9, 3.509234867203125*^9, 3.50923668609375*^9, 3.509236758609375*^9, 3.5092368303125*^9, {3.509236881546875*^9, 3.509236892015625*^9}, 3.5092370365*^9, {3.509237287609375*^9, 3.5092373155625*^9}, 3.50923743884375*^9, 3.509237840609375*^9, 3.5092387664375*^9, 3.509238879046875*^9, 3.509239455203125*^9, 3.50923954984375*^9, 3.50923970190625*^9, 3.509239781078125*^9, 3.509239863359375*^9, 3.509239907359375*^9, {3.509240579578125*^9, 3.509240600046875*^9}, {3.50924135371875*^9, 3.50924136553125*^9}, 3.509288468359375*^9}], Cell[BoxData[ RowBox[{"16.3`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Outp= ut", CellChangeTimes->{ 3.509234326328125*^9, 3.509234867203125*^9, 3.50923668609375*^9, 3.509236758609375*^9, 3.5092368303125*^9, {3.509236881546875*^9, 3.509236892015625*^9}, 3.5092370365*^9, {3.509237287609375*^9, 3.5092373155625*^9}, 3.50923743884375*^9, 3.509237840609375*^9, 3.5092387664375*^9, 3.509238879046875*^9, 3.509239455203125*^9, 3.50923954984375*^9, 3.50923970190625*^9, 3.509239781078125*^9, 3.509239863359375*^9, 3.509239907359375*^9, {3.509240579578125*^9, 3.509240600046875*^9}, {3.50924135371875*^9, 3.50924136553125*^9}, 3.509288468359375*^9}], Cell[BoxData[ RowBox[{"39.64634283259933`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234326328125*^9, 3.509234867203125*^9, 3.50923668609375*^9, 3.509236758609375*^9, 3.5092368303125*^9, {3.509236881546875*^9, 3.509236892015625*^9}, 3.5092370365*^9, {3.509237287609375*^9, 3.5092373155625*^9}, 3.50923743884375*^9, 3.509237840609375*^9, 3.5092387664375*^9, 3.509238879046875*^9, 3.509239455203125*^9, 3.50923954984375*^9, 3.50923970190625*^9, 3.509239781078125*^9, 3.509239863359375*^9, 3.509239907359375*^9, {3.509240579578125*^9, 3.509240600046875*^9}, {3.50924135371875*^9, 3.50924136553125*^9}, 3.509288468359375*^9}], Cell[BoxData[ RowBox[{"2.2406836449268344`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.509234326328125*^9, 3.509234867203125*^9, 3.50923668609375*^9, 3.509236758609375*^9, 3.5092368303125*^9, {3.509236881546875*^9, 3.509236892015625*^9}, 3.5092370365*^9, {3.509237287609375*^9, 3.5092373155625*^9}, 3.50923743884375*^9, 3.509237840609375*^9, 3.5092387664375*^9, 3.509238879046875*^9, 3.509239455203125*^9, 3.50923954984375*^9, 3.50923970190625*^9, 3.509239781078125*^9, 3.509239863359375*^9, 3.509239907359375*^9, {3.509240579578125*^9, 3.509240600046875*^9}, {3.50924135371875*^9, 3.50924136553125*^9}, 3.509288468390625*^9}], Cell[BoxData[ RowBox[{"9.378300619365332`", " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.509234326328125*^9, 3.509234867203125*^9, 3.50923668609375*^9, 3.509236758609375*^9, 3.5092368303125*^9, {3.509236881546875*^9, 3.509236892015625*^9}, 3.5092370365*^9, {3.509237287609375*^9, 3.5092373155625*^9}, 3.50923743884375*^9, 3.509237840609375*^9, 3.5092387664375*^9, 3.509238879046875*^9, 3.509239455203125*^9, 3.50923954984375*^9, 3.50923970190625*^9, 3.509239781078125*^9, 3.509239863359375*^9, 3.509239907359375*^9, {3.509240579578125*^9, 3.509240600046875*^9}, {3.50924135371875*^9, 3.50924136553125*^9}, 3.509288468421875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "sechsAkt"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "sechsAkt", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "sechsAkt", "]"}], "*", "stab"}], "\n",= RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"sechsAkt", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}= ], "*", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"sechsAkt", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}],= "]"}], " ", "-", " ", "1"}], ")"}], "*", "\n", " ", "100", "*", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, {3.509234260921875*^9, 3.50923428846875*^9}, { 3.50923487578125*^9, 3.509234897265625*^9}, {3.509238786953125*^9, 3.509238855328125*^9}, 3.50923945525*^9, 3.509239907390625*^9, { 3.509240579625*^9, 3.509240600078125*^9}, {3.509241353765625*^9, 3.50924136559375*^9}}], Cell[BoxData[ RowBox[{"127.10000000000001`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234323140625*^9, 3.50923490109375*^9, 3.509238819640625*^9, 3.509238857703125*^9, 3.509239455265625*^9, 3.50923954996875*^9, 3.50923970203125*^9, 3.509239863515625*^9, 3.50923990740625*^9, { 3.509240579625*^9, 3.50924060009375*^9}, {3.509241353765625*^9, 3.509241365609375*^9}, 3.509288468453125*^9}], Cell[BoxData[ RowBox[{"14.122222222222222`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234323140625*^9, 3.50923490109375*^9, 3.509238819640625*^9, 3.509238857703125*^9, 3.509239455265625*^9, 3.50923954996875*^9, 3.50923970203125*^9, 3.509239863515625*^9, 3.50923990740625*^9, { 3.509240579625*^9, 3.50924060009375*^9}, {3.509241353765625*^9, 3.509241365609375*^9}, 3.50928846846875*^9}], Cell[BoxData[ RowBox[{"33.63862280837972`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509234323140625*^9, 3.50923490109375*^9, 3.509238819640625*^9, 3.509238857703125*^9, 3.509239455265625*^9, 3.50923954996875*^9, 3.50923970203125*^9, 3.509239863515625*^9, 3.50923990740625*^9, { 3.509240579625*^9, 3.50924060009375*^9}, {3.509241353765625*^9, 3.509241365609375*^9}, 3.5092884685*^9}], Cell[BoxData[ RowBox[{"2.0819439853448785`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.509234323140625*^9, 3.50923490109375*^9, 3.509238819640625*^9, 3.509238857703125*^9, 3.509239455265625*^9, 3.50923954996875*^9, 3.50923970203125*^9, 3.509239863515625*^9, 3.50923990740625*^9, { 3.509240579625*^9, 3.50924060009375*^9}, {3.509241353765625*^9, 3.509241365609375*^9}, 3.5092884685*^9}], Cell[BoxData[ RowBox[{"8.488935766070615`", " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.509234323140625*^9, 3.50923490109375*^9, 3.509238819640625*^9, 3.509238857703125*^9, 3.509239455265625*^9, 3.50923954996875*^9, 3.50923970203125*^9, 3.509239863515625*^9, 3.50923990740625*^9, { 3.509240579625*^9, 3.50924060009375*^9}, {3.509241353765625*^9, 3.509241365609375*^9}, 3.509288468515625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "achtAkt"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "achtAkt", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "achtAkt", "]"}], "*", "stab"}], "\n",= RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"achtAkt", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}]= , "*", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"achtAkt", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}],= "]"}], " ", "-", " ", "1"}], ")"}], "*", "\n", " ", "100", "*", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.509233846546875*^9, 3.509233850078125*^9}, { 3.5092339425625*^9, 3.509234034375*^9}, {3.509234124984375*^9, 3.509234187546875*^9}, {3.509234260921875*^9, 3.509234293890625*^9}, { 3.509234922234375*^9, 3.50923492684375*^9}, {3.50923496959375*^9, 3.509234983765625*^9}, {3.509238922140625*^9, 3.509238970625*^9}, 3.5092394553125*^9, 3.5092399074375*^9, {3.509240579671875*^9, 3.509240600140625*^9}, {3.5092413538125*^9, 3.50924136565625*^9}}], Cell[BoxData[ RowBox[{"110.1`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343205625*^9, 3.509234930796875*^9, 3.509234984640625*^9, 3.509238971921875*^9, 3.509239455328125*^9, 3.50923955009375*^9, 3.509239702140625*^9, 3.50923986378125*^9, 3.5092399074375*^9, { 3.5092405796875*^9, 3.509240600140625*^9}, {3.509241353828125*^9, 3.509241365671875*^9}, 3.5092884685625*^9}], Cell[BoxData[ RowBox[{"12.233333333333334`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343205625*^9, 3.509234930796875*^9, 3.509234984640625*^9, 3.509238971921875*^9, 3.509239455328125*^9, 3.50923955009375*^9, 3.509239702140625*^9, 3.50923986378125*^9, 3.5092399074375*^9, { 3.5092405796875*^9, 3.509240600140625*^9}, {3.509241353828125*^9, 3.509241365671875*^9}, 3.5092884685625*^9}], Cell[BoxData[ RowBox[{"35.393007784024235`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343205625*^9, 3.509234930796875*^9, 3.509234984640625*^9, 3.509238971921875*^9, 3.509239455328125*^9, 3.50923955009375*^9, 3.509239702140625*^9, 3.50923986378125*^9, 3.5092399074375*^9, { 3.5092405796875*^9, 3.509240600140625*^9}, {3.509241353828125*^9, 3.509241365671875*^9}, 3.5092884685625*^9}], Cell[BoxData[ RowBox[{"1.6664258965929828`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343205625*^9, 3.509234930796875*^9, 3.509234984640625*^9, 3.509238971921875*^9, 3.509239455328125*^9, 3.50923955009375*^9, 3.509239702140625*^9, 3.50923986378125*^9, 3.5092399074375*^9, { 3.5092405796875*^9, 3.509240600140625*^9}, {3.509241353828125*^9, 3.509241365671875*^9}, 3.50928846859375*^9}], Cell[BoxData[ RowBox[{"5.8383083012832016`", " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.5092343205625*^9, 3.509234930796875*^9, 3.509234984640625*^9, 3.509238971921875*^9, 3.509239455328125*^9, 3.50923955009375*^9, 3.509239702140625*^9, 3.50923986378125*^9, 3.5092399074375*^9, { 3.5092405796875*^9, 3.509240600140625*^9}, {3.509241353828125*^9, 3.509241365671875*^9}, 3.509288468625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Plus", " ", "@@", " ", "topdiv"}], "*", "sup"}], "\n", RowBox[{ RowBox[{"Mean", "[", "topdiv", "]"}], "*", "mip"}], "\n", RowBox[{ RowBox[{"StandardDeviation", "[", "topdiv", "]"}], "*", "stab"}], "\n",= RowBox[{ RowBox[{"Exp", "[", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"topdiv", "/", "100"}], " ", "+", " ", "1"}], "]"}]}], "]"}],= "*", "\n", " ", "\"\<== total return over nine years.\>\""}], "\n", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "9"}], ")"}], "*", RowBox[{"Plus", " ", "@@", " ", RowBox[{"Log", "[", RowBox[{ RowBox[{"topdiv", "/", "100"}], " ", "+", " ", "1"}], "]"}]}]}],= "]"}], " ", "-", " ", "1"}], ")"}], "*", "100", "*", "\n", " ", "\"\<% p.a.\>\""}]}], "Input", CellChangeTimes->{{3.50923933546875*^9, 3.50923936825*^9}, 3.509239455375*= ^9, 3.509239907484375*^9, {3.509240579765625*^9, 3.50924060021875*^9}, { 3.509241353875*^9, 3.509241365703125*^9}}], Cell[BoxData[ RowBox[{"133.3`", " ", "\<\"== Summe der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509239374359375*^9, 3.509239455390625*^9, 3.509239550296875*^9, 3.509239702234375*^9, 3.509239863921875*^9, 3.509239907484375*^9, { 3.50924057984375*^9, 3.50924060025*^9}, {3.509241353875*^9, 3.50924136571875*^9}, 3.509288468671875*^9}], Cell[BoxData[ RowBox[{"14.811111111111112`", " ", "\<\"== Mittelwert der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509239374359375*^9, 3.509239455390625*^9, 3.509239550296875*^9, 3.509239702234375*^9, 3.509239863921875*^9, 3.509239907484375*^9, { 3.50924057984375*^9, 3.50924060025*^9}, {3.509241353875*^9, 3.50924136571875*^9}, 3.5092884686875*^9}], Cell[BoxData[ RowBox[{"41.20568663559814`", " ", "\<\"== Standardabweichung der Prozentsaetze.\"\>"}]], "Output", CellChangeTimes->{ 3.509239374359375*^9, 3.509239455390625*^9, 3.509239550296875*^9, 3.509239702234375*^9, 3.509239863921875*^9, 3.509239907484375*^9, { 3.50924057984375*^9, 3.50924060025*^9}, {3.509241353875*^9, 3.50924136571875*^9}, 3.509288468734375*^9}], Cell[BoxData[ RowBox[{"1.7869394980564808`", " ", "\<\"== total return over nine years.\"\>"}]], "Output", CellChangeTimes->{ 3.509239374359375*^9, 3.509239455390625*^9, 3.509239550296875*^9, 3.509239702234375*^9, 3.509239863921875*^9, 3.509239907484375*^9, { 3.50924057984375*^9, 3.50924060025*^9}, {3.509241353875*^9, 3.50924136571875*^9}, 3.50928846875*^9}], Cell[BoxData[ RowBox[{"6.662609720464774`", " ", "\<\"% p.a.\"\>"}]], "Output", CellChangeTimes->{ 3.509239374359375*^9, 3.509239455390625*^9, 3.509239550296875*^9, 3.509239702234375*^9, 3.509239863921875*^9, 3.509239907484375*^9, { 3.50924057984375*^9, 3.50924060025*^9}, {3.509241353875*^9, 3.50924136571875*^9}, 3.50928846878125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["Round"], "Input", CellChangeTimes->{{3.509240414296875*^9, 3.509240415953125*^9}, { 3.50924057996875*^9, 3.509240600390625*^9}, {3.509241353921875*^9, 3.50924136575*^9}}], Cell[BoxData["Round"], "Output", CellChangeTimes->{3.50928846896875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Log", "[", RowBox[{"-", "5"}], "]"}]], "Input", CellChangeTimes->{{3.5092894855*^9, 3.50928949290625*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"I", " ", "\[Pi]"}], "+", RowBox[{"Log", "[", "5", "]"}]}]], "Output", CellChangeTimes->{3.509289494140625*^9}] }, Open ]], Cell[BoxData[ RowBox[{"<<", "Units`"}]], "Input", CellChangeTimes->{{3.509309534132434*^9, 3.509309538819934*^9}, { 3.509309887101184*^9, 3.509309893007434*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Convert", "[", RowBox[{ RowBox[{"1", " ", "Kilogram"}], ",", " ", "TroyOunce"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FinancialData", "[", "\"\<XAU/EUR\>\"", "]"}], "*", RowBox[{"%", "[", RowBox[{"[", "1", "]"}], "]"}], "\"\<EUR/kg Au\>\""}]}], "Input", CellChangeTimes->{{3.509309800788684*^9, 3.509309803569934*^9}, { 3.509309939038684*^9, 3.509309988913684*^9}, {3.5093100258980584`*^9, 3.509310047726184*^9}, {3.5093140060543084`*^9, 3.5093140428355584`*^9}}]= , Cell[BoxData[ RowBox[{"32213.146641803043`", " ", "\<\"EUR/kg Au\"\>"}]], "Output", CellChangeTimes->{ 3.5093098257730584`*^9,ebook[{ Cell[557, 20, 785, 17, 67, "Input"], Cell[1345, 39, 639, 15, 67, "Input"], Cell[1987, 56, 647, 15, 67, "Input"], Cell[2637, 73, 670, 15, 67, "Input"], Cell[3310, 90, 653, 15, 67, "Input"], Cell[3966, 107, 651, 15, 67, "Input"], Cell[4620, 124, 635, 15, 67, "Input"], Cell[5258, 141, 779, 17, 67, "Input"], Cell[6040, 160, 834, 21, 113, "Input"], Cell[CellGroupData[{ Cell[6899, 185, 1566, 37, 182, "Input"], Cell[8468, 224, 605, 11, 42, "Output"], Cell[9076, 237, 623, 11, 65, "Output"], Cell[9702, 250, 638, 11, 65, "Output"], Cell[10343, 263, 629, 11, 65, "Output"], Cell[10975, 276, 603, 11, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[11615, 292, 1447, 35, 182, "Input"], Cell[13065, 329, 518, 10, 42, "Output"], Cell[13586, 341, 538, 10, 65, "Output"], Cell[14127, 353, 547, 10, 65, "Output"], Cell[14677, 365, 533, 10, 65, "Output"], Cell[15213, 377, 517, 10, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[15767, 392, 1470, 35, 182, "Input"], Cell[17240, 429, 489, 10, 42, "Output"], Cell[17732, 441, 495, 10, 65, "Output"], Cell[18230, 453, 491, 9, 65, "Output"], Cell[18724, 464, 486, 9, 65, "Output"], Cell[19213, 475, 467, 9, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[19717, 489, 1561, 36, 182, "Input"], Cell[21281, 527, 438, 8, 42, "Output"], Cell[21722, 537, 474, 9, 65, "Output"], Cell[22199, 548, 483, 9, 65, "Output"], Cell[22685, 559, 475, 9, 65, "Output"], Cell[23163, 570, 458, 9, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[23658, 584, 1829, 40, 182, "Input"], Cell[25490, 626, 683, 11, 42, "Output"], Cell[26176, 639, 687, 11, 42, "Output"], Cell[26866, 652, 717, 12, 65, "Output"], Cell[27586, 666, 705, 12, 65, "Output"], Cell[28294, 680, 673, 11, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[29004, 696, 1385, 34, 182, "Input"], Cell[30392, 732, 450, 9, 42, "Output"], Cell[30845, 743, 469, 9, 65, "Output"], Cell[31317, 754, 474, 9, 65, "Output"], Cell[31794, 765, 464, 9, 65, "Output"], Cell[32261, 776, 428, 8, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[32726, 789, 1424, 34, 182, "Input"], Cell[34153, 825, 434, 8, 42, "Output"], Cell[34590, 835, 467, 9, 65, "Output"], Cell[35060, 846, 476, 9, 65, "Output"], Cell[35539, 857, 468, 9, 65, "Output"], Cell[36010, 868, 427, 8, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[36474, 881, 1132, 30, 182, "Input"], Cell[37609, 913, 363, 7, 42, "Output"], Cell[37975, 922, 395, 8, 65, "Output"], Cell[38373, 932, 403, 8, 65, "Output"], Cell[38779, 942, 402, 8, 65, "Output"], Cell[39184, 952, 354, 7, 42, "Output"] }, Open ]], Cell[39553, 962, 216, 4, 43, "Input"] } ] *) (* End of internal cache information *)