# R script for Peak Model
#  -- generated by MACS
p <- c(0.0413228550559,0.0482078492654,0.0552898732636,0.0622411578693,0.0691519316773,0.069297402269,0.0693894722638,0.0696491096491,0.0698240426392,0.0699437336324,0.0699197954337,0.0700137068284,0.0699124298341,0.0698350910385,0.0698001044405,0.0698663948368,0.0694999562575,0.0696767306475,0.069597550452,0.0693765824645,0.0695570396543,0.0696288542502,0.0696178058509,0.069544149855,0.0697227656449,0.0697835318415,0.0699492578321,0.0698111528399,0.0697614350427,0.0697540694431,0.0695478326548,0.0694152518624,0.0693600098655,0.0695478326548,0.0695165288566,0.0694649696595,0.0694833836585,0.0694134104625,0.0693029264687,0.0694944320579,0.0696067574515,0.0694944320579,0.0694539212602,0.0694060448629,0.0693876308639,0.0696730478477,0.0696306956501,0.0694502384604,0.0697540694431,0.0694778594588,0.0694134104625,0.0698314082387,0.0698387738383,0.0696730478477,0.0694373486611,0.0691942838749,0.0692237462732,0.0693342302669,0.0690948482805,0.0693231818676,0.0694115690626,0.0690874826809,0.0689383292894,0.0689180738906,0.0690046196856,0.0687118371023,0.0684319443181,0.0683269845241,0.0683582883223,0.0681557343338,0.0680839197379,0.0679439733458,0.068063664339,0.0681060165366,0.0681962451315,0.0683951163202,0.0685258557128,0.0685829391096,0.0684963933145,0.0686602779052,0.0684190545189,0.0686786919041,0.0686602779052,0.0686823747039,0.0685516353113,0.0685976703087,0.0688149554964,0.0686676435048,0.0688849286924,0.0685645251106,0.0687762860986,0.0686492295058,0.068505600314,0.0686676435048,0.0688425764948,0.0686897403035,0.0684632481164,0.068733933901,0.0684558825168,0.0688057484969,0.0687744446987,0.0690083024854,0.0690414476836,0.0688499420944,0.0686437053061,0.0687099957024,0.0686381811064,0.0687007887029,0.0691243106789,0.0689769986872,0.0689383292894,0.0687063129026,0.0687818102983,0.0689880470866,0.0690764342816,0.0691445660777,0.0693802652643,0.0692219048733,0.0690322406841,0.0690396062837,0.0692642570709,0.0690819584813,0.0691427246778,0.0688444178947,0.0690322406841,0.0690396062837,0.0690543374828,0.0687910172978,0.068910708291,0.0689125496909,0.0688149554964,0.0690414476836,0.0690027782857,0.0692053322743,0.0693655340652,0.0694483970605,0.0695349428556,0.0697761662419,0.069755910843,0.0698019458404,0.0696454268493,0.0697651178425,0.069774324842,0.0699382094327,0.069650951049,0.0696564752487,0.0694539212602,0.0695515154546,0.069650951049,0.0695220530563,0.0696877790469,0.069667523648,0.0696988274463,0.0694778594588,0.0696270128503,0.0696067574515,0.0697282898446,0.0699584648315,0.0697006688462,0.0698921744353,0.0698848088357,0.0699253196334,0.0701278736219,0.0704758982022,0.0706416241928,0.0709049443778,0.0710504149696,0.0710485735697,0.0713376733533,0.0715475929414,0.0717759265284,0.0717888163277,0.0717170017318,0.0714223777485,0.0712271893596,0.0713745013512,0.071343197553,0.0712382377589,0.0710504149696,0.070796301784,0.0706821349905,0.0707870947845,0.0711038155666,0.0711737887626,0.0712050925608,0.0708883717788,0.071061463369,0.0712382377589,0.071413170749,0.0716930635331,0.0717777679283,0.0717446227302,0.0717943405274,0.0720263569142,0.0722086555039,0.0722197039033,0.0719987359158,0.0721939243047,0.0721423651077,0.071941652519,0.0719803219168,0.0721478893073,0.0720944887104,0.0720631849121,0.0722197039033,0.0725198520862,0.0728273658688,0.0729157530638,0.073088844654,0.0733374336399,0.0734571246331,0.0734202966352,0.0737535900163,0.0738567084104,0.0740058618019,0.0738548670105,0.073775686815,0.0737038722191,0.0738364530116,0.0739027434078,0.0738880122086,0.0741550151935,0.074234195389,0.0745214537727,0.0743023271851,0.0746982281627,0.0749357687492,0.0749633897476,0.075167785136,0.075397960123,0.0757349363039,0.0755949899118,0.0755968313117,0.0756115625109,0.0758491030974,0.0758270062986,0.0758693584962,0.0760516570859,0.0762763078732,0.0765727732563,0.0765746146562,0.0769557844346,0.0770257576306,0.077143607224,0.0771325588246,0.0771730696223,0.0771288760248,0.0771399244242,0.0767974240436,0.0766887814498,0.0768397762412,0.076790058444,0.0768471418408,0.0769557844346,0.0770994136265,0.0773443198126,0.0776223711968,0.0779133123803,0.0783313101566,0.0786019959412,0.07844731835,0.0788947785246,0.078817439729,0.0789205581232,0.0791046981127,0.0790697115147,0.0791746713087,0.079240961705,0.0794232602946,0.0794048462957,0.079769443475,0.0796571180814,0.0800088254614,0.0803568500417,0.0806938262226,0.0807951032168,0.0808926974113,0.0809240012095,0.0809700362069,0.0810897272001,0.0811762729952,0.0813604129847,0.0816182089701,0.0814027651823,0.0815556013737,0.0817526311625,0.0820362067464,0.0821264353413,0.0822221881359,0.0824376319236,0.0826107235138,0.0828795678986,0.0827819737041,0.0831428880836,0.0830637078881,0.0831613020826,0.083330710873,0.0838499856435,0.0843729432139,0.0849658739802,0.0856250951428,0.0862879991052,0.0873026104477,0.0880980952025,0.0892416045377,0.0904477214693,0.0915930722043,0.0925340275509,0.0933424021051,0.0942999300507,0.0950770008067,0.0955631303791,0.0960363701522,0.0963807119327,0.0964009673316,0.0967692473107,0.0972093418857,0.0977636032543,0.0981226762339,0.0981061036348,0.0983049748236,0.098420983017,0.0986916688016,0.0990286449825,0.0995074089553,0.0995221401545,0.0996731349459,0.0995736993516,0.0998001915387,0.100140850519,0.100269748512,0.100960273473,0.100921604075,0.101057867667,0.101269628655,0.101741027029,0.101812841625,0.101927008418,0.101847828223,0.102083527409,0.102265825999,0.101985933215,0.101949105217,0.102276874398,0.102376309993,0.102387358392,0.102470221387,0.102711444774,0.103037372555,0.102877170764,0.10295819236,0.103160746348,0.103692910918,0.103788663712,0.104051983898,0.104199295889,0.104409215477,0.104403691278,0.104519699471,0.104873248251,0.105105264638,0.105348329424,0.105274673428,0.105188127633,0.105158665235,0.105396205821,0.105646636207,0.106066475383,0.106344526768,0.106423706963,0.106585750154,0.106729379346,0.107158425521,0.107806598285,0.108080966869,0.108211706262,0.108307459056,0.108403211851,0.108152781465,0.108154622865,0.108491599046,0.108679421835,0.108865403225,0.10911583361,0.109596438983,0.109622218582,0.109835820969,0.11018568695,0.110800714515,0.111146897695,0.111378914082,0.111785863459,0.111841105456,0.111992100247,0.111887140453,0.112190971436,0.112505850818,0.112516899217,0.112535313216,0.112868606597,0.113242410776,0.113397088367,0.113767209746,0.113389722768,0.113750637147,0.114170476324,0.114071040729,0.114183366123,0.114424589509,0.114575584301,0.114557170302,0.114632667697,0.114509293904,0.115332399658,0.115216391464,0.115155625268,0.11563991344,0.115910599225,0.116137091412,0.116091056415,0.116186809209,0.115940061623,0.116253099605,0.116275196404,0.116512736991,0.116614013985,0.116463019194,0.116512736991,0.116466701993,0.11669871838,0.116601124186,0.116925210567,0.11706147416,0.117133288755,0.117496044535,0.117803558317,0.117910359511,0.118020843505,0.118414903083,0.118599043072,0.119039137647,0.119414783226,0.119768332006,0.119970885995,0.119948789196,0.120188171182,0.120654045356,0.121333521917,0.121344570317,0.121353777316,0.121265390121,0.121390605314,0.121313266518,0.121243293322,0.121451371511,0.121548965705,0.121344570317,0.120746115351,0.120683507754,0.120591437759,0.12093393814,0.121055470533,0.121051787733,0.121399812313,0.121412702113,0.121243293322,0.12146241991,0.121843589688,0.121933818283,0.122458617253,0.122228442266,0.122226600867,0.122009315679,0.121961439282,0.121957756482,0.122267111664,0.122068240476,0.122117958273,0.12217135887,0.122303939662,0.122425472055,0.12233892626,0.122631708844,0.122609612045,0.122766131036,0.122561735648,0.122766131036,0.122663012642,0.122729303038,0.122812166033,0.122810324633,0.122966843625,0.12269431644,0.122723778838,0.122423630655,0.122197138468,0.12198721888,0.121793871891,0.121873052087,0.121438481711,0.121403495113,0.121206465324,0.121674180898,0.121399812313,0.121486358109,0.121431116112,0.121666815298,0.121727581495,0.121440323111,0.121127285129,0.120871330543,0.120775577749,0.120611693158,0.120464381167,0.120131087785,0.120127404986,0.119549205418,0.119203022238,0.118792390061,0.118523545677,0.11847198648,0.118171838297,0.117643356527,0.117492361735,0.117420547139,0.11758074893,0.11758259033,0.117597321529,0.117748316321,0.117840386315,0.117484996136,0.117252979749,0.117534713933,0.117240089949,0.116864444371,0.116374631999,0.116358059399,0.116223637207,0.116249416806,0.116149981211,0.116232844207,0.116240209806,0.115501808448,0.115260585062,0.115067238073,0.114774455489,0.114465100307,0.11405999233,0.113717491949,0.113362101769,0.112750757004,0.11247638842,0.112422987823,0.112351173227,0.112573982614,0.11229593123,0.112104425641,0.112190971436,0.111898188852,0.112063914843,0.112496643819,0.112365904426,0.112310662429,0.112362221626,0.112205702635,0.112306979629,0.112027086845,0.111887140453,0.111887140453,0.111502287875,0.111139532095,0.110944343707,0.110793348915,0.110605526126,0.110634988524,0.110566856728,0.110819128514,0.110903832909,0.110861480711,0.11053371153,0.110283281144,0.109984974361,0.109856076368,0.109441761392,0.108913279622,0.108648118037,0.108178561063,0.107780818686,0.107327834312,0.107140011522,0.107149218522,0.107075562526,0.106600481353,0.106495521559,0.106326112769,0.10595599139,0.105659526006,0.104845627253,0.10435397348,0.103633986121,0.102759321171,0.10154031444,0.100614090293,0.0993582555638,0.0980213992396,0.096640349318,0.0953513693911,0.0945337878375,0.0934307893,0.0928047133356,0.091826929991,0.0913242278195,0.0908896574442,0.0903630170741,0.0901199522879,0.0899210810991,0.0894496827259,0.0890445747489,0.0888898971576,0.0886173699731,0.0882914421916,0.0882012135967,0.0879231622125,0.0877500706223,0.0873762664435,0.0873596938444,0.0871994920535,0.0871258360577,0.0869637928669,0.0868533088732,0.0867538732788,0.0864242626975,0.0864739804947,0.0864353110969,0.0864905530937,0.0861701495119,0.0862309157085,0.0859639127236,0.0857521517356,0.0855495977471,0.0853875545563,0.0854667347518,0.0854041271554,0.0853691405574,0.0850892477732,0.0850781993739,0.0849437771815,0.0847743683911,0.084387674413,0.0840727950309,0.0837855366472,0.0835553616602,0.0831944472807,0.0830563422885,0.0828924576978,0.0824449975232,0.0823124167307,0.0823989625258,0.0825112879195,0.0823326721296,0.0823842313267,0.0823474033288,0.0823216237302,0.08197359915,0.0818833705551,0.0819717577501,0.0819828061494,0.0817857763606,0.0817029133653,0.0814985179769,0.0812517703909,0.0811339207976,0.0809203184097,0.0810087056047,0.0809037458107,0.0807048746219,0.0804341888373,0.0803255462435,0.0802610972471,0.0802868768456,0.0802353176486,0.0801248336548,0.0802058552502,0.0799554248644,0.0798173198723,0.0798154784724,0.0797749676747,0.0796792148801,0.0794306258942,0.0795245372889,0.0794398328937,0.0793403972993,0.0789739587201,0.0789610689209,0.0789481791216,0.078605678741,0.0784565253495,0.0782060949637,0.0781582185664,0.078023796374,0.0778985811811,0.0774805834048,0.0770404888298,0.0767605960457,0.0766151254539,0.0766685260509,0.0764475580634,0.0764217784649,0.0763278670702,0.0759706354905,0.0759853666897,0.0757901783007,0.0761105818826,0.0760811194842,0.0758270062986,0.0757957025004,0.0755507963143,0.0755323823154,0.075256172331,0.0752874761292,0.075239599732,0.0754697747189,0.0752874761292,0.0752322341324,0.0749689139473,0.0746706071642,0.0747405803603,0.0742581335876,0.0741771119922,0.0740518967993,0.0739414128056,0.073880646609,0.0737904180142,0.0735510360277,0.0736412646226,0.073899060608,0.0738603912102,0.073952461205,0.073934047206,0.0737867352144,0.073794100814,0.0735712914266,0.0733116540413,0.0731606592499,0.0731183070523,0.072770282472,0.0726008736816,0.0725106450868,0.0722399593021,0.0723706986947,0.0722086555039,0.0724940724877,0.072558521484,0.0727297716743,0.072770282472,0.0728899734652,0.0728126346696,0.0727758066717,0.0729010218646,0.0729065460643,0.0724940724877,0.0719029831212,0.0717354157307,0.0718735207229,0.0717170017318,0.0714463159471,0.071378184151,0.0713100523549,0.0712124581604,0.0708386539816,0.0710835601677,0.071061463369,0.0709638691745,0.0705771751964,0.0707005489894,0.0706397827929,0.070479581002,0.0704317046047,0.0704758982022,0.070479581002,0.0702088952173,0.0702070538174,0.070109459623,0.0697374968441,0.0694944320579,0.0694023620631,0.0693084506684,0.0692495258718,0.0690303992842,0.0687854930981,0.068715519902,0.0686823747039,0.0686731677044,0.0688260038958,0.0687781274985,0.0686031945084,0.0685240143129,0.0683711781216,0.0682330731294,0.0683859093207,0.0682293903296,0.0681336375351,0.0680489331399,0.0680544573395,0.0679366077462,0.0679034625481,0.0679955325429,0.068098650937,0.0681649413333,0.0679918497431,0.0679789599438,0.0678629517504,0.0678261237525,0.0677616747562,0.0675793761665,0.0675057201707,0.0673492011795,0.0670453701968,0.0669790798005,0.0671337573918,0.0671411229914,0.0668023054106,0.0671429643912,0.0672865935831,0.0673676151785,0.0674928303714,0.0674541609736,0.0677174811587,0.0678960969485,0.0676843359605,0.067923717947,0.0682735839271,0.0681336375351,0.0677948199543,0.0680526159396,0.0680176293416,0.0681465273343,0.0681851967321,0.067975277144,0.068082078338,0.0679310835465,0.0677414193573,0.0676383009631,0.0679145109475,0.0675112443704,0.0675296583693,0.0674780991722,0.0674154915758,0.0675683277671,0.0676088385648,0.0676438251628,0.0680968095371,0.0679697529443,0.0677892957546,0.0681189063359,0.0683619711221,0.0682772667269,0.0681152235361,0.0679274007468,0.0676548735622,0.0674854647718,0.0671982063881,0.0671079777932,0.0670453701968,0.0667010284163,0.0663253828376,0.0663437968366,0.0662517268418,0.0664045630331,0.0665905444226,0.0667010284163,0.066618165421,0.0666052756217,0.0666310552203,0.0666476278193,0.0666973456165,0.0667341736144,0.0666991870164,0.0663935146338,0.0659276404602,0.0658153150666,0.0659110678611,0.0661762294461,0.0662277886432,0.0665555578246,0.066759953213,0.066724966615,0.0669938109997,0.0672810693834,0.0675462309684,0.0677266881581,0.0678887313489,0.0678298065523,0.067923717947,0.0677745645554,0.0677009085596,0.0677892957546,0.067781930155,0.0675812175664,0.0675904245659,0.0676530321623,0.0672552897849,0.0672147789872,0.0671705853897,0.0675812175664,0.0676088385648,0.0676327767635,0.0677487849569,0.0678537447509,0.0680894439376,0.0680342019407,0.0682422801289,0.0682422801289,0.0682791081268,0.0677911371545,0.0676972257598,0.0676125213646,0.0673455183798,0.0674615265732,0.0672608139846,0.0674523195737,0.0675020373709,0.0676162041644,0.0678371721519,0.0680342019407,0.0681391617347,0.068187038132,0.0682146591305,0.0679126695476,0.0680194707415,0.0679494975455,0.0680968095371,0.0679163523474,0.0678021855539,0.0676493493625,0.0675057201707,0.0674578437734,0.0675554379679,0.0679992153427,0.0682901565262,0.0682606941278,0.0682919979261,0.0683122533249,0.0683785437212,0.0683490813228,0.0687007887029,0.068803907097,0.0690432890835,0.0690764342816,0.0689015012915,0.0688683560934,0.0687891758979,0.0690451304833,0.069122469279,0.0690524960829,0.0689346464896,0.0691279934786,0.0689733158874,0.0688075898968,0.0688959770918,0.0689954126862,0.0690414476836,0.0694226174619,0.0692366360725,0.0694447142607,0.0693802652643,0.0692937194692,0.069404203463,0.0697688006423,0.0696951446465,0.069720924245,0.069967671831,0.0695809778529,0.069774324842,0.0700081826287,0.0700358036271,0.0701554946204,0.0699934514296,0.0697982630406,0.0699879272299,0.0701941640182,0.0700542176261,0.0701647016198,0.0701757500192,0.0702309920161,0.0704574842032,0.0704501186036,0.0707281699879,0.0706802935906,0.0708073501834,0.0708902131787,0.0711737887626,0.0712916383559,0.0713100523549,0.0711811543622,0.0711295951651,0.0713192593543,0.0713137351547,0.0712842727563,0.0711774715624,0.0711590575634,0.0709914901729,0.0708552265807,0.0709159927772,0.0708736405796,0.0709749175739,0.0707834119847,0.0708883717788,0.0708423367814,0.0708091915833,0.0708073501834,0.0707152801886,0.0707594737861,0.0708423367814,0.0710798773679,0.0708386539816,0.0708773233794,0.0707336941876,0.0709123099774,0.0710135869717,0.0708902131787,0.0712566517579,0.0713892325504,0.0715181305431,0.0715033993439,0.0716359801364,0.0718698379231,0.0721110613094,0.072330187897,0.0723559674955,0.0724922310878,0.0724425132906,0.0725032794872,0.072558521484,0.0725732526832,0.0727408200737,0.0725824596827,0.0724627686895,0.0723780642943,0.0724940724877,0.0726211290805,0.0727371372739,0.0726524328787,0.0726100806811,0.0726340188798,0.0728107932697,0.0730851618542,0.0729875676597,0.0731606592499,0.0731348796514,0.0730538580559,0.0727776480716,0.0729912504595,0.0730243956576,0.0731109414527,0.0733024470418,0.0731385624511,0.0735620844271,0.0736302162233,0.0739248402065,0.0738769638093,0.0738327702118,0.0736596786216,0.0735381462285,0.0735013182306,0.0731919630481,0.0731385624511,0.0727813308714,0.0724682928892,0.0723246636973,0.0725658870836,0.0726634812781,0.0726800538772,0.0727224060747,0.0726100806811,0.0726579570784,0.0728163174694,0.0728568282671,0.0731790732488,0.0732379980455,0.073000457459,0.0731809146487,0.0735160494297,0.0736007538249,0.0736817754203,0.0737627970157,0.0740003376023,0.0741181871956,0.0740021790022,0.0739432542055,0.0739948134026,0.0739303644062,0.0736780926205,0.0737093964188,0.0738493428108,0.0739285230063,0.073652313022,0.0737278104177,0.0739469370053,0.0738714396096,0.0740426897999,0.0741955259912,0.0742139399901,0.0743538863822,0.0744570047764,0.0742968029854,0.0743723003812,0.0743741417811,0.0743354723832,0.0744735773754,0.0746172065673,0.0745417091715,0.074427542378,0.074445956377,0.0741955259912,0.0743336309834,0.0742599749875,0.0743354723832,0.0742028915908,0.074092407597,0.0738732810095,0.0738346116117,0.0740647865986,0.0739708752039,0.0743409965829,0.0743281067837,0.0745269779724,0.0745306607722,0.0743594105819,0.0743244239839,0.0744128111789,0.0744072869792,0.0746190479672,0.0745011983738,0.0742968029854,0.0741752705923,0.0740905661971,0.0740187516012,0.0741292355949,0.0742968029854,0.0742562921877,0.0744551633765,0.0741034559964,0.0743686175814,0.0745048811736,0.074674289964,0.0745564403707,0.074674289964,0.0748123949562,0.0748179191559,0.0746853383634,0.0744036041794,0.0745527575709,0.0742802303864,0.0742286711893,0.0742783889865,0.0742728647868,0.074057420999,0.0741844775918,0.0741292355949,0.0741255527952,0.0744901499745,0.074410969779,0.0746411447659,0.0744993569739,0.074145808194,0.0742765475866,0.0742249883895,0.074092407597,0.0740905661971,0.0743152169844,0.0741255527952,0.0737848938145,0.0734037240361,0.0735270978291,0.0735252564292,0.0734736972321,0.0737278104177,0.0736928238197,0.0736081194245,0.0735878640257,0.0734000412363,0.073705713619,0.0740187516012,0.0738603912102,0.074322582584,0.0743520449823,0.0741218699954,0.0741181871956,0.0741863189917,0.0741310769948,0.074339155183,0.0745932683686,0.074622730767,0.074622730767,0.074269181987,0.0743980799797,0.0744735773754,0.0742194641898,0.0742526093879,0.0743262653838,0.0741494909938,0.0737683212154,0.0738254046122,0.0737959422139,0.0738972192081,0.0663493210363,0.0589837214541,0.0518133102608,0.0443648476834,0.0)
m <- c(0.0443396680858,0.0516379550134,0.0590539562463,0.0664405289029,0.0738528515638,0.0738381372756,0.073696512252,0.0737590479767,0.0736082265231,0.073689155108,0.0737057086821,0.0739356194347,0.0738859587121,0.0738179051294,0.0738933158562,0.0737388158305,0.0737424944025,0.0738234229874,0.0739245837185,0.0739448158648,0.0739356194347,0.0738694051379,0.0740183873056,0.0740018337314,0.0739907980153,0.0742648516322,0.0742556552021,0.0741857623334,0.0742869230645,0.0742685302043,0.0743089944967,0.0743733695074,0.0741563337571,0.0744359052321,0.0743862445096,0.0742648516322,0.0745278695331,0.07461247669,0.0744947623848,0.0746308695502,0.0743016373526,0.0744487802343,0.0745407445353,0.0744193516579,0.0745738516836,0.0746823695588,0.0744892445267,0.0742482980581,0.0741655301872,0.0740680480281,0.0745241909611,0.0744303873741,0.0744175123719,0.0743770480795,0.0741765659033,0.0745223516751,0.0744083159418,0.0744027980838,0.0746511016965,0.0749490660317,0.0749012445952,0.0748074410082,0.0748239945823,0.0749895303242,0.0751164410595,0.0748129588662,0.0746713338427,0.0747982445781,0.0747596195716,0.0744322266601,0.0742685302043,0.0739227444325,0.0739006730003,0.0739319408626,0.0739595301529,0.073966887297,0.0743034766387,0.0744542980923,0.0742225480538,0.0742482980581,0.0744929230987,0.0749803338941,0.0752911732314,0.0750796553391,0.0751440303498,0.0751348339197,0.0750391910467,0.0748147981522,0.074790887434,0.0747669767157,0.0749067624532,0.0748147981522,0.0747522624276,0.0747099588491,0.0746511016965,0.074698923133,0.0746529409825,0.0748129588662,0.075158744638,0.0752617446551,0.0747651374297,0.0745444231073,0.0744726909525,0.0745002802428,0.0744892445267,0.0742997980666,0.0746878874169,0.0745904052578,0.0743089944967,0.0741894409054,0.0743126730688,0.0742703694903,0.0742611730602,0.074336583787,0.0743568159332,0.0745572981094,0.0741305837528,0.0741820837613,0.0742059944796,0.0741894409054,0.0741452980409,0.0742814052064,0.0742354230559,0.0741655301872,0.0741967980495,0.0740846016023,0.0741103516066,0.0740662087421,0.0740220658776,0.0739301015766,0.0741802444753,0.0741747266173,0.0740036730174,0.0740459765959,0.0739816015852,0.0741600123291,0.0742133516237,0.0742630123462,0.0744874052407,0.0746529409825,0.0747357088534,0.0748534231587,0.0751348339197,0.0750888517692,0.0750870124832,0.0747541017136,0.0745775302557,0.074610637404,0.0746584588405,0.0746382266943,0.0744101552278,0.0742004766215,0.0740220658776,0.0740901194603,0.0738914765702,0.0740514944539,0.074338423073,0.0742133516237,0.0740662087421,0.0740772444582,0.0740275837357,0.0738620479939,0.0738381372756,0.0737296194004,0.0739448158648,0.0739135480024,0.0733709586265,0.0734059050609,0.0734463693533,0.0732992264717,0.0733525657663,0.0735953515209,0.0733746371985,0.0733893514867,0.0732642800373,0.0731870300245,0.0736137443811,0.0734647622135,0.0733544050523,0.0733930300587,0.0734371729232,0.0733378514781,0.0734298157791,0.0733727979125,0.0731907085965,0.0731189764417,0.0730196549967,0.0732918693276,0.0733010657577,0.0731318514439,0.0730233335687,0.0730858692934,0.0730858692934,0.0729332085537,0.0731244942998,0.0730582800031,0.0728559585409,0.072499137053,0.0724844227648,0.072409012038,0.0723464763133,0.0721938155737,0.0721901370016,0.0721809405715,0.0719657441072,0.0719105655266,0.0721184048468,0.0721864584296,0.0722011727177,0.0723924584638,0.0722729048725,0.0723685477456,0.0724457977584,0.0725212084852,0.0726462799346,0.0727971013882,0.0724163691821,0.0723244048811,0.0723280834531,0.0721478334231,0.0720908155565,0.0719032083825,0.0716199583354,0.0715187976043,0.0711711725465,0.0710736903874,0.0713863690108,0.0714231547312,0.0711564582583,0.0711086368218,0.0710479403831,0.071213476125,0.0714360297334,0.0714102797291,0.0717579047869,0.07167329763,0.0716089226193,0.0715298333204,0.0716309940515,0.0715794940429,0.0717854940772,0.0716659404859,0.0713293511442,0.0714397083054,0.0712521011314,0.0711527796863,0.0708658510672,0.0707757260522,0.0705458152997,0.0707334224737,0.0707223867576,0.0704391367105,0.0702883152569,0.0700823152226,0.0701614045215,0.0701797973817,0.0701816366677,0.0701485295193,0.0699406901991,0.0695949044273,0.0692730293738,0.0695617972789,0.069749404453,0.069565475851,0.0692656722297,0.0693300472404,0.0691681900706,0.0694624758339,0.0694514401177,0.069565475851,0.0695838687112,0.0693226900963,0.0694275293995,0.0695434044187,0.0696795115842,0.0694146543973,0.0695617972789,0.0690431186213,0.0691792257868,0.069111172204,0.0692399222254,0.0693061365221,0.0690302436191,0.0689677078945,0.0687230828538,0.0686403149829,0.0687525114301,0.0688665471633,0.0688959757397,0.0688536721612,0.0684894935292,0.0683883327981,0.0684453506648,0.068379136368,0.0684435113787,0.0684784578131,0.0682136006262,0.0681179577532,0.0679928863038,0.0680204755941,0.0683552256498,0.0684361542347,0.0685814578302,0.06856306497,0.0685134042475,0.0682632613488,0.068287172067,0.068283493495,0.0683460292197,0.0685207613916,0.0684140828024,0.068471100669,0.0682706184928,0.0683809756541,0.068289011353,0.0688665471633,0.0687561900021,0.0688260828709,0.0688095292967,0.068471100669,0.0683294756455,0.0681529041876,0.06819336848,0.0680756541747,0.0682227970563,0.0678567791383,0.0682080827682,0.0683864935121,0.0683478685057,0.0685961721184,0.0685722614001,0.068559386398,0.0685207613916,0.0686016899765,0.0683589042218,0.0684196006605,0.0681418684714,0.0679689755856,0.0680315113102,0.0678549398523,0.0680167970221,0.0680830113188,0.0680020827339,0.0679450648673,0.0683533863638,0.0685115649615,0.0684876542432,0.0685134042475,0.0681731363338,0.0682044041961,0.0680425470264,0.0677997612717,0.0677721719814,0.0676967612546,0.0673123504764,0.0671229040163,0.0672479754657,0.0672406183216,0.0673197076205,0.067553296945,0.0676765291084,0.0679892077318,0.0679928863038,0.0680351898823,0.0681106006091,0.0680903684629,0.0678089577018,0.0677059576847,0.0679101184329,0.0676195112417,0.0675017969365,0.0676562969621,0.0677942434137,0.0678512612803,0.0678365469921,0.0682963684971,0.0684306363766,0.0685685828281,0.068465582811,0.0685906542603,0.0686127256926,0.0684287970906,0.0683975292282,0.0685704221141,0.0686347971248,0.0682540649187,0.0681437077575,0.0681860113359,0.068377297082,0.0684048863723,0.068746993572,0.0687341185699,0.0687138864237,0.0685152435335,0.0685373149658,0.068655029271,0.0689364400321,0.0688224042989,0.0687929757225,0.0690008150428,0.0688224042989,0.0688591900193,0.0689897793267,0.0693079758082,0.0695286901306,0.069296940092,0.069471672264,0.0696298508617,0.0695342079886,0.0694514401177,0.0694330472575,0.0693171722383,0.0691939400749,0.0691295650642,0.06911301149,0.0693024579501,0.0691497972104,0.0692491186555,0.0693741901049,0.0694624758339,0.0694256901134,0.0697199758767,0.0699535652012,0.0700363330721,0.0701963509559,0.0704299402804,0.0704299402804,0.0702791188268,0.0704060295621,0.0705568510158,0.0707352617597,0.0705660474459,0.0706249045985,0.0704979938631,0.0704078688482,0.0705237438674,0.0706561724609,0.0709541367961,0.0711711725465,0.0711123153939,0.0713551011485,0.0716585833418,0.0717064047783,0.0720246012598,0.0721901370016,0.0721735834274,0.0721680655694,0.0720319584039,0.0721000119866,0.0722949763048,0.0722158870059,0.0721754227134,0.0721699048554,0.0720650655522,0.0722140477199,0.072589262068,0.0727676728119,0.0730031014225,0.0729111371215,0.0727897442442,0.0729184942656,0.0730766728633,0.0733415300502,0.0735879943769,0.0734849943597,0.0732845121836,0.0734261372071,0.0736431729575,0.0737774408369,0.0736578872456,0.0736817979639,0.0739061908583,0.0738583694218,0.074057012312,0.0740239051636,0.0741213873227,0.0741452980409,0.0742814052064,0.0744634945224,0.0746584588405,0.0747412267114,0.0746511016965,0.0747412267114,0.0744616552364,0.0750060838983,0.075155066066,0.0753095660916,0.0750722981951,0.0751219589176,0.0753702625303,0.0753794589604,0.0754291196829,0.0755082089818,0.0758061733171,0.0758392804654,0.0760158519233,0.0761372448007,0.0761501198028,0.076258637678,0.0763745126973,0.0765860305896,0.0767865127658,0.0768600842066,0.0770789592429,0.0769722806538,0.0769502092215,0.0770127449462,0.077354852146,0.0773971557244,0.0774173878706,0.0774284235868,0.0774357807308,0.0776712093414,0.0777558164983,0.0779746915347,0.0779507808165,0.0780133165411,0.0781291915604,0.0783499058828,0.0786699416503,0.0790138881361,0.0792713881789,0.079468191783,0.0796870668194,0.0798250132709,0.080012620445,0.0802112633351,0.0805938348273,0.0810168706119,0.081027906328,0.0808586920142,0.0809267455969,0.0812504599365,0.0808844420185,0.0810977991968,0.0815815314201,0.0817912100264,0.0819788172004,0.0818353528908,0.0819567457682,0.0823761029807,0.0824459958495,0.0826556744558,0.0831118173888,0.083043763806,0.0829646745072,0.0833711567176,0.0832791924166,0.0834392103003,0.0837390139216,0.0839284603817,0.0841031925536,0.0837077460593,0.0838787996591,0.0839965139644,0.084145496132,0.0841123889837,0.0842889604416,0.0844728890436,0.0846604962177,0.0847892462391,0.0850099605615,0.0855323177912,0.0856647463846,0.0859829428661,0.0861153714595,0.0861815857563,0.086253317911,0.0862404429089,0.0862238893347,0.0864648358034,0.0864446036571,0.0862294071928,0.0864519608012,0.0864114965088,0.0865476036743,0.0864905858076,0.0866377286892,0.0869779966029,0.0871343359147,0.0872354966458,0.0875592109853,0.0879804074839,0.0880613360688,0.0885285147179,0.0885193182878,0.0890214433712,0.0891170862443,0.0892237648335,0.0893488362828,0.0896081756116,0.0896633541922,0.0898086577878,0.0901103006951,0.0899760328157,0.0901286935553,0.0901084614091,0.0902261757144,0.090739336514,0.0914161937694,0.0920397117302,0.093034765467,0.0940702834963,0.0949476229279,0.0962737481484,0.0976495340914,0.0992497129288,0.100936338209,0.102061981254,0.103229927876,0.104283838766,0.10487792815,0.105652267565,0.106156231934,0.106715374884,0.107228535684,0.107191749963,0.10726716069,0.107506267873,0.107758250058,0.107931142944,0.108319232294,0.10836705373,0.108795607373,0.10924991102,0.109729964671,0.110110696877,0.11056683981,0.11086296486,0.111078161324,0.111271286356,0.11125105421,0.111420268524,0.11142210781,0.111067125608,0.11068271483,0.110601786245,0.110535571948,0.110425214787,0.110474875509,0.110489589797,0.110883197006,0.110912625582,0.111300714932,0.111664893564,0.11219828651,0.11234175082,0.112716965168,0.112915608058,0.113068268798,0.113362554561,0.113373590277,0.113568554595,0.113456358148,0.113233804539,0.113110572376,0.11327059026,0.113403018853,0.113719376049,0.113824215352,0.113596143885,0.11363109032,0.113603501029,0.113864679644,0.114295072573,0.114556251188,0.114799036942,0.114716269072,0.114732822646,0.114804554801,0.115220233441,0.115630394224,0.115963304993,0.116327483625,0.116441519358,0.116619930102,0.11692157301,0.116763394412,0.116573947952,0.116914215866,0.116893983719,0.116844322997,0.116785465844,0.116783626558,0.116636483677,0.116638322963,0.11696755516,0.117427376665,0.117659126704,0.117855930308,0.118111591065,0.118396680398,0.118966859064,0.118979734066,0.119647394891,0.120037323528,0.119908573506,0.120169752121,0.120850287949,0.120855805807,0.121047091553,0.121199752292,0.121254930873,0.121374484464,0.121438859475,0.121459091621,0.121368966606,0.121109627277,0.120953287966,0.120763841506,0.120750966503,0.120813502228,0.120850287949,0.121100430847,0.121139055854,0.121155609428,0.121635663079,0.12205134172,0.12224078818,0.122459663216,0.122658306106,0.122741073977,0.12264727039,0.122336431053,0.122334591767,0.12223159175,0.122075252438,0.121825109539,0.121418627329,0.121685323802,0.121665091655,0.121668770227,0.121788323819,0.122169056025,0.122330913195,0.122053181006,0.122128591732,0.122389770347,0.122724520403,0.12249460965,0.122007198855,0.121874770262,0.121828788111,0.121563930924,0.121438859475,0.121698198804,0.121740502382,0.121751538098,0.121543698778,0.12117768086,0.121460930907,0.121470127337,0.121332180886,0.121199752292,0.121102270133,0.121098591561,0.120933055819,0.120443805738,0.120228609274,0.120327930719,0.120361037867,0.120188144981,0.120418055734,0.120548645041,0.120375752155,0.120370234297,0.120009734237,0.120033644956,0.120158716405,0.120020769953,0.119667627038,0.119748555622,0.119472662719,0.119220680535,0.118974216208,0.118733269739,0.118374608965,0.118271608948,0.117999394617,0.118100555349,0.118187001791,0.117502787392,0.117068715891,0.116798340846,0.116820412279,0.116654876537,0.116649358679,0.116619930102,0.116421287212,0.116003769286,0.115760983531,0.11584007283,0.115547626353,0.115398644185,0.114848697665,0.11442566188,0.114554411902,0.114090911825,0.11403757253,0.1140283761,0.113706501047,0.113482108152,0.113401179567,0.113322090268,0.113517054586,0.113597983171,0.113300018836,0.113347840273,0.113235643825,0.113027804505,0.112790536609,0.112796054467,0.112722483026,0.112167018648,0.111808357874,0.111446018528,0.111238179208,0.110787554133,0.110552125522,0.110447286219,0.110208179036,0.109820089686,0.109538678925,0.109580982504,0.109157946719,0.109062303846,0.108744107364,0.108782732371,0.108442464457,0.107921946513,0.107839178643,0.107655250041,0.107403267856,0.107250607116,0.107259803546,0.107105303521,0.106891946342,0.106579267719,0.106259231951,0.106288660528,0.106021964055,0.106020124769,0.105900571177,0.10559892827,0.105473856821,0.105102321045,0.105061856752,0.104938624589,0.104923910301,0.1046608924,0.104530303092,0.104234178043,0.103877356555,0.103623535085,0.10323728502,0.103240963592,0.103375231472,0.103033124272,0.102852874242,0.102551231335,0.102560427765,0.102608249201,0.102795856376,0.102630320634,0.102578820625,0.102466624178,0.102080374114,0.102330517012,0.101900124084,0.101859659791,0.101434784721,0.101164409676,0.100746891749,0.100908748919,0.100770802467,0.100518820283,0.100167516653,0.099908177324,0.100136248791,0.0998456415993,0.0997683915865,0.0994612308211,0.0992773022191,0.0989131235872,0.0986813735486,0.09844042708,0.0982289091877,0.0977378198203,0.0973147840357,0.0972816768874,0.0969634804059,0.0969064625393,0.0969414089737,0.09697083755,0.0966857482169,0.0965772303417,0.0968181768103,0.0966250517782,0.0961376409829,0.095506765878,0.0948299086226,0.0938753191782,0.0928913011575,0.091658979524,0.0906933543635,0.0893856220032,0.0877891217378,0.0865512822463,0.085427478488,0.0846329069274,0.0838861568032,0.0831872281156,0.0825489958666,0.0820211207789,0.0816790135791,0.0814251921084,0.0811492992054,0.0809580134593,0.0810922813387,0.0810168706119,0.081119870629,0.0809764063195,0.080748334853,0.0806214241176,0.0804981919543,0.0804816383801,0.0804356562296,0.0805809598252,0.0803933526511,0.0800622811675,0.0796815489613,0.079556477512,0.0798176561268,0.0798673168494,0.0796300489528,0.0794056560583,0.0793247274735,0.0790911381489,0.0788980131168,0.0787839773836,0.0788593881104,0.079008370278,0.0786055666396,0.0781512629926,0.0779581379605,0.0779710129627,0.0776215486189,0.0775148700297,0.0773842807223,0.077354852146,0.0771874771181,0.0768656020646,0.0769520485076,0.0770936735311,0.0770532092387,0.0770053878021,0.0771249413935,0.0769097449291,0.0768729592087,0.0766007448777,0.0765731555874,0.0764241734198,0.0764057805596,0.07626231625,0.0760176912094,0.0757951376009,0.0755836197086,0.0756884590118,0.0755321197001,0.0755781018506,0.0753573875282,0.075252548225,0.0749343517436,0.0749932088962,0.0751918517864,0.075070458909,0.0749987267543,0.0749417088876,0.0747338695674,0.0746492624104,0.0746032802599,0.0743604945053,0.0741618516151,0.0737314586864,0.0736358158134,0.0734941907898,0.0734353336372,0.0731667978783,0.0731667978783,0.0730785121493,0.0727566370958,0.0730251728547,0.073144726446,0.0731594407342,0.0729663157021,0.0728835478312,0.0727989406743,0.0728044585323,0.072863315685,0.0723759048896,0.0723078513069,0.0719363155308,0.0715702976128,0.0714617797377,0.0713624582926,0.0714213154452,0.0713183154281,0.0709762082284,0.0707444581898,0.0710277082369,0.0710001189466,0.0707867617683,0.0707113510415,0.0708621724951,0.07076285105,0.0707021546114,0.0704005117041,0.0705881188781,0.0705090295793,0.0702901545429,0.0701264580871,0.0702680831106,0.0703177438332,0.0699995473517,0.0699590830593,0.0696408865778,0.0699204580528,0.0696059401434,0.069563636565,0.0697567615971,0.069841368754,0.06966295801,0.069754922311,0.0698542437561,0.0700473687882,0.070205547386,0.0700878330807,0.0700694402205,0.0700970295108,0.0699995473517,0.0700069044958,0.0700179402119,0.0698781544744,0.0699646009173,0.0695783508531,0.0695213329865,0.0693466008146,0.0693576365307,0.0692564757996,0.0690357614772,0.0689916186127,0.0689695471805,0.068655029271,0.0683644220799,0.0683184399294,0.0681565827596,0.068009439878,0.0678016005577,0.0676158326697,0.0675698505192,0.067457654072,0.0674061540634,0.0673546540549,0.0675091540805,0.0677022791126,0.0676875648245,0.0676930826825,0.0677574576932,0.0680499041704,0.068011279164,0.0679027612888,0.0679928863038,0.0682136006262,0.0680958863209,0.0678512612803,0.0679744934436,0.0680885291769,0.0682283149144,0.0679616184415,0.0680701363167,0.0680462255984,0.0681197970392,0.0680499041704,0.0682264756284,0.0684784578131,0.0682136006262,0.06801311845,0.0679505827254,0.0680940470349,0.068009439878,0.0682338327724,0.0680039220199,0.0677648148373,0.0677206719728,0.0674834040763,0.0676103148116,0.0677924041276,0.0677629755513,0.0675569755171,0.0673987969193,0.0672553326098,0.0671780825969,0.0675054755085,0.0671927968851,0.0674171897795,0.0672884397581,0.0671026718701,0.0670199039992,0.0669555289885,0.0670456540035,0.0669776004207,0.0669481718444,0.0669628861326,0.0668727611176,0.0665692789243,0.0666980289457,0.0668635646875,0.066821261109,0.0670309397153,0.0670603682916,0.0671026718701,0.0674521362139,0.0672829219001,0.0673454576248,0.0673932790613,0.0671468147346,0.0670070289971,0.0670695647217,0.0669316182702,0.0669739218487,0.0668617254015,0.0663963860384,0.0664331717588,0.0665729574963,0.0667403325242,0.0668893146918,0.0670088682831,0.0670750825798,0.0672056718872,0.0671633683088,0.0675716898052,0.0679248327211,0.0679579398694,0.0681087613231,0.0678935648587,0.0680756541747,0.0681676184757,0.0681069220371,0.0680682970306,0.0679910470178,0.0677924041276,0.0678034398438,0.0679763327296,0.0679910470178,0.0680756541747,0.0679266720071,0.067827350562,0.0679119577189,0.0677942434137,0.0678439041362,0.0678770112846,0.0677979219857,0.0676305469579,0.0675422612289,0.0675864040934,0.0680223148801,0.0679340291512,0.0681087613231,0.0681621006177,0.0680407077403,0.06819336848,0.0685244399636,0.0687304399979,0.0688168864408,0.0688518328752,0.068467422097,0.0685649042561,0.0681529041876,0.0683607435078,0.068746993572,0.0686311185528,0.0684048863723,0.0682595827767,0.0681804934779,0.068105082751,0.0681694577617,0.0681363506134,0.0685741006862,0.0686145649786,0.0683589042218,0.0683570649358,0.0685832971163,0.0685998506904,0.0686679042732,0.0689162078859,0.0688573507332,0.0686991721355,0.0687286007118,0.0686237614087,0.0687727435763,0.0687010114215,0.068559386398,0.0687690650043,0.0687690650043,0.0686384756969,0.0687525114301,0.0621807424804,0.0551491520257,0.0482867758848,0.0414133640278,0.0)
ycorr <- c(9.37512593851e-05,9.36562158992e-05,9.33682160391e-05,9.28761571585e-05,9.21792637328e-05,9.1275762376e-05,9.01632918043e-05,8.9064133567e-05,8.79685463015e-05,8.68732652256e-05,8.57758692289e-05,8.46635438914e-05,8.35338039256e-05,8.23885615473e-05,8.12304077923e-05,8.00613141413e-05,7.88815971299e-05,7.7691154996e-05,7.65048129697e-05,7.53324372519e-05,7.41752437401e-05,7.30329474412e-05,7.1907643653e-05,7.07947143472e-05,6.96904401976e-05,6.85864415438e-05,6.74803415501e-05,6.63706090332e-05,6.5252688365e-05,6.41137992847e-05,6.29539591757e-05,6.17723506953e-05,6.05721105971e-05,5.93561785618e-05,5.81257461689e-05,5.68888903296e-05,5.56526579225e-05,5.44173927685e-05,5.31906056806e-05,5.19723929775e-05,5.07620800768e-05,4.955553955e-05,4.83522098488e-05,4.71501101748e-05,4.59514341994e-05,4.47531907702e-05,4.35486516912e-05,4.23342119695e-05,4.11029417651e-05,3.98509428452e-05,3.8578801458e-05,3.72967294951e-05,3.60034355943e-05,3.46994492593e-05,3.33803856437e-05,3.20423313575e-05,3.06897601394e-05,2.93218929656e-05,2.79448959755e-05,2.65638372253e-05,2.51739129293e-05,2.37800512956e-05,2.23796439416e-05,2.09694532993e-05,1.95560086289e-05,1.81420664692e-05,1.67303082378e-05,1.53228321908e-05,1.39234020373e-05,1.25292923777e-05,1.11359694746e-05,9.74276294962e-06,8.3445554016e-06,6.93526464922e-06,5.51532757786e-06,4.08201879834e-06,2.63033343042e-06,1.16223721545e-06,-3.33211194651e-07,-1.86096576996e-06,-3.4104187661e-06,-4.98036258271e-06,-6.57185643119e-06,-8.17664106049e-06,-9.79180907945e-06,-1.14154344622e-05,-1.3047237354e-05,-1.46823848094e-05,-1.63224781497e-05,-1.79539846846e-05,-1.95732581152e-05,-2.11857955823e-05,-2.27902746402e-05,-2.43759363544e-05,-2.59543956796e-05,-2.75273463977e-05,-2.90985348788e-05,-3.06721487375e-05,-3.22471504557e-05,-3.38267696204e-05,-3.54225820999e-05,-3.70401439889e-05,-3.8680636872e-05,-4.03435263661e-05,-4.20308155568e-05,-4.37359218991e-05,-4.54518743661e-05,-4.7168865924e-05,-4.88865157604e-05,-5.06025424807e-05,-5.2316970661e-05,-5.40193341229e-05,-5.57030381737e-05,-5.73774866041e-05,-5.90410153725e-05,-6.06966972836e-05,-6.2349537136e-05,-6.40097553982e-05,-6.56820265914e-05,-6.73589349429e-05,-6.90437948754e-05,-7.07391198036e-05,-7.24508634574e-05,-7.41774001654e-05,-7.59064198113e-05,-7.76408396444e-05,-7.93758203247e-05,-8.11054552253e-05,-8.2823365836e-05,-8.45363444922e-05,-8.62506068999e-05,-8.79661926395e-05,-8.96749219172e-05,-9.13697106925e-05,-9.30615181593e-05,-9.47526919981e-05,-9.64405107431e-05,-9.81291780962e-05,-9.982642963e-05,-0.000101534717952,-0.00010324439212,-0.000104945477093,-0.000106638692068,-0.000108334512677,-0.000110037636941,-0.000111741346207,-0.000113455043021,-0.000115179605904,-0.000116907027687,-0.000118631713675,-0.000120346897829,-0.000122061799819,-0.000123787435976,-0.000125518776203,-0.00012724490753,-0.000128967928059,-0.000130684617497,-0.000132387285804,-0.000134075294689,-0.000135756975629,-0.000137429844971,-0.000139100900556,-0.000140764020309,-0.000142421974176,-0.000144079507517,-0.000145734169952,-0.000147381690068,-0.000149027692192,-0.000150678653751,-0.000152335187322,-0.000154000133135,-0.000155676551356,-0.000157360576839,-0.000159046849601,-0.000160732879348,-0.000162421945146,-0.000164119053325,-0.000165825791399,-0.000167532544805,-0.000169230993301,-0.000170928845504,-0.000172619223859,-0.000174302654108,-0.00017598598608,-0.000177672567512,-0.000179360231063,-0.000181046725614,-0.00018273397827,-0.000184426643807,-0.00018613512587,-0.000187856158107,-0.000189582740585,-0.000191320602091,-0.000193065550467,-0.000194810838436,-0.00019656014819,-0.000198310353108,-0.000200053751944,-0.000201792177416,-0.000203518178033,-0.0002052289007,-0.000206929261519,-0.000208619380776,-0.000210299989308,-0.000211972216718,-0.000213634594402,-0.000215285621681,-0.000216929104129,-0.000218565522355,-0.00022019808647,-0.000221829298844,-0.000223462865093,-0.000225096846051,-0.000226725943973,-0.000228351976208,-0.000229977178386,-0.000231605220402,-0.000233241258064,-0.000234886133457,-0.000236543416353,-0.000238206637902,-0.000239871639313,-0.000241529282988,-0.000243186326081,-0.000244844371784,-0.000246502961389,-0.000248164046184,-0.000249823493579,-0.00025147604134,-0.000253114815689,-0.000254745047945,-0.000256371345347,-0.000258002401562,-0.000259642351169,-0.000261288314346,-0.000262938456514,-0.00026458458097,-0.000266226489697,-0.000267867235768,-0.000269512451214,-0.000271170319799,-0.000272831218979,-0.00027449426213,-0.000276150081759,-0.000277803235652,-0.000279456831681,-0.000281121295027,-0.000282795900906,-0.000284479933164,-0.000286172819066,-0.000287865753213,-0.000289562324156,-0.000291259062823,-0.000292959447632,-0.000294666297749,-0.000296375762563,-0.0002980801826,-0.000299781566188,-0.000301482055196,-0.000303180539046,-0.000304872916936,-0.000306562505949,-0.000308248786005,-0.000309937813309,-0.000311623154635,-0.000313304081782,-0.000314980533624,-0.000316653806375,-0.000318318873817,-0.000319977830655,-0.000321632820958,-0.000323281729056,-0.000324922747288,-0.000326552916375,-0.000328173583714,-0.000329790217663,-0.000331410058474,-0.000333033339705,-0.000334656084548,-0.000336274037971,-0.000337892022007,-0.000339506964091,-0.000341119751385,-0.000342725624847,-0.000344314384447,-0.000345876705886,-0.000347399856252,-0.000348870056378,-0.000350285078242,-0.00035164194844,-0.000352929652524,-0.000354141368303,-0.000355279414267,-0.000356352879564,-0.000357371979752,-0.000358344865838,-0.000359284541976,-0.000360202449241,-0.000361110683252,-0.000362016567014,-0.000362932982372,-0.000363875730843,-0.000364851155115,-0.000365859854163,-0.000366900548863,-0.000367967076203,-0.000369054270824,-0.000370159972637,-0.000371281554134,-0.000372415936724,-0.000373558504802,-0.000374709479082,-0.000375863631429,-0.000377012176858,-0.000378150457826,-0.000379278688272,-0.000380405461094,-0.000381534281321,-0.00038266210038,-0.00038378755166,-0.000384911070189,-0.00038602788839,-0.000387132656965,-0.000388225586038,-0.000389316762228,-0.000390410800311,-0.000391500370085,-0.000392575735881,-0.000393638105015,-0.000394693546166,-0.000395739742087,-0.000396777990261,-0.000397812675241,-0.000398848499544,-0.000399881299984,-0.000400904503355,-0.000401919859558,-0.000402932670017,-0.000403944299811,-0.000404951217176,-0.000405952359205,-0.000406946921013,-0.000407934555139,-0.000408912187663,-0.000409880260838,-0.000410841510716,-0.00041179975475,-0.000412753100835,-0.000413698946419,-0.000414638743494,-0.00041557243414,-0.000416501983617,-0.000417428286781,-0.000418352014054,-0.000419270439971,-0.000420180982856,-0.000421079929893,-0.000421966984817,-0.000422844265541,-0.000423711950531,-0.000424571709147,-0.00042542328376,-0.000426259853622,-0.000427085075679,-0.000427898365503,-0.000428700323637,-0.000429488504648,-0.000430263628228,-0.000431025977979,-0.000431771508463,-0.000432502457335,-0.00043321822088,-0.000433922356179,-0.000434617227633,-0.000435297376954,-0.000435968903467,-0.000436637511158,-0.000437303741525,-0.000437970489151,-0.000438635098834,-0.000439297746191,-0.000439957936829,-0.000440615350187,-0.000441258089795,-0.000441890066749,-0.000442511009255,-0.000443109632637,-0.000443686982999,-0.000444244562423,-0.00044478525943,-0.000445306512367,-0.000445804396086,-0.000446279617767,-0.000446739665331,-0.000447191101461,-0.000447627425719,-0.000448055575998,-0.000448481709162,-0.000448899183472,-0.000449308657136,-0.00044970388163,-0.000450090377701,-0.00045046831461,-0.000450834426504,-0.000451181409956,-0.000451515670658,-0.000451837744582,-0.00045213924938,-0.000452418512245,-0.000452675137196,-0.00045291762488,-0.00045314411557,-0.000453351890114,-0.000453545553963,-0.00045372630424,-0.000453891044618,-0.000454041161342,-0.000454179979899,-0.000454314776116,-0.000454443194338,-0.000454564548086,-0.000454668984212,-0.00045476458741,-0.000454847422329,-0.000454916006698,-0.000454969080588,-0.00045500451701,-0.000455018043698,-0.000455002262251,-0.00045495799358,-0.000454882616536,-0.000454783347793,-0.000454656664739,-0.000454498674696,-0.000454314536246,-0.000454105857853,-0.000453869978659,-0.000453611815665,-0.000453331289939,-0.000453031707546,-0.000452710787636,-0.000452369312475,-0.000452007232424,-0.000451628896064,-0.000451235722089,-0.000450824413128,-0.000450394513447,-0.000449953560348,-0.000449501512644,-0.000449037167477,-0.000448562212597,-0.000448078624672,-0.00044758971901,-0.000447088733252,-0.000446570825991,-0.000446038893101,-0.000445495091729,-0.000444934025252,-0.000444348473633,-0.000443740557238,-0.000443110800185,-0.000442460376307,-0.000441781369296,-0.000441077180826,-0.000440349912388,-0.000439605668169,-0.000438840741657,-0.000438055596036,-0.000437258371292,-0.000436446574032,-0.000435615337714,-0.000434762615224,-0.000433891854547,-0.000433005720252,-0.0004321046337,-0.000431183387379,-0.000430236245597,-0.000429266544167,-0.000428269484754,-0.000427242825587,-0.000426194818187,-0.000425124874622,-0.000424029894712,-0.00042290449497,-0.000421752601495,-0.000420569229293,-0.000419368878243,-0.00041814408084,-0.000416898056912,-0.000415630602935,-0.000414337625321,-0.000413019756057,-0.000411680556712,-0.000410325767916,-0.000408952818761,-0.000407560749458,-0.00040614712661,-0.000404706181118,-0.000403242157951,-0.00040175563465,-0.000400252117971,-0.000398729646734,-0.000397188064913,-0.000395625424898,-0.000394040918839,-0.000392440881506,-0.000390821264718,-0.000389182785723,-0.000387524775113,-0.000385846523641,-0.000384140186677,-0.000382406108248,-0.000380645653777,-0.000378858298881,-0.000377040653865,-0.00037518762231,-0.000373299358301,-0.000371382878263,-0.000369440613541,-0.000367471833749,-0.000365482492568,-0.000363472912031,-0.000361440500363,-0.000359385693262,-0.000357314152698,-0.000355231843988,-0.000353141061622,-0.000351038639622,-0.000348915689777,-0.000346775741016,-0.000344619523714,-0.000342444504424,-0.000340250450292,-0.000338035284979,-0.000335800136513,-0.000333538074935,-0.000331247831493,-0.000328932023601,-0.000326590818359,-0.000324226578239,-0.000321835593916,-0.000319419446882,-0.000316979361994,-0.000314517669195,-0.000312031890943,-0.000309522121788,-0.000306988013792,-0.000304426946209,-0.000301841566978,-0.000299237893493,-0.000296611812269,-0.000293965908929,-0.000291297058127,-0.000288604352573,-0.00028589021926,-0.000283160880821,-0.00028041552862,-0.000277653646483,-0.000274876479786,-0.000272073711804,-0.000269243362092,-0.000266385722537,-0.000263502225958,-0.000260599185304,-0.00025767616714,-0.000254727911722,-0.000251751490782,-0.000248748077486,-0.000245718362854,-0.000242663870906,-0.000239591079837,-0.000236501607287,-0.000233400461559,-0.000230278063228,-0.000227129711844,-0.000223961258558,-0.000220773965375,-0.00021757000726,-0.000214351674897,-0.000211117661339,-0.000207862916828,-0.000204589543454,-0.000201290096367,-0.000197969900223,-0.000194630499143,-0.000191268701611,-0.000187885122154,-0.000184476637111,-0.000181037396215,-0.000177567806131,-0.000173965934908,-0.000170132539555,-0.00016598725604,-0.000161468412438,-0.000156001157807,-0.000151558578049,-0.000147520040973,-0.000143802813225,-0.000140317511472,-0.00013695481464,-0.000133595889449,-0.00013034580253,-0.000127306160956,-0.000124561147423,-0.000122168704421,-0.000120696693919,-0.000118174150212,-0.000115226298715,-0.000111928738064,-0.000108373602695,-0.000104678943793,-0.00010095542889,-9.71992555543e-05,-9.3408777563e-05,-8.95803581546e-05,-8.57225706147e-05,-8.18378770797e-05,-7.79272883911e-05,-7.39891852777e-05,-7.00236167736e-05,-6.60265242488e-05,-6.2001456115e-05,-5.79507430587e-05,-5.38788498772e-05,-4.9796610556e-05,-4.57008052986e-05,-4.15887910253e-05,-3.74630174819e-05,-3.3320740245e-05,-2.91675877627e-05,-2.50096694621e-05,-2.08506260106e-05,-1.66872928542e-05,-1.25221887228e-05,-8.34844559567e-06,-4.15754055471e-06,4.48416567174e-08,4.25714761409e-06,8.4803035746e-06,1.27135097639e-05,1.69591404459e-05,2.12220288288e-05,2.55012158183e-05,2.97958126549e-05,3.41059378174e-05,3.84239637133e-05,4.27463006875e-05,4.70772105811e-05,5.14132755857e-05,5.57547386561e-05,6.01005803054e-05,6.44501487885e-05,6.87980509538e-05,7.31497411275e-05,7.75085629691e-05,8.18757340727e-05,8.62557830443e-05,9.06524509046e-05,9.50657020868e-05,9.94994334264e-05,0.00010395443268,0.00010842701292,0.000112922499908,0.000117436943715,0.000121968556542,0.000126514650328,0.000131070271593,0.000135629660728,0.000140186882134,0.000144740153164,0.000149289843193,0.000153837039602,0.000158386594008,0.000162937124772,0.000167489853096,0.000172041083453,0.00017659687058,0.000181161294318,0.00018573995107,0.000190339520474,0.000194958295506,0.000199598162071,0.000204248001146,0.000208906851915,0.000213569664259,0.000218240524407,0.000222919920107,0.000227606229703,0.000232298139325,0.000236990412248,0.00024168083511,0.00024636677857,0.000251051026081,0.000255743672448,0.000260444917201,0.000265157643076,0.000269878202877,0.00027460006877,0.000279323046146,0.000284044857873,0.000288764231004,0.000293486484522,0.000298215206425,0.000302941500368,0.000307663066694,0.000312376487637,0.000317078722717,0.000321775577106,0.000326468211973,0.000331152781147,0.000335835382438,0.000340515415667,0.00034518287244,0.000349834045891,0.000354473899969,0.000359101760792,0.000363717071844,0.000368322598734,0.000372917281905,0.000377503322761,0.00038207967386,0.000386638478955,0.00039118205459,0.000395714166913,0.000400233860428,0.000404736805472,0.000409226916156,0.00041370388179,0.000418162887328,0.000422600375226,0.000427013698377,0.000431404141101,0.000435773506536,0.000440121474796,0.000444445368127,0.000448747708259,0.000453024085337,0.000457270843511,0.000461488680624,0.000465686614525,0.000469860316956,0.000474013551632,0.000478148051562,0.000482264644433,0.000486368403566,0.000490459881937,0.000494542506333,0.000498617077563,0.000502685088946,0.00050673637171,0.000510771383333,0.000514795099993,0.000518802815212,0.000522793405518,0.000526758689594,0.000530697130669,0.00053460768079,0.000538489086406,0.000542342174416,0.000546168900593,0.000549975132275,0.000553747776843,0.000557485186919,0.000561189417863,0.000564860916319,0.0005685037517,0.000572115627684,0.000575692285371,0.000579231537156,0.0005827362104,0.000586203019584,0.000589635632733,0.000593040468114,0.000596416606598,0.000599763014828,0.000603082238031,0.000606373159795,0.000609637155045,0.00061287709246,0.000616089614457,0.000619272469378,0.000622420393408,0.000625535858379,0.000628619490571,0.000631671838478,0.000634685343145,0.000637659218847,0.000640594955456,0.000643484834089,0.000646334836822,0.00064914626726,0.000651926033971,0.000654670601808,0.000657374514859,0.000660036022239,0.000662656988193,0.000665243948379,0.0006677938622,0.000670307763997,0.000672784921642,0.000675221880433,0.000677618883567,0.000679971579315,0.000682282735699,0.000684554581749,0.000686788435646,0.000688981584111,0.000691135970286,0.000693252397031,0.000695331361639,0.00069737661667,0.000699383522982,0.000701355763454,0.000703294357585,0.000705201733743,0.000707073646579,0.000708909635019,0.000710707272072,0.000712467434685,0.000714182816275,0.000715852079499,0.000717476171725,0.000719057277523,0.000720590459711,0.000722070518153,0.0007234996774,0.000724878979064,0.000726205193885,0.000727483162555,0.000728716144882,0.000729908185309,0.000731058936505,0.000732165469057,0.000733224393782,0.000734245516354,0.000735231277445,0.000736178477573,0.000737091104768,0.000737969618042,0.000738810413021,0.000739609271918,0.000740369734117,0.000741087046074,0.000741768346186,0.000742414290639,0.000743017625365,0.000743576236879,0.000744086947788,0.000744546801496,0.000744963104144,0.000745334705515,0.000745662509667,0.000745947246485,0.000746192183871,0.000746385772398,0.00074653003201,0.000746627593393,0.000746687718495,0.000746715503841,0.000746707105773,0.000746659995224,0.000746570231193,0.000746439230384,0.000746265154876,0.00074605129333,0.000745805227791,0.000745528688225,0.000745218188261,0.000744862199373,0.000744458663262,0.000744009231125,0.000743513960987,0.000742977185604,0.000742396064249,0.000741773114078,0.000741104677515,0.00074039330126,0.000739632191218,0.000738826667866,0.000737979811056,0.000737092119004,0.000736167980057,0.00073520495022,0.000734204162613,0.00073316264583,0.000732073981233,0.000730932550563,0.000729738177129,0.000728490529202,0.000727187003951,0.000725828868904,0.000724409616086,0.000722931790732,0.000721390440128,0.000719785472799,0.000718114786959,0.000716382343257,0.0007145906145,0.000712733662756,0.000710813525225,0.00070882235132,0.000706760931262,0.000704627064792,0.000702415474828,0.000700128851932,0.000697773730618,0.000695352637814,0.000692860851973,0.000690305877329,0.000687689905087,0.000685020663231,0.000682303469015,0.000679543467353,0.000676749923994,0.000673925377729,0.000671071254544,0.00066818166245,0.000665258174002,0.000662302681253,0.000659310242277,0.000656281616451,0.000653216654806,0.00065011295391,0.000646965860545,0.000643773974853,0.000640533723755,0.000637245540384,0.000633916430905,0.000630553320141,0.000627159304809,0.000623738434796,0.000620289358156,0.000616808100863,0.000613298945,0.000609760925496,0.000606199911594,0.000602618427267,0.000599014212159,0.000595377210927,0.000591705568451,0.000587997313105,0.000584254537649,0.000580485456462,0.000576689256173,0.000572864857051,0.000569016278896,0.000565139641624,0.000561239691763,0.000557323060492,0.000553394623858,0.000549452336023,0.000545497975799,0.000541521867279,0.000537520933942,0.000533504884377,0.000529467922126,0.00052541012124,0.000521332501178,0.00051722871469,0.000513096972154,0.000508938360509,0.000504745829439,0.000500527066161,0.000496285394892,0.000492015977416,0.000487712909976,0.000483386167242,0.000479031092131,0.000474650865729,0.000470247881951,0.000465823640427,0.000461381741689,0.000456923243893,0.000452445631149,0.000447959541742,0.000443464766485,0.000438954933998,0.000434432430094,0.000429901481151,0.000425356489572,0.000420796255797,0.000416216098854,0.00041161134496,0.000406987944776,0.000402333277859,0.000397648307175,0.000392936625372,0.000388199588451,0.000383428046099,0.000378623038305,0.000373788809411,0.000368928898462,0.000364047998653,0.000359146793529,0.000354225427917,0.000349292331403,0.000344339353246,0.000339370584069,0.000334392871596,0.000329411551204,0.000324421683012,0.000319423252212,0.0003144184367,0.00030940549745,0.000304385684271,0.000299359185312,0.000294329140866,0.000289291975851,0.000284244296968,0.000279185760894,0.000274116416275,0.000269040548882,0.000263959198884,0.000258866833132,0.000253764100363,0.000248649017707,0.000243521649492,0.000238383441328,0.000233242720182,0.000228100703492,0.000222959180099,0.000217816967102,0.000212673230005,0.00020753258281,0.00020240101399,0.000197279658605,0.000192173874882,0.000187084550477,0.000182006032875,0.00017693329769,0.000171867521901,0.000166808184014,0.000161753007861,0.000156708693257,0.000151669086837,0.00014663402099,0.000141598419586,0.000136563800797,0.000131532302705,0.000126508188263,0.000121491678349,0.000116483042868,0.000111481628893,0.000106487120248,0.000101493067682,9.65053410006e-05,9.15271122905e-05,8.65640611997e-05,8.16083898959e-05,7.66584734604e-05,7.17190989802e-05,6.6792961922e-05,6.18815864966e-05,5.69814674756e-05,5.2096274351e-05,4.72215853806e-05,4.23565024904e-05,3.74934487924e-05,3.26378681375e-05,2.77925981388e-05,2.29547420052e-05,1.81250413521e-05,1.330462046e-05,8.4923279474e-06,3.69289736832e-06,-1.08853051362e-06,-5.84474028132e-06,-1.05769662495e-05,-1.52799881229e-05,-1.99611419239e-05,-2.46162083307e-05,-2.92470931149e-05,-3.38623994266e-05,-3.84591629516e-05,-4.3036666992e-05,-4.75964865248e-05,-5.2144200879e-05,-5.66807609563e-05,-6.12141810083e-05,-6.57351721052e-05,-7.02437679191e-05,-7.47386907238e-05,-7.92140825824e-05,-8.36673713278e-05,-8.80965166699e-05,-9.25082313726e-05,-9.69018492329e-05,-0.000101278870665,-0.000105633961186,-0.000109963317768,-0.000114273954884,-0.000118563794669,-0.000122833101386,-0.00012708063934,-0.000131312557489,-0.000135530701669,-0.000139731873803,-0.000143911211456,-0.000148063347838,-0.000152197055981,-0.000156308778529,-0.000160406482183,-0.000164488658577,-0.000168558542178,-0.000172615691128,-0.00017664901837,-0.000180662447007,-0.000184651403341,-0.000188621670817,-0.000192571464265,-0.000196498297754,-0.000200398773106,-0.00020426913761,-0.000208111788636,-0.000211920265713,-0.000215694197271,-0.000219434419386,-0.00022314308168,-0.000226819376252,-0.00023046152704,-0.000234072925976,-0.000237653020694,-0.000241203534299,-0.000244717324261,-0.000248194530171,-0.00025164209177,-0.000255062892658,-0.0002584598148,-0.00026183415862,-0.000265188840118,-0.000268518062193,-0.000271818907288,-0.000275087907879,-0.000278333057863,-0.000281559785,-0.000284763742649,-0.000287941414566,-0.000291089394319,-0.000294205003162,-0.000297282272507,-0.000300323149106,-0.000303333456734,-0.000306318862715,-0.000309275576103,-0.000312195615285,-0.00031507838902,-0.000317927567351,-0.000320746092121,-0.000323538412399,-0.000326310458509,-0.00032906566456,-0.000331799055304,-0.00033451083217,-0.000337200545103,-0.000339872019782,-0.000342527809745,-0.000345168707175,-0.000347789086753,-0.000350384107322,-0.000352949403877,-0.00035547939115,-0.00035797428467,-0.000360433380087,-0.000362857081434,-0.000365242795786,-0.000367594129163,-0.000369910706881,-0.000372194519895,-0.000374447295179,-0.00037667007526,-0.000378869242834,-0.000381043697034,-0.000383192503173,-0.000385318059169,-0.000387423644976,-0.000389506805526,-0.000391565014594,-0.000393596803756,-0.000395600617894,-0.000397576981354,-0.000399528862595,-0.000401453191216,-0.000403350147486,-0.000405218498455,-0.000407057406333,-0.000408863712667,-0.00041063814496,-0.000412379384716,-0.000414089038472,-0.000415767973508,-0.000417413981168,-0.000419031003042,-0.00042062421448,-0.000422195563962,-0.000423744496442,-0.00042514160051,-0.000426254601794,-0.000427084806496,-0.00042763347294,-0.000427906106659)
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(258)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Sus_scrofa-male-liver-H3K27Ac-ERR572214.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) : 258',bty='n')
dev.off()