# R script for Peak Model
#  -- generated by MACS
p <- c(0.0417756626011,0.0487280698563,0.055677011881,0.062555494221,0.0695448639337,0.0696499759224,0.0695621900857,0.0694478374825,0.0696719223816,0.0694212707162,0.0694097199482,0.0692745759626,0.0691301913627,0.0691994959707,0.0689754110716,0.0690631969084,0.0692942122682,0.0693785328746,0.0690735925996,0.0691648436667,0.0691105550571,0.0693103833434,0.0694443722521,0.0694975057849,0.0698232374423,0.0695298479353,0.0693565864154,0.0693600516458,0.0694201156394,0.0694016344106,0.069312693497,0.0692919021146,0.0693912387194,0.0694016344106,0.0691694639739,0.0694559230201,0.0693981691802,0.0694097199482,0.0695471740873,0.0697724140632,0.0700403918806,0.0699964989622,0.0699202638935,0.0698105315975,0.0697897402151,0.0695460190105,0.0696268743864,0.0695945322361,0.0695656553161,0.069347345801,0.0693900836426,0.0694570780969,0.0694732491721,0.0693681371834,0.0694212707162,0.0695286928585,0.0695159870137,0.0692699556554,0.0692711107322,0.0692122018155,0.06893267323,0.0685953908046,0.0684602468191,0.0687686523245,0.0688702990829,0.0688853150813,0.0689603950732,0.0691867901259,0.0688980209261,0.0689777212252,0.069053956294,0.0691983408939,0.0692641802714,0.0691902553563,0.0691232609019,0.0691659987435,0.0690216141436,0.0690320098348,0.0692641802714,0.0689996676844,0.0690747476764,0.0691590682827,0.0690412504492,0.0688298713949,0.0688414221629,0.0688183206269,0.0688079249357,0.0687097434078,0.0686542997214,0.0688968658493,0.0688090800125,0.0689037963101,0.0689915821468,0.0690008227612,0.0688587483149,0.0689765661484,0.0690666621388,0.0690042879916,0.068926897846,0.0688425772397,0.0689026412333,0.0687963741677,0.0690285446044,0.0691775495115,0.0691775495115,0.0690643519852,0.0691313464395,0.0691613784363,0.0694478374825,0.0695529494713,0.0695829814681,0.0695413987033,0.0694720940953,0.0693485008778,0.0694917304009,0.0694778694793,0.0693115384202,0.0694189605626,0.0692468541195,0.0692607150411,0.0692052713547,0.0693600516458,0.0694755593257,0.0695852916217,0.069606083004,0.0695356233193,0.0696719223816,0.0698151519047,0.0699399001991,0.0698382534407,0.0698856115895,0.0699583814278,0.0698925420503,0.0698775260519,0.0698925420503,0.0700761992614,0.0701235574101,0.0699999641926,0.0698532694391,0.0701420386389,0.0701639850981,0.070389225074,0.0704643050659,0.0707276625762,0.0705601764403,0.0706179302803,0.0706086896659,0.0707496090354,0.0709217154785,0.0709205604017,0.071004881008,0.0706491173538,0.070429652762,0.0702252041685,0.0705139733683,0.0705867432067,0.0706375665858,0.0706918551954,0.0705416952115,0.0705197487523,0.0706849247346,0.0708974588657,0.0709413517841,0.0710776508464,0.0710880465376,0.0711019074592,0.0710730305392,0.0711053726896,0.0714784624958,0.0715951252525,0.0715073394157,0.0717233387772,0.0720548458186,0.0721033590442,0.0723193584057,0.0723147380985,0.072461432852,0.0725665448407,0.0724464168536,0.0724741386968,0.0725030156168,0.0725884912999,0.0725734753015,0.0725954217607,0.0725711651479,0.0725388229975,0.0727167048246,0.0727629078966,0.073065538018,0.0730643829412,0.0734155262882,0.0731972167731,0.0734062856738,0.073457109053,0.0735980284225,0.073802477016,0.0737343274848,0.0737493434832,0.0736084241137,0.0737990117856,0.0735864776545,0.0736800388753,0.0736349908801,0.0738221133216,0.0737874610176,0.0738348191664,0.0739399311551,0.0742494917373,0.0744135126428,0.0743580689565,0.0745059187868,0.0747473298378,0.0748940245914,0.0750349439609,0.0751747082536,0.0754784934518,0.0756679260469,0.0754403759174,0.0757071986581,0.0756690811237,0.0757811235732,0.0759012515604,0.0760410158531,0.0760814435411,0.0762523949074,0.076185400453,0.0761761598386,0.0764522231936,0.0764314318113,0.0770274514397,0.0771163923533,0.0771568200412,0.0770863603565,0.0772665523372,0.0773439424827,0.0774132470907,0.0773855252475,0.0774190224747,0.077589973841,0.0773959209387,0.0775021880042,0.0776673639865,0.077889138732,0.0778232993544,0.0778302298152,0.0778960691928,0.0783015011494,0.0785244309716,0.0784909337444,0.0787947189427,0.079000322613,0.078959894925,0.0789587398482,0.0791135201393,0.0791909102848,0.0793560862671,0.0796021176254,0.079639080083,0.0799162985148,0.0798319779085,0.0798446837533,0.0800964904955,0.0802789926298,0.0802824578602,0.0805920184424,0.0807479538103,0.0807675901159,0.0810517390085,0.0810297925494,0.0812180700677,0.0814456201971,0.081647758637,0.0819168915312,0.0823893179422,0.0825106010061,0.0825452533101,0.0827369960588,0.0826931031404,0.0828305572795,0.0829229634235,0.0832244384681,0.0833618926072,0.0835617208935,0.0833653578376,0.0833722882984,0.0836136993494,0.0837222765686,0.0838886076277,0.0839890993092,0.0842085639011,0.0841739115971,0.0841947029795,0.0841923928259,0.084451130029,0.0846232364721,0.0849039201343,0.0850471496574,0.0853786566988,0.0859792966345,0.0864008996662,0.0869853685267,0.0876483826095,0.0883044662315,0.0892215972102,0.0904517540014,0.0914716868152,0.0925043254738,0.0935554453612,0.09432819174,0.0951702427267,0.0959603152574,0.0967018745626,0.0974388135606,0.0979528227363,0.0982184904001,0.0986805211198,0.0988907450973,0.0991148299964,0.0993238988971,0.0993366047418,0.0996323044025,0.0997755339256,0.099773223772,0.100100110506,0.100418911703,0.100505542463,0.100545970151,0.101012621178,0.101160471008,0.101746094945,0.101821174937,0.102131890596,0.102227761971,0.102448381639,0.102330563806,0.102262414275,0.102757942221,0.102550028398,0.102693257921,0.102841107751,0.10300397358,0.103069812957,0.103476399991,0.103685468891,0.103834473798,0.104290729134,0.104390065739,0.104618770945,0.105048459515,0.105043839207,0.105165122271,0.105386897017,0.105419239167,0.105400757938,0.105857013274,0.10599908772,0.105962125263,0.106189675392,0.106216242159,0.106444947365,0.106754507947,0.106986678384,0.107221158974,0.10747527587,0.107360923267,0.107527254326,0.10805974473,0.108294225321,0.108566823445,0.10874932558,0.108881004335,0.108966480018,0.109323398749,0.109313003058,0.10971265963,0.109843183308,0.109706884246,0.109780809161,0.109801600544,0.109848958692,0.110007204214,0.110216273115,0.110373363559,0.110742988135,0.110965917957,0.111312440997,0.111658964037,0.112041294458,0.112265379357,0.112436330723,0.112622298088,0.112996542971,0.113416990926,0.113533653682,0.113578701678,0.113659557053,0.113726551508,0.11389172749,0.114350292979,0.114723382786,0.114976344605,0.115114953821,0.115023702753,0.115384086715,0.115761796828,0.116131421404,0.116580746279,0.116726285956,0.116599227508,0.116898392399,0.117162904986,0.117411246498,0.117380059424,0.11757295725,0.117705791081,0.117512893256,0.117546390483,0.117701170774,0.117956442747,0.118059244582,0.118104292577,0.118084656272,0.118589424833,0.118283329481,0.118456591001,0.118810044502,0.119071091858,0.119428010589,0.119401443823,0.119424545359,0.119573550266,0.119836907776,0.119877335464,0.120237719426,0.120544969854,0.12056807139,0.120771364907,0.120652391997,0.121168711326,0.121485202369,0.121450550065,0.121303855311,0.121400881763,0.121601865126,0.121504838674,0.121687340809,0.121875618327,0.122204815215,0.12213782076,0.121999211545,0.122177093372,0.122294911205,0.122374611504,0.122369991197,0.122492429338,0.122529391795,0.122525926565,0.122428900114,0.122713049007,0.122853968376,0.12297871667,0.123158908651,0.1232062668,0.123443057544,0.123322929557,0.123478864925,0.123275571408,0.123413025547,0.123370287705,0.123291742483,0.123115015733,0.123008748667,0.12326402064,0.123197026185,0.123400319702,0.123396854472,0.123504276614,0.123141582499,0.123022609589,0.123214352337,0.123439592313,0.123403784933,0.123294052637,0.123699484593,0.123809216889,0.123809216889,0.123752618126,0.124080659937,0.123901623033,0.123875056267,0.123898157803,0.124213493769,0.124089900551,0.123590907374,0.123366822475,0.123117325886,0.12309075912,0.12286320899,0.123080363429,0.122974096363,0.123034160357,0.122762717309,0.122695722855,0.122755786848,0.122643744399,0.122460087188,0.122285670591,0.122149371528,0.122006142005,0.121890634325,0.12155681713,0.121532560518,0.121184882401,0.120878787049,0.120810637518,0.120812947672,0.120577312005,0.120521868318,0.120234254195,0.119996308375,0.119699453637,0.119446491818,0.119484609352,0.119329829061,0.119029509094,0.118959049409,0.118822750346,0.118625232214,0.118427714081,0.118319136862,0.118015351664,0.117567181866,0.117176765907,0.116988488389,0.116727441032,0.116306993078,0.116085218332,0.115592000539,0.115206204888,0.11479037724,0.114632131718,0.114432303432,0.114256731759,0.113864005647,0.11354520445,0.113360392162,0.113214852486,0.113017334353,0.11284869314,0.11275513192,0.112475603334,0.112169507982,0.111878428629,0.111597744967,0.111293959768,0.111133404093,0.110867736429,0.110706025678,0.110505042315,0.110188551271,0.109951760528,0.109899782072,0.109723055321,0.109631804254,0.109533622726,0.108971100325,0.108674245588,0.108532171141,0.108410888077,0.108241091788,0.108037798271,0.10782179891,0.107496067252,0.107296238966,0.107207298052,0.10738517988,0.107202677745,0.107098720833,0.106793780558,0.106657481496,0.106619363962,0.106487685206,0.106380263064,0.106285546767,0.105844307429,0.105525506233,0.105190533961,0.10497799983,0.104625701406,0.104304590056,0.104179841761,0.103940740864,0.103632335359,0.103271951397,0.102998198196,0.102629728697,0.102387162569,0.102148061671,0.101926286926,0.101374160216,0.100387724629,0.0993908933514,0.0987348097294,0.0977945772147,0.0967469225578,0.0956842519024,0.0946238914006,0.0934896059837,0.0925308922402,0.091472841892,0.0910292924011,0.0905245238398,0.0899585362081,0.0895542593284,0.0896120131683,0.089487264874,0.0893047627397,0.089240078439,0.0890159935399,0.0892354581318,0.0890980039926,0.0889559295463,0.0887226040329,0.088773427412,0.0885412569754,0.0882016643964,0.0881554613244,0.087777751211,0.0878285745902,0.0874566398608,0.0872417955761,0.0869888337571,0.0866688774837,0.0861906756887,0.0858395323417,0.0859561950985,0.0857898640394,0.085740195737,0.0853671059308,0.085452581614,0.0851730530285,0.0849570536671,0.0847630007648,0.0846544235456,0.0845042635617,0.0841450346771,0.0838862974741,0.0835501701255,0.0835074322839,0.0831066206345,0.0830546421786,0.0830488667946,0.0830199898746,0.0828929314267,0.0828501935851,0.0825718200765,0.0823997136334,0.0824228151693,0.0822322274975,0.0822056607311,0.0819434582976,0.0817886780065,0.0817066675538,0.0814941334227,0.0813358879012,0.0811453002293,0.0810621346997,0.0807583495015,0.0805284892185,0.0800849397275,0.0799948437372,0.0798435286765,0.0796771976174,0.0795836363966,0.0793433804223,0.0795397434782,0.0796021176254,0.0795016259439,0.0793607065743,0.0793630167279,0.0791816696704,0.0789494992338,0.0789298629282,0.0788455423218,0.0786503343428,0.0784250943669,0.0780185073335,0.0779515128792,0.0778048181256,0.0777736310521,0.0775922839946,0.0776477276809,0.0775021880042,0.0773889904779,0.0771729911164,0.0770771197421,0.0769569917549,0.0767178908575,0.0764314318113,0.0763586619729,0.0761311118434,0.0758134657236,0.0754911992966,0.075160847332,0.0754184294582,0.0752405476312,0.0750568904201,0.0751504516408,0.0751908793288,0.0748374258282,0.074763500913,0.0748062387546,0.0745971698539,0.0746895759979,0.0742702831197,0.0741975132814,0.0741155028286,0.07386600624,0.0738798671615,0.0738833323919,0.0738325090128,0.0736442314945,0.0736938997969,0.0734848308962,0.0733023287619,0.0730586075572,0.0729049823429,0.0727132395942,0.0725087910008,0.0723078076377,0.0723262888665,0.0721680433449,0.0721437867322,0.0720432950506,0.0722073159561,0.0721899898041,0.0721715085753,0.0720248138218,0.0718400015339,0.0718607929163,0.0715546975645,0.0715881947917,0.0714877031101,0.0715084944925,0.0713144415902,0.0710961320752,0.0708489456401,0.0707080262706,0.0705647967475,0.0705312995203,0.0705393850579,0.070400775842,0.0703060595444,0.0701431937157,0.0700403918806,0.0701166269494,0.0702101881701,0.0701258675637,0.0700750441846,0.0697804996007,0.0698001359063,0.0697366066824,0.0695425537801,0.0695737408537,0.0694905753241,0.0692560947339,0.0690181489132,0.068949999382,0.0690528012172,0.069082833214,0.069007753222,0.0688391120093,0.0687074332542,0.0684440757439,0.0684394554367,0.0684948991231,0.0685491877327,0.068581529883,0.0683955625184,0.068317017296,0.0683008462208,0.0683043114512,0.0684001828256,0.068633508339,0.0684452308207,0.0682927606832,0.0681980443857,0.0681379803921,0.0681911139249,0.0682488677648,0.0679993711762,0.0680536597858,0.0679404622594,0.0675373404565,0.067580078298,0.0674807416933,0.0674033515477,0.0674091269317,0.0672139189527,0.0670868605047,0.0670914808119,0.0668997380632,0.0668119522265,0.0669725079016,0.0670244863576,0.0671007214263,0.0670926358887,0.06701640082,0.0670441226631,0.0668928076024,0.0669551817496,0.0669494063656,0.0670556734311,0.0669725079016,0.0667507331561,0.0667703694617,0.0668442943769,0.0667518882329,0.0667033750073,0.0668477596073,0.0667183910057,0.0667657491545,0.0668015565353,0.0669863688232,0.0670140906664,0.0669505614424,0.0668697060665,0.0671723361879,0.0670741546599,0.0671295983463,0.067315565711,0.0674599503109,0.0674333835445,0.0673305817094,0.0672670524854,0.0672485712566,0.067263587255,0.0670152457432,0.067033726972,0.0670036949752,0.0669205294456,0.0668119522265,0.0668685509897,0.0667923159209,0.0670868605047,0.0671584752663,0.0671099620407,0.0671769564951,0.0671989029543,0.0671226678855,0.0669678875944,0.0668627756057,0.0667287866969,0.066694134393,0.0666086587098,0.0665982630186,0.066595952865,0.0664966162603,0.0665081670283,0.0665601454842,0.0665312685642,0.0665751614826,0.066659482089,0.0666375356298,0.0666756531642,0.0666040384026,0.0666641023962,0.0667403374649,0.0668177276105,0.0667611288473,0.0669205294456,0.0670291066648,0.0671030315799,0.0671619404967,0.0671469244983,0.0672266247974,0.0672670524854,0.0672728278694,0.0671989029543,0.0672566567942,0.0672196943366,0.0673178758646,0.0671134272711,0.0671492346519,0.0670961011191,0.0671885072631,0.0672832235606,0.0672901540214,0.0674241429301,0.0676135755252,0.0676978961316,0.0673583035526,0.0675558216853,0.067614730602,0.0676285915236,0.0676632438276,0.067649382906,0.067707136746,0.0675950942964,0.0675280998421,0.0675315650725,0.0676274364468,0.0675246346117,0.0676678641348,0.0676851902868,0.0674507096965,0.0675696826068,0.0675893189124,0.0676851902868,0.067632056754,0.067574302914,0.0678884838035,0.0679924407154,0.0677787515075,0.0678653822675,0.0681841834641,0.0679924407154,0.0679635637954,0.0680270930194,0.0682095951537,0.0683655305216,0.0683020012976,0.0683424289856,0.0682962259136,0.0680952425505,0.0679589434882,0.0680548148626,0.0680779163985,0.0679277564146,0.0679034998018,0.0678619170371,0.067925446261,0.0679092751858,0.0681830283873,0.0684336800527,0.0685318615807,0.0685226209663,0.0685099151215,0.0687224492526,0.0688749193901,0.0689141920013,0.0688471975469,0.0689661704572,0.0688437323165,0.0687755827853,0.0686901071022,0.0688206307805,0.0690782129068,0.0691763944347,0.0689777212252,0.0690759027532,0.0692064264315,0.0691313464395,0.0692249076603,0.0692237525835,0.0692260627371,0.0691209507483,0.0688252510877,0.0688633686221,0.0688529729309,0.0690112184524,0.0688737643133,0.068973100918,0.0690631969084,0.0692029612011,0.0694062547178,0.0694847999401,0.0696003076201,0.0695714307001,0.0695956873129,0.0695390885497,0.0696592165368,0.0696014626969,0.0696892485336,0.0697031094552,0.0695887568521,0.0695968423897,0.0697724140632,0.0698659752839,0.070020755575,0.0700507875718,0.0700126700374,0.0702714072405,0.0701212472565,0.0701951721717,0.0702563912421,0.0702956638532,0.0702806478549,0.0702887333925,0.0700588731094,0.0701050761814,0.0701720706357,0.0700588731094,0.0700993007974,0.0701224023333,0.0702702521637,0.0704365832228,0.0705451604419,0.0705162835219,0.0709251807089,0.0708697370225,0.0709783142416,0.0710083462384,0.0711515757615,0.0711596612991,0.0710545493104,0.0711330945328,0.0711169234576,0.0711515757615,0.0712347412911,0.0712439819055,0.0711804526815,0.0712566877503,0.0713779708142,0.0715708686397,0.0717325793916,0.0717175633932,0.0717233387772,0.0717164083164,0.0715177351069,0.0715489221805,0.0715593178717,0.0715512323341,0.0713167517438,0.0713363880494,0.071402227427,0.0714472754222,0.071361799739,0.0713179068206,0.0712705486719,0.0713929868126,0.0713883665054,0.0715050292621,0.0718931350667,0.071788023078,0.0717845578476,0.0717868680012,0.0719578193675,0.0721172199658,0.0722234870313,0.0723528556328,0.072438331316,0.0723309091737,0.0720837227386,0.072064086433,0.0719277873707,0.0720328993594,0.0718700335307,0.0719520439835,0.0719220119867,0.0715558526413,0.0717695418492,0.0718261406124,0.0718515523019,0.0718723436843,0.0720791024314,0.072052535665,0.0721287707338,0.0721068242746,0.072064086433,0.0723089627145,0.0722385030297,0.0723586310168,0.0725226519223,0.0726346943719,0.0725122562311,0.0724545023912,0.0727536672822,0.0727155497478,0.0728622445013,0.0728668648085,0.0728391429654,0.0728749503461,0.0726046623751,0.0725954217607,0.0728033355846,0.0728333675814,0.0728287472742,0.072743271591,0.0728021805078,0.0727467368214,0.072754822359,0.0726312291415,0.072789474663,0.0727444266678,0.0726647263687,0.0729096026501,0.072766373127,0.0730897946308,0.0731036555524,0.0733843392146,0.0733439115267,0.0735899428849,0.0736511619553,0.0737089157952,0.0736488518017,0.0734767453586,0.0735460499665,0.0733358259891,0.0732896229171,0.0731914413892,0.0733485318339,0.0731025004756,0.0730701583252,0.0730678481716,0.0731510137012,0.0731775804676,0.0730967250916,0.0733000186083,0.0731498586244,0.0730089392549,0.0727652180502,0.0728749503461,0.0729754420277,0.073042436482,0.0729188432645,0.0727975602006,0.0729719767973,0.0728945866517,0.0731798906212,0.0733889595218,0.0734986918178,0.0731972167731,0.0732133878483,0.0733450666035,0.0734097509042,0.0736257502657,0.0735298788914,0.0736292154961,0.073532189045,0.0733161896835,0.0735691515025,0.0738117176304,0.0737181564096,0.0734305422866,0.0734721250514,0.0733150346067,0.0733381361427,0.0732330241539,0.0731972167731,0.0733254302979,0.0731094309364,0.0730782438628,0.073129067242,0.0731198266276,0.073175270314,0.0731533238548,0.0731937515427,0.0733231201443,0.0733127244531,0.0732826924563,0.0732988635315,0.0731775804676,0.0732457299987,0.0732422647683,0.0730493669428,0.0730355060212,0.0728460734262,0.0726069725287,0.072760597743,0.0726693466759,0.0727213251318,0.0728345226582,0.0727513571286,0.0728714851157,0.0730817090932,0.0732145429251,0.0732792272259,0.0732619010739,0.0732942432243,0.0733496869107,0.0731706500068,0.0731960616963,0.0731949066195,0.0732734518419,0.073163719546,0.0729384795701,0.0730990352452,0.073077088786,0.0728680198853,0.0730158697157,0.0731256020116,0.0730678481716,0.073152168778,0.0729719767973,0.0730089392549,0.073065538018,0.0727871645094,0.0728460734262,0.0727478918982,0.0724983953096,0.0725376679207,0.072438331316,0.0723309091737,0.0722904814857,0.072438331316,0.0724914648488,0.0725480636119,0.0725469085351,0.0726531756007,0.0726624162151,0.0724660531592,0.0724868445416,0.0724140747032,0.0724521922376,0.0723563208632,0.0650585456451,0.0578370054957,0.0505611767368,0.0433153799746,0.0)
m <- c(0.0429301048841,0.0500464403531,0.0572632335839,0.0643403096977,0.0715871247882,0.0714139217507,0.0715536388676,0.0713642702133,0.0712972983721,0.0713827452039,0.0713608061525,0.071326165545,0.071062896928,0.0711356422037,0.0711922218627,0.0714173858115,0.0713238561712,0.0714439436105,0.0716067544658,0.0714993685826,0.0716148372742,0.0716286935172,0.0718700230829,0.0719901105222,0.0718607855875,0.0718099793632,0.0720062761391,0.0720282151905,0.0720085855129,0.0720224417559,0.0719289121156,0.0722337494617,0.0723803947002,0.0721725510551,0.0722914838076,0.072424272803,0.0722556885131,0.0722406775832,0.0724023337516,0.072201418228,0.0723769306394,0.0723399806581,0.0722129650972,0.0724415931068,0.0723076494244,0.072244141644,0.072479697775,0.072619414892,0.0724346649853,0.0726783039247,0.0725004821395,0.0722706994431,0.0722926384945,0.0721760151159,0.0722799369384,0.0724184993684,0.0722522244524,0.0719854917746,0.071952005854,0.0719762542792,0.0720882589102,0.0721610041859,0.0722522244524,0.0725120290087,0.072465841532,0.0722210479056,0.0721055792139,0.0723526822142,0.0725027915134,0.0726321164481,0.0726690664294,0.0726552101864,0.0725108743218,0.0723469087796,0.0723723118917,0.0725605258592,0.0727879991818,0.0727360382706,0.0726240336396,0.0724727696535,0.0724496759152,0.0724704602797,0.0725097196349,0.0723907868824,0.0724184993684,0.0723884775086,0.0722002635411,0.0720882589102,0.0722660806954,0.0721252088915,0.0721656229336,0.0722002635411,0.0721771698028,0.0721794791766,0.072216429158,0.0721967994804,0.0725385868078,0.0726378898826,0.0726355805088,0.0728942303782,0.0729357991072,0.0729127053689,0.0729900693923,0.0730489584251,0.0730997646494,0.0732475645748,0.0730847537195,0.0731990677243,0.0731043833971,0.0730581959204,0.0729866053315,0.0729646662801,0.073063969355,0.0732360177056,0.0730374115559,0.073022400626,0.0729600475325,0.072910395995,0.0728064741725,0.0728330319716,0.0729762131493,0.0731113115186,0.073008544383,0.0730824443456,0.0731736646121,0.0729912240792,0.0729819865839,0.072965820967,0.0731367146307,0.0731990677243,0.0730039256353,0.0730050803222,0.0729277162988,0.072785689808,0.0729542740979,0.0731909849158,0.0731574989952,0.0731424880653,0.0731413333784,0.0731759739859,0.0732244708364,0.0732671942524,0.0733434035889,0.073368806701,0.0730824443456,0.0728561257099,0.073008544383,0.0729115506819,0.0727545132612,0.0725201118171,0.0724023337516,0.0724612227843,0.0723803947002,0.0723954056301,0.0724450571675,0.0725432055554,0.0724323556114,0.0724288915507,0.072576691476,0.0726505914387,0.0727660601304,0.0724947087049,0.0725709180415,0.072479697775,0.0725397414947,0.0725154930694,0.0724335102983,0.0724392837329,0.072327279102,0.0722972572421,0.0722395228963,0.072174860429,0.0721390651345,0.0721806338635,0.072048999555,0.0719993480176,0.0720836401625,0.0720709386064,0.0720974964055,0.0721090432747,0.0721563854383,0.0722187385318,0.0724023337516,0.0723261244151,0.072493554018,0.0724231181161,0.0724011790647,0.0722268213402,0.0721344463869,0.0723318978497,0.0723711572048,0.072465841532,0.0722937931814,0.0721864072981,0.0721586948121,0.0721540760644,0.0720547729896,0.0721517666906,0.0719866464615,0.0717730293819,0.0715848154144,0.0714889764003,0.0714566451666,0.0715952075967,0.0714947498349,0.0713203921104,0.0712672765123,0.0711818296804,0.0712407187132,0.0710859906663,0.0710294110074,0.0709901516522,0.0708342689184,0.0707245736613,0.070492481591,0.0705386690677,0.0706194971519,0.0705375143808,0.0705098018948,0.070464769105,0.0705282768854,0.0704116535068,0.0704543769227,0.0702476879646,0.0704497581751,0.0704486034882,0.0702811738852,0.0704128081937,0.0705790831098,0.0705490612499,0.0703493004133,0.0702015004879,0.0700259880766,0.0701437661421,0.0701299098991,0.0701853348711,0.0701657051935,0.0700502365018,0.0700190599551,0.0700906505439,0.0701391473944,0.0702315223478,0.0705282768854,0.0703908691423,0.0702315223478,0.0700075130859,0.0700121318336,0.0700225240158,0.0698574037867,0.0697569460249,0.0697858131978,0.0697604100857,0.0694948320948,0.069547947693,0.0693320212395,0.0693643524732,0.0692996900058,0.0693274024918,0.0693539602909,0.0693170103096,0.0692165525478,0.0691518900805,0.0691611275758,0.0692073150525,0.0692927618843,0.069394374333,0.0692789056413,0.0692962259451,0.0691010838561,0.0689786870429,0.0690525870056,0.0690456588841,0.0688724558466,0.0687177277997,0.0687916277624,0.0685999497342,0.0687904730755,0.0687004074959,0.0687246559212,0.0687927824493,0.0684971825986,0.0686761590707,0.0688228043091,0.068754677781,0.0686738496969,0.0686796231314,0.0686634575146,0.0685375966407,0.0684244373228,0.068408271706,0.0686392090893,0.0683620842293,0.0681958093132,0.0683447639255,0.0682385327292,0.0682720186498,0.0680156781542,0.0681068984206,0.0682027374347,0.0681727155749,0.0678944360279,0.0677743485886,0.0675757424389,0.0674695112425,0.0674914502939,0.0675053065369,0.0675376377706,0.0673113191349,0.0672616675975,0.0672431926068,0.0672281816769,0.0674533456257,0.0677143048689,0.0676889017567,0.0676600345838,0.0676634986445,0.0677755032755,0.0678078345092,0.0677085314343,0.0677604923456,0.0679637172429,0.0680653296916,0.0678505579251,0.0676796642614,0.0676981392521,0.067518008093,0.0672951535181,0.0674002300275,0.0675849799342,0.0676092283595,0.067559576822,0.0675699690043,0.0678459391774,0.068046854701,0.0680826499954,0.0683736310985,0.0685502981967,0.0685803200566,0.0683112780049,0.0681357655936,0.0681415390282,0.0679544797476,0.0677766579624,0.0676184658548,0.0677304704857,0.0676265486632,0.0674729753033,0.0673898378452,0.0674498815649,0.0674464175042,0.0674256331397,0.0675133893453,0.0677004486259,0.0675653502566,0.0673690534807,0.0671127129852,0.0671946957563,0.0673505784901,0.0673632800461,0.0674591190603,0.0674106222097,0.067296308205,0.067059597387,0.0673332581863,0.0675491846398,0.0677246970511,0.0677720392147,0.0676450236539,0.0677373986072,0.06765772521,0.0677258517381,0.0677246970511,0.0678263094998,0.0680641750047,0.0678494032382,0.0679152203924,0.0679694906775,0.0679336953831,0.0680075953458,0.0679810375467,0.0679267672616,0.0679821922336,0.0679013641494,0.0676484877146,0.0677397079811,0.0676542611492,0.06750415185,0.0676242392894,0.0676392502193,0.0677477907895,0.068060710944,0.0680018219112,0.0679868109813,0.0679452422523,0.0679152203924,0.0678574860466,0.067976418799,0.0678724969765,0.0679660266168,0.0680295343972,0.0677177689296,0.0678228454391,0.0679729547383,0.0680168328411,0.0681588593319,0.0681946546263,0.0682789467713,0.0684440670004,0.0683528467339,0.0683978795237,0.0686322809678,0.068588402865,0.068671540323,0.0686796231314,0.0686126512903,0.068574546622,0.0684279013835,0.0683470732994,0.0684232826359,0.0683782498461,0.0682604717806,0.0683309076825,0.0683620842293,0.0683366811171,0.0684175092013,0.0685791653697,0.0687350481034,0.0686114966033,0.0686877059399,0.0688539808559,0.0689821511037,0.0689440464354,0.068991388599,0.0692662040852,0.0693043087535,0.0693123915619,0.0693100821881,0.0696206929687,0.0693412587348,0.0693285571787,0.0694128493237,0.0695236992677,0.0695514117537,0.0695133070855,0.0694578821134,0.0696530242024,0.0697569460249,0.0698308459876,0.070298494189,0.0703273613619,0.0703458363526,0.0705236581378,0.0706321987079,0.0708666001521,0.0711668187505,0.0711806749935,0.0712811327553,0.0713215467973,0.0711910671757,0.0712280171571,0.0712765140076,0.0712037687318,0.0711483437598,0.0711125484654,0.0710144000774,0.0711194765869,0.0712926796244,0.0714947498349,0.0716529419425,0.0716933559846,0.0718942715081,0.0722476057047,0.0724462118544,0.0724589134105,0.0726852320462,0.0726679117425,0.0728491975884,0.0729254069249,0.0730755162241,0.0733249285982,0.0732741223739,0.0732683489393,0.0734692644628,0.0734427066637,0.0735073691311,0.0737960408603,0.0735812690938,0.07342538636,0.0735108331918,0.073536236304,0.0738791783183,0.0740720110334,0.0742267390803,0.0744969358189,0.0748872199968,0.0749437996557,0.075384890058,0.0758144335911,0.0759426038389,0.0761031053203,0.0762543693064,0.0762936286616,0.0763536723813,0.0764991629328,0.076426417657,0.0766619737881,0.0766816034657,0.0767439565592,0.0767728237321,0.0769529548912,0.0769783580033,0.0772947422186,0.0774356140224,0.0776376842329,0.07788594192,0.0779252012752,0.0781549839717,0.0782739167241,0.0784863791168,0.0786457259114,0.0787542664816,0.0785856821917,0.0787219352479,0.0788247023835,0.0789898226126,0.0792911958979,0.0792773396549,0.0795521551411,0.0798269706274,0.0800706095668,0.0802426579175,0.0803257953755,0.0805013077869,0.0806641186421,0.0806225499131,0.0807969076376,0.0807934435768,0.080804990446,0.0811167559136,0.0812830308296,0.0814285213811,0.081861528975,0.0820393507602,0.0822529678398,0.0825693520551,0.082542794256,0.0828568690974,0.0829527081115,0.0828256925506,0.0829758018498,0.0831882642425,0.0833037329342,0.0834399859904,0.0835762390466,0.0835958687242,0.0837852373786,0.0839480482339,0.084196305921,0.0843187027342,0.0844064589399,0.0844156964352,0.0844168511221,0.0844526464166,0.0846073744634,0.0848821899496,0.0850415367442,0.0852008835387,0.0853463740902,0.0857158739037,0.0858486628991,0.0860576612311,0.0865414750493,0.0868797983159,0.0870206701198,0.0871615419236,0.0875148761202,0.0877989291018,0.0880333305459,0.0881164680039,0.0883035272845,0.0885483209109,0.0884224600369,0.0884790396958,0.08871344114,0.0887619379905,0.0887838770419,0.0890517644066,0.0891949455843,0.0891822440283,0.0893208064583,0.0894385845238,0.0896325719259,0.0897087812624,0.0897295656269,0.0900032264262,0.0901960591413,0.090145252917,0.0903935106041,0.0909997212355,0.0915043194182,0.0919800504279,0.0926924922557,0.0936843683173,0.0943737164067,0.0954995361507,0.0965814777919,0.0976345522601,0.0986472126862,0.099624077818,0.100499330501,0.101300683221,0.102038528161,0.102680534087,0.103537311779,0.103825983509,0.104006114668,0.104462216,0.104713937748,0.104731258051,0.105075354753,0.105575334188,0.105652698211,0.105809735632,0.105996794912,0.106146904212,0.106375532221,0.106564900876,0.106687297689,0.106895141334,0.106899760081,0.106950566306,0.107104139666,0.107090283423,0.107231155227,0.107702267489,0.107900873638,0.108151440699,0.108412399943,0.108738021653,0.109101748032,0.109094819911,0.109366171336,0.109534755626,0.109692947733,0.109511661888,0.109802642991,0.110005867888,0.110218330281,0.110511620758,0.110404234874,0.110670967552,0.111037003305,0.111097047024,0.111563540539,0.111868377885,0.112196308969,0.112354501077,0.112370666694,0.112407616675,0.112807138348,0.112953783587,0.11302768355,0.113489558316,0.113697401961,0.113861367504,0.113896008111,0.113855594069,0.114109625191,0.11438328599,0.114340562574,0.114773570168,0.115026446603,0.115579541636,0.115708866571,0.11602756016,0.116191525702,0.116812747263,0.117175318955,0.117300025142,0.117930484199,0.118109460671,0.118372729288,0.118215691867,0.118275735587,0.118588655741,0.118932752443,0.118878482158,0.119500858406,0.119985826911,0.120401514201,0.120727135912,0.120745610902,0.121060840431,0.121133585706,0.121262910641,0.121286004379,0.121849491595,0.12179522131,0.121871430646,0.121648576071,0.121708619791,0.122198207044,0.122393349133,0.122731672399,0.122914112932,0.12340947362,0.123347120526,0.123329800222,0.123493765765,0.123696990662,0.123955640531,0.124046860798,0.124224682583,0.124231610704,0.124106904517,0.123929082732,0.123792829676,0.12379513905,0.123663504741,0.123645029751,0.123554964171,0.123633482881,0.12356304698,0.123712001592,0.123866729639,0.123989126452,0.1243643997,0.124248931008,0.124550304293,0.124402504368,0.124417515298,0.124407123116,0.124354007518,0.124411741863,0.124336687214,0.124371327821,0.123962568653,0.124199279471,0.123716620339,0.123848254648,0.12382516091,0.123485682956,0.123392153316,0.122940670731,0.122968383217,0.12278016925,0.122850605152,0.122687794296,0.122989167582,0.122849450465,0.122730517712,0.123031890998,0.123317098666,0.123389843942,0.123147359689,0.123318253353,0.123484528269,0.123654267246,0.123493765765,0.123708537531,0.123565356353,0.123297468989,0.122961455096,0.123050365988,0.122979930086,0.122582717787,0.122297510119,0.122006529016,0.121891060324,0.1214430418,0.121361059029,0.121395699636,0.120971929538,0.120758312458,0.120613976594,0.120482342285,0.12038303921,0.120023931579,0.119835717612,0.119550509943,0.119481228728,0.119267611649,0.119507786527,0.119374997532,0.119287241326,0.118953536807,0.118945453999,0.119003188345,0.118759549405,0.119013580527,0.118891183714,0.118451247998,0.118205299685,0.11807251069,0.117917782643,0.1179039264,0.117467454745,0.117048303394,0.116877409731,0.116534467716,0.116048344524,0.116122244487,0.115998692987,0.115641894729,0.11531973708,0.115182329337,0.114781652976,0.114827840453,0.114487207813,0.114281673541,0.114297839158,0.113763219116,0.113400647424,0.113040385106,0.113013827307,0.112943391405,0.112911060171,0.112698597778,0.112870646129,0.112692824344,0.112423782292,0.112307158913,0.112191690222,0.112352191703,0.112266744871,0.111815262287,0.111494259324,0.111040467366,0.110463123907,0.110025497566,0.109849985154,0.109793405495,0.109525518131,0.109101748032,0.10863063577,0.108504774896,0.108518631139,0.108538260817,0.108616779527,0.1087691982,0.108783054443,0.10858560298,0.108254207835,0.108165296942,0.108069457928,0.107910111134,0.107717278419,0.107436689498,0.107017538147,0.106693071123,0.106083396431,0.105791260641,0.105688493506,0.10532361244,0.105032631337,0.104809776762,0.104302869205,0.104106572429,0.103939142826,0.103611211742,0.103678183583,0.103459947756,0.103163193218,0.103097376064,0.103023476101,0.102815632456,0.102702473138,0.102681688774,0.102509640423,0.102501557615,0.102173626531,0.101994650058,0.101812209526,0.101582426829,0.101410378478,0.101210617642,0.101301837908,0.100930028721,0.10087806781,0.101007392744,0.100868830314,0.100858438132,0.100670224165,0.100507413309,0.100144841617,0.10009519008,0.099804208977,0.09967950279,0.0994173888598,0.0987903938639,0.0984370596674,0.0982292160223,0.0980583223586,0.0979012849379,0.0976992147274,0.0974324820496,0.0971992352924,0.0969590604137,0.0965018043946,0.0959671843521,0.0953806033983,0.0943656335983,0.0936601198921,0.0927305969239,0.0918980676568,0.0907306791838,0.0895413516594,0.0883855100556,0.0874525230267,0.0866800374793,0.085947965974,0.0853602303333,0.0846431697578,0.0841154778368,0.0836432108878,0.0835900952896,0.0834434500512,0.0831339939574,0.0829307690601,0.0828187644291,0.0827852785085,0.0826132301579,0.0825947551672,0.082528938013,0.0825797442373,0.0822217912931,0.0821167147836,0.0822437303445,0.082112096036,0.0818603742881,0.0815070400915,0.0813869526521,0.0810740324976,0.0808927466517,0.0806213952262,0.0806537264599,0.0805867546187,0.0803027016371,0.0803627453568,0.0802507407259,0.0804227890765,0.0804193250158,0.0803962312774,0.080123725165,0.0801156423566,0.0798858596601,0.079568320758,0.0794309130149,0.0791999756315,0.0792149865614,0.0791272303557,0.0789367070144,0.0788697351732,0.0789136132761,0.0788027633321,0.078803918019,0.0788859007901,0.0786884493273,0.0786538087198,0.0783905401027,0.0781168793034,0.0779783168734,0.077887096607,0.0778155060181,0.0776734795273,0.0773951999803,0.0772277703774,0.0774125202841,0.0772554828634,0.0770730423305,0.0770614954614,0.0770695782698,0.0770153079847,0.0768975299192,0.0766446534843,0.0764760691945,0.076370992685,0.0761088787549,0.0758860241799,0.0759241288482,0.0758259804602,0.0756897274041,0.0754980493758,0.0753768072496,0.075371033815,0.0754033650487,0.0752128417074,0.075120466754,0.0750153902446,0.0750442574175,0.0748190934687,0.0745142561226,0.074439201473,0.0742810093654,0.07413320944,0.0740581547904,0.073966934524,0.0739923376362,0.07413320944,0.0738237533463,0.0737983502341,0.0739634704633,0.0737694830612,0.0738064330426,0.0736343846919,0.0734103754301,0.0733884363786,0.0732775864346,0.0731240130747,0.0731136208924,0.073105538084,0.0730016162615,0.0730882177802,0.0729739037755,0.0729923787661,0.0730466490512,0.0730143178176,0.0728353413454,0.0725201118171,0.0725016368264,0.0722961025552,0.0720928776578,0.0719981933307,0.0719312214895,0.0717799575034,0.0715340091901,0.0714878217134,0.0712337905917,0.071284596816,0.0712003046711,0.0711610453159,0.0710732891102,0.0710190188251,0.0709439641755,0.0709127876288,0.0708573626567,0.0706275799603,0.0708319595446,0.0707927001894,0.070658756507,0.0707280377221,0.070700325236,0.0704843987826,0.0704347472452,0.0704682331657,0.0704416753667,0.0704416753667,0.0704024160115,0.0704024160115,0.070270781703,0.0699601709223,0.0699047459503,0.0701714786281,0.0700594739972,0.0700664021187,0.0701749426888,0.0701379927075,0.0699798005999,0.069783503824,0.0699162928195,0.070144920829,0.0702938754413,0.0698874256465,0.0698828068989,0.0698423928568,0.0695952898566,0.0695525664406,0.0695583398752,0.069603372665,0.0694394071228,0.0692858337628,0.0691518900805,0.0694232415059,0.0692604306506,0.0691911494356,0.0692234806693,0.0692765962675,0.0691692103842,0.0692373369123,0.0692373369123,0.0690260292065,0.069143807272,0.06894981987,0.0691530447674,0.0690826088654,0.0690849182393,0.0689405823747,0.0690398854495,0.068825113683,0.0687616059025,0.068782390267,0.0687500590334,0.0686461372108,0.06851912165,0.068420973262,0.068435984192,0.0685225857107,0.0684740888602,0.0684302107574,0.0685860934912,0.0686796231314,0.0684613873041,0.0685387513276,0.0685849388042,0.0686472918978,0.0686126512903,0.0685422153883,0.068434829505,0.0684625419911,0.0683436092386,0.0683470732994,0.0683540014209,0.0682777920843,0.0681346109067,0.068019142215,0.0678297735606,0.067865568855,0.0679417781915,0.0680422359533,0.0678632594812,0.0678470938643,0.0678782704111,0.0679140657055,0.068019142215,0.0680861140561,0.0682500795983,0.0682766373974,0.0682212124254,0.0682743280236,0.0683886420284,0.0686241981594,0.0685930216127,0.0685422153883,0.0684763982341,0.0685526075706,0.0685676185005,0.068351692047,0.068449840435,0.068420973262,0.068588402865,0.0682881842666,0.0682801014582,0.06836554829,0.0684232826359,0.0682316046077,0.0683551561078,0.0686172700379,0.0686241981594,0.0686669215754,0.0685387513276,0.0686322809678,0.0686080325426,0.0686207340987,0.068740821538,0.0688216496222,0.0687142637389,0.0685780106827,0.0684105810798,0.0683424545517,0.068366702977,0.0684590779303,0.0685260497715,0.0684613873041,0.06836554829,0.0685133482154,0.068366702977,0.0682500795983,0.0684001888975,0.0683031951965,0.0682754827105,0.0682443061638,0.0683170514395,0.0684059623321,0.0685098841546,0.0684740888602,0.0687708433979,0.0690121729635,0.0689659854868,0.0691749838188,0.0692315634777,0.0692200166086,0.0691380338375,0.0689925432859,0.0690133276504,0.0691137854122,0.0690433495103,0.0690779901178,0.0690433495103,0.0690341120149,0.0689186433232,0.0689001683326,0.069143807272,0.0691807572534,0.0690675979355,0.0690156370243,0.069116094786,0.0688770745942,0.0688632183512,0.0689197980102,0.0690560510664,0.0692188619216,0.0690814541785,0.0693562696648,0.0695294727023,0.0694798211649,0.0694036118283,0.0626510027382,0.0558314218069,0.0488039972305,0.0418955054066,0.0)
ycorr <- c(0.000104229878577,0.000104127305707,0.000103820889704,0.000103309668504,0.00010258589189,0.000101646290236,0.000100490549764,9.93426151994e-05,9.82038104794e-05,9.70643827133e-05,9.59192875544e-05,9.47707838516e-05,9.36170801042e-05,9.24585392191e-05,9.12998368656e-05,9.01442116197e-05,8.89883388621e-05,8.78303116945e-05,8.66663455971e-05,8.54963746304e-05,8.43232012699e-05,8.3146790388e-05,8.19655074475e-05,8.0776283445e-05,7.95792788143e-05,7.83710205755e-05,7.71527746807e-05,7.59236933647e-05,7.46914868301e-05,7.34554023761e-05,7.22118112875e-05,7.09593780019e-05,6.96976702801e-05,6.84336011599e-05,6.71673930607e-05,6.58917176776e-05,6.46105799299e-05,6.33172161937e-05,6.20107627606e-05,6.06847575202e-05,5.93469063596e-05,5.80015599506e-05,5.66492651301e-05,5.52859569929e-05,5.39079717324e-05,5.25186674965e-05,5.11170745845e-05,4.97032337397e-05,4.82832043385e-05,4.68590998996e-05,4.54341019095e-05,4.40023062326e-05,4.25591826448e-05,4.1107740843e-05,3.96472242658e-05,3.81771526827e-05,3.66905448231e-05,3.51942820149e-05,3.36830043796e-05,3.21584778138e-05,3.06117284253e-05,2.90424269677e-05,2.7457880453e-05,2.58537985995e-05,2.42293160719e-05,2.25897944444e-05,2.09416669549e-05,1.92910919402e-05,1.76328867441e-05,1.59689694986e-05,1.43016402623e-05,1.26278572524e-05,1.09446746585e-05,9.24918641324e-06,7.54788421163e-06,5.84112346576e-06,4.12646122015e-06,2.39877368644e-06,6.59374004849e-07,-1.0877637124e-06,-2.84703030416e-06,-4.61698837423e-06,-6.38978908384e-06,-8.16068874931e-06,-9.93102143994e-06,-1.17073310117e-05,-1.34910487592e-05,-1.52819377005e-05,-1.70813100556e-05,-1.88948486046e-05,-2.07177351074e-05,-2.25418029498e-05,-2.4372832773e-05,-2.62093545817e-05,-2.80572900941e-05,-2.99136059376e-05,-3.17724040038e-05,-3.36308609736e-05,-3.54847840492e-05,-3.73322789611e-05,-3.91693678554e-05,-4.10045313189e-05,-4.28407664678e-05,-4.46791536368e-05,-4.65147343698e-05,-4.83459599252e-05,-5.01732830556e-05,-5.19995469808e-05,-5.38281955832e-05,-5.56619705206e-05,-5.7507722277e-05,-5.9359245621e-05,-6.12159165606e-05,-6.30727625837e-05,-6.49301852096e-05,-6.67906667892e-05,-6.86514767622e-05,-7.05163713012e-05,-7.23826386681e-05,-7.42513385662e-05,-7.61147818825e-05,-7.79732327656e-05,-7.9824366079e-05,-8.16706582873e-05,-8.35166506929e-05,-8.53585519365e-05,-8.72000597106e-05,-8.90379826064e-05,-9.08728642897e-05,-9.27025223108e-05,-9.45290732707e-05,-9.63578693798e-05,-9.81890667935e-05,-0.000100026490506,-0.00010186424219,-0.000103706593324,-0.000105558020289,-0.000107413957906,-0.0001092764872,-0.000111147413116,-0.000113028399379,-0.000114917670292,-0.000116812716897,-0.000118712565697,-0.000120616813135,-0.000122522730712,-0.000124423926339,-0.000126323574712,-0.000128221203937,-0.000130114146792,-0.000131996473568,-0.000133867621371,-0.000135727837819,-0.000137576397415,-0.000139414869024,-0.000141251039571,-0.000143081893013,-0.000144906537425,-0.000146722472218,-0.000148532529009,-0.000150343774003,-0.000152152967105,-0.000153958511658,-0.000155758922989,-0.000157559697486,-0.000159354222889,-0.000161146764537,-0.000162942706525,-0.000164742531821,-0.00016653851075,-0.000168332094711,-0.000170122983996,-0.00017191633665,-0.000173716412607,-0.000175522228727,-0.000177327458134,-0.000179132640591,-0.000180930215162,-0.000182720999006,-0.00018450976221,-0.000186298801973,-0.000188084475389,-0.000189866019798,-0.000191641257747,-0.000193402380016,-0.000195156710511,-0.000196907917928,-0.000198655578541,-0.00020039927398,-0.00020213933634,-0.000203867623601,-0.000205590676871,-0.000207306627625,-0.000209018323903,-0.000210731059314,-0.000212442141332,-0.000214144174415,-0.000215835661212,-0.000217521937268,-0.000219205955057,-0.000220891464901,-0.000222582841568,-0.000224281282499,-0.000225985652147,-0.000227688839965,-0.000229388328064,-0.000231091504587,-0.000232804080435,-0.000234526553565,-0.000236248197812,-0.000237964656811,-0.000239669867595,-0.000241359866925,-0.000243030150888,-0.000244689162858,-0.0002463437184,-0.000247992734784,-0.000249634562171,-0.000251263120313,-0.00025288565111,-0.000254510852254,-0.000256139844846,-0.000257778938187,-0.000259433442788,-0.000261102958993,-0.000262781506969,-0.000264461736967,-0.000266144117449,-0.000267829428553,-0.000269516466217,-0.000271200393591,-0.000272880114516,-0.000274552758602,-0.000276214393501,-0.000277858773422,-0.000279486931507,-0.0002811048359,-0.000282715568507,-0.0002843187881,-0.000285917548675,-0.000287510812336,-0.000289098277603,-0.000290680868486,-0.000292260892802,-0.000293843449603,-0.00029543217239,-0.000297024848962,-0.000298618311617,-0.000300213293212,-0.000301808524247,-0.000303400490212,-0.000304995818961,-0.000306593252877,-0.000308191052769,-0.00030978765839,-0.000311379180847,-0.000312967254108,-0.000314552204911,-0.000316137018313,-0.000317718561697,-0.000319303242195,-0.000320888836406,-0.000322474684107,-0.000324065873935,-0.000325658388185,-0.000327256696368,-0.000328855441972,-0.00033045494663,-0.000332050630285,-0.000333644068407,-0.000335237078541,-0.000336824499577,-0.000338407170755,-0.000339978518915,-0.000341535523275,-0.000343082291673,-0.000344618853918,-0.000346149961003,-0.000347674968548,-0.000349197639824,-0.000350710735803,-0.000352214936893,-0.000353704239839,-0.000355175154748,-0.000356627162547,-0.000358048970536,-0.000359437961239,-0.0003607863775,-0.000362090148348,-0.000363340876655,-0.000364534279704,-0.000365666714262,-0.000366738932316,-0.000367759078469,-0.000368734726906,-0.000369674023799,-0.00037058724029,-0.000371477190487,-0.000372350895721,-0.000373219878881,-0.000374094184508,-0.000374978983838,-0.000375881063511,-0.000376802820433,-0.000377743849632,-0.000378702147699,-0.000379675764419,-0.000380664604671,-0.000381669329202,-0.0003826839351,-0.00038370183986,-0.000384726197567,-0.000385757859639,-0.000386793137608,-0.00038782673651,-0.000388856389071,-0.000389879508525,-0.0003908964778,-0.000391907586912,-0.000392914527916,-0.000393922354811,-0.000394926913573,-0.000395924467004,-0.000396912507909,-0.000397897729161,-0.000398881903279,-0.000399865465624,-0.000400848449419,-0.000401830456169,-0.000402809336235,-0.000403778983,-0.000404738911614,-0.00040569214795,-0.000406640602287,-0.000407585081572,-0.00040852162633,-0.000409453537199,-0.000410380980633,-0.00041130549084,-0.000412225883946,-0.00041314538514,-0.000414063860614,-0.000414982009218,-0.000415897351149,-0.000416806477884,-0.000417710272402,-0.000418607921748,-0.000419498356041,-0.000420379665568,-0.000421248906532,-0.000422107367338,-0.000422959482724,-0.000423806571815,-0.000424645958643,-0.000425480917924,-0.000426312365407,-0.000427141958744,-0.000427969046522,-0.00042878947746,-0.000429604434116,-0.000430417285748,-0.000431224083485,-0.000432017688058,-0.000432803696001,-0.000433583249906,-0.000434354429925,-0.000435111846281,-0.000435855201252,-0.000436586503713,-0.000437310747512,-0.000438027301288,-0.000438736147131,-0.000439439718661,-0.000440140032728,-0.000440829228825,-0.000441505322476,-0.000442171526354,-0.000442830285265,-0.000443482211817,-0.000444126691678,-0.000444759290501,-0.000445381994093,-0.000445997010387,-0.000446599173644,-0.000447189152643,-0.000447773532587,-0.000448352625838,-0.000448925549905,-0.00044949093456,-0.000450044833699,-0.000450589290397,-0.000451126264776,-0.000451652436004,-0.000452168242164,-0.000452678812937,-0.000453183098289,-0.000453678740758,-0.000454166945516,-0.000454647000868,-0.000455123571951,-0.000455596080323,-0.000456059018144,-0.000456509098495,-0.00045694913642,-0.000457376701005,-0.000457788606983,-0.000458185787672,-0.00045856611033,-0.000458929175729,-0.000459271621765,-0.000459594974602,-0.000459899547106,-0.000460191790654,-0.000460473970085,-0.000460744527901,-0.000461002429193,-0.000461250496611,-0.000461487417655,-0.000461714056901,-0.000461930143962,-0.000462135239686,-0.000462329828353,-0.000462514001745,-0.000462681098838,-0.000462832955611,-0.000462970614024,-0.00046309174065,-0.000463195419214,-0.000463282772481,-0.000463354259764,-0.000463412029285,-0.000463458677881,-0.000463490188879,-0.000463505680872,-0.000463503255745,-0.000463482148063,-0.000463446639813,-0.000463397755651,-0.000463337038776,-0.000463263674517,-0.000463174641961,-0.000463064056042,-0.000462931529534,-0.000462782816706,-0.000462625226527,-0.000462463065708,-0.000462287287951,-0.000462093237486,-0.000461880827594,-0.000461646456094,-0.000461390631951,-0.000461118707485,-0.00046083463428,-0.000460535348015,-0.000460213475593,-0.000459863601224,-0.000459490243266,-0.000459098989017,-0.000458690286138,-0.000458266563951,-0.000457829572092,-0.000457375128923,-0.000456902187774,-0.000456411573949,-0.000455902144769,-0.000455378495457,-0.000454837833275,-0.00045427950619,-0.000453702944696,-0.00045310642418,-0.000452487787779,-0.00045185054195,-0.000451192607564,-0.000450512170049,-0.000449809345598,-0.000449088559478,-0.000448346287516,-0.000447586127621,-0.00044680322472,-0.000446002779488,-0.000445185986044,-0.000444351623352,-0.000443497395764,-0.000442630093086,-0.000441749201602,-0.000440849543347,-0.000439931586205,-0.000438993629148,-0.000438035298781,-0.000437056265576,-0.000436054489447,-0.000435027393535,-0.000433977097961,-0.000432899442319,-0.000431793884614,-0.000430660406261,-0.000429503500026,-0.000428320821158,-0.000427113748472,-0.00042587910097,-0.000424619230671,-0.000423335877296,-0.00042203131062,-0.000420701510067,-0.000419349966224,-0.00041797531021,-0.000416575564734,-0.000415152592801,-0.000413708610642,-0.000412245817746,-0.00041076573911,-0.000409265255839,-0.00040774374527,-0.000406201541686,-0.000404643772826,-0.00040306694732,-0.000401471019545,-0.000399854722899,-0.00039821732829,-0.000396557982717,-0.000394871294613,-0.000393162001589,-0.000391431579675,-0.000389680225214,-0.000387900159194,-0.000386091838383,-0.000384259502404,-0.000382405108757,-0.000380526651202,-0.000378625809289,-0.000376704838629,-0.00037476450292,-0.000372799204986,-0.000370808160344,-0.000368793218414,-0.000366760966191,-0.000364709528488,-0.000362638058898,-0.000360544884006,-0.000358431525511,-0.000356292389601,-0.000354122694855,-0.000351926360851,-0.000349706376842,-0.000347465464327,-0.000345200028475,-0.000342910114686,-0.000340595186509,-0.000338257580861,-0.000335892243219,-0.000333503220937,-0.000331095958826,-0.000328670651703,-0.000326226398843,-0.000323761508305,-0.000321273629112,-0.000318761298439,-0.000316224123687,-0.000313661969598,-0.000311077239934,-0.000308472943133,-0.000305847214124,-0.000303199284864,-0.000300528957827,-0.000297834730554,-0.000295115424099,-0.000292370146026,-0.000289600578124,-0.000286807701594,-0.000283992042986,-0.000281151342632,-0.000278283005911,-0.000275387778236,-0.000272460704203,-0.000269503273679,-0.000266522116156,-0.000263517356624,-0.000260491313723,-0.000257442836721,-0.000254370611629,-0.000251270394984,-0.000248142683333,-0.000244991799087,-0.000241821182059,-0.000238635819468,-0.000235432354835,-0.000232211533151,-0.000228972576478,-0.000225712418385,-0.000222430187495,-0.00021902641737,-0.000215408410213,-0.000211491193784,-0.000207212637442,-0.00020201700697,-0.000197774247401,-0.000193913026347,-0.00019035808093,-0.000187025026339,-0.000183812220305,-0.000180616631024,-0.000177534666532,-0.000174665659701,-0.000172090016195,-0.000169869243859,-0.000168552586894,-0.000166267123902,-0.000163591427349,-0.000160594235447,-0.000157362687327,-0.000153999452274,-0.000150613135893,-0.000147207036156,-0.000143777897263,-0.00014032749271,-0.00013685802812,-0.000133370795277,-0.000129863936176,-0.000126336343406,-0.000122785900711,-0.000119213534692,-0.000115621049069,-0.00011200184152,-0.000108358489227,-0.000104691055992,-0.000101001477341,-9.72894972667e-05,-9.35538868564e-05,-8.97982404805e-05,-8.60238528529e-05,-8.22304193607e-05,-7.84161897724e-05,-7.45826000004e-05,-7.07310002954e-05,-6.68624906756e-05,-6.29739972869e-05,-5.90639229292e-05,-5.51315848391e-05,-5.11781256666e-05,-4.72038938467e-05,-4.32067200663e-05,-3.91906461826e-05,-3.51571579414e-05,-3.11045862641e-05,-2.7034146389e-05,-2.29455425086e-05,-1.88437718637e-05,-1.47331473173e-05,-1.06116856312e-05,-6.4787507657e-06,-2.33375964097e-06,1.82555132011e-06,5.99760850757e-06,1.01804901778e-05,1.43750916363e-05,1.85804326086e-05,2.28000320617e-05,2.7035902757e-05,3.12928140186e-05,3.556830337e-05,3.98569942143e-05,4.41561553398e-05,4.8465967424e-05,5.27881142176e-05,5.71251876719e-05,6.14801849863e-05,6.58511397971e-05,7.02352132999e-05,7.46300484422e-05,7.90335889807e-05,8.34510771669e-05,8.78840561146e-05,9.23388397015e-05,9.68161709525e-05,0.000101313071413,0.000105823928669,0.000110347125524,0.000114887709358,0.00011944507964,0.000124022530636,0.000128618808971,0.000133228036626,0.000137847451896,0.000142472421771,0.000147104698664,0.000151747412623,0.000156404153453,0.000161065974137,0.000165731185144,0.000170397982439,0.00017506266242,0.00017973143212,0.000184404832887,0.000189083485304,0.000193765476143,0.000198447933581,0.000203130751219,0.000207818870563,0.00021251404223,0.000217215491655,0.000221927312293,0.000226646340816,0.000231368567266,0.000236091450227,0.000240819591343,0.000245550400503,0.00025028106556,0.000255009983694,0.000259737247846,0.000264462327347,0.000269186132973,0.000273908736563,0.00027863193532,0.00028335538763,0.000288077715947,0.000292798871101,0.000297520145481,0.000302242349971,0.000306960610373,0.000311674285423,0.000316380188999,0.000321075634212,0.000325760239378,0.000330432071494,0.000335092717498,0.000339743267051,0.000344380370297,0.000349003788744,0.000353611483619,0.000358208889073,0.000362793607734,0.000367367345239,0.000371927024283,0.000376474808637,0.000381011907666,0.000385536411716,0.000390051804836,0.000394555539187,0.000399052845687,0.000403537537477,0.000408007199648,0.000412464169961,0.000416911846006,0.000421350001906,0.00042577093837,0.000430176894198,0.000434563370304,0.000438928461125,0.000443274403247,0.000447596967573,0.000451905036749,0.000456195201716,0.000460461582647,0.00046470500524,0.000468928025477,0.000473128815156,0.00047730740969,0.000481467763965,0.000485605681991,0.000489722111184,0.000493814024756,0.000497879012049,0.000501919537789,0.000505938160135,0.000509936181494,0.00051391218584,0.00051786973682,0.000521805051598,0.000525715981399,0.000529602814194,0.000533462361125,0.000537297799649,0.000541112351678,0.000544901960966,0.000548661649857,0.000552389100444,0.000556082039669,0.000559742987135,0.000563371982872,0.000566971926352,0.000570544427594,0.000574088122519,0.000577598087869,0.000581071409016,0.000584514032669,0.000587927968954,0.000591311485558,0.00059466845378,0.000597996487309,0.00060129645693,0.000604567485498,0.000607808944238,0.000611021439974,0.000614207175643,0.000617361014927,0.000620480986451,0.000623566161685,0.000626615874807,0.000629628359601,0.000632603378595,0.000635537164159,0.000638429014162,0.000641280775818,0.000644091861287,0.000646863731462,0.000649598066987,0.000652299582426,0.000654961692115,0.000657586468218,0.000660171315745,0.000662715244102,0.000665219531963,0.000667681409954,0.000670098005531,0.000672471446764,0.000674800835541,0.000677083419273,0.000679318376011,0.000681510143114,0.000683659290139,0.000685766993147,0.000687832244689,0.000689855720689,0.000691844428323,0.000693796790663,0.000695711305909,0.000697588846314,0.000699430133957,0.000701232156139,0.00070299433633,0.000704714680891,0.000706395433109,0.000708037572899,0.000709638892457,0.000711195070679,0.000712707402597,0.000714177209248,0.000715606545896,0.00071699908065,0.000718352330629,0.000719667782148,0.000720943886921,0.0007221777248,0.000723368475118,0.000724515340095,0.000725619590623,0.000726680822728,0.000727695650504,0.000728659572206,0.000729573473083,0.00073044082362,0.000731262348885,0.000732040454536,0.000732774743238,0.000733468756362,0.000734124017884,0.000734733638139,0.000735303394419,0.000735834925224,0.000736327978409,0.000736778456142,0.000737184110223,0.000737545891251,0.000737864454341,0.000738138644648,0.000738368869447,0.000738558336065,0.000738708972408,0.000738813778565,0.000738874011979,0.000738892271094,0.000738872955419,0.000738813697129,0.000738709603043,0.000738559973004,0.000738363492464,0.000738118978786,0.000737825391745,0.000737485974658,0.000737103793795,0.000736674873175,0.000736199686121,0.000735678080564,0.000735113083113,0.000734507930683,0.000733865380528,0.000733185915981,0.00073246412998,0.000731698831783,0.000730885701823,0.000730029492345,0.00072912521723,0.000728168662349,0.000727161091672,0.000726100965546,0.00072498070335,0.000723794098682,0.000722542346116,0.000721225567373,0.000719843269323,0.00071839334202,0.00071687405578,0.000715290709305,0.000713641939816,0.000711925003336,0.000710137936688,0.000708289823762,0.000706384980412,0.000704427123428,0.000702419486479,0.000700363871697,0.000698265708807,0.000696122836509,0.000693937550878,0.000691710575251,0.000689449647775,0.000687160031539,0.000684838978563,0.000682482771109,0.000680090950081,0.000677662471888,0.000675193535273,0.000672685636183,0.000670137984967,0.000667554525279,0.000664937275386,0.000662278633161,0.000659577057925,0.000656837470108,0.000654062963119,0.000651255570996,0.000648418655674,0.00064555822601,0.000642671879464,0.000639760138718,0.00063682001368,0.000633850736978,0.000630852800275,0.000627824776546,0.000624765181336,0.00062167217869,0.000618543935806,0.00061537841759,0.000612174673914,0.000608932547246,0.000605651974139,0.000602334667407,0.000598985417058,0.000595602106402,0.000592186145905,0.000588734548394,0.000585247940418,0.000581727376135,0.00057817387552,0.000574588594348,0.000570972647279,0.000567327485664,0.000563650644589,0.00055994326572,0.000556207455033,0.000552445946416,0.000548663079131,0.000544853943655,0.00054101898042,0.000537155474205,0.000533262565193,0.000529341115482,0.000525391385838,0.0005214138446,0.000517408386095,0.000513375063951,0.000509311960026,0.000505218025677,0.000501101832665,0.000496964119805,0.000492807748092,0.000488630604929,0.000484431209919,0.000480211012843,0.00047596683259,0.000471697521544,0.00046740305396,0.0004630850903,0.000458741162129,0.000454369554935,0.000449969186709,0.000445543787622,0.000441092355011,0.000436616329265,0.000432115817316,0.000427593533046,0.000423048785151,0.000418484077513,0.000413900739945,0.000409300595774,0.000404681604707,0.000400041685001,0.000395381898378,0.000390705057233,0.00038601402242,0.00038130852938,0.000376590364132,0.000371862091401,0.000367117958881,0.000362355504273,0.000357580664846,0.000352794867341,0.000348001539426,0.000343200467599,0.000338391315924,0.000333572388562,0.000328743374917,0.000323900652127,0.000319048898285,0.000314194637072,0.000309335069288,0.000304470197302,0.000299600808755,0.00029472435386,0.000289838868672,0.000284947532705,0.000280052968902,0.000275158801548,0.000270267283803,0.000265372482467,0.000260473252971,0.00025557263548,0.000250666896232,0.000245761445186,0.000240858441017,0.000235956619345,0.000231053226684,0.000226146669379,0.000221234456864,0.000216319705262,0.000211405666987,0.000206493715239,0.000201584562431,0.000196675618765,0.000191760056259,0.000186840340438,0.000181920576201,0.000177002984625,0.000172088071009,0.000167177159759,0.00016227009722,0.000157363227841,0.000152459562181,0.000147561071681,0.000142675043839,0.000137803377103,0.000132942704642,0.000128091266843,0.000123249677367,0.000118418283037,0.000113598240406,0.000108788522666,0.000103989350713,9.91967587775e-05,9.44081775628e-05,8.96219341458e-05,8.48416080936e-05,8.00724692914e-05,7.53131786928e-05,7.05637590608e-05,6.58215223524e-05,6.10907894911e-05,5.63726578886e-05,5.16704506937e-05,4.69880555057e-05,4.23265509061e-05,3.76861950193e-05,3.30615834814e-05,2.84504905156e-05,2.38544765148e-05,1.92740708335e-05,1.47084112816e-05,1.01530336256e-05,5.6093274513e-06,1.07756566687e-06,-3.44309234626e-06,-7.95183361665e-06,-1.24512748575e-05,-1.69344836036e-05,-2.14057928359e-05,-2.5861846586e-05,-3.03025225681e-05,-3.47251230886e-05,-3.91333855944e-05,-4.35236710299e-05,-4.7898087438e-05,-5.22583634224e-05,-5.65954261682e-05,-6.09109767434e-05,-6.52039540677e-05,-6.94712908899e-05,-7.37177929465e-05,-7.79384107422e-05,-8.21313183778e-05,-8.62983350553e-05,-9.04410676959e-05,-9.45556992782e-05,-9.86497300774e-05,-0.000102730902607,-0.000106794491621,-0.000110843181956,-0.000114873104413,-0.000118884156189,-0.000122879507349,-0.000126856517876,-0.000130810849518,-0.00013474416032,-0.000138656456848,-0.000142538491638,-0.000146387617502,-0.000150207674974,-0.00015399962321,-0.000157767653694,-0.000161509032504,-0.000165228175623,-0.000168923139219,-0.000172593422809,-0.000176236408965,-0.000179853035051,-0.000183446009519,-0.000187015762842,-0.000190557676428,-0.000194071981896,-0.000197555518927,-0.000201008743043,-0.000204428827561,-0.00020782709045,-0.000211203366237,-0.000214560230583,-0.000217898774418,-0.000221218024328,-0.000224521105505,-0.000227805928113,-0.000231070798367,-0.00023431208741,-0.000237531635236,-0.000240726658661,-0.000243890038826,-0.00024702189631,-0.000250122717464,-0.000253191710999,-0.000256225452366,-0.000259224572619,-0.000262190917107,-0.000265128702784,-0.000268042458817,-0.000270926756421,-0.000273784044004,-0.000276613166866,-0.000279414354672,-0.000282189271845,-0.000284943133152,-0.00028767569725,-0.000290388599918,-0.000293081438736,-0.000295750888544,-0.000298394575957,-0.000301016327864,-0.000303616501234,-0.000306197013469,-0.000308757449258,-0.000311289343225,-0.000313791850029,-0.000316264713318,-0.000318707032052,-0.00032111842359,-0.000323504026645,-0.000325865473108,-0.000328198902929,-0.000330501943916,-0.000332771560894,-0.000335010221657,-0.000337219833686,-0.000339400033165,-0.000341550378461,-0.000343671884953,-0.000345763189459,-0.000347815468097,-0.000349833623998,-0.000351818540835,-0.000353771441698,-0.000355690757789,-0.000357579059297,-0.000359438602104,-0.000361266364629,-0.000363065574261,-0.000364835086393,-0.000366586230268,-0.000368322535363,-0.000370039250272,-0.000371590250526,-0.00037282778835,-0.00037375478339,-0.000374366180579,-0.000374670984557)
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(270)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Heterocephalus_glaber-male-liver-H3K27Ac-ERR572262.50mers.unique.MACS2_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) : 270',bty='n')
dev.off()