(*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 0, 0] NotebookDataLength[ 179707, 4068] NotebookOptionsPosition[ 175399, 3918] NotebookOutlinePosition[ 176036, 3941] CellTagsIndexPosition[ 175993, 3938] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["243 Thermisches Rauschen", "Title", CellChangeTimes->{{3.581153342988996*^9, 3.581153346882925*^9}}], Cell[BoxData[ StyleBox[ RowBox[{"Needs", "[", "\"\\"", "]"}], FontColor->GrayLevel[0.5]]], "Input", CellChangeTimes->{{3.5811565589627857`*^9, 3.5811565640304327`*^9}}], Cell[CellGroupData[{ Cell["\<\ Messung des Frequenzgangs des Verst\[ADoubleDot]rkers und des Bandfilters\ \>", "Section", CellChangeTimes->{{3.581155390873399*^9, 3.581155397871236*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{"Decrease", ",", "\[CapitalDelta]Decrease"}], "}"}], "=", " ", RowBox[{"0.001", "*", RowBox[{"{", RowBox[{"1", ",", "0.002"}], "}"}]}]}]], "Input", CellChangeTimes->{{3.581155469049398*^9, 3.5811555021382227`*^9}, { 3.581156372920917*^9, 3.581156377402134*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"0.001`", ",", "2.`*^-6"}], "}"}]], "Output", CellChangeTimes->{{3.5811554822591543`*^9, 3.5811555026044407`*^9}, 3.5811563778351192`*^9, {3.582817360559898*^9, 3.582817386971895*^9}, 3.582820321924724*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Uin", "=", RowBox[{"Quantity", "[", RowBox[{"0.2", ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.581155508679585*^9, 3.58115554205056*^9}, { 3.581156273071377*^9, 3.581156284855835*^9}}], Cell[BoxData[ TemplateBox[{"0.2`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"V\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: volts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Volts\""}], "]"}]& )]], "Output", CellChangeTimes->{ 3.581155542519855*^9, {3.581156273537385*^9, 3.581156285255828*^9}, { 3.582817360597107*^9, 3.58281738701869*^9}, 3.582820321973868*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[Nu]", "=", RowBox[{"Quantity", "[", RowBox[{"100", ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.5811555475898*^9, 3.581155553732974*^9}}], Cell[BoxData[ TemplateBox[{"100"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"Hz\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: hertz"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Hertz\""}], "]"}]& )]], "Output", CellChangeTimes->{ 3.5811555541907473`*^9, {3.582817360643105*^9, 3.582817387068287*^9}, 3.582820322028675*^9}] }, Open ]], Cell[TextData[StyleBox["Einstellungen\nVertical Scale: 5 db/div\nV-Range: 0.1 \ V\nFrequency Range: 1 MHz\nFrequency Start: 100 Hz\nFrequency Step Size: 20%\n\ Automatic Voltage Scale", FontFamily->"Helvetica Neue UltraLight"]], "Text", CellChangeTimes->{{3.5811555650788927`*^9, 3.5811555998499537`*^9}, { 3.5811556438563833`*^9, 3.581155651758511*^9}, {3.581155711826528*^9, 3.581155760551477*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"data2", " ", "=", " ", RowBox[{ RowBox[{"StringSplit", "@", RowBox[{ RowBox[{"StringSplit", "[", RowBox[{ RowBox[{ "Import", "[", "\"\\"", "]"}], ",", "\"\<\\n\>\""}], "]"}], "[", RowBox[{"[", RowBox[{"2", ";;"}], "]"}], "]"}]}], "//", "ToExpression"}]}], ";"}]], "Input", CellChangeTimes->{{3.581156069479879*^9, 3.581156163094626*^9}, { 3.581156231394272*^9, 3.581156242190362*^9}, {3.58115629738204*^9, 3.5811562983345222`*^9}, {3.581156429566*^9, 3.581156430974382*^9}, { 3.582817375422016*^9, 3.58281737905482*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Uout", "=", RowBox[{"data2", "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.581156309592177*^9, 3.581156329478853*^9}, { 3.581156436868431*^9, 3.581156449283967*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Max", "[", "Uout", "]"}]], "Input", CellChangeTimes->{{3.5811588175454493`*^9, 3.581158819833561*^9}}], Cell[BoxData["0.221`"], "Output", CellChangeTimes->{ 3.5811588202510233`*^9, {3.582817361027213*^9, 3.5828173873175592`*^9}, 3.582820322237234*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLogLogPlot", "[", RowBox[{"data2", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.5811588390123568`*^9, 3.58115885260546*^9}}], Cell[BoxData[ GraphicsBox[{{{}, {{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[CompressedData[" 1:eJxF1Xs41NkfB/AZci+5jrkYDObrlqRWsW6HdqMI0WxRIblsFyu3whSRS1Es FeVSSpssPcUSXcb3kNKUdUmba0ZWSdIkZMb11+/Znu/5Y555Xs/7cz7nO985 z/mwAsI8gyRIJFLNt8//vymcmgeVB1VAQN0dq8Y+KuTH/mQTiKkS9j21adS2 CTmpeceeWVc1wm6RStzcx8hehecZcebqhMPOxtJUzyHLNOgVrvqIPFHr6aVn RyFc2MbeLJ2O3H3B36eiHRkqbuA1qmgQTjWv1eryQD5zX9jrm4Hs5/IQPGxE zv43kus4owEG6odns2w0IIs/kWZpRCVc8XJnbN9O5Ibn12z8U6lAP7yjR6xO gT/LSs5PVVLB998Jv/cFxUelCpqPqEGzJfO/xiRpQH6/5KfxblWoXP2Alm1M A4x4q90XulRgL0WqrNWdBtT/e++w+3NxCS+SBgLWYNZLd5Qh5bX9/ahcGsje NXosoUUJHkmTCJCto4F/8Zy67a5KcJFDYWZ008BtRkXtC5eV0LxVv26FiAa2 ubhZ5JkqwkcxufFXKHRQGafJtXi7HJaPOYS4/UAHI52ZHzY9U4DPyG0/Gmyj A3vBtKXcRXlYyumqtgilg3Vnx2ccoBwsyikoTj5FB/88zIqWviYLq0ULE8wS OhBxwk8Jb8jANmOvPnkeHbhXZNtvvi4NhU6Jg16v6GCqNiO+vF4K+il1jJCE dCBbhqXserkMdoQ0OdNkGOBo0wtTbYll8APDsqdEiwFYpbz5mI2SsOCVgviG BQN8aJokOZ2QgEsqSYWGrgyQfvgqk/WGDPUPJHFWBzDA2zCHs5gxGZ50H9rF O8oAkeXW9lXXSHBKq/N87xkG0KhmJ6hJkWDxUtal9KsMkJk8EdFGXsKdIwJ4 HTUMUEDN4bd+WsBf7WkxNA7VBOcbS35lh4nxnKcD5kWyTMC93HBUOkWEd04F 12VkMcHhszz6Jj8RnuYmWMSltQiLy/8JPBmuBQas5bXTXEX4gdwkrzUvUK5m ZDWdbKxN5Cb3+2decrWJ/N2fplOGzShXFItSyqR1QPNTb9KA1bf6So2oeAMd oj4iWA7fuUmHqI8DJOmIfSh3MI/Mn41Hef/VJ8GMS6jfkPkt35lK5K45g/wK PqrfV9VtzhlE1luZ/1HmK/Krzc38bnkWGHs3krHFQISb3eMe7tFiEfuPfB4+ TVvLIvpLLLdQKP0J2dH+j4jMX1D9DwmGs70hyNkbXjbkxiBP2uRMPjvFIva/ fmLnm4SLKM9UfqPFK0X9mbZ/5p2+i3Kup+DqWBPKfTrLFUdfoDzkToBl2iDq j0u1Kz4fR3lV4jzr3izKz3sXlXNkdNF5eLI377qqLpEbzWxKL9NGtm1XGw0x QfXPw3UGhtYj35AM9WU6IkcV2a+mb9UFR7aOYYwIEf5+heXbvh0or6hZmAgM QJ5OPltUewjVy3OOO7zlo7zXaI2wiqpH5LoJfnzxbj3ifI8bBJZZXNIjnpcS 7T5ObdMj3ldb3KPkniWUC35189m9Sp/o/2ys0sOdow+8ipfoHvXfztOA5yUr rj7IXV8fMjUswvcvWgSlXkZ+uuU31hlcH5Aj3isXaotxSrB7YvaAPujN9t1m 5iTGQ10TNDrm9EHD3S/Yy3IxLln19zRXgw2Oh5k1GS2KcX5KfvEDczaQL5B2 FpXO4mpLnqf+2sIGXQ1sU23vOVz7tqpJUgAbBHAGDwi953FK9tC0QywbrHzd FfT0ygKuhH2dlstig+BUMwrNeglf7OEHfSphgwHahyntCBIMjE3RItexgSBi DE+4SYbNjfOT256zgUeN0gZXXAIKXSaXPr1mA9v1PlTXUUlYMmM8OCxkg0ce G2JjlktBrWXjo3ZkDBz8ud34rp001KjX5sioYMDi454H171loPqKFH8nXQyk K2ZJzkXLQieboMMyazHivu3j/2Ho7oABroLS4P0OeYhpUk+yPTBww1Dtx99W LIfxj0uGfvfFiPv8RH67Xt4hjLjvsVWa5bZxGMjyuHP53Ygi9CqNCD+dhgE1 V4apoHolbEtUXZlwHgNlQyr0/elKMLqb+Vj3KkbMlxKnrykxtzAQYzVzUtZP GeZ03p4/eQ8Ds/vaeVR5FfikKf+c82OMmFcXBJQ4fjtGzLPcroYyuX4MjBh9 iTX3UIXvdTTGFEaQxXrnel5MYMQ8vGC3f8R/HiPm5evWHv86aQNinsrd7XVc EWhAzN9jutmzX6sMiPmtWhj/2nMG+fRef/qVdYaEsY7u6Kz9huD7HICOoU8f +eQjbxAKU989QTZlRym8EaL1Hbhka4e6EeGCpL71+lZGRL2gLLZ/tQ/yL2RB tmUs8ta1HIljuciTyjpexlXId4Rm1NAW5F03M1pD3qL9ZJhXFi0XkOWrpphz qsZEvSapHzw2QlYUPCktt0OOrX+/BnoaE+uDb++tVglG+a3w6+6VMcgkcnHJ zXRUP+zuK7usEOXHok3q/q5A7gwdmlTkofrixBJWewvKS0un3lH7kWcNqPaf P6D6m1zbzN1i5KMflar2yZgQ5tWpKymoI4uGda/t0EU+tNGF7GZmgv7f24fC vlijfKP3RYGzM8qftRxf2L4d5cwrc+vo/shF1pNVBQeR1WtjovqPoPULnZEO gkTkHsemmhtnkOcyRRst8pD/B0WJcnE= "]]}, {}}, {}}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{4.605170185988092, -6.907755278982137}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, FrameTicks->{{{{-6.907755278982137, FormBox[ TagBox[ InterpretationBox["\"0.001\"", 0.001, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-6.214608098422191, FormBox[ TagBox[ InterpretationBox["\"0.002\"", 0.002, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-5.298317366548036, FormBox[ TagBox[ InterpretationBox["\"0.005\"", 0.005, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-4.605170185988092, FormBox[ TagBox[ InterpretationBox["\"0.010\"", 0.01, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-3.912023005428146, FormBox[ TagBox[ InterpretationBox["\"0.020\"", 0.02, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-2.995732273553991, FormBox[ TagBox[ InterpretationBox["\"0.050\"", 0.05, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"0.100\"", 0.1, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"0.200\"", 0.2, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"0.500\"", 0.5, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.6592600369327783`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.2039728043259361`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-6.214608098422191, FormBox["\"\"", TraditionalForm]}, {-5.298317366548036, FormBox["\"\"", TraditionalForm]}, {-4.605170185988092, FormBox["\"\"", TraditionalForm]}, {-3.912023005428146, FormBox["\"\"", TraditionalForm]}, {-2.995732273553991, FormBox["\"\"", TraditionalForm]}, {-2.302585092994046, FormBox["\"\"", TraditionalForm]}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm]}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.6592600369327783`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.2039728043259361`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->{{4.605170185988092, 13.795328258601776`}, {-6.907755278982137, -1.5095925774643841`}}, PlotRangeClipping->True, PlotRangePadding->{{0.18380316145227368`, 0.18380316145227368`}, { 0.10796325403035505`, 0.10796325403035505`}}, Ticks->{{{4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-6.907755278982137, FormBox[ TagBox[ InterpretationBox["\"0.001\"", 0.001, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-6.214608098422191, FormBox[ TagBox[ InterpretationBox["\"0.002\"", 0.002, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-5.298317366548036, FormBox[ TagBox[ InterpretationBox["\"0.005\"", 0.005, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-4.605170185988092, FormBox[ TagBox[ InterpretationBox["\"0.010\"", 0.01, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-3.912023005428146, FormBox[ TagBox[ InterpretationBox["\"0.020\"", 0.02, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-2.995732273553991, FormBox[ TagBox[ InterpretationBox["\"0.050\"", 0.05, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"0.100\"", 0.1, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"0.200\"", 0.2, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"0.500\"", 0.5, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 3}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.6592600369327783`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.4079456086518722`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.2039728043259361`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{{3.581158848711597*^9, 3.581158853183126*^9}, { 3.58281736109547*^9, 3.5828173874482927`*^9}, 3.5828203223830633`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"\[Nu]", "=", RowBox[{ RowBox[{ RowBox[{"Quantity", "[", RowBox[{"#", ",", "\"\\""}], "]"}], "&"}], "@", RowBox[{"data2", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.581156609063407*^9, 3.581156639161544*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"g", ",", "\[CapitalDelta]g"}], "}"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"QuantityMagnitude", "[", "\[Nu]", "]"}], ",", RowBox[{ FractionBox["1", "Decrease"], "*", FractionBox["Uout", RowBox[{"QuantityMagnitude", "[", "Uin", "]"}]], "*", "f"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"f", ",", RowBox[{"{", RowBox[{"1", ",", FractionBox["\[CapitalDelta]Decrease", "Decrease"]}], "}"}]}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.581156221386424*^9, 3.581156287526835*^9}, { 3.581156336763392*^9, 3.581156339083106*^9}, {3.58115638921706*^9, 3.581156389679388*^9}, {3.581156452203639*^9, 3.581156538174879*^9}, { 3.581156596067362*^9, 3.581156603442472*^9}, {3.5811566425286083`*^9, 3.581156644648962*^9}, {3.58115668860548*^9, 3.5811566919410143`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"ListLogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{"g", ",", RowBox[{"g", "[", RowBox[{"[", RowBox[{"20", ";;", "137"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"ImageSize", "\[Rule]", "Full"}], ",", RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.5811565460983953`*^9, 3.581156547652964*^9}, { 3.581156706987864*^9, 3.581156803276494*^9}, {3.581156841250332*^9, 3.581156890207296*^9}, {3.581157423749441*^9, 3.581157476825132*^9}, 3.582817397446053*^9}], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"fit", ",", "\[CapitalDelta]fit"}], "}"}], "=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"start", "=", "20"}], ",", RowBox[{"end", "=", "137"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"g", "[", RowBox[{"[", RowBox[{"start", ";;", "end"}], "]"}], "]"}], ",", RowBox[{"\[CapitalDelta]g", "[", RowBox[{"[", RowBox[{"start", ";;", "end"}], "]"}], "]"}]}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.581156897285379*^9, 3.5811569261663303`*^9}, { 3.5811573271544333`*^9, 3.5811573280262613`*^9}, {3.5811574821605253`*^9, 3.581157504679307*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fml", "=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"V", "=", "1000"}], "}"}], ",", RowBox[{"NonlinearModelFit", "[", RowBox[{"fit", ",", FractionBox["V", RowBox[{ SqrtBox[ RowBox[{"1", "+", FractionBox["1", SuperscriptBox[ RowBox[{"(", FractionBox["f", "\[CapitalOmega]1"], ")"}], RowBox[{"2", "n1"}]]]}]], SqrtBox[ RowBox[{"1", "+", SuperscriptBox[ RowBox[{"(", FractionBox["f", "\[CapitalOmega]2"], ")"}], RowBox[{"2", "n2"}]]}]]}]], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalOmega]1", ",", "1000"}], "}"}], ",", RowBox[{"{", RowBox[{"\[CapitalOmega]2", ",", "50000"}], "}"}], ",", RowBox[{"{", RowBox[{"n1", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"n2", ",", "5"}], "}"}]}], "}"}], ",", "f", ",", RowBox[{"VarianceEstimatorFunction", "\[Rule]", RowBox[{"(", RowBox[{"1", "&"}], ")"}]}], ",", RowBox[{"Weights", "\[Rule]", FractionBox["1", SuperscriptBox[ RowBox[{"\[CapitalDelta]fit", "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}], "2"]]}]}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.581157017158156*^9, 3.5811570220388002`*^9}, { 3.581157053268145*^9, 3.581157137371131*^9}, {3.5811571786059093`*^9, 3.581157399704234*^9}, {3.581157527399695*^9, 3.581157534278479*^9}, { 3.5811575750285473`*^9, 3.581157709635771*^9}, {3.581158981267507*^9, 3.581158985553051*^9}, {3.582817349637236*^9, 3.582817351548284*^9}, { 3.582860055169715*^9, 3.582860060588472*^9}}], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ FractionBox["1000", RowBox[{ SqrtBox[ RowBox[{"1", "+", FractionBox[ RowBox[{"\[LeftSkeleton]", "23", "\[RightSkeleton]"}], SuperscriptBox["f", RowBox[{"\[LeftSkeleton]", "19", "\[RightSkeleton]"}]]]}]], " ", SqrtBox[ RowBox[{"1", "+", RowBox[{ RowBox[{"\[LeftSkeleton]", "24", "\[RightSkeleton]"}], " ", SuperscriptBox["f", RowBox[{"\[LeftSkeleton]", "18", "\[RightSkeleton]"}]]}]}]]}]], Short], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Nonlinear", {$CellContext`\[CapitalOmega]1 -> 1007.1548696329618`, $CellContext`\[CapitalOmega]2 -> 47918.20458399915, $CellContext`n1 -> 5.049654648953877, $CellContext`n2 -> 4.904423558385396}, {{$CellContext`f}, 1000 (1 + ($CellContext`f/$CellContext`\[CapitalOmega]1)^((-2) \ $CellContext`n1))^ Rational[-1, 2] ( 1 + ($CellContext`f/$CellContext`\[CapitalOmega]2)^( 2 $CellContext`n2))^Rational[-1, 2]}}, CompressedData[" 1:eJxTTMoPSmViYGBgBOIyIP4PBhUOxwtljhfGFDo8eCqyZ05TpkN9xBIem7tx DhD5CKh8oEPfYwsgcnOQj5lxRcDXESpv4SD57sqJwOdGDuZGkZcC87UdpOT8 p584rwI1Rw6qTgKqTsjhj6H7y29TeR1KA069jP3N5vCQ8cfC/lgmh9Mpuf0v zf/aX9z3esuc09/tdzxrdz114LM9Y7houFbwB/vnJ+YfM/382v68btyX2ITn 9tUi69wfVj2xv203df2bvof2EPvu2Zc6funP+nPLvshPm+PpwXP2EHedtnd6 MOMh1/tTcNrLfNYR8w2E+QtCZlTYFxGvDkbDxNHpX81/OeVMEfrR9aG7E5e9 6OqJdSc6H10cndZY33Zrjx5m+KGLw/iw8EYPF3R7Os+ZtfeanbH/I3PBXf4A Eg1OH2ftn4QkPd2nec5+sn3ezg3rzttvlV5ft7n2gr284OT4Fa8u2qd+/FIn 2HnZPj8xyNlE9Zq9wpEYmzffbtpHrpC1iN97354BBDoeQ+1/ZQ9Jxx/tb4uf e7bV8js0vfyzh6RXFmj65XZIUWF7PUVaCJ5uQblierACNP2rwdM5LN2vUvwm 8XeNmUO7ZM3KzM3WDhB7neH5BeIfXwd5JvNpjitD4PkKls8g6pPhNCwfwvIl LJ8CAAcL4L4= "], {{480., 25.}, {500., 30.}, {520., 35.}, {540., 45.}, {560., 50.}, { 580., 60.}, {600., 75.}, {620., 85.}, {640., 100.}, {660., 114.99999999999999`}, {680., 135.}, {700., 155.}, {720., 180.}, {740., 200.}, {760., 229.99999999999997`}, {780., 260.}, {800., 295.}, {820., 330.}, {840., 370.}, {860., 410.00000000000006`}, {880., 449.99999999999994`}, {900., 495.}, {920., 535.}, {940., 585.0000000000001}, {960., 625.}, {980., 675.}, {1000., 720.}, {1020., 770.}, {1220., 1020.}, {1420., 1080.}, {1620., 1090.}, {1820., 1090.}, { 2020., 1095.}, {2220., 1090.}, {2420., 1095.}, {2620., 1090.}, {2820., 1095.}, {3020., 1100.}, {3220., 1090.}, {3420., 1095.}, {3620., 1090.}, { 3820., 1095.}, {4020., 1100.}, {4220., 1100.}, {4420., 1095.}, {4620., 1095.}, {4820., 1095.}, {5020., 1105.}, {5220., 1090.}, {5420., 1100.}, { 5620., 1100.}, {5820., 1090.}, {6020., 1090.}, {6220., 1090.}, {6420., 1095.}, {6620., 1090.}, {6820., 1100.}, {7020., 1090.}, {7220., 1100.}, { 7420., 1090.}, {7620., 1095.}, {7820., 1090.}, {8020., 1095.}, {8220., 1090.}, {8420., 1095.}, {8620., 1095.}, {8820., 1090.}, {9020., 1090.}, { 9220., 1090.}, {9420., 1085.}, {9620., 1090.}, {9820., 1090.}, { 10020, 1085.}, {12020, 1090.}, {14020, 1085.}, {16020, 1080.}, { 18020, 1095.}, {20020, 1100.}, {22020, 1095.}, {24020, 1090.}, { 26020, 1065.}, {28020, 1055.}, {30020, 1055.}, {32020, 1040.}, { 34020, 1030.}, {36020, 1005.0000000000001`}, { 38020, 985.0000000000001}, {40020, 945.0000000000001}, {42020, 905.}, { 44020, 850.0000000000001}, {46020, 785.}, {48020, 710.}, {50020, 640.}, { 52020, 550.}, {54020, 480.}, {56020, 415.00000000000006`}, { 58020, 360.}, {60020, 310.}, {62020, 270.}, {64020, 235.}, { 66020, 200.}, {68020, 175.00000000000003`}, {70020, 150.}, { 72020, 135.}, {74020, 114.99999999999999`}, { 76020, 105.00000000000001`}, {78020, 95.}, {80020, 80.}, {82020, 75.}, { 84020, 65.}, {86020, 54.99999999999999}, {88020, 50.}, {90020, 45.}, { 92020, 40.}, {94020, 40.}, {96020, 35.}, {98020, 30.}, {100020, 25.}}, Function[Null, Internal`LocalizedBlock[{$CellContext`f, $CellContext`n1, \ $CellContext`n2, $CellContext`\[CapitalOmega]1, \ $CellContext`\[CapitalOmega]2}, #], {HoldAll}], VarianceEstimatorFunction -> (1& )]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{{3.581157340240637*^9, 3.581157346952739*^9}, 3.581157445757362*^9, {3.581157508296727*^9, 3.581157536207037*^9}, 3.581157579384718*^9, 3.581157620765132*^9, {3.581157694150206*^9, 3.581157709954362*^9}, 3.581158985933249*^9, {3.582817355768755*^9, 3.582817388081379*^9}, 3.5828203229450407`*^9, 3.582860061368752*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fml", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.58115861510949*^9, 3.5811586181668787`*^9}}], Cell[BoxData[ StyleBox[ TagBox[GridBox[{ {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\ \[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"}, {"\[CapitalOmega]1", "1007.1548696329618`", "0.1801569161941469`", "5590.431335689588`", "8.0771108924609501161682077983655949`15.954589770191005*^-312"}, {"\[CapitalOmega]2", "47918.20458399915`", "9.706863784258946`", "4936.527971238795`", "1.1639500000358038`*^-305"}, {"n1", "5.049654648953877`", "0.002096073635977748`", "2409.10174255323`", "3.8383411040624054`*^-270"}, {"n2", "4.904423558385396`", "0.0020214502238939946`", "2426.190613260723`", "1.7147303124703796`*^-270"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxDividers->{ "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, "RowsIndexed" -> {2 -> GrayLevel[0.7]}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{ "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}], "Grid"], "DialogStyle", StripOnInput->False]], "Output", CellChangeTimes->{ 3.5811586186285057`*^9, 3.5811589872158127`*^9, {3.582817362028266*^9, 3.582817388164568*^9}, 3.582820323052246*^9, 3.5828600642908154`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"fml", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "10", ",", "1000000"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"100", ",", "1000000"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1200"}], "}"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.58115771563347*^9, 3.581157753911137*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJw92nc8Vm/YAPCQUFHIeubxnPMYDRRZiYuyhfzsEbKipChSRjJDFKKUkaiU 9kCUUSJZIWlQpFIqkpSG3vt+3vfz9kd9vp9O5x7XdY/rSH5ziJ0f/5w5c9ah 3/CfbvpFBxaoScOc//v15Xfc2ZtW0lA31rNpWKbRQLqk4+GsqQxEe+xwypGe NjhQJXzisr4szGhLjSU9mAvOn2X31FNykO2w0zekXxQoTWMLMxYNenq1Wto7 JKHB4M6HMXkahL0odO14LQmbzFcfzOTSICjxSuyjSUk45s5t6VtOg4Mq4vNq pJfAgnhBE781NPBQj/HfumkJTHY2GR5wpsETG/WGiU9LoC7QRKc2iwZ/96Tr gaA0uIfd7ffMpQF/g5RarLQ0/IzS3COQT4MtH+z1bihKw6rDCpUWp2iwqU/e 9Z+5NJy5NW/1s8s02Gl3wGZxhjSkCzSrTbfRQE7n7GirpAy4FpgqqQnRIZrK Dz0uIQumMjmn5RfQga/NtUCWlAWNI69ZkovoIOtWZ7BPXRZEEyOlpqXpYBag KjD6nyzUb7vAX6tAhwxLnXGLbFng6i0aMDWhw+MLVuOHF8iBxC03Zx0LOpxc Ihk3LicHs6rnepZa00GzYWKUqyQH/aRhq6gjel+G4SGZ9XKQuiCsssePDuWT F6z/RMrBxPO+I56JdOB/ouZgPSAHA/ak6MaDdJDT1bEdGZWD1o6QFKNDdNjU /OSD+ZQcnG4UjuUepUONPvXxwHwaOJ7X3TZWSoe0Ab0bZzRosI5Kfv/yHB26 b6T8ua5PA7XCns0dFXSgsSpvZprRQCRrm8vVG3SwvXE175obDWojC00i7tOh qf3FzLlYGpR/+9iwpYUO92vSfJen0CA3WGutaxsdeiLzt8cepkGId5f62l46 DHb9PX20mAYcc355gRE6VEkErz50lwZi96xPTr2nw4cQl795TTT4rXdC5t0Y HdZYXancjeLSq6Yh9vAbHYTMBNQrntEgWdb/d4YAA2paw1qlJmmgYbZdarsQ AxQGl1hc+kGD4Yhw1Q0LGKAkmCxO/KWB/tMknwWSDNjikSeZheL6/ejZR8kc BlyR1brcSKNDSdPlt/4KDKh7oE5os9E4v1f+M17KgLOJaibpJB0q7FvU565i wHa7mZieZXTwkfxwYr8hA14dv2P8VZcOi9d9velpzIA5ZUa/Q/TpcDd0plPf nAGZc4t+dRuieewWmfvXlgGc2ycOm5nRoYVPgvXSngHf3dn73S3pEL6Spl3j zICHxz8FOaE8eHx46bZILwb4PNfqnGtPh5j6VUnOvgzIKig/UoXyYvmEbrHW FgYIOi8ecnChQ4qNZe/3EAbMrFpVaLOJDgZi2/RCY1F/uxyNbAPo8GntLseN 8Qxw3CSp4h1Ih/zgqB1qyQwIyje28dpKh+m29NIvGQwYmFlvuyyEDqV/cu62 ZzHAuPWR1s8ddLBbXtBfkcsAnTRN35uhdLiYdnHh1kIGPNqYsJc/nA6uNTcV LEpQPAz87bMj6CA8dgeUzzDgiYfaf9KRdPC16Nj1/iIDnqroxk7towNdZPyl zx00vq2XVJhxaD60f0wbNTBgqxhz2OIAmo8t/xZzmhhwp8FlIjge5WXzIuPX bSg+thsSjqK83/9DxrOuiwETtrKV+Ul0UFEkIgt7UbwGvxbmJtPhYJLaRfeX DLCPLmgLQ+tC85Z285rXDDg5OXjBIZUOI29hiDbCgI8timGqaXQA441Sz8YY sPvzwZ5H6XT4IRAa7fAbPR9pKXM5kw6s9HKZyVkGjKpZBVgdpoPJkqGrGfxM WMV55zOCnEPZvmsWYULOX8Ulgll0qK1I3u8ryoR0WQlmBvIbjToanzgTtFKX RUtk02GVsYqNriwTpAVdX4nmoPlr9/vQR2fCruGC5YnIcQ4F8WFsJghGxQb8 RO7yW1hVocCEtrQ+1R60jrcnfSTYq5lg362e7ZFHh1wxTk2NNhNAdGCgEvlO rouDsx4TsjY0iC06RoeFZ1sOHlnHhMgZn0M3kNVV51AqpkzQ5pcQEziO2q/U uttqwYRPXu+fWyOXN5+ZFLBjQuMJgVuDyF02g+nFDkxITRye4OTT4edTKcW1 LkyIqKYe+yKbjCa4hXsx4YuDUs8Q8oiwz/3R7UzgxF3/2ngCtX8kf1NiKBMc 03V3TiOry3X/lA9nwli/nZLSSTocUDZc4RbNBDlb/X1JyOVX9zT/2M+E78ce alxH7tK54p2TwIStg5u8B5HZFuzc9jQm+FXUmasVoPa7HdWCMplw/uouthPy dteM1nnZaDyaYiejkGuD/s4a5DMh7KdE9T1k17QXAdfOMeG0R+qtdYWofUlJ fpsKJrSyDv7yQi4/YXFy7DITUuZ/1YlG/nmhuouqZELwzqqOa8iExteghttM kI1XX92GbFqrJLjpLhPK5OyrR5Bz2/J08pqY0LDrpI5kEdoP7Dt71B8y4VJ/ 2Xpl5Lcv523vamOCfDojTR9Z4/PuEpFe9HyL61t/5Mei9guihplwv+dc7GVk s3lecf7vmLDYyzWiAbl+dusP249MWHpuc0M38qXx+DfcSSbkn3P3/4asMJrp sniaCdsnz7TzF9Oh4PWJzl8zTPA//bdIHDn98fWaTj4WqOctOLkCWaC1buVt QRb4Cbl36SLvbXx0tlSEBevI8QRT5MDrb7IjxVlQrjIZ54lsclRyGynPgnn3 15qmIt85xB4W5bIg7WXnr2xkjaRlzj+VWHDkdoRtATIZsW59uxoL/tUvmbiE nB9ic7tSgwWGT2qgEllii5taiTYLcoReQR3yHJcwRgSwwM3gjFsHcsTG2Czv 9Sz4YCcc9QT5i3masJUZC2RbfJ1eIg/onp4ibFkwtGyz+Qfk24yetlZP9H6R CI85p+iwUuqV0U0fFvyt3nFcEPmc6FhVUQALztReL5mPnDfLX7YrhAV5ty5R S5DFfojRPcNY4JQpeEoWOWmcdsQ8ggVfn498ZSDver0qmhXLguaN9TJc5LF+ /W/C8SxQZj8dV0Le/Ngi8FsSC7S6KkqWI29s3OzQksECG9+lherIKqVZK0IL WbBtpmwxIJedLDztXsKCgRMb3xghM46elzM9w4I7RsX5xsgLkhoFGZdYYDoL NRbIB2I69s27xoJLR5MVNiD/Cn/+deImC6anXPfaII8GTA403WHBMaflr/5D 9vSa/e9KAwtqnZ9+dUDuc57fmt/EAsv6wAkn5CZzzq2QdhZ89jG74YZcsswu Q26ABQsUI4M2I2dHHUpoeM2CZQvr+3yQE9pb9gaOoPxRktf0Q/YPMQioHmNB qwdfVwCyU/1eD+9xFJ9vHgsCkc3Eb/0n8o0F5nMOrwlCXnp9Obj8YsHkJcGo bcj0uVs0+WZZ0CQpcigYeaHD6eXlfGzov+Wdsx35y7Sc3IwwG/6Jbk/egXxV V2jymAwbHjW3Cu3C/U0zGgU6G0KFAnqxs15GD46y2CAYcf/4bhyvmKlWbQU2 5EHzoghkv07VhtfKbPAR/VCP7UhsrUxZwQZxuaate5C1G4dO92uwId7+0OVI ZGVJZv5+bTboG70124tM83U+rKTHhuNinS+x/wh2Ru1Zx4b3AfTv+5DrzWsd ZO1Q++MZn6Jxf/N/WNY7sGFu6V7PGNzfsVVGW1zYEBRn34GdcKhcpcqLDfN/ +hbHIu8eHKG8fNkQs3dIYD+eX1WCLryFDYsX9ftgmz7OFXIOYUOR6DW5ONxf Tvfff6FsuPz3cQi2Upjo1NlwNigSbxux50slvP4RzYab+XZeB5A7nHdW56Wz Ib1ryb545LryissGh9H7FxbXYF/59b7sfTYbOKzhGeysk5uytE6g8X5+GZKA HP/5eMqrQja8Gq89i71L/0lMcgkbkj1LBrAdX1tufVrOBpMz99cl4v6uTPaO vcgGzShyF7b2gUYnxauo/ZZHJdg0Smd9RBUbDjlq/sYeCFBgyjSzYfWhuflJ yBnbmdcqWtkwHnzkDjbsXmJq1MEGKa3hV9ilB/h3Bj9hQ/X830Qybv/gjKDA MzaUjj41wBY+PJF/7CWaT/cSD+xtBYP3771hQ1MXNxebVfrExeU9G668nbiC 3XW+7cuXj2ywqmtvxdaoui1Lm2TDw8yB39gxgZaa2nMImLm/zD4F+emnB3ME +AkYN/LYgq22w+hRuwABxhov9mEPh+t4+QgR4LvsSTH2ml83lqqIEFAm6HEN Oyda7fvP+QT8+2d2D9skQTE1Q4yA022b32AXCZ22d1lMgNRI/iT2z1QWm5Ig QLvcku8g8vkjUjeqpQg48UqZiS1WJDA4wiDgQoGdDXYAJ/bcZRZ6/69WV+z6 sl+hewkC/NwG/LBDK74KLabQ+1YO7sV+pBrc/ZxLwPtNPQnY1PXRk2WKBPzH vyMDu6/61co1ywhY9PJCMbbqWrc/gisIaH9vW46dUt/3oEuFAAHp8qvYus3t bv6r0PtCohuwC3trEo/oECCu9nsA+4eTlq37GgJmpWNHsG1fXKMpriXg0KKH H7H5h8sv1wIBS9Qqp7Hd/Lh7k40IUFP2/IN9Y7R4vd16AsKe9vKl4vUynvfs vSkBR0FtIXZdqGTpNXMC7lnKiWPLTmdsj7YkoO5inxR2659EAUkbAuIje1nY KvN3rdB3JODAdgFV7MtNz96qOhMQdElQHVstzqBQ3pWAGxuHNLFX/Zy/SHAT AXMTlupjX7++o3nakwDvx/mG2BohfbGj3gT0//uwHnv1u1MTj/wIkJlQtsS+ dUqo/E4AAY4LmdbYmh7B3pcDCdhX980WW7tXuzsrGPVXwdYRW6+x87rLbgIa w157Yt+JXr3NMoKAD2ILN2Pr65yg1kai8TRyfLHhiv9RIpqAV4eXbMFu2Nq2 QSIWWfFrILaR4qp5c+MI8Oyq2Yq9vvBv+PsEArT4WSHYTS4+qs+SCLj9+NYO bBOph+9bU1B8DCAU2yw9x/lSOgHLDBV3Y1vuXaa7O4eA2lr7vdhtq49M+uei +KbE7cO2+jp93vkYAUMCp6Owrbc00vVOEhB6sykGu5NU6l1RSKDzujkW2/bV oXR2MQEqIvX7se0cXf7ylxIw51fOAewe8bqbU2UEaFqFxmPbt1Pb350lIMbC NAHbcf3E4MMLKN8OPkvEdl2VXH/4OsonxtkUbPdyu5W7Kgm4U/7uIPYmglXi VEOARaFYGrZX3geJNXUEVFQS6djeYjfjWfcIGMliHcLenLh/iq+ZgPBLIhnY vn8s/d62ElC87Q3PWz4Om1R0E/CuP+AwtufBfqUvz9B8big+wuufUsd8tSEC hMUuZ2FvaL73aecoARfPHc/mxcO/uuP6OAFHvvjm8PKttDRLa5aAiMKLR7GJ 4UzHmoXy0KFfmov9x8N/sFFZHsTPvs/DfvpMz7/VRB6KFE8ew07vU1OvTJSH WpPVx3nx76HmlN6XB/1Vq3gui41yT34jD2KJ/3jPCy/vrQri54B5wjGet/Yv k7KW58Cwcj/v/R0J8TtXAgeeLI/ktf+udhtx3JoDX7tjeP2bnXLonOPBgebz Grz+zz/SekbDlwOv5gfxxie9wiBmy1YO3PeP442f8/C6w8lQDtRZh/PmR8VP aUVXJAfGzq/jzZ/G9WHZoGgOLK4+nomty1cwd24cB6xK/ne+wcZpoiCBA+Up BM8mBeIvtVI4YBtjw4uX1dij5sdpHAhJCOHF004n6frWTA78PRjLi/emJ79S i3I54PopiJcPvuTNcJ18NN66dbx8CdoZsrmngAPa0ULJ2MHHrJyLizjA+eOV hL2jTtk6+BQHuktu8PItXHRER6iMA8XZ5rx8jNRoUO09wwH5kFRevka5FXJP nePAwqP3efl8oNxZfE0FB962kXHYmcbto9uvc8DyUVI09u3SnLbNNznwT2c3 b/2MCLhfcazkgMgaF9760m38GKFfwwEtlzmR2H7y19xW3eGgc6ExAvvw/kgD hToOOLbsCefFS19YSOweB368vxuGLV7Y+ZGviQPrRjbw1rfe39yO7w84kNrZ wVv/WTXc3IFWDjSZlQbz9hvtddyL3Wh8wYf8sQPz5ouc6uWA7IUTvP0nZ/rx p5w+DhiM5/L2p483vG5EPefAt6KNm7Clligd2/GSA/cSFrnz4hc2vs93kANr vCpdsHNXxqyzGuZAV26DPW//OmysCCMcmFrKscP+NL5wgcY7DqxQDLTh5fOl E930jxzwCDhjjv1labX32FcOhJnX62HLpe43fvWNA6xCTR3e+vpgqtzzHc1/ cOpq7PyzfRO3Zzjgoty0grf/zSvsvfSbA9MbypWxJ/z8qkr+cmCjqx+Xl1/U VGwqHwlOs5sY2Dvja3xiBEjQcD0ug31y+IBpqCAJwtwyCezJYvFFriIknH2p LIxdwFQtVBYn4VTl1Ql8nrVETccxJUlwHTTknX+TL+74iUuRILY6+w22Wb7V ihlZEmybQ55gh81Iin+mkSA0+b2dd746v5h6zSBBW1n9AfaUdFBtC0HCjgPN N7HZ4SuLazkkWDXKXsS2ePIz/gpFwiozqVLs4uxky2NKJMTTBY5gWy0uex6g RsLjbTb+vPOWnhCjuwr1n/B1w2Yo+nBENUioiZayxR5bKx90TYuE1CkDbWw7 8zliiTokmBdcXYZ92/7VVac1JPybf5WFnbq1YOaPPgkHeswEeOMNjyroBBIa i/qn8H3H9YCbYYkRCVrib99iKx+XO2hqQoKRqPcD7JYHR2WzNpDg98lpP+/+ 1b2r1teGBN8ICMY+NvCfl9ZGEhTs9rlgB0yJn3tpT4KFWKcqdse/CcvLjiT8 /vRcDltzQdd4nDMJM+JsAex5nAwtRXcSvFPVe/D9b/uK4BczHiR0v5+qxu7T topt80TP53cVYZ+xmd+804eEexK3tmAbRyc51gaRUP/O8Au+r1ak+P3K2EbC lh2v27CX5Kwv9N5OQrmlzXnskfP87+aFkqAYFOqNbXVr6OCzMBKkvixag32j oX5FxW4SRtbaSmIn9Mfs3hhJguGK5Dp8f/70xkOO2kfC6VKfbGz7cb0701Ek BGZe8sMm5/2ee3I/CReUHQWxG9Ujct4lo3wbX6OK7+9LDRy1qw+SENU8OMW7 /1usfpmWRoLLhe1V2N7e38iVmSRcDhXRwW7Z1t0scIQEvSOfvuP6Qm3P1a19 WSSs4wZfwZ6TGXJ9Xy4JfcQ4E3tLvrWT9TESTrY3duH6pKtsxW8inwSRbf37 sYtqx4weFJDw7rFvP6539D8GdC8uI+ERIbYZ10dJXaXGz8+QkGkqNovrp45b Q1Wnz5HwYTorF9sz3q1Is4IEwasVtbj+Ohd4TGLOJRLcPedYYE/YPEl8eJmE oYcOPVHI+xk229yvk9C5OvwZrt9a+NNfcW+i+Vg/7YAt/qHFbvwWel5iuB3X eyU3jXQO3CbB09CZVx/es9acd66BhIt3xtRxPblwdVjkznskPH/2Lykczz/9 yifdJhLWJIj14np05L1yT3sLCc2/jdxwvbq8w98kr5UEgYc/csKQd984Xe3V RkITf1NzKM6/OGbxt04SaGFXZHYiWwe4St55TMINmQ0auB7O3ZCXlNRDguTg rFkIsiJNPFjuKQlB7EQXXE+bXZ+razBIwur1TWK4Hj983PCi8GsSei7de4Pr 9f7YGKJ7iIQjgi6X/PH+bfVznt9btB+odnN8ka+tWr1X5T3K78uTj/D3gF+y oZ9/jKJ80ycDvfH6fTvWk/oJ7X+eQjGbkLsfKZnafyHhzL/nU+7ItGt+t5kT JKQkznrg7wsXYl4VX/lGwgtdc0Fn5DaZnuC+XyTc0Y0/bovXw+yioaI/JLzc kZxjjew+YmUfOIvWb1F6tBXy5ysPdP/wUbCRKyljhtdrnsClJgEKfGaNHuDv JTHRIJ8pSIFrcJfXOmQxi9tCHBEKFhxnOegjO6r92Ds2nwLDbe4X1+B8k9b4 cmMhBYKZXz9r4/x9c7HXdDEFDfc7Kfy9ZmPUqVPBMhQwqnbbKuD1kt/Cv0mO goKDeokc5FXV4z7WdAoOOZkfZSFLTK9VUGVTsOFwvqE0Ps+X+CWz5Sm41DH+ XBzvb6vSRxeRFEyXXzAXxfMV8vz8hAIFdT+eFgvg8yuDb+GQEgX3Nw8lzhaj +a9QCn68lIILyw7ozCBnfwhXvaZCgY0dn+AXZHsfyRthmhTEkNRUL/L9OF0p X20KDkSmSuHvZxrF3uH2uhRIXNs39QBZauCy9mp9ClJfDL7G39+Sfvcd5wIF dzMFPlxGnpab/SVlREF0n3TpWeQ+R6s708YUlHRaKebi73+7w1jvTSm4F2jx IR35VnZ+7FNzND8mHzfGI+d1jRpWbaBgk0iESAiys0Xig0gHCowMtS4YIrds qVAMcqJg+ehBvdXI2sk9Ka4uaP4VahyUkOXuy1uu8aBA9VaEqChy6rBZxTJP CobW7yqZLUL5N2eHKMObgudFKhXjyM/X3u3840tBYlmlcBeyhftbtc/+FNy8 usu2Dvn23oVZA1somJfWMn0R+USlq/3dbRS4fawyOYjsvvJHf+wuCp7Vaa3R Qm6zYenuCEfvHzpRTyDrbTc+4bUH5Y+oUbAIMvNCtodhFAUXOw/S+wvpkPHw 9t2VMRRM7uRfeBd59v0Qm7OfApE4P77TyIOU2jB/AsqXs397A5Gt1zmt+5ZI QX+xa5El8l3vmNI3yRTsNh4zWY5cVNjmfz+NgpyoTr6PBaj+kA0cS8ymoOxD /EsHZNE3Zxc6HKWAG9W8EH//vn3x3QoqjwKr4YKPwshL1vnuaMxHzw/ejL11 Et2XRE8fOXKSAuEN1qw05O39Q9e8CilI20fobEJuCfb8PnuKgnBF34v/TqD9 R7tQuuM0is/Hcx/bkTkCA1oFZRS0ez7Ymo8cdcx175pyCh4s7f69AnnlPYd/ EVcocEr2SVybj8Z7KIcwvYby/cI/6T/HUb3h3GMofYOCHyNXNlchv/tsm3Cj kgK5m4v7lZGzqzLL4qtRvL59ezp4DN3/4jse2NWg/rMs9Y8g58taiXy9S0Fc 94/hz3l0MH2TurS+noJM8btf85CnLj60zGyk4DOnQ8ggD8+vacaKB2j+Cz4N xefSgX+7kWRQOwWvVSZN3uagel47TkOnk4L/aHYZu5DdBeodhB9TsGKz4vS/ bJTPx9YeO9NLwbe2nFPzkX18oqp391GgF1lTdDCLDotVap6v76cgf9pPfS5y 0D1t5psXFBTzLUsYO0wHmYwI/WsDFLz3bZ10Qr7vfMsz7hUFYZ3vXerwz5O+ qJew31BQ+ogREJOB6ldZVUX3j+jf24SkVqWh8+hNsNmyTygeRGL3j1RU/1yq CPz1mQKPXsETasgp65ZWHPtKgemTP08OpdBhtVhge8A3CrI+fem/mkyH4f6z XzS/I1uqR3ck4fzlrnzykwKlXd+rJhLo8EHb1670F8r3Be96vsej80PgdFjY HwpkqH+5kwfQ+XiMuCU+hwtGvxJFuvfTofQefY21EBcKZ7veElGofnmw3mK9 CBf+yXXW1+1F8/0w2EV3ARdm5FNk7CLp8LOjLkJhERcEDNtybMLp0P54NIkh zoUxs+fD1bvQ+dkrnishyYV7xYW/pcLQ/ea5z41ZaS6Exv66cyqEDvID6fem ZLkQFDG9pysY7UevbnZ/pHHhMt8O+fGt6H76VuhrH4sLqeULDH4FoPhPXFhx WYELlju11HQ86fDwW69emRIX9jsYful3R/fh6b+WJ5ZyoWftITdfV3Qe/rEJ Slbhwn8ua76tcUDr+d+eyGg1LtgGrx9PskP7M19JStgq1H9jYf0aG3R/F5o6 46nJBQmzjE0D5uh+P595y0Eb/X3YlYmHJmg/FDVpstTlgoPwIceCdWj+JI69 0dLnwtCPkfnTeqi+YOkRi024sPj5wRZ3FbS/yfupzjPjwv2dK6uCl6L6hMzQ /2POBbnoYW0vBXRfVX7tPrqBC4rnTsB7JrrPaSQcr3fggualvntBC9B61rp4 7pYTGv9S6+O756H46fZVVrhwwTw/pdKdD60fUOo75sGFuMDFxnemaZBj2Sax 048LyrvJyFuvaBBo/V0+IAD1522QR9YzGuhvZK30CORCRl7PA+MeGow67rAx D+bCkV4x8ZUPaKC3eUm6/G4u6CbTZxecp4G439oTMhFcKA0z2JJbQoN3Af7n RSNRfA3cK6fyaXA4uKplJooLvjuaLixLo8GbPe6C3QlcmEhsld0XSIMpxYLe M0lc2H1fa4eGNw3mPR04vS8FjV/OvKzJmQZLV3sacdO5IBy/xzHElAahX71j 92RzIcUrcmaQQ4M5QQEzrBIuPKr1l1rbLQcScudavp3mwrfV/12PaJYDqmU0 r6WMC+5HH1Sn1cqBqUKQZmg5F8SsalQNz8hBxvC2sKYrXFB4XUaMRcgB0y30 89Y6LnxUZmvlLJEDlfnXa6EBzef5lfJZQnIA1d/SpO6hePi+k9jxSxZ8ZXYv rXvAhag/4cyOV7JQ0RMRINHBhZNO5tny5bKgaxU9VPWSC1p1mx8XasqC09qU J4K/UL5P6+RVgAxYNCvsevwb5dNhsWy+lTKgt7FJouAvas+6LdVUXgYIP35b DT4FaPLQnneOTwY+pke1bhZWAA/riQ9NDdIQ9XJHXZ20AnQe3jV630AaSva5 lEeqK0CQyZLToxpS8Ll6afTnbQrQYzLtabtIEmLArejwBwV4N5pGBRUuhPV9 4c1vPBRhz1tn98ybAiAYTgRNvlCE6ZLX1yLlpgxG22HkhpMStMw9a9xLv2YQ krfVXcZT6f//f9D/AFTOQmw= "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{4.605170185988092, 0.}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, FrameTicks->{{{{0., FormBox["1", TraditionalForm]}, {1.6094379124341003`, FormBox["5", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {8.517193191416238, FormBox["5000", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{0., FormBox["\"\"", TraditionalForm]}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.214608098422191, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {8.517193191416238, FormBox["\"\"", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->{{4.605170185988092, 13.815510557964274`}, {0., 7.090076835776092}}, PlotRangeClipping->True, PlotRangePadding->{{None, None}, {None, None}}, Ticks->{{{4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{0., FormBox["1", TraditionalForm]}, {1.6094379124341003`, FormBox["5", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {8.517193191416238, FormBox["5000", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{{3.581157559885914*^9, 3.581157580968322*^9}, 3.581157622040576*^9, {3.581157695358139*^9, 3.581157754465808*^9}, 3.5811589903155813`*^9, {3.582817362478598*^9, 3.582817388510379*^9}, 3.582820323417102*^9, 3.582860065350584*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{ RowBox[{"ListLogLogPlot", "[", "g", "]"}], ",", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"fml", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "300", ",", "150000"}], "}"}]}], "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}]], "Input", CellChangeTimes->{{3.581157511037211*^9, 3.5811575518055763`*^9}, { 3.581157770543535*^9, 3.581157771101653*^9}, {3.581157940330776*^9, 3.581157961225195*^9}, {3.5811590266840153`*^9, 3.581159033923134*^9}}], Cell[BoxData[ GraphicsBox[{{{{}, {{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[CompressedData[" 1:eJxF1XlUU8ceB3CWShQKhC0kuQQIIZfNqsFSsIr+wI1WJRZMFRREZHlUeFYW IaCyyaKoCLKUAE80yiJ4lFQKLoiiIFHLYixrBMUFNxo1IJvA851nZ/7Iuedz v7+ZSe7czI/tv9sjUE1FRaXm8+d/V5qg5mr1Ln34/1UNpMJVywJIA2Tf9DWv nG9jJ93Z7DO53hDZPYIal9eE7VmUQ8TyjJB3HxUyDE5gU25yiua/xX5f6+HJ WU5DLmrj/qBxGLs718+7qh37ho5jfaO+MXIqr9a0ayP2kSuKXt8M7O3rrsG1 RuyspxFxrmPGYOa2YQnt3BxgS9+nOdnQkasebhH2bcG+ee/0Mr9U+pdxFFg9 V/3TSDUdFh8dHnO5MQ/86y4uaeyjQ2Gn1kSpgxYsnOX9/kadAU1KXU/vPV+D 3qWrjCxbBpyRivdqRepAL21ORSufAReIqtoH63Sh+12JuD6CARn2gfJCPyrQ Hq24EpnHgG2U0yJitR7sTVPzn1vHAE3xuO+aJj2YEdBYGd0M+GffeK2Wddrj DFjt/Gxf26Q+3IrJO3CSxoRc7rSXykkDqHzjEuz+LRMmx1eejp5vCHdV2763 +omJ9q1M0HXJIYyJ9q04u7DkYDoTkg/ekuffMIJL49PvWWIm2qc2W88+zXom NB9pjN7bQAPF2sTHnp1MUKau3rLa3hi2UzuGVBRMCNEZ3xRWZgwdwbfdGBQC JCqnEzKodHhNOPWITQnwyZxf0L/7n+dGQEyCXn50Bx1m9ZOKrNcTUH7uSrom mwGWvyQJFvgTMHXudXvaPgYk8we31kcTX54/A0ZMZTm9RwgYTB/vouoyoWQ2 s+DwKQL9Trdw//qOGgKa5WTgUC4TOn3uW9uGmaD72S39vOK5LOBPiYRe7wiQ jQTVZWSyIGu277h0goA094GZBg1T5InKvwKS95jCR1kLXzhDwC95SZ6LHuDc 0GbJ6EFbM5TbXZGPPYwzQ/mLc9+MWN/Buc7EeEqFhjlcfReZz1E3Abtq48gD VuaoPjxoXsOWNeaoPhZUNMJ34tyFFyGaPIBz+anmIKIAzzfIO+87Vo3dNWUl qpLi+p2Sbp7gMTZHV/SW8hG784c70m5NNtiHZEW2UExg4eW4X3tM2Wj9oXfP DjHs2Wh+ta8dtMpWYbuuOBt+7Gdc/2289WRvMHaW48ObeTHYymXZyrvpbLT+ mYQtT+J/w/kxvSem9WV4fpbzufxDf+A8zmPg1JvbOPeWVeq8eoDz4Iv+TmmP 8fwNc9p17g3jXJL4iX15Euc5XsWVAooFfh+ad+SfMbBAuc3YmsMVZtjO7Yav gu1w/b095v2D32GXqof5slyxI4tXLGBusIDjme0bDEcJeKnt9LxvM86raqbf B/hjjx48Wlwbius1Bftdnktx3muzSCGhc1BuEb9dOrGNg97vYauACocCDvq+ tCj+ML2Ng55XW+ytgz2zOB/4l7v3tvmWaP67b6o38gWW0B17j0oZJKCr36Ng SZwluP1VOO3TTUDIjENg6n+wW378N/tIgyWErdEzuCT9vF4QPzGr3xKiry9e 2dZAQNj6eOOOKUtwrmnVLi0lQF3y52icMRd00uJLqdkESFNEJVd5XLC7dmhO cfDn/9esR/rvP3Ih+oPLes+lBJhdMLBL8udC7gbZMrMpJtCyBkddhFyo2GU0 U17BBCr5cXReJhc2Jc52PHRlwkyPNPBvMRedowHCFFPVOi7sr8h13OrMgDuN n5Q/3eOic16xTjn79yMutK311Ro1oYN4zPbxMwUX9RnTr4ZfLVclwQk4avCB BsbXzQQUfRJkofLLLQE0MNJO8VtrQUJ5363c4k4jWLss8FeKPYnO2z7pWWu+ CwmLfJLL6ssNgTShJ3M3kiByT5x8qmkIB5rEg8d9SXSeJ4jaOfmhJDrvyfkm lc6xJJz9fnFLWbE+eJaF7zmURsLTa9MJdo760JZooBufQ8KqhJhpXpoeRHWz mixOkai/iNd+TIk5T0KUTc6JbAkVsmUXPiVfJkE5c8UriUKF5tuiE25NJOpX uQO0WGk7ifpZXtfNinlyErTD7ZfKkrThpbnxG60h7AnOiZ4H70nUD3OXhwz5 fSJRv3zU2uNXp2GF+um8P3pdtQOsUP/dZ5E1+VFihfq3QdGBRx5j2Id2+DFP LrZGJju6ozJDrL/MN7HCNazllrcI21GhSH3RjP0NN1LriQKP72hQb+0wskEu TOr7znKJDaofqBDKF3hj/6w6kOUkxN5gL1Dbl4et1DP3tJVgX1QspIfdx95a ntEa/ByvR2GdnHGaxtaUjLCmDGxRvYmKHJpssHUGmssql2MLr79cdMPDFo0P urDjkn4Qzs/vOcOvjsFWUS0Rlx/G9c/4vnO/KsL5vii7uj+rsGVhg0qdelxf kihmt9/HeVnZyAu6HHvSir7i3WtcXx7nfGzbBHb0W6pkJ8UOub7OiKplhD3+ zOL0Zgvs0JXrVN0X2uH9vRC6+8NSnK/0+m3AzQ3nd+/vn960Ceesk1OLmX7Y xUuVksJd2Ea1MZHyvXj8tCzCZSARu8f1dk3pEeypY+MrHfKx/wtNCyhd "]]}, {}}, {}}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwl2Xk8lF8XAHCyy1ZkmWc288xEhSxRVOakXRKS7GVJEZKlslW2ZA1JVJRC WpCkSEl+RYtsRSmECKksZYnivXfef+rz/cjMvfece+69J2XnQxb75vHx8VWh P/Df0SFfnG83ygPn6saBH9aD3KV7S0WvNMuDDLFMu+b6ILd+fXTh2Xfy8EIw JThrYpArP3/ZdNAHeZDa/FFiR+o3bl6Gb/LWLnkQOy+x5E7DEPf5ff6qr8Py MLwjYaPvpp9cgVEGTVlaAUxstv6dzhjlnthn//7cdgWgDQgvDY2e4CpdVVjA 36IAq2OLrHZd5AMBt5W/fXcqQuq402n1dCGwHrf97N6gCG3UZr/zweKw40PV mZ5dSrBzd96mmFppOG8UN+j0VglEtdWKJmwWQhhfuqiLHQU4AWIwPi0HrTH5 ywe7KLBe3XDrai8FUHT85vyphwIV0vFCbQEKYKetlvamlwLl7nknDx9XgK6P RX+LByiQW6u8L+WMAnxb9uBl0AgFxuTnHiYXK8Dcm+cuEnwEzIX9KvH/rQCq C7+cX84g4JbY5gzdAEXw+Mp+raxMwCmP1Mx5oYpQ8NBtVpYkYP1Zw6LaSEXQ dvnmOrWYgPPNNpf1UxVh7b1RracaBJSL/NB5eFcRLKz46iwMCcg149tN+akI wRdofEccCDjQv6HzkYMSSBzzN0jZQ0DeGdXTw65KkLXrtX+hEwHHhO3uLfJU giqZwMGv+wgwcX27ak2QEghGv2ve7Y2+T6AmaficEsT7xeXqnyAg/VXLss5X SkAz7/m8K4yAl2Fb9nGblKBQQ5/iG0FAtnXGr5T3StA4+DXxZjQBW0fffZDp VYJFe42OEUkEPEy+4uv2F32/yR/jf1cIAJevt3yWUmD5UrMopWsEFKw2shtb ToEqketPdHMJeHJz4NM+XQr0VFuu8L5BAJu/x5gFFFDRv0P7XExA2mfVrhFL Ctzh7B+pqiZAxF/wRH8wBdYJVC7teEaAe7GCavRJCjR3ye37U0PA0h7JXsUo Cvy+WN2m9ZqA0C1nnixMpID+Qvp/V9+i3z9H2DhdpkD17Ltzkb1ofCYbh488 oYCPd9O3kK8EvD920Wa2mgKMzjfcgAECDEZvHAuqoUDI45rBfd8JyJp3QNH8 DQV0Q8rWbv5NQHCweF3gRwrk/7nYJyZIhd5sn5SXYxSwck83mCdMBVv2paGc cQoItaWemRahwvf1QRpHpijgXJagPzSfCh6XVF9M/6MAcfREQp0sFaQa2fcT RQlI/O2se4akgujnrN3jBAFrXPfERnOoYLigvEmfTsDQW7vPJ1SooF3mfTWA ScCWEssYn2VUyFzJznvLJoDfd1OHuQ4VOHZb3ixTJ+BOt5G2sS4Vph75pagv J8DRnBtttJIKjb9DDqpoobhprtLSWU2FWdeUBwK6BPgPL4mSW0+FNeqKxk5r CGDtWfxRYiMV1n64CYtRHjbWs5YLbaYCmRwu3MslQL2QaBs3psLWWhN74/UE fPWUVH9vQYU2gaI7z7YSYPNt5F2GMxX6KUcuRuwiQM9d0vC0KxX+CBRsb7Mi YOHAkutH3KhAO1t0cIk1Aa/6nAN3elBhSP+rfrktikP3O5qkLxU6131cm4Hy XH7v6KkZPypIexl6P9tLwFin5MhgABWU095f+4by/mb7puqaQCpE52kcUHUl gPKhzO1kGBqP0TbTgwcImLBqafCOoMJ7u31XfdwJaG4ZXeUQRYV1DktiD3sQ EPt26XyDGCqsuHPS2s2TgOn6S0W/kqhwMOx7Fc2HgI/PT065XaHCuQuBN5uO EHB/Q6bTrqtUuJac+er8UQJS/it/tT6HCg5KXsdsjxFg/HTsEjOfCo7SS0tb AtF6P3Jd97GICq/56rVyQ1Cerw67+aKYChW/NnHNQwnwfZgp+6CECnF7ZzdO Iy8ta+07+4AKGxIuHF6P9unFki2x259QYZnb/IwStE+Pae/7tfopFcQZui+3 hBNgWRxmv/Q/KiSsX7TzE7JE0UMNkVo0/nXi2VNoH4fcVHtbVY/yp3ON9aJT BNhny1BXdFJh0pa5oSsG1aklRvEmXVT4mq3vaRNLQHGx31/XHipQhMp1G5GF q1vbz32lAr1X/OP9OJRfPZcyJ39S4YmXRYZ7Alofj3pJmVEq7CqxmGtEFvo1 F6r6C31+7mJ7vUQCbAVcHG0mqXDvarryDLIQewmjYo4KI3yWfV6ojmjetj3z lp8GwdXtEjXItivi54YEaHBvNDyAmoy+b8PwZ6ooDfbBOrVnyLb7Sq8cl6FB RsirRXxnCSjMW8cyUqbBLpMnKZrnCPig4ZdiS9JgNkL7uA+ywIOceX4cGojP FbCKkK1rRb5cW0KD+4aL76imoZ8PvLkmpE0DrfeHTkueJ0DDZ06WvoIG27ws B9YjW09pRurp0aBrTFErELlQNNV1vwENdswone3CP19iy3lpRANTIR21a+kE hBfHneveQIPmp5L7m5AL9B8LTW+iwRXJ7pJZ5HnGzK9Lt9Gg5r1GmlUGAbc9 vubF76SBlcO1mRlk/tu+qmauNNgkVj7OvIj2e83Wkg1uNIjaosEA5KQupqH+ AfTv79HvOiIzFzXsZHnSIFQvk3EBGY4vO/HbjwaTXUdcxS8RcDp9nvhgAA3i +GM5HOTGu22pHUdpcNpyyT4u8p7+6Js1wTQ40HXH3Rf5uFlvS3oEDaQHR140 I9d4VOxNiKKBAvv5k0FkqaiUobBoGvzoMd/Ml4nqZDnwH4yjgdufXhk15Mes TLW1Z2kwKiVYcxz57+9dEd1XaQC6j2wXZhGwQVpdqjWHBgFLtqwnkeOXCGa8 ykPz1S5p00EmHO8WltykgVygmbwlskGt1MeouzRIVVg1lYQc3t3nGnSPBodt wgMvI7+aeTTsfZ8Gnis33ytAttU8KGT9kAaRaxPtXiIHZtRqLq2mQXV0U+o/ 5KqSrAr6Mxqo9XUKiV8mQLQ+YJNsDQ0uZjgbyCOnz2Pb/31Jg/Vq9mPqyGUH T0bXN9Gg/+/bR7bIE2v1O327acA4LJJ9EzneieOT/IUGW4pXxt5DJqMWzLvT R4OqFIJbiWxWN8j5MUiD5dc3yDQh37C94LV/jAZTWi2evy/jeJ2ai/pNg06n yMa/yK3Zvsk5EzQ46TggIoTO1XmDxqXd0zT4e917XA7Z/ujMXzsBOihvq/+i jTx2oT8xSIgOSTZX/ukjx1S+ZWaI0MHYYWQUkO8L3d7QOp8Ojo+pXqbI0qn2 8WZydOheYFy9H7n6zmNiI4cOitB5MhXZ+t2NAhcVOnyh96dlIA9PnuOGL6HD Lz/JlCxkKtfb5Yk6HQ6K9OvnIwe8od/S16PDzWuZjg+RJUbF11qvosNSvaO3 K5Gvyk3WHzGgw9DLxC/VyPV2DWMlhnRoWGQl/RpZ9dsJA43NdLBPb3T/iFwp 6VlnspUOr06tlOpEttSydjy4jQ4RhnaXu5HDjmmG5++gw8chr5gB5I/C3S9Z 1nQYjNkTPY6cQBrZKLjTYZUKM1Aim0D3KdO5ZQfpEBOcKyqNLB9jmwtedBA7 1BG7ADnrp++o+2E6tE8ePSCPXFh+LeZRIB2WQeIZBrLv96LlTcF0IN0GK5SR 9RiPWvpC6fBn8E87iVwZ+U5ZOhzNfzd7VgW5fofQQ6dYOlg8rqxejpwSvmDv kXg6zHP7cUEL2aqUJhyXSIfnR0+56yB3UvQs7qXQ4efA4296yD/73L4JX6TD ZfWA8LXIUiEvKLdv0WEkPlV9K3Jz4buqqgI6xH+7HWaMnNbd5dZSRIfEso76 bcj0zX/uzpbQQdpVYZcpssbCpdvMH9HBeuNNuZ3IYxv0RvdVovV5ZKxriXz/ qNH5oCo6dAhJm+1CNuyw/XLtGRr/mhD/3cim+XHBE3V04JxUCLFDXvjpvPL8 BhQ/S7HD9sitkjm1jCY6rPzF7+SA7Oj3SHZrCx0Ou3lr70H2Nvxx62IHHUIt +jOdkc+8M22Hn3RYuNzx1gFknwy+TK0ROrzdyGfmjuPleNeBNUZH50fEKLbc wKLPAhN0GD/psewg8oWZ9u6af3Q4lG4a4oUcXJV49cEcio/QWTFvZPsocMnn Z8AHmaWp2AzpnN4YIQbYlUVkH0LOYR3sN5FEvrEu6zByVD81f600AyJWBSr4 Irvdrj+gsYABg/muidhL9LS/SS9igFRcRIAfzo+tf743UxlQaSyxNAC5zCd6 zFqNAU2X/604hpyhq1+yFZXqp6ZrE7GDpr/5GWgygO/36z7stZGm48QKBvyq mzgTiFx9ftFU52oGbO90bApCvmZfW9awlgFKp37RgpEjlQMDq7gMyMmQc8fe fKt9Ons9A55JKM5g11Ve++e6jQET87ulQpELInZV7trOANOxNDPsxC0iJzbt YIA5v1QytnmzB5/qTgZUX98tdRzHr09LYMiWAac0Z6axuyWqRA97MOCsxurs k8gyn041xnky4IHHjRZsuLE9Pc+bAa4jAmJhyFc2flJp92VAvlOqJ/be4xOb NgczYPfqhyrhyEkmj6WcQ9H4ZliW2FWUyNaQEwwY1bl6ApvxYIHb3Qi0XszJ t9idw2pRtHgGPOEE+0bg/K/8ZbIqkQFXkxTTsQ3jH8rtTGLAnNrII+xM1S05 p1MZ4MVxFIzE8Xdy+e/XJQaMF2XHYn9qzuB/VcCAhLtDR6OQxbP3vuwtYsB8 oYEUbINDKslzxQyY8bIqwL4wv5Spe58BA9RzXdi2Gxq5VyoZIP+xH04hxy48 L1JRxYAag/92Yz/scmhoqUbj2b/YG1spdMhxfi0DAmYSMrA/lAofP9LAgHnC 7CFs0cg3G5ObGCC45OQs9iqLVMnbb1E+hhxZEI18/qdyZvd7FG9hAz1sK5W1 j0y6GOCRZBmM3ZLuN80aRfmUGjCOzfrzuV3pFwNmU7znncb7ycbkicw4AyLb VKSxxSmcyNkplE9Elwr25e1Dwl58TBBbddoKuyZU+dgBfiZEueU4YX8v2D3o Mo8JZ+fFemLrSz17bSvIhMOFpWHYb+svJW0RZYLswM0b2NOzzfwbxJiwrUKj BJu5XMyPK86Ez00Rj7C9zwTs0pNgwoRtbj22qJkphS3DhB/9HSPYa5rmrs0p MOHy8Hv1GGRnfr1FM4pM6IxsXoEdo+V5akKJCSHNN1djtyZ/OPCDYIKS7uQW bB+LYvVPDCa4PpRxxk4L789qZTIhvk78APbjuzSZZmUmiEb0e2GLy8aOvSCZ IElsC8TOeev84L4KE64teJWI/UogQ/WuKhP6/AfOYo/qNGQULEGfV/IjHdsw dXVIzjImFBcWXsX+YCm3LmU5E1LiFEqxJVufv/JayQQ99b4W7I+xp7jHVzGh rWa8DTufu/leoj4TbKpHOrA33HiRWbSaCV751/uwQ0Je+4xymQCanN/Yxlrx ffzrmJAwmDqJrfjVxHahEROM7cemsUt21K/X2cCEtyNH+WORv7Ga5AO2MCF3 +oEkdtn75LiorUzIu3tZBvtUvAVfmjETXCaPymIrT7wdvG/CBGHvGUVs65et j6bMmCB9zYrErj3U7hxiw4Seq5m62KnszPfxtkxYq4YuPDhebQ4mmXZM9L4v 18eeNfqsW+nAhCGfm2ux9eR7RPmcmVBqtGAjtuDrq6EyLkyQuNy8Cbv5hMsY 05UJSbmxW7C9Bns/rXNjQsmRz9uwcx71F0Z4MKFwt7IFtu/hfDL1IBO2rs7c iQ2L3dNzPJkQY7BgF/anM9/CnnszYVq7Zzf2QpcfliJ+TOj1VHPADhP7NR0b jOJ9KNwN++vz/wLTQtD6SCTsxzYOT53KDmXCZv2UA9hyM7oTZSeYcOBuvAd2 3vdjo18jUL4SG72x59/Y6jMWieKtpXII22cfZfhfFBMW3hT0wdbvrPgud5oJ hzh3D2PXNcz2G8UzobamzR9bM77BzTSBCYuOZwRgn9typc8mkQnKJruOYDs+ XffFJ4kJj0OfHsUevRvZmZXKBLaNdxC2fJp4y/QlJnCrlpzA/ix1u3nBZSZ4 XDc4iZ0fvb1RNZsJIjEQhr06MOm1VS4T7s+qRfDiMab10us6E+a7y0Vi13u8 rYm8gfI7aIznvfby1XcLmBC0MPUU9pKWB09eFjHB1NQ6Gntsu83jrmIm0DLl TmNHcS+VSd1ngmLZkRjsmyxWkUclE0xkBuOwj66689msmgmaD4bisTeYGsqs rGFCvd6nBOwFrnVAe4XycbosEbsz0PawQD0T3pudOoN968xA9mATExx8NyRh H8s90tzQwoTbx3/zLNuUonOpA+0Hb40U7MK/hakH+phQnbL6LPYW1dfjK34w QdyElYrds7Pfin8c1TPZAZ5DTgiUvfnLhF3pyeewOcq9d+9LKsPGsLtpvPWp flZwma4MvdJh57GPuObmn16uDIlH5dKxGcKnrh0GZbizOZTnDQevrBfaqwy5 wuM8ezQ+/JJ+Av3+T40MnlVbnydkKUPLTqP/++To9fDHyhCYt4pnCy+HGYXP yjDnKcbzatuXpgV8LKhafYX3eVMHEk0EmSzoLO/hjefe0Z3GdlwWyBZH8cab 2aW4uG0zC7pr/vLmc2prJ/9uMxZcPWfHs8/dax3vrFkw2JrJm78N4V5u4cQC 9/BK3noZRWqca3RnwX+3HvDWU+3HLx9TXxZY2oYnY1/JbnVMOMIC4adveeu/ yKrcpC6IBR9t5HmerTyuahzBgufzPHjxrE/ONgyIZsH5dyG8eGe5PrO8EscC qx/BvHzwXtnv8foMC1xv7OPli6G4eNjEWRasNVoVy9t/foSERBoLNLam8/JL qkPtvHI6C9Jej/Lyr7NoR4HJJRboaCbx8vP4rnNtV3NY8M3Sl5fPXyvzXMvy WJDISePlv6lq2fCbfBa8/XcnHJs+81Hoz20WmGx7xds/p1y/J0kVseD9n1re /vr55h/BLmbBXlbFcezKK0ztHaUsEFx8MgR7sbj2Y9cHLJBSNA/GTvRbvyWo HI2veBFvvzpucnPMfcyCoeajvP08O3QrduY5C6xdknj1oco92uF3DQtuDzfw 6kdEv7Pmj1oWTHfM51n0i1Jr50sWnL1wjFd/ZD9GK1e/YcGh8+RB7NbdLr8f 1rPgpP4GXr1KbzGsLWlgQV3+Xnfe/JrGPXObWPA1M55X71RfuJSdbmHBytRC F975sZEbF9bKgieWt5yxC/6jOAa9R/mle80JW/tJk4BnGwvyZiL2YK+9z92x o4MFJQPCdrx8zSG+LupjQYbFjBmvfrImy6S+ovkrZu3Afn+5OU6knwX6pgam 2PYXY7T+DLAgJsaRV+/3p0yGtH9H88214J0XS2Xe7mj5wYI2i8frsb8nFLLq f7LA34lpxDsPYva9eDLCgjMyDYa8/Xvyrey13yj/ol/xzifD2cKvF8fRfBR/ 884v/pDY8tQJFig1y63gxffouj2nplC+yK7WxE72Lrrp/pcFSb8XqfLyzT5u naYgCf4xnxZhy+wZVTAUIiH02TLe+RnktPvnNmESfk168c5XUzfy4n5REi4p 14pjjx+q+J0lQUIe9dksPq8dfZVf35YkoffpxRnsF/7R2Q+lSGgfdJ7CvhS4 07RVhoT6/ZWjvPtBxNB1yUUkCMKVL9iFUebHCXkSNJZ9+8y7D5x+YLlEgYQ/ 95jt2N/jI/g3KpGQLGnxDvtsGmEXQiPh+pqH/2H33NgmNcQh4cmJNVnYJreL e6cWk9AvTc3Avl+oUCGsSkLgxy7e/Se25Mt+1lISXn5XiMHWehz81EaDhHJB NV/sC0+6z+9fTsKXQI4ntmD1Zu8ATTSfo3P7ePejGlkiWZuEy4EWNtgnG2/5 v9BD43nmZIj9rXnBttaVJEzWmKzEtmw5qty7ioSmNws1sVU/rq+fMyDhbpea Mnbjl08qK7kkUOfC+bEZk/M/5W5G81GdKsf3yfTqZ5XZW0hw6nh/B1smMfRq 5lYSxGlx17HncYbdz20jgfL+QCp2r0XzVOQOEqyPDxzEtqfHtZ80I0FleBvv PtwyuL4qxJyErMLg/9+XT5ZG++8kIYizBrDzC9PlXXeTsEaXvYB3/w0yn95j jeIX+kYQO2OjeKedDQlLbxlM4ft6bHtw7k47EsIJ+05sT/E9K9bvISG6P+M6 tqYbx4K1nwQZ4R417HytTl36ARKMnHWo2Mr/0pQo7iS8DdKZj70wVbR7wUES 6Df1B/B74vfToUP8h0joatbMwvZMyNn5D1ld/nUsdp+1w8o/PiR8+yR8FLt1 uH52xJeED/fsTLHLaHcTuo6QcEV20xR+/2gOehxuP0qCN7WsG/vGPXLXh2Mo HpseveK9l7adozYGkXAv3fcidkjgsVtPjpMgQrNdiQ0thi+zTpHw6YXIbvwe M8sXeXAumoTnoWx97D3BjTnxp1G+nbxLwT6u7HwyKJaEqMcK7fh9V+EVtdIq kUT3qvLd2K/AlLP9DAkO6rK62B9lFWQ3JKH8jK5dgD1Vnv9TK4WE3Yk6L/F7 Uk+4LlcyjYScpsrl2JvaUs8Knidh5sRZEexdtx3CZpCvueV34verv8Ww/WAG CRmhkbHYxVkL5Z5nkqDsnvkBv3/VVtqEh+SifLNpNj6BvEac5eOXR8Kd2y1y 2Ns6vjl4XCdBaN37Dvye9ogI0be+QYJxx1NP7OsNl0d0CkjYeTY/FL/H7189 0Lm0ENUDg4Vc7JoArTrlIhIqFpnPheD8JP67Ll1Mgj7/qhBs1oGvjkP3SCCE Rffj97/W6iKTnlKUT+aBdGyQOmbQdp8Em1VJ73A/Yc89MfnaMhJOf0ldg32J T/3N1Uck3GCsncH9CIUMv9W2z0gYNn6gdgSfzyM1am7PSWh70FSN+xuRWyh0 3xoS7FVqrbDHJqv4Yl+QsNhR/pg/cp2VVE15HQnbT/Bdxv2S8EKnB8/foPx4 X8jC1hcuzW+qJ0Hn/odruN+SV2oXN9iI4pvkkeWDHCZ3w0yphYSFPqJ+uF+z yvPvOk4rCVb+8t24v/Pzvx06Wu9J8B1YboJt7zexaGsbqh/xm5U8cXyb1386 1kECR3hrAu4XDZ3p3Pehj4SRnX5vXJCv9mvt7v2K6mWdmSC2NTdqy0g/CZ3F xErcj6r5uWyZ6DcSEn+yk/YiX9keOLLyJwkC/RckcT/LKreue/0w2p9OIcq4 3yX5j/F2xwgJWgJpmrgfFnS7pnT/GAl2KlJgg/Npvlzw+Qm0X4zWKON+moTL fs9rkyScyZaQwP226ocPHYqmSAhxgVELvL88nKB2mgS+5Q43zZDFXxYKTc6S UKiq+A73856c2ppkJcIGp83tA4DjcX040UyUDdoNpZFcZOMX5xKMxdjwIrZV yRD5nVhPrOF8NixYdnD5auTB+KCoxdJsiJ2vLqiLz48CZiRThg2yxkluuP/o X18TTlnAhtktnKe4PzkrLXtSSpYNXXLbHTWQZc/eCpqQZ8MT7uYVuL/5ocQ8 cESBDSeujuzkIGe9mzz6TZENY9djPHA/VFV+Q0AnhQ1DtR+Dcf90bUb7oRo6 G66mzyxRwOf7Zcl9aYvZUF5vHyOI91NViUuSCvr+0rP883B+ddk4x6qywWhl itfcFVRPWHl7ji9FPyf+MKaRk3MNbd002OBVca//J7JVTa/13uVs0NQ9MjmE +9P9sbttNdng6y3yB/eH81TfW5pqsyGRPNXYg1xx69AOPT02TFsvftmCfLJu kanmSjYo613Z04y86UeFydJVbAiTyO6rR27UEDWmG7DhdORUZS1yX/GVDcKG bDAuHM4sw/30sib91o1sqHqy5kkaHq/DvDV9m9jQk+H3NBl5YJ6O4e/NbODY xdyIx/327alGC43ZcKNCbUk4sv8Xq22mpmwwPXG39SBy1+no7Q470PjLLab2 IW/XKNvhacaG0vo1M3uQFwcqWcZasCG0z/3qTuQPUu32NVZsOLPxjQvu/2+4 J7GnZTcbyKKjofj/B4pt1jr1WrOhc5O43zLk2JysffPs2KAh8OsnFXmNgZO3 4R425D3cKDd7GeX/vq8n7u9nQ33GoG0ZssR8hfDnB9jgWj3QVIgceGdz5Dt3 NixskFXIRbaYyT89dpAN3MKPIsnIgskHkzV80HgWh+xzQ/bRu3R27WE2rNA1 1bRD7vhUd87Elw2/NqRX7UC+v1jjgoc/ytfpOrVVyAcejVzNO4Y+//NXGWHk d07KuaWBbJiv39g7lUXAOhGL68+C0PxO/fUbQqZYlNzqCWFDnGdEZQNyXX/A PXoYG77nH/2UiqwpO/M8LYYN8vu630kj3wo73nI2lg2Gbtz22Uy0niP8fUlx 6PtTlZN/IFPfiArGJbDBYFr730tksWh5oxPJbNCVUi3G/58VOZ5hHpLChmrX o5MeyHyuNKfAs2w4ThfstEKeAPZJv3NsUCMzItWRe6a1KvdnoHwKIgVaLxHg 4F76xvUCyscDYgpPkD+8X9XhdJENblvfVFxHrr/H/WuXyYYDFYlFR5ErvLcb mGWz4dVGVYGFyKk9B+6vusEG6cdnzDUuovwz//5c9yYb3FcHO0sjxz451KJ9 iw0lvt87hi+g/L505LdaARvUa5eLFSF7WUVqKxezwXyjaBcHeeCZiBH9Lhuy xDb/5kd21YkzJ0rY8PS0qV1HBgG2Mik+i0rZ8Li2Xi4FedOry4Vi5WxYd/T7 +7F0Ap6uIiuFH7KhkabOeYm85nreG4EKNtR6t97IQtaJLPj+7xEbrD6FG29G ZhpWLB2rQvs/xjk08TwBf4pb8z6+QPWrW0p69Byqf6oeVc0v2ZBQ/GX+Q2Rq 1r+2V6/QfFd0CYcjQyxbsqKODa9Z9b1SyKedff0uNrLhikToQyIV3Uc+CCWc bWLDSKY82X6WgNumGXlxzWwQM33ofBG50aCqLfgdGm/7lLk8sqKsFNh/YMP5 j0a7/yWj90ZMto1lGxv2Otz/XIK8Zm6Fn8lHVI+uxC50R947ZJe3ph2tB2Pl noYkdD/774YErYsNzwpXfY09g84v/41tHf1syDCz6XoQj+rztw9jLQNof+19 LmiFbL/XU6J+kA2Zv0bcxuJQfEzOciuH2NAy5/Ocg/yC3Z2bNcwGF5db4kdi 0P3mgv+TtBFUj3tD1gohf5cRbUscZcMGboFnyml0v/2nIXHiF1rPeOnMvGh0 vrWE+O6ZZENa4a0tpVHo/rFNJn73FBsoYmrOOsghT6/l7viD6mfLLo2iSLTf C1594M6wQURw2YPLESgfohS5zDk2MCIDvF3CCDimd29+tzAHeh+7yXmGoPuG VrPqTxEO+PdufVwcjO7vy0Y2zohy4Myf6O5fQSi/ldVOLprPgdWlKxy8Agkw ksj5vVWaA9Oj9+11jhAwI1y9YLcM+n0jJ5pdAAH3+Ls0XBdw4ILCu5bj/gSo TBLux2U5EKH2r7/cF9WfnrMddxU40GTxI+OvNwHP24unnyhygE9IiJyHfPx9 g8IbJQ787Hq6QMCLgNG6+Rb9BAfGiEfNEx7ofvsgooZgckCr8NODa25ovgl+ RZGqHJhf6D/N50CAzenkuuQlHPBbOGVRYofu0xFFg1lLObB2756ne2wJiDo2 RJarcWCJglNk3m60ni4u6T80OfB4e6vCoDkBpGNY6bQWB1o3pp5zNyOg3fpy s4gOB+KtwOuLKQE7TD9JsHQ5cMzj14vqbQSs0N8ZZqWP1mvLzePqGwn4oXM4 y8WAA+cPzCodWY/OK40zFT6rOUCa2Wx5sI4AJfbr8di1HLi1QXKKZYjOZ6n1 Hk/WccCwN6/5kh7Kl17tnarGHFB9e/G6wGICkvKvhZLbOLA1uCRrmET54CmX TzfhQGl0b8lbZRTfX+N/5Uw5sIP7syeCRoCIQHkevwUHuv16/oXJof2tzJ3+ aMOBT/9l3+zhI0Cqr4jdasuBArHH5zbNUqA1n7mjyY4DH5517sieoYCb5ryc WgcOqL1x6zaYoEAU9/n2e04cWL+wy/LvNwo8c9iWneDOgSLnYdH8ZgrEKz96 fdqDA1b0O+OHGihg2ac2EXGQA1KSe+PU6yjQ6ym1LcgLrefC4MMxzykgENL0 2+0wB+jlU0HVDyhgdGH3FgjkoHrlsFX9AgXEHV/4rg7igNMeWf6taRRoVtbP 1AvmwM7xgHibFAo436CMqYWi/BEPnLSOpUBYWcdFpTAO3PaQXdIYSIGqVpfh sdMcWPBWvC/DigLLGXtoArEcYL17pXLJnAJZ+223ycZxQMMW3ieZUCBkyuy6 TgIaX85zP3MjCuhTDPf4J3Ng/8eBM8vVKXDXQbFhPIMDWwzvyTvxUSCnt65w 6iYa38sVzLpLSiCr/qJd9DYHvR3dlnLSlCA84D9xpQIOODwTLzx8Rgn2Cj90 0y/iQJKPl2dfmBLQVK/Tg0o4kCDRM6TvpgRpB8MSZyo4cGiF+bkbakoQM6br PVvHAe/LspnGxYqQaLQuT6yeAyLp6+ZcbihCaopJp1wDB14f4NP2z1aEK9ou psuaOCBmvcwnMFkRynyTNKxb0HokxCpTDivCwNi3n8UdHIhu0et7paEIW35d PrTvJ9q//NuFLuYogOhvscN10osBjJ59FzohD8v1k17QTBfDBSVT8utKOVDJ fzDvTvJi2O+uvsn85gKotU1Oft64GFTHVlTzRUoB9ZdnTqaUCnw6ZhNr8EIM jEoHM+6bq0AB36KSfTmCIFOh2GuRpAL/FlyVOnFnjvvL/3KAR7IKLM9wz8uL muO2aiwWCU9RgbOXlq2ut53jXrqqs7Q4VQVGGjvtaEJzXJVYUx/pDBWYaygI rrCZ5RraRP59na0C9u3b103O+8c9ODkst7FEBTrTI/W9dk1zTYuP5NnfU4Fj NQtjU5dOczUP/lvpX6oCtkNybRVzf7gTneJ21x6oQNHDc77iN/9ww2s42fyP VEA1yjX1+uwUN/2cnXrlMxWQvRuf0X19khu8o6ey5bkKfF7X9k40dJLrKOZu 9qNGBR4eFpfWtJjkskOP+FFfqgCIa588/neCW+SaXB70Bo23S9uKMJ/gptAV t6XUq4C8vFGM0eIJrv+HrPYbDSpgdN6pwn1mnGtgcnvuQ5MKxKzpo5bljnNp wjrJI80q4DRnYfI5aJzLV1XOEn2nApYmvUHCZuPcL4Fwj9GiAl0lmfnqnHFu jU7txpWtKuj+GtFiOf2b+z8xm7rI "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{None, None}, AxesOrigin->{4.605170185988092, 1.6094379124341003`}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, FrameTicks->{{{{2.302585092994046, FormBox["10", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {7.600902459542082, FormBox["2000", TraditionalForm]}, {8.517193191416238, FormBox["5000", TraditionalForm]}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{2.302585092994046, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm]}, {6.214608098422191, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm]}, {8.517193191416238, FormBox["\"\"", TraditionalForm]}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, ImageSize->Full, Method->{}, PlotRange->{{4.605170185988092, 13.795328258601776`}, {1.6094379124341003`, 7.007600613951853}}, PlotRangeClipping->True, PlotRangePadding->{{0.18380316145227368`, 0.18380316145227368`}, { 0.10796325403035505`, 0.10796325403035505`}}, Ticks->{{{4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{2.302585092994046, FormBox["10", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {7.600902459542082, FormBox["2000", TraditionalForm]}, {8.517193191416238, FormBox["5000", TraditionalForm]}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.5811575524826202`*^9, {3.581157764664164*^9, 3.58115777177495*^9}, { 3.581157941212791*^9, 3.581157961839841*^9}, 3.581158992241129*^9, 3.581159034633665*^9, {3.582817363281467*^9, 3.5828173889780197`*^9}, 3.582820323947954*^9, 3.582860067485936*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"frequenzgang", "[", "f_", "]"}], "=", RowBox[{"Normal", "[", "fml", "]"}]}]], "Input", CellChangeTimes->{{3.5811582498995733`*^9, 3.581158307794242*^9}}], Cell[BoxData[ FractionBox["1000", RowBox[{ SqrtBox[ RowBox[{"1", "+", FractionBox["2.1340173689841712`*^30", SuperscriptBox["f", "10.099309297907753`"]]}]], " ", SqrtBox[ RowBox[{"1", "+", RowBox[{"1.2293790239735687`*^-46", " ", SuperscriptBox["f", "9.808847116770792`"]}]}]]}]]], "Output", CellChangeTimes->{ 3.5811583085948477`*^9, 3.581158994612232*^9, {3.58281736339006*^9, 3.582817389074489*^9}, 3.582820324065576*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"B", "=", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"NIntegrate", "[", RowBox[{ SuperscriptBox[ RowBox[{"frequenzgang", "[", "f", "]"}], "2"], ",", RowBox[{"{", RowBox[{"f", ",", "0", ",", "1000000"}], "}"}]}], "]"}], ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.5811582389330597`*^9, 3.5811582416077623`*^9}, { 3.58115827650809*^9, 3.581158287315504*^9}, {3.581158325450364*^9, 3.581158330521235*^9}, {3.581158409732094*^9, 3.581158417563303*^9}, { 3.581158779691926*^9, 3.581158790435033*^9}, {3.582821285038056*^9, 3.582821286424502*^9}, {3.582821463498307*^9, 3.58282146451377*^9}, { 3.582821532102501*^9, 3.582821534835466*^9}}], Cell[BoxData[ TemplateBox[{"4.772377695323492`*^10"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"Hz\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: hertz"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Hertz\""}], "]"}]& )]], "Output", CellChangeTimes->{{3.5811582978434277`*^9, 3.581158328193411*^9}, { 3.5811584082788153`*^9, 3.581158417902669*^9}, {3.581158784497589*^9, 3.581158791174502*^9}, 3.5811589964788723`*^9, {3.582817363699987*^9, 3.5828173891758327`*^9}, 3.582820324298333*^9, 3.582821286842046*^9, 3.582821535306727*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[CapitalDelta]B", "=", RowBox[{"0.02", "*", "B"}]}]], "Input", CellChangeTimes->{{3.5828216520768633`*^9, 3.582821655900065*^9}}], Cell[BoxData[ TemplateBox[{"9.544755390646983`*^8"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"Hz\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: hertz"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Hertz\""}], "]"}]& )]], "Output", CellChangeTimes->{3.5828216563587418`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\<\ Messung der Rausch-Spannung als Funktion des ohmschen Widerstandes\ \>", "Section", CellChangeTimes->{{3.581153369778225*^9, 3.581153418534211*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"data", " ", "=", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Quantity", "[", " ", RowBox[{ RowBox[{"5", "*", RowBox[{"{", RowBox[{"1", ",", "0.005"}], "}"}]}], ",", "\"\\""}], "]"}], ",", " ", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"2.4320", ",", " ", RowBox[{"0.00851", "/", SqrtBox["107"]}]}], "}"}], ",", "\"\\""}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"10", "*", RowBox[{"{", RowBox[{"1", ",", "0.005"}], "}"}]}], ",", "\"\\""}], "]"}], ",", " ", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"3.1366", ",", " ", RowBox[{"0.0115", "/", SqrtBox["106"]}]}], "}"}], ",", "\"\\""}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"15", "*", RowBox[{"{", RowBox[{"1", ",", "0.005"}], "}"}]}], ",", "\"\\""}], "]"}], ",", " ", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"3.7130", ",", " ", RowBox[{"0.0119", "/", SqrtBox["105"]}]}], "}"}], ",", "\"\\""}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"20", "*", RowBox[{"{", RowBox[{"1", ",", "0.005"}], "}"}]}], ",", "\"\\""}], "]"}], ",", " ", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"4.2193", ",", " ", RowBox[{"0.0161", "/", SqrtBox["104"]}]}], "}"}], ",", "\"\\""}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"25", "*", RowBox[{"{", RowBox[{"1", ",", "0.005"}], "}"}]}], ",", "\"\\""}], "]"}], ",", " ", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"4.6808", ",", " ", RowBox[{"0.0174", "/", SqrtBox["103"]}]}], "}"}], ",", "\"\\""}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"30", "*", RowBox[{"{", RowBox[{"1", ",", "0.005"}], "}"}]}], ",", "\"\\""}], "]"}], ",", " ", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"5.0737", ",", " ", RowBox[{"0.0237", "/", SqrtBox["186"]}]}], "}"}], ",", "\"\\""}], "]"}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}]], "Input", CellChangeTimes->{{3.581153432785575*^9, 3.5811535370270643`*^9}, { 3.5811537117936497`*^9, 3.581153742141809*^9}, {3.581153872239696*^9, 3.581153892493754*^9}, {3.581154025918908*^9, 3.581154033752873*^9}, { 3.581154157514709*^9, 3.5811541806813087`*^9}, {3.581154301426135*^9, 3.581154369296029*^9}, {3.582819123181356*^9, 3.5828191234292917`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"5"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.025`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"2.432`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0008226927521778597`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"10"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.05`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"3.1366`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0011169787417108538`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"15"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.075`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"3.713`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0011613210868087547`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"20"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.1`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"4.2193`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0015787348878623815`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"25"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.125`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"4.6808`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.00171447294400587`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"30"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.15`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"5.0737`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0017377683130030365`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.581154321876854*^9, 3.581154373039424*^9, {3.582817360441599*^9, 3.582817386813621*^9}, 3.582819124682753*^9, 3.582820318967784*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ SubscriptBox["T", "Raum"], ",", SubscriptBox["\[CapitalDelta]T", "Raum"]}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{"UnitConvert", "[", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"24.7", ",", "\"\\""}], "]"}], ",", "\"\\""}], "]"}], ",", RowBox[{"Quantity", "[", RowBox[{"0.1", ",", "\"\\""}], "]"}]}], "}"}]}]], "Input", CellChangeTimes->{{3.581154379529179*^9, 3.581154417718103*^9}, { 3.582821209628071*^9, 3.582821218886818*^9}, {3.582821704521552*^9, 3.5828217331515093`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{"297.84999999999997`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"K\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kelvins"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kelvins\""}], "]"}]& )], ",", TemplateBox[{"0.1`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"K\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kelvins"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kelvins\""}], "]"}]& )]}], "}"}]], "Output", CellChangeTimes->{ 3.581154418563776*^9, {3.582817360493178*^9, 3.5828173868712807`*^9}, 3.5828191283276997`*^9, 3.582820319111788*^9, {3.5828212108749723`*^9, 3.5828212193604717`*^9}, {3.582821710596053*^9, 3.582821733597611*^9}}] }, Open ]], Cell["Verst\[ADoubleDot]rkerrauschen:", "Text", CellChangeTimes->{{3.582817547072515*^9, 3.5828175490558357`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ SubscriptBox["U", "V"], ",", SubscriptBox["\[CapitalDelta]U", "V"]}], "}"}], "=", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"{", RowBox[{"1.3981", ",", " ", RowBox[{"0.00467", "/", SqrtBox["101"]}]}], "}"}], ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.58115460802238*^9, 3.581154633032419*^9}, { 3.5828175428295918`*^9, 3.582817543650311*^9}, {3.5828190245824013`*^9, 3.5828190300706377`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{"1.3981`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0004646823678280649`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]], "Output", CellChangeTimes->{ 3.581154634950526*^9, {3.582817360528288*^9, 3.582817386917727*^9}, 3.582817544667136*^9, 3.582819030523045*^9, 3.582819130130559*^9, 3.5828203191575603`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{"TR", ",", SubscriptBox["TU", "aus"]}], "}"}], "=", RowBox[{"Transpose", "[", "data", "]"}]}]], "Input", CellChangeTimes->{{3.5828175961767473`*^9, 3.5828176056541986`*^9}, { 3.582819016350666*^9, 3.582819019726266*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"5"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.025`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"10"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.05`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"15"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.075`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"20"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.1`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"25"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.125`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"30"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.15`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ "\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"2.432`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0008226927521778597`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"3.1366`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0011169787417108538`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"3.713`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0011613210868087547`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"4.2193`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0015787348878623815`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"4.6808`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.00171447294400587`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"5.0737`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0017377683130030365`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.582817607646845*^9, 3.582819021276099*^9, 3.5828190647172003`*^9, 3.582819131761938*^9, 3.5828203194216347`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{"R", ",", "\[CapitalDelta]R"}], "}"}], "=", RowBox[{"Transpose", "[", "TR", "]"}]}]], "Input", CellChangeTimes->{{3.582819033924081*^9, 3.5828190411666822`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"5"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"10"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"15"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"20"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"25"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"30"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"0.025`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.05`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.075`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.1`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.125`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )], ",", TemplateBox[{"0.15`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"k\[CapitalOmega]\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: kilohms"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Kiloohms\""}], "]"}]& )]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.58281904170753*^9, 3.582819132941794*^9, 3.582820319555538*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ SubscriptBox["U", "aus"], ",", SubscriptBox["\[CapitalDelta]U", "aus"]}], "}"}], "=", RowBox[{"Transpose", "[", SubscriptBox["TU", "aus"], "]"}]}]], "Input", CellChangeTimes->{{3.582819044073577*^9, 3.582819053397595*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TemplateBox[{"2.432`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"3.1366`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"3.713`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"4.2193`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"4.6808`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"5.0737`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}], ",", RowBox[{"{", RowBox[{ TemplateBox[{"0.0008226927521778597`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0011169787417108538`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0011613210868087547`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0015787348878623815`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.00171447294400587`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )], ",", TemplateBox[{"0.0017377683130030365`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox["\"mV\"", "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", "\"Millivolts\""}], "]"}]& )]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.582819054488843*^9, 3.5828190924222927`*^9}, 3.5828191356809683`*^9, 3.582820319707959*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"G", "=", RowBox[{ SuperscriptBox[ SubscriptBox["U", "aus"], "2"], "-", SuperscriptBox[ SubscriptBox["U", "V"], "2"]}]}]], "Input", CellChangeTimes->{{3.582817631047546*^9, 3.582817639515223*^9}, { 3.5828182253076763`*^9, 3.582818227180522*^9}, {3.5828191431019773`*^9, 3.582819146061433*^9}, {3.582819258495713*^9, 3.582819263405662*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{"3.95994039`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"7.883575950000001`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"11.83168539`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"15.847808879999995`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"19.955205029999995`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"23.787748079999997`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )]}], "}"}]], "Output", CellChangeTimes->{3.58281822881814*^9, 3.582819146965529*^9, 3.5828192642116528`*^9, 3.5828203201576357`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[CapitalDelta]G", "=", SqrtBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"2", SubscriptBox["U", "aus"], SubscriptBox["\[CapitalDelta]U", "aus"]}], ")"}], "2"], "+", SuperscriptBox[ RowBox[{"(", RowBox[{"2", SubscriptBox["U", "V"], SubscriptBox["\[CapitalDelta]U", "V"]}], ")"}], "2"]}]]}]], "Input", CellChangeTimes->{{3.582819148540964*^9, 3.582819231039982*^9}, { 3.582819264863847*^9, 3.58281926699782*^9}, {3.5828204250330353`*^9, 3.582820426783719*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{"0.0042072461143402295`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"0.007126484479446991`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"0.008721305080313354`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"0.013385525765469083`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"0.016102718256366777`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )], ",", TemplateBox[{"0.017681636343958317`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"]}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", SuperscriptBox["\"Millivolts\"", "2"]}], "]"}]& )]}], "}"}]], "Output", CellChangeTimes->{{3.582819188239663*^9, 3.582819232434094*^9}, 3.5828192684061737`*^9, 3.58282032132763*^9, 3.582820430819685*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"gplot", "=", RowBox[{"ErrorListPlot", "[", RowBox[{ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"r", "=", RowBox[{ RowBox[{"R", "[", RowBox[{"[", "i", "]"}], "]"}], "//", "QuantityMagnitude"}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]r", "=", RowBox[{ RowBox[{"\[CapitalDelta]R", "[", RowBox[{"[", "i", "]"}], "]"}], "//", "QuantityMagnitude"}]}], ",", "\[IndentingNewLine]", RowBox[{"g", "=", RowBox[{ RowBox[{"G", "[", RowBox[{"[", "i", "]"}], "]"}], "//", "QuantityMagnitude"}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]g", "=", RowBox[{ RowBox[{"\[CapitalDelta]G", "[", RowBox[{"[", "i", "]"}], "]"}], "//", "QuantityMagnitude"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"r", ",", "g"}], "}"}], ",", RowBox[{"ErrorBar", "[", RowBox[{"\[CapitalDelta]r", ",", "\[CapitalDelta]g"}], "]"}]}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "G", "]"}]}], "}"}]}], "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "Full"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\<\!\(\*SubsuperscriptBox[\(U\), \(aus\), \ \(2\)]\)-\!\(\*SubsuperscriptBox[\(U\), \(V\), \(2\)]\) \ [\!\(\*SuperscriptBox[\(mV\), \(2\)]\)]\>\""}], "}"}]}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.582819726231567*^9, 3.582819830919529*^9}, { 3.5828203326476383`*^9, 3.582820405069394*^9}, 3.582820577782584*^9, { 3.582820789739133*^9, 3.5828207910087357`*^9}, {3.582820825215469*^9, 3.582820907456731*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"lmf", "=", RowBox[{"LinearModelFit", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"QuantityMagnitude", "/@", RowBox[{"{", RowBox[{"R", ",", "G"}], "}"}]}], "]"}], ",", "x", ",", "x", ",", RowBox[{"VarianceEstimatorFunction", "\[Rule]", RowBox[{"(", RowBox[{"1", "&"}], ")"}]}], ",", RowBox[{"Weights", "\[Rule]", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"QuantityMagnitude", "[", "\[CapitalDelta]R", "]"}], "2"], "+", SuperscriptBox[ RowBox[{"QuantityMagnitude", "[", "\[CapitalDelta]G", "]"}], "2"]}]]}], ",", RowBox[{"IncludeConstantBasis", "\[Rule]", "False"}]}], "]"}]}]], "Input",\ CellChangeTimes->{{3.582820597034399*^9, 3.58282064052962*^9}, { 3.582820694710176*^9, 3.582820713300846*^9}, {3.582820768348721*^9, 3.582820768937023*^9}, {3.5828208077666473`*^9, 3.5828208101080647`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ RowBox[{"0.7921091746125328`", " ", "x"}], Short], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Linear", {0.7921091746125328}, {{$CellContext`x}, {$CellContext`x}}, {0, 0}}, {{1555.933668505583, 392.03590336701114`, 175.40594137318155`, 98.23981464565915, 62.95525488497112, 43.83534691452791}}, {{5, 3.95994039}, {10, 7.883575950000001}, { 15, 11.83168539}, {20, 15.847808879999995`}, {25, 19.955205029999995`}, { 30, 23.787748079999997`}}, {{5.}, {10.}, {15.}, {20.}, {25.}, {30.}}, Function[Null, Internal`LocalizedBlock[{$CellContext`x}, #], {HoldAll}], VarianceEstimatorFunction -> (1& )]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{ 3.582820664443692*^9, {3.582820716756277*^9, 3.582820719449202*^9}, 3.582820769878686*^9, 3.582820810216168*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"gplot", ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"lmf", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "100"}], "}"}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.5828207741482563`*^9, 3.582820814845538*^9}}], Cell[BoxData[ GraphicsBox[{{{}, {RGBColor[0.24720000000000014`, 0.24, 0.6], PointBox[{{5., 3.95994039}, {10., 7.883575950000001}, {15., 11.83168539}, {20., 15.847808879999995`}, {25., 19.955205029999995`}, { 30., 23.787748079999997`}}], {{ LineBox[{{5.025, 3.95994039}, {4.975, 3.95994039}}], LineBox[{ Offset[{0, 1.5}, {5.025, 3.95994039}], Offset[{0, -1.5}, {5.025, 3.95994039}]}], LineBox[{ Offset[{0, 1.5}, {4.975, 3.95994039}], Offset[{0, -1.5}, {4.975, 3.95994039}]}], LineBox[{{5., 3.96414763611434}, {5., 3.9557331438856598`}}], LineBox[{ Offset[{1.5, 0}, {5., 3.96414763611434}], Offset[{-1.5, 0}, {5., 3.96414763611434}]}], LineBox[{ Offset[{1.5, 0}, {5., 3.9557331438856598`}], Offset[{-1.5, 0}, {5., 3.9557331438856598`}]}]}, { LineBox[{{10.05, 7.883575950000001}, {9.95, 7.883575950000001}}], LineBox[{ Offset[{0, 1.5}, {10.05, 7.883575950000001}], Offset[{0, -1.5}, {10.05, 7.883575950000001}]}], LineBox[{ Offset[{0, 1.5}, {9.95, 7.883575950000001}], Offset[{0, -1.5}, {9.95, 7.883575950000001}]}], LineBox[{{10., 7.890702434479448}, {10., 7.876449465520554}}], LineBox[{ Offset[{1.5, 0}, {10., 7.890702434479448}], Offset[{-1.5, 0}, {10., 7.890702434479448}]}], LineBox[{ Offset[{1.5, 0}, {10., 7.876449465520554}], Offset[{-1.5, 0}, {10., 7.876449465520554}]}]}, { LineBox[{{15.075, 11.83168539}, {14.925, 11.83168539}}], LineBox[{ Offset[{0, 1.5}, {15.075, 11.83168539}], Offset[{0, -1.5}, {15.075, 11.83168539}]}], LineBox[{ Offset[{0, 1.5}, {14.925, 11.83168539}], Offset[{0, -1.5}, {14.925, 11.83168539}]}], LineBox[{{15., 11.840406695080313`}, {15., 11.822964084919688`}}], LineBox[{ Offset[{1.5, 0}, {15., 11.840406695080313`}], Offset[{-1.5, 0}, {15., 11.840406695080313`}]}], LineBox[{ Offset[{1.5, 0}, {15., 11.822964084919688`}], Offset[{-1.5, 0}, {15., 11.822964084919688`}]}]}, { LineBox[{{20.1, 15.847808879999995`}, {19.9, 15.847808879999995`}}], LineBox[{ Offset[{0, 1.5}, {20.1, 15.847808879999995`}], Offset[{0, -1.5}, {20.1, 15.847808879999995`}]}], LineBox[{ Offset[{0, 1.5}, {19.9, 15.847808879999995`}], Offset[{0, -1.5}, {19.9, 15.847808879999995`}]}], LineBox[{{20., 15.861194405765465`}, {20., 15.834423354234525`}}], LineBox[{ Offset[{1.5, 0}, {20., 15.861194405765465`}], Offset[{-1.5, 0}, {20., 15.861194405765465`}]}], LineBox[{ Offset[{1.5, 0}, {20., 15.834423354234525`}], Offset[{-1.5, 0}, {20., 15.834423354234525`}]}]}, { LineBox[{{25.125, 19.955205029999995`}, {24.875, 19.955205029999995`}}], LineBox[{ Offset[{0, 1.5}, {25.125, 19.955205029999995`}], Offset[{0, -1.5}, {25.125, 19.955205029999995`}]}], LineBox[{ Offset[{0, 1.5}, {24.875, 19.955205029999995`}], Offset[{0, -1.5}, {24.875, 19.955205029999995`}]}], LineBox[{{25., 19.97130774825636}, {25., 19.93910231174363}}], LineBox[{ Offset[{1.5, 0}, {25., 19.97130774825636}], Offset[{-1.5, 0}, {25., 19.97130774825636}]}], LineBox[{ Offset[{1.5, 0}, {25., 19.93910231174363}], Offset[{-1.5, 0}, {25., 19.93910231174363}]}]}, { LineBox[{{30.15, 23.787748079999997`}, {29.85, 23.787748079999997`}}], LineBox[{ Offset[{0, 1.5}, {30.15, 23.787748079999997`}], Offset[{0, -1.5}, {30.15, 23.787748079999997`}]}], LineBox[{ Offset[{0, 1.5}, {29.85, 23.787748079999997`}], Offset[{0, -1.5}, {29.85, 23.787748079999997`}]}], LineBox[{{30., 23.805429716343955`}, {30., 23.770066443656038`}}], LineBox[{ Offset[{1.5, 0}, {30., 23.805429716343955`}], Offset[{-1.5, 0}, {30., 23.805429716343955`}]}], LineBox[{ Offset[{1.5, 0}, {30., 23.770066443656038`}], Offset[{-1.5, 0}, {30., 23.770066443656038`}]}]}}}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVj3sw1AkAx5cTubHjEedxRhsqivEchfh9Ka9Ydve36pc8ymtXeeR1VEQx LtmOuF7jfShpQh6Hc24jWa1c5YxT3LWcV12nS7Sx4dwf3/n88Zn5zHy3hcZx IuRpNBpzY//TMH+1qsyg21m9s0GsuLXTuW2z6dYYfjnRd8nPflpyg+hOra82 4TcQvCUXWb2kluizjOcp8oVE2y7H8SJJO9EvGPJc4j0lQh61+eRI+onHDlkd b3mviGaNj9kZklFCfGUsfo73jgiy19qWJpkjDnYp+c7w1ommJ8ZxZySfiEG6 nbJCkBoeTowOst4qwzXf7cFtPx3M30vJeOayBREWK3QrOgN60inuWIwumKYR 77/yMMaqteZfc6oMNA2nJz/eawKdN1GuzRZGcNTY1aCQYQZ6S11cYuEO8GSF pTWUJTSyA2Xh06aI65u1aWBao4fsubd93QyXAhS3r0bbYmexsva8uSXCRGcj rfh2cFURvGkUWqFbSZd98sheRNA8YgReNrBSz7z2OskBS+nSkclFWxz74GTm G70PgTK54YosO1SWPdKXXnaGhbx8+wubvWj+zmFsiAMoCxy8d4/bI+knJ1ap jwvatQbjp3iOEIprFnKPumLExD9DR8sJUR72XVHUfvQ77mG01DijpNaq9eSJ A9CMVuJO7waufOg6fyrFDaKz+e8+01wwU5f8DT/BHZF5vdx+kQt63QtvXLjg gZ9DkszZ5a6Q83s5mZ/pCZnN86eX+ftBc/lRruK0F4Re4scj5gdwUVvKHPr2 IOyNnff88YUbTgWE9UizvFG+Fhx7fcANE+dtw4mrPugsXdFRrXaHZtHNl7mV TAScs/66KNUDt9R2nRYV+2IqWHtW7OyJ7oStbjvv+mG7QsqOB1peKGNU6Dtx WWDfybKI+tMLXWkrNP4zFuQLzAoMqg5im7fSZ6PDbJxwZIVfSfVGy1PTvBfD bHTOMOTbCR8I+tYsGUEc9B6K3lKizURR4usTx8Y5aOsLn7eZYCJNy0DV8AgJ i9RlxugtX9wx3SROkpAInN8ssk/3g+KinG53MBeOTaHFtw1ZuG15/1zZLBc/ +K2pqOezYBpa57sa448BOr8uc5mFMa+OJv+//fHGu9ZMHMjGUNUZcyLxECLe 1vAT+tn41MzeZ7hwCMMqZ3IXzThYb09ozYk9jE2++iNp+Rx4W7q7pS0dRuH7 s+NhKxyIgiyiTiZS0NJqEhkHk9AI43eWJlP4KNtpMxlCIphfSX+WQmF0srSs /DiJjwlbmmzTKJQ25ibrRZAwvihdWc2mYOxz3EgtmkRmk1BQcI2CdZZahuw0 CQclVmNrBwXW+1i7oaskclRy5ec6N/zoVGX+dRLP1Xu4er9Q0BQG0Jk3SfD1 bZfP9VD4XeA+JSohcd1Kx9VzgEKIiUFhVxWJxaOS316OU4gNGfyn9j4JHNfd QX+10XfffySymUReJCeVmNjom3f0GrWSMIzv1a+eprC0Ul1c1k6CnVMbETNP If1amtf3QhIleRNt5f9SCE5faGF3k5gr0PtyaIGCSzifofpw40+xoN5OSmGT NVea20fiScUjWtQyhVkdcahHPwntW2ucYhmF/nXiVwUxidC7e2oGVynUzbTa 9wyQqG88JV1fpyAY3F2TMUjiP9MaLVQ= "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"R [k\[CapitalOmega]]\"", TraditionalForm], FormBox[ "\"\\!\\(\\*SubsuperscriptBox[\\(U\\), \\(aus\\), \ \\(2\\)]\\)-\\!\\(\\*SubsuperscriptBox[\\(U\\), \\(V\\), \\(2\\)]\\) \ [\\!\\(\\*SuperscriptBox[\\(mV\\), \\(2\\)]\\)]\"", TraditionalForm]}, AxesOrigin->{0, 0}, ImageSize->Full, Method->{}, PlotRange->{{0, 30.}, {0, 23.787748079999997`}}, PlotRangeClipping->True, PlotRangePadding->{{0.6, 0.6}, {0.4757549615999999, 0.4757549615999999}}]], "Output", CellChangeTimes->{3.5828208153065357`*^9, 3.582820862387918*^9, 3.58282091276816*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"lmf", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.582820980944428*^9, 3.582820984251018*^9}}], Cell[BoxData["0.9999832077130091`"], "Output", CellChangeTimes->{3.582820984686646*^9, 3.582821021374048*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"c", ",", "\[CapitalDelta]c"}], "}"}], "}"}], "=", RowBox[{"Quantity", "[", RowBox[{ RowBox[{ RowBox[{"lmf", "[", "\"\\"", "]"}], "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}], ",", FractionBox[ SuperscriptBox["\"\\"", "2"], "\"\\""]}], "]"}]}]], "Input", CellChangeTimes->{{3.582820975064528*^9, 3.582820979026019*^9}, { 3.582821027982746*^9, 3.582821047997671*^9}, {3.5828213040617437`*^9, 3.5828213373863907`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ TemplateBox[{"0.7921091746125328`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"], "\[NegativeMediumSpace]", "\"/\"", "\[InvisibleSpace]", "\"k\[CapitalOmega]\""}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared per kilohm"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", FractionBox[ SuperscriptBox["\"Millivolts\"", "2"], "\"Kiloohms\""]}], "]"}]& )], ",", TemplateBox[{"0.00205993853047917`"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ SuperscriptBox["\"mV\"", "2"], "\[NegativeMediumSpace]", "\"/\"", "\[InvisibleSpace]", "\"k\[CapitalOmega]\""}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: millivolts squared per kilohm"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", FractionBox[ SuperscriptBox["\"Millivolts\"", "2"], "\"Kiloohms\""]}], "]"}]& )]}], "}"}], "}"}]], "Output", CellChangeTimes->{ 3.582820979593938*^9, {3.582821022161187*^9, 3.5828210484677258`*^9}, 3.582821338263605*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{"k", ",", SubscriptBox["\[CapitalDelta]k", "stat"]}], "}"}], "=", RowBox[{"UnitConvert", "[", RowBox[{ FractionBox[ RowBox[{"{", RowBox[{"c", ",", "\[CapitalDelta]c"}], "}"}], RowBox[{"4", SubscriptBox["T", "Raum"], "B"}]], ",", FractionBox["\"\\"", "\"\\""]}], "]"}]}]], "Input", CellChangeTimes->{{3.582821190788072*^9, 3.582821224825719*^9}, { 3.5828213430275717`*^9, 3.582821350041548*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{"1.3931331948890833`*^-23"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{"\"J\"", "\[InvisibleSpace]", "\"/\"", "\[InvisibleSpace]", "\"K\""}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: joules per kelvin"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", FractionBox["\"Joules\"", "\"Kelvins\""]}], "]"}]& )], ",", TemplateBox[{"3.6229459754021177`*^-26"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{"\"J\"", "\[InvisibleSpace]", "\"/\"", "\[InvisibleSpace]", "\"K\""}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: joules per kelvin"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", FractionBox["\"Joules\"", "\"Kelvins\""]}], "]"}]& )]}], "}"}]], "Output", CellChangeTimes->{ 3.582821290110561*^9, {3.582821340421172*^9, 3.582821351175585*^9}, 3.582821542192297*^9, 3.582821739444477*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["\[CapitalDelta]k", "syst"], "=", RowBox[{"UnitConvert", "[", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"c", " ", "\[CapitalDelta]B"}], RowBox[{"4", SubscriptBox["T", "Raum"], SuperscriptBox["B", "2"]}]], ")"}], "2"], "+", SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"c", " ", SubscriptBox["\[CapitalDelta]T", "Raum"]}], RowBox[{"4", SuperscriptBox[ SubscriptBox["T", "Raum"], "2"], "B"}]], ")"}], "2"]}]], ",", FractionBox["\"\\"", "\"\\""]}], "]"}]}]], "Input", CellChangeTimes->{{3.582821629631349*^9, 3.582821648205247*^9}, { 3.582821784022657*^9, 3.582821798244378*^9}}], Cell[BoxData[ TemplateBox[{"2.7866589505033226`*^-25"}, "QuantityUnit", DisplayFunction->(TooltipBox[ StyleBox[ RowBox[{#, StyleBox[ RowBox[{ "\"J\"", "\[InvisibleSpace]", "\"/\"", "\[InvisibleSpace]", "\"K\""}], "QuantityUnitTraditionalLabel"]}], ShowStringCharacters -> False], "Unit: joules per kelvin"]& ), InterpretationFunction->(RowBox[{"Quantity", "[", RowBox[{#, ",", FractionBox["\"Joules\"", "\"Kelvins\""]}], "]"}]& )]], "Output", CellChangeTimes->{3.5828216612104597`*^9, 3.582821742247594*^9, 3.5828218023498363`*^9}] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{797, 801}, WindowMargins->{{152, Automatic}, {Automatic, 0}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, FrontEndVersion->"9.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (November 20, \ 2012)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]]}, Visible -> False, FrontEndVersion -> "9.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (November 20, 2012)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[422, 15, 107, 1, 92, "Title"], Cell[532, 18, 191, 4, 28, "Input"], Cell[CellGroupData[{ Cell[748, 26, 166, 3, 115, "Section"], Cell[CellGroupData[{ Cell[939, 33, 327, 8, 28, "Input"], Cell[1269, 43, 254, 5, 35, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[1560, 53, 238, 5, 28, "Input"], Cell[1801, 60, 507, 12, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[2345, 77, 190, 4, 28, "Input"], Cell[2538, 83, 464, 12, 28, "Output"] }, Open ]], Cell[3017, 98, 407, 6, 151, "Text"], Cell[3427, 106, 719, 18, 114, "Input"], Cell[4149, 126, 271, 7, 28, "Input"], Cell[CellGroupData[{ Cell[4445, 137, 127, 2, 28, "Input"], Cell[4575, 141, 154, 3, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[4766, 149, 270, 7, 28, "Input"], Cell[5039, 158, 24892, 492, 239, "Output"] }, Open ]], Cell[29946, 653, 347, 10, 28, "Input"], Cell[30296, 665, 1034, 26, 89, "Input"], Cell[31333, 693, 584, 14, 28, "Input"], Cell[31920, 709, 751, 22, 28, "Input"], Cell[CellGroupData[{ Cell[32696, 735, 1811, 48, 144, "Input"], Cell[34510, 785, 4739, 90, 78, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[39286, 880, 144, 2, 28, "Input"], Cell[39433, 884, 1322, 27, 101, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[40792, 916, 468, 13, 28, "Input"], Cell[41263, 931, 32773, 595, 237, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[74073, 1531, 553, 12, 28, "Input"], Cell[74629, 1545, 35064, 626, 433, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[109730, 2176, 192, 4, 28, "Input"], Cell[109925, 2182, 476, 13, 75, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[110438, 2200, 738, 16, 35, "Input"], Cell[111179, 2218, 680, 14, 32, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[111896, 2237, 158, 3, 28, "Input"], Cell[112057, 2242, 407, 10, 32, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[112513, 2258, 159, 3, 115, "Section"], Cell[CellGroupData[{ Cell[112697, 2265, 3339, 98, 403, "Input"], Cell[116039, 2365, 10788, 275, 114, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[126864, 2645, 628, 17, 46, "Input"], Cell[127495, 2664, 1009, 24, 28, "Output"] }, Open ]], Cell[128519, 2691, 115, 1, 30, "Text"], Cell[CellGroupData[{ Cell[128659, 2696, 521, 15, 40, "Input"], Cell[129183, 2713, 975, 24, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[130195, 2742, 282, 7, 28, "Input"], Cell[130480, 2751, 10588, 261, 80, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[141105, 3017, 216, 5, 28, "Input"], Cell[141324, 3024, 4813, 117, 46, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[146174, 3146, 291, 8, 28, "Input"], Cell[146468, 3156, 4862, 117, 46, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[151367, 3278, 386, 9, 32, "Input"], Cell[151756, 3289, 3004, 83, 35, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[154797, 3377, 565, 16, 41, "Input"], Cell[155365, 3395, 3056, 83, 57, "Output"] }, Open ]], Cell[158436, 3481, 2184, 53, 193, "Input"], Cell[CellGroupData[{ Cell[160645, 3538, 957, 24, 127, "Input"], Cell[161605, 3564, 1012, 26, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[162654, 3595, 307, 8, 28, "Input"], Cell[162964, 3605, 6688, 137, 421, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[169689, 3747, 137, 2, 28, "Input"], Cell[169829, 3751, 110, 1, 28, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[169976, 3757, 624, 17, 51, "Input"], Cell[170603, 3776, 1483, 38, 35, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[172123, 3819, 513, 14, 51, "Input"], Cell[172639, 3835, 1237, 32, 35, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[173913, 3872, 836, 24, 70, "Input"], Cell[174752, 3898, 607, 15, 32, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *)