1(* Content-type: application/vnd.wolfram.mathematica *) 2 3(*** Wolfram Notebook File ***) 4(* http://www.wolfram.com/nb *) 5 6(* CreatedBy='Mathematica 10.0' *) 7 8(*CacheID: 234*) 9(* Internal cache information: 10NotebookFileLineBreakTest 11NotebookFileLineBreakTest 12NotebookDataPosition[ 158, 7] 13NotebookDataLength[ 106933, 2285] 14NotebookOptionsPosition[ 104817, 2210] 15NotebookOutlinePosition[ 105176, 2226] 16CellTagsIndexPosition[ 105133, 2223] 17WindowFrame->Normal*) 18 19(* Beginning of Notebook Content *) 20Notebook[{ 21 22Cell[CellGroupData[{ 23Cell[BoxData[ 24 RowBox[{"SetDirectory", "[", 25 RowBox[{"NotebookDirectory", "[", "]"}], "]"}]], "Input", 26 CellChangeTimes->{{3.660861388735448*^9, 3.660861437338705*^9}, { 27 3.6666359431674643`*^9, 3.6666359622352343`*^9}, {3.670663113010626*^9, 28 3.670663121093412*^9}, {3.68091627027682*^9, 3.680916276044972*^9}}], 29 30Cell[BoxData["\<\"/Users/sandrews/SSA/INI/MMB paper/figures/polymer\"\>"], \ 31"Output", 32 CellChangeTimes->{{3.666683680891876*^9, 3.666683687734805*^9}, 33 3.666684214353807*^9, 3.666691017450672*^9, 3.666691157806861*^9, 34 3.666691322325119*^9, 3.666691357691773*^9, 3.6666914180081787`*^9, 35 3.666691573462508*^9, 3.670663127871483*^9, 3.67066324042507*^9, 36 3.670663677789503*^9, {3.670664099773093*^9, 3.670664110804739*^9}, 37 3.670664449211906*^9, 3.670664540963331*^9, 3.670665196142805*^9, 38 3.67066527424608*^9, 3.670665305230681*^9, 3.6706656088554907`*^9, 39 3.670665650461194*^9, {3.6706657341019*^9, 3.670665762341687*^9}, 40 3.6706658163406982`*^9, {3.670666030020042*^9, 3.670666057042573*^9}, 41 3.6706661145170717`*^9, 3.6706662395955544`*^9, 3.670668017705584*^9, 42 3.670671962183366*^9, 3.6707349376027737`*^9, 3.670759498456182*^9, 43 3.670760187884985*^9, 3.6707630799020033`*^9, 3.670763460711342*^9, 44 3.67076423893419*^9, 3.680916387104257*^9, 3.680959533332303*^9, 45 3.680959617555485*^9, 3.680961669766015*^9, 3.6809619839262323`*^9, { 46 3.6809626306309834`*^9, 3.680962645064158*^9}, 3.6809627166165333`*^9, 47 3.680962913474395*^9, 3.6809631110559607`*^9, 3.680963179656332*^9, { 48 3.6809632348795547`*^9, 3.6809632759356823`*^9}, 3.6809637313934393`*^9, { 49 3.680963782677372*^9, 3.68096380624656*^9}, {3.6809638382330523`*^9, 50 3.680963882518976*^9}, 3.680963975212041*^9, 3.680964061186585*^9, { 51 3.680964285577031*^9, 3.6809643423593273`*^9}, 3.6809650221737003`*^9, 52 3.680965404685638*^9, {3.680965525946458*^9, 3.6809655429002438`*^9}, 53 3.68096557902855*^9, 3.6809656373718443`*^9, 3.680965741267169*^9, 54 3.680965820641654*^9, 3.680966035471579*^9, {3.680966166305098*^9, 55 3.680966192820859*^9}, 3.680966247025752*^9, {3.680966280995364*^9, 56 3.6809663113953857`*^9}, 3.680966350407106*^9, 3.680966395552561*^9, { 57 3.68096648442846*^9, 3.680966513676796*^9}, 3.680966782635742*^9, 58 3.680966896827717*^9, 3.680966969909686*^9, 3.6809670132078667`*^9, 59 3.6809670756123037`*^9, 3.680967137183421*^9, 3.680967233877098*^9, 60 3.680972430480597*^9, 3.680973300389106*^9, 3.680973336623863*^9, 61 3.68097342014616*^9, 3.680973537006174*^9, 3.680973828322166*^9, 62 3.680973867444562*^9, 3.680973969894853*^9, 3.6809752922124367`*^9, 63 3.680976665167431*^9, {3.680977607823607*^9, 3.6809776344525957`*^9}, 64 3.680978132438919*^9, 3.680978833497241*^9, 3.6809802074932404`*^9, 65 3.6809824828855343`*^9, 3.681060112250519*^9, 3.681066219206634*^9, 66 3.681066980377593*^9}] 67}, Open ]], 68 69Cell[CellGroupData[{ 70 71Cell[BoxData[{ 72 RowBox[{"kfwd", "=", "0.1"}], "\[IndentingNewLine]", 73 RowBox[{"krev", "=", "0.1"}], "\[IndentingNewLine]", 74 RowBox[{"volume", "=", "1000"}], "\[IndentingNewLine]", 75 RowBox[{"a0", "=", "20000"}]}], "Input", 76 CellChangeTimes->{{3.6611075990872917`*^9, 3.6611076381188173`*^9}, { 77 3.661107727171955*^9, 3.661107736299667*^9}, {3.661255943116723*^9, 78 3.661255972686844*^9}, {3.661260140484972*^9, 3.661260140718067*^9}, { 79 3.664279428971388*^9, 3.664279434754932*^9}, {3.664284470064485*^9, 80 3.6642844867374907`*^9}, {3.664286073514839*^9, 3.664286090173348*^9}, { 81 3.6642861791679993`*^9, 3.664286180315707*^9}, {3.664286292865115*^9, 82 3.664286343768326*^9}, {3.664286717850449*^9, 3.664286717976295*^9}, { 83 3.664286760609503*^9, 3.664286760647963*^9}, {3.664287319700659*^9, 84 3.664287319810773*^9}, {3.666251022533844*^9, 3.666251026723277*^9}, { 85 3.666251075820456*^9, 3.6662510811145372`*^9}, {3.6662829472154922`*^9, 86 3.666282948274076*^9}, 3.666284212598145*^9, {3.666346624513591*^9, 87 3.666346627480918*^9}, {3.666346691511468*^9, 3.666346697382551*^9}, { 88 3.666604223264954*^9, 3.6666042663842373`*^9}, {3.6666801079532137`*^9, 89 3.66668010802766*^9}, {3.6666801444150343`*^9, 3.666680144628578*^9}, { 90 3.666682376232218*^9, 3.666682379745873*^9}, {3.666682478968664*^9, 91 3.6666824815031347`*^9}, {3.666682511926215*^9, 3.666682512320075*^9}, { 92 3.6666826335772448`*^9, 3.66668264357386*^9}, {3.6666834786638393`*^9, 93 3.666683485816806*^9}, {3.666690979060899*^9, 3.666690979426052*^9}, { 94 3.6706631445026484`*^9, 3.670663169069642*^9}, {3.6706633203583937`*^9, 95 3.670663365106505*^9}, {3.6706636809086533`*^9, 3.670663683892034*^9}, { 96 3.670663817219749*^9, 3.670663817874357*^9}, {3.6706639977435417`*^9, 97 3.6706640006455793`*^9}, {3.670664107805132*^9, 3.67066410862768*^9}, { 98 3.67066453494954*^9, 3.670664535498715*^9}, {3.670665302057231*^9, 99 3.670665302952716*^9}, {3.670665759432867*^9, 3.6706657599907846`*^9}, { 100 3.670666054001822*^9, 3.6706660547596207`*^9}, {3.670666111622225*^9, 101 3.6706661122607317`*^9}, {3.670759809463688*^9, 3.6707598113275223`*^9}, { 102 3.670760183688119*^9, 3.670760185285228*^9}, {3.67076288725944*^9, 103 3.670762914321981*^9}, {3.6707629940352163`*^9, 3.670762994099041*^9}, { 104 3.6809163008706903`*^9, 3.6809163259194*^9}, {3.680962381881455*^9, 105 3.680962386135722*^9}, {3.6809626266767807`*^9, 3.6809626424034433`*^9}, { 106 3.680962698280493*^9, 3.680962698631192*^9}, {3.680962910331833*^9, 107 3.68096291062738*^9}, {3.680963101825368*^9, 3.680963102137123*^9}, { 108 3.680963779153088*^9, 3.680963880037887*^9}, {3.680964032900517*^9, 109 3.680964039723488*^9}, {3.680964282391719*^9, 3.68096433784191*^9}, { 110 3.680965521081246*^9, 3.6809655754873953`*^9}, {3.680965627128539*^9, 111 3.680965634882313*^9}, {3.6809658655017033`*^9, 3.6809658733807*^9}, { 112 3.680966159801832*^9, 3.680966189621724*^9}, {3.6809662330606613`*^9, 113 3.680966244458746*^9}, {3.680966275320068*^9, 3.680966367152706*^9}, { 114 3.680966872355557*^9, 3.680966882337221*^9}, {3.680967126582678*^9, 115 3.680967128766189*^9}, {3.6809723607036867`*^9, 3.680972380643853*^9}, { 116 3.680973316019788*^9, 3.680973323255471*^9}, {3.680973959120163*^9, 117 3.680973965088436*^9}, {3.6809766571382*^9, 3.680976661873191*^9}}], 118 119Cell[BoxData["0.1`"], "Output", 120 CellChangeTimes->{ 121 3.6611076397678757`*^9, 3.661107739145013*^9, 3.661107927124093*^9, 122 3.661108437313519*^9, 3.661108526356292*^9, {3.661108635947103*^9, 123 3.661108664711038*^9}, {3.6611087261036158`*^9, 3.6611087402005453`*^9}, { 124 3.66110973073179*^9, 3.661109746284515*^9}, {3.661109806626606*^9, 125 3.661109847716003*^9}, 3.661153472182057*^9, 3.66115350273564*^9, 126 3.661153568462624*^9, {3.661153626855262*^9, 3.661153648825124*^9}, 127 3.661153679495694*^9, 3.661225280797923*^9, {3.661225323407699*^9, 128 3.661225338909493*^9}, 3.661256001182716*^9, {3.661260029176735*^9, 129 3.661260059078349*^9}, {3.6612601357361593`*^9, 3.661260146154155*^9}, 130 3.6612605304180326`*^9, 3.6612605977203074`*^9, 3.661260677699045*^9, 131 3.661260732490674*^9, 3.661260820788371*^9, 3.664279441853511*^9, 132 3.664284488374906*^9, 3.664286188056847*^9, {3.664286334793831*^9, 133 3.66428634491366*^9}, {3.6642867127633657`*^9, 3.6642867250649157`*^9}, 134 3.664286771090866*^9, 3.664287354158114*^9, 3.664287466528326*^9, 135 3.664287616972472*^9, 3.66428812376576*^9, 3.664288156032247*^9, 136 3.6642881972878523`*^9, 3.6642882290753107`*^9, {3.66429587206101*^9, 137 3.664295892014268*^9}, 3.666251100413536*^9, 3.666251296302082*^9, 138 3.666251513836853*^9, 3.666251616853854*^9, 3.666251757783478*^9, 139 3.666281929186681*^9, 3.666282107027111*^9, 3.6662821878809843`*^9, 140 3.66628222796002*^9, 3.666282415868441*^9, 3.666282584158743*^9, 141 3.666282755648306*^9, {3.666282936645397*^9, 3.666282952600945*^9}, 142 3.666284303340301*^9, 3.666335661840102*^9, 3.6663404163126087`*^9, 143 3.66634065583326*^9, 3.666340963358584*^9, 3.6663462193761168`*^9, 144 3.666346463575409*^9, {3.666346683739853*^9, 3.666346702358553*^9}, 145 3.666346761532962*^9, 3.666346813906226*^9, 3.666347057522087*^9, { 146 3.666347107629435*^9, 3.666347129332604*^9}, {3.6663471688870564`*^9, 147 3.6663471778216887`*^9}, 3.666347256665873*^9, 3.6663472912863407`*^9, 148 3.666347411144158*^9, {3.666348334945777*^9, 3.66634838381742*^9}, 149 3.6663484770025663`*^9, 3.666348609130681*^9, 3.6663487708937273`*^9, { 150 3.6663489053880796`*^9, 3.666348926736854*^9}, 3.666349024855389*^9, 151 3.6663491641146383`*^9, 3.666349397467157*^9, 3.666349430344095*^9, 152 3.666349579797125*^9, 3.666349706331132*^9, 3.6663498374493647`*^9, 153 3.6663503179797983`*^9, 3.6663506998309183`*^9, 3.666351687515407*^9, 154 3.66635226905194*^9, 3.666352600121393*^9, 3.666352762460074*^9, 155 3.666352889794277*^9, 3.6663530267358027`*^9, 3.666549779545188*^9, 156 3.666549894092594*^9, 3.666550014493491*^9, 3.666550371992827*^9, 157 3.666592639220716*^9, 3.666592715592758*^9, 3.6665928084040737`*^9, 158 3.6666037483300877`*^9, 3.666603861086113*^9, 3.666604076624494*^9, 159 3.666604282713019*^9, 3.666604497465859*^9, 3.666635968388526*^9, 160 3.666636011493925*^9, 3.666680155780693*^9, 3.666680288776403*^9, 161 3.666681838624284*^9, 3.6666818914444036`*^9, 3.6666823382839537`*^9, 162 3.6666823832738647`*^9, 3.666682482078524*^9, 3.666682513325852*^9, 163 3.666682647972556*^9, 3.666683487219659*^9, 3.666683688515287*^9, 164 3.666684214433814*^9, 3.666691017501419*^9, 3.666691157856453*^9, 165 3.666691322376833*^9, 3.666691357713182*^9, 3.666691418083564*^9, 166 3.666691573538446*^9, 3.670663175774899*^9, 3.6706632411170053`*^9, 167 3.6706633220649233`*^9, 3.6706633660159063`*^9, {3.6706636784298363`*^9, 168 3.670663694250366*^9}, 3.670663818608226*^9, {3.670663995775044*^9, 169 3.670664001153989*^9}, {3.6706640998124723`*^9, 3.670664110838822*^9}, 170 3.670664449249752*^9, 3.670664541015572*^9, 3.67066519621914*^9, 171 3.670665274283977*^9, 3.670665305266884*^9, 3.67066560893495*^9, 172 3.670665650539372*^9, {3.6706657341365433`*^9, 3.6706657623964863`*^9}, 173 3.670665816408428*^9, {3.670666030056417*^9, 3.670666057100411*^9}, 174 3.670666114550478*^9, 3.670666239633278*^9, 3.6706680177431583`*^9, 175 3.6706719622184553`*^9, 3.670734937677081*^9, 3.670759498540402*^9, 176 3.6707598121365547`*^9, 3.670760187919096*^9, 3.670763079955947*^9, 177 3.670763460789962*^9, 3.670764238991722*^9, 3.680916328668227*^9, 178 3.680959533480459*^9, 3.6809596176114607`*^9, 3.6809616702155046`*^9, 179 3.680961984325788*^9, 3.680962393190239*^9, {3.68096262756499*^9, 180 3.6809626451377077`*^9}, 3.680962716674488*^9, 3.680962913523892*^9, { 181 3.680963103001012*^9, 3.6809631111126328`*^9}, 3.680963179724202*^9, { 182 3.680963234921956*^9, 3.6809632760182343`*^9}, 3.680963731448732*^9, { 183 3.6809637827282257`*^9, 3.680963806293335*^9}, {3.680963838275929*^9, 184 3.680963882573387*^9}, 3.680963975298122*^9, 3.680964061236742*^9, { 185 3.680964285626953*^9, 3.680964342407043*^9}, 3.680965022239773*^9, 186 3.680965404746593*^9, {3.6809655260062933`*^9, 3.680965542962452*^9}, 187 3.680965579082109*^9, 3.680965637425748*^9, 3.680965741324464*^9, 188 3.680965820695107*^9, 3.680966035516109*^9, {3.6809661663546543`*^9, 189 3.6809661928824863`*^9}, 3.6809662470809717`*^9, {3.680966281051676*^9, 190 3.680966311440379*^9}, 3.680966350453133*^9, 3.68096639560968*^9, { 191 3.680966484486557*^9, 3.680966513739827*^9}, 3.680966782720923*^9, { 192 3.6809668827131357`*^9, 3.680966896911914*^9}, 3.680966969963352*^9, 193 3.680967013286063*^9, 3.680967075655354*^9, 3.680967137229846*^9, 194 3.68096723392824*^9, 3.680972396986959*^9, 3.680972433340411*^9, 195 3.680973300427203*^9, 3.680973336702691*^9, 3.6809734201858664`*^9, 196 3.680973537071374*^9, 3.680973828355274*^9, 3.680973867489098*^9, { 197 3.6809739656588583`*^9, 3.680973969940543*^9}, 3.680975292250958*^9, 198 3.68097666520138*^9, {3.680977607924461*^9, 3.680977634519841*^9}, 199 3.680978132482245*^9, 3.6809788336089087`*^9, 3.680980207526944*^9, 200 3.6809824829888*^9, 3.681060112319874*^9, 3.6810662192396812`*^9, 201 3.681066980414753*^9}], 202 203Cell[BoxData["0.1`"], "Output", 204 CellChangeTimes->{ 205 3.6611076397678757`*^9, 3.661107739145013*^9, 3.661107927124093*^9, 206 3.661108437313519*^9, 3.661108526356292*^9, {3.661108635947103*^9, 207 3.661108664711038*^9}, {3.6611087261036158`*^9, 3.6611087402005453`*^9}, { 208 3.66110973073179*^9, 3.661109746284515*^9}, {3.661109806626606*^9, 209 3.661109847716003*^9}, 3.661153472182057*^9, 3.66115350273564*^9, 210 3.661153568462624*^9, {3.661153626855262*^9, 3.661153648825124*^9}, 211 3.661153679495694*^9, 3.661225280797923*^9, {3.661225323407699*^9, 212 3.661225338909493*^9}, 3.661256001182716*^9, {3.661260029176735*^9, 213 3.661260059078349*^9}, {3.6612601357361593`*^9, 3.661260146154155*^9}, 214 3.6612605304180326`*^9, 3.6612605977203074`*^9, 3.661260677699045*^9, 215 3.661260732490674*^9, 3.661260820788371*^9, 3.664279441853511*^9, 216 3.664284488374906*^9, 3.664286188056847*^9, {3.664286334793831*^9, 217 3.66428634491366*^9}, {3.6642867127633657`*^9, 3.6642867250649157`*^9}, 218 3.664286771090866*^9, 3.664287354158114*^9, 3.664287466528326*^9, 219 3.664287616972472*^9, 3.66428812376576*^9, 3.664288156032247*^9, 220 3.6642881972878523`*^9, 3.6642882290753107`*^9, {3.66429587206101*^9, 221 3.664295892014268*^9}, 3.666251100413536*^9, 3.666251296302082*^9, 222 3.666251513836853*^9, 3.666251616853854*^9, 3.666251757783478*^9, 223 3.666281929186681*^9, 3.666282107027111*^9, 3.6662821878809843`*^9, 224 3.66628222796002*^9, 3.666282415868441*^9, 3.666282584158743*^9, 225 3.666282755648306*^9, {3.666282936645397*^9, 3.666282952600945*^9}, 226 3.666284303340301*^9, 3.666335661840102*^9, 3.6663404163126087`*^9, 227 3.66634065583326*^9, 3.666340963358584*^9, 3.6663462193761168`*^9, 228 3.666346463575409*^9, {3.666346683739853*^9, 3.666346702358553*^9}, 229 3.666346761532962*^9, 3.666346813906226*^9, 3.666347057522087*^9, { 230 3.666347107629435*^9, 3.666347129332604*^9}, {3.6663471688870564`*^9, 231 3.6663471778216887`*^9}, 3.666347256665873*^9, 3.6663472912863407`*^9, 232 3.666347411144158*^9, {3.666348334945777*^9, 3.66634838381742*^9}, 233 3.6663484770025663`*^9, 3.666348609130681*^9, 3.6663487708937273`*^9, { 234 3.6663489053880796`*^9, 3.666348926736854*^9}, 3.666349024855389*^9, 235 3.6663491641146383`*^9, 3.666349397467157*^9, 3.666349430344095*^9, 236 3.666349579797125*^9, 3.666349706331132*^9, 3.6663498374493647`*^9, 237 3.6663503179797983`*^9, 3.6663506998309183`*^9, 3.666351687515407*^9, 238 3.66635226905194*^9, 3.666352600121393*^9, 3.666352762460074*^9, 239 3.666352889794277*^9, 3.6663530267358027`*^9, 3.666549779545188*^9, 240 3.666549894092594*^9, 3.666550014493491*^9, 3.666550371992827*^9, 241 3.666592639220716*^9, 3.666592715592758*^9, 3.6665928084040737`*^9, 242 3.6666037483300877`*^9, 3.666603861086113*^9, 3.666604076624494*^9, 243 3.666604282713019*^9, 3.666604497465859*^9, 3.666635968388526*^9, 244 3.666636011493925*^9, 3.666680155780693*^9, 3.666680288776403*^9, 245 3.666681838624284*^9, 3.6666818914444036`*^9, 3.6666823382839537`*^9, 246 3.6666823832738647`*^9, 3.666682482078524*^9, 3.666682513325852*^9, 247 3.666682647972556*^9, 3.666683487219659*^9, 3.666683688515287*^9, 248 3.666684214433814*^9, 3.666691017501419*^9, 3.666691157856453*^9, 249 3.666691322376833*^9, 3.666691357713182*^9, 3.666691418083564*^9, 250 3.666691573538446*^9, 3.670663175774899*^9, 3.6706632411170053`*^9, 251 3.6706633220649233`*^9, 3.6706633660159063`*^9, {3.6706636784298363`*^9, 252 3.670663694250366*^9}, 3.670663818608226*^9, {3.670663995775044*^9, 253 3.670664001153989*^9}, {3.6706640998124723`*^9, 3.670664110838822*^9}, 254 3.670664449249752*^9, 3.670664541015572*^9, 3.67066519621914*^9, 255 3.670665274283977*^9, 3.670665305266884*^9, 3.67066560893495*^9, 256 3.670665650539372*^9, {3.6706657341365433`*^9, 3.6706657623964863`*^9}, 257 3.670665816408428*^9, {3.670666030056417*^9, 3.670666057100411*^9}, 258 3.670666114550478*^9, 3.670666239633278*^9, 3.6706680177431583`*^9, 259 3.6706719622184553`*^9, 3.670734937677081*^9, 3.670759498540402*^9, 260 3.6707598121365547`*^9, 3.670760187919096*^9, 3.670763079955947*^9, 261 3.670763460789962*^9, 3.670764238991722*^9, 3.680916328668227*^9, 262 3.680959533480459*^9, 3.6809596176114607`*^9, 3.6809616702155046`*^9, 263 3.680961984325788*^9, 3.680962393190239*^9, {3.68096262756499*^9, 264 3.6809626451377077`*^9}, 3.680962716674488*^9, 3.680962913523892*^9, { 265 3.680963103001012*^9, 3.6809631111126328`*^9}, 3.680963179724202*^9, { 266 3.680963234921956*^9, 3.6809632760182343`*^9}, 3.680963731448732*^9, { 267 3.6809637827282257`*^9, 3.680963806293335*^9}, {3.680963838275929*^9, 268 3.680963882573387*^9}, 3.680963975298122*^9, 3.680964061236742*^9, { 269 3.680964285626953*^9, 3.680964342407043*^9}, 3.680965022239773*^9, 270 3.680965404746593*^9, {3.6809655260062933`*^9, 3.680965542962452*^9}, 271 3.680965579082109*^9, 3.680965637425748*^9, 3.680965741324464*^9, 272 3.680965820695107*^9, 3.680966035516109*^9, {3.6809661663546543`*^9, 273 3.6809661928824863`*^9}, 3.6809662470809717`*^9, {3.680966281051676*^9, 274 3.680966311440379*^9}, 3.680966350453133*^9, 3.68096639560968*^9, { 275 3.680966484486557*^9, 3.680966513739827*^9}, 3.680966782720923*^9, { 276 3.6809668827131357`*^9, 3.680966896911914*^9}, 3.680966969963352*^9, 277 3.680967013286063*^9, 3.680967075655354*^9, 3.680967137229846*^9, 278 3.68096723392824*^9, 3.680972396986959*^9, 3.680972433340411*^9, 279 3.680973300427203*^9, 3.680973336702691*^9, 3.6809734201858664`*^9, 280 3.680973537071374*^9, 3.680973828355274*^9, 3.680973867489098*^9, { 281 3.6809739656588583`*^9, 3.680973969940543*^9}, 3.680975292250958*^9, 282 3.68097666520138*^9, {3.680977607924461*^9, 3.680977634519841*^9}, 283 3.680978132482245*^9, 3.6809788336089087`*^9, 3.680980207526944*^9, 284 3.6809824829888*^9, 3.681060112319874*^9, 3.6810662192396812`*^9, 285 3.6810669804170847`*^9}], 286 287Cell[BoxData["1000"], "Output", 288 CellChangeTimes->{ 289 3.6611076397678757`*^9, 3.661107739145013*^9, 3.661107927124093*^9, 290 3.661108437313519*^9, 3.661108526356292*^9, {3.661108635947103*^9, 291 3.661108664711038*^9}, {3.6611087261036158`*^9, 3.6611087402005453`*^9}, { 292 3.66110973073179*^9, 3.661109746284515*^9}, {3.661109806626606*^9, 293 3.661109847716003*^9}, 3.661153472182057*^9, 3.66115350273564*^9, 294 3.661153568462624*^9, {3.661153626855262*^9, 3.661153648825124*^9}, 295 3.661153679495694*^9, 3.661225280797923*^9, {3.661225323407699*^9, 296 3.661225338909493*^9}, 3.661256001182716*^9, {3.661260029176735*^9, 297 3.661260059078349*^9}, {3.6612601357361593`*^9, 3.661260146154155*^9}, 298 3.6612605304180326`*^9, 3.6612605977203074`*^9, 3.661260677699045*^9, 299 3.661260732490674*^9, 3.661260820788371*^9, 3.664279441853511*^9, 300 3.664284488374906*^9, 3.664286188056847*^9, {3.664286334793831*^9, 301 3.66428634491366*^9}, {3.6642867127633657`*^9, 3.6642867250649157`*^9}, 302 3.664286771090866*^9, 3.664287354158114*^9, 3.664287466528326*^9, 303 3.664287616972472*^9, 3.66428812376576*^9, 3.664288156032247*^9, 304 3.6642881972878523`*^9, 3.6642882290753107`*^9, {3.66429587206101*^9, 305 3.664295892014268*^9}, 3.666251100413536*^9, 3.666251296302082*^9, 306 3.666251513836853*^9, 3.666251616853854*^9, 3.666251757783478*^9, 307 3.666281929186681*^9, 3.666282107027111*^9, 3.6662821878809843`*^9, 308 3.66628222796002*^9, 3.666282415868441*^9, 3.666282584158743*^9, 309 3.666282755648306*^9, {3.666282936645397*^9, 3.666282952600945*^9}, 310 3.666284303340301*^9, 3.666335661840102*^9, 3.6663404163126087`*^9, 311 3.66634065583326*^9, 3.666340963358584*^9, 3.6663462193761168`*^9, 312 3.666346463575409*^9, {3.666346683739853*^9, 3.666346702358553*^9}, 313 3.666346761532962*^9, 3.666346813906226*^9, 3.666347057522087*^9, { 314 3.666347107629435*^9, 3.666347129332604*^9}, {3.6663471688870564`*^9, 315 3.6663471778216887`*^9}, 3.666347256665873*^9, 3.6663472912863407`*^9, 316 3.666347411144158*^9, {3.666348334945777*^9, 3.66634838381742*^9}, 317 3.6663484770025663`*^9, 3.666348609130681*^9, 3.6663487708937273`*^9, { 318 3.6663489053880796`*^9, 3.666348926736854*^9}, 3.666349024855389*^9, 319 3.6663491641146383`*^9, 3.666349397467157*^9, 3.666349430344095*^9, 320 3.666349579797125*^9, 3.666349706331132*^9, 3.6663498374493647`*^9, 321 3.6663503179797983`*^9, 3.6663506998309183`*^9, 3.666351687515407*^9, 322 3.66635226905194*^9, 3.666352600121393*^9, 3.666352762460074*^9, 323 3.666352889794277*^9, 3.6663530267358027`*^9, 3.666549779545188*^9, 324 3.666549894092594*^9, 3.666550014493491*^9, 3.666550371992827*^9, 325 3.666592639220716*^9, 3.666592715592758*^9, 3.6665928084040737`*^9, 326 3.6666037483300877`*^9, 3.666603861086113*^9, 3.666604076624494*^9, 327 3.666604282713019*^9, 3.666604497465859*^9, 3.666635968388526*^9, 328 3.666636011493925*^9, 3.666680155780693*^9, 3.666680288776403*^9, 329 3.666681838624284*^9, 3.6666818914444036`*^9, 3.6666823382839537`*^9, 330 3.6666823832738647`*^9, 3.666682482078524*^9, 3.666682513325852*^9, 331 3.666682647972556*^9, 3.666683487219659*^9, 3.666683688515287*^9, 332 3.666684214433814*^9, 3.666691017501419*^9, 3.666691157856453*^9, 333 3.666691322376833*^9, 3.666691357713182*^9, 3.666691418083564*^9, 334 3.666691573538446*^9, 3.670663175774899*^9, 3.6706632411170053`*^9, 335 3.6706633220649233`*^9, 3.6706633660159063`*^9, {3.6706636784298363`*^9, 336 3.670663694250366*^9}, 3.670663818608226*^9, {3.670663995775044*^9, 337 3.670664001153989*^9}, {3.6706640998124723`*^9, 3.670664110838822*^9}, 338 3.670664449249752*^9, 3.670664541015572*^9, 3.67066519621914*^9, 339 3.670665274283977*^9, 3.670665305266884*^9, 3.67066560893495*^9, 340 3.670665650539372*^9, {3.6706657341365433`*^9, 3.6706657623964863`*^9}, 341 3.670665816408428*^9, {3.670666030056417*^9, 3.670666057100411*^9}, 342 3.670666114550478*^9, 3.670666239633278*^9, 3.6706680177431583`*^9, 343 3.6706719622184553`*^9, 3.670734937677081*^9, 3.670759498540402*^9, 344 3.6707598121365547`*^9, 3.670760187919096*^9, 3.670763079955947*^9, 345 3.670763460789962*^9, 3.670764238991722*^9, 3.680916328668227*^9, 346 3.680959533480459*^9, 3.6809596176114607`*^9, 3.6809616702155046`*^9, 347 3.680961984325788*^9, 3.680962393190239*^9, {3.68096262756499*^9, 348 3.6809626451377077`*^9}, 3.680962716674488*^9, 3.680962913523892*^9, { 349 3.680963103001012*^9, 3.6809631111126328`*^9}, 3.680963179724202*^9, { 350 3.680963234921956*^9, 3.6809632760182343`*^9}, 3.680963731448732*^9, { 351 3.6809637827282257`*^9, 3.680963806293335*^9}, {3.680963838275929*^9, 352 3.680963882573387*^9}, 3.680963975298122*^9, 3.680964061236742*^9, { 353 3.680964285626953*^9, 3.680964342407043*^9}, 3.680965022239773*^9, 354 3.680965404746593*^9, {3.6809655260062933`*^9, 3.680965542962452*^9}, 355 3.680965579082109*^9, 3.680965637425748*^9, 3.680965741324464*^9, 356 3.680965820695107*^9, 3.680966035516109*^9, {3.6809661663546543`*^9, 357 3.6809661928824863`*^9}, 3.6809662470809717`*^9, {3.680966281051676*^9, 358 3.680966311440379*^9}, 3.680966350453133*^9, 3.68096639560968*^9, { 359 3.680966484486557*^9, 3.680966513739827*^9}, 3.680966782720923*^9, { 360 3.6809668827131357`*^9, 3.680966896911914*^9}, 3.680966969963352*^9, 361 3.680967013286063*^9, 3.680967075655354*^9, 3.680967137229846*^9, 362 3.68096723392824*^9, 3.680972396986959*^9, 3.680972433340411*^9, 363 3.680973300427203*^9, 3.680973336702691*^9, 3.6809734201858664`*^9, 364 3.680973537071374*^9, 3.680973828355274*^9, 3.680973867489098*^9, { 365 3.6809739656588583`*^9, 3.680973969940543*^9}, 3.680975292250958*^9, 366 3.68097666520138*^9, {3.680977607924461*^9, 3.680977634519841*^9}, 367 3.680978132482245*^9, 3.6809788336089087`*^9, 3.680980207526944*^9, 368 3.6809824829888*^9, 3.681060112319874*^9, 3.6810662192396812`*^9, 369 3.68106698041873*^9}], 370 371Cell[BoxData["20000"], "Output", 372 CellChangeTimes->{ 373 3.6611076397678757`*^9, 3.661107739145013*^9, 3.661107927124093*^9, 374 3.661108437313519*^9, 3.661108526356292*^9, {3.661108635947103*^9, 375 3.661108664711038*^9}, {3.6611087261036158`*^9, 3.6611087402005453`*^9}, { 376 3.66110973073179*^9, 3.661109746284515*^9}, {3.661109806626606*^9, 377 3.661109847716003*^9}, 3.661153472182057*^9, 3.66115350273564*^9, 378 3.661153568462624*^9, {3.661153626855262*^9, 3.661153648825124*^9}, 379 3.661153679495694*^9, 3.661225280797923*^9, {3.661225323407699*^9, 380 3.661225338909493*^9}, 3.661256001182716*^9, {3.661260029176735*^9, 381 3.661260059078349*^9}, {3.6612601357361593`*^9, 3.661260146154155*^9}, 382 3.6612605304180326`*^9, 3.6612605977203074`*^9, 3.661260677699045*^9, 383 3.661260732490674*^9, 3.661260820788371*^9, 3.664279441853511*^9, 384 3.664284488374906*^9, 3.664286188056847*^9, {3.664286334793831*^9, 385 3.66428634491366*^9}, {3.6642867127633657`*^9, 3.6642867250649157`*^9}, 386 3.664286771090866*^9, 3.664287354158114*^9, 3.664287466528326*^9, 387 3.664287616972472*^9, 3.66428812376576*^9, 3.664288156032247*^9, 388 3.6642881972878523`*^9, 3.6642882290753107`*^9, {3.66429587206101*^9, 389 3.664295892014268*^9}, 3.666251100413536*^9, 3.666251296302082*^9, 390 3.666251513836853*^9, 3.666251616853854*^9, 3.666251757783478*^9, 391 3.666281929186681*^9, 3.666282107027111*^9, 3.6662821878809843`*^9, 392 3.66628222796002*^9, 3.666282415868441*^9, 3.666282584158743*^9, 393 3.666282755648306*^9, {3.666282936645397*^9, 3.666282952600945*^9}, 394 3.666284303340301*^9, 3.666335661840102*^9, 3.6663404163126087`*^9, 395 3.66634065583326*^9, 3.666340963358584*^9, 3.6663462193761168`*^9, 396 3.666346463575409*^9, {3.666346683739853*^9, 3.666346702358553*^9}, 397 3.666346761532962*^9, 3.666346813906226*^9, 3.666347057522087*^9, { 398 3.666347107629435*^9, 3.666347129332604*^9}, {3.6663471688870564`*^9, 399 3.6663471778216887`*^9}, 3.666347256665873*^9, 3.6663472912863407`*^9, 400 3.666347411144158*^9, {3.666348334945777*^9, 3.66634838381742*^9}, 401 3.6663484770025663`*^9, 3.666348609130681*^9, 3.6663487708937273`*^9, { 402 3.6663489053880796`*^9, 3.666348926736854*^9}, 3.666349024855389*^9, 403 3.6663491641146383`*^9, 3.666349397467157*^9, 3.666349430344095*^9, 404 3.666349579797125*^9, 3.666349706331132*^9, 3.6663498374493647`*^9, 405 3.6663503179797983`*^9, 3.6663506998309183`*^9, 3.666351687515407*^9, 406 3.66635226905194*^9, 3.666352600121393*^9, 3.666352762460074*^9, 407 3.666352889794277*^9, 3.6663530267358027`*^9, 3.666549779545188*^9, 408 3.666549894092594*^9, 3.666550014493491*^9, 3.666550371992827*^9, 409 3.666592639220716*^9, 3.666592715592758*^9, 3.6665928084040737`*^9, 410 3.6666037483300877`*^9, 3.666603861086113*^9, 3.666604076624494*^9, 411 3.666604282713019*^9, 3.666604497465859*^9, 3.666635968388526*^9, 412 3.666636011493925*^9, 3.666680155780693*^9, 3.666680288776403*^9, 413 3.666681838624284*^9, 3.6666818914444036`*^9, 3.6666823382839537`*^9, 414 3.6666823832738647`*^9, 3.666682482078524*^9, 3.666682513325852*^9, 415 3.666682647972556*^9, 3.666683487219659*^9, 3.666683688515287*^9, 416 3.666684214433814*^9, 3.666691017501419*^9, 3.666691157856453*^9, 417 3.666691322376833*^9, 3.666691357713182*^9, 3.666691418083564*^9, 418 3.666691573538446*^9, 3.670663175774899*^9, 3.6706632411170053`*^9, 419 3.6706633220649233`*^9, 3.6706633660159063`*^9, {3.6706636784298363`*^9, 420 3.670663694250366*^9}, 3.670663818608226*^9, {3.670663995775044*^9, 421 3.670664001153989*^9}, {3.6706640998124723`*^9, 3.670664110838822*^9}, 422 3.670664449249752*^9, 3.670664541015572*^9, 3.67066519621914*^9, 423 3.670665274283977*^9, 3.670665305266884*^9, 3.67066560893495*^9, 424 3.670665650539372*^9, {3.6706657341365433`*^9, 3.6706657623964863`*^9}, 425 3.670665816408428*^9, {3.670666030056417*^9, 3.670666057100411*^9}, 426 3.670666114550478*^9, 3.670666239633278*^9, 3.6706680177431583`*^9, 427 3.6706719622184553`*^9, 3.670734937677081*^9, 3.670759498540402*^9, 428 3.6707598121365547`*^9, 3.670760187919096*^9, 3.670763079955947*^9, 429 3.670763460789962*^9, 3.670764238991722*^9, 3.680916328668227*^9, 430 3.680959533480459*^9, 3.6809596176114607`*^9, 3.6809616702155046`*^9, 431 3.680961984325788*^9, 3.680962393190239*^9, {3.68096262756499*^9, 432 3.6809626451377077`*^9}, 3.680962716674488*^9, 3.680962913523892*^9, { 433 3.680963103001012*^9, 3.6809631111126328`*^9}, 3.680963179724202*^9, { 434 3.680963234921956*^9, 3.6809632760182343`*^9}, 3.680963731448732*^9, { 435 3.6809637827282257`*^9, 3.680963806293335*^9}, {3.680963838275929*^9, 436 3.680963882573387*^9}, 3.680963975298122*^9, 3.680964061236742*^9, { 437 3.680964285626953*^9, 3.680964342407043*^9}, 3.680965022239773*^9, 438 3.680965404746593*^9, {3.6809655260062933`*^9, 3.680965542962452*^9}, 439 3.680965579082109*^9, 3.680965637425748*^9, 3.680965741324464*^9, 440 3.680965820695107*^9, 3.680966035516109*^9, {3.6809661663546543`*^9, 441 3.6809661928824863`*^9}, 3.6809662470809717`*^9, {3.680966281051676*^9, 442 3.680966311440379*^9}, 3.680966350453133*^9, 3.68096639560968*^9, { 443 3.680966484486557*^9, 3.680966513739827*^9}, 3.680966782720923*^9, { 444 3.6809668827131357`*^9, 3.680966896911914*^9}, 3.680966969963352*^9, 445 3.680967013286063*^9, 3.680967075655354*^9, 3.680967137229846*^9, 446 3.68096723392824*^9, 3.680972396986959*^9, 3.680972433340411*^9, 447 3.680973300427203*^9, 3.680973336702691*^9, 3.6809734201858664`*^9, 448 3.680973537071374*^9, 3.680973828355274*^9, 3.680973867489098*^9, { 449 3.6809739656588583`*^9, 3.680973969940543*^9}, 3.680975292250958*^9, 450 3.68097666520138*^9, {3.680977607924461*^9, 3.680977634519841*^9}, 451 3.680978132482245*^9, 3.6809788336089087`*^9, 3.680980207526944*^9, 452 3.6809824829888*^9, 3.681060112319874*^9, 3.6810662192396812`*^9, 453 3.681066980420363*^9}] 454}, Open ]], 455 456Cell[BoxData[ 457 RowBox[{"(*", " ", 458 RowBox[{ 459 "Everything", " ", "below", " ", "here", " ", "should", " ", "take", " ", 460 "care", " ", "of", " ", "itself"}], " ", "*)"}]], "Input", 461 CellChangeTimes->{{3.661107643372525*^9, 3.661107653918783*^9}}], 462 463Cell[BoxData[ 464 RowBox[{"(*", " ", 465 RowBox[{"Load", " ", "and", " ", "look", " ", "at", " ", "data"}], " ", 466 "*)"}]], "Input", 467 CellChangeTimes->{{3.661107683797237*^9, 3.661107689696024*^9}}], 468 469Cell[BoxData[ 470 RowBox[{ 471 RowBox[{"simdataend1", "=", 472 RowBox[{"Import", "[", 473 RowBox[{"\"\<polymer_end1out.txt\>\"", ",", "\"\<CSV\>\""}], "]"}]}], 474 ";"}]], "Input", 475 CellChangeTimes->{{3.660861462009038*^9, 3.6608615084983997`*^9}, { 476 3.660863565188951*^9, 3.6608635660204144`*^9}, {3.660863601090904*^9, 477 3.66086360284127*^9}, {3.660863643565474*^9, 3.660863646377057*^9}, { 478 3.6608638330074987`*^9, 3.660863833863155*^9}, 3.6608639590084248`*^9, { 479 3.661255930926162*^9, 3.661255930994204*^9}, {3.664279471177001*^9, 480 3.664279471836916*^9}, {3.664279531549027*^9, 3.66427953324368*^9}, { 481 3.666348319216601*^9, 3.666348332174251*^9}, {3.6663489151450644`*^9, 482 3.666348923627892*^9}, {3.666352209049118*^9, 3.666352212632585*^9}, { 483 3.6666801703110113`*^9, 3.666680170876061*^9}, {3.666680224590324*^9, 484 3.6666802253611603`*^9}, {3.6666803035154123`*^9, 485 3.6666803041269207`*^9}, {3.670663202835005*^9, 3.670663203967167*^9}, { 486 3.680916355398655*^9, 3.68091635581986*^9}, {3.680972403677759*^9, 487 3.6809724088255796`*^9}, {3.680976641073204*^9, 3.680976641410892*^9}, { 488 3.680977604907093*^9, 3.680977604982481*^9}, {3.68105998829114*^9, 489 3.6810599887071*^9}}], 490 491Cell[BoxData[ 492 RowBox[{"simdataend1", ";"}]], "Input", 493 CellChangeTimes->{{3.664279517507081*^9, 3.664279518147739*^9}, 494 3.680916655561552*^9, {3.680959675652953*^9, 3.680959685911787*^9}, { 495 3.680972441205271*^9, 3.680972446202992*^9}, {3.6810599926506557`*^9, 496 3.681059993066687*^9}, {3.6810601186286907`*^9, 3.6810601211193943`*^9}}], 497 498Cell[CellGroupData[{ 499 500Cell[BoxData[ 501 RowBox[{"simdataend1a", "=", 502 RowBox[{"Drop", "[", 503 RowBox[{ 504 RowBox[{"simdataend1", "[", 505 RowBox[{"[", 506 RowBox[{"-", "1"}], "]"}], "]"}], ",", "1"}], "]"}]}]], "Input", 507 CellChangeTimes->{{3.680972484991869*^9, 3.6809724987941923`*^9}, { 508 3.680972530463818*^9, 3.680972534110043*^9}, {3.6809753280993853`*^9, 509 3.680975340637204*^9}, {3.68097538592559*^9, 3.680975411531296*^9}, { 510 3.680975448871151*^9, 3.680975449721448*^9}, {3.680977629822443*^9, 511 3.6809776300882387`*^9}, {3.68105999595455*^9, 3.6810600515529833`*^9}}], 512 513Cell[BoxData[ 514 RowBox[{"{", 515 RowBox[{ 516 "829", ",", "658", ",", "511", ",", "424", ",", "333", ",", "296", ",", 517 "199", ",", "161", ",", "137", ",", "104", ",", "84", ",", "76", ",", "46", 518 ",", "40", ",", "34", ",", "40", ",", "24", ",", "14", ",", "13", ",", 519 "12", ",", "6", ",", "7", ",", "7", ",", "2", ",", "2", ",", "1", ",", "3", 520 ",", "3", ",", "3", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", 521 "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 522 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 523 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", 524 "0"}], "}"}]], "Output", 525 CellChangeTimes->{ 526 3.680972499404792*^9, 3.680972535216778*^9, 3.680973300477462*^9, 527 3.680973336786745*^9, 3.680973420261945*^9, 3.6809735371606493`*^9, 528 3.680973828461438*^9, 3.6809738675614967`*^9, 3.6809739700145617`*^9, 529 3.6809752923348503`*^9, {3.680975329393046*^9, 3.680975343002323*^9}, { 530 3.680975386477862*^9, 3.6809754120407476`*^9}, 3.6809754503766823`*^9, { 531 3.680976644815929*^9, 3.680976665258239*^9}, {3.6809776081734257`*^9, 532 3.680977634709293*^9}, 3.6809781325597687`*^9, 3.6809788337250547`*^9, 533 3.68098020759949*^9, 3.680982483076318*^9, 3.681060112452353*^9, 534 3.681066219289041*^9, 3.681066980470682*^9}] 535}, Open ]], 536 537Cell[BoxData[ 538 RowBox[{ 539 RowBox[{"simdataend2", "=", 540 RowBox[{"Import", "[", 541 RowBox[{"\"\<polymer_end2out.txt\>\"", ",", "\"\<CSV\>\""}], "]"}]}], 542 ";"}]], "Input", 543 CellChangeTimes->{{3.681059951652913*^9, 3.681059967644587*^9}}], 544 545Cell[BoxData[ 546 RowBox[{"simdataend2", ";"}]], "Input", 547 CellChangeTimes->{{3.681059973197427*^9, 3.681060006969589*^9}}], 548 549Cell[CellGroupData[{ 550 551Cell[BoxData[ 552 RowBox[{"simdataend2a", "=", 553 RowBox[{"Drop", "[", 554 RowBox[{ 555 RowBox[{"simdataend2", "[", 556 RowBox[{"[", 557 RowBox[{"-", "1"}], "]"}], "]"}], ",", "1"}], "]"}]}]], "Input", 558 CellChangeTimes->{{3.681060009274691*^9, 3.6810600247928457`*^9}}], 559 560Cell[BoxData[ 561 RowBox[{"{", 562 RowBox[{ 563 "91", ",", "151", ",", "145", ",", "135", ",", "121", ",", "105", ",", 564 "106", ",", "86", ",", "97", ",", "74", ",", "51", ",", "49", ",", "62", 565 ",", "48", ",", "44", ",", "32", ",", "51", ",", "35", ",", "21", ",", 566 "33", ",", "23", ",", "28", ",", "21", ",", "18", ",", "11", ",", "14", 567 ",", "12", ",", "21", ",", "11", ",", "12", ",", "10", ",", "6", ",", "10", 568 ",", "10", ",", "5", ",", "4", ",", "8", ",", "4", ",", "6", ",", "10", 569 ",", "2", ",", "2", ",", "1", ",", "1", ",", "1", ",", "0", ",", "3", ",", 570 "1", ",", "1", ",", "3", ",", "1", ",", "1", ",", "2", ",", "0", ",", "1", 571 ",", "1", ",", "1", ",", "1", ",", "0", ",", "0", ",", "1", ",", "0", ",", 572 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 573 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], 574 "}"}]], "Output", 575 CellChangeTimes->{3.681060112489802*^9, 3.681066219322069*^9, 576 3.681066980529464*^9}] 577}, Open ]], 578 579Cell[BoxData[ 580 RowBox[{ 581 RowBox[{"simdatamid", "=", 582 RowBox[{"Import", "[", 583 RowBox[{"\"\<polymer_midout.txt\>\"", ",", "\"\<CSV\>\""}], "]"}]}], 584 ";"}]], "Input", 585 CellChangeTimes->{{3.6809782340147877`*^9, 3.680978250940962*^9}}], 586 587Cell[CellGroupData[{ 588 589Cell[BoxData[ 590 RowBox[{"simdatamida", "=", 591 RowBox[{"Drop", "[", 592 RowBox[{ 593 RowBox[{"simdatamid", "[", 594 RowBox[{"[", 595 RowBox[{"-", "1"}], "]"}], "]"}], ",", "1"}], "]"}]}]], "Input", 596 CellChangeTimes->{{3.680978254745907*^9, 3.680978266875267*^9}, { 597 3.681060037547511*^9, 3.681060062826778*^9}}], 598 599Cell[BoxData[ 600 RowBox[{"{", 601 RowBox[{ 602 "676", ",", "586", ",", "464", ",", "416", ",", "312", ",", "298", ",", 603 "225", ",", "197", ",", "133", ",", "126", ",", "70", ",", "79", ",", "60", 604 ",", "39", ",", "35", ",", "30", ",", "13", ",", "22", ",", "16", ",", 605 "10", ",", "5", ",", "6", ",", "1", ",", "8", ",", "3", ",", "5", ",", "2", 606 ",", "6", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "2", ",", 607 "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 608 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 609 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 610 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 611 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 612 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 613 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 614 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 615 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 616 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 617 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 618 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 619 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 620 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 621 "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", 622 ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", 623 "0", ",", "0"}], "}"}]], "Output", 624 CellChangeTimes->{3.680978268301193*^9, 3.680978833761402*^9, 625 3.6809802076413403`*^9, 3.6809824831513042`*^9, 3.681060112522978*^9, 626 3.681066219355545*^9, 3.6810669805654984`*^9}] 627}, Open ]], 628 629Cell[CellGroupData[{ 630 631Cell[BoxData[ 632 RowBox[{"ListLogPlot", "[", 633 RowBox[{"{", 634 RowBox[{"simdataend1a", ",", "simdataend2a", ",", "simdatamida"}], "}"}], 635 "]"}]], "Input", 636 CellChangeTimes->{{3.680972548833757*^9, 3.680972568900393*^9}, { 637 3.6809782740762444`*^9, 3.680978280698489*^9}, {3.681060068993825*^9, 638 3.681060082377369*^9}, 3.681060152321993*^9}], 639 640Cell[BoxData[ 641 GraphicsBox[{{}, {{}, 642 {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.01388888888888889], 643 AbsoluteThickness[1.6], PointBox[CompressedData[" 6441:eJxTTMoPSmViYGBQAGIQDQEf7Cc+L0hpfCjlABVw0A8zUf70RRLK53CoObbu 645HtcnCShfwIH/y7rgt0YwvohDytPiLZ3W4lC+hMMMy93T3h4Sg/JlHNrOTpeM 6460BGF8hUc+gpKV0UHi0D5Sg5zG65W8a8ThvJVHB7NNjO9PVkIyldzuJL6jVNj 647pyCUr+Eg9OLAodVBML6WQ47ThL18C/mgfB0H3iIj68tNvFC+nsM33p2Nf0x5 648oHwDNHlDh586k2qW53BC+UYOy3dfFzslwwrlGzsE9hhqs7SyQPkmDrXzLu8R 649e8gM5Zs6MClo/eJe/ccewjdzCI8yWlek9B/KN0fjWzi8t/z1z0nvGZRvica3 650gsUDFFg7cDOvrXo1+SNU3gaNb4vGd0DT74TKb/CG8wFgAHMw 651 "]]}, 652 {RGBColor[0.880722, 0.611041, 0.142051], PointSize[0.01388888888888889], 653 AbsoluteThickness[1.6], PointBox[CompressedData[" 6541:eJxTTMoPSmViYGCwBGIQDQEf7PfFqB6U4xZygAo4BDNYnNsoKALlczjEJD16 655rPNCGMoXcJiq+jeSYT6ML+LgY16//bEejC/hsNTK+MTyuTDzZBwmp36YHLMc 656xldwcNv7MsvhoiCUr+Tww/spR6MPTF7FQXb1n2sx5jB5NYf/DIH/E0r4oXwN 657h/Aoo3VFSjC+lsPrO+ot+k0CUL6OQ+nuABuLH3xQvp6Dc8gfM1Y3GN/AIfvE 658jn2Xd3JD+YZo5hs5HP3MHxxVyAPlGztsXJc/RS+aA8o3cbi44+qXGz9g+k0d 659Pmy++LdWlBPKN3NQ9pp2LWoFF5RvjqbfwqFtYrZVtTw7lG8JDT9mKN/KYfnu 66062KnZFihfGuH2nmX94g9hMnboJlni6bfDk29vYNY6NbdG7OZoHwHByYFrV/c 661q//Yg7kNDmjyjqj8BkcH49633x0P/ISoZ3ByeG/565+T3jeofieH4tXW9psW 662MUD1O6PJO6Pax+CCZr4LVP0zqLwrKr/BFWouDLih8hvQ+e4O3Mxrq15N/gg1 663zwNNHo3P4ImqvsETTd4LTb8Xmvu80dT7oKlH4zP4osn7wfkAHj/EUw== 664 "]]}, 665 {RGBColor[0.560181, 0.691569, 0.194885], PointSize[0.01388888888888889], 666 AbsoluteThickness[1.6], PointBox[CompressedData[" 6671:eJxTTMoPSmViYGCQA2IQDQEf7M9KfXg1RUDKASrg4LT7T5d7nSSUz+HALpPy 6681LZfAsoXcIjT+volWx7GF3FYeufh5as/xKB8CYdsvd/3L52E8WUc5D18LcVW 669iUL5Cg4HlVs0GJRgfCUHnQ9967b3C0P5Kg6R8Yc8oiJgfDUHRcf0ztJ/AlC+ 670hkPxxvWdAVWCUL6WQ7dR6p3ZCTB5HYdrvB0ZP/14oXw9h6Of+YOjCnmgfAOH 6712de4fy4z5YbyDR0Cewy1WVpZoHwjhxNHbctLdnFA+cYO7y1//XPSY4PyTRzE 672Qrfu3pjNBOWbOhj3vv3ueOCnPYRv5sCkoPWLe/UfKN8cFq5QYOFQvNraftMi 673Bqi4pQM389qqV5M/QtVboZlnDbX/GZRvg2a+I5q8E9w+AP51ckg= 674 "]]}, {}}, {}}, 675 AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], 676 Axes->{True, True}, 677 AxesLabel->{None, None}, 678 AxesOrigin->{0, -0.48775791448562633`}, 679 CoordinatesToolOptions:>{"DisplayFunction" -> ({ 680 Part[#, 1], 681 Exp[ 682 Part[#, 2]]}& ), "CopiedValueFunction" -> ({ 683 Part[#, 1], 684 Exp[ 685 Part[#, 2]]}& )}, 686 DisplayFunction->Identity, 687 Frame->{{False, False}, {False, False}}, 688 FrameLabel->{{None, None}, {None, None}}, 689 FrameTicks->{{ 690 Charting`ScaledTicks[{Log, Exp}], 691 Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, 692 GridLines->{None, None}, 693 GridLinesStyle->Directive[ 694 GrayLevel[0.5, 0.4]], 695 Method->{}, 696 PlotRange->{{0., 61.}, {-0.37334556417418313`, 6.720220155135295}}, 697 PlotRangeClipping->True, 698 PlotRangePadding->{{ 699 Scaled[0.02], 700 Scaled[0.02]}, { 701 Scaled[0.02], 702 Scaled[0.05]}}, 703 Ticks->FrontEndValueCache[{Automatic, 704 Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 705 FormBox["1", TraditionalForm], {0.01, 0.}, { 706 AbsoluteThickness[0.1]}}, {1.6094379124341003`, 707 FormBox["5", TraditionalForm], {0.01, 0.}, { 708 AbsoluteThickness[0.1]}}, {2.302585092994046, 709 FormBox["10", TraditionalForm], {0.01, 0.}, { 710 AbsoluteThickness[0.1]}}, {3.912023005428146, 711 FormBox["50", TraditionalForm], {0.01, 0.}, { 712 AbsoluteThickness[0.1]}}, {4.605170185988092, 713 FormBox["100", TraditionalForm], {0.01, 0.}, { 714 AbsoluteThickness[0.1]}}, {6.214608098422191, 715 FormBox["500", TraditionalForm], {0.01, 0.}, { 716 AbsoluteThickness[0.1]}}, {6.907755278982137, 717 FormBox["1000", TraditionalForm], {0.01, 0.}, { 718 AbsoluteThickness[0.1]}}, {-0.6931471805599453, 719 FormBox[ 720 InterpretationBox[ 721 StyleBox[ 722 723 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 724 Baseline], "CacheGraphics" -> False], 725 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 726 AbsoluteThickness[0.1]}}, {-0.5108256237659907, 727 FormBox[ 728 InterpretationBox[ 729 StyleBox[ 730 731 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 732 Baseline], "CacheGraphics" -> False], 733 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 734 AbsoluteThickness[0.1]}}, {-0.35667494393873245`, 735 FormBox[ 736 InterpretationBox[ 737 StyleBox[ 738 739 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 740 Baseline], "CacheGraphics" -> False], 741 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 742 AbsoluteThickness[0.1]}}, {-0.2231435513142097, 743 FormBox[ 744 InterpretationBox[ 745 StyleBox[ 746 747 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 748 Baseline], "CacheGraphics" -> False], 749 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 750 AbsoluteThickness[0.1]}}, {-0.10536051565782628`, 751 FormBox[ 752 InterpretationBox[ 753 StyleBox[ 754 755 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 756 Baseline], "CacheGraphics" -> False], 757 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 758 AbsoluteThickness[0.1]}}, {0.6931471805599453, 759 FormBox[ 760 InterpretationBox[ 761 StyleBox[ 762 763 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 764 Baseline], "CacheGraphics" -> False], 765 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 766 AbsoluteThickness[0.1]}}, {1.0986122886681098`, 767 FormBox[ 768 InterpretationBox[ 769 StyleBox[ 770 771 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 772 Baseline], "CacheGraphics" -> False], 773 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 774 AbsoluteThickness[0.1]}}, {1.3862943611198906`, 775 FormBox[ 776 InterpretationBox[ 777 StyleBox[ 778 779 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 780 Baseline], "CacheGraphics" -> False], 781 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 782 AbsoluteThickness[0.1]}}, {1.791759469228055, 783 FormBox[ 784 InterpretationBox[ 785 StyleBox[ 786 787 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 788 Baseline], "CacheGraphics" -> False], 789 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 790 AbsoluteThickness[0.1]}}, {1.9459101490553132`, 791 FormBox[ 792 InterpretationBox[ 793 StyleBox[ 794 795 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 796 Baseline], "CacheGraphics" -> False], 797 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 798 AbsoluteThickness[0.1]}}, {2.0794415416798357`, 799 FormBox[ 800 InterpretationBox[ 801 StyleBox[ 802 803 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 804 Baseline], "CacheGraphics" -> False], 805 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 806 AbsoluteThickness[0.1]}}, {2.1972245773362196`, 807 FormBox[ 808 InterpretationBox[ 809 StyleBox[ 810 811 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 812 Baseline], "CacheGraphics" -> False], 813 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 814 AbsoluteThickness[0.1]}}, {2.995732273553991, 815 FormBox[ 816 InterpretationBox[ 817 StyleBox[ 818 819 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 820 Baseline], "CacheGraphics" -> False], 821 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 822 AbsoluteThickness[0.1]}}, {3.4011973816621555`, 823 FormBox[ 824 InterpretationBox[ 825 StyleBox[ 826 827 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 828 Baseline], "CacheGraphics" -> False], 829 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 830 AbsoluteThickness[0.1]}}, {3.6888794541139363`, 831 FormBox[ 832 InterpretationBox[ 833 StyleBox[ 834 835 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 836 Baseline], "CacheGraphics" -> False], 837 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 838 AbsoluteThickness[0.1]}}, {4.0943445622221, 839 FormBox[ 840 InterpretationBox[ 841 StyleBox[ 842 843 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 844 Baseline], "CacheGraphics" -> False], 845 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 846 AbsoluteThickness[0.1]}}, {4.248495242049359, 847 FormBox[ 848 InterpretationBox[ 849 StyleBox[ 850 851 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 852 Baseline], "CacheGraphics" -> False], 853 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 854 AbsoluteThickness[0.1]}}, {4.382026634673881, 855 FormBox[ 856 InterpretationBox[ 857 StyleBox[ 858 859 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 860 Baseline], "CacheGraphics" -> False], 861 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 862 AbsoluteThickness[0.1]}}, {4.499809670330265, 863 FormBox[ 864 InterpretationBox[ 865 StyleBox[ 866 867 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 868 Baseline], "CacheGraphics" -> False], 869 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 870 AbsoluteThickness[0.1]}}, {5.298317366548036, 871 FormBox[ 872 InterpretationBox[ 873 StyleBox[ 874 875 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 876 Baseline], "CacheGraphics" -> False], 877 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 878 AbsoluteThickness[0.1]}}, {5.703782474656201, 879 FormBox[ 880 InterpretationBox[ 881 StyleBox[ 882 883 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 884 Baseline], "CacheGraphics" -> False], 885 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 886 AbsoluteThickness[0.1]}}, {5.991464547107982, 887 FormBox[ 888 InterpretationBox[ 889 StyleBox[ 890 891 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 892 Baseline], "CacheGraphics" -> False], 893 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 894 AbsoluteThickness[0.1]}}, {6.396929655216146, 895 FormBox[ 896 InterpretationBox[ 897 StyleBox[ 898 899 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 900 Baseline], "CacheGraphics" -> False], 901 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 902 AbsoluteThickness[0.1]}}, {6.551080335043404, 903 FormBox[ 904 InterpretationBox[ 905 StyleBox[ 906 907 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 908 Baseline], "CacheGraphics" -> False], 909 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 910 AbsoluteThickness[0.1]}}, {6.684611727667927, 911 FormBox[ 912 InterpretationBox[ 913 StyleBox[ 914 915 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 916 Baseline], "CacheGraphics" -> False], 917 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 918 AbsoluteThickness[0.1]}}, {6.802394763324311, 919 FormBox[ 920 InterpretationBox[ 921 StyleBox[ 922 923 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 924 Baseline], "CacheGraphics" -> False], 925 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 926 AbsoluteThickness[0.1]}}, {7.600902459542082, 927 FormBox[ 928 InterpretationBox[ 929 StyleBox[ 930 931 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 932 Baseline], "CacheGraphics" -> False], 933 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 934 AbsoluteThickness[0.1]}}, {8.006367567650246, 935 FormBox[ 936 InterpretationBox[ 937 StyleBox[ 938 939 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 940 Baseline], "CacheGraphics" -> False], 941 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 942 AbsoluteThickness[0.1]}}, {8.294049640102028, 943 FormBox[ 944 InterpretationBox[ 945 StyleBox[ 946 947 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 948 Baseline], "CacheGraphics" -> False], 949 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 950 AbsoluteThickness[0.1]}}, {8.517193191416238, 951 FormBox[ 952 InterpretationBox[ 953 StyleBox[ 954 955 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 956 Baseline], "CacheGraphics" -> False], 957 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 958 AbsoluteThickness[0.1]}}}}]]], "Output", 959 CellChangeTimes->{{3.680972553479638*^9, 3.680972575194817*^9}, 960 3.68097330053935*^9, 3.6809733368397284`*^9, 3.6809734203178177`*^9, 961 3.680973537211088*^9, 3.680973828521574*^9, 3.680973867617775*^9, 962 3.680973970074698*^9, 3.680975292397156*^9, 3.6809753312208967`*^9, 963 3.680976665316708*^9, {3.6809776086335917`*^9, 3.680977634760071*^9}, 964 3.6809781326397123`*^9, 3.680978281498344*^9, 3.680978833842078*^9, 965 3.6809802076784*^9, 3.680982483188195*^9, 3.6810601126426363`*^9, 966 3.681060153646657*^9, 3.681066219411936*^9, 3.68106698063337*^9}] 967}, Open ]], 968 969Cell[CellGroupData[{ 970 971Cell[BoxData[ 972 RowBox[{ 973 RowBox[{"(*", " ", 974 RowBox[{"Association", " ", "constant"}], " ", "*)"}], 975 "\[IndentingNewLine]", 976 RowBox[{"ka", "=", 977 RowBox[{"kfwd", "/", "krev"}]}]}]], "Input", 978 CellChangeTimes->{{3.68097273135534*^9, 3.680972765151511*^9}}], 979 980Cell[BoxData["1.`"], "Output", 981 CellChangeTimes->{{3.680972747149431*^9, 3.680972765418374*^9}, 982 3.680973300607028*^9, 3.680973336907888*^9, 3.6809734203973494`*^9, 983 3.680973537292582*^9, 3.680973828604862*^9, 3.680973867692275*^9, 984 3.680973970140441*^9, 3.680975292482135*^9, 3.680976665394786*^9, { 985 3.680977608676064*^9, 3.680977634845111*^9}, 3.68097813272326*^9, 986 3.6809788339268847`*^9, 3.68098020775743*^9, 3.6809824832698193`*^9, 987 3.681060112763929*^9, 3.681066219483856*^9, 3.681066980745213*^9}] 988}, Open ]], 989 990Cell[CellGroupData[{ 991 992Cell[BoxData[ 993 RowBox[{"a1eq", "=", 994 RowBox[{"a0", "*", 995 RowBox[{ 996 RowBox[{"(", 997 RowBox[{"1", "+", 998 RowBox[{"2", "*", "ka", "*", 999 RowBox[{"a0", "/", "volume"}]}], "-", 1000 RowBox[{"Sqrt", "[", 1001 RowBox[{"1", "+", 1002 RowBox[{"4", "*", "ka", "*", 1003 RowBox[{"a0", "/", "volume"}]}]}], "]"}]}], ")"}], "/", 1004 RowBox[{"(", 1005 RowBox[{"2", "*", 1006 RowBox[{"ka", "^", "2"}], "*", 1007 RowBox[{ 1008 RowBox[{"(", 1009 RowBox[{"a0", "/", "volume"}], ")"}], "^", "2"}]}], 1010 ")"}]}]}]}]], "Input", 1011 CellChangeTimes->{{3.6809727117740517`*^9, 3.6809727244420843`*^9}, { 1012 3.6809727717228622`*^9, 3.680972854056902*^9}}], 1013 1014Cell[BoxData["800.`"], "Output", 1015 CellChangeTimes->{ 1016 3.680972855998419*^9, 3.680973300641984*^9, 3.68097333694613*^9, 1017 3.680973420435807*^9, 3.6809735373253183`*^9, 3.680973828651366*^9, 1018 3.6809738677355947`*^9, 3.680973970179468*^9, 3.680975292515286*^9, 1019 3.680976665430337*^9, {3.680977608709793*^9, 3.680977634894224*^9}, 1020 3.680978132756124*^9, 3.680978833963155*^9, 3.680980207789712*^9, 1021 3.6809824833024683`*^9, 3.6810601127871857`*^9, 3.681066219498877*^9, 1022 3.68106698077844*^9}] 1023}, Open ]], 1024 1025Cell[CellGroupData[{ 1026 1027Cell[BoxData[ 1028 RowBox[{ 1029 RowBox[{"theory", "[", "n_", "]"}], "=", 1030 RowBox[{"a1eq", "*", 1031 RowBox[{ 1032 RowBox[{"(", 1033 RowBox[{"ka", "*", 1034 RowBox[{"a1eq", "/", "volume"}]}], ")"}], "^", 1035 RowBox[{"(", 1036 RowBox[{"n", "-", "1"}], ")"}]}]}]}]], "Input", 1037 CellChangeTimes->{{3.680972865807768*^9, 3.680972948352395*^9}}], 1038 1039Cell[BoxData[ 1040 RowBox[{"800.`", " ", 1041 SuperscriptBox["0.8`", 1042 RowBox[{ 1043 RowBox[{"-", "1"}], "+", "n"}]]}]], "Output", 1044 CellChangeTimes->{ 1045 3.680972949504874*^9, 3.680973300677174*^9, 3.6809733369878407`*^9, 1046 3.680973420485711*^9, 3.680973537361499*^9, 3.680973828688664*^9, 1047 3.6809738677752542`*^9, 3.680973970218308*^9, 3.680975292532185*^9, 1048 3.68097666546299*^9, {3.680977608759522*^9, 3.6809776349453077`*^9}, 1049 3.680978132775106*^9, 3.680978834010191*^9, 3.68098020780802*^9, 1050 3.680982483320971*^9, 3.681060112803054*^9, 3.68106621952815*^9, 1051 3.681066980793179*^9}] 1052}, Open ]], 1053 1054Cell[CellGroupData[{ 1055 1056Cell[BoxData[ 1057 RowBox[{ 1058 RowBox[{"theoryhigh", "[", "n_", "]"}], "=", 1059 RowBox[{ 1060 RowBox[{"theory", "[", "n", "]"}], "+", 1061 RowBox[{"Sqrt", "[", 1062 RowBox[{"theory", "[", "n", "]"}], "]"}]}]}]], "Input", 1063 CellChangeTimes->{{3.680977767823017*^9, 3.680977784090177*^9}}], 1064 1065Cell[BoxData[ 1066 RowBox[{ 1067 RowBox[{"800.`", " ", 1068 SuperscriptBox["0.8`", 1069 RowBox[{ 1070 RowBox[{"-", "1"}], "+", "n"}]]}], "+", 1071 RowBox[{"28.284271247461902`", " ", 1072 SqrtBox[ 1073 SuperscriptBox["0.8`", 1074 RowBox[{ 1075 RowBox[{"-", "1"}], "+", "n"}]]]}]}]], "Output", 1076 CellChangeTimes->{3.68097778663704*^9, 3.6809781328063498`*^9, 1077 3.680978834043145*^9, 3.680980207840715*^9, 3.6809824833517942`*^9, 1078 3.6810601128320713`*^9, 3.6810662195450478`*^9, 3.681066980827917*^9}] 1079}, Open ]], 1080 1081Cell[CellGroupData[{ 1082 1083Cell[BoxData[ 1084 RowBox[{ 1085 RowBox[{"theorylow", "[", "n_", "]"}], "=", 1086 RowBox[{ 1087 RowBox[{"theory", "[", "n", "]"}], "-", 1088 RowBox[{"Sqrt", "[", 1089 RowBox[{"theory", "[", "n", "]"}], "]"}]}]}]], "Input", 1090 CellChangeTimes->{{3.680977787342222*^9, 3.680977800136643*^9}}], 1091 1092Cell[BoxData[ 1093 RowBox[{ 1094 RowBox[{"800.`", " ", 1095 SuperscriptBox["0.8`", 1096 RowBox[{ 1097 RowBox[{"-", "1"}], "+", "n"}]]}], "-", 1098 RowBox[{"28.284271247461902`", " ", 1099 SqrtBox[ 1100 SuperscriptBox["0.8`", 1101 RowBox[{ 1102 RowBox[{"-", "1"}], "+", "n"}]]]}]}]], "Output", 1103 CellChangeTimes->{3.6809778017387667`*^9, 3.680978132839024*^9, 1104 3.680978834075561*^9, 3.680980207874158*^9, 3.680982483371936*^9, 1105 3.681060112848247*^9, 3.681066219565483*^9, 3.681066980861513*^9}] 1106}, Open ]], 1107 1108Cell[CellGroupData[{ 1109 1110Cell[BoxData[ 1111 RowBox[{"Show", "[", 1112 RowBox[{ 1113 RowBox[{"{", 1114 RowBox[{ 1115 RowBox[{"LogPlot", "[", 1116 RowBox[{ 1117 RowBox[{"theory", "[", "n", "]"}], ",", 1118 RowBox[{"{", 1119 RowBox[{"n", ",", "1", ",", "50"}], "}"}], ",", 1120 RowBox[{"PlotStyle", "\[Rule]", "Black"}]}], "]"}], ",", 1121 "\[IndentingNewLine]", 1122 RowBox[{"LogPlot", "[", 1123 RowBox[{ 1124 RowBox[{"theoryhigh", "[", "n", "]"}], ",", 1125 RowBox[{"{", 1126 RowBox[{"n", ",", "1", ",", "50"}], "}"}], ",", 1127 RowBox[{"PlotStyle", "\[Rule]", 1128 RowBox[{"{", 1129 RowBox[{"Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",", 1130 "\[IndentingNewLine]", 1131 RowBox[{"LogPlot", "[", 1132 RowBox[{ 1133 RowBox[{"theorylow", "[", "n", "]"}], ",", 1134 RowBox[{"{", 1135 RowBox[{"n", ",", "1", ",", "50"}], "}"}], ",", 1136 RowBox[{"PlotStyle", "\[Rule]", 1137 RowBox[{"{", 1138 RowBox[{"Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",", 1139 "\[IndentingNewLine]", 1140 RowBox[{"ListLogPlot", "[", 1141 RowBox[{"simdataend1a", ",", 1142 RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}], ",", 1143 "\[IndentingNewLine]", 1144 RowBox[{"ListLogPlot", "[", 1145 RowBox[{"simdatamida", ",", 1146 RowBox[{"PlotStyle", "\[Rule]", "Blue"}]}], "]"}]}], "}"}], ",", 1147 "\[IndentingNewLine]", 1148 RowBox[{"PlotRange", "\[Rule]", 1149 RowBox[{"{", 1150 RowBox[{ 1151 RowBox[{"{", 1152 RowBox[{"0", ",", "40"}], "}"}], ",", 1153 RowBox[{"{", 1154 RowBox[{ 1155 RowBox[{"-", "1"}], ",", "7"}], "}"}]}], "}"}]}], ",", 1156 RowBox[{"AxesOrigin", "\[Rule]", 1157 RowBox[{"{", 1158 RowBox[{"0", ",", 1159 RowBox[{"-", "1"}]}], "}"}]}], ",", 1160 RowBox[{"AxesStyle", "\[Rule]", "Bold"}], ",", 1161 RowBox[{"AspectRatio", "\[Rule]", "0.8"}]}], "]"}]], "Input", 1162 CellChangeTimes->{{3.680972973084056*^9, 3.680973009739571*^9}, { 1163 3.680973130034857*^9, 3.680973130064742*^9}, {3.680973344529559*^9, 1164 3.6809733446208887`*^9}, {3.680973398234157*^9, 3.6809734023607407`*^9}, { 1165 3.680973553907337*^9, 3.68097360802728*^9}, {3.680973974552478*^9, 1166 3.680973974631859*^9}, 3.680976672201068*^9, {3.680977692550296*^9, 1167 3.680977717846108*^9}, {3.680977807092786*^9, 3.680977848445869*^9}, 1168 3.6809778970694857`*^9, {3.680977940572308*^9, 3.680977969841709*^9}, { 1169 3.680978095172659*^9, 3.680978118164159*^9}, {3.680978297126136*^9, 1170 3.680978356944022*^9}, {3.6809784187004957`*^9, 3.68097844266498*^9}, { 1171 3.6810600963121862`*^9, 3.6810600987045717`*^9}, {3.6810601614769087`*^9, 1172 3.681060187649881*^9}, {3.681070348563727*^9, 3.6810703497955837`*^9}}], 1173 1174Cell[BoxData[ 1175 GraphicsBox[{{{}, {}, 1176 {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 1177 LineBox[CompressedData[" 11781:eJwVxX1cy3kcAPBWUZvJt6eVZXplFEfJQzE9/D49bT8PPeCVx7ijk14OlVrS 1179qq0HWqei7VWOIsrlbvJKKJH8vqiGulXmTkjlbiVKlkl63N398X69HfZGbdpn 1180aGBgEPif/5+RGMWkGWgJ2zPbmxl1bDgYIvA85aUlnEJrqwvvsEHlaH+QI9IS 1181qyw5l5ZUs0GmVjXxvmqJrae6hUEVbGA7u5w8MjBEFGTut5ddYsOi7gG6pl1H 1182WCUIj8w+wQYB/4CJsnKEQNvzbBcGsyHdYp9hTrieMLV78mPA29kQKT3K96Sb 1183gnm1NN9IZwv8THWJi3oWzJU61J60sgWH+C1TtFpLyD6BmDFrbMDKN/K0f5cN 1184WBYFD78MZME/OdMON9yzg+K+/WpmjDU46ZSucz/ag9+G1rWPUq2g7vh83hfj 1185eSDoyO3/q8ASnrcpxN8+cWFjqWParVoLKFM8qok0doTYVLNKa5U5RPiV2CQM 1186O8G5gpbnoEVwza3bDXcsAof2Xu4TFoKKW9f5cR8XQ9qeIpYi1AyKdfxk5Stn 1187aJJwWkLPM2EtFVV2Ymgp8FXeNaaYAV6fRQJC7wrpccxvwn5T+ENTomJ8WQZK 1188abbDUXcTuMuxDM6eXA7eTeUicdg0uOAesXfX8Aq4LxJTdiVG0JVvGKWhuUH0 1189js8rqIc00FwKep1Jd4d6LneK164nunOSXyXq3eHe4cb9nAMTBA8PP+MyVgOL 1190pVg+68Y3IutZyO45RjzIOPu5dSFvmDift3PtshEexKrkc263DRFmZyqcJ/Rr 1191IIv6ILsCA0R8Uu9l1ogHbD53VO4a1kN4/hZh/c7QC+7uZFwrV74mGiQFPWq6 1192NzTmobZ83lMigPc7ifTecNqtqXnIJY0yL0rblGoMsMX6igGtRUWJZsxbVyIB 11932LP+2vwP8IYSbDwbs3EMgM59lgUHeijfNVX5O1N8oPhds/cn5QC1Wu6bnjPq 1194A9PHUhyvqIeoXafiDrHFvvCau3UDmTNMJY/bOLSM+0JhzNMLD0xGKb2X3Ngi 11953g9ezuzxa4yeoK5zb2oqxvygo6zLr9PcAIcd888VxvsD3sZOamii4VVHElcW 1196TPiDsONW+q8KIxznI2UESAIg0qR0ZZNkGi6XmCjsxgMgpL5zPGyVCbYMX8wP 1197lPDBdHOi7J0FHQur8NWyCT5Ux4YTnSoG5nU6++TGC6DU42I+O42JlygIdeuY 1198AL7/07M2eIcZZvc+dPGIJ0EqkYsS6AjLNvT67E0gQSQr8QiZifCMm/TQrEQS 1199oi9XjjuZIzwhDhG9SCFh2+MW0QtbhN/M7lTGZpLghJhJ7gsRvhg4+kP5LyQ0 1200FmckfeEjvKBqqZxTSwKNEiZHZyB8wW5zmX8dCV9bM7xIKcKstPg7P1EkvP9b 1201PmmfjfD04LquO49IaJ1+I7lFjnBf37olW5pJuBg0mOxSirBiTkRD7hsSvDoj 1202UgYeIDwvPau9qosEV63Qu74B4cL35f0db0lYYHh8qvAJwtnVOvPFvSTMdCxN 1203Wd+G8KGQ1N3KQRI6DnWlKLoR7q2+HDOoJaFNPOidpkF4N+dxhrWOhPq8yant 1204fQgHfTC7Gj5CgqLKTkzXItwYsvz+z6MknFd+R7zVIUzcDm2rHCdB9pKnrxlB 1205uIZzTNM+SUJmP0mdHkfYNaNoRK8nIXFyqzhSj/C/ysdAAw== 1206 "]]}}, {{}, {}, 1207 {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 1208 Dashing[{Small, Small}], LineBox[CompressedData[" 12091:eJwVjH0w1Hkcxxfb7XrKw2LZQh5SQog85OH3wdr91VA4mTnFNJR0Jedp0wqb 1210h55ERUmXh9rMVuhoPJSk7865ba8Hiu0cPVl3S1TKWtbz/s798Zr3vOY987KK 1211S444oE4ikUJX+H+1uck6aqRJbGdD+Hi1lAFHwti+F/wmsaIJ/0H/DwzosbM8 1212Yp41iU3cO/jq4yADSiU9L7yVKy7I6LGQMIDhtLko9ascU555Rq8RMcBe+lVT 1213NqDA/C4WDN6oYwCb9TNFfH8WkwuNHO6mMyDf8IB6cTyB9Z+wquimMiDxzDGW 1214ryYV1B6KW8ItzYB1WsLfLNEDm1p51utgU7DiRKnUOmgw4+M2ZZZCB6PAxIvM 1215ITps+qndXb3IBP4tXnVU9HgNNEe/ypO3GMMGhdjFYsIS0Kg9+Y9uI+gstPWe 1216JlvDFV2ufusXGrzprcud+24DzUxh3yMzGgjquh4mku1gwkfqxvA0hIQgPj1z 1217ZgMIeGkhN/YbwL2t0q3C9/aQMp59NfGqPjS2NLHSJxzA8+mCmVe6HtQoWNni 1218t05AG/PCyG91YTtKFpySO0NlfITj3XU64DeVxcYIF2j2WKezkKoF3TJ+j9a0 1219K5SsvhP0YIQKj8xpu84vb4F4/oDO2DYKVHskxMXMuIFofcWp602rYOiKerJM 1220bSuU99/G6VpkkN3c+e60pgc4Rl1YH/2LOkiLs99yCQ8I+mdK45OSBN7CmT4b 1221LS8w6SwRRD5VYWf7wmLXanhDrmu1tfvQIlZ1ac9211lvOGZxM87BYB5bfbXR 1222aYnYBm25UZ7RhkqMc2K01mTWB3zTSisyIxSY750E40/qfhDlTKu6tX8SE/HK 1223RySa/lD7ZHnopc0XLNj7Lq5P+EO2hkVkx+wIZlCZF3GSDND4ZK9bMEeKZWlb 12247+DzAFw1M34r6+/H2OHXUsIXACT5SYmiwOdY4LbWK3tyAuAWso/tiRZgXmWB 1225+cXzATDVGsH+tf4RirmQnsTIDYRCu5zChI7XKHuRbvVqMRCMDnXnH5oeRIRf 1226GdmQEwRVleWy3YeHUZNNs6xxIQi6RPtu0zeMor3HmSUZHCbMeZkp+TmfkWcq 12271718iQmlVRoWmyy/o/SAM1rBvGDY2/ZYnvdCjhp4lLo1i8Gga3d5D3VQgWjx 1228DqxQHguqnXt5rVpKlNEqrBcsseAS5R19Rm8OeX90CijhsKGXpr/2DXkBOdZh 1229ktcLbBhmhSh7zJcQY/T3zT4cHGynEq1DdFWoNGQ0IC4TB+BYrxoxViHtZs3d 1230Z7k4aLIsC7MtVGgpNyzr75wVT0qLueesQh/MPorTTuMwzs1Mo0ao0I3Q+X0N 1231FSu9mqORDeUqtL7Vucy8Awf+Ln1ZvSWBqtf8KGB2rvymN1u8NhLIJI/Tfhjh 1232YCIftxO5EOiHXZ1D7V04JG50kb8PINDY2A7HqJc41OrFr6PuJ1Dd2gRRyQcc 1233TI3HKaF3CGSdf3agdQiHmspo8psmAl0fb/jyfhiH4aL7tdHtBDrfpjBwGMXh 1234YNe13oTnBEoKOxkr/obDu8umUu5XAo221aZ8m8TBvZxLqKYJFGv+Z4GxAger 1235mL+68pYJtPPz6vr4WRx8rYgqJoUkfBq25cm5eRwoB6lzhdokIfZgd+/9RRye 1236neizFeuRhA/Nj8sGlnFoST1qSzUiCV0KKmcJAoeCyAklbkoS/gdHe0d5 1237 "]]}}, {{}, {}, 1238 {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 1239 Dashing[{Small, Small}], LineBox[CompressedData[" 12401:eJwVkXk81HsfxcegmbFlbKMRMnZdWm4UM7/ffK6nuEmlevTSos0SRSKKmFBR 1241RFHhluK5skR6psXNEvf7lT3CpSxFxFguBtdO4fH8cV7nn/frnNd5HZ1TPvvd 1242qBQK5dKK/u+yl33kJCjj/B7rhjqz39jg5WDLu0OM8w/cuZYkvM+GegNtL83g 1243cf5HX8aRjfFsuNtcX2s5M87/mh9StymaDWxTs1t+I//w/6OX7rQlhA3G3SMM 1244Udskv5RCV952gg22NmdoVS9n+Zz9TnOWRmy4puRGjXVZ5m+t5pQaFKwBj5uX 1245bHgMOliYDfjmlauDzY3mNLPm1XBMUWF/TTcLdC4eXJJ4qww7/FT6X1FYoGLt 1246Ebe9iwUZFxtG6+XUoDdW+lxFsQZolj0642ikCoaTVRu1xNoQeXKkJXuDCpRE 12476FlOSXHAX6pD1d5KGT7+lRM6N6YLz7LLw0z+rQSZOWUFHlIGIHYvvS9/iAnu 1248/0pjBU4bgqsf4TzupQjPzbvNcYcxnLlfLNpDWw3CvBc2/uL1kG10vMCFLg+p 1249kzaCqs+m0KM4ohJvIAs7kU9m5D8bQPxBYX+dKgOIiWBb/vJGMPol5sf8Khp8 1250EKXVy0xtAit3z6RQZWko0lTeG7O4Gbr7BXWcYSqkWLifcp7+GcR3VA4mfqFA 1251VwLVRyRhDl1iWuWI9iJf9PueLzcYFuC3tXShK2CO3x0r+Hx52QLiTp91jxyd 12525Fvi6SZdmW0g8Uvbs8JoMT+qyeHYWklLeLrvjbybbS//cfyRnZtmLSH9RIu5 1253VmMjXyFJaPpj2QoU8134ZV/foXS/mKQ2SS5YqZxITXtRhiz3eEr8QeNC7M82 1254HQtXy5GrtO4n79VceFARlb/GuBK9vZAY0qXFBenz8Vo/BdcgDwdB7TuCC4+U 1255OF5lGo3oHWOXZ1QwF3rCyN+85VqRU59hs1voCu8bs3ZK0IrEWIqwvsaFi/Zr 1256XWvGWpF64J+K36O5ELdqnZzLxzbk07+pwOshFz5vzxh3//0zWlumTnMo5MLM 12571bPTh3d9RRdD+tPVZrmQFy/u95roQfqCp/07vnPBN9OVomvRiz4KzhgFLHOB 1258/VD4iXW5F20OHX3WTONB5XdmBKaK0Fj4zKs4dR6o7jU4ymH1IY8bq0plrHhw 1259t9F06JP9ADp016BzKYQHaYWno8wnhhH93qCWWTgPdjCDPFz5I6jgXs4J5wge 1260pMfrDY7FjCC1BDPR21gexK63+qRjLEZNSRbDgSk8ONWis1nNfRTZPbaZn0A8 1261GPK2zkdB44j31F11gErA9XO7AmS3TKKU01nVVBoByW2j7RonJxHFcDBYS5aA 1262EHZgpP/tSVSe4dnjqEwAo34xTXJoEu1+4iUs1yXAiXvWpCR9Ch1L8duZtp0A 1263TcPs6k7jGYSdX/8o+ZWA59dkFtSPziCO5pSw3Z6A2SF937zbM6g/OUCN6UhA 126437m+MuXpGeTzILA31I2A1JJDZG7lLAq7f0XgHElAc6B0LxE6j3oOoI1B0QR0 1265hbtlXC2YR9uVKaL7twlgaV/4tntiHtHvhtvVJRKwo5mz7/rpBRR/5zqLm0WA 1266hvE6XoPTd5QWHf1SvZqAo55vqsjDi0jKrtZ1Sx0B39S0RrMeLyJ3hpy6QyMB 1267QmZNb/u3RbT+ZuyVG20EmJm+4Aq9llBeRNyumcEV/hSh1RCzjCrCEvuaGSQc 1268eX3IJW+JgrNqOa1P5UnQyjZOiNSXwFFqwmoBkwQFnn/OoL0E3p1b9cxwDQkt 1269yXqO5x9L4E+tc77BRiT0bGuoNLSh4nxOhIvDTyTcvFD6B9OPih94Mx31N5Kw 1270eURXXJRCxc6SJtsatpJgn69b7blAxX1mR5Y4tiSkrDepMimWxFVBA2OzdiQM 1271Ry3Sl0YlcXb5hW91e0gIjmnq/cKRwt6HY8ovHiRBqpC+ZihWCk9HlES/dyNh 1272iPdr7pCfNG5t3BmS6knC+inq5qdCaVyo0eLt702C32J4/oRYGgtejjpoBazk 1273n2pZuOWzCkt3arP8rpNg7l7M7oii4QHDXLrtTRLq5x5+k2qh4Rq/bQsaMSv7 1274g3BGkR4dx9L3dVbcI+GY6buIhPd07HOgs/5hEglNyY6dphwG3pfiiX2SSZDk 1275/MjlChhYdcvVJ2uekFB4bDl3jpTBs1cUEkYzSWAONsq7Zcrg9pqHkWU5JJgm 12763RJVKMnix8dfe3q/IqE/0C4l8YcsDs3hH7F+QwLs6fB2DpbDJ6dr7VlFJOiX 1277B8g0S8hj/VuiDaWlJIQ8S0k2NlHAtJbzOokVK/8J3lI76hXw3+sWlc7WkGBT 1278HSCUDV+Na89GScEHEjKqKi8l6yji529UZ1T+IqGoO+vR3hhFfEcibeDvjyTI 1279yM2NNFKZ2NferP3PNhL+e+hJhd5NJj6QVPT+XgcJeAcjM2OdEjbvsSn26Cbh 1280RVjc99EmJcwybX5OiEiwTnikhrOV8fyl46lKgyQctGtvPVmggr+8G44bGCYh 1281KCdXX8VQDZfIB14tHiOhq2ffwTEXdZzqJOUfP0lC2KbtWQtfNfEAN7g4f2ql 1282r2VXo4OeLv4f9ZSGmw== 1283 "]]}}, {{}, {{}, 1284 {RGBColor[1, 0, 0], PointSize[0.019444444444444445`], AbsoluteThickness[ 1285 1.6], PointBox[CompressedData[" 12861:eJxTTMoPSmViYGBQAGIQDQEf7Cc+L0hpfCjlABVw0A8zUf70RRLK53CoObbu 1287HtcnCShfwIH/y7rgt0YwvohDytPiLZ3W4lC+hMMMy93T3h4Sg/JlHNrOTpeM 12880BGF8hUc+gpKV0UHi0D5Sg5zG65W8a8ThvJVHB7NNjO9PVkIyldzuJL6jVNj 1289pyCUr+Eg9OLAodVBML6WQ47ThL18C/mgfB0H3iIj68tNvFC+nsM33p2Nf0x5 1290oHwDNHlDh586k2qW53BC+UYOy3dfFzslwwrlGzsE9hhqs7SyQPkmDrXzLu8R 1291e8gM5Zs6MClo/eJe/ccewjdzCI8yWlek9B/KN0fjWzi8t/z1z0nvGZRvica3 1292gsUDFFg7cDOvrXo1+SNU3gaNb4vGd0DT74TKb/CG8wFgAHMw 1293 1294 "]]}, {}}, {}}, {{}, {{}, 1295 {RGBColor[0, 0, 1], PointSize[0.019444444444444445`], AbsoluteThickness[ 1296 1.6], PointBox[CompressedData[" 12971:eJxTTMoPSmViYGCQA2IQDQEf7M9KfXg1RUDKASrg4LT7T5d7nSSUz+HALpPy 12981LZfAsoXcIjT+volWx7GF3FYeufh5as/xKB8CYdsvd/3L52E8WUc5D18LcVW 1299iUL5Cg4HlVs0GJRgfCUHnQ9967b3C0P5Kg6R8Yc8oiJgfDUHRcf0ztJ/AlC+ 1300hkPxxvWdAVWCUL6WQ7dR6p3ZCTB5HYdrvB0ZP/14oXw9h6Of+YOjCnmgfAOH 13012de4fy4z5YbyDR0Cewy1WVpZoHwjhxNHbctLdnFA+cYO7y1//XPSY4PyTRzE 1302Qrfu3pjNBOWbOhj3vv3ueOCnPYRv5sCkoPWLe/UfKN8cFq5QYOFQvNraftMi 1303Bqi4pQM389qqV5M/QtVboZlnDbX/GZRvg2a+I5q8E9w+AP51ckg= 1304 "]]}, {}}, {}}}, 1305 AspectRatio->0.8, 1306 Axes->{True, True}, 1307 AxesLabel->{None, None}, 1308 AxesOrigin->{0, -1}, 1309 AxesStyle->Bold, 1310 CoordinatesToolOptions:>{"DisplayFunction" -> ({ 1311 Part[#, 1], 1312 Exp[ 1313 Part[#, 2]]}& ), "CopiedValueFunction" -> ({ 1314 Part[#, 1], 1315 Exp[ 1316 Part[#, 2]]}& )}, 1317 DisplayFunction->Identity, 1318 Frame->{{False, False}, {False, False}}, 1319 FrameLabel->{{None, None}, {None, None}}, 1320 FrameTicks->{{ 1321 Charting`ScaledTicks[{Log, Exp}], 1322 Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, 1323 GridLines->{None, None}, 1324 GridLinesStyle->Directive[ 1325 GrayLevel[0.5, 0.4]], 1326 Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, 1327 PlotRange->{{0, 40}, {-1, 7}}, 1328 PlotRangeClipping->True, 1329 PlotRangePadding->{{ 1330 Scaled[0.02], 1331 Scaled[0.02]}, { 1332 Scaled[0.05], 1333 Scaled[0.05]}}, 1334 Ticks->FrontEndValueCache[{Automatic, 1335 Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 1336 FormBox["1", TraditionalForm], {0.01, 0.}, { 1337 AbsoluteThickness[0.1]}}, {2.302585092994046, 1338 FormBox["10", TraditionalForm], {0.01, 0.}, { 1339 AbsoluteThickness[0.1]}}, {4.605170185988092, 1340 FormBox["100", TraditionalForm], {0.01, 0.}, { 1341 AbsoluteThickness[0.1]}}, {6.907755278982137, 1342 FormBox["1000", TraditionalForm], {0.01, 0.}, { 1343 AbsoluteThickness[0.1]}}, {-2.3025850929940455`, 1344 FormBox[ 1345 InterpretationBox[ 1346 StyleBox[ 1347 1348 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1349 Baseline], "CacheGraphics" -> False], 1350 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1351 AbsoluteThickness[0.1]}}, {-1.6094379124341003`, 1352 FormBox[ 1353 InterpretationBox[ 1354 StyleBox[ 1355 1356 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1357 Baseline], "CacheGraphics" -> False], 1358 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1359 AbsoluteThickness[0.1]}}, {-1.2039728043259361`, 1360 FormBox[ 1361 InterpretationBox[ 1362 StyleBox[ 1363 1364 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1365 Baseline], "CacheGraphics" -> False], 1366 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1367 AbsoluteThickness[0.1]}}, {-0.916290731874155, 1368 FormBox[ 1369 InterpretationBox[ 1370 StyleBox[ 1371 1372 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1373 Baseline], "CacheGraphics" -> False], 1374 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1375 AbsoluteThickness[0.1]}}, {-0.6931471805599453, 1376 FormBox[ 1377 InterpretationBox[ 1378 StyleBox[ 1379 1380 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1381 Baseline], "CacheGraphics" -> False], 1382 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1383 AbsoluteThickness[0.1]}}, {-0.5108256237659907, 1384 FormBox[ 1385 InterpretationBox[ 1386 StyleBox[ 1387 1388 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1389 Baseline], "CacheGraphics" -> False], 1390 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1391 AbsoluteThickness[0.1]}}, {-0.35667494393873245`, 1392 FormBox[ 1393 InterpretationBox[ 1394 StyleBox[ 1395 1396 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1397 Baseline], "CacheGraphics" -> False], 1398 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1399 AbsoluteThickness[0.1]}}, {-0.2231435513142097, 1400 FormBox[ 1401 InterpretationBox[ 1402 StyleBox[ 1403 1404 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1405 Baseline], "CacheGraphics" -> False], 1406 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1407 AbsoluteThickness[0.1]}}, {-0.10536051565782628`, 1408 FormBox[ 1409 InterpretationBox[ 1410 StyleBox[ 1411 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1412 Baseline], "CacheGraphics" -> False], 1413 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1414 AbsoluteThickness[0.1]}}, {0.6931471805599453, 1415 FormBox[ 1416 InterpretationBox[ 1417 StyleBox[ 1418 1419 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1420 Baseline], "CacheGraphics" -> False], 1421 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1422 AbsoluteThickness[0.1]}}, {1.0986122886681098`, 1423 FormBox[ 1424 InterpretationBox[ 1425 StyleBox[ 1426 1427 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1428 Baseline], "CacheGraphics" -> False], 1429 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1430 AbsoluteThickness[0.1]}}, {1.3862943611198906`, 1431 FormBox[ 1432 InterpretationBox[ 1433 StyleBox[ 1434 1435 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1436 Baseline], "CacheGraphics" -> False], 1437 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1438 AbsoluteThickness[0.1]}}, {1.6094379124341003`, 1439 FormBox[ 1440 InterpretationBox[ 1441 StyleBox[ 1442 1443 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1444 Baseline], "CacheGraphics" -> False], 1445 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1446 AbsoluteThickness[0.1]}}, {1.791759469228055, 1447 FormBox[ 1448 InterpretationBox[ 1449 StyleBox[ 1450 1451 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1452 Baseline], "CacheGraphics" -> False], 1453 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1454 AbsoluteThickness[0.1]}}, {1.9459101490553132`, 1455 FormBox[ 1456 InterpretationBox[ 1457 StyleBox[ 1458 1459 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1460 Baseline], "CacheGraphics" -> False], 1461 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1462 AbsoluteThickness[0.1]}}, {2.0794415416798357`, 1463 FormBox[ 1464 InterpretationBox[ 1465 StyleBox[ 1466 1467 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1468 Baseline], "CacheGraphics" -> False], 1469 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1470 AbsoluteThickness[0.1]}}, {2.1972245773362196`, 1471 FormBox[ 1472 InterpretationBox[ 1473 StyleBox[ 1474 1475 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1476 Baseline], "CacheGraphics" -> False], 1477 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1478 AbsoluteThickness[0.1]}}, {2.995732273553991, 1479 FormBox[ 1480 InterpretationBox[ 1481 StyleBox[ 1482 1483 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1484 Baseline], "CacheGraphics" -> False], 1485 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1486 AbsoluteThickness[0.1]}}, {3.4011973816621555`, 1487 FormBox[ 1488 InterpretationBox[ 1489 StyleBox[ 1490 1491 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1492 Baseline], "CacheGraphics" -> False], 1493 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1494 AbsoluteThickness[0.1]}}, {3.6888794541139363`, 1495 FormBox[ 1496 InterpretationBox[ 1497 StyleBox[ 1498 1499 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1500 Baseline], "CacheGraphics" -> False], 1501 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1502 AbsoluteThickness[0.1]}}, {3.912023005428146, 1503 FormBox[ 1504 InterpretationBox[ 1505 StyleBox[ 1506 1507 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1508 Baseline], "CacheGraphics" -> False], 1509 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1510 AbsoluteThickness[0.1]}}, {4.0943445622221, 1511 FormBox[ 1512 InterpretationBox[ 1513 StyleBox[ 1514 1515 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1516 Baseline], "CacheGraphics" -> False], 1517 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1518 AbsoluteThickness[0.1]}}, {4.248495242049359, 1519 FormBox[ 1520 InterpretationBox[ 1521 StyleBox[ 1522 1523 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1524 Baseline], "CacheGraphics" -> False], 1525 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1526 AbsoluteThickness[0.1]}}, {4.382026634673881, 1527 FormBox[ 1528 InterpretationBox[ 1529 StyleBox[ 1530 1531 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1532 Baseline], "CacheGraphics" -> False], 1533 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1534 AbsoluteThickness[0.1]}}, {4.499809670330265, 1535 FormBox[ 1536 InterpretationBox[ 1537 StyleBox[ 1538 1539 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1540 Baseline], "CacheGraphics" -> False], 1541 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1542 AbsoluteThickness[0.1]}}, {5.298317366548036, 1543 FormBox[ 1544 InterpretationBox[ 1545 StyleBox[ 1546 1547 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1548 Baseline], "CacheGraphics" -> False], 1549 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1550 AbsoluteThickness[0.1]}}, {5.703782474656201, 1551 FormBox[ 1552 InterpretationBox[ 1553 StyleBox[ 1554 1555 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1556 Baseline], "CacheGraphics" -> False], 1557 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1558 AbsoluteThickness[0.1]}}, {5.991464547107982, 1559 FormBox[ 1560 InterpretationBox[ 1561 StyleBox[ 1562 1563 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1564 Baseline], "CacheGraphics" -> False], 1565 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1566 AbsoluteThickness[0.1]}}, {6.214608098422191, 1567 FormBox[ 1568 InterpretationBox[ 1569 StyleBox[ 1570 1571 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1572 Baseline], "CacheGraphics" -> False], 1573 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1574 AbsoluteThickness[0.1]}}, {6.396929655216146, 1575 FormBox[ 1576 InterpretationBox[ 1577 StyleBox[ 1578 1579 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1580 Baseline], "CacheGraphics" -> False], 1581 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1582 AbsoluteThickness[0.1]}}, {6.551080335043404, 1583 FormBox[ 1584 InterpretationBox[ 1585 StyleBox[ 1586 1587 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1588 Baseline], "CacheGraphics" -> False], 1589 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1590 AbsoluteThickness[0.1]}}, {6.684611727667927, 1591 FormBox[ 1592 InterpretationBox[ 1593 StyleBox[ 1594 1595 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1596 Baseline], "CacheGraphics" -> False], 1597 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1598 AbsoluteThickness[0.1]}}, {6.802394763324311, 1599 FormBox[ 1600 InterpretationBox[ 1601 StyleBox[ 1602 1603 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1604 Baseline], "CacheGraphics" -> False], 1605 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1606 AbsoluteThickness[0.1]}}, {7.600902459542082, 1607 FormBox[ 1608 InterpretationBox[ 1609 StyleBox[ 1610 1611 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1612 Baseline], "CacheGraphics" -> False], 1613 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1614 AbsoluteThickness[0.1]}}, {8.006367567650246, 1615 FormBox[ 1616 InterpretationBox[ 1617 StyleBox[ 1618 1619 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1620 Baseline], "CacheGraphics" -> False], 1621 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1622 AbsoluteThickness[0.1]}}, {8.294049640102028, 1623 FormBox[ 1624 InterpretationBox[ 1625 StyleBox[ 1626 1627 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1628 Baseline], "CacheGraphics" -> False], 1629 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1630 AbsoluteThickness[0.1]}}, {8.517193191416238, 1631 FormBox[ 1632 InterpretationBox[ 1633 StyleBox[ 1634 1635 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1636 Baseline], "CacheGraphics" -> False], 1637 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1638 AbsoluteThickness[0.1]}}}}]]], "Output", 1639 CellChangeTimes->{3.68107035068686*^9}] 1640}, Open ]], 1641 1642Cell[CellGroupData[{ 1643 1644Cell[BoxData[ 1645 RowBox[{"Show", "[", 1646 RowBox[{ 1647 RowBox[{"{", 1648 RowBox[{ 1649 RowBox[{"LogPlot", "[", 1650 RowBox[{ 1651 RowBox[{"theory", "[", "n", "]"}], ",", 1652 RowBox[{"{", 1653 RowBox[{"n", ",", "1", ",", "50"}], "}"}], ",", 1654 RowBox[{"PlotStyle", "\[Rule]", "Black"}]}], "]"}], ",", 1655 "\[IndentingNewLine]", 1656 RowBox[{"LogPlot", "[", 1657 RowBox[{ 1658 RowBox[{"theoryhigh", "[", "n", "]"}], ",", 1659 RowBox[{"{", 1660 RowBox[{"n", ",", "1", ",", "50"}], "}"}], ",", 1661 RowBox[{"PlotStyle", "\[Rule]", 1662 RowBox[{"{", 1663 RowBox[{"Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",", 1664 "\[IndentingNewLine]", 1665 RowBox[{"LogPlot", "[", 1666 RowBox[{ 1667 RowBox[{"theorylow", "[", "n", "]"}], ",", 1668 RowBox[{"{", 1669 RowBox[{"n", ",", "1", ",", "50"}], "}"}], ",", 1670 RowBox[{"PlotStyle", "\[Rule]", 1671 RowBox[{"{", 1672 RowBox[{"Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",", 1673 "\[IndentingNewLine]", 1674 RowBox[{"ListLogPlot", "[", 1675 RowBox[{"simdataend1a", ",", 1676 RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}], ",", 1677 "\[IndentingNewLine]", 1678 RowBox[{"ListLogPlot", "[", 1679 RowBox[{"simdataend2a", ",", 1680 RowBox[{"PlotStyle", "\[Rule]", 1681 RowBox[{"Darker", "[", "Green", "]"}]}]}], "]"}], ",", 1682 "\[IndentingNewLine]", 1683 RowBox[{"ListLogPlot", "[", 1684 RowBox[{"simdatamida", ",", 1685 RowBox[{"PlotStyle", "\[Rule]", "Blue"}]}], "]"}]}], "}"}], ",", 1686 "\[IndentingNewLine]", 1687 RowBox[{"PlotRange", "\[Rule]", 1688 RowBox[{"{", 1689 RowBox[{ 1690 RowBox[{"{", 1691 RowBox[{"0", ",", "40"}], "}"}], ",", 1692 RowBox[{"{", 1693 RowBox[{ 1694 RowBox[{"-", "1"}], ",", "7"}], "}"}]}], "}"}]}], ",", 1695 RowBox[{"AxesOrigin", "\[Rule]", 1696 RowBox[{"{", 1697 RowBox[{"0", ",", 1698 RowBox[{"-", "1"}]}], "}"}]}], ",", 1699 RowBox[{"AxesStyle", "\[Rule]", "Bold"}], ",", 1700 RowBox[{"AspectRatio", "\[Rule]", "0.8"}], ",", 1701 RowBox[{"AxesLabel", "\[Rule]", 1702 RowBox[{"{", 1703 RowBox[{"\"\<polymer size\>\"", ",", "\"\<molecule count\>\""}], 1704 "}"}]}]}], "]"}]], "Input", 1705 CellChangeTimes->{{3.680972973084056*^9, 3.680973009739571*^9}, { 1706 3.680973130034857*^9, 3.680973130064742*^9}, {3.680973344529559*^9, 1707 3.6809733446208887`*^9}, {3.680973398234157*^9, 3.6809734023607407`*^9}, { 1708 3.680973553907337*^9, 3.68097360802728*^9}, {3.680973974552478*^9, 1709 3.680973974631859*^9}, 3.680976672201068*^9, {3.680977692550296*^9, 1710 3.680977717846108*^9}, {3.680977807092786*^9, 3.680977848445869*^9}, 1711 3.6809778970694857`*^9, {3.680977940572308*^9, 3.680977969841709*^9}, { 1712 3.680978095172659*^9, 3.680978118164159*^9}, {3.680978297126136*^9, 1713 3.680978356944022*^9}, {3.6809784187004957`*^9, 3.68097844266498*^9}, { 1714 3.6810600963121862`*^9, 3.6810600987045717`*^9}, {3.6810601614769087`*^9, 1715 3.681060187649881*^9}, {3.681070359171239*^9, 3.6810703696100597`*^9}, { 1716 3.681072154943825*^9, 3.681072188522039*^9}}], 1717 1718Cell[BoxData[ 1719 GraphicsBox[{{{}, {}, 1720 {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 1721 LineBox[CompressedData[" 17221:eJwVxX1cy3kcAPBWUZvJt6eVZXplFEfJQzE9/D49bT8PPeCVx7ijk14OlVrS 1723qq0HWqei7VWOIsrlbvJKKJH8vqiGulXmTkjlbiVKlkl63N398X69HfZGbdpn 1724aGBgEPif/5+RGMWkGWgJ2zPbmxl1bDgYIvA85aUlnEJrqwvvsEHlaH+QI9IS 1725qyw5l5ZUs0GmVjXxvmqJrae6hUEVbGA7u5w8MjBEFGTut5ddYsOi7gG6pl1H 1726WCUIj8w+wQYB/4CJsnKEQNvzbBcGsyHdYp9hTrieMLV78mPA29kQKT3K96Sb 1727gnm1NN9IZwv8THWJi3oWzJU61J60sgWH+C1TtFpLyD6BmDFrbMDKN/K0f5cN 1728WBYFD78MZME/OdMON9yzg+K+/WpmjDU46ZSucz/ag9+G1rWPUq2g7vh83hfj 1729eSDoyO3/q8ASnrcpxN8+cWFjqWParVoLKFM8qok0doTYVLNKa5U5RPiV2CQM 1730O8G5gpbnoEVwza3bDXcsAof2Xu4TFoKKW9f5cR8XQ9qeIpYi1AyKdfxk5Stn 1731aJJwWkLPM2EtFVV2Ymgp8FXeNaaYAV6fRQJC7wrpccxvwn5T+ENTomJ8WQZK 1732abbDUXcTuMuxDM6eXA7eTeUicdg0uOAesXfX8Aq4LxJTdiVG0JVvGKWhuUH0 1733js8rqIc00FwKep1Jd4d6LneK164nunOSXyXq3eHe4cb9nAMTBA8PP+MyVgOL 1734pVg+68Y3IutZyO45RjzIOPu5dSFvmDift3PtshEexKrkc263DRFmZyqcJ/Rr 1735IIv6ILsCA0R8Uu9l1ogHbD53VO4a1kN4/hZh/c7QC+7uZFwrV74mGiQFPWq6 1736NzTmobZ83lMigPc7ifTecNqtqXnIJY0yL0rblGoMsMX6igGtRUWJZsxbVyIB 17372LP+2vwP8IYSbDwbs3EMgM59lgUHeijfNVX5O1N8oPhds/cn5QC1Wu6bnjPq 1738A9PHUhyvqIeoXafiDrHFvvCau3UDmTNMJY/bOLSM+0JhzNMLD0xGKb2X3Ngi 17393g9ezuzxa4yeoK5zb2oqxvygo6zLr9PcAIcd888VxvsD3sZOamii4VVHElcW 1740TPiDsONW+q8KIxznI2UESAIg0qR0ZZNkGi6XmCjsxgMgpL5zPGyVCbYMX8wP 1741lPDBdHOi7J0FHQur8NWyCT5Ux4YTnSoG5nU6++TGC6DU42I+O42JlygIdeuY 1742AL7/07M2eIcZZvc+dPGIJ0EqkYsS6AjLNvT67E0gQSQr8QiZifCMm/TQrEQS 1743oi9XjjuZIzwhDhG9SCFh2+MW0QtbhN/M7lTGZpLghJhJ7gsRvhg4+kP5LyQ0 1744FmckfeEjvKBqqZxTSwKNEiZHZyB8wW5zmX8dCV9bM7xIKcKstPg7P1EkvP9b 1745PmmfjfD04LquO49IaJ1+I7lFjnBf37olW5pJuBg0mOxSirBiTkRD7hsSvDoj 1746UgYeIDwvPau9qosEV63Qu74B4cL35f0db0lYYHh8qvAJwtnVOvPFvSTMdCxN 1747Wd+G8KGQ1N3KQRI6DnWlKLoR7q2+HDOoJaFNPOidpkF4N+dxhrWOhPq8yant 1748fQgHfTC7Gj5CgqLKTkzXItwYsvz+z6MknFd+R7zVIUzcDm2rHCdB9pKnrxlB 1749uIZzTNM+SUJmP0mdHkfYNaNoRK8nIXFyqzhSj/C/ysdAAw== 1750 "]]}}, {{}, {}, 1751 {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 1752 Dashing[{Small, Small}], LineBox[CompressedData[" 17531:eJwVjH0w1Hkcxxfb7XrKw2LZQh5SQog85OH3wdr91VA4mTnFNJR0Jedp0wqb 1754h55ERUmXh9rMVuhoPJSk7865ba8Hiu0cPVl3S1TKWtbz/s798Zr3vOY987KK 1755S444oE4ikUJX+H+1uck6aqRJbGdD+Hi1lAFHwti+F/wmsaIJ/0H/DwzosbM8 1756Yp41iU3cO/jq4yADSiU9L7yVKy7I6LGQMIDhtLko9ascU555Rq8RMcBe+lVT 1757NqDA/C4WDN6oYwCb9TNFfH8WkwuNHO6mMyDf8IB6cTyB9Z+wquimMiDxzDGW 1758ryYV1B6KW8ItzYB1WsLfLNEDm1p51utgU7DiRKnUOmgw4+M2ZZZCB6PAxIvM 1759ITps+qndXb3IBP4tXnVU9HgNNEe/ypO3GMMGhdjFYsIS0Kg9+Y9uI+gstPWe 1760JlvDFV2ufusXGrzprcud+24DzUxh3yMzGgjquh4mku1gwkfqxvA0hIQgPj1z 1761ZgMIeGkhN/YbwL2t0q3C9/aQMp59NfGqPjS2NLHSJxzA8+mCmVe6HtQoWNni 1762t05AG/PCyG91YTtKFpySO0NlfITj3XU64DeVxcYIF2j2WKezkKoF3TJ+j9a0 1763K5SsvhP0YIQKj8xpu84vb4F4/oDO2DYKVHskxMXMuIFofcWp602rYOiKerJM 1764bSuU99/G6VpkkN3c+e60pgc4Rl1YH/2LOkiLs99yCQ8I+mdK45OSBN7CmT4b 1765LS8w6SwRRD5VYWf7wmLXanhDrmu1tfvQIlZ1ac9211lvOGZxM87BYB5bfbXR 1766aYnYBm25UZ7RhkqMc2K01mTWB3zTSisyIxSY750E40/qfhDlTKu6tX8SE/HK 1767RySa/lD7ZHnopc0XLNj7Lq5P+EO2hkVkx+wIZlCZF3GSDND4ZK9bMEeKZWlb 17687+DzAFw1M34r6+/H2OHXUsIXACT5SYmiwOdY4LbWK3tyAuAWso/tiRZgXmWB 1769+cXzATDVGsH+tf4RirmQnsTIDYRCu5zChI7XKHuRbvVqMRCMDnXnH5oeRIRf 1770GdmQEwRVleWy3YeHUZNNs6xxIQi6RPtu0zeMor3HmSUZHCbMeZkp+TmfkWcq 17711718iQmlVRoWmyy/o/SAM1rBvGDY2/ZYnvdCjhp4lLo1i8Gga3d5D3VQgWjx 1772DqxQHguqnXt5rVpKlNEqrBcsseAS5R19Rm8OeX90CijhsKGXpr/2DXkBOdZh 1773ktcLbBhmhSh7zJcQY/T3zT4cHGynEq1DdFWoNGQ0IC4TB+BYrxoxViHtZs3d 1774Z7k4aLIsC7MtVGgpNyzr75wVT0qLueesQh/MPorTTuMwzs1Mo0ao0I3Q+X0N 1775FSu9mqORDeUqtL7Vucy8Awf+Ln1ZvSWBqtf8KGB2rvymN1u8NhLIJI/Tfhjh 1776YCIftxO5EOiHXZ1D7V04JG50kb8PINDY2A7HqJc41OrFr6PuJ1Dd2gRRyQcc 1777TI3HKaF3CGSdf3agdQiHmspo8psmAl0fb/jyfhiH4aL7tdHtBDrfpjBwGMXh 1778YNe13oTnBEoKOxkr/obDu8umUu5XAo221aZ8m8TBvZxLqKYJFGv+Z4GxAger 1779mL+68pYJtPPz6vr4WRx8rYgqJoUkfBq25cm5eRwoB6lzhdokIfZgd+/9RRye 1780neizFeuRhA/Nj8sGlnFoST1qSzUiCV0KKmcJAoeCyAklbkoS/gdHe0d5 1781 "]]}}, {{}, {}, 1782 {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 1783 Dashing[{Small, Small}], LineBox[CompressedData[" 17841:eJwVkXk81HsfxcegmbFlbKMRMnZdWm4UM7/ffK6nuEmlevTSos0SRSKKmFBR 1785RFHhluK5skR6psXNEvf7lT3CpSxFxFguBtdO4fH8cV7nn/frnNd5HZ1TPvvd 1786qBQK5dKK/u+yl33kJCjj/B7rhjqz39jg5WDLu0OM8w/cuZYkvM+GegNtL83g 1787cf5HX8aRjfFsuNtcX2s5M87/mh9StymaDWxTs1t+I//w/6OX7rQlhA3G3SMM 1788Udskv5RCV952gg22NmdoVS9n+Zz9TnOWRmy4puRGjXVZ5m+t5pQaFKwBj5uX 1789bHgMOliYDfjmlauDzY3mNLPm1XBMUWF/TTcLdC4eXJJ4qww7/FT6X1FYoGLt 1790Ebe9iwUZFxtG6+XUoDdW+lxFsQZolj0642ikCoaTVRu1xNoQeXKkJXuDCpRE 17916FlOSXHAX6pD1d5KGT7+lRM6N6YLz7LLw0z+rQSZOWUFHlIGIHYvvS9/iAnu 1792/0pjBU4bgqsf4TzupQjPzbvNcYcxnLlfLNpDWw3CvBc2/uL1kG10vMCFLg+p 1793kzaCqs+m0KM4ohJvIAs7kU9m5D8bQPxBYX+dKgOIiWBb/vJGMPol5sf8Khp8 1794EKXVy0xtAit3z6RQZWko0lTeG7O4Gbr7BXWcYSqkWLifcp7+GcR3VA4mfqFA 1795VwLVRyRhDl1iWuWI9iJf9PueLzcYFuC3tXShK2CO3x0r+Hx52QLiTp91jxyd 17965Fvi6SZdmW0g8Uvbs8JoMT+qyeHYWklLeLrvjbybbS//cfyRnZtmLSH9RIu5 1797VmMjXyFJaPpj2QoU8134ZV/foXS/mKQ2SS5YqZxITXtRhiz3eEr8QeNC7M82 1798HQtXy5GrtO4n79VceFARlb/GuBK9vZAY0qXFBenz8Vo/BdcgDwdB7TuCC4+U 1799OF5lGo3oHWOXZ1QwF3rCyN+85VqRU59hs1voCu8bs3ZK0IrEWIqwvsaFi/Zr 1800XWvGWpF64J+K36O5ELdqnZzLxzbk07+pwOshFz5vzxh3//0zWlumTnMo5MLM 18011bPTh3d9RRdD+tPVZrmQFy/u95roQfqCp/07vnPBN9OVomvRiz4KzhgFLHOB 1802/VD4iXW5F20OHX3WTONB5XdmBKaK0Fj4zKs4dR6o7jU4ymH1IY8bq0plrHhw 1803t9F06JP9ADp016BzKYQHaYWno8wnhhH93qCWWTgPdjCDPFz5I6jgXs4J5wge 1804pMfrDY7FjCC1BDPR21gexK63+qRjLEZNSRbDgSk8ONWis1nNfRTZPbaZn0A8 1805GPK2zkdB44j31F11gErA9XO7AmS3TKKU01nVVBoByW2j7RonJxHFcDBYS5aA 1806EHZgpP/tSVSe4dnjqEwAo34xTXJoEu1+4iUs1yXAiXvWpCR9Ch1L8duZtp0A 1807TcPs6k7jGYSdX/8o+ZWA59dkFtSPziCO5pSw3Z6A2SF937zbM6g/OUCN6UhA 180837m+MuXpGeTzILA31I2A1JJDZG7lLAq7f0XgHElAc6B0LxE6j3oOoI1B0QR0 1809hbtlXC2YR9uVKaL7twlgaV/4tntiHtHvhtvVJRKwo5mz7/rpBRR/5zqLm0WA 1810hvE6XoPTd5QWHf1SvZqAo55vqsjDi0jKrtZ1Sx0B39S0RrMeLyJ3hpy6QyMB 1811QmZNb/u3RbT+ZuyVG20EmJm+4Aq9llBeRNyumcEV/hSh1RCzjCrCEvuaGSQc 1812eX3IJW+JgrNqOa1P5UnQyjZOiNSXwFFqwmoBkwQFnn/OoL0E3p1b9cxwDQkt 1813yXqO5x9L4E+tc77BRiT0bGuoNLSh4nxOhIvDTyTcvFD6B9OPih94Mx31N5Kw 1814eURXXJRCxc6SJtsatpJgn69b7blAxX1mR5Y4tiSkrDepMimWxFVBA2OzdiQM 1815Ry3Sl0YlcXb5hW91e0gIjmnq/cKRwt6HY8ovHiRBqpC+ZihWCk9HlES/dyNh 1816iPdr7pCfNG5t3BmS6knC+inq5qdCaVyo0eLt702C32J4/oRYGgtejjpoBazk 1817n2pZuOWzCkt3arP8rpNg7l7M7oii4QHDXLrtTRLq5x5+k2qh4Rq/bQsaMSv7 1818g3BGkR4dx9L3dVbcI+GY6buIhPd07HOgs/5hEglNyY6dphwG3pfiiX2SSZDk 1819/MjlChhYdcvVJ2uekFB4bDl3jpTBs1cUEkYzSWAONsq7Zcrg9pqHkWU5JJgm 18203RJVKMnix8dfe3q/IqE/0C4l8YcsDs3hH7F+QwLs6fB2DpbDJ6dr7VlFJOiX 1821B8g0S8hj/VuiDaWlJIQ8S0k2NlHAtJbzOokVK/8J3lI76hXw3+sWlc7WkGBT 1822HSCUDV+Na89GScEHEjKqKi8l6yji529UZ1T+IqGoO+vR3hhFfEcibeDvjyTI 1823yM2NNFKZ2NferP3PNhL+e+hJhd5NJj6QVPT+XgcJeAcjM2OdEjbvsSn26Cbh 1824RVjc99EmJcwybX5OiEiwTnikhrOV8fyl46lKgyQctGtvPVmggr+8G44bGCYh 1825KCdXX8VQDZfIB14tHiOhq2ffwTEXdZzqJOUfP0lC2KbtWQtfNfEAN7g4f2ql 1826r2VXo4OeLv4f9ZSGmw== 1827 "]]}}, {{}, {{}, 1828 {RGBColor[1, 0, 0], PointSize[0.019444444444444445`], AbsoluteThickness[ 1829 1.6], PointBox[CompressedData[" 18301:eJxTTMoPSmViYGBQAGIQDQEf7Cc+L0hpfCjlABVw0A8zUf70RRLK53CoObbu 1831HtcnCShfwIH/y7rgt0YwvohDytPiLZ3W4lC+hMMMy93T3h4Sg/JlHNrOTpeM 18320BGF8hUc+gpKV0UHi0D5Sg5zG65W8a8ThvJVHB7NNjO9PVkIyldzuJL6jVNj 1833pyCUr+Eg9OLAodVBML6WQ47ThL18C/mgfB0H3iIj68tNvFC+nsM33p2Nf0x5 1834oHwDNHlDh586k2qW53BC+UYOy3dfFzslwwrlGzsE9hhqs7SyQPkmDrXzLu8R 1835e8gM5Zs6MClo/eJe/ccewjdzCI8yWlek9B/KN0fjWzi8t/z1z0nvGZRvica3 1836gsUDFFg7cDOvrXo1+SNU3gaNb4vGd0DT74TKb/CG8wFgAHMw 1837 1838 "]]}, {}}, {}}, {{}, {{}, 1839 {RGBColor[0, 1840 NCache[ 1841 Rational[2, 3], 0.6666666666666666], 0], PointSize[ 1842 0.016666666666666666`], AbsoluteThickness[1.6], PointBox[CompressedData[" 18431:eJxTTMoPSmViYGCwBGIQDQEf7PfFqB6U4xZygAo4BDNYnNsoKALlczjEJD16 1844rPNCGMoXcJiq+jeSYT6ML+LgY16//bEejC/hsNTK+MTyuTDzZBwmp36YHLMc 1845xldwcNv7MsvhoiCUr+Tww/spR6MPTF7FQXb1n2sx5jB5NYf/DIH/E0r4oXwN 1846h/Aoo3VFSjC+lsPrO+ot+k0CUL6OQ+nuABuLH3xQvp6Dc8gfM1Y3GN/AIfvE 1847jn2Xd3JD+YZo5hs5HP3MHxxVyAPlGztsXJc/RS+aA8o3cbi44+qXGz9g+k0d 1848Pmy++LdWlBPKN3NQ9pp2LWoFF5RvjqbfwqFtYrZVtTw7lG8JDT9mKN/KYfnu 184962KnZFihfGuH2nmX94g9hMnboJlni6bfDk29vYNY6NbdG7OZoHwHByYFrV/c 1850q//Yg7kNDmjyjqj8BkcH49633x0P/ISoZ3ByeG/565+T3jeofieH4tXW9psW 1851MUD1O6PJO6Pax+CCZr4LVP0zqLwrKr/BFWouDLih8hvQ+e4O3Mxrq15N/gg1 1852zwNNHo3P4ImqvsETTd4LTb8Xmvu80dT7oKlH4zP4osn7wfkAHj/EUw== 1853 1854 "]]}, {}}, {}}, {{}, {{}, 1855 {RGBColor[0, 0, 1], PointSize[0.019444444444444445`], AbsoluteThickness[ 1856 1.6], PointBox[CompressedData[" 18571:eJxTTMoPSmViYGCQA2IQDQEf7M9KfXg1RUDKASrg4LT7T5d7nSSUz+HALpPy 18581LZfAsoXcIjT+volWx7GF3FYeufh5as/xKB8CYdsvd/3L52E8WUc5D18LcVW 1859iUL5Cg4HlVs0GJRgfCUHnQ9967b3C0P5Kg6R8Yc8oiJgfDUHRcf0ztJ/AlC+ 1860hkPxxvWdAVWCUL6WQ7dR6p3ZCTB5HYdrvB0ZP/14oXw9h6Of+YOjCnmgfAOH 18612de4fy4z5YbyDR0Cewy1WVpZoHwjhxNHbctLdnFA+cYO7y1//XPSY4PyTRzE 1862Qrfu3pjNBOWbOhj3vv3ueOCnPYRv5sCkoPWLe/UfKN8cFq5QYOFQvNraftMi 1863Bqi4pQM389qqV5M/QtVboZlnDbX/GZRvg2a+I5q8E9w+AP51ckg= 1864 "]]}, {}}, {}}}, 1865 AspectRatio->0.8, 1866 Axes->{True, True}, 1867 AxesLabel->{ 1868 FormBox["\"polymer size\"", TraditionalForm], 1869 FormBox["\"molecule count\"", TraditionalForm]}, 1870 AxesOrigin->{0, -1}, 1871 AxesStyle->Bold, 1872 CoordinatesToolOptions:>{"DisplayFunction" -> ({ 1873 Part[#, 1], 1874 Exp[ 1875 Part[#, 2]]}& ), "CopiedValueFunction" -> ({ 1876 Part[#, 1], 1877 Exp[ 1878 Part[#, 2]]}& )}, 1879 DisplayFunction->Identity, 1880 Frame->{{False, False}, {False, False}}, 1881 FrameLabel->{{None, None}, {None, None}}, 1882 FrameTicks->{{ 1883 Charting`ScaledTicks[{Log, Exp}], 1884 Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, 1885 GridLines->{None, None}, 1886 GridLinesStyle->Directive[ 1887 GrayLevel[0.5, 0.4]], 1888 Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, 1889 PlotRange->{{0, 40}, {-1, 7}}, 1890 PlotRangeClipping->True, 1891 PlotRangePadding->{{ 1892 Scaled[0.02], 1893 Scaled[0.02]}, { 1894 Scaled[0.05], 1895 Scaled[0.05]}}, 1896 Ticks->FrontEndValueCache[{Automatic, 1897 Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 1898 FormBox["1", TraditionalForm], {0.01, 0.}, { 1899 AbsoluteThickness[0.1]}}, {2.302585092994046, 1900 FormBox["10", TraditionalForm], {0.01, 0.}, { 1901 AbsoluteThickness[0.1]}}, {4.605170185988092, 1902 FormBox["100", TraditionalForm], {0.01, 0.}, { 1903 AbsoluteThickness[0.1]}}, {6.907755278982137, 1904 FormBox["1000", TraditionalForm], {0.01, 0.}, { 1905 AbsoluteThickness[0.1]}}, {-2.3025850929940455`, 1906 FormBox[ 1907 InterpretationBox[ 1908 StyleBox[ 1909 1910 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1911 Baseline], "CacheGraphics" -> False], 1912 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1913 AbsoluteThickness[0.1]}}, {-1.6094379124341003`, 1914 FormBox[ 1915 InterpretationBox[ 1916 StyleBox[ 1917 1918 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1919 Baseline], "CacheGraphics" -> False], 1920 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1921 AbsoluteThickness[0.1]}}, {-1.2039728043259361`, 1922 FormBox[ 1923 InterpretationBox[ 1924 StyleBox[ 1925 1926 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1927 Baseline], "CacheGraphics" -> False], 1928 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1929 AbsoluteThickness[0.1]}}, {-0.916290731874155, 1930 FormBox[ 1931 InterpretationBox[ 1932 StyleBox[ 1933 1934 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1935 Baseline], "CacheGraphics" -> False], 1936 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1937 AbsoluteThickness[0.1]}}, {-0.6931471805599453, 1938 FormBox[ 1939 InterpretationBox[ 1940 StyleBox[ 1941 1942 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1943 Baseline], "CacheGraphics" -> False], 1944 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1945 AbsoluteThickness[0.1]}}, {-0.5108256237659907, 1946 FormBox[ 1947 InterpretationBox[ 1948 StyleBox[ 1949 1950 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1951 Baseline], "CacheGraphics" -> False], 1952 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1953 AbsoluteThickness[0.1]}}, {-0.35667494393873245`, 1954 FormBox[ 1955 InterpretationBox[ 1956 StyleBox[ 1957 1958 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1959 Baseline], "CacheGraphics" -> False], 1960 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1961 AbsoluteThickness[0.1]}}, {-0.2231435513142097, 1962 FormBox[ 1963 InterpretationBox[ 1964 StyleBox[ 1965 1966 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1967 Baseline], "CacheGraphics" -> False], 1968 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1969 AbsoluteThickness[0.1]}}, {-0.10536051565782628`, 1970 FormBox[ 1971 InterpretationBox[ 1972 StyleBox[ 1973 1974 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1975 Baseline], "CacheGraphics" -> False], 1976 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1977 AbsoluteThickness[0.1]}}, {0.6931471805599453, 1978 FormBox[ 1979 InterpretationBox[ 1980 StyleBox[ 1981 1982 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1983 Baseline], "CacheGraphics" -> False], 1984 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1985 AbsoluteThickness[0.1]}}, {1.0986122886681098`, 1986 FormBox[ 1987 InterpretationBox[ 1988 StyleBox[ 1989 1990 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1991 Baseline], "CacheGraphics" -> False], 1992 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 1993 AbsoluteThickness[0.1]}}, {1.3862943611198906`, 1994 FormBox[ 1995 InterpretationBox[ 1996 StyleBox[ 1997 1998 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 1999 Baseline], "CacheGraphics" -> False], 2000 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2001 AbsoluteThickness[0.1]}}, {1.6094379124341003`, 2002 FormBox[ 2003 InterpretationBox[ 2004 StyleBox[ 2005 2006 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2007 Baseline], "CacheGraphics" -> False], 2008 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2009 AbsoluteThickness[0.1]}}, {1.791759469228055, 2010 FormBox[ 2011 InterpretationBox[ 2012 StyleBox[ 2013 2014 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2015 Baseline], "CacheGraphics" -> False], 2016 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2017 AbsoluteThickness[0.1]}}, {1.9459101490553132`, 2018 FormBox[ 2019 InterpretationBox[ 2020 StyleBox[ 2021 2022 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2023 Baseline], "CacheGraphics" -> False], 2024 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2025 AbsoluteThickness[0.1]}}, {2.0794415416798357`, 2026 FormBox[ 2027 InterpretationBox[ 2028 StyleBox[ 2029 2030 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2031 Baseline], "CacheGraphics" -> False], 2032 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2033 AbsoluteThickness[0.1]}}, {2.1972245773362196`, 2034 FormBox[ 2035 InterpretationBox[ 2036 StyleBox[ 2037 2038 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2039 Baseline], "CacheGraphics" -> False], 2040 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2041 AbsoluteThickness[0.1]}}, {2.995732273553991, 2042 FormBox[ 2043 InterpretationBox[ 2044 StyleBox[ 2045 2046 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2047 Baseline], "CacheGraphics" -> False], 2048 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2049 AbsoluteThickness[0.1]}}, {3.4011973816621555`, 2050 FormBox[ 2051 InterpretationBox[ 2052 StyleBox[ 2053 2054 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2055 Baseline], "CacheGraphics" -> False], 2056 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2057 AbsoluteThickness[0.1]}}, {3.6888794541139363`, 2058 FormBox[ 2059 InterpretationBox[ 2060 StyleBox[ 2061 2062 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2063 Baseline], "CacheGraphics" -> False], 2064 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2065 AbsoluteThickness[0.1]}}, {3.912023005428146, 2066 FormBox[ 2067 InterpretationBox[ 2068 StyleBox[ 2069 2070 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2071 Baseline], "CacheGraphics" -> False], 2072 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2073 AbsoluteThickness[0.1]}}, {4.0943445622221, 2074 FormBox[ 2075 InterpretationBox[ 2076 StyleBox[ 2077 2078 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2079 Baseline], "CacheGraphics" -> False], 2080 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2081 AbsoluteThickness[0.1]}}, {4.248495242049359, 2082 FormBox[ 2083 InterpretationBox[ 2084 StyleBox[ 2085 2086 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2087 Baseline], "CacheGraphics" -> False], 2088 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2089 AbsoluteThickness[0.1]}}, {4.382026634673881, 2090 FormBox[ 2091 InterpretationBox[ 2092 StyleBox[ 2093 2094 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2095 Baseline], "CacheGraphics" -> False], 2096 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2097 AbsoluteThickness[0.1]}}, {4.499809670330265, 2098 FormBox[ 2099 InterpretationBox[ 2100 StyleBox[ 2101 2102 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2103 Baseline], "CacheGraphics" -> False], 2104 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2105 AbsoluteThickness[0.1]}}, {5.298317366548036, 2106 FormBox[ 2107 InterpretationBox[ 2108 StyleBox[ 2109 2110 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2111 Baseline], "CacheGraphics" -> False], 2112 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2113 AbsoluteThickness[0.1]}}, {5.703782474656201, 2114 FormBox[ 2115 InterpretationBox[ 2116 StyleBox[ 2117 2118 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2119 Baseline], "CacheGraphics" -> False], 2120 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2121 AbsoluteThickness[0.1]}}, {5.991464547107982, 2122 FormBox[ 2123 InterpretationBox[ 2124 StyleBox[ 2125 2126 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2127 Baseline], "CacheGraphics" -> False], 2128 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2129 AbsoluteThickness[0.1]}}, {6.214608098422191, 2130 FormBox[ 2131 InterpretationBox[ 2132 StyleBox[ 2133 2134 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2135 Baseline], "CacheGraphics" -> False], 2136 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2137 AbsoluteThickness[0.1]}}, {6.396929655216146, 2138 FormBox[ 2139 InterpretationBox[ 2140 StyleBox[ 2141 2142 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2143 Baseline], "CacheGraphics" -> False], 2144 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2145 AbsoluteThickness[0.1]}}, {6.551080335043404, 2146 FormBox[ 2147 InterpretationBox[ 2148 StyleBox[ 2149 2150 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2151 Baseline], "CacheGraphics" -> False], 2152 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2153 AbsoluteThickness[0.1]}}, {6.684611727667927, 2154 FormBox[ 2155 InterpretationBox[ 2156 StyleBox[ 2157 2158 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2159 Baseline], "CacheGraphics" -> False], 2160 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2161 AbsoluteThickness[0.1]}}, {6.802394763324311, 2162 FormBox[ 2163 InterpretationBox[ 2164 StyleBox[ 2165 2166 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2167 Baseline], "CacheGraphics" -> False], 2168 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2169 AbsoluteThickness[0.1]}}, {7.600902459542082, 2170 FormBox[ 2171 InterpretationBox[ 2172 StyleBox[ 2173 2174 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2175 Baseline], "CacheGraphics" -> False], 2176 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2177 AbsoluteThickness[0.1]}}, {8.006367567650246, 2178 FormBox[ 2179 InterpretationBox[ 2180 StyleBox[ 2181 2182 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2183 Baseline], "CacheGraphics" -> False], 2184 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2185 AbsoluteThickness[0.1]}}, {8.294049640102028, 2186 FormBox[ 2187 InterpretationBox[ 2188 StyleBox[ 2189 2190 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2191 Baseline], "CacheGraphics" -> False], 2192 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2193 AbsoluteThickness[0.1]}}, {8.517193191416238, 2194 FormBox[ 2195 InterpretationBox[ 2196 StyleBox[ 2197 2198 GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 2199 Baseline], "CacheGraphics" -> False], 2200 Spacer[{0., 0.}]], TraditionalForm], {0.005, 0.}, { 2201 AbsoluteThickness[0.1]}}}}]]], "Output", 2202 CellChangeTimes->{{3.680977966826222*^9, 3.680977970546186*^9}, { 2203 3.680978100835853*^9, 3.680978132945045*^9}, {3.680978312075471*^9, 2204 3.680978357443789*^9}, {3.680978432939848*^9, 3.6809784434351673`*^9}, 2205 3.6809788341906652`*^9, 3.6809802079912653`*^9, 3.680982483485257*^9, 2206 3.681060113705694*^9, {3.681060162200333*^9, 3.6810601888294897`*^9}, 2207 3.681066219679742*^9, 3.681066980986158*^9, 3.681070371254506*^9, 2208 3.681072189473871*^9}] 2209}, Open ]] 2210}, 2211WindowSize->{808, 752}, 2212WindowMargins->{{Automatic, -924}, {Automatic, 46}}, 2213FrontEndVersion->"10.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (December 4, \ 22142014)", 2215StyleDefinitions->"Default.nb" 2216] 2217(* End of Notebook Content *) 2218 2219(* Internal cache information *) 2220(*CellTagsOutline 2221CellTagsIndex->{} 2222*) 2223(*CellTagsIndex 2224CellTagsIndex->{} 2225*) 2226(*NotebookFileOutline 2227Notebook[{ 2228Cell[CellGroupData[{ 2229Cell[580, 22, 317, 5, 28, "Input"], 2230Cell[900, 29, 2557, 36, 28, "Output"] 2231}, Open ]], 2232Cell[CellGroupData[{ 2233Cell[3494, 70, 3327, 46, 80, "Input"], 2234Cell[6824, 118, 5837, 82, 28, "Output"], 2235Cell[12664, 202, 5839, 82, 28, "Output"], 2236Cell[18506, 286, 5836, 82, 28, "Output"], 2237Cell[24345, 370, 5838, 82, 28, "Output"] 2238}, Open ]], 2239Cell[30198, 455, 250, 5, 28, "Input"], 2240Cell[30451, 462, 195, 4, 28, "Input"], 2241Cell[30649, 468, 1207, 20, 28, "Input"], 2242Cell[31859, 490, 344, 5, 28, "Input"], 2243Cell[CellGroupData[{ 2244Cell[32228, 499, 563, 11, 28, "Input"], 2245Cell[32794, 512, 1340, 21, 63, "Output"] 2246}, Open ]], 2247Cell[34149, 536, 241, 6, 28, "Input"], 2248Cell[34393, 544, 120, 2, 28, "Input"], 2249Cell[CellGroupData[{ 2250Cell[34538, 550, 271, 7, 28, "Input"], 2251Cell[34812, 559, 988, 16, 63, "Output"] 2252}, Open ]], 2253Cell[35815, 578, 241, 6, 28, "Input"], 2254Cell[CellGroupData[{ 2255Cell[36081, 588, 316, 8, 28, "Input"], 2256Cell[36400, 598, 1916, 27, 114, "Output"] 2257}, Open ]], 2258Cell[CellGroupData[{ 2259Cell[38353, 630, 346, 7, 28, "Input"], 2260Cell[38702, 639, 13529, 326, 242, "Output"] 2261}, Open ]], 2262Cell[CellGroupData[{ 2263Cell[52268, 970, 265, 7, 46, "Input"], 2264Cell[52536, 979, 522, 7, 28, "Output"] 2265}, Open ]], 2266Cell[CellGroupData[{ 2267Cell[53095, 991, 678, 20, 28, "Input"], 2268Cell[53776, 1013, 505, 8, 28, "Output"] 2269}, Open ]], 2270Cell[CellGroupData[{ 2271Cell[54318, 1026, 337, 10, 28, "Input"], 2272Cell[54658, 1038, 595, 12, 32, "Output"] 2273}, Open ]], 2274Cell[CellGroupData[{ 2275Cell[55290, 1055, 277, 7, 28, "Input"], 2276Cell[55570, 1064, 491, 13, 40, "Output"] 2277}, Open ]], 2278Cell[CellGroupData[{ 2279Cell[56098, 1082, 276, 7, 28, "Input"], 2280Cell[56377, 1091, 486, 13, 40, "Output"] 2281}, Open ]], 2282Cell[CellGroupData[{ 2283Cell[56900, 1109, 2618, 62, 131, "Input"], 2284Cell[59521, 1173, 20440, 465, 291, "Output"] 2285}, Open ]], 2286Cell[CellGroupData[{ 2287Cell[79998, 1643, 3016, 72, 148, "Input"], 2288Cell[83017, 1717, 21784, 490, 248, "Output"] 2289}, Open ]] 2290} 2291] 2292*) 2293 2294(* End of internal cache information *) 2295