# R script for Peak Model
#  -- generated by MACS
p <- c(0.0418262451787,0.0487449337048,0.0555196533045,0.0623581773148,0.0692981339778,0.0692359655777,0.0690151041564,0.0689005834194,0.0689333036299,0.0690690925038,0.0687320743349,0.0685799253557,0.0685717453031,0.0684719486608,0.0682805354289,0.0681365665024,0.0679533333232,0.0678453566283,0.0679255211442,0.0674756182488,0.0675197905331,0.0676473993543,0.0678077283861,0.0680613100181,0.0680907582076,0.0682478152184,0.0684915807872,0.0685259370083,0.0684964888187,0.0689349396405,0.0689349396405,0.0687042621559,0.0688007867771,0.0688433230508,0.0690167401669,0.0689856559668,0.0689823839458,0.0690167401669,0.068880951293,0.0688155108719,0.0686649979032,0.0687173502401,0.0682298191026,0.0681005742708,0.0679664214074,0.0678371765756,0.0676670314807,0.067714475786,0.067516518512,0.0672678449116,0.0673381933644,0.0673022011327,0.0674085418171,0.0672433047537,0.0673218332591,0.0674379900066,0.0673856376697,0.0670829757219,0.0671827723641,0.0671778643326,0.0672334886905,0.0674379900066,0.0675263345752,0.0676637594596,0.067599955049,0.0674707102172,0.0672678449116,0.0673692775644,0.0672694809222,0.0671369640693,0.0670911557745,0.0667966738793,0.0667868578162,0.0666216207528,0.0663418629523,0.0662551543943,0.0664416595946,0.0663582230576,0.0664776518262,0.0665365482053,0.0665643603843,0.0667721337214,0.0668375741426,0.066690333195,0.0667197813845,0.0666772451107,0.0667001492581,0.0667246894161,0.0665987166054,0.0665839925106,0.0663009626891,0.0661340896152,0.0659001401096,0.0658805079832,0.0657463551199,0.065867419899,0.0657316310251,0.0656612825724,0.0658412437305,0.0657119988988,0.0658903240464,0.0657725312883,0.0658167035726,0.0659606724991,0.0659246802675,0.0658052514989,0.0658265196358,0.0658232476147,0.0655598499196,0.0656792786882,0.0656334703934,0.0655304017301,0.0658412437305,0.0657676232567,0.0659623085097,0.0660751932362,0.0661046414257,0.0661946220048,0.0661897139732,0.0661537217415,0.0662862385944,0.0663647670997,0.0661193655204,0.0660899173309,0.0662289782259,0.0662616984364,0.066266606468,0.0664203914577,0.0663287748681,0.0663909432682,0.0662142541311,0.0664531116683,0.0663827632156,0.0665938085738,0.0663843992261,0.0661995300363,0.0662469743417,0.0662698784891,0.0663451349734,0.0663287748681,0.0666003526159,0.066548000279,0.0665381842158,0.0663205948155,0.0666772451107,0.0667230534056,0.0666805171318,0.0664187554472,0.0665725404369,0.0665725404369,0.066405667363,0.0665970805948,0.0664776518262,0.0664891038999,0.0661275455731,0.0662747865207,0.0663467709839,0.0666886971844,0.0669406428059,0.0670731596587,0.0670289873744,0.0666788811213,0.0670224433323,0.0670829757219,0.0673349213433,0.0672563928379,0.0672105845431,0.0670764316798,0.0668522982373,0.0668293940899,0.0669308267427,0.0672531208169,0.0669619109428,0.0670404394481,0.0669275547216,0.0669864511007,0.0670453474797,0.0670109912586,0.0669226466901,0.0670666156166,0.0670093552481,0.0668113979741,0.0669880871112,0.067030623385,0.0671320560377,0.0671647762483,0.0672204006063,0.0673709135749,0.0675508747331,0.0674167218698,0.0675263345752,0.0676637594596,0.0676048630806,0.0675296065962,0.0677586480703,0.0678486286493,0.0679484252916,0.0678584447125,0.0680089576812,0.0680596740076,0.0683214356922,0.0684604965871,0.0688465950719,0.0690298282511,0.069023284209,0.0690249202195,0.0690461883564,0.068967659851,0.0689562077773,0.069391386578,0.0692146974409,0.0692294215356,0.0692752298304,0.0694846391781,0.0694830031676,0.0695713477361,0.0696646003363,0.0698936418103,0.0700490628106,0.069617156031,0.0696400601784,0.0697284047469,0.0696449682099,0.0694044746622,0.0693030420094,0.0695091793361,0.0695386275256,0.0696466042205,0.0696613283152,0.0702192079055,0.0704384333164,0.0704875136323,0.0706789268641,0.0710535732752,0.0715525564865,0.0717979580658,0.0721055280452,0.0724278221194,0.0725603389722,0.0725685190249,0.0728989931517,0.0730151498992,0.0729562535202,0.0730233299519,0.0730985864362,0.0730904063835,0.0730642302151,0.0730527781414,0.0733685281734,0.0735174051316,0.0735223131631,0.0736891862371,0.0740998248798,0.0742470658274,0.0743337743854,0.0743926707644,0.0746315283016,0.074737868986,0.0747853132914,0.0748572977546,0.0750176267864,0.0752254001236,0.0753955452186,0.0755967745136,0.0757472874823,0.0759174325773,0.0760614015038,0.0764131437675,0.07669944561,0.0767207137469,0.0768041502839,0.0770904521264,0.0771591645686,0.0773816620005,0.0774569184848,0.0778282928749,0.077834836917,0.0778495610117,0.0778332009065,0.0781342268438,0.0786937424446,0.0788180792448,0.079060208803,0.0790536647609,0.0792074497506,0.0790945650241,0.0794184951088,0.0795330158459,0.079740789183,0.0800696272993,0.0799272943833,0.0802643125522,0.0803592011629,0.080761659753,0.0810577776587,0.081275367059,0.0815616689015,0.0820442920075,0.0824352985239,0.082809944935,0.0834479890412,0.0842234580319,0.0851232638227,0.0859183649397,0.0867625463725,0.0880615387324,0.088837007723,0.0896730091032,0.0904664742097,0.0912026789476,0.092131932928,0.0926047399708,0.0930742749925,0.0934750975721,0.0937090470777,0.0938333838779,0.0943945354892,0.0943454551734,0.0947888140267,0.0952403529326,0.0951192881535,0.0953695977644,0.0955544669541,0.0959192973021,0.0965491613556,0.0970105163248,0.0971675733355,0.0980068467368,0.0980853752422,0.0980297508842,0.0983389568741,0.098530370106,0.0989737289593,0.099297659044,0.0992600308018,0.0994318119073,0.0998751707606,0.0996870295498,0.100109120266,0.100662091825,0.101157803015,0.101077638499,0.101195431257,0.101498093205,0.101969264237,0.10216231348,0.102167221511,0.102510783723,0.102708740996,0.102872342049,0.103166823945,0.103474393924,0.103837588261,0.103867036451,0.103840860282,0.104218778715,0.104740666073,0.105134944611,0.10547359879,0.105725544412,0.106052746517,0.106417576865,0.106574633876,0.106658070413,0.107101429266,0.10717504974,0.107132513466,0.107471167646,0.107651128804,0.108076491541,0.108022503194,0.108338253226,0.108595106879,0.108853596543,0.109267507206,0.109498184691,0.110131320766,0.110265473629,0.110368542292,0.110725192587,0.111037670598,0.111368144725,0.111737883105,0.112184513979,0.112402103379,0.112802925959,0.113064687644,0.113293729118,0.113959585403,0.114003757687,0.11441603234,0.114542005151,0.114620533656,0.115116244847,0.115045896394,0.115258577763,0.11546798711,0.115526883489,0.115719932732,0.116377608964,0.116490493691,0.116902768344,0.117409931608,0.117596436808,0.118052883746,0.118551866957,0.118700743915,0.119389504348,0.119602185717,0.119608729759,0.119988284201,0.120518351613,0.120917538182,0.121478689793,0.121815707962,0.121632474783,0.121676647067,0.121863152267,0.122049657468,0.122278698942,0.122610809079,0.122722057795,0.123296297491,0.12326357728,0.123679123954,0.124274631787,0.124557661608,0.124776887019,0.125053372798,0.125432927241,0.125506547715,0.125750313284,0.1257683094,0.125941726516,0.126164223948,0.126497970095,0.127023129475,0.127196546591,0.127473032371,0.127705345866,0.12830739774,0.128642779899,0.128780204783,0.129066506626,0.129342992405,0.129601482068,0.12994668029,0.13028697048,0.130671432954,0.130772865607,0.131010087134,0.131438721892,0.131592506882,0.131662855335,0.131986785419,0.132094762114,0.132381063957,0.132626465536,0.132564297136,0.132736078242,0.132511944799,0.132649369684,0.13276225441,0.133187617148,0.133123812737,0.133383938411,0.133753676791,0.134113599107,0.134429349139,0.134962688571,0.135407683435,0.135399503382,0.135698893309,0.135569648477,0.135811778036,0.13566944512,0.135198274087,0.135262078498,0.135314430835,0.134802359539,0.134655118592,0.134908700224,0.134929968361,0.13499050075,0.134902156182,0.134992136761,0.135214634193,0.134938148413,0.135072301277,0.13533079094,0.135882126488,0.135649812993,0.135772513783,0.136024459404,0.136372929647,0.136451458152,0.136431826026,0.136862096795,0.136868640837,0.137053510027,0.136971709501,0.137202386985,0.137243287248,0.137182754859,0.137177846827,0.137361080006,0.137171302785,0.13681465249,0.136461274216,0.135811778036,0.135348787056,0.134961052561,0.134430985149,0.134223211812,0.133742224717,0.133765128864,0.133581895685,0.133300501874,0.133243241506,0.133357762243,0.133140172842,0.132804790684,0.13251358081,0.132147114451,0.131569602735,0.130890658365,0.13047183967,0.129987580553,0.129557309784,0.129135219068,0.128641143888,0.128273041519,0.127991647708,0.127859130855,0.127814958571,0.127268531054,0.126872616506,0.126434165685,0.125935182473,0.125442743304,0.125012472535,0.124632918093,0.124274631787,0.123898349365,0.123312657596,0.122695881627,0.122511012437,0.122280334952,0.122012029225,0.121473781762,0.121112223435,0.120714672876,0.120271314023,0.119605457738,0.119217723242,0.118841440821,0.118360453725,0.118147772357,0.11778785004,0.117524452345,0.117337947145,0.116897860313,0.116434869333,0.1156839405,0.115415634773,0.115291297973,0.114685974078,0.11429169554,0.113930137213,0.113681463613,0.113378801665,0.112789837875,0.112711309369,0.112752209633,0.112672045117,0.112585336559,0.112945258875,0.112631144854,0.112575520496,0.112492083959,0.112241774348,0.112087989358,0.111855675863,0.111425405094,0.110885521619,0.110222937355,0.109524360859,0.109103906153,0.108519850395,0.108125571857,0.107566056256,0.107474439667,0.106698970676,0.106407760802,0.10593822578,0.105666648033,0.105388526243,0.104866638884,0.104384015778,0.103763967788,0.10299667885,0.101813843237,0.101198703278,0.100138568456,0.099155326128,0.0980461109895,0.0966211458189,0.0957998685335,0.0948869746584,0.0940738774256,0.0934865496458,0.0930840910557,0.0925523876338,0.0924215067915,0.0921728331912,0.0918145468854,0.0917163862536,0.0914382644638,0.0911437825686,0.090687335631,0.090455022136,0.0901261840197,0.0896468329347,0.0894406956081,0.0891069494602,0.0888844520283,0.0887699312913,0.0886619545964,0.0883560206275,0.0881482472904,0.0877605127951,0.0878864856058,0.0877834169425,0.0874496707946,0.0872451694785,0.0872091772469,0.0869735917307,0.0865449569722,0.0864353442668,0.0862242989085,0.0860590618451,0.0856827794235,0.0855878908129,0.0854684620443,0.0852050643491,0.084830417938,0.0844524995059,0.0845261199797,0.0843101665899,0.0839846004947,0.0836295862099,0.0833694605358,0.0831126068828,0.0830193542827,0.0830422584301,0.0830438944406,0.0828573892403,0.0822667894394,0.0821179124813,0.0820492000391,0.0820295679128,0.0820279319022,0.0817269059649,0.0812655509958,0.0807354835845,0.0805489783842,0.0805718825316,0.0803641091945,0.0801579718679,0.0800581752256,0.0800352710782,0.079827497741,0.0795231997827,0.0791943616664,0.079088020982,0.0789276919502,0.078574313676,0.0784483408653,0.0782422035387,0.0781865791807,0.0777595804327,0.0775583511376,0.077435650348,0.0773849340216,0.077268777274,0.0769203070314,0.0767370738522,0.0766143730625,0.0765652927467,0.0762004623987,0.0759616048615,0.0756654869558,0.0755591462715,0.0753382848501,0.075279388471,0.0750896112497,0.0749979946601,0.0749063780705,0.0746953327123,0.0744482951224,0.0743812186907,0.0742912381117,0.0741636292904,0.0742372497642,0.0739738520691,0.0738233391004,0.0736711901213,0.0734863209315,0.0731263986152,0.0728777250148,0.0726454115197,0.0722724011192,0.0721709684664,0.0720122754451,0.0717325176447,0.0715672805813,0.0714282196863,0.0709717727488,0.071096109549,0.0710224890752,0.0707574553695,0.0706298465483,0.0704531574112,0.0702339320003,0.0702977364109,0.0700605148843,0.0695680757151,0.0695402635361,0.0691999733461,0.0692915899357,0.0694273788096,0.0692883179147,0.0692048813777,0.0688956753878,0.0686420937558,0.0685324810504,0.068710806198,0.0687533424718,0.0685390250925,0.0682968955342,0.0680351338496,0.0679566053442,0.0678371765756,0.0679173410916,0.067801184344,0.067714475786,0.0675557827647,0.0674739822383,0.0674396260172,0.067259664859,0.0669095586058,0.0668261220689,0.0665823565001,0.0664220274683,0.0663974873103,0.0664498396472,0.0662796945523,0.0661062774362,0.0659983007413,0.0659459484044,0.0661848059416,0.0661749898784,0.0661357256257,0.0658608758569,0.0655892981091,0.0656056582144,0.0656056582144,0.0655418538038,0.0655582139091,0.0653684366877,0.065412608972,0.0651753874453,0.0650854068662,0.0651492112769,0.0650919509084,0.0647892889605,0.0646469560445,0.0645815156234,0.0645537034444,0.0646060557813,0.06444736276,0.0644342746758,0.0642608575597,0.0641479728333,0.0643786503178,0.0644326386653,0.0643819223389,0.0644064624968,0.0641986891597,0.0642134132544,0.0642085052228,0.064187237086,0.0641087085806,0.0641856010754,0.0640547202331,0.0640939844858,0.0641005285279,0.0641692409701,0.0643704702652,0.0642935777703,0.0640138199699,0.0640988925174,0.0641610609175,0.0640105479488,0.0640072759278,0.0638682150328,0.0637406062116,0.063537740906,0.0634264921901,0.0635393769166,0.0636915258957,0.0635639170745,0.0636424455799,0.0636195414325,0.0637586023274,0.063680073822,0.0637733264222,0.0638240427486,0.0638813031171,0.0638567629591,0.0637258821168,0.0638829391276,0.0638927551908,0.0639729197067,0.0638583989697,0.0639172953487,0.0639418355066,0.0641397927806,0.0641381567701,0.0641954171386,0.0641856010754,0.0641103445911,0.0641430648017,0.0642968497914,0.0641692409701,0.0640367241173,0.0639794637488,0.0637258821168,0.0634935686217,0.0634166761269,0.0634755725059,0.0636179054219,0.0636064533482,0.0636964339273,0.0638207707275,0.0638878471592,0.0640498122015,0.0640105479488,0.0642117772439,0.0640072759278,0.0639532875803,0.0639516515698,0.0642510414966,0.0640808964016,0.0639680116751,0.0641774210228,0.0642624935703,0.0644457267495,0.0646011477497,0.0648367332659,0.0651802954769,0.0650428705925,0.064874361508,0.0650837708557,0.0651933835611,0.0653046322771,0.0653209923824,0.0653062682876,0.0651344871821,0.0651050389926,0.0651786594664,0.0651999276033,0.0652735480771,0.0652817281297,0.0654093369509,0.0653978848772,0.0651999276033,0.0651295791505,0.0652833641402,0.0652457358981,0.0651393952137,0.0651639353716,0.065016694424,0.0650559586767,0.064957798045,0.0649954262872,0.0652964522245,0.0654698693405,0.0653995208878,0.0656089302355,0.0656056582144,0.065756171183,0.0657643512357,0.0657774393199,0.0658625118674,0.0657512631515,0.0656956387935,0.0657267229935,0.0658526958042,0.0658805079832,0.0661324536047,0.0662207981732,0.066322230826,0.0661259095625,0.0661046414257,0.0663173227944,0.0665807204895,0.0665381842158,0.0667639536688,0.0668015819109,0.0667328694687,0.0666477969212,0.0667999459004,0.0668228500478,0.0667803137741,0.0666445249002,0.0665087360263,0.0667197813845,0.0664318435314,0.0664187554472,0.0665218241105,0.0666363448475,0.0665071000158,0.0666788811213,0.0668179420162,0.0670518915218,0.0671320560377,0.0670109912586,0.0669995391849,0.0671058798693,0.0670780676903,0.0672613008695,0.0673365573538,0.0672645728906,0.0672547568274,0.0671353280588,0.0671189679535,0.0673840016592,0.0674249019224,0.0675885029753,0.0674674381961,0.0674281739435,0.0676163151543,0.0678191804598,0.0679909615654,0.0679893255548,0.0680318618286,0.068085850176,0.0684146882923,0.068398328187,0.0686960821033,0.0686944460927,0.0686682699243,0.0688024227876,0.0688302349666,0.0689414836826,0.0688956753878,0.0691459849987,0.0691132647881,0.0692948619568,0.0695189953992,0.0694061106727,0.0695140873676,0.0695189953992,0.0697889371365,0.0699345420735,0.0700523348316,0.0699459941472,0.0700245226526,0.069759488947,0.0696515122521,0.0699083659051,0.0700359747263,0.0700457907895,0.0700539708421,0.0701275913159,0.0703713568847,0.0701243192949,0.0701079591896,0.070130863337,0.0699083659051,0.0700097985579,0.0699803503683,0.0699803503683,0.0700277946737,0.0700997791369,0.0701357713686,0.0704057131058,0.0703451807163,0.070526777885,0.0708719761065,0.0708899722223,0.0710813854542,0.0711173776858,0.0711075616227,0.0711304657701,0.0710061289699,0.0707967196222,0.0711893621491,0.071238442465,0.0710028569488,0.0711926341702,0.0709750447698,0.0711402818332,0.0712613466124,0.0711353738017,0.0712711626755,0.0715182002654,0.0713087909177,0.071213902307,0.0714053155389,0.0714887520759,0.0716441730761,0.0716556251498,0.0714723919706,0.0715492844654,0.07140858756,0.0714429437811,0.0716458090866,0.0717930500342,0.071863398487,0.0716310849919,0.071550920476,0.0715476484549,0.0715705526023,0.0715754606339,0.0716425370656,0.0716719852551,0.0715411044128,0.0714593038864,0.0713006108651,0.0714658479285,0.0716670772235,0.0718372223185,0.0720040953924,0.0720875319294,0.0722805811718,0.0723967379193,0.0724229140878,0.0727075799198,0.0730315100045,0.07286300092,0.0727893804462,0.0727075799198,0.0727468441725,0.0729857017097,0.0732376473311,0.0732998157312,0.0734421486472,0.0734208805104,0.0733816162577,0.0734683248157,0.0735386732684,0.0736777341634,0.0736957302792,0.0736433779423,0.0733390799839,0.0732360113206,0.0732425553627,0.0733505320576,0.0733718001945,0.0734486926893,0.073345624026,0.0732147431837,0.0731051304783,0.073060958194,0.0732916356786,0.0734388766262,0.073314539826,0.0732998157312,0.0733619841313,0.0734356046051,0.0737611707003,0.0738462432478,0.0739623999954,0.0741260010483,0.0739165917006,0.0737399025635,0.0738887795216,0.0738495152689,0.0737857108583,0.073741538574,0.0734863209315,0.0735681214579,0.0737104543739,0.0736630100686,0.0739133196795,0.0739214997322,0.073970580048,0.0740654686587,0.0738298831425,0.07385278729,0.0741194570061,0.0739476759006,0.0738789634584,0.0738756914374,0.0737562626688,0.0740000282375,0.0739198637216,0.0737775308056,0.0740900088166,0.074109640943,0.0739787601007,0.0742143456168,0.0742732419958,0.0743354103959,0.0741996215221,0.0740736487113,0.0739231357427,0.0741734453536,0.0743403184275,0.0742388857747,0.074338682417,0.0742568818906,0.0741570852483,0.0740196603639,0.0742356137537,0.0742650619432,0.0745137355436,0.0743992148066,0.0739476759006,0.0739542199427,0.0740638326482,0.0740671046692,0.0740703766903,0.0741145489746,0.0741178209956,0.0740965528587,0.0741701733325,0.0738217030899,0.0741210930167,0.0743092342275,0.0740065722797,0.0740523805745,0.0740327484481,0.0737840748477,0.0737840748477,0.0737758947951,0.0739591279743,0.0742896021011,0.074283058059,0.074422118954,0.0745350036805,0.0744139389013,0.0744401150698,0.0747853132914,0.0746249842595,0.074592264049,0.0743288663538,0.0743255943328,0.0742732419958,0.0740605606271,0.0740801927535,0.0740065722797,0.0739067756374,0.0737791668162,0.0738053429846,0.0738626033531,0.0738511512794,0.0738920515426,0.0737251784687,0.0734961369947,0.0734388766262,0.073571393479,0.0738037069741,0.0739231357427,0.0738953235637,0.0738871435111,0.0739787601007,0.0739002315953,0.0740294764271,0.0739378598374,0.0741538132272,0.0742208896589,0.0740556525955,0.0740000282375,0.0740687406798,0.0738822354795,0.0735468533211,0.073456872742,0.073456872742,0.0737857108583,0.0734257885419,0.0732245592469,0.073200019089,0.0730838623414,0.0730347820256,0.0731771149416,0.0735632134264,0.0735468533211,0.0735370372579,0.0734192444998,0.0737006383108,0.0737906188899,0.0736793701739,0.0735583053948,0.0736679181002,0.0736793701739,0.0733161758365,0.0733767082261,0.0734437846578,0.0732932716891,0.0729726136255,0.072946437457,0.073057686173,0.0731493027626,0.0656989108145,0.0583074152455,0.0511007888663,0.0437387414868,0.0)
m <- c(0.0431894600587,0.0504127673026,0.0577390544869,0.0651274565558,0.0723180717552,0.0723295139708,0.0719241326184,0.0720025935253,0.0723425907886,0.0724831665802,0.0726400883941,0.0726449922007,0.0725583582827,0.0722739374951,0.072316437153,0.0725632620894,0.0728525866837,0.0727953756057,0.072883644126,0.0728607596948,0.0728558558881,0.073027489122,0.0730896040067,0.0734622933146,0.0734639279168,0.0734475818945,0.0735293120059,0.0738693092692,0.0738513286447,0.0738382518269,0.0737843099534,0.0738006559757,0.0736339265485,0.0733805632032,0.073522773597,0.0735407542215,0.0736208497306,0.0733756593965,0.0731124884378,0.0730699887799,0.073006239293,0.0727643181634,0.0728689327059,0.0729849894641,0.0729604704307,0.0728427790703,0.072625376974,0.0727921064012,0.0729130669661,0.0730748925866,0.0731370074713,0.0734050822366,0.0734606587123,0.0732367182071,0.0732007569581,0.073372390192,0.0735342158126,0.0733413327497,0.0735881576861,0.0734819085413,0.0736698877975,0.0736845992175,0.0737581563178,0.074054019321,0.0739673854029,0.073960846994,0.0740098850608,0.0740523847187,0.0738496940425,0.073795752169,0.0736895030242,0.0734688317235,0.0736045037084,0.0736175805262,0.073831713418,0.0737941175668,0.0736682531952,0.0735358504148,0.0734557549056,0.0737516179089,0.0735848884816,0.0737810407489,0.0737712331356,0.0737777715445,0.0735848884816,0.073723829671,0.0738137327935,0.0741063265923,0.0741602684658,0.0740654615366,0.0740425771054,0.0740785383544,0.0740507501165,0.0742992096551,0.0745656498182,0.0744397854467,0.0742926712462,0.0742289217593,0.0742812290306,0.0741144996034,0.0742207487482,0.0739690200051,0.0738300788158,0.0735620040504,0.0734328704745,0.0733871016121,0.0734704663257,0.0736420995596,0.0735423888237,0.0737565217155,0.0739297895517,0.0739951736408,0.0742256525549,0.0741700760791,0.0739771930163,0.0740098850608,0.0741520954546,0.0740670961388,0.0739951736408,0.0739314241539,0.0737467141022,0.0737973867712,0.0736045037084,0.0736960414331,0.0737924829645,0.0736355611507,0.0734900815524,0.0733151791141,0.0734214282589,0.0733625825787,0.0733119099096,0.0733969092255,0.0734704663257,0.0734230628611,0.0733838324076,0.0735554656415,0.073501523768,0.0737042144443,0.0737205604665,0.0736993106376,0.0738791168826,0.0737941175668,0.0737843099534,0.0737924829645,0.07410469199,0.0739412317673,0.0740278656853,0.0738415210314,0.0737516179089,0.0737483487044,0.0735685424594,0.0734737355302,0.0734132552477,0.0735472926304,0.0732743140584,0.0734034476344,0.0732514296272,0.0731402766757,0.0732873908762,0.0731255652557,0.0731827763336,0.0730748925866,0.0730471043487,0.072934316795,0.0729016247505,0.0726024925428,0.0725599928849,0.0726221077696,0.0722821105062,0.072517493227,0.0723850904465,0.0727005686765,0.0724488399334,0.0722788413017,0.0722199956216,0.0724357631156,0.0723474945953,0.0721987457926,0.0725452814649,0.0724521091379,0.0723932634577,0.0722755720973,0.0725011472047,0.0723589368109,0.0723916288555,0.0725223970337,0.072682588052,0.0726400883941,0.0724684551602,0.0724439361267,0.0723965326621,0.0722183610193,0.0723638406176,0.0725877811228,0.0725240316359,0.0722379762461,0.0720238433542,0.072352398402,0.0724063402755,0.0723867250488,0.0725223970337,0.0727953756057,0.0724700897624,0.0721562461347,0.0722134572126,0.0722886489151,0.0724292247067,0.0723098987441,0.0721104772723,0.0720696122166,0.0722101880082,0.071893075176,0.0717933644401,0.0718309602914,0.071785191429,0.0716609616597,0.0715808661505,0.0713667332587,0.0714059637122,0.0714272135411,0.0712294266716,0.0712670225228,0.0715138474592,0.0716658654664,0.0714582709835,0.07141904053,0.0715939429684,0.071713268931,0.0714468287679,0.0711967346271,0.0709302944639,0.0706949117432,0.0705477975427,0.0703156840264,0.0704235677734,0.0704693366358,0.0702584729484,0.0701097241457,0.0702143386882,0.0701996272682,0.0702715497662,0.0702797227773,0.0700427054543,0.0700623206811,0.0700999165323,0.0699348217073,0.0696978043843,0.0696029974551,0.069573574615,0.0693054998497,0.0691943468982,0.0693398264965,0.069321845872,0.0689687717908,0.0687660811146,0.0686500243564,0.0688118499769,0.0687791579324,0.0687039662299,0.068949156564,0.0689360797462,0.0687873309435,0.0689540603707,0.06907829014,0.0691256936046,0.0690979053668,0.0690684825267,0.0689507911663,0.0688805032705,0.0687726195235,0.0688330998059,0.0686680049809,0.0685274291893,0.0686876202076,0.0686859856054,0.0685650250406,0.0684538720891,0.0686418513453,0.068805311568,0.0687628119101,0.06874810049,0.0688919454861,0.0687709849212,0.0685372368027,0.0683590651599,0.068345988342,0.0681040672124,0.0677934927891,0.0675008989904,0.0676545515998,0.0672655162696,0.0670857100245,0.0670072491176,0.0669108075862,0.0668078276458,0.0669353266196,0.067182151556,0.0672246512139,0.0672311896228,0.0668552311104,0.0670906138312,0.0669663840619,0.066887923155,0.0670366719577,0.0671510941136,0.0668110968503,0.066521772256,0.0664302345313,0.0664563881669,0.066449849758,0.0666051369696,0.0665348490738,0.0664972532226,0.0663959078845,0.0661621597659,0.0664972532226,0.0665103300404,0.0665234068582,0.0664040808956,0.066507060836,0.0663190815798,0.0665021570293,0.0665904255496,0.0662814857285,0.0665593681072,0.0664939840181,0.0663844656689,0.0663811964644,0.0664874456092,0.0661866787993,0.0660085071565,0.0660215839743,0.0659594690897,0.0662340822639,0.0659709113053,0.065753509209,0.0659578344875,0.0659104310229,0.0657289901756,0.0657862012536,0.0656766829043,0.0656717790976,0.0656537984731,0.0657306247778,0.0656766829043,0.0656554330754,0.0652271672917,0.0653023589942,0.0652010136561,0.0651977444516,0.0652140904739,0.064985246162,0.0648577471883,0.0646828447499,0.0646436142964,0.0645782302073,0.0647188059989,0.0646289028764,0.0648364973593,0.0649067852551,0.0649574579242,0.0649214966751,0.0647139021922,0.0647073637833,0.0646321720809,0.0646991907722,0.0647645748613,0.0645226537316,0.064346116691,0.0641695796504,0.0640322730633,0.0638998702829,0.0639505429519,0.06405188829,0.0638851588628,0.0637887173314,0.0637086218222,0.0638393900004,0.0639538121564,0.0640960225502,0.0642365983418,0.064346116691,0.0644294814046,0.0641499644237,0.0644082315757,0.0643297706687,0.0643657319177,0.0644834232781,0.0644458274269,0.0643346744754,0.0644245775979,0.0643902509512,0.0644834232781,0.0645128461182,0.064604383843,0.0648397665638,0.0649934191732,0.0647678440657,0.0646697679321,0.0647514980435,0.0647514980435,0.0648299589504,0.0646828447499,0.0648136129281,0.0645896724229,0.0645144807205,0.064288905613,0.0643559243044,0.0644016931668,0.0645373651517,0.0643690011222,0.0644670772559,0.0646746717388,0.0648479395749,0.0650326496266,0.0651552447937,0.0655066842726,0.0655148572838,0.0657878358558,0.0656325486442,0.065789470458,0.0656734136999,0.0656701444954,0.065588414384,0.0657110095511,0.0656913943244,0.0655753375662,0.0657976434692,0.0657306247778,0.0659284116474,0.0659006234095,0.0661147563013,0.06604773761,0.0659888919298,0.0658761043761,0.0659153348296,0.0657584130157,0.0658090856848,0.0657077403466,0.0656848559155,0.0656783175065,0.0657077403466,0.0659267770451,0.0660052379521,0.0662651397063,0.0660918718701,0.0665086954382,0.0664694649847,0.0665021570293,0.0667833086124,0.0669320574151,0.0670105183221,0.0670497487755,0.0670955176379,0.0670644601956,0.0674943605814,0.0672017667827,0.0671625363292,0.0674796491614,0.0674420533102,0.0677362817111,0.0677771467668,0.0679307993762,0.0681727205059,0.0683656035688,0.0684146416356,0.0687742541257,0.069120789798,0.0689458873596,0.0689851178131,0.0689148299173,0.0690390596866,0.0692809808163,0.0693104036564,0.0694248258123,0.0695915552395,0.0696111704662,0.069867803016,0.0701473199969,0.0702437615283,0.0704840480558,0.0706605850964,0.0707423152078,0.0708305837281,0.0708665449771,0.070765199639,0.0709466404862,0.0709646211107,0.0710430820177,0.0712686571251,0.0713814446788,0.0713405796231,0.0714860592213,0.0716478848419,0.0720826890344,0.0724406669223,0.0728133562302,0.0729294129883,0.0731288344601,0.0734197936566,0.073687868422,0.0739412317673,0.0738251750091,0.0742501715883,0.07410469199,0.0742142103393,0.0741341148301,0.0742616138039,0.0744986311269,0.0744299778333,0.0742567099972,0.0745460345915,0.0749743003751,0.074944877535,0.0749040124793,0.0753731433187,0.0757098713776,0.0758749662026,0.0760253496075,0.076352270053,0.0768606313458,0.0768066894723,0.0770714950332,0.077213705427,0.0774801455901,0.0773722618431,0.0775210106458,0.077744951151,0.0778364888757,0.0781732169346,0.078254947046,0.0788515768591,0.0787453277143,0.0788499422569,0.0789790758328,0.0792765734383,0.0792863810516,0.0795201291702,0.0797996461511,0.0798192613778,0.0798356074001,0.0799680101806,0.0804698330644,0.0808506953835,0.0811890580446,0.0812201154869,0.0814309791743,0.0816778041107,0.0818837639914,0.0820161667718,0.0822580879015,0.0822695301171,0.0822678955149,0.082455874771,0.0827827952166,0.0832257724202,0.0833761558252,0.0834513475277,0.0838371136534,0.0839907662628,0.0844762431244,0.0846707607895,0.0850254694729,0.0855387345724,0.0858558474045,0.0858493089956,0.0859506543337,0.086189306259,0.086333151255,0.0867516094253,0.0868055512988,0.0871439139599,0.087245259298,0.0872043942423,0.0871341063465,0.0873498738406,0.0879138116091,0.0880609258096,0.0882668856903,0.0884744801732,0.0885823639202,0.0888880345368,0.0892133203801,0.0892836082759,0.0894895681566,0.0898099501932,0.0899014879179,0.09020388933,0.0904392720508,0.0908724416411,0.0912320541312,0.0915458977589,0.0915769552013,0.0918384915577,0.0923190646126,0.092580600969,0.0929075214146,0.0933178065737,0.0934763629898,0.0934649207742,0.0939536668402,0.0944375090996,0.0955768268523,0.0965772034156,0.0973716200982,0.0986858402893,0.0998071774174,0.100863130456,0.101943602529,0.103216957664,0.104098008265,0.104769829781,0.10508530801,0.105557708054,0.106129818834,0.106218087354,0.10670683342,0.10699288881,0.107689229359,0.10815182179,0.108478742235,0.108817104896,0.109340177609,0.110085556225,0.110556321666,0.110755743138,0.11108756739,0.111324584713,0.11144717988,0.111406314825,0.111607370899,0.112002944638,0.112190923894,0.112362557128,0.112671496949,0.113078512904,0.112933033305,0.113528028516,0.113719276977,0.114049466627,0.114621577407,0.114838979503,0.115157726937,0.115304841138,0.115378398238,0.115741279932,0.116239833612,0.116329736734,0.116839732629,0.117168287677,0.117653764539,0.117859724419,0.118216067705,0.118542988151,0.119121637339,0.119363558469,0.119901342602,0.120349223612,0.120581337128,0.121025948934,0.121483637558,0.122045940724,0.122403918612,0.122657281958,0.122814203771,0.123417371993,0.123794965108,0.124028713227,0.124151308394,0.124695630935,0.125066685641,0.125383798473,0.126155330725,0.126701287869,0.127013496894,0.127474454722,0.128040027093,0.128494446512,0.129189152459,0.12946866944,0.129488284667,0.129893666019,0.129968857722,0.130292508963,0.130900580992,0.130962695876,0.131185001779,0.131784900797,0.131953264826,0.132288358283,0.13269700884,0.133138351441,0.133538828987,0.133963825566,0.134398629759,0.134527763335,0.134725550204,0.134804011111,0.134952759914,0.135310737802,0.135575543363,0.135997270737,0.136330729592,0.136391209874,0.136046308804,0.136217942038,0.136448420952,0.13650563203,0.137146396103,0.136981301278,0.136928994007,0.137009089516,0.136590631346,0.136484382201,0.136819475658,0.137255914453,0.137085915821,0.137089185025,0.136559573904,0.136711591911,0.136435344134,0.135917175228,0.13608717386,0.136020155169,0.13607246244,0.135884483184,0.135711215348,0.135626216032,0.135678523303,0.135381025698,0.135336891437,0.135436602173,0.135469294218,0.135917175228,0.135676888701,0.135452948196,0.135729195972,0.135616408418,0.135464390411,0.135289487973,0.135444775184,0.135246988315,0.134908625654,0.134272765387,0.134266226978,0.134138728005,0.133725173641,0.133695750801,0.13373171205,0.133978536986,0.133493060125,0.133318157686,0.133028833092,0.132855565256,0.132445280097,0.132172301525,0.131945091815,0.131614902165,0.131162117348,0.130568756739,0.130828658494,0.130511545661,0.130299047372,0.13021731726,0.129864243179,0.129447419611,0.128963577352,0.128685694973,0.128518965546,0.128219833338,0.128031854082,0.127690222216,0.127494069949,0.126657153609,0.126719268493,0.126627730769,0.126756864345,0.126715999289,0.126300810323,0.125852929313,0.125308606771,0.125079762459,0.124937552065,0.125079762459,0.12464005446,0.124260826743,0.123656023919,0.122877953258,0.122693243207,0.122652378151,0.122516706166,0.122497090939,0.121918441751,0.121467291536,0.120973641663,0.120728451329,0.120422780712,0.120342685203,0.119917688624,0.119636537041,0.119023561206,0.118431835199,0.118132702991,0.11772078323,0.117601457268,0.117039154101,0.116756367916,0.116483389344,0.116131949865,0.115752722148,0.115587627323,0.115314648751,0.115144650119,0.115038400975,0.114595423771,0.114580712351,0.114502251444,0.113933409869,0.113671873512,0.11325178074,0.112766303878,0.112550536384,0.112439383433,0.112132078214,0.11200457924,0.111868907255,0.111788811746,0.111711985441,0.111440641472,0.111177470513,0.11083747325,0.110649493993,0.110064306396,0.109796231631,0.109242101475,0.108800758874,0.108204129061,0.107896823842,0.107908266058,0.107816728333,0.107576441805,0.106970004379,0.106734621658,0.106355393941,0.106428951042,0.106133088038,0.106226260365,0.105850301853,0.105250402835,0.105140884486,0.105134346077,0.104920213185,0.104688099669,0.104733868532,0.104369352235,0.104199353603,0.1033902255,0.103545512712,0.103359168058,0.103127054542,0.10252388632,0.102554943762,0.102515713309,0.102131581785,0.10147447169,0.101160628062,0.100951398977,0.100470825922,0.100114482636,0.0998938113355,0.0999330417889,0.0995881407189,0.099365834816,0.099086317835,0.0990438181771,0.0990176645415,0.0990683372105,0.0986907440959,0.0987920894341,0.098303343368,0.0980499800227,0.0980467108183,0.0974484464029,0.0972964283958,0.097262101749,0.0969384505079,0.0964431660329,0.0961358608141,0.0956945182127,0.0951861569199,0.0948020253964,0.094260972059,0.0940321277472,0.093621842588,0.0932932875403,0.0928650217566,0.0927244459651,0.092493967051,0.0920460860406,0.0916832043461,0.0912222465179,0.0904065800063,0.0897429315018,0.0888455348789,0.0879906379138,0.0869068966369,0.0858362321778,0.0848227787967,0.083956439616,0.083116254071,0.0821616463701,0.0818755909802,0.0814571328099,0.0810403092419,0.080688869763,0.0806136780605,0.0802458925593,0.0802720461949,0.0799467603516,0.0800268558608,0.0799957984184,0.0797097430286,0.079440033661,0.0792160931559,0.079095132591,0.0786913858408,0.0786586937962,0.0780489871653,0.0781094674477,0.0777253359242,0.0774883186012,0.0772382244604,0.0767527475988,0.0765435185137,0.0761119835256,0.0761659253991,0.0759730423362,0.0761430409679,0.0757540056377,0.0755496803593,0.0755349689392,0.0751966062781,0.0752227599137,0.0753126630362,0.0752554519583,0.0751884332669,0.0748745896392,0.0750037232152,0.074836993788,0.0746522837363,0.0745296885692,0.0742207487482,0.0741537300569,0.0738954629049,0.0736568109796,0.0733887362143,0.0733642171809,0.0729228745794,0.0729441244084,0.0731026808245,0.072805183219,0.0730405659398,0.0728591250926,0.0727659527656,0.0726319153829,0.0724145132866,0.0723246101641,0.0723442253909,0.072367109822,0.0720565353988,0.0719813436963,0.0717214419421,0.0719437478451,0.0718227872802,0.0719878821052,0.0720107665364,0.0718325948936,0.0711869270137,0.0708387567392,0.0707325075944,0.070542893736,0.0704660674313,0.0701277047702,0.0700917435212,0.069846553187,0.0695294403549,0.0693757877455,0.0694346334257,0.069444441039,0.0692237697383,0.0691191551957,0.0692155967272,0.068955694973,0.0686287745274,0.0684048340222,0.0683950264089,0.0685666596428,0.0686206015163,0.068496371747,0.0685879094717,0.0684931025425,0.0683705073755,0.0686026208918,0.0687382928767,0.0686140631074,0.0685879094717,0.0684179108401,0.0683247385131,0.068187431926,0.0681580090859,0.0682103163572,0.0680615675544,0.0676741668265,0.0673783038233,0.0674943605814,0.0676038789307,0.0673995536522,0.0673684962099,0.0675041681948,0.0674829183659,0.067304746723,0.0672115743961,0.0672851314963,0.0673243619498,0.0674404187079,0.0671494595114,0.0671282096825,0.0668699425305,0.0664939840181,0.0662798511263,0.0665544643006,0.0664694649847,0.066464561178,0.0662553320929,0.0658303355137,0.065789470458,0.0657976434692,0.0658368739226,0.0660869680635,0.0659692767031,0.0655279341016,0.0654870690459,0.0652500517229,0.0653497624588,0.0653464932543,0.0654494731947,0.06538735831,0.0653285126298,0.0649934191732,0.0652255326895,0.0654788960348,0.0656047604063,0.0658172586959,0.0656864905177,0.0656570676776,0.0654609154103,0.0655442801239,0.0654936074548,0.0655066842726,0.0654331271724,0.0653268780276,0.0651568793959,0.0649950537754,0.0652026482583,0.0653922621167,0.0655132226816,0.065294185983,0.0652925513808,0.0655540877372,0.0654429347858,0.0654511077969,0.0655540877372,0.0655213956927,0.0652402441095,0.0652059174628,0.0650326496266,0.0652729361541,0.0654314925702,0.065408608139,0.0655099534771,0.0652843783697,0.0651454371803,0.0653432240499,0.0656587022798,0.065624375633,0.0655867797818,0.0655181264882,0.0655262994994,0.0652892821764,0.0652533209274,0.0654887036481,0.0655361071127,0.0650898607046,0.0648463049727,0.0647318828167,0.0649296696863,0.0648381319615,0.0648070745192,0.0649296696863,0.0648430357682,0.0646893831588,0.0647008253744,0.0651568793959,0.0654298579679,0.0654429347858,0.0654494731947,0.0654069735368,0.0654413001835,0.065480530637,0.0655540877372,0.0656587022798,0.0656521638709,0.0656701444954,0.0656260102353,0.0656930289266,0.0657845666513,0.0656619714843,0.0658188932981,0.0658156240937,0.0656864905177,0.0657126441533,0.0658434123315,0.0655344725105,0.0654167811501,0.0655687991573,0.0654200503546,0.0656930289266,0.0655001458637,0.0654135119457,0.0656766829043,0.0658695659672,0.0658842773872,0.0661311023236,0.0660052379521,0.0659970649409,0.065990526532,0.0659856227253,0.0661212947102,0.0663468698176,0.0663452352154,0.0663043701597,0.0661343715281,0.0662291784573,0.0665757141295,0.0667718663968,0.0667146553189,0.0668699425305,0.0668388850882,0.066923884404,0.0668683079283,0.0667293667389,0.066981095482,0.0668748463372,0.0667604241812,0.0666819632743,0.0669484034374,0.0669059037795,0.06705301798,0.0668862885528,0.0669549418463,0.0669565764486,0.0669042691773,0.0669761916753,0.0670873446268,0.0671134982624,0.0669778262775,0.0668748463372,0.0666901362855,0.0668846539505,0.0669827300842,0.0671069598535,0.0672246512139,0.0673325349609,0.0673521501876,0.067512341206,0.0677264740978,0.0679046457406,0.0681007980079,0.067914453354,0.0680272409077,0.0681563744836,0.0683541613532,0.0681710859037,0.0682282969817,0.0680435869299,0.0679324339785,0.0680550291455,0.0682332007883,0.0681939703349,0.0679438761941,0.0677215702911,0.0676823398376,0.067914453354,0.0677608007446,0.0677297433022,0.0678997419339,0.0677836851757,0.0676986858599,0.0679275301718,0.0683083924908,0.068589544074,0.068517621576,0.0684816603269,0.0686680049809,0.0688380036126,0.0687873309435,0.0619873856765,0.0551253255249,0.0482894190089,0.0412246681811,0.0)
ycorr <- c(9.01488611788e-05,9.00823151416e-05,8.9878447387e-05,8.95372155992e-05,8.90552543407e-05,8.8431628172e-05,8.76629861151e-05,8.68871421065e-05,8.61030605915e-05,8.53115534749e-05,8.45056669178e-05,8.36883011731e-05,8.28608792198e-05,8.20307432472e-05,8.11996092981e-05,8.03632541152e-05,7.95241503787e-05,7.86848586372e-05,7.78472263568e-05,7.7011980819e-05,7.61829063562e-05,7.53554322067e-05,7.45311941327e-05,7.37066417782e-05,7.28726021231e-05,7.20306027994e-05,7.11819421887e-05,7.03258586726e-05,6.94627361721e-05,6.85909377106e-05,6.77079968382e-05,6.68121907877e-05,6.59033532602e-05,6.4978730225e-05,6.40375275531e-05,6.30881476121e-05,6.21287478866e-05,6.11597750975e-05,6.01777600579e-05,5.91825994e-05,5.81746917488e-05,5.71546951306e-05,5.61196440644e-05,5.5073837822e-05,5.4016572506e-05,5.29485669172e-05,5.18670351986e-05,5.07740283518e-05,4.96717929536e-05,4.8559629635e-05,4.74357535522e-05,4.63030155706e-05,4.51633755339e-05,4.4013253715e-05,4.28551306055e-05,4.16895777249e-05,4.05123722376e-05,3.93225713553e-05,3.81200080094e-05,3.69014646185e-05,3.56678392355e-05,3.44221260259e-05,3.31626366883e-05,3.1890455004e-05,3.06115806616e-05,2.93216804488e-05,2.80231923491e-05,2.67198512343e-05,2.54082481201e-05,2.4090408683e-05,2.27653842001e-05,2.14306351904e-05,2.00870580219e-05,1.87363954619e-05,1.73750570587e-05,1.60000519447e-05,1.46166487213e-05,1.32223760737e-05,1.18178651051e-05,1.0409497967e-05,8.99482419717e-06,7.57593772104e-06,6.15787429691e-06,4.73383462118e-06,3.30349944925e-06,1.86522734972e-06,4.17556924035e-07,-1.03864307222e-06,-2.49783317105e-06,-3.96021619204e-06,-5.42643601197e-06,-6.89583727614e-06,-8.37446510775e-06,-9.85674444932e-06,-1.13369906741e-05,-1.28152995956e-05,-1.42826989598e-05,-1.57381335935e-05,-1.71867713283e-05,-1.86374301845e-05,-2.00845430444e-05,-2.15289050003e-05,-2.29655257771e-05,-2.43921090914e-05,-2.58128560876e-05,-2.72240649964e-05,-2.86293483406e-05,-3.00340832542e-05,-3.14406596866e-05,-3.28443583163e-05,-3.42410767575e-05,-3.56354505668e-05,-3.70292002252e-05,-3.84261639237e-05,-3.98229752689e-05,-4.12238115352e-05,-4.26371511453e-05,-4.40627259791e-05,-4.5495901225e-05,-4.6933782037e-05,-4.83818797423e-05,-4.98363309749e-05,-5.12956800097e-05,-5.27562159311e-05,-5.42236902985e-05,-5.56932082893e-05,-5.71580391135e-05,-5.86105696915e-05,-6.00499244798e-05,-6.14807578398e-05,-6.29005775386e-05,-6.43104997551e-05,-6.57153342105e-05,-6.71191115323e-05,-6.85186809034e-05,-6.99137096945e-05,-7.13063357268e-05,-7.27012927658e-05,-7.40996324075e-05,-7.54974110065e-05,-7.68955843093e-05,-7.82941073588e-05,-7.96869279229e-05,-8.107118812e-05,-8.24492087676e-05,-8.38234090188e-05,-8.51921615078e-05,-8.65582504048e-05,-8.79182799308e-05,-8.92732957423e-05,-9.06220986077e-05,-9.19653861192e-05,-9.33066148333e-05,-9.46470548328e-05,-9.59897381719e-05,-9.73260557872e-05,-9.86606766267e-05,-9.99860353979e-05,-0.000101308551885,-0.000102630103399,-0.000103956216153,-0.000105289090229,-0.000106624941814,-0.000107961641686,-0.000109296494846,-0.000110630776124,-0.000111967514281,-0.000113308955771,-0.000114657703196,-0.000116005890901,-0.000117349313321,-0.000118680519062,-0.000120004462677,-0.00012132520851,-0.000122645183759,-0.000123968938311,-0.000125289629185,-0.000126606446284,-0.000127914176582,-0.000129218949908,-0.000130522959102,-0.000131832659788,-0.000133147938106,-0.000134462910115,-0.000135771426497,-0.000137070284305,-0.000138361483286,-0.00013964964374,-0.000140935993131,-0.000142219564337,-0.000143498607751,-0.00014477138464,-0.000146036851411,-0.000147297951035,-0.000148556727815,-0.000149818485152,-0.000151083811271,-0.000152350880687,-0.000153618600202,-0.000154889794941,-0.00015616772649,-0.000157448646524,-0.000158732361582,-0.000160017421259,-0.000161304089433,-0.000162591723251,-0.000163882876417,-0.000165175127918,-0.00016646838536,-0.000167764842157,-0.000169061409817,-0.000170358633501,-0.000171657307604,-0.000172957303033,-0.000174258587174,-0.000175563337068,-0.00017686660983,-0.000178168294044,-0.000179469838261,-0.000180767451114,-0.000182058709987,-0.000183344578607,-0.000184628063374,-0.000185912788067,-0.000187198733483,-0.000188485004861,-0.00018977148984,-0.000191060766674,-0.000192353482982,-0.000193651000344,-0.000194959844545,-0.000196276992248,-0.000197598344212,-0.000198922829849,-0.000200250410381,-0.000201580378764,-0.000202914909297,-0.000204256021765,-0.000205601534406,-0.000206947852479,-0.000208289061025,-0.00020962950107,-0.000210973985273,-0.000212324711691,-0.000213674249692,-0.000215025952009,-0.000216382035965,-0.000217740140795,-0.000219093464412,-0.000220448349461,-0.000221805355546,-0.000223167221035,-0.000224525300128,-0.000225881497488,-0.000227241293412,-0.00022860518719,-0.000229967701214,-0.000231326613412,-0.000232688736545,-0.000234058233338,-0.000235434887145,-0.000236816151952,-0.000238208351493,-0.000239605044254,-0.000241004734131,-0.000242404230576,-0.000243804032358,-0.000245208201172,-0.000246616455967,-0.000248022769953,-0.000249423474469,-0.000250815235347,-0.000252198729555,-0.000253570480319,-0.000254937602231,-0.000256300089429,-0.000257657384323,-0.000259010733419,-0.000260359210739,-0.00026170181922,-0.000263043492928,-0.00026438800658,-0.000265733245091,-0.000267079785472,-0.000268426183366,-0.00026976392704,-0.00027109015882,-0.000272398620099,-0.000273688408558,-0.000274952863051,-0.000276189260618,-0.00027739217713,-0.000278561665212,-0.000279699715336,-0.000280805700854,-0.000281888133821,-0.000282956579912,-0.000284015048888,-0.000285069782526,-0.000286127873971,-0.000287192693098,-0.000288273174874,-0.000289368346293,-0.000290482488873,-0.000291615861961,-0.000292769654225,-0.000293936025496,-0.000295112639665,-0.000296298504652,-0.000297488414124,-0.000298682557958,-0.000299877114659,-0.000301074092756,-0.000302272399684,-0.000303468108407,-0.000304659267844,-0.000305843160997,-0.000307024113233,-0.000308201425922,-0.000309379629274,-0.000310560326883,-0.000311742922585,-0.000312927418686,-0.000314109168417,-0.00031529285991,-0.000316475531233,-0.000317662939458,-0.000318858550327,-0.00032005792849,-0.000321261849329,-0.000322462363872,-0.000323665282894,-0.000324864579657,-0.00032606406191,-0.000327262513986,-0.000328456906762,-0.000329651270345,-0.000330841310983,-0.000332026218769,-0.000333206110353,-0.0003343836224,-0.000335557779338,-0.000336728363413,-0.000337898649851,-0.000339066352971,-0.000340237037311,-0.000341410239621,-0.000342583327969,-0.00034375720503,-0.000344931507793,-0.00034610849481,-0.000347286800574,-0.000348470382522,-0.000349653572623,-0.000350835929702,-0.000352017293943,-0.00035319660079,-0.0003543742587,-0.000355552678939,-0.00035673057764,-0.000357905780202,-0.000359069632335,-0.000360220138291,-0.000361358113223,-0.000362486254031,-0.000363604795376,-0.000364713012467,-0.000365809157428,-0.000366893538992,-0.000367963599468,-0.000369020742922,-0.000370070715778,-0.000371122855507,-0.000372176354442,-0.000373229521187,-0.000374283185208,-0.000375334978641,-0.000376385751619,-0.000377431303295,-0.000378474319637,-0.000379517588619,-0.000380561353696,-0.000381600262855,-0.000382634088101,-0.000383662359591,-0.000384685018975,-0.000385701514138,-0.000386713415506,-0.000387721891669,-0.000388728213828,-0.000389729396057,-0.000390722675634,-0.000391705210595,-0.000392677604659,-0.000393639046119,-0.000394588972372,-0.000395524546409,-0.000396443818122,-0.000397350079896,-0.000398245526013,-0.000399127448849,-0.00039999762044,-0.000400858732348,-0.00040171211296,-0.000402556193151,-0.000403389445677,-0.000404215912864,-0.000405037253885,-0.000405854589226,-0.000406660260896,-0.000407454465566,-0.000408236545314,-0.000409003679007,-0.000409752804672,-0.000410490410265,-0.00041121739718,-0.000411933915896,-0.000412636298333,-0.000413321927655,-0.000413991488888,-0.000414648969426,-0.000415294723979,-0.000415934084165,-0.000416568504568,-0.000417192076268,-0.000417799749167,-0.000418391137156,-0.000418969710352,-0.000419537678206,-0.000420099841056,-0.000420653460545,-0.00042119549869,-0.000421720354291,-0.000422227777231,-0.000422722275838,-0.000423210259538,-0.000423690680645,-0.000424161026228,-0.000424615109062,-0.000425049441462,-0.000425463826646,-0.000425860809806,-0.000426242846962,-0.000426613042638,-0.000426966546485,-0.000427298524327,-0.000427607765974,-0.000427895865719,-0.00042816914348,-0.00042842972698,-0.000428675849515,-0.000428904179567,-0.000429116250481,-0.000429308743157,-0.000429482653423,-0.000429639454272,-0.000429778303571,-0.00042989614654,-0.000429991653229,-0.000430060599327,-0.000430107359068,-0.000430137091865,-0.000430148594105,-0.000430139228541,-0.000430106646907,-0.000430049977992,-0.000429971967535,-0.000429876495606,-0.000429763935614,-0.000429632464335,-0.000429482381458,-0.00042930851718,-0.000429106856957,-0.000428882041548,-0.000428635385288,-0.00042837022299,-0.000428081352571,-0.000427766009873,-0.000427421311685,-0.0004270530124,-0.000426659643074,-0.000426241685366,-0.000425801877302,-0.000425339359744,-0.000424851179251,-0.000424336258855,-0.000423800022961,-0.000423248965433,-0.000422680888115,-0.000422094513792,-0.000421485711868,-0.000420855983484,-0.000420204342768,-0.000419528260405,-0.000418831820136,-0.000418113444024,-0.000417372100879,-0.00041660156034,-0.000415801145607,-0.000414974111797,-0.000414118828802,-0.000413238700873,-0.000412332712467,-0.000411401382772,-0.000410445517088,-0.000409466029833,-0.000408459885266,-0.000407426646806,-0.000406369619841,-0.000405284645266,-0.000404174030273,-0.000403036709255,-0.000401870605568,-0.000400679279277,-0.000399462693452,-0.00039821825923,-0.000396945847881,-0.000395646842294,-0.000394321418381,-0.000392966647082,-0.000391585652636,-0.000390177393906,-0.000388747445416,-0.000387293114415,-0.000385811869957,-0.000384301693091,-0.000382765466693,-0.0003812036815,-0.000379618561825,-0.000378008302951,-0.000376375635377,-0.000374718234274,-0.000373032544,-0.000371314313442,-0.000369562843597,-0.000367780975924,-0.000365968964597,-0.00036412405829,-0.000362244743333,-0.00036033500214,-0.000358393054239,-0.000356418469158,-0.000354411111698,-0.000352372377398,-0.000350304119336,-0.000348207680434,-0.000346081991277,-0.000343930720963,-0.000341754010062,-0.000339549199547,-0.000337312748251,-0.000335046147858,-0.000332751340247,-0.000330432335699,-0.000328087915149,-0.000325718893117,-0.000323326140032,-0.000320906665275,-0.000318459315842,-0.000315985931728,-0.000313488146322,-0.000310965824854,-0.00030841672025,-0.000305838723239,-0.00030323157324,-0.000300596709069,-0.000297928283841,-0.000295228664426,-0.000292496430645,-0.000289729764087,-0.000286929450284,-0.000284097071261,-0.000281231011036,-0.000278332261889,-0.000275398665849,-0.000272429596951,-0.000269429575664,-0.000266400537385,-0.000263341454723,-0.00026025733728,-0.000257147448675,-0.000254010065883,-0.000250846227936,-0.000247660214444,-0.000244455503538,-0.000241231688321,-0.000237985664091,-0.000234713082014,-0.000231417652263,-0.000228097166424,-0.000224678820119,-0.00022109598051,-0.000217293396508,-0.000213223693459,-0.000208500610856,-0.000204452488871,-0.000200667046073,-0.000197094087722,-0.000193670360115,-0.000190320512979,-0.000186968332925,-0.000183687283738,-0.000180547572873,-0.000177604121183,-0.000174897994438,-0.000172810473364,-0.000170013404084,-0.000166923904308,-0.000163592115258,-0.000160079989616,-0.000156462992861,-0.000152815989658,-0.000149134445725,-0.000145416022618,-0.000141664716279,-0.000137882737558,-0.000134072052183,-0.000130229819646,-0.000126355148378,-0.000122453031398,-0.000118524904906,-0.000114569867785,-0.000110590272689,-0.000106587817048,-0.000102559129521,-9.85055831612e-05,-9.44298761899e-05,-9.03355023127e-05,-8.62238937273e-05,-8.20898140006e-05,-7.79314014432e-05,-7.37469972014e-05,-6.95360550753e-05,-6.53000785718e-05,-6.10417699342e-05,-5.67646170244e-05,-5.24669985779e-05,-4.81458152866e-05,-4.37987484547e-05,-3.94264959376e-05,-3.50322795265e-05,-3.06173643065e-05,-2.61844736017e-05,-2.17369929982e-05,-1.72742110753e-05,-1.27914655549e-05,-8.28662567567e-06,-3.75732264283e-06,7.9307185159e-07,5.36280990812e-06,9.95117059036e-06,1.45590128029e-05,1.91871043784e-05,2.3838552345e-05,2.85121722712e-05,3.32098337154e-05,3.7929078902e-05,4.26653130962e-05,4.74227844605e-05,5.22019201901e-05,5.70073002916e-05,6.18363611626e-05,6.66881525274e-05,7.15647838154e-05,7.64645624279e-05,8.13883289315e-05,8.6334080769e-05,9.12993445377e-05,9.62826724843e-05,0.000101280534526,0.00010629171382,0.000111314185944,0.000116349540769,0.000121394561382,0.000126452970718,0.000131522833918,0.000136602091187,0.000141693980848,0.000146799360294,0.000151918873334,0.000157051770072,0.000162198575208,0.000167358227111,0.000172531635765,0.000177718700917,0.000182910661701,0.000188112509752,0.000193329489884,0.000198555967554,0.000203794752323,0.000209042829194,0.000214299767379,0.000219566378447,0.000224843178524,0.000230127161726,0.000235423091785,0.000240731485775,0.000246043636768,0.000251356268874,0.000256669722232,0.000261982620021,0.000267297435278,0.000272613787906,0.00027792558406,0.000283232335497,0.000288537015858,0.00029383200071,0.000299120435053,0.000304407001493,0.00030968727658,0.000314961757985,0.000320228761068,0.000325487620015,0.000330739889916,0.000335986357732,0.000341221661011,0.000346447009762,0.000351664244749,0.000356871499941,0.000362068894402,0.000367256883068,0.000372434705708,0.000377599437662,0.000382749530963,0.000387883762333,0.00039300487328,0.000398115742693,0.000403213888379,0.000408297540337,0.000413366408018,0.000418422630437,0.000423467650102,0.0004285007056,0.000433523983808,0.000438535132033,0.000443531657071,0.000448511745283,0.000453473383538,0.000458416440558,0.000463344372727,0.000468252003678,0.000473135057117,0.000477994416896,0.000482830258761,0.000487643062802,0.000492434093514,0.000497201623525,0.000501944775494,0.000506663615703,0.000511353660793,0.000516016906011,0.000520656149707,0.000525269752661,0.000529856768871,0.000534414490981,0.000538939975759,0.000543435245631,0.0005479021164,0.000552340580637,0.00055675100089,0.000561131610922,0.00056547584217,0.000569783197951,0.000574052418852,0.00057828533761,0.000582486132393,0.000586655096373,0.000590787059747,0.000594880020551,0.00059893448115,0.000602949055599,0.000606926129657,0.000610865921351,0.000614768992159,0.000618633810389,0.000622454774921,0.000626228092459,0.0006299544649,0.000633637515723,0.000637276507506,0.000640871002838,0.000644421428665,0.000647927318776,0.000651388703919,0.000654804097295,0.000658177864158,0.000661511848179,0.000664805500483,0.000668056138571,0.000671261680223,0.000674421971195,0.000677533643632,0.000680598702435,0.000683617752411,0.000686590410457,0.000689517549215,0.000692395349829,0.000695222877333,0.000698001642882,0.000700730698768,0.00070340998386,0.0007060418673,0.000708628457076,0.000711163147856,0.000713648295192,0.000716082709253,0.000718466716673,0.000720801760291,0.000723084453056,0.000725314400996,0.000727493900566,0.000729624072366,0.000731701892941,0.000733728927901,0.00073570669133,0.000737632623615,0.00073950631871,0.000741325651441,0.000743092682258,0.000744808474235,0.000746471295595,0.000748080884077,0.000749637922004,0.000751141650896,0.00075259072806,0.00075398320541,0.000755319396921,0.000756600784303,0.000757825804277,0.000758995923667,0.000760113323725,0.000761176089602,0.000762182360065,0.000763132134351,0.000764026169748,0.000764861842637,0.000765642839972,0.000766370328393,0.000767044476064,0.000767670119367,0.000768242003945,0.000768760834333,0.000769225552457,0.000769638244311,0.000769995414026,0.000770299511142,0.00077055355211,0.000770755677948,0.000770904065291,0.000770995795836,0.000771028289679,0.000771002378568,0.000770919237662,0.000770779996281,0.000770585739876,0.000770340834412,0.00077003923515,0.000769683794691,0.000769273781353,0.000768809363674,0.000768294549433,0.000767730316622,0.000767115795452,0.000766449663547,0.000765731762598,0.000764960896254,0.000764136935582,0.000763262060701,0.000762335434599,0.000761356554823,0.000760324009605,0.000759238346968,0.000758099557626,0.000756910752053,0.000755672760178,0.000754385907909,0.000753051825953,0.000751667957269,0.000750235556645,0.000748754571182,0.000747229107208,0.00074565803654,0.000744039128459,0.00074236806569,0.000740646240376,0.000738871502612,0.000737043445755,0.000735157975173,0.000733219003551,0.000731223117099,0.000729169644039,0.00072705965659,0.000724895767511,0.000722679794906,0.000720410795626,0.0007180866835,0.00071571010988,0.000713283534316,0.000710807345956,0.000708281361135,0.000705706166476,0.000703076812408,0.000700390175674,0.000697648944066,0.00069485262742,0.000692007801194,0.000689110765766,0.000686162053307,0.000683160106319,0.000680105091684,0.000676997029714,0.000673842040148,0.000670644447132,0.000667405398943,0.000664124547486,0.000660800583239,0.000657434614759,0.000654028462971,0.000650582625989,0.000647100798927,0.000643582569984,0.000640025244593,0.000636428578152,0.000632793463208,0.000629120905816,0.000625407999004,0.000621659197946,0.000617873466208,0.000614052788118,0.000610196116928,0.000606303652919,0.0006023811595,0.000598429304892,0.000594446687522,0.000590433367306,0.00058638915668,0.000582314696455,0.000578208648508,0.000574073165067,0.000569909186248,0.000565718950549,0.000561499107645,0.000557248263052,0.000552964708068,0.00054865137195,0.000544313022406,0.00053994790415,0.000535555484289,0.000531134580906,0.000526681046072,0.000522194002278,0.000517670590465,0.000513113202789,0.00050852588636,0.000503909187066,0.000499261503431,0.000494578700397,0.000489866162707,0.000485124390153,0.000480356377594,0.000475563924765,0.0004707491795,0.00046591340201,0.000461055505549,0.000456170840879,0.000451260083712,0.000446320908513,0.000441352959844,0.000436355699494,0.000431332788679,0.000426282297117,0.000421204449529,0.000416100367796,0.000410970502449,0.000405817104958,0.00040064254516,0.000395450797012,0.000390244869561,0.000385025185995,0.000379789730401,0.000374537205499,0.000369268462356,0.000363986792371,0.000358689788265,0.000353379216408,0.000348053818917,0.000342713388873,0.000337358002589,0.000331987928827,0.000326605201971,0.000321211481437,0.000315810148599,0.000310400135359,0.000304979822383,0.000299549858148,0.000294112970621,0.000288670896637,0.000283221062544,0.000277764162758,0.000272301494977,0.000266833290357,0.000261359973302,0.000255879073294,0.000250395598709,0.000244910193498,0.000239420964649,0.000233929435783,0.00022843935568,0.000222952610894,0.000217468365255,0.00021198702993,0.000206509648995,0.000201038352148,0.000195574425266,0.000190116186327,0.000184664690618,0.000179222958932,0.000173787310534,0.000168357423613,0.000162934809556,0.000157520639357,0.000152113949662,0.000146711781319,0.000141312166284,0.000135917699902,0.000130527999825,0.000125145195785,0.000119769086619,0.000114400557953,0.000109037574127,0.000103680772822,9.83322737022e-05,9.29944592212e-05,8.76683017853e-05,8.23539889595e-05,7.7051265603e-05,7.17600175119e-05,6.64805451194e-05,6.12134559866e-05,5.59610973384e-05,5.07223932665e-05,4.54978841325e-05,4.02867549198e-05,3.50906884159e-05,2.99135476999e-05,2.47580816437e-05,1.96195408412e-05,1.44994700364e-05,9.3961630498e-06,4.31110428417e-06,-7.52627341436e-07,-5.79609585583e-06,-1.08212390026e-05,-1.58273902047e-05,-2.0815738507e-05,-2.57876700329e-05,-3.07420614243e-05,-3.56739072096e-05,-4.05825700783e-05,-4.54677951404e-05,-5.03286904343e-05,-5.51672825974e-05,-5.99771153711e-05,-6.47593642758e-05,-6.95149777408e-05,-7.42462648029e-05,-7.89515391708e-05,-8.36307346902e-05,-8.82836081914e-05,-9.29105509618e-05,-9.7514597374e-05,-0.000102097500314,-0.000106659243135,-0.00011119896596,-0.000115713073624,-0.000120198751851,-0.000124655208046,-0.000129086704538,-0.000133492324762,-0.000137875927454,-0.000142234369386,-0.000146562219574,-0.000150860504262,-0.000155129711721,-0.000159371729769,-0.000163587400745,-0.000167778542291,-0.0001719437937,-0.00017608444234,-0.000180198597758,-0.000184283006776,-0.000188339139192,-0.000192368496349,-0.000196367902218,-0.000200339303329,-0.000204281061434,-0.000208190700111,-0.000212069805979,-0.000215914003704,-0.000219719210739,-0.000223489020403,-0.000227224687811,-0.000230924069122,-0.000234589241892,-0.000238221256801,-0.000241820350797,-0.000245389779137,-0.000248928153237,-0.000252434158811,-0.000255913394783,-0.000259364432185,-0.000262786551055,-0.000266180479935,-0.000269548328408,-0.000272889030564,-0.00027619877582,-0.00027947703527,-0.000282719621622,-0.000285929738431,-0.000289106625154,-0.000292250622316,-0.000295360064051,-0.000298436055826,-0.000301478336387,-0.00030448693998,-0.000307462598411,-0.000310402468946,-0.000313307702084,-0.000316181498334,-0.000319024869081,-0.000321835681829,-0.000324612566146,-0.000327358323021,-0.000330071276137,-0.00033274937889,-0.000335392949034,-0.000338002083491,-0.000340582140797,-0.0003431298198,-0.000345643657556,-0.000348125425664,-0.000350579356279,-0.000353001848735,-0.000355389145404,-0.000357740928697,-0.000360058244078,-0.00036234347098,-0.000364597263974,-0.000366822126269,-0.000369013688951,-0.000371171014175,-0.00037329199483,-0.000375378132272,-0.000377433127461,-0.000379460406356,-0.00038146134536,-0.000383434700165,-0.000385376280081,-0.00038728062015,-0.00038914842019,-0.000390984682019,-0.00039279076519,-0.000394563856919,-0.000396301551114,-0.000398003815528,-0.000399668537013,-0.000401295561104,-0.000402885202785,-0.00040444284193,-0.000405971108838,-0.000407466062798,-0.000408927490342,-0.000410357207674,-0.000411754818055,-0.000413119182019,-0.000414454419541,-0.000415759844705,-0.000417036249662,-0.000418283126949,-0.00041949803035,-0.000420682535945,-0.000421839548696,-0.000422968683156,-0.000424071055334,-0.000425145345854,-0.000426190596698,-0.00042720247534,-0.000428182384609,-0.000429129843759,-0.000430043203202,-0.000430923095252,-0.000431767267741,-0.000432573211012,-0.000433346744699,-0.000434088212254,-0.000434746119391,-0.000435267322577,-0.00043565348629,-0.000435910634681,-0.000436038639557)
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(250)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Mus_musculus_domesticus-male-liver-H3K27Ac-ERR572228.50mers.unique.MACS-2.1.0.p1e-1_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) : 250',bty='n')
dev.off()