# R script for Peak Model
#  -- generated by MACS
p <- c(0.0252807025055,0.0291012588327,0.0344391992331,0.0395874666243,0.0437602728257,0.0451963684664,0.0460634450796,0.046280214233,0.0468221371162,0.0468763294046,0.0467950409721,0.0470930985579,0.0467408486838,0.0463615026654,0.0472556754229,0.0467408486838,0.0474724445762,0.0477163098737,0.0486104826311,0.0490711170819,0.0501278667043,0.0514555777684,0.05172653921,0.0514826739125,0.05172653921,0.0517536353542,0.0514284816242,0.0510491356059,0.0497214245418,0.0487188672078,0.0475537330087,0.0475266368645,0.0468492332604,0.0484750019103,0.0489085402169,0.0494504631002,0.0481227520361,0.0480414636036,0.047770502162,0.0490711170819,0.0507781741643,0.0496672322535,0.0490711170819,0.0476892137295,0.0476892137295,0.0469847139812,0.0465511756746,0.0467679448279,0.0463344065213,0.0451150800339,0.0436789843932,0.0435435036723,0.0433809268074,0.0420532157433,0.0398313319218,0.0389371591644,0.0397771396335,0.0397229473451,0.0399126203543,0.0398313319218,0.0407796969676,0.0412403314184,0.0421886964641,0.0423783694733,0.0428390039241,0.0430015807891,0.0422428887524,0.0418635427341,0.0420532157433,0.0420261195991,0.0414300044275,0.041023562265,0.0406171201026,0.0408338892559,0.0407796969676,0.0404816393818,0.0408067931117,0.0411590429859,0.0406171201026,0.0409151776884,0.0401293895076,0.040021004931,0.0393977936152,0.040021004931,0.0416196774367,0.0429744846449,0.0439228496906,0.0447357340156,0.0448712147364,0.0442209072765,0.0448712147364,0.0452505607547,0.045629906773,0.0460905412238,0.0440583304115,0.043651888249,0.0432725422307,0.0424867540499,0.0425951386266,0.0427577154916,0.0428390039241,0.0428661000682,0.0429473885007,0.041673869725,0.0428661000682,0.0432454460865,0.0430015807891,0.0423512733291,0.0423783694733,0.0421345041758,0.0419177350225,0.0427306193474,0.0429473885007,0.0435164075282,0.0440854265556,0.0440854265556,0.045142176178,0.046280214233,0.0468221371162,0.0478788867387,0.0481769443245,0.0470118101254,0.0472556754229,0.0484750019103,0.0474724445762,0.0472285792787,0.0469034255487,0.0465511756746,0.0471201947021,0.0472014831345,0.047770502162,0.0489898286494,0.0495588476769,0.0494504631002,0.0493962708119,0.0498027129743,0.0485562903428,0.0483666173336,0.0467679448279,0.0458195797822,0.0449795993131,0.0439228496906,0.0428390039241,0.0420261195991,0.0424867540499,0.0420261195991,0.0440583304115,0.0448712147364,0.0471472908462,0.0488272517844,0.0498298091185,0.0519975006517,0.0531084425624,0.0554658071047,0.0564412682946,0.0573083449079,0.0579586523679,0.0588799212694,0.0592592672877,0.059801190171,0.0595844210177,0.0578773639354,0.057985748512,0.0568748066013,0.0569560950338,0.0572812487637,0.0569831911779,0.0571457680429,0.0568206143129,0.0562515952855,0.056332883718,0.0574709217729,0.0582025176653,0.0580941330887,0.0573896333404,0.0574980179171,0.0559535376997,0.0559806338438,0.054354865194,0.0535148847249,0.0544090574823,0.053704557734,0.0520787890842,0.0519162122192,0.0514826739125,0.0502633474251,0.050236251281,0.0494504631002,0.0501549628485,0.0521058852283,0.0521329813725,0.0524310389583,0.0528916734091,0.05172653921,0.05172653921,0.0519704045075,0.0529187695533,0.0525936158233,0.0528916734091,0.0516452507775,0.0504801165785,0.0501278667043,0.0507781741643,0.051889116075,0.0522955582375,0.0535148847249,0.0536774615899,0.0548425957889,0.0552490379514,0.0567122297363,0.0584192868186,0.0594489402969,0.0598824786035,0.0615082472534,0.06194178556,0.0635404580657,0.0673339182488,0.0691493599078,0.0702332056744,0.0690951676195,0.0686345331687,0.0693390329169,0.069013879187,0.0674693989696,0.0674152066813,0.0646513999765,0.0616166318301,0.058798632837,0.0584192868186,0.0593405557202,0.060451497631,0.0608850359376,0.0615353433976,0.0615353433976,0.0621856508575,0.0643262462465,0.064244957814,0.0666023223563,0.0668190915096,0.0667648992213,0.0672526298163,0.066873283798,0.0681468025737,0.0690951676195,0.0695558020703,0.0694745136378,0.0698267635119,0.0689325907545,0.068526148592,0.0684448601595,0.0672526298163,0.0681197064295,0.0675506874021,0.0689325907545,0.068851302322,0.0690951676195,0.0692306483403,0.0691493599078,0.0692577444844,0.0694474174936,0.0699622442327,0.0680655141412,0.0684719563037,0.0683364755829,0.0686345331687,0.0690951676195,0.0688242061778,0.0690951676195,0.0691222637636,0.0690680714753,0.0689325907545,0.0692848406286,0.0692577444844,0.0683093794387,0.0681468025737,0.0682822832945,0.0693119367728,0.0689867830428,0.0702603018185,0.0713983398734,0.0717505897476,0.0727260509375,0.0719673589009,0.0716693013151,0.0721028396217,0.0717234936034,0.0721299357659,0.0727260509375,0.0725363779283,0.0728886278025,0.0733763583974,0.0751647039123,0.0776304530313,0.0792562216811,0.0806110288894,0.0823180859717,0.0822909898276,0.0831309702967,0.0839709507658,0.0834832201708,0.0851902772532,0.0861657384431,0.0864096037406,0.0856238155598,0.0859218731456,0.0841335276308,0.0836457970358,0.08302258572,0.0855967194156,0.0878998916696,0.0880895646788,0.089769525617,0.091747544141,0.0942403894041,0.0973835421272,0.100553790994,0.102260848077,0.104238866601,0.101610540617,0.0996325220928,0.0987654454796,0.0938610433858,0.0911785251135,0.0905011215094,0.0876018340838,0.0851089888207,0.084838027379,0.0835645086033,0.083185162585,0.0840522391983,0.0845941620815,0.0861115461548,0.0863554114522,0.087141199633,0.0875747379396,0.0891734104453,0.0901217754911,0.0924520438893,0.0944300624133,0.0956222927565,0.0953513313149,0.0972480614064,0.0976274074247,0.0977086958572,0.099334464507,0.101122810022,0.102179559644,0.10312792469,0.105945923683,0.105837539107,0.10670461572,0.106623327287,0.108520057379,0.108872307253,0.107002673306,0.104699501052,0.103615655285,0.101393771464,0.0968145230997,0.0951616583057,0.093400408935,0.091259813546,0.0875476417955,0.0859218731456,0.0857051039923,0.087303776498,0.0863825075964,0.0868702381914,0.0886043914179,0.0907449868069,0.0920726978709,0.0932107359259,0.0960016387748,0.099334464507,0.100553790994,0.100635079427,0.102233751933,0.102260848077,0.102748578672,0.10312792469,0.105349808512,0.108682634244,0.10976648001,0.108574249667,0.110172922173,0.110850325777,0.11204255612,0.113857997779,0.114481209095,0.116323746898,0.114697978248,0.114508305239,0.113830901635,0.112828344301,0.110660652768,0.110362595182,0.108872307253,0.10800523064,0.107571692333,0.105783346818,0.10702976945,0.10410338588,0.104834981772,0.106813000296,0.106108500548,0.104834981772,0.104862077917,0.106298173557,0.106487846566,0.107896846063,0.108438768946,0.111283864084,0.112394805994,0.113830901635,0.116161170033,0.121634591154,0.125211282184,0.127595742871,0.12889635779,0.129167319232,0.130332453431,0.130901472459,0.133611086875,0.133069163992,0.134369778912,0.131416299198,0.129844722836,0.127649935159,0.129980203557,0.128354434907,0.12843572334,0.12811056961,0.125319666761,0.12648480096,0.128787973214,0.129492472962,0.129465376818,0.13052212644,0.128652492493,0.131091145468,0.130820184026,0.13344851001,0.133936240605,0.135020086372,0.133800759884,0.132554337253,0.135128470948,0.135751682264,0.136889720319,0.138894834987,0.140168353763,0.138027758374,0.138352912104,0.135941355273,0.135480720822,0.135345240102,0.132337568099,0.130576318729,0.130657607161,0.128273146475,0.126918339266,0.127514454438,0.127433166006,0.129058934655,0.129790530548,0.131064049324,0.132906587127,0.137377450914,0.136510374301,0.138217431383,0.139463854015,0.139924488465,0.138027758374,0.136266509003,0.134884605651,0.134071721326,0.132039510514,0.128137665754,0.12876087707,0.127080916131,0.125942878077,0.127568646726,0.129763434404,0.130765991738,0.133177548568,0.134478163488,0.137106489472,0.137594220067,0.13995158461,0.1430134489,0.147375928111,0.147023678237,0.149950061806,0.150221023248,0.15225323406,0.151575830456,0.151657118889,0.154393829449,0.153608041269,0.1548544639,0.15192808033,0.152659676223,0.151657118889,0.15582992509,0.154691887035,0.158837597092,0.158458251074,0.157320213019,0.156263463397,0.152768060799,0.151982272619,0.14984167723,0.148568158454,0.147132062813,0.148080427859,0.144557929118,0.146508851497,0.148080427859,0.152659676223,0.156344751829,0.15973176985,0.162739441852,0.164798748808,0.162360095834,0.162983307149,0.164175537493,0.165449056268,0.165747113854,0.164609075799,0.165882594575,0.166099363728,0.167725132378,0.170001208488,0.175772687195,0.175664302618,0.179105512927,0.179647435811,0.182492530948,0.182194473362,0.183467992138,0.185418914518,0.187369836897,0.188670451817,0.187017587023,0.186611144861,0.186394375708,0.185554395238,0.18211318493,0.181489973614,0.179782916531,0.178753263053,0.177208782836,0.17723587898,0.178563590044,0.18146287747,0.183982818877,0.184307972607,0.186258894987,0.187640798339,0.18810143279,0.188074336646,0.18907689398,0.186773721726,0.185473106806,0.180595800856,0.177371359701,0.177669417287,0.176206225502,0.175312052744,0.173361130364,0.171816650147,0.170245073786,0.1699470162,0.167914805387,0.169567670181,0.169079939586,0.16832124755,0.168239959117,0.170949573534,0.173171457355,0.176531379232,0.177317167412,0.177967474872,0.180243550982,0.180975146875,0.182302857939,0.182655107813,0.183305415273,0.179945493396,0.175013995158,0.171166342687,0.167914805387,0.165584536989,0.161980749815,0.1581060012,0.151386157447,0.148622350742,0.148676543031,0.146725620651,0.147050774381,0.145533390307,0.142417333729,0.138380008248,0.137106489472,0.133611086875,0.132581433397,0.128327338763,0.12193264874,0.118979169026,0.114345728374,0.111907075399,0.110010345308,0.110769037344,0.108763922676,0.110470979759,0.109983249164,0.111852883111,0.114806362825,0.115646343294,0.120604937676,0.120902995262,0.12323326366,0.122664244633,0.124154532562,0.125048705319,0.127893800456,0.12876087707,0.126999627699,0.129627953683,0.127080916131,0.127812512024,0.127514454438,0.128489915628,0.126755762401,0.125644820491,0.124425494003,0.124344205571,0.123829378832,0.122311994759,0.122691340777,0.121661687299,0.119277226612,0.117380496521,0.117434688809,0.114481209095,0.114616689816,0.113045113454,0.11431863223,0.112178036841,0.1107419412,0.108492961235,0.108276192081,0.109061980262,0.109143268695,0.111012902642,0.112286421418,0.112774152013,0.110904518065,0.110281306749,0.1107419412,0.112259325273,0.113099305743,0.112096748409,0.1107419412,0.112584479003,0.110064537596,0.109739383866,0.110579364335,0.109224557127,0.109278749415,0.106569134999,0.105485289232,0.107978134496,0.107625884621,0.107056865594,0.107382019324,0.107409115468,0.106596231143,0.108736826532,0.108357480514,0.110227114461,0.109034884118,0.106298173557,0.105756250674,0.104943366349,0.103642751429,0.104509828042,0.106569134999,0.104699501052,0.10475369334,0.104834981772,0.10637946199,0.108845211109,0.112665767436,0.113478651761,0.113966382356,0.112340613706,0.110037441452,0.111365152516,0.111283864084,0.112286421418,0.111852883111,0.11009163374,0.109712287722,0.111500633237,0.112123844553,0.115673439438,0.116079881601,0.115592151006,0.114779266681,0.114047670788,0.114210247653,0.112963825022,0.111148383363,0.110118729884,0.112205132985,0.108763922676,0.110118729884,0.109929056875,0.111852883111,0.111500633237,0.112015459976,0.112232229129,0.112882536589,0.111039998786,0.108926499541,0.108926499541,0.106298173557,0.106027212116,0.102125367356,0.100878944724,0.0990905992096,0.0996867143812,0.0989280223446,0.0989280223446,0.0996325220928,0.0991176953537,0.0985486763263,0.100174444976,0.102016982779,0.102992443969,0.105160135502,0.104645308763,0.102938251681,0.102911155537,0.100337021841,0.0987925416237,0.0983319071729,0.0965435616581,0.0953242351707,0.0925875246101,0.0921539863034,0.0904198330769,0.0899050063378,0.087791507093,0.0874934495071,0.0867618536147,0.0869515266239,0.087141199633,0.0863554114522,0.0875747379396,0.0852444695415,0.0854612386948,0.085163181109,0.0863554114522,0.0871141034888,0.0889024490037,0.0890921220129,0.0878186032371,0.087628930228,0.0875747379396,0.0874934495071,0.0893359873103,0.0889295451479,0.0890921220129,0.0882792376879,0.0880082762463,0.086978622768,0.0872495842097,0.0880353723904,0.0883334299762,0.0890921220129,0.0868431420472,0.0873308726422,0.0861657384431,0.0861386422989,0.0850818926765,0.0865179883172,0.0854341425506,0.0850547965323,0.0845941620815,0.0832935471617,0.085325757974,0.0853528541182,0.0850277003882,0.0867889497589,0.0886314875621,0.0892276027337,0.0904740253652,0.0909617559602,0.0927771976192,0.0931836397817,0.0915307749877,0.0913140058343,0.0929668706284,0.0906095060861,0.0874121610747,0.0850547965323,0.0842961044957,0.0839167584774,0.0811800479168,0.0816406823676,0.0822638936834,0.0810987594843,0.0804213558802,0.0802316828711,0.0823180859717,0.0829412972875,0.0815593939351,0.0818845476651,0.0815864900793,0.0814510093585,0.0804755481685,0.0823993744042,0.0812884324935,0.0815593939351,0.0800691060061,0.0796355676994,0.0802316828711,0.0803942597361,0.0827516242784,0.0823180859717,0.0831309702967,0.0831309702967,0.08269743199,0.0833748355941,0.0836999893241,0.0824535666926,0.0834561240266,0.0827245281342,0.0798252407086,0.0791749332486,0.0779556067612,0.0771969147246,0.0764924149764,0.0753543769215,0.0751376077681,0.0761130689581,0.0765195111205,0.0748666463265,0.0759504920931,0.076600799553,0.0763027419672,0.0757066267956,0.0774678761663,0.0789581640953,0.0792562216811,0.0796897599878,0.0780368951937,0.0771969147246,0.0786330103654,0.0789581640953,0.0795813754111,0.0797981445644,0.0800691060061,0.0789310679512,0.0784704335004,0.0792562216811,0.0792833178253,0.0811258556285,0.0811529517727,0.0805297404569,0.0799607214294,0.0808007018985,0.0784704335004,0.079066548672,0.0768988571388,0.0750834154798,0.0747582617498,0.0745143964524,0.0705312632602,0.0695016097819,0.0675235912579,0.0664126493472,0.0650578421389,0.0625379007317,0.0633778812007,0.0624566122992,0.0613185742442,0.0600179593244,0.0594760364411,0.0581212292328,0.0586902482603,0.0567664220246,0.0572270564754,0.0583379983862,0.0582025176653,0.0577960755029,0.0575251140612,0.0579586523679,0.0605327860635,0.0610747089468,0.0618604971275,0.0617521125509,0.064407534679,0.0662771686264,0.0674423028254,0.0687971100336,0.0717776858917,0.0719673589009,0.0735118391183,0.0734576468299,0.0728615316583,0.0739995697132,0.0730241085233,0.070341590251,0.0687429177453,0.0671713413838,0.0648139768415,0.0637572272191,0.0597740940269,0.0599095747477,0.0587173444045,0.0581212292328,0.0566309413038,0.0565767490155,0.0573354410521,0.057985748512,0.0579586523679,0.0582025176653,0.0587715366928,0.0582025176653,0.0579315562237,0.0576334986379,0.0576064024937,0.057823171647,0.056658037448,0.0559806338438,0.0553303263839,0.0553574225281,0.0561161145647,0.0564412682946,0.0561432107088,0.0556283839697,0.056495460583,0.0574167294846,0.0587173444045,0.058636055972,0.0580941330887,0.057823171647,0.056332883718,0.0552490379514,0.0555470955372,0.0557638646905,0.0548425957889,0.053867134599,0.0525936158233,0.0524852312466,0.0536232693015,0.0532168271391,0.0541380960407,0.0540026153198,0.0544361536265,0.0540026153198,0.0536232693015,0.0531355387066,0.0525665196791,0.05237684667,0.0512930009034,0.0516181546334,0.0505343088668,0.0505614050109,0.0501549628485,0.0516994430659,0.0528645772649,0.0531084425624,0.0550864610864,0.0557096724022,0.0567393258804,0.0579044600795,0.0584463829628,0.0595844210177,0.059801190171,0.0594218441527,0.0582838060978,0.0574438256287,0.0561974029972,0.0561432107088,0.0553845186722,0.0546258266356,0.0558722492672,0.0564412682946,0.0570644796104,0.0570644796104,0.0579586523679,0.0586631521161,0.0584463829628,0.0578773639354,0.0577960755029,0.0579044600795,0.0555470955372,0.0543819613381,0.0525665196791,0.0506968857318,0.0481498481803,0.0478788867387,0.0469847139812,0.0467950409721,0.0468221371162,0.0450879838897,0.0465511756746,0.0464427910979,0.0490169247936,0.0503175397135,0.05140138548,0.0507510780201,0.0504259242901,0.0505614050109,0.0502633474251,0.0502904435693,0.0504259242901,0.0509949433176,0.0489627325052,0.0493420785235,0.0493149823794,0.049423366956,0.0512930009034,0.0515910584892,0.0525936158233,0.0533252117157,0.0527832888324,0.0527561926883,0.0535148847249,0.0529458656974,0.0542464806173,0.0554387109606,0.0543277690498,0.053541980869,0.0521329813725,0.0516181546334,0.0508594625968,0.0502904435693,0.0497756168302,0.0481227520361,0.0469576178371,0.0449795993131,0.0452776568989,0.046117637368,0.0472285792787,0.0475266368645,0.0476892137295,0.0471201947021,0.0480143674595,0.049423366956,0.0492336939469,0.0493149823794,0.0480685597478,0.0479872713153,0.0474995407204,0.047607925297,0.0474995407204,0.0488272517844,0.0473911561437,0.0468221371162,0.0464969833863,0.0470660024137,0.048258232757,0.0474724445762,0.0473911561437,0.0464427910979,0.0465511756746,0.0460092527913,0.0462531180888,0.0458737720705,0.0459821566471,0.0457111952055,0.0449795993131,0.0454944260522,0.0452776568989,0.0459279643588,0.0469034255487,0.0466053679629,0.0460092527913,0.0464156949538,0.0472285792787,0.0478246944503,0.0478246944503,0.0467950409721,0.0460092527913,0.0458195797822,0.0448712147364,0.0441667149881,0.0446273494389,0.0439228496906,0.0424325617616,0.0417009658692,0.0415925812925,0.0428931962124,0.04216160032,0.0417822543016,0.041348715995,0.0423783694733,0.0420532157433,0.0429473885007,0.0434080229515,0.0440041381231,0.0447899263039,0.0438415612581,0.0445731571506,0.0442750995648,0.0447899263039,0.0442480034206,0.0451150800339,0.0445731571506,0.0443292918531,0.0438686574023,0.0429202923566,0.0429744846449,0.0424325617616,0.0427306193474,0.0418093504458,0.0413758121392,0.041348715995,0.041348715995,0.0425951386266,0.0434080229515,0.0436789843932,0.0431099653657,0.0445189648623,0.0459008682147,0.0468221371162,0.0470389062696,0.0469576178371,0.0476350214412,0.045955060503,0.0442480034206,0.0440312342673,0.0427577154916,0.0415383890042,0.0396145627685,0.0379887941186,0.0376094481003,0.0367152753429,0.0351978912697,0.0354959488555,0.0358481987296,0.0364443139012,0.0374197750912,0.0375010635237,0.037880409542,0.0379075056861,0.0376094481003,0.037392678947,0.0380158902628,0.037717832677,0.0376365442445,0.0374468712353,0.0368507560637,0.0373655828028,0.0382326594161,0.039045543741,0.0384223324253,0.0380429864069,0.0380158902628,0.0382868517044,0.0383139478486,0.0380971786953,0.0408067931117,0.0401293895076,0.0391268321735,0.0393977936152,0.0402648702284,0.0405629278142,0.0396416589127,0.0389100630202,0.0390997360294,0.0381513709836,0.0367152753429,0.0366881791987,0.0363630254687,0.0350353144047,0.0346017760981,0.0344662953772,0.0353604681347,0.0363359293246,0.0358752948738,0.0367965637754,0.0358752948738,0.0365256023337,0.0364172177571,0.037717832677,0.0382055632719,0.0388016784436,0.0387745822994,0.0385036208577,0.0395874666243,0.0396145627685,0.0417822543016,0.0431370615099,0.0435976959607,0.0432996383749,0.0440041381231,0.0442209072765,0.0441667149881,0.0443834841414,0.0430828692215,0.0388558707319,0.0333011611782,0.0277193554803,0.0237904145764,0.0)
m <- c(0.0175293147471,0.0205886762832,0.0225731270093,0.0255222412827,0.0278374337965,0.0271759502212,0.0269830175117,0.0267625229866,0.0271208265899,0.0264042193832,0.0264317811989,0.0261561630425,0.0278925574278,0.0285540410032,0.0293808954724,0.0303179972041,0.0318063352487,0.0327709987961,0.0324126951928,0.0329088078743,0.0333773587402,0.0335978532653,0.0329088078743,0.0324402570084,0.032853684243,0.0322473242989,0.0319717061425,0.0311172898577,0.032164638852,0.0326607515335,0.0323851333771,0.0330466169525,0.0339010332373,0.0338183477904,0.0331568642151,0.0340112804999,0.0343695841032,0.0350035058629,0.0350035058629,0.0352515622037,0.0362713493824,0.0367399002483,0.036381596645,0.0363540348293,0.0361611021198,0.0362162257511,0.0351688767568,0.0356374276227,0.0353342476506,0.0345349549971,0.0338734714217,0.0334324823715,0.0337632241591,0.0353893712819,0.0369328329578,0.0368501475108,0.0377321256113,0.0376218783488,0.0379526201364,0.0386416655274,0.0386416655274,0.0388621600526,0.0393031491028,0.0383109237398,0.0382006764772,0.0385314182649,0.0387794746056,0.0395512054436,0.039440958181,0.0396063290748,0.0388345982369,0.0389724073151,0.0399646326782,0.0407363635161,0.0409844198569,0.0414805325384,0.041893959773,0.0411497907507,0.0423073870076,0.0427483760578,0.0438508486834,0.0447052649683,0.0446225795214,0.0444847704431,0.0450084449403,0.0446225795214,0.0444020849962,0.0449257594934,0.0439335341303,0.0437681632365,0.0442091522867,0.043575230527,0.0433822978175,0.0440989050242,0.0435476687114,0.0441540286555,0.0437130396052,0.0437681632365,0.0448155122308,0.0448430740465,0.0445950177057,0.0443469613649,0.0447603885996,0.0444020849962,0.0455596812531,0.0450911303872,0.0453943103593,0.0451186922029,0.0444020849962,0.0452289394654,0.0460557939346,0.047103142929,0.0464416593536,0.0462211648285,0.0455596812531,0.0451738158342,0.0457526139626,0.0455321194375,0.0452840630967,0.0449808831247,0.044264275918,0.0436027923427,0.0422247015607,0.0423073870076,0.0429413087673,0.0440713432085,0.0440162195773,0.0458628612252,0.0474890083479,0.0487017282361,0.0501349426494,0.0506310553309,0.0525879442413,0.0528635623977,0.0510444825655,0.051237415275,0.0509342353029,0.0499971335712,0.0491151554707,0.0478748737669,0.0456423667,0.0449808831247,0.0442091522867,0.0436303541583,0.0448430740465,0.0424176342701,0.0419490834043,0.040819048963,0.0397992617843,0.0395787672592,0.0399095090469,0.0395512054436,0.0382282382928,0.0380353055834,0.0365745293544,0.0378148110582,0.0365194057232,0.0360508548573,0.035609865807,0.0351413149412,0.0347278877065,0.0352515622037,0.0357201130696,0.0359406075947,0.0362437875668,0.0363540348293,0.037373822008,0.0397165763374,0.0404056217284,0.0412875998289,0.0410119816725,0.0404331835441,0.0402126890189,0.0398543854156,0.0404331835441,0.0409017344099,0.0405985544379,0.0401024417564,0.0408741725943,0.0395787672592,0.0414529707227,0.0415907798009,0.0427208142422,0.0431066796611,0.0432996123706,0.0427483760578,0.0432169269237,0.0429964323986,0.0432169269237,0.0445950177057,0.043272050555,0.0440437813929,0.0438784104991,0.0445950177057,0.0452289394654,0.0451738158342,0.0458904230408,0.0452565012811,0.0452565012811,0.0444572086275,0.0443469613649,0.0443193995493,0.0441264668398,0.0436303541583,0.0426105669796,0.0434098596332,0.0443469613649,0.0451738158342,0.0445398940744,0.0450635685716,0.0454494339906,0.0446777031526,0.0444020849962,0.0453667485436,0.0448155122308,0.0448155122308,0.0447052649683,0.0436854777896,0.0434098596332,0.0428586233204,0.0428586233204,0.0426381287953,0.0427483760578,0.0418663979573,0.0425003197171,0.0420593306668,0.040819048963,0.0403504980971,0.0409844198569,0.0414529707227,0.0427208142422,0.0429964323986,0.0436303541583,0.0453116249124,0.0461936030128,0.0477646265043,0.0491978409176,0.0507413025935,0.0504932462527,0.0509066734873,0.0506586171465,0.051540595247,0.0509066734873,0.049473459074,0.0487568518674,0.0470480192977,0.0461936030128,0.0455045576218,0.0456423667,0.0452840630967,0.0458628612252,0.0466345920631,0.0470755811133,0.0487017282361,0.0495010208897,0.0500798190181,0.0501073808337,0.0500246953868,0.0506586171465,0.0503554371745,0.0495561445209,0.0494183354427,0.0496939535991,0.0478197501356,0.0467448393256,0.0468550865882,0.047406322901,0.0484536718953,0.0477370646887,0.0482883010015,0.049170279102,0.0492529645489,0.0510169207499,0.051540595247,0.0535250459731,0.0555370585148,0.0554819348836,0.0552614403584,0.0567222165874,0.0589547236542,0.0585964200509,0.0594783981514,0.0578798128442,0.0569427111125,0.0565017220622,0.0552338785428,0.055674867593,0.056060733012,0.0553165639897,0.0536904168669,0.0536352932357,0.0538006641295,0.0545448331518,0.0552614403584,0.0565292838779,0.0587342291291,0.0589822854699,0.0581829928163,0.059202779995,0.0596713308609,0.0609667361959,0.059202779995,0.0593957127045,0.0593405890732,0.0578522510286,0.0562261039058,0.0571907674532,0.0590925327324,0.0584861727883,0.0588720382073,0.0582381164476,0.059505959967,0.0607738034865,0.0622897033467,0.0625928833187,0.0627306923969,0.0619038379277,0.0619865233746,0.0627031305813,0.0629787487377,0.0630338723689,0.0627858160282,0.0620692088215,0.0606359944083,0.0599193872016,0.0588996000229,0.0593405890732,0.0593957127045,0.0591752181793,0.0594508363357,0.0595610835983,0.0596437690452,0.0601398817267,0.0611045452741,0.0627031305813,0.064329277704,0.0644395249666,0.0642741540728,0.0651836939889,0.0648529522012,0.0653766266984,0.0666995938491,0.0668098411116,0.0673886392401,0.0659278630112,0.0662861666145,0.0656798066704,0.0669476501898,0.0678020664747,0.0678847519216,0.0668925265586,0.0654317503296,0.0663137284301,0.0673886392401,0.069924326279,0.0689045391003,0.0694557754131,0.0684084264188,0.0684359882344,0.0702826298823,0.0714953497705,0.0724600133179,0.0715780352174,0.0712197316141,0.0709992370889,0.0712472934297,0.072680507843,0.0735073623122,0.0740034749937,0.0733144296027,0.0752437566975,0.0760706111667,0.0763462293231,0.0777794437364,0.0778345673677,0.078192870971,0.0783306800492,0.0786889836525,0.0784684891274,0.0773108928705,0.0770352747141,0.0771730837923,0.0770903983454,0.0752437566975,0.0760154875354,0.0765942856639,0.0756571839321,0.0751886330662,0.0748027676473,0.0762911056918,0.0746373967534,0.0755469366696,0.0763737911388,0.0787441072838,0.07857873639,0.0793780290435,0.0800119508033,0.0801497598815,0.0812522325071,0.0808388052725,0.082327143317,0.0815278506635,0.0805080634848,0.0788543545464,0.0780275000772,0.0786889836525,0.0782755564179,0.0789370399933,0.0777518819208,0.0778345673677,0.0772833310549,0.0774487019487,0.0770352747141,0.0768699038203,0.0762635438762,0.0754918130383,0.0749681385411,0.0764013529544,0.0775865110269,0.0797914562781,0.0833469304957,0.0841462231493,0.0860755502441,0.087233146501,0.0893554063053,0.0884734282048,0.0905956880091,0.0893278444896,0.0883356191266,0.0872607083166,0.085772370272,0.0862960447692,0.085855055719,0.0861857975066,0.0853865048531,0.0846698976464,0.0854416284844,0.0841737849649,0.0842289085962,0.083402054127,0.0805080634848,0.0791850963341,0.0781653091554,0.0785236127587,0.0787165454682,0.0810317379819,0.080260007144,0.0835123013896,0.0842564704118,0.0848903921716,0.0867370338195,0.0877568209981,0.0894932153835,0.0891349117801,0.0903476316683,0.0909264297967,0.0904027552996,0.0877843828138,0.087233146501,0.0857448084564,0.0854691903,0.0837327959147,0.0833469304957,0.083787919546,0.0822444578701,0.0808663670881,0.0823547051327,0.0850006394341,0.0877843828138,0.0894656535678,0.0906508116403,0.0932967459418,0.0947850839864,0.0980925018632,0.0998564580641,0.102778010522,0.103908044963,0.103963168595,0.103136314125,0.104927832142,0.104376595829,0.104927832142,0.104404157645,0.101785785159,0.101096739768,0.0989744799637,0.0987815472542,0.0993603453826,0.0995808399077,0.0987264236229,0.100132076221,0.100931368874,0.102585077813,0.102833134153,0.104073415857,0.105093203036,0.103908044963,0.101427481556,0.100187199852,0.100297447114,0.0991949744888,0.0974034564722,0.095115825774,0.095887556612,0.0959702420589,0.0962182983997,0.0961631747684,0.0969900292376,0.0970451528689,0.0965490401873,0.0984508054665,0.0985059290978,0.0991122890419,0.0990020417793,0.0991398508575,0.098257872757,0.0984232436509,0.100380132561,0.101537728818,0.10051794164,0.101096739768,0.103687550438,0.103880483148,0.101647976081,0.101041616137,0.102392145103,0.101510167003,0.101014054321,0.10095893069,0.101951156053,0.098643738176,0.0963009838466,0.0980373782319,0.101041616137,0.104293910382,0.103852921332,0.107380833734,0.10633348474,0.106057866583,0.106223237477,0.108896733594,0.109833835326,0.108979419041,0.109337722644,0.107270586471,0.107876946415,0.106609102896,0.108648677253,0.111267049739,0.112011218761,0.110908746136,0.111542667896,0.111708038789,0.110495318901,0.111652915158,0.11347199499,0.113058567756,0.112534893259,0.110633127979,0.111459982449,0.1136649277,0.113361747728,0.114023231303,0.114629591247,0.113113691387,0.112727825968,0.115676940242,0.117055031024,0.117881885493,0.12118930337,0.120445134347,0.122843012308,0.123945484934,0.124469159431,0.127032408285,0.127693891861,0.127280464626,0.126177992,0.126977284654,0.126315801079,0.128906611749,0.127556082782,0.130119331637,0.130422511609,0.128355375436,0.128245128173,0.127666330045,0.128272689989,0.129044420827,0.127032408285,0.124386473984,0.125130643006,0.123642304962,0.124937710297,0.12700484647,0.128245128173,0.128851488118,0.131773040575,0.132434524151,0.13262745686,0.136513672866,0.135052896637,0.135604132949,0.136734167391,0.136430987419,0.135300952977,0.133840176748,0.131800602391,0.130835938844,0.13477727848,0.132544771413,0.135466323871,0.135989998368,0.136155369262,0.141640170575,0.144782217558,0.15070800792,0.154787156635,0.158645810825,0.159252170769,0.163055701327,0.16663873736,0.16815463722,0.169394918924,0.166859231885,0.167217535489,0.165977253785,0.163193510405,0.162669835908,0.161429554204,0.160657823366,0.158397754484,0.158756058087,0.159334856216,0.163110824958,0.162504465014,0.1660048156,0.168430255377,0.170249335209,0.172095976857,0.173859933058,0.177663463616,0.180033779761,0.181742612331,0.18149455599,0.187668402694,0.186951795487,0.190479707889,0.189101617107,0.190066280654,0.190700202414,0.18990090976,0.188715751688,0.188054268113,0.186345435543,0.182734837694,0.182293848644,0.178876183504,0.181466994175,0.181990668672,0.182376534091,0.183754624873,0.186924233671,0.18731009909,0.1883850099,0.187337660906,0.186372997358,0.187861335403,0.186924233671,0.188743313504,0.18775108814,0.184195613923,0.180281836102,0.180061341577,0.178214699929,0.179317172555,0.177691025432,0.174631663896,0.175403394734,0.170800571522,0.170717886075,0.170139087946,0.172261347751,0.169808346159,0.168402693561,0.164736972081,0.165867006522,0.164351106662,0.160271957947,0.160106587053,0.155669134735,0.155751820182,0.151672671468,0.15329881859,0.151727795099,0.149715782557,0.149688220741,0.150239457054,0.149302355323,0.147097410071,0.147455713675,0.143624621301,0.14230165415,0.13844299996,0.139958899821,0.142218968703,0.13951791077,0.140675507027,0.141171619709,0.144230981245,0.147014724624,0.151038749708,0.153684684009,0.155972314707,0.156854292808,0.15696454007,0.155283269316,0.152499525937,0.152168784149,0.149164546244,0.146435926496,0.143982924904,0.139738405295,0.136458549234,0.133950424011,0.131855726022,0.130587882503,0.129044420827,0.128300251805,0.127142655548,0.12852074633,0.128300251805,0.130891062475,0.132544771413,0.132324276888,0.132489647782,0.134832402111,0.137423212782,0.137588583675,0.138773741748,0.135135582083,0.135604132949,0.133288940436,0.133399187698,0.134308727614,0.134556783955,0.134997773005,0.133096007726,0.133399187698,0.136100245631,0.138553247223,0.137946887279,0.141336990603,0.141419676049,0.141915788731,0.141557485128,0.13951791077,0.14015183253,0.139407663508,0.135245829346,0.134611907586,0.133509434961,0.129568095324,0.128107319095,0.124744777587,0.123532057699,0.122594955967,0.122843012308,0.122650079599,0.121685416051,0.118984358118,0.117992132755,0.118350436359,0.11796457094,0.120031707113,0.119700965325,0.119673403509,0.118350436359,0.11903948175,0.118956796303,0.121685416051,0.122650079599,0.124000608565,0.123035945017,0.121657854235,0.121492483342,0.122815450492,0.12270520323,0.122402023258,0.123559619515,0.123228877727,0.122346899626,0.122650079599,0.125323575716,0.125792126581,0.126949722838,0.125847250213,0.128134880911,0.125351137531,0.125599193872,0.123752552224,0.12333912499,0.121244427001,0.11884654904,0.118543369068,0.117496020074,0.117551143705,0.1145469058,0.11581474932,0.115924996582,0.115924996582,0.11688966013,0.117633829152,0.118267750912,0.11821262728,0.118626054515,0.117606267336,0.118984358118,0.119204852644,0.118322874543,0.11669672742,0.116476232895,0.113416871359,0.111156802477,0.109337722644,0.108676239069,0.108455744544,0.10765645189,0.105286135745,0.104459281276,0.105864933874,0.103632426807,0.104321472198,0.10525857393,0.105038079404,0.103659988622,0.10335680865,0.102860695969,0.102612639628,0.102529954181,0.101592852449,0.103604864991,0.103880483148,0.104679775801,0.105313697561,0.106829597421,0.107491080996,0.107821822784,0.110385071639,0.109861397142,0.110770937058,0.109778711695,0.109475531723,0.108869171778,0.1078493846,0.10614055203,0.106443732002,0.104955393958,0.103770235885,0.10184090879,0.0988642327011,0.0983129963883,0.0986712999916,0.0973207710253,0.0969900292376,0.0968246583437,0.096576602003,0.0985886145447,0.0961631747684,0.0982027491257,0.10051794164,0.100049390774,0.100021828958,0.101262110662,0.101206987031,0.10095893069,0.0995532780921,0.0967970965281,0.0974310182878,0.0967970965281,0.0965214783717,0.0947575221707,0.0911744861375,0.0885009900204,0.0861306738754,0.0854967521156,0.0848628303559,0.086461415663,0.0874260792105,0.0893554063053,0.0900168898806,0.0940133531484,0.0986712999916,0.102998505047,0.105782248427,0.108069879125,0.110660689795,0.111570229711,0.114574467616,0.114987894851,0.116558918342,0.115346198454,0.115676940242,0.112782949599,0.113251500465,0.112645140521,0.108841609963,0.106361046555,0.101675537896,0.0969349056063,0.0927730714446,0.0905956880091,0.0875638882887,0.0874812028417,0.0857172466408,0.0854691903,0.085772370272,0.0843391558588,0.0856069993782,0.0865992247412,0.0874260792105,0.0880875627858,0.0870677756071,0.084091099518,0.0842564704118,0.0817207833729,0.0826578851047,0.0827681323673,0.0811144234289,0.0817483451886,0.0802875689597,0.07857873639,0.0785236127587,0.0803151307753,0.0795985235687,0.0795985235687,0.0795985235687,0.0805631871161,0.0800946362502,0.0783582418649,0.078192870971,0.0792126581497,0.0790748490715,0.0778070055521,0.0776691964739,0.0768699038203,0.0751886330662,0.074058598625,0.074058598625,0.0749681385411,0.0759328020885,0.075822554826,0.0764564765857,0.0776416346582,0.0766494092952,0.0774487019487,0.0767045329264,0.0762911056918,0.075822554826,0.0756020603008,0.0750232621724,0.0748027676473,0.0748027676473,0.0746373967534,0.0754642512226,0.075436689407,0.0754642512226,0.0740034749937,0.0761808584293,0.074747644016,0.0746925203847,0.0744995876752,0.0732317441558,0.0728458787368,0.0713575406923,0.070916551642,0.0734522386809,0.0757123075634,0.074058598625,0.076125734798,0.0760154875354,0.0763737911388,0.0791299727028,0.0781101855241,0.0797638944625,0.0792953435966,0.077200645608,0.076511600217,0.0747200822004,0.0721843951615,0.0705031244074,0.0691801572567,0.066093233905,0.0652112558045,0.064411963151,0.0641639068102,0.0635024232348,0.0641363449946,0.0649080758325,0.0673610774244,0.0676642573965,0.0690974718098,0.0714953497705,0.0735624859435,0.073755418653,0.0756847457478,0.0760430493511,0.074444464044,0.0742790931501,0.073066373262,0.0738381040999,0.0751886330662,0.0731766205245,0.0721843951615,0.0718536533738,0.0731490587089,0.073672733206,0.0745822731222,0.0760154875354,0.0750232621724,0.0738932277312,0.0723497660553,0.0723497660553,0.0721017097145,0.070916551642,0.0686840445752,0.0697038317539,0.0694282135975,0.071605597033,0.0721843951615,0.0740861604406,0.0748027676473,0.0765942856639,0.0771730837923,0.0774487019487,0.0761808584293,0.0739483513624,0.0723497660553,0.0697589553851,0.0696762699382,0.0678296282903,0.0656246830391,0.0632268050784,0.0620140851903,0.0618211524808,0.0610218598272,0.0605257471457,0.0611321070898,0.0592303418106,0.0567222165874,0.0564741602466,0.0555094966992,0.0540762822859,0.0534974841575,0.0528635623977,0.0524225733475,0.0519540224816,0.0514027861688,0.0519540224816,0.0527257533195,0.051926460666,0.0511271680124,0.0516232806939,0.0514854716157,0.0517610897721,0.0519540224816,0.0525879442413,0.0532494278167,0.0526981915039,0.0531943041854,0.0541038441016,0.0547377658613,0.0549306985708,0.0537179786826,0.0537179786826,0.0549582603864,0.0556197439618,0.0548480131238,0.05468264223,0.0545448331518,0.0548480131238,0.0553992494366,0.0565017220622,0.057824689213,0.0584861727883,0.0572183292689,0.0568875874812,0.0567222165874,0.0558402384869,0.0545172713362,0.0533872368949,0.0530564951072,0.0523950115319,0.0523950115319,0.0505759316996,0.0510169207499,0.0509066734873,0.0516232806939,0.0533596750793,0.0547928894926,0.0555094966992,0.0550960694646,0.0548204513082,0.0548204513082,0.0555370585148,0.0551511930959,0.0541314059172,0.0534699223418,0.0525603824257,0.051237415275,0.0500246953868,0.0490600318394,0.0476819410574,0.0476543792418,0.0475716937948,0.0474338847166,0.0477370646887,0.0479851210294,0.047406322901,0.0485363573422,0.0490600318394,0.0499695717555,0.0507137407778,0.0499695717555,0.0502727517276,0.0503278753589,0.0509066734873,0.0505759316996,0.0503554371745,0.0504381226214,0.0518162134034,0.0534147987105,0.0543243386267,0.055371687621,0.05575755304,0.0566670929561,0.0567222165874,0.0567773402186,0.0568324638499,0.0568600256656,0.0550960694646,0.0531391805541,0.0522572024537,0.051540595247,0.0515130334314,0.0495837063366,0.0497766390461,0.0508791116717,0.0519540224816,0.0513201007219,0.0506861789622,0.0507413025935,0.0502727517276,0.0502451899119,0.048784413683,0.0507964262247,0.050162504465,0.049170279102,0.0488119754986,0.0500798190181,0.0513476625375,0.051540595247,0.052229640638,0.0544897095205,0.0555370585148,0.0544621477049,0.0545172713362,0.0534147987105,0.0530013714759,0.0512098534593,0.0504932462527,0.0500246953868,0.049859324493,0.0487568518674,0.0489222227612,0.0498868863086,0.0497766390461,0.0525603824257,0.0531116187385,0.0555646203305,0.0552890021741,0.0558126766712,0.056749778403,0.0555370585148,0.0544345858892,0.0533596750793,0.0519815842973,0.0491978409176,0.0489497845768,0.0474614465323,0.0479575592138,0.0480126828451,0.047020457482,0.0468275247726,0.0477646265043,0.0478473119512,0.0487017282361,0.0488670991299,0.04779218832,0.0469653338508,0.0469653338508,0.0460557939346,0.0456423667,0.0453943103593,0.0446225795214,0.0442091522867,0.0395236436279,0.0352240003881,0.0313653461985,0.027038141143,0.0)
ycorr <- c(-0.000159834269868,-0.000160153112343,-0.000161109945163,-0.000162672894133,-0.000164845639254,-0.000167624733106,-0.000171015603451,-0.000174545974331,-0.000178195570467,-0.000181945759802,-0.000185775080969,-0.000189640349384,-0.000193520645897,-0.000197396401299,-0.000201265637448,-0.000205099930003,-0.000208885243397,-0.000212605490917,-0.000216264614785,-0.000219877159937,-0.00022345702162,-0.000227014392483,-0.000230566826254,-0.000234121702476,-0.000237688633709,-0.000241278675851,-0.000244911287461,-0.00024858840928,-0.000252315511971,-0.000256094845319,-0.000259925832415,-0.000263818124991,-0.000267766647485,-0.000271774288744,-0.000275836157461,-0.000279944525918,-0.00028408506633,-0.0002882486449,-0.000292423804763,-0.000296602261173,-0.000300764018544,-0.000304892907105,-0.000308974649339,-0.000313014379703,-0.000317008434817,-0.000320968212738,-0.000324907648583,-0.000328829563981,-0.000332746201372,-0.000336662352221,-0.000340585560835,-0.000344528053893,-0.00034850930682,-0.000352524486004,-0.000356563792705,-0.000360602989414,-0.000364622291449,-0.000368614014334,-0.000372569899912,-0.000376484588301,-0.000380345485345,-0.000384144721281,-0.00038786304409,-0.000391477736792,-0.000394984366924,-0.000398392267983,-0.000401724433832,-0.000404986490717,-0.000408168783345,-0.00041126981923,-0.000414292429594,-0.000417246710988,-0.000420136328808,-0.000422970887027,-0.000425750647797,-0.000428471637752,-0.000431112681963,-0.000433666491743,-0.000436131585333,-0.000438502502909,-0.000440801719317,-0.000443021809365,-0.000445171474645,-0.000447252041557,-0.000449272731469,-0.000451243835449,-0.000453179229515,-0.000455094805322,-0.000457004981188,-0.000458929167972,-0.000460860199378,-0.000462799596399,-0.000464738959821,-0.000466690889905,-0.000468666430617,-0.000470676553114,-0.000472730714694,-0.00047482172729,-0.000476944158946,-0.000479076428856,-0.000481197058986,-0.000483307572047,-0.000485394945448,-0.000487452197562,-0.000489460051122,-0.000491397720103,-0.000493232636337,-0.000494958873228,-0.000496577199245,-0.000498097775838,-0.000499533828862,-0.000500890566985,-0.000502184709315,-0.000503410313927,-0.00050458804185,-0.000505725507443,-0.000506848278075,-0.000507972194736,-0.000509107536209,-0.000510250874681,-0.000511404750957,-0.000512572026073,-0.000513755128448,-0.00051495814985,-0.000516169168829,-0.000517381386234,-0.00051857762415,-0.000519749265339,-0.000520886796543,-0.00052198543985,-0.000523045750774,-0.000524057440882,-0.000525015840664,-0.000525933613509,-0.000526812869799,-0.000527672687684,-0.000528536070705,-0.000529416300173,-0.00053031758947,-0.000531255346427,-0.000532227877622,-0.000533244449977,-0.000534320039097,-0.000535442959691,-0.000536612847413,-0.000537822338444,-0.000539055139821,-0.000540287320354,-0.000541511831948,-0.000542715173215,-0.000543894570058,-0.000545058470528,-0.000546195150302,-0.000547293354774,-0.00054834763304,-0.000549346656585,-0.000550290882439,-0.000551202053417,-0.000552089494827,-0.000552960925247,-0.000553819175308,-0.000554651009798,-0.000555450115726,-0.000556228765611,-0.000557003291174,-0.000557790221066,-0.000558593200498,-0.000559400646935,-0.000560205721104,-0.00056100545995,-0.000561813085307,-0.000562625137849,-0.000563452515904,-0.000564288106361,-0.000565118326192,-0.000565923282127,-0.000566708721433,-0.000567477668895,-0.000568238375507,-0.00056898627684,-0.00056970064582,-0.000570373233537,-0.000570996647646,-0.000571575375714,-0.000572104914981,-0.000572593707723,-0.000573036768426,-0.000573423766511,-0.000573744663842,-0.000574002000365,-0.000574206843772,-0.000574367753766,-0.000574481754635,-0.000574556924809,-0.000574593781655,-0.000574602988611,-0.000574589311925,-0.000574566407326,-0.000574539446725,-0.000574517647662,-0.000574496804658,-0.000574485429616,-0.000574495957951,-0.000574530678387,-0.000574592342219,-0.000574676611867,-0.000574769086084,-0.00057485280292,-0.000574921375367,-0.000574969188041,-0.000574991318657,-0.000574983381643,-0.000574925613022,-0.000574805477996,-0.000574616206978,-0.000574350932832,-0.000574011938572,-0.000573621787555,-0.000573185099089,-0.000572700166593,-0.000572171661002,-0.000571599537972,-0.000570987237476,-0.000570336497505,-0.000569649274068,-0.000568931785233,-0.000568186507186,-0.000567406103137,-0.000566585702177,-0.000565736600629,-0.000564865425945,-0.00056397065286,-0.000563060932937,-0.000562147068537,-0.000561243065509,-0.000560354214804,-0.000559481504454,-0.000558638862006,-0.000557831629568,-0.000557054114721,-0.000556303568396,-0.000555579075272,-0.00055488163904,-0.000554194906983,-0.000553508442656,-0.000552813824531,-0.000552116847988,-0.000551405462644,-0.000550672623566,-0.00054991620545,-0.00054913759229,-0.00054833797641,-0.00054750910283,-0.000546657683078,-0.000545791469338,-0.000544912546757,-0.000544016058521,-0.0005430952479,-0.000542149609802,-0.000541173520624,-0.000540156095833,-0.000539088415104,-0.000537966104543,-0.000536795322765,-0.000535564074132,-0.00053426705704,-0.000532894101523,-0.000531445299045,-0.000529920941336,-0.000528333507171,-0.000526698336398,-0.000525041869489,-0.000523379342687,-0.000521721275517,-0.0005200868783,-0.000518494707628,-0.000516969932123,-0.000515540138797,-0.000514209159319,-0.000512975910336,-0.000511829007351,-0.000510749696913,-0.000509725233877,-0.000508748214831,-0.000507803216356,-0.000506867505056,-0.000505919371294,-0.000504923332784,-0.000503868922151,-0.00050275581394,-0.000501583314998,-0.000500353855589,-0.000499065413044,-0.000497701440086,-0.000496256426362,-0.000494729387196,-0.00049312666078,-0.000491459954008,-0.000489738684365,-0.000487961540595,-0.000486122203722,-0.000484214370934,-0.000482243148273,-0.00048021498384,-0.000478142142692,-0.000476031043673,-0.000473878714046,-0.000471678073847,-0.000469434059728,-0.000467145499106,-0.00046482393158,-0.000462479552783,-0.000460123974042,-0.000457763869564,-0.000455395333345,-0.000453018694766,-0.000450635751292,-0.000448254811152,-0.000445872678109,-0.000443476769258,-0.000441069336703,-0.000438635992502,-0.000436164837052,-0.000433648553701,-0.000431078162453,-0.000428460728657,-0.000425794554929,-0.000423077156633,-0.00042031197656,-0.000417510779517,-0.000414671804399,-0.00041179892725,-0.00040889926673,-0.000405983863529,-0.000403069840072,-0.000400161550604,-0.000397263652643,-0.000394379233049,-0.000391504517953,-0.000388635357527,-0.000385767422622,-0.000382906019669,-0.000380047174606,-0.000377185699509,-0.000374311302157,-0.000371413436248,-0.00036848980768,-0.000365539636939,-0.000362568589824,-0.000359583006559,-0.000356584481692,-0.00035357057885,-0.000350545864979,-0.000347504403658,-0.000344449402548,-0.000341385458596,-0.000338310379684,-0.000335224099753,-0.000332113079729,-0.000328970228927,-0.000325799350076,-0.000322602523076,-0.000319383387006,-0.000316147608671,-0.000312904089051,-0.000309650386994,-0.000306391106827,-0.000303124366836,-0.000299865271104,-0.000296632429834,-0.000293426595205,-0.000290243252149,-0.000287073410175,-0.000283911473248,-0.000280742442067,-0.000277567480556,-0.000274383997105,-0.00027118806749,-0.000267980187721,-0.000264736613634,-0.000261445529345,-0.000258113659702,-0.000254744311382,-0.000251351910583,-0.000247941316036,-0.000244516875027,-0.000241082169165,-0.000237642165147,-0.000234192765999,-0.000230743768877,-0.000227301885086,-0.000223865097168,-0.000220423038336,-0.00021696852547,-0.00021350057187,-0.000210034665697,-0.000206572914426,-0.000203111792397,-0.000199648832387,-0.000196190602237,-0.000192730265102,-0.00018927229123,-0.000185832225094,-0.000182408652794,-0.000179000727701,-0.000175593265737,-0.000172165938402,-0.000168716899779,-0.000165250956274,-0.000161766623412,-0.000158277199159,-0.000154784373159,-0.000151297274048,-0.000147812425097,-0.00014434585339,-0.000140903842034,-0.000137502379923,-0.000134153315218,-0.00013085338175,-0.000127594217926,-0.000124363343589,-0.000121142545724,-0.000117921325373,-0.000114689629382,-0.000111429947768,-0.000108123791365,-0.000104766412221,-0.00010134786377,-9.78679547909e-05,-9.43303121527e-05,-9.07421743302e-05,-8.71222101191e-05,-8.34733565803e-05,-7.97996562318e-05,-7.61099103296e-05,-7.24187509859e-05,-6.87325206674e-05,-6.50584992241e-05,-6.13947607226e-05,-5.77415451871e-05,-5.41001708472e-05,-5.04677114636e-05,-4.68372651649e-05,-4.3212184746e-05,-3.95947112218e-05,-3.59738311289e-05,-3.23496191268e-05,-2.87190146004e-05,-2.50800504589e-05,-2.14300098411e-05,-1.77664187709e-05,-1.40881098474e-05,-1.03930273931e-05,-6.6849308632e-06,-2.96117813539e-06,7.75427649018e-07,4.52474305407e-06,8.29337110519e-06,1.20743192284e-05,1.58620792171e-05,1.96490276448e-05,2.34403194116e-05,2.72336339513e-05,3.1027126786e-05,3.48262193396e-05,3.86312042717e-05,4.24417686305e-05,4.62551301022e-05,5.00675864936e-05,5.38842578988e-05,5.77125115405e-05,6.15504768195e-05,6.54003299855e-05,6.9269440737e-05,7.31530474669e-05,7.70460853122e-05,8.09483729877e-05,8.48563222273e-05,8.878130504e-05,9.27246982543e-05,9.66840654776e-05,0.000100657346384,0.000104644707906,0.00010863304718,0.000112617036138,0.000116604059062,0.000120598960133,0.000124603479751,0.00012861370613,0.000132619116663,0.000136619028766,0.000140617414459,0.000144613073849,0.000148615727412,0.000152632892985,0.000156664533013,0.000160707735499,0.000164755026843,0.000168802551324,0.000172857497111,0.000176921055353,0.000180985020537,0.000185049538125,0.000189113280246,0.000193175120352,0.00019723367447,0.000201286970973,0.000205342033769,0.000209401909269,0.000213468744572,0.000217541759278,0.000221626220971,0.000225728082088,0.000229838675884,0.000233952107918,0.000238054349942,0.000242142486446,0.000246208180024,0.000250245133015,0.000254252016421,0.000258227368183,0.000262169745783,0.00026607246182,0.000269934926726,0.000273765637069,0.00027757714418,0.000281376792044,0.000285174346724,0.000288975543255,0.000292780767491,0.000296587204866,0.000300390114944,0.00030418758532,0.000307982008664,0.000311775152903,0.00031556210165,0.000319339200491,0.000323101566213,0.00032684545814,0.000330569705053,0.000334274440677,0.000337962104573,0.000341634784353,0.000345292042562,0.000348926760448,0.00035253017449,0.000356097977709,0.000359619498565,0.000363100834566,0.000366536723686,0.000369925513724,0.000373265510353,0.000376552721014,0.000379789018622,0.000382977570105,0.000386133208658,0.00038926317942,0.000392376746078,0.0003954784727,0.000398566932172,0.000401649634219,0.000404729339987,0.000407814087823,0.000410909044229,0.000414020034127,0.000417144200979,0.000420274336909,0.000423414818099,0.00042657065089,0.000429748774716,0.00043295881189,0.00043620574722,0.000439491429234,0.000442810480566,0.00044616430399,0.000449550589776,0.000452972719027,0.000456429957473,0.000459909391396,0.000463403367457,0.000466902401308,0.000470395825345,0.000473874947116,0.000477340237278,0.000480780994322,0.00048419995069,0.000487592896496,0.000490958892546,0.00049429845801,0.000497622451322,0.00050094329195,0.000504291175062,0.000507685540765,0.000511144933824,0.000514768076681,0.000518104685298,0.000521232617688,0.000524161881814,0.000526913943818,0.000529507908819,0.000531959661242,0.000534260370388,0.000536395216761,0.000538355655468,0.000540126349755,0.000541617160333,0.000543291440906,0.000545081830362,0.000546981874324,0.000548967543111,0.000551019134762,0.00055311869073,0.000555260318316,0.000557433639997,0.000559626075062,0.000561830617632,0.000564034955684,0.000566230164029,0.000568403605994,0.000570559325517,0.0005727023035,0.000574834869653,0.000576957431608,0.000579073070243,0.000581186408185,0.000583303624081,0.000585432587096,0.00058758031935,0.000589743372442,0.000591922149582,0.000594111071562,0.000596308337248,0.000598504974047,0.000600700180574,0.00060288839448,0.000605064713836,0.000607224837211,0.000609362192717,0.000611478492227,0.000613570773806,0.000615638798275,0.000617677923324,0.000619694737037,0.000621696904107,0.000623687748197,0.000625669357617,0.000627641285041,0.00062960640134,0.000631568165911,0.000633526422384,0.000635490054905,0.000637461331252,0.000639441281191,0.000641414489288,0.000643376581227,0.00064532647601,0.000647263172238,0.000649188313343,0.000651094447651,0.000652974011808,0.000654821320004,0.000656634693786,0.000658412310697,0.000660165456705,0.000661907134685,0.00066363496899,0.000665351785745,0.000667065297781,0.000668784385309,0.000670517537323,0.000672265144143,0.000674026223352,0.000675796218194,0.000677566259371,0.000679319140631,0.000681049208796,0.000682750813611,0.000684404730138,0.000685989846168,0.000687495400127,0.000688914110165,0.000690243982416,0.000691486215789,0.000692639074484,0.000693708075319,0.000694695414457,0.000695603304942,0.00069643782057,0.000697211436375,0.000697933893114,0.000698605668369,0.000699230867642,0.000699808494274,0.000700343568783,0.000700832338718,0.000701275096013,0.000701667572206,0.000702007476602,0.000702290159266,0.000702517240848,0.00070268802248,0.000702795321981,0.000702834984227,0.000702804829011,0.000702707450016,0.000702551308576,0.000702343597303,0.000702093218893,0.000701804195819,0.000701478554848,0.000701115372809,0.00070072626748,0.000700324743721,0.000699914452826,0.000699497414563,0.000699062554025,0.000698608343284,0.000698119018855,0.000697593920466,0.00069702820728,0.000696418053725,0.000695750920491,0.000695011264452,0.000694188354423,0.00069327765006,0.000692284316226,0.000691203096623,0.000690034682314,0.000688781686244,0.000687438664329,0.000686013917822,0.000684519295625,0.000682971016406,0.000681382226348,0.000679762678822,0.000678120719518,0.000676465486978,0.00067481955128,0.000673199096104,0.000671628784957,0.000670115403629,0.000668659201834,0.000667259954154,0.000665917072509,0.000664632878018,0.000663401109069,0.00066221510157,0.000661053337114,0.000659895587439,0.000658714245168,0.000657490745522,0.000656211838269,0.000654864624292,0.000653436321413,0.000651917023233,0.00065030006594,0.000648586187606,0.000646785166113,0.000644906807775,0.000642955507317,0.000640944450741,0.000638885945137,0.000636802776297,0.000634710840942,0.00063262323392,0.000630547132868,0.000628485760223,0.000626435709983,0.00062439494285,0.000622368517799,0.000620359056466,0.000618357131645,0.000616342100606,0.000614301856872,0.000612217799521,0.000610085397675,0.000607904507817,0.000605677843133,0.000603408948875,0.000601101939996,0.000598756666294,0.000596381747835,0.000593992032376,0.00059160045384,0.000589225777283,0.000586878477181,0.000584566722172,0.000582289737776,0.000580045397834,0.000577831893613,0.000575635597663,0.000573459025049,0.000571287822587,0.000569114151597,0.000566920124866,0.000564687763438,0.000562404812515,0.000560068218018,0.000557677338908,0.00055522771183,0.000552733874567,0.000550199831233,0.000547632599302,0.000545042176777,0.000542441404124,0.000539847968427,0.000537270052301,0.000534714719473,0.000532177896336,0.000529658754155,0.000527154425643,0.000524654543401,0.000522153948833,0.000519641458868,0.000517106332386,0.000514539201393,0.000511930745797,0.000509278975551,0.000506588954787,0.000503864538295,0.000501108562328,0.000498321375387,0.000495499598245,0.000492648398726,0.000489767648711,0.000486859085965,0.000483918847997,0.000480946834065,0.000477937450761,0.000474884932138,0.000471785404649,0.000468639339064,0.000465460200093,0.000462246605671,0.000459006055076,0.000455741059013,0.000452466763956,0.000449188616643,0.000445914280392,0.000442648045142,0.000439391391,0.000436147798908,0.000432907191665,0.000429666144137,0.000426426612149,0.000423188403632,0.000419950651819,0.000416708628462,0.000413465408337,0.000410224850296,0.000406992672325,0.000403777748948,0.000400587557954,0.000397430744519,0.000394300998295,0.000391199238866,0.000388122786969,0.000385068605291,0.000382024696346,0.0003789791755,0.000375918458698,0.000372826660963,0.000369692650279,0.000366501059411,0.000363247120987,0.000359926704294,0.00035653224969,0.000353060719715,0.000349513453391,0.000345901489508,0.00034223843384,0.000338531734247,0.000334787667297,0.000331019964779,0.000327245126129,0.000323476956715,0.000319729004643,0.000316012759202,0.000312333458243,0.000308697268644,0.000305103763638,0.000301554322809,0.000298059473788,0.000294621202899,0.000291233123933,0.0002878801495,0.000284567142264,0.000281289505216,0.000278055281451,0.00027486658948,0.000271728040982,0.000268642088549,0.000265607113936,0.00026261636675,0.000259675924837,0.000256790877989,0.000253957238765,0.000251166461874,0.000248406738152,0.000245660648701,0.000242914538341,0.000240160175864,0.000237386414239,0.000234583551063,0.000231745550312,0.000228863010213,0.000225922958339,0.000222931394659,0.000219884193276,0.000216791050494,0.000213657312412,0.000210480644751,0.000207252720038,0.000203985940617,0.000200678320603,0.000197338066694,0.000193963658088,0.000190560289037,0.00018712788839,0.000183663657909,0.000180153950312,0.000176608012057,0.000173036888832,0.000169445646527,0.000165834558468,0.000162204212222,0.000158562628144,0.000154911668916,0.000151250828495,0.000147587945465,0.000143937852357,0.00014030459888,0.000136687602578,0.000133083046512,0.000129489664416,0.000125906076244,0.000122344408146,0.000118793191648,0.000115257978377,0.000111735593683,0.00010821969701,0.00010470530213,0.000101204113686,9.77192306039e-05,9.42581384826e-05,9.08250556583e-05,8.7408392608e-05,8.40044322229e-05,8.06291561572e-05,7.72876350909e-05,7.39917210164e-05,7.07397105694e-05,6.75181298655e-05,6.43167123396e-05,6.11245194478e-05,5.79303097915e-05,5.47239044441e-05,5.151002979e-05,4.82725816401e-05,4.49842494046e-05,4.1626930025e-05,3.81947418682e-05,3.46874019211e-05,3.11148711916e-05,2.74862561259e-05,2.38127634202e-05,2.01140739605e-05,1.6406551002e-05,1.26975092709e-05,9.00999194548e-06,5.36031324769e-06,1.76007107995e-06,-1.78623147497e-06,-5.27627338192e-06,-8.71870554005e-06,-1.21178430314e-05,-1.54910264874e-05,-1.88518308906e-05,-2.22155520526e-05,-2.55841451988e-05,-2.89568097785e-05,-3.23367404729e-05,-3.57120112089e-05,-3.9083212232e-05,-4.2431035074e-05,-4.57398991619e-05,-4.89954183774e-05,-5.21800444767e-05,-5.52745955829e-05,-5.82670963516e-05,-6.11646202424e-05,-6.39782449005e-05,-6.67152234439e-05,-6.93890808817e-05,-7.2019605881e-05,-7.46366389414e-05,-7.725296698e-05,-7.98961058367e-05,-8.25871940416e-05,-8.53507777873e-05,-8.81861240889e-05,-9.10835703185e-05,-9.40463017119e-05,-9.70752536186e-05,-0.000100157686303,-0.000103275296781,-0.000106415936329,-0.00010957125514,-0.000112724906894,-0.000115857497862,-0.000118965662411,-0.000122057269891,-0.000125129170451,-0.000128165519166,-0.000131159247693,-0.000134105765363,-0.000137001821954,-0.000139839432113,-0.00014261625624,-0.000145335322559,-0.000148000062414,-0.000150602480298,-0.000153137500486,-0.00015562264603,-0.000158067899157,-0.000160483113358,-0.000162885630479,-0.000165286720258,-0.000167693550422,-0.000170110338715,-0.000172533273095,-0.000174958254938,-0.000177390737431,-0.000179824911173,-0.000182255023647,-0.000184686285123,-0.000187113346649,-0.000189536312091,-0.000191948088706,-0.000194353783767,-0.000196764271913,-0.000199189871182,-0.000201640074775,-0.000204115434813,-0.00020663009675,-0.000209170907925,-0.000211738354491,-0.000214328174178,-0.000216939323716,-0.000219571951692,-0.000222216074178,-0.00022486804877,-0.000227520620824,-0.000230176075515,-0.000232831813649,-0.000235483005296,-0.000238136205974,-0.000240782480723,-0.000243418983882,-0.000246047937999,-0.000248675370047,-0.000251294297447,-0.000253894385898,-0.000256459014583,-0.000258974403934,-0.000261447426547,-0.000263870855038,-0.000266252861163,-0.000268595157322,-0.000270899155367,-0.000273150831744,-0.000275347687608,-0.000277507806254,-0.000279641634624,-0.000281768085342,-0.000283895845669,-0.000286020715937,-0.000288135394728,-0.000290246194638,-0.000292348046347,-0.000294451059459,-0.000296560141906,-0.000298661163345,-0.000300746348102,-0.000302811303977,-0.000304847401904,-0.00030684582821,-0.000308805449069,-0.000310732072256,-0.000312617028327,-0.000314451025779,-0.000316238046409,-0.000317990493026,-0.000319721334132,-0.000321430279771,-0.000323121715396,-0.000324807087644,-0.00032650059383,-0.000328197140281,-0.000329899537349,-0.000331613589996,-0.000333351096952,-0.000335101963939,-0.000336856529154,-0.000338607004002,-0.000340350817002,-0.000342084951749,-0.000343800928553,-0.000345504453038,-0.000347197040771,-0.000348880192077,-0.000350551470938,-0.00035220989348,-0.000353864191833,-0.000355526409572,-0.000357202934616,-0.000358893382137,-0.000360593832909,-0.000362298547065,-0.00036399876018,-0.000365695214327,-0.00036738052171,-0.00036904576415,-0.000370690032707,-0.000372289620601,-0.000373835787985,-0.000375335328221,-0.000376785922165,-0.000378189879377,-0.000379545772697,-0.000380851020079,-0.000382102513073,-0.00038330728032,-0.000384466650729,-0.000385595071878,-0.000386698405583,-0.000387766615927,-0.000388795396499,-0.000389786267811,-0.00039074674687,-0.000391688736201,-0.000392605847987,-0.000393510482449,-0.000394396361989,-0.000395261354619,-0.000396102615435,-0.000396931251399,-0.000397759387623,-0.000398587519701,-0.00039941196931,-0.000400219243272,-0.000401012741859,-0.000401807672575,-0.000402605449753,-0.000403416553036,-0.000404245685327,-0.000405087267691,-0.000405937506186,-0.00040678953576,-0.000407652860165,-0.000408536350168,-0.000409439646664,-0.000410335741521,-0.000411207484183,-0.000412027780245,-0.000412776602483,-0.000413431418939,-0.000413982820593,-0.000414414599643,-0.000414717751117,-0.000414872677106,-0.00041487973739,-0.000414753828833,-0.000414513382134,-0.00041417945395,-0.000413770990609,-0.000413322022557,-0.000412843185441,-0.000412357761419,-0.000411882751344,-0.000411435218612,-0.000411029404478,-0.000410662305835,-0.000410326449115,-0.000410022200935,-0.000409749130399,-0.000409498419073,-0.000409271866338,-0.000409078350288,-0.000408908951542,-0.000408770715735,-0.000408662242719,-0.000408582716937,-0.000408534192402,-0.000408526229829,-0.000408540669467,-0.0004085458386,-0.000408560866488,-0.000408565961208,-0.000408570179849)
xcorr <- c(-600.0,-598.999165972,-597.998331943,-596.997497915,-595.996663887,-594.995829858,-593.99499583,-592.994161802,-591.993327773,-590.992493745,-589.991659716,-588.990825688,-587.98999166,-586.989157631,-585.988323603,-584.987489575,-583.986655546,-582.985821518,-581.98498749,-580.984153461,-579.983319433,-578.982485405,-577.981651376,-576.980817348,-575.979983319,-574.979149291,-573.978315263,-572.977481234,-571.976647206,-570.975813178,-569.974979149,-568.974145121,-567.973311093,-566.972477064,-565.971643036,-564.970809008,-563.969974979,-562.969140951,-561.968306922,-560.967472894,-559.966638866,-558.965804837,-557.964970809,-556.964136781,-555.963302752,-554.962468724,-553.961634696,-552.960800667,-551.959966639,-550.959132611,-549.958298582,-548.957464554,-547.956630525,-546.955796497,-545.954962469,-544.95412844,-543.953294412,-542.952460384,-541.951626355,-540.950792327,-539.949958299,-538.94912427,-537.948290242,-536.947456214,-535.946622185,-534.945788157,-533.944954128,-532.9441201,-531.943286072,-530.942452043,-529.941618015,-528.940783987,-527.939949958,-526.93911593,-525.938281902,-524.937447873,-523.936613845,-522.935779817,-521.934945788,-520.93411176,-519.933277731,-518.932443703,-517.931609675,-516.930775646,-515.929941618,-514.92910759,-513.928273561,-512.927439533,-511.926605505,-510.925771476,-509.924937448,-508.92410342,-507.923269391,-506.922435363,-505.921601334,-504.920767306,-503.919933278,-502.919099249,-501.918265221,-500.917431193,-499.916597164,-498.915763136,-497.914929108,-496.914095079,-495.913261051,-494.912427023,-493.911592994,-492.910758966,-491.909924937,-490.909090909,-489.908256881,-488.907422852,-487.906588824,-486.905754796,-485.904920767,-484.904086739,-483.903252711,-482.902418682,-481.901584654,-480.900750626,-479.899916597,-478.899082569,-477.89824854,-476.897414512,-475.896580484,-474.895746455,-473.894912427,-472.894078399,-471.89324437,-470.892410342,-469.891576314,-468.890742285,-467.889908257,-466.889074229,-465.8882402,-464.887406172,-463.886572143,-462.885738115,-461.884904087,-460.884070058,-459.88323603,-458.882402002,-457.881567973,-456.880733945,-455.879899917,-454.879065888,-453.87823186,-452.877397832,-451.876563803,-450.875729775,-449.874895746,-448.874061718,-447.87322769,-446.872393661,-445.871559633,-444.870725605,-443.869891576,-442.869057548,-441.86822352,-440.867389491,-439.866555463,-438.865721435,-437.864887406,-436.864053378,-435.863219349,-434.862385321,-433.861551293,-432.860717264,-431.859883236,-430.859049208,-429.858215179,-428.857381151,-427.856547123,-426.855713094,-425.854879066,-424.854045038,-423.853211009,-422.852376981,-421.851542952,-420.850708924,-419.849874896,-418.849040867,-417.848206839,-416.847372811,-415.846538782,-414.845704754,-413.844870726,-412.844036697,-411.843202669,-410.842368641,-409.841534612,-408.840700584,-407.839866555,-406.839032527,-405.838198499,-404.83736447,-403.836530442,-402.835696414,-401.834862385,-400.834028357,-399.833194329,-398.8323603,-397.831526272,-396.830692244,-395.829858215,-394.829024187,-393.828190158,-392.82735613,-391.826522102,-390.825688073,-389.824854045,-388.824020017,-387.823185988,-386.82235196,-385.821517932,-384.820683903,-383.819849875,-382.819015847,-381.818181818,-380.81734779,-379.816513761,-378.815679733,-377.814845705,-376.814011676,-375.813177648,-374.81234362,-373.811509591,-372.810675563,-371.809841535,-370.809007506,-369.808173478,-368.80733945,-367.806505421,-366.805671393,-365.804837364,-364.804003336,-363.803169308,-362.802335279,-361.801501251,-360.800667223,-359.799833194,-358.798999166,-357.798165138,-356.797331109,-355.796497081,-354.795663053,-353.794829024,-352.793994996,-351.793160967,-350.792326939,-349.791492911,-348.790658882,-347.789824854,-346.788990826,-345.788156797,-344.787322769,-343.786488741,-342.785654712,-341.784820684,-340.783986656,-339.783152627,-338.782318599,-337.78148457,-336.780650542,-335.779816514,-334.778982485,-333.778148457,-332.777314429,-331.7764804,-330.775646372,-329.774812344,-328.773978315,-327.773144287,-326.772310259,-325.77147623,-324.770642202,-323.769808173,-322.768974145,-321.768140117,-320.767306088,-319.76647206,-318.765638032,-317.764804003,-316.763969975,-315.763135947,-314.762301918,-313.76146789,-312.760633862,-311.759799833,-310.758965805,-309.758131776,-308.757297748,-307.75646372,-306.755629691,-305.754795663,-304.753961635,-303.753127606,-302.752293578,-301.75145955,-300.750625521,-299.749791493,-298.748957465,-297.748123436,-296.747289408,-295.746455379,-294.745621351,-293.744787323,-292.743953294,-291.743119266,-290.742285238,-289.741451209,-288.740617181,-287.739783153,-286.738949124,-285.738115096,-284.737281068,-283.736447039,-282.735613011,-281.734778982,-280.733944954,-279.733110926,-278.732276897,-277.731442869,-276.730608841,-275.729774812,-274.728940784,-273.728106756,-272.727272727,-271.726438699,-270.725604671,-269.724770642,-268.723936614,-267.723102585,-266.722268557,-265.721434529,-264.7206005,-263.719766472,-262.718932444,-261.718098415,-260.717264387,-259.716430359,-258.71559633,-257.714762302,-256.713928274,-255.713094245,-254.712260217,-253.711426188,-252.71059216,-251.709758132,-250.708924103,-249.708090075,-248.707256047,-247.706422018,-246.70558799,-245.704753962,-244.703919933,-243.703085905,-242.702251877,-241.701417848,-240.70058382,-239.699749791,-238.698915763,-237.698081735,-236.697247706,-235.696413678,-234.69557965,-233.694745621,-232.693911593,-231.693077565,-230.692243536,-229.691409508,-228.69057548,-227.689741451,-226.688907423,-225.688073394,-224.687239366,-223.686405338,-222.685571309,-221.684737281,-220.683903253,-219.683069224,-218.682235196,-217.681401168,-216.680567139,-215.679733111,-214.678899083,-213.678065054,-212.677231026,-211.676396997,-210.675562969,-209.674728941,-208.673894912,-207.673060884,-206.672226856,-205.671392827,-204.670558799,-203.669724771,-202.668890742,-201.668056714,-200.667222686,-199.666388657,-198.665554629,-197.664720601,-196.663886572,-195.663052544,-194.662218515,-193.661384487,-192.660550459,-191.65971643,-190.658882402,-189.658048374,-188.657214345,-187.656380317,-186.655546289,-185.65471226,-184.653878232,-183.653044204,-182.652210175,-181.651376147,-180.650542118,-179.64970809,-178.648874062,-177.648040033,-176.647206005,-175.646371977,-174.645537948,-173.64470392,-172.643869892,-171.643035863,-170.642201835,-169.641367807,-168.640533778,-167.63969975,-166.638865721,-165.638031693,-164.637197665,-163.636363636,-162.635529608,-161.63469558,-160.633861551,-159.633027523,-158.632193495,-157.631359466,-156.630525438,-155.62969141,-154.628857381,-153.628023353,-152.627189324,-151.626355296,-150.625521268,-149.624687239,-148.623853211,-147.623019183,-146.622185154,-145.621351126,-144.620517098,-143.619683069,-142.618849041,-141.618015013,-140.617180984,-139.616346956,-138.615512927,-137.614678899,-136.613844871,-135.613010842,-134.612176814,-133.611342786,-132.610508757,-131.609674729,-130.608840701,-129.608006672,-128.607172644,-127.606338616,-126.605504587,-125.604670559,-124.60383653,-123.603002502,-122.602168474,-121.601334445,-120.600500417,-119.599666389,-118.59883236,-117.597998332,-116.597164304,-115.596330275,-114.595496247,-113.594662219,-112.59382819,-111.592994162,-110.592160133,-109.591326105,-108.590492077,-107.589658048,-106.58882402,-105.587989992,-104.587155963,-103.586321935,-102.585487907,-101.584653878,-100.58381985,-99.5829858215,-98.5821517932,-97.5813177648,-96.5804837364,-95.5796497081,-94.5788156797,-93.5779816514,-92.577147623,-91.5763135947,-90.5754795663,-89.5746455379,-88.5738115096,-87.5729774812,-86.5721434529,-85.5713094245,-84.5704753962,-83.5696413678,-82.5688073394,-81.5679733111,-80.5671392827,-79.5663052544,-78.565471226,-77.5646371977,-76.5638031693,-75.562969141,-74.5621351126,-73.5613010842,-72.5604670559,-71.5596330275,-70.5587989992,-69.5579649708,-68.5571309425,-67.5562969141,-66.5554628857,-65.5546288574,-64.553794829,-63.5529608007,-62.5521267723,-61.551292744,-60.5504587156,-59.5496246872,-58.5487906589,-57.5479566305,-56.5471226022,-55.5462885738,-54.5454545455,-53.5446205171,-52.5437864887,-51.5429524604,-50.542118432,-49.5412844037,-48.5404503753,-47.539616347,-46.5387823186,-45.5379482902,-44.5371142619,-43.5362802335,-42.5354462052,-41.5346121768,-40.5337781485,-39.5329441201,-38.5321100917,-37.5312760634,-36.530442035,-35.5296080067,-34.5287739783,-33.52793995,-32.5271059216,-31.5262718932,-30.5254378649,-29.5246038365,-28.5237698082,-27.5229357798,-26.5221017515,-25.5212677231,-24.5204336947,-23.5195996664,-22.518765638,-21.5179316097,-20.5170975813,-19.516263553,-18.5154295246,-17.5145954962,-16.5137614679,-15.5129274395,-14.5120934112,-13.5112593828,-12.5104253545,-11.5095913261,-10.5087572977,-9.50792326939,-8.50708924103,-7.50625521268,-6.50542118432,-5.50458715596,-4.50375312761,-3.50291909925,-2.50208507089,-1.50125104254,-0.500417014179,0.500417014178,1.50125104254,2.50208507089,3.50291909925,4.50375312761,5.50458715596,6.50542118432,7.50625521268,8.50708924103,9.50792326939,10.5087572977,11.5095913261,12.5104253545,13.5112593828,14.5120934112,15.5129274395,16.5137614679,17.5145954962,18.5154295246,19.516263553,20.5170975813,21.5179316097,22.518765638,23.5195996664,24.5204336947,25.5212677231,26.5221017515,27.5229357798,28.5237698082,29.5246038365,30.5254378649,31.5262718932,32.5271059216,33.52793995,34.5287739783,35.5296080067,36.530442035,37.5312760634,38.5321100917,39.5329441201,40.5337781485,41.5346121768,42.5354462052,43.5362802335,44.5371142619,45.5379482902,46.5387823186,47.539616347,48.5404503753,49.5412844037,50.542118432,51.5429524604,52.5437864887,53.5446205171,54.5454545455,55.5462885738,56.5471226022,57.5479566305,58.5487906589,59.5496246872,60.5504587156,61.551292744,62.5521267723,63.5529608007,64.553794829,65.5546288574,66.5554628857,67.5562969141,68.5571309425,69.5579649708,70.5587989992,71.5596330275,72.5604670559,73.5613010842,74.5621351126,75.562969141,76.5638031693,77.5646371977,78.565471226,79.5663052544,80.5671392827,81.5679733111,82.5688073394,83.5696413678,84.5704753962,85.5713094245,86.5721434529,87.5729774812,88.5738115096,89.5746455379,90.5754795663,91.5763135947,92.577147623,93.5779816514,94.5788156797,95.5796497081,96.5804837364,97.5813177648,98.5821517932,99.5829858215,100.58381985,101.584653878,102.585487907,103.586321935,104.587155963,105.587989992,106.58882402,107.589658048,108.590492077,109.591326105,110.592160133,111.592994162,112.59382819,113.594662219,114.595496247,115.596330275,116.597164304,117.597998332,118.59883236,119.599666389,120.600500417,121.601334445,122.602168474,123.603002502,124.60383653,125.604670559,126.605504587,127.606338616,128.607172644,129.608006672,130.608840701,131.609674729,132.610508757,133.611342786,134.612176814,135.613010842,136.613844871,137.614678899,138.615512927,139.616346956,140.617180984,141.618015013,142.618849041,143.619683069,144.620517098,145.621351126,146.622185154,147.623019183,148.623853211,149.624687239,150.625521268,151.626355296,152.627189324,153.628023353,154.628857381,155.62969141,156.630525438,157.631359466,158.632193495,159.633027523,160.633861551,161.63469558,162.635529608,163.636363636,164.637197665,165.638031693,166.638865721,167.63969975,168.640533778,169.641367807,170.642201835,171.643035863,172.643869892,173.64470392,174.645537948,175.646371977,176.647206005,177.648040033,178.648874062,179.64970809,180.650542118,181.651376147,182.652210175,183.653044204,184.653878232,185.65471226,186.655546289,187.656380317,188.657214345,189.658048374,190.658882402,191.65971643,192.660550459,193.661384487,194.662218515,195.663052544,196.663886572,197.664720601,198.665554629,199.666388657,200.667222686,201.668056714,202.668890742,203.669724771,204.670558799,205.671392827,206.672226856,207.673060884,208.673894912,209.674728941,210.675562969,211.676396997,212.677231026,213.678065054,214.678899083,215.679733111,216.680567139,217.681401168,218.682235196,219.683069224,220.683903253,221.684737281,222.685571309,223.686405338,224.687239366,225.688073394,226.688907423,227.689741451,228.69057548,229.691409508,230.692243536,231.693077565,232.693911593,233.694745621,234.69557965,235.696413678,236.697247706,237.698081735,238.698915763,239.699749791,240.70058382,241.701417848,242.702251877,243.703085905,244.703919933,245.704753962,246.70558799,247.706422018,248.707256047,249.708090075,250.708924103,251.709758132,252.71059216,253.711426188,254.712260217,255.713094245,256.713928274,257.714762302,258.71559633,259.716430359,260.717264387,261.718098415,262.718932444,263.719766472,264.7206005,265.721434529,266.722268557,267.723102585,268.723936614,269.724770642,270.725604671,271.726438699,272.727272727,273.728106756,274.728940784,275.729774812,276.730608841,277.731442869,278.732276897,279.733110926,280.733944954,281.734778982,282.735613011,283.736447039,284.737281068,285.738115096,286.738949124,287.739783153,288.740617181,289.741451209,290.742285238,291.743119266,292.743953294,293.744787323,294.745621351,295.746455379,296.747289408,297.748123436,298.748957465,299.749791493,300.750625521,301.75145955,302.752293578,303.753127606,304.753961635,305.754795663,306.755629691,307.75646372,308.757297748,309.758131776,310.758965805,311.759799833,312.760633862,313.76146789,314.762301918,315.763135947,316.763969975,317.764804003,318.765638032,319.76647206,320.767306088,321.768140117,322.768974145,323.769808173,324.770642202,325.77147623,326.772310259,327.773144287,328.773978315,329.774812344,330.775646372,331.7764804,332.777314429,333.778148457,334.778982485,335.779816514,336.780650542,337.78148457,338.782318599,339.783152627,340.783986656,341.784820684,342.785654712,343.786488741,344.787322769,345.788156797,346.788990826,347.789824854,348.790658882,349.791492911,350.792326939,351.793160967,352.793994996,353.794829024,354.795663053,355.796497081,356.797331109,357.798165138,358.798999166,359.799833194,360.800667223,361.801501251,362.802335279,363.803169308,364.804003336,365.804837364,366.805671393,367.806505421,368.80733945,369.808173478,370.809007506,371.809841535,372.810675563,373.811509591,374.81234362,375.813177648,376.814011676,377.814845705,378.815679733,379.816513761,380.81734779,381.818181818,382.819015847,383.819849875,384.820683903,385.821517932,386.82235196,387.823185988,388.824020017,389.824854045,390.825688073,391.826522102,392.82735613,393.828190158,394.829024187,395.829858215,396.830692244,397.831526272,398.8323603,399.833194329,400.834028357,401.834862385,402.835696414,403.836530442,404.83736447,405.838198499,406.839032527,407.839866555,408.840700584,409.841534612,410.842368641,411.843202669,412.844036697,413.844870726,414.845704754,415.846538782,416.847372811,417.848206839,418.849040867,419.849874896,420.850708924,421.851542952,422.852376981,423.853211009,424.854045038,425.854879066,426.855713094,427.856547123,428.857381151,429.858215179,430.859049208,431.859883236,432.860717264,433.861551293,434.862385321,435.863219349,436.864053378,437.864887406,438.865721435,439.866555463,440.867389491,441.86822352,442.869057548,443.869891576,444.870725605,445.871559633,446.872393661,447.87322769,448.874061718,449.874895746,450.875729775,451.876563803,452.877397832,453.87823186,454.879065888,455.879899917,456.880733945,457.881567973,458.882402002,459.88323603,460.884070058,461.884904087,462.885738115,463.886572143,464.887406172,465.8882402,466.889074229,467.889908257,468.890742285,469.891576314,470.892410342,471.89324437,472.894078399,473.894912427,474.895746455,475.896580484,476.897414512,477.89824854,478.899082569,479.899916597,480.900750626,481.901584654,482.902418682,483.903252711,484.904086739,485.904920767,486.905754796,487.906588824,488.907422852,489.908256881,490.909090909,491.909924937,492.910758966,493.911592994,494.912427023,495.913261051,496.914095079,497.914929108,498.915763136,499.916597164,500.917431193,501.918265221,502.919099249,503.919933278,504.920767306,505.921601334,506.922435363,507.923269391,508.92410342,509.924937448,510.925771476,511.926605505,512.927439533,513.928273561,514.92910759,515.929941618,516.930775646,517.931609675,518.932443703,519.933277731,520.93411176,521.934945788,522.935779817,523.936613845,524.937447873,525.938281902,526.93911593,527.939949958,528.940783987,529.941618015,530.942452043,531.943286072,532.9441201,533.944954128,534.945788157,535.946622185,536.947456214,537.948290242,538.94912427,539.949958299,540.950792327,541.951626355,542.952460384,543.953294412,544.95412844,545.954962469,546.955796497,547.956630525,548.957464554,549.958298582,550.959132611,551.959966639,552.960800667,553.961634696,554.962468724,555.963302752,556.964136781,557.964970809,558.965804837,559.966638866,560.967472894,561.968306922,562.969140951,563.969974979,564.970809008,565.971643036,566.972477064,567.973311093,568.974145121,569.974979149,570.975813178,571.976647206,572.977481234,573.978315263,574.979149291,575.979983319,576.980817348,577.981651376,578.982485405,579.983319433,580.984153461,581.98498749,582.985821518,583.986655546,584.987489575,585.988323603,586.989157631,587.98999166,588.990825688,589.991659716,590.992493745,591.993327773,592.994161802,593.99499583,594.995829858,595.996663887,596.997497915,597.998331943,598.999165972,600.0)
altd  <- c(102, 594)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('WT_G2_ORC_rep1-2-GSM424494/GSM424494.36mers.unique.MACS2.1.0_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 102,594',bty='n')
dev.off()