# R script for Peak Model
#  -- generated by MACS
p <- c(0.0398919830826,0.0466773199125,0.0535484746618,0.0603624174649,0.0671801743977,0.0672221298249,0.0671458472299,0.0672774347063,0.0673174830687,0.0674185575072,0.0675558661783,0.0675253531403,0.0672965053551,0.0671363119055,0.0670752858295,0.0672564569927,0.0672469216683,0.0672259439547,0.0670390515968,0.0670180738832,0.0671668249435,0.0669169994447,0.0673003194849,0.067283155901,0.0672412004737,0.0670371445319,0.0670066314939,0.0669570478071,0.0670771928943,0.0669665831315,0.0669074641203,0.0670428657266,0.0665336794046,0.066373485955,0.0663792071496,0.0665317723397,0.0664974451719,0.0664688391988,0.0665012593017,0.066573727767,0.0663410658521,0.0660759838343,0.065925325709,0.0660130506934,0.0659005338656,0.0655973105503,0.0655477268635,0.0651586856288,0.0653055296242,0.0652349682238,0.06537036983,0.0657727605189,0.0658471360491,0.0660359354719,0.0657822958433,0.0657269909619,0.0658280654003,0.0661865935971,0.0658452289842,0.0657842029082,0.0657174556375,0.0655057714363,0.0656831284697,0.0653970687383,0.0654619089441,0.0656030317449,0.0654905149172,0.0653913475437,0.0653760910247,0.0653970687383,0.0652502247428,0.0651586856288,0.0650557041254,0.0651510573693,0.0652292470292,0.0653665557003,0.0651644068234,0.0650213769577,0.0650194698928,0.0650290052172,0.0651949198614,0.0650862171635,0.0651052878122,0.0651319867205,0.0649870497899,0.0648077856915,0.0650614253201,0.0651949198614,0.0652292470292,0.0652139905102,0.0651891986668,0.0654046969978,0.0656526154317,0.0657422474809,0.0659768164607,0.0660912403533,0.0658414148545,0.0657708534541,0.0657269909619,0.065618288264,0.0656888496644,0.0657079203131,0.0653608345057,0.0652120834453,0.0652406894184,0.0651205443312,0.0653303214676,0.0654237676466,0.0653970687383,0.0653455779866,0.0652158975751,0.0652235258346,0.0653875334139,0.0654123252573,0.065278830716,0.0650442617362,0.0649470014275,0.0648573693783,0.0649641650114,0.0650881242283,0.0649775144655,0.064954629687,0.0649336519734,0.0648382987295,0.0647868079779,0.0649431872977,0.0648745329622,0.0650766818391,0.0649069530651,0.0649489084924,0.0652101763804,0.0652254328994,0.0653379497271,0.0653112508189,0.0652921801701,0.0655648904474,0.0657460616107,0.0658318795301,0.0659119762549,0.0660397496016,0.0660817050289,0.0661598946888,0.0659920729797,0.0659825376553,0.0659749093958,0.0657918311677,0.0656297306532,0.0656030317449,0.0658662066979,0.0656888496644,0.0655133996958,0.0652959942999,0.0653341355974,0.06537036983,0.0656373589127,0.0656201953288,0.0657746675838,0.0657918311677,0.0657632251946,0.0659863517851,0.0662399914136,0.0665546571182,0.0667682483844,0.0667777837087,0.0667491777356,0.0667491777356,0.0667358282815,0.0666862445947,0.0665260511451,0.0664211625769,0.0662628761921,0.0661255675211,0.0659787235256,0.0660569131855,0.0660626343801,0.0662228278297,0.0663715788901,0.0663181810736,0.0663944636686,0.066434512031,0.0665355864695,0.0666595456864,0.0665718207021,0.066928441834,0.0667815978385,0.066604240805,0.0666461962323,0.0668883934716,0.0671420331001,0.0673575314311,0.0672869700307,0.0672907841605,0.0674052080531,0.0672526428629,0.0674948401022,0.0674910259725,0.0672621781873,0.0672068733059,0.0672564569927,0.0671248695162,0.0670409586617,0.0671172412567,0.067359438496,0.0675806580217,0.0678438329746,0.0681241715114,0.0684998632921,0.0684197665672,0.0682576660528,0.0683797182048,0.068778294764,0.0688011795425,0.0687401534665,0.0685647034978,0.0683739970102,0.0683816252697,0.0683568334263,0.0685284692652,0.0688469490995,0.0688297855157,0.068993793095,0.0689976072248,0.0691959419719,0.0693828343298,0.0694591169248,0.0696097750501,0.0695067935467,0.06968796471,0.069811923927,0.06999690922,0.0698557864191,0.0701704521237,0.0699091842356,0.0699015559761,0.0697470837212,0.0699473255332,0.0702105004861,0.0702753406919,0.0702867830812,0.0702352923295,0.0704469765308,0.0704546047903,0.0710343525127,0.0709409063337,0.071492048083,0.0716636839218,0.0717628512954,0.0717971784632,0.0718887175773,0.0722415245794,0.0723368778232,0.0724207886777,0.0724799076889,0.0729662092324,0.0731168673576,0.0729929081406,0.0732103135365,0.0734506037109,0.0735154439167,0.0735516781494,0.0735802841225,0.0737843400643,0.0738396449457,0.0738091319077,0.0739102063461,0.0741619389098,0.0743431100731,0.0744479986413,0.0744003220193,0.0748332257463,0.075100214829,0.0751478914509,0.0750716088558,0.0753099919653,0.0753862745604,0.0754492077013,0.0754587430257,0.0756685201621,0.0759793717369,0.0757505239518,0.0760194200993,0.0762806879874,0.0766506585734,0.0770377927433,0.0771998932578,0.0775145589624,0.0776633100227,0.0779589050785,0.0783879946757,0.0788132701431,0.0788437831811,0.0790478391229,0.0791584488857,0.0791317499775,0.0791737054047,0.07932436353,0.0796523786887,0.0799041112524,0.0806230747107,0.0813229675203,0.0821983102986,0.083039325909,0.0842350555865,0.0853869227717,0.0869182958674,0.0885659999206,0.0898094062199,0.0912187271635,0.0919148058433,0.0928568958922,0.0938199636548,0.0946857711086,0.0956316752873,0.0963468246159,0.0968331261593,0.0971191858908,0.0974662716983,0.097763773819,0.098194770481,0.0985265997695,0.0990910909729,0.0992665409415,0.0991235110758,0.0994629686238,0.0995640430622,0.0996307903329,0.0999759690755,0.0998024261717,0.100004575049,0.100113277747,0.10020863099,0.100555716798,0.101249888413,0.101387197084,0.101860149173,0.10221486324,0.102552413723,0.102859451168,0.103307611414,0.1036070206,0.103992247705,0.104144812895,0.104104764533,0.104242073204,0.104417523172,0.104648278022,0.104976293181,0.105264259977,0.105048761646,0.105271888237,0.105237561069,0.105515992541,0.105916476165,0.10623114187,0.106576320612,0.10707597161,0.107468826975,0.107848332885,0.108397567569,0.108689348495,0.109089832119,0.109507479327,0.109701999945,0.110230256915,0.110600227501,0.110825261157,0.110912986141,0.111193324678,0.111998106056,0.112278444593,0.112406217939,0.112514920637,0.112760932006,0.112732326033,0.112791445044,0.112837214601,0.113014571635,0.113210999317,0.11278572385,0.112905868937,0.11308322597,0.113594319357,0.113907077997,0.114376215956,0.114687067531,0.115119971258,0.115488034779,0.115928566766,0.116283280833,0.116578875889,0.11678293183,0.116843957906,0.116990801902,0.116855400296,0.117089969275,0.117192950779,0.117192950779,0.117349330099,0.117444683342,0.117751720788,0.118348632094,0.118735766264,0.119113365109,0.119422309619,0.119754138908,0.119588224263,0.119910518228,0.120049733963,0.120534128442,0.120974660429,0.121314117976,0.121291233198,0.121184437565,0.121579199994,0.121909122218,0.122601386768,0.123438588249,0.124233834302,0.124306302767,0.124310116897,0.124378771233,0.124979496669,0.125431471044,0.125658411765,0.125673668284,0.126232438292,0.126316349147,0.126632921917,0.126890375675,0.127660829885,0.128089919482,0.128478960717,0.129152154618,0.129499240426,0.130168620197,0.130256345181,0.130330720712,0.130273508765,0.131007728743,0.130965773315,0.131160293933,0.131482587897,0.13174576285,0.13235602361,0.132636362147,0.133109314236,0.133700504348,0.134263088487,0.134314579238,0.135033542697,0.13589935015,0.136061450665,0.13651723917,0.136641198387,0.13674799402,0.136795670642,0.137028332557,0.137049310271,0.137476492803,0.137404024338,0.137032146687,0.13675943641,0.136543938079,0.136715573918,0.13705693853,0.13713894232,0.137440258571,0.137342998262,0.137552775398,0.137638593318,0.137890325881,0.138269831792,0.138252668208,0.138037169877,0.137697712329,0.138006656839,0.137198061331,0.137453608025,0.136994005389,0.136784228253,0.136309369099,0.136349417461,0.136408536472,0.136723202177,0.136629755998,0.136244528893,0.136725109242,0.136694596204,0.13683381194,0.137127499931,0.137203782526,0.137613801474,0.137869348168,0.137575660177,0.13768245581,0.138216433975,0.138492958382,0.138668408351,0.139427420172,0.139473189729,0.140163547214,0.140268435782,0.140464863464,0.140928280229,0.141269644842,0.140964514462,0.140718503093,0.140705153639,0.140091078749,0.139934699429,0.139478910923,0.13937211529,0.139017401223,0.139084148494,0.138981166991,0.139320624539,0.13999381844,0.140051030386,0.140270342847,0.140684175925,0.140708967769,0.14061552159,0.140178803733,0.13976306359,0.139364487031,0.139114661532,0.138243132883,0.137949444893,0.137672920485,0.136732737501,0.136448584835,0.135788740388,0.13544928284,0.135014472048,0.134699806343,0.133795857592,0.133362953865,0.132924328943,0.131844930223,0.131455888989,0.130498542421,0.129670876264,0.129163597007,0.128606734063,0.128215785764,0.127538777733,0.126857955572,0.126182854606,0.125692738932,0.124834559738,0.124607619018,0.124138481058,0.123907726208,0.123249788826,0.122614736222,0.122494591135,0.121920564607,0.121405657091,0.120949868585,0.120722927865,0.119956287785,0.119473800371,0.118813955924,0.118424914689,0.118074014752,0.117786047955,0.117294025217,0.116918333437,0.117080433951,0.116624645446,0.116464451996,0.116740976403,0.116515942748,0.116306165611,0.116069689567,0.115734046148,0.116035362399,0.11609448141,0.115890425468,0.115810328743,0.115646321164,0.115192439724,0.115045595728,0.114759535997,0.113990988851,0.113291096042,0.112917311326,0.112215511452,0.111502269188,0.111260071949,0.110851960065,0.110255048759,0.109818330902,0.109518921717,0.10969627875,0.109801167318,0.109009735395,0.108601623511,0.108050481762,0.107386823185,0.106353194022,0.105432081687,0.104432779691,0.10314932503,0.101652279102,0.0998005191069,0.098395012293,0.0969704348304,0.0957022366877,0.0943978043123,0.0936540490105,0.0927901486216,0.0920654639686,0.0916173037226,0.0912225412932,0.0908296859287,0.090425388175,0.090146956703,0.0899657855398,0.0897788931819,0.0894985546451,0.0894165508554,0.0889340634417,0.0887547993433,0.0882723119296,0.0882761260594,0.0883714793032,0.0878794565651,0.0878889918895,0.0878012669052,0.0875342778225,0.087187192015,0.0872196121179,0.0870098349815,0.0870803963819,0.0869125746728,0.0866417714604,0.0867695448071,0.0861497487223,0.0858751313801,0.0855966999081,0.0855051607941,0.085058907613,0.0846031191076,0.0843952490361,0.083948995855,0.0834474377925,0.0833139432512,0.0833959470409,0.0834703225711,0.0833387350946,0.083224311202,0.0829306232111,0.0829287161462,0.0827589873722,0.0829535079896,0.0830450471036,0.0824462287325,0.0819828119675,0.0814926962943,0.0813611088179,0.0809529969343,0.0810388148538,0.080895784988,0.0808004317442,0.0804781377801,0.0803045948764,0.0804533459367,0.0808023388091,0.0804895801694,0.0806574018785,0.0805696768942,0.0803637138876,0.08009481774,0.0800814682859,0.0800280704693,0.0801367731673,0.0799384384201,0.079740103673,0.0798202003978,0.079385389606,0.0791965901833,0.0788971809977,0.0785615375794,0.0781152843984,0.0776785665417,0.0774287410429,0.0773429231235,0.0769596030834,0.0768299226718,0.076501907513,0.076486650994,0.0764733015399,0.0765972607569,0.076425624918,0.0765724689135,0.0762272901708,0.0760575613969,0.0758477842605,0.0757276391733,0.0760480260725,0.0758573195848,0.075870669039,0.0757543380815,0.0754797207393,0.0751021218938,0.0749991403905,0.0749781626769,0.0747626643458,0.0747855491244,0.0744766046144,0.0740856563148,0.0737690835453,0.0732789678721,0.0733838564403,0.0733018526506,0.0729395103241,0.0726439152683,0.0725008854025,0.0718887175773,0.0714405573313,0.0714138584231,0.0711392410809,0.0712384084544,0.0708989509064,0.0708093188573,0.0707921552734,0.0708016905978,0.0705995417209,0.0705614004233,0.070412649363,0.0704317200118,0.0703096678597,0.0700388646472,0.0699778385712,0.0698481581596,0.0697795038241,0.0693675778108,0.0693065517347,0.0689270458243,0.0688374137752,0.0684617219945,0.0686123801198,0.0687363393367,0.068532283395,0.0683492051668,0.0680764948895,0.0681546845494,0.0679239296994,0.0681680340036,0.0681489633548,0.0680593313056,0.0678609965585,0.0678114128717,0.0676435911626,0.0676340558382,0.0672736205766,0.0673098548092,0.0671763602679,0.0668883934716,0.0668578804336,0.0669780255208,0.0668445309794,0.0664135343174,0.0664326049661,0.0662190137,0.066480281588,0.0661293816508,0.0664020919281,0.0666671739459,0.0665927984157,0.0662724115165,0.0662685973868,0.066373485955,0.0662056642459,0.0662113854405,0.0662552479326,0.0663239022682,0.0661408240401,0.0658395077896,0.0658757420223,0.0659749093958,0.0655477268635,0.0655362844743,0.065709827378,0.0654237676466,0.0652998084296,0.0652120834453,0.0653360426623,0.0652025481209,0.0650633323849,0.0650023063089,0.0652445035482,0.0650270981523,0.064815413951,0.0647295960316,0.0645808449712,0.0644702352084,0.0640049113786,0.0640468668059,0.0637932271773,0.0637646212042,0.0636463831819,0.0638065766315,0.0638313684749,0.0641155211414,0.0641651048282,0.0639743983406,0.0640735657141,0.0637684353339,0.063629219598,0.0633870223587,0.0634385131103,0.0632192006496,0.0630990555624,0.0630723566541,0.0633126468285,0.0634919109269,0.0634785614727,0.0638065766315,0.0641097999468,0.064399673808,0.0644225585865,0.0644168373919,0.0643157629534,0.0641403129848,0.0637589000096,0.0636997809984,0.0637417364257,0.0636883386091,0.063613963079,0.0635624723273,0.0633603234504,0.0633565093207,0.063720758712,0.0638485320587,0.0640811939737,0.0639476994323,0.0639648630162,0.0639438853026,0.0639515135621,0.0638389967344,0.0639324429133,0.0639801195352,0.0640564021303,0.0640621233249,0.063798948372,0.0639534206269,0.0639801195352,0.0640888222332,0.0641117070117,0.0640125396381,0.0641460341794,0.0641136140765,0.0636521043765,0.0635853571058,0.0636120560141,0.063674989155,0.0637741565286,0.0635643793922,0.0635491228732,0.0638065766315,0.0636406619872,0.0637569929447,0.0640430526761,0.0639305358484,0.06406021626,0.0641555695038,0.0639381641079,0.0641403129848,0.0642528298125,0.0644244656514,0.0645751237766,0.0648058786266,0.0647906221076,0.0650671465147,0.0649965851143,0.0646742911502,0.0647353172262,0.0647448525506,0.0645064694411,0.0642185026447,0.0642490156828,0.064075472779,0.0640487738708,0.063905744005,0.0640220749625,0.064275714591,0.0643596254456,0.0643500901212,0.0647181536423,0.0647582020047,0.0647963433023,0.0648363916647,0.0651052878122,0.065170128018,0.065309343754,0.0655477268635,0.0655915893557,0.0655610763177,0.0654619089441,0.065494329047,0.0656087529396,0.0655744257718,0.0654523736197,0.0658471360491,0.0659482104876,0.0658528572437,0.0657937382326,0.06598825885,0.0659348610334,0.066034028407,0.0658013664921,0.0658967197359,0.0656869425995,0.0654294888412,0.0653512991813,0.0654600018792,0.0659138833198,0.0659730023309,0.0658566713735,0.0658280654003,0.0662514338029,0.0662914821653,0.0667510848005,0.0666423821025,0.0667930402278,0.0666919657893,0.0665088875612,0.0665298652748,0.0668903005365,0.0667968543575,0.0666461962323,0.0666023337401,0.0664287908364,0.066712943503,0.0667034081786,0.0669341630286,0.0668655086931,0.0667663413195,0.0668330885902,0.0670142597534,0.0670562151807,0.0670257021427,0.0672450146034,0.067004724429,0.0671324977757,0.0668922076013,0.0669703972613,0.0670161668183,0.0670066314939,0.0670009102993,0.0671267765811,0.0673251113282,0.067019980948,0.0674605129345,0.0673384607824,0.0674757694535,0.0676512194221,0.0677847139634,0.0676092639948,0.0677618291849,0.0676645688762,0.0676340558382,0.0676874536547,0.0676264275787,0.0677542009254,0.0677389444064,0.067544423789,0.067452884675,0.0675463308539,0.0676016357353,0.067574936827,0.0676626618114,0.067929650894,0.0677675503796,0.0676302417085,0.0678209481961,0.0679811416457,0.0682519448581,0.0683472981019,0.0684636290594,0.0685437257842,0.0685132127462,0.0684426513458,0.0686905697797,0.0689690012516,0.069009049614,0.069087239274,0.0688774621376,0.0690147708087,0.0690014213545,0.0692512468533,0.0696345668935,0.0697108494885,0.0696345668935,0.0694972582224,0.0695678196228,0.0697985744728,0.070088448334,0.0700617494257,0.0703287385084,0.0702696194973,0.0699816527009,0.0701323108262,0.070288690146,0.0701017977882,0.0701017977882,0.0698939277166,0.0698290875108,0.0698615076137,0.0697699684997,0.0697470837212,0.0697623402402,0.0698672288084,0.0698195521865,0.0701914298373,0.0700598423609,0.0701685450588,0.0701571026696,0.0703459020923,0.0705156308663,0.0704393482713,0.0705060955419,0.070397392844,0.0704336270766,0.0704870248932,0.0706033558506,0.0704870248932,0.0705251661907,0.070551865099,0.0703649727411,0.0706014487857,0.0707845270139,0.0707330362622,0.0705709357477,0.070473675439,0.070612891175,0.0708150400519,0.0707063373539,0.0706453112779,0.0707902482085,0.0706910808349,0.070721593873,0.0707749916895,0.0707864340787,0.0708741590631,0.0706357759535,0.0704774895688,0.070752106911,0.0708322036358,0.0709637911122,0.0710877503292,0.07099811828,0.0710248171883,0.0711430552106,0.0709599769825,0.071137334016,0.0713890665797,0.0711297057565,0.0711354269511,0.0710324454478,0.0708722519982,0.0708970438416,0.0708264824411,0.0706796384457,0.0709256498147,0.0708474601548,0.0705957275911,0.0707235009378,0.0707101514837,0.0705575862936,0.0705270732556,0.0705385156448,0.0705423297746,0.0708474601548,0.0707006161593,0.0708684378684,0.0708798802577,0.0709752335015,0.0710095606693,0.0711239845619,0.0713413899578,0.0713280405036,0.0714367432016,0.0712479437788,0.0713928807094,0.0715015834074,0.071583587197,0.0714710703693,0.0714577209152,0.0713452040875,0.0712155236759,0.0712040812867,0.0710553302263,0.0711297057565,0.071106820978,0.0708665308036,0.0709275568796,0.0711697541189,0.071028631318,0.0709256498147,0.0708016905978,0.0708226683114,0.0708474601548,0.0707120585486,0.0705594933585,0.0705633074882,0.0704851178283,0.070473675439,0.0707616422354,0.0709599769825,0.0710858432643,0.0709313710093,0.0711239845619,0.0712307801949,0.0711468693404,0.0711468693404,0.0712231519354,0.0711716611838,0.0710114677342,0.07076736343,0.0706662889915,0.0708989509064,0.0707768987544,0.0709237427498,0.0709542557879,0.0707749916895,0.0704145564279,0.0703325526382,0.0702600841729,0.0704088352332,0.0705499580341,0.0703764151303,0.0705060955419,0.0702543629783,0.0703497162221,0.0705709357477,0.0708875085172,0.0708493672197,0.0706014487857,0.0707501998461,0.0707025232242,0.0708055047275,0.0704984672824,0.0707940623383,0.0708875085172,0.0709695123069,0.0708493672197,0.0707463857163,0.0708913226469,0.0707120585486,0.0708665308036,0.0707311291973,0.0708779731928,0.0706701031213,0.0705060955419,0.0703344597031,0.0705175379312,0.0703706939357,0.0702925042758,0.06999690922,0.0700560282311,0.0701456602803,0.0700503070365,0.0701284966964,0.0701780803832,0.0702219428754,0.0701742662535,0.0704298129469,0.0703249243787,0.0707063373539,0.0706758243159,0.0709409063337,0.0709847688259,0.0708894155821,0.0709561628527,0.070921835685,0.0708302965709,0.0707139656134,0.0709904900205,0.0711144492375,0.0707845270139,0.0704965602175,0.0707120585486,0.0706643819267,0.0707768987544,0.0706929878998,0.0708112259221,0.070797876468,0.0707406645217,0.0703840433898,0.0705003743473,0.0704851178283,0.0703192031841,0.0704393482713,0.0702505488485,0.0702543629783,0.0700712847501,0.0701780803832,0.0705614004233,0.070673917251,0.0707711775597,0.0706453112779,0.0706758243159,0.0706300547589,0.0635929853653,0.0566608045399,0.049690482417,0.0425847586879,0.0)
m <- c(0.0419056848776,0.0490362933082,0.0559779482499,0.0627650048824,0.0696894822342,0.0697391063828,0.0696513098122,0.0695825994526,0.0696589442966,0.0697925477736,0.0701857237203,0.0701341909506,0.0700979271497,0.0703002409863,0.0704796513697,0.0704204841156,0.0703536823771,0.0702601599432,0.0703040582285,0.07004639438,0.0696322236012,0.0693192097408,0.0691722459161,0.0691798804005,0.069284854561,0.0691684286739,0.0691245303885,0.0693344787096,0.0692772200766,0.0694470873545,0.0696494011911,0.0699414202195,0.0701513685405,0.070275428912,0.0699166081452,0.0700960185286,0.070275428912,0.0704414789477,0.0707354065972,0.0707258634917,0.070674330722,0.0708136600623,0.0709968876879,0.0707754876403,0.0709892532035,0.0709262687072,0.0706647876165,0.0704013979046,0.0701380081928,0.0700673892121,0.0699948616103,0.069893704692,0.0697448322461,0.0699204253874,0.0697066598241,0.0699032477975,0.06985553227,0.0700425771378,0.0702773375331,0.0702639771854,0.070370859967,0.0702353478689,0.0702658858065,0.0703422306505,0.0706227979523,0.0706018031202,0.0709491721604,0.0708976393907,0.070979710098,0.0709892532035,0.0710064307934,0.0713270791383,0.0715389360804,0.0715542050492,0.0715198498694,0.071550387807,0.0715522964281,0.0714644998575,0.0714969464162,0.071378611908,0.0715255757327,0.071227830841,0.07101788252,0.071113313575,0.0710827756374,0.0711209480594,0.0711610291025,0.0712564601576,0.0710655980475,0.07120874463,0.0712201963566,0.0713652515603,0.0714320532988,0.0711457601337,0.0708957307696,0.0709090911173,0.0707239548706,0.0707869393669,0.0706857824486,0.0706266151945,0.0703555909982,0.0703765858303,0.0702620685643,0.0702906978808,0.0705693565615,0.0704491134321,0.0706838738275,0.0705159151706,0.0705655393193,0.0706953255541,0.0710598721842,0.0711782066924,0.071321353275,0.0714664084786,0.0714186929511,0.0714282360566,0.0712946325796,0.0712908153374,0.0715580222914,0.0715637481547,0.0716057378189,0.0714702257208,0.0715904688501,0.0715599309125,0.0716553619675,0.0719779189335,0.0716305498932,0.0716038291978,0.0717278895693,0.0716878085262,0.0715981033345,0.0716515447253,0.0714912205529,0.0714377791621,0.0713919722557,0.0711285825438,0.0713671601814,0.0716515447253,0.0714282360566,0.0712526429154,0.0711972929034,0.071151485997,0.070960623887,0.0709758928558,0.0707735790192,0.0709167256017,0.0709568066448,0.0708365635155,0.0708251117889,0.0710541463209,0.0708480152421,0.0709281773283,0.0710331514888,0.0708976393907,0.0713308963805,0.0711476687548,0.0711801153135,0.0711992015245,0.0711285825438,0.0712316480833,0.0715083981428,0.0715790171235,0.0714339619199,0.0714816774474,0.0714435050254,0.0715217584905,0.0715561136703,0.0716343671354,0.071588560229,0.0714702257208,0.0711610291025,0.0710274256255,0.0712736377475,0.0713175360328,0.0713518912126,0.0712946325796,0.0713308963805,0.0711037704695,0.0710770497741,0.0709548980237,0.0709778014769,0.0706972341752,0.0707239548706,0.0707564014293,0.0706247065734,0.0703918547991,0.0699356943562,0.0698249943323,0.0699337857351,0.0698440805434,0.069762009836,0.0698765271021,0.0697505581094,0.0697601012149,0.0696207718746,0.069742923625,0.0699528719461,0.0699776840204,0.0696303149801,0.0696703960232,0.0698211770901,0.0699929529892,0.0699547805672,0.0697467408672,0.0695864166948,0.0695119804719,0.0696341322223,0.0696952080975,0.0698708012388,0.0699204253874,0.0698822529654,0.0696551270544,0.0697830046681,0.0700196736846,0.0699204253874,0.0698498064067,0.0698059081213,0.0698383546801,0.0696913908553,0.0695043459875,0.0694203666591,0.0695157977141,0.0694318183857,0.0692428648968,0.0694413614912,0.0693879201004,0.0694394528701,0.0692390476546,0.0695177063352,0.0694356356279,0.0694604477022,0.0693726511316,0.069284854561,0.0692218700647,0.0690061958803,0.069019556228,0.068580573375,0.0686740958089,0.0683820767805,0.0683190922842,0.0681873974283,0.0681339560375,0.0678743835679,0.0674659386524,0.0675842731606,0.0676529835202,0.0678495714936,0.067591907645,0.0675403748753,0.0676415317936,0.0677140593954,0.0675384662542,0.0675804559184,0.0678457542514,0.0675899990239,0.0673533300075,0.0672998886167,0.0673895938084,0.0673915024295,0.0673266093121,0.0669849661351,0.0670078695883,0.0668341850682,0.0668284592049,0.0670231385572,0.0668208247205,0.0667253936655,0.0668189160994,0.0667902867829,0.0666051505362,0.0668170074783,0.0670460420104,0.0672311782571,0.0671796454874,0.0671204782333,0.0674735731368,0.0674907507267,0.0674220403671,0.0671987316984,0.0673609644919,0.0671872799718,0.0671681937608,0.0671949144562,0.0672750765424,0.0673342437965,0.0669811488929,0.0670155040727,0.0668952609434,0.067002143725,0.0669754230296,0.0669487023342,0.0666356884738,0.0664066539418,0.0661852538941,0.0659714883309,0.0663131315078,0.066145172851,0.0661890711363,0.0662883194335,0.0663875677308,0.0663856591097,0.0662768677069,0.0664410091216,0.0666166022628,0.0665307143133,0.0664791815436,0.066429557395,0.0662119745895,0.0660058435107,0.0657978038108,0.0655439572044,0.0656203020485,0.065555408931,0.0654294399384,0.0653091968091,0.0652652985238,0.0651946795431,0.0653034709458,0.065383633032,0.0654237140751,0.0654256226962,0.0652328519651,0.0651832278165,0.0652156743752,0.0654122623485,0.0652805674926,0.0653340088834,0.0652614812816,0.0654046278641,0.0654370744228,0.0657997124319,0.0660001176474,0.0661738021675,0.0658951434869,0.0655515916888,0.0652214002385,0.0651622329844,0.06496373639,0.0647404277212,0.0646278190763,0.0643701552278,0.0642480034774,0.0639807965233,0.0639674361756,0.0641964707076,0.0645113931892,0.0645610173378,0.0647957777331,0.0647518794478,0.0646698087405,0.0645972811387,0.0645171190525,0.0641716586333,0.064393058681,0.0642098310553,0.0642518207196,0.0641640241489,0.064204105192,0.0642861758994,0.0643625207434,0.0644655862828,0.0647041639203,0.0650763450349,0.0650763450349,0.0648263156707,0.0648816656826,0.0647766915221,0.0645762863066,0.0644980328415,0.0643071707315,0.0641621155278,0.0641029482737,0.0642098310553,0.0642689983095,0.0645686518222,0.0641907448443,0.0643777897122,0.0642480034774,0.0640246948086,0.0641430293168,0.0643682466067,0.0642632724462,0.0639674361756,0.0639884310077,0.0641602069067,0.0643319828058,0.0642689983095,0.0645743776855,0.0648797570615,0.0648568536083,0.0647327932368,0.0646201845919,0.0648015035964,0.0645362052635,0.0645285707791,0.064622093213,0.0644465000718,0.0642575465829,0.0640876793049,0.0639731620389,0.0638739137417,0.0639998827343,0.0640934051682,0.0641907448443,0.0642919017627,0.0641754758755,0.0642651810673,0.0645572000956,0.0646106414864,0.064660265635,0.0650935226248,0.0650706191716,0.0648854829248,0.0650343553707,0.0648186811863,0.0649465588001,0.0651221519413,0.064832041534,0.0649141122413,0.0651278778046,0.0649045691358,0.0649370156946,0.065116426078,0.0650897053826,0.0651565071211,0.0650744364138,0.065078253656,0.0654542520127,0.0654179882118,0.0656317537751,0.0656985555136,0.0660344728272,0.0661375383666,0.0661795280308,0.0661680763042,0.0663207659923,0.0662711418436,0.0662940452968,0.0665784298408,0.0663379435822,0.0664391005005,0.0662997711601,0.0663360349611,0.066297862539,0.0667502057398,0.0667521143609,0.0669410678498,0.0669849661351,0.0670536764948,0.0672159092883,0.0675270145276,0.0675957248872,0.0675842731606,0.067838119767,0.0678343025248,0.0680442508458,0.0682732853778,0.0684507871402,0.0686092026915,0.0687008165043,0.0685672130273,0.0687084509887,0.0689107648253,0.0692027838537,0.069076814861,0.0694432701123,0.0696761218865,0.0695825994526,0.0697982736369,0.0698669839966,0.0698803443443,0.0698498064067,0.0700597547277,0.0702067185524,0.0704777427486,0.0702582513221,0.0700883840442,0.0704223927367,0.0703880375569,0.0704147582523,0.0704681996431,0.0706647876165,0.0708441979999,0.0706953255541,0.0706724221009,0.0708098428201,0.070941537676,0.0708518324843,0.0708136600623,0.0713328050016,0.0718443154564,0.0722451258875,0.0722852069306,0.0724169017865,0.0724760690406,0.0728711536084,0.0730677415817,0.0732662381761,0.0736861348182,0.0737643882833,0.0739647934988,0.0738941745181,0.0740392297218,0.0744495832583,0.0751252351278,0.0749859057875,0.0753351834488,0.0754115282928,0.0755489490121,0.0759268559899,0.0758104301028,0.0760776370568,0.076251321577,0.0761463474165,0.0761062663733,0.0766273199337,0.076917430341,0.07728006835,0.0774403925224,0.0774384839013,0.0778526546801,0.0781084099075,0.0780377909268,0.0781236788763,0.0783088151231,0.078156125435,0.0778870098599,0.077965263325,0.0780492426534,0.0781580340561,0.0784424186001,0.078421423768,0.0788489548944,0.0793051153374,0.0794425360566,0.0797135602529,0.0800322999766,0.0802021672545,0.0804273845444,0.0803128672783,0.0802842379618,0.0803014155517,0.0802575172664,0.0803376793526,0.0805399931893,0.0807461242681,0.0810037881166,0.0811011277928,0.0811851071212,0.0817195210292,0.081809226221,0.0823493659923,0.0830631902838,0.0832349661829,0.0829085919747,0.0829028661114,0.0830650989049,0.0835689748754,0.0837178473212,0.083714030079,0.083960242201,0.0839697853065,0.0838667197671,0.0841014801624,0.0846282595861,0.0849298217199,0.0850481562281,0.0848382079071,0.0849355475832,0.0847924010007,0.0850176182905,0.0853630787097,0.0855806615151,0.0854165201005,0.0857180822343,0.0858249650159,0.0860845374856,0.086168516814,0.086454809979,0.0872278015246,0.0874530188145,0.087443475709,0.0877412206006,0.0884168724701,0.0885657449159,0.0887546984048,0.0889360174094,0.0893578226725,0.0898521555375,0.0897529072403,0.0897586331036,0.0899914848778,0.0899342262448,0.089785353799,0.0900182055732,0.0903903866878,0.0906690453684,0.0910946678738,0.0914534886406,0.0921692215532,0.0928181527273,0.0938068184573,0.0949729859495,0.0965208776619,0.0979523434871,0.0995193214104,0.101204633842,0.102895672137,0.104117189641,0.105231824363,0.106760629865,0.107581336938,0.108440216433,0.108821940653,0.109549125292,0.110020554704,0.109959478829,0.109923215028,0.110262949584,0.110909972137,0.110936692832,0.111446294666,0.111736405073,0.112486493166,0.113078165707,0.113375910598,0.114232881472,0.1151127558,0.115612814528,0.115675799024,0.116135776709,0.116290375018,0.116416344011,0.116359085378,0.116147228436,0.116641561301,0.116569033699,0.116653013028,0.116620566469,0.116908768255,0.117324847655,0.117509983902,0.117672216695,0.118172275423,0.118429939272,0.118155097833,0.118559725507,0.118555908264,0.119197204954,0.119449142939,0.119653365397,0.120477889712,0.12142838302,0.122216643535,0.122476216004,0.123260659277,0.123823702501,0.124455456085,0.124682581996,0.125587268398,0.126234290951,0.126864135914,0.127348925673,0.127560782616,0.128476920744,0.12887009669,0.129503758896,0.130242395261,0.131116543725,0.131502085188,0.132311340534,0.133011804478,0.133519497691,0.133941302954,0.134781096238,0.135472017076,0.136021699953,0.136286998286,0.136798508741,0.137449348536,0.137393998524,0.137325288165,0.137937955538,0.138562074638,0.138731941915,0.13905259026,0.13965953177,0.140146230151,0.140104240487,0.140230209479,0.140657740606,0.140913495833,0.14099556654,0.140852419958,0.14066537509,0.140774166493,0.140201580163,0.1400240784,0.139869480091,0.139770231794,0.139733967993,0.13986757147,0.139695795571,0.139903835271,0.140136687045,0.140199671542,0.140195854299,0.14026647328,0.140535588855,0.140226392237,0.140222574995,0.140079428412,0.13974541972,0.139340792046,0.138781566064,0.138594521196,0.138527719458,0.138168898691,0.138025752108,0.13792459519,0.137705103764,0.137250851942,0.137096253633,0.13757722615,0.137539053728,0.137462708884,0.137483703716,0.137695560658,0.137483703716,0.13742071922,0.137630667541,0.137865427936,0.137777631365,0.137567683044,0.137861610694,0.137523784759,0.137155420887,0.136962650156,0.137080984664,0.137416901977,0.137222222625,0.137203136414,0.137460800263,0.137216496762,0.137208862277,0.137563865802,0.137596312361,0.137540962349,0.137470343368,0.137771905502,0.137903600358,0.137720372732,0.137453165778,0.137073350179,0.136962650156,0.136590469041,0.1368309553,0.137038995,0.136872944964,0.135939629246,0.134929968684,0.134763918648,0.134502437557,0.134130256443,0.133219844178,0.132918282044,0.13239150262,0.131849454228,0.131412379996,0.131068828198,0.130935224721,0.130538231532,0.130305379758,0.129971371065,0.129919838296,0.129769057229,0.129305262301,0.128999882925,0.12909531398,0.128900634628,0.128772757014,0.128526544892,0.12800167409,0.127982587879,0.127675299882,0.127198144607,0.126881313504,0.126066332294,0.125304792475,0.125062397595,0.124262685354,0.123548861063,0.123493511051,0.122999178186,0.122672803978,0.122287262516,0.122233821125,0.122067771089,0.121394027841,0.120935958777,0.12122034332,0.120947410503,0.120210682758,0.119815598191,0.11979651198,0.119162849774,0.118811663492,0.118712415195,0.118762039343,0.118313513385,0.117798185688,0.117618775304,0.117622592546,0.11750807528,0.117322939034,0.11740310112,0.116975569993,0.116557581973,0.116366719862,0.116267471565,0.116244568112,0.116183492237,0.115801768017,0.115519292094,0.114877995404,0.114566890165,0.114362667707,0.11436839357,0.114171805597,0.114238607336,0.113906507264,0.113593493404,0.113232764016,0.112894938081,0.11247695006,0.112339529341,0.112125763778,0.111598984354,0.111373767064,0.111003494571,0.110476715147,0.110016737462,0.110003377114,0.109921306407,0.109825875352,0.109451785616,0.109133045892,0.10909487347,0.10883339238,0.108554733699,0.108520378519,0.10841731298,0.10827798364,0.107804645607,0.107287409288,0.107092729936,0.106989664397,0.106810254013,0.106426621172,0.105905567612,0.105342524387,0.104880638081,0.104439746607,0.104159179305,0.103983586164,0.10347398433,0.103246858419,0.10279642384,0.102607470351,0.102491044464,0.102706718648,0.10264182553,0.102256284068,0.102241015099,0.102353623744,0.102338354775,0.10196426504,0.101613078757,0.101437485616,0.101025223458,0.100492718172,0.10010908533,0.100103359467,0.0997521731846,0.0995765800434,0.09899826785,0.098503934985,0.0985860056923,0.0980592262687,0.0979485262449,0.0975438985716,0.0972423364378,0.0968148053113,0.0967041052875,0.0966048569903,0.0965399638729,0.0965285121463,0.095913936152,0.0953986084549,0.094600804835,0.0937342908555,0.0931082631346,0.0922589267449,0.0909114402482,0.0893349192193,0.0881210361996,0.0864261806625,0.084931730341,0.0837464766377,0.0825650401767,0.0817825055256,0.0809121743038,0.0800800155041,0.0795990429868,0.0791237963329,0.0788451376522,0.0787859703981,0.0787229859018,0.0786199203624,0.0785054030964,0.0786180117413,0.0783011806387,0.0779060960709,0.0777152339609,0.0774995597765,0.0771999062638,0.0768296337703,0.0769842320795,0.0769498768997,0.0768391768758,0.0764460009292,0.0761425301742,0.0760719111935,0.0759154042633,0.0756672835203,0.0754019851873,0.0754916903791,0.0746824350325,0.0743121625391,0.0742167314841,0.0741251176713,0.0740106004052,0.0740678590383,0.0739590676355,0.0737262158613,0.0733902985477,0.0729837622533,0.0730696502028,0.0729761277689,0.0730486553707,0.0729131432726,0.0728673363662,0.0725371449158,0.0723081103838,0.0727051035727,0.0730562898551,0.0731746243633,0.0730791933083,0.0729627674212,0.0726306673497,0.0725295104314,0.0725505052635,0.0724283535131,0.0720943448206,0.0718653102885,0.071683991284,0.0717011688739,0.0715198498694,0.0715389360804,0.071512215385,0.0714301446777,0.0710675066686,0.0712049273878,0.0711476687548,0.0709167256017,0.0707602186715,0.070218170279,0.069989135747,0.0698249943323,0.0698173598479,0.0695635132416,0.0695215235774,0.0691588855684,0.0693382959518,0.0690920838298,0.0687370803052,0.0687256285786,0.0687370803052,0.0685729388906,0.0682751939989,0.0682885543466,0.0681721284595,0.0682847371044,0.0679659973807,0.0678839266734,0.0679659973807,0.0679087387477,0.0679220990954,0.0677159680165,0.0677884956184,0.0677140593954,0.0676644352468,0.0677216938798,0.067819033556,0.0677255111221,0.0675690041918,0.0677331456065,0.0676262628248,0.0677770438918,0.0674640300313,0.0671681937608,0.0672063661828,0.0669410678498,0.066792195404,0.0668742661113,0.0668704488691,0.0666471402004,0.0667597488453,0.0665459832821,0.0666185108839,0.0666146936417,0.0664963591335,0.0662329694216,0.0662635073592,0.0662234263161,0.0663684815198,0.0662825935702,0.0661031831868,0.0663570297932,0.0665001763757,0.066658591927,0.066792195404,0.0668074643728,0.0668360936893,0.0666643177903,0.0664753643014,0.0665116281023,0.0663188573712,0.0658111641585,0.065440891665,0.0653721813054,0.0652252174807,0.0651755933321,0.0649141122413,0.0648721225771,0.064832041534,0.0647194328891,0.0648778484404,0.0650152691597,0.0650610760661,0.0649732794955,0.0650687105505,0.0651622329844,0.065230943344,0.0652614812816,0.0650477157184,0.0650229036441,0.064851127745,0.0647060725414,0.0646144587286,0.0644541345562,0.0641735672544,0.0640533241251,0.0640418723985,0.0639330809958,0.063765122339,0.0637803913078,0.0637345844014,0.0636945033583,0.0637193154326,0.0637364930225,0.0638510102885,0.063822380972,0.0636830516317,0.0636086154088,0.0637536706124,0.0637708482023,0.0638548275307,0.0637231326748,0.0639979741132,0.0641124913792,0.0639540758279,0.0640838620627,0.0641487551801,0.0641010396526,0.0642098310553,0.0640914965471,0.0642766327939,0.0643396172902,0.0641334862113,0.0639788879022,0.0640762275783,0.0640724103361,0.0640781361994,0.064070501715,0.0638853654683,0.0641792931177,0.0638949085738,0.0639807965233,0.0640266034297,0.0643567948801,0.0641812017388,0.0640934051682,0.064259455204,0.0643300741847,0.064335800048,0.0640628672306,0.0641411206957,0.0641678413911,0.0640399637774,0.0637536706124,0.0640056085976,0.0640342379141,0.06397507066,0.0639731620389,0.0643434345324,0.0643701552278,0.0645953725176,0.0647022552992,0.0646850777093,0.0649503760423,0.0650610760661,0.0651622329844,0.0651832278165,0.0652786588715,0.0651374209101,0.0654256226962,0.0652862933559,0.0653282830201,0.0653989020008,0.0653855416531,0.0653473692311,0.0651622329844,0.0651011571092,0.0652557554183,0.0651278778046,0.0650744364138,0.065116426078,0.0651775019532,0.0652061312697,0.0652462123128,0.0652786588715,0.0654695209815,0.0656470227439,0.0656107589429,0.0659600366043,0.0660573762804,0.0662234263161,0.0661356297455,0.0665211712078,0.06652498845,0.0664028366996,0.0664753643014,0.0662768677069,0.0662062487262,0.0660077521318,0.0658149814007,0.065687103787,0.0658722400337,0.0657615400099,0.0657214589668,0.0658932348658,0.0657424537989,0.0659753055731,0.0661108176712,0.0663665728987,0.0662463297693,0.0664791815436,0.0665383487977,0.066391384973,0.0662615987381,0.0660268383428,0.066107000429,0.0659504934988,0.0660058435107,0.0657691744943,0.0659065952135,0.0656527486072,0.0654752468448,0.0655897641108,0.0658531538227,0.0660020262685,0.0660344728272,0.0660535590382,0.0660134779951,0.0660974573235,0.0662749590858,0.0664161970473,0.0665536177665,0.0664410091216,0.0664658211959,0.0665898815674,0.0667482971187,0.0667654747086,0.0669582454397,0.0670231385572,0.0672349954993,0.0671376558232,0.0670422247682,0.067095666159,0.067095666159,0.0674563955469,0.0673590558708,0.0674850248634,0.0673094317222,0.067362873113,0.0604326698979,0.0538345667543,0.047244098095,0.040600188045,0.0)
ycorr <- c(8.72287065909e-05,8.71445890641e-05,8.68857485485e-05,8.64403754205e-05,8.58091312542e-05,8.498801369e-05,8.39732815285e-05,8.29567339778e-05,8.19317488861e-05,8.09002566238e-05,7.9855714411e-05,7.87870660201e-05,7.76927405684e-05,7.65801384359e-05,7.54515803227e-05,7.43091790603e-05,7.31593411756e-05,7.20032437527e-05,7.08500667254e-05,6.96991334507e-05,6.85507316207e-05,6.74096884644e-05,6.62801944295e-05,6.5157164397e-05,6.40358610167e-05,6.29188891161e-05,6.18013790374e-05,6.06799482644e-05,5.95520147087e-05,5.84171399996e-05,5.72739681832e-05,5.61224331596e-05,5.49580588271e-05,5.37796679529e-05,5.25891106364e-05,5.13789238493e-05,5.01456802885e-05,4.88893211147e-05,4.76138197677e-05,4.63155053986e-05,4.49931544902e-05,4.36486601704e-05,4.22820517119e-05,4.08944825052e-05,3.94862666429e-05,3.80581949562e-05,3.6615708898e-05,3.51633980016e-05,3.36965918767e-05,3.2213916333e-05,3.07168520647e-05,2.92019585922e-05,2.76682055139e-05,2.61162319378e-05,2.45453777116e-05,2.29532309189e-05,2.13413184276e-05,1.97097613741e-05,1.80540699306e-05,1.63805449444e-05,1.46862452514e-05,1.29769508077e-05,1.12528181911e-05,9.51584555147e-06,7.76746123696e-06,6.01504301205e-06,4.25415105198e-06,2.48197246262e-06,7.03029828671e-07,-1.08320162631e-06,-2.87871216186e-06,-4.68204641626e-06,-6.49251205878e-06,-8.30897332008e-06,-1.01313115087e-05,-1.19613454181e-05,-1.37975339932e-05,-1.56290607055e-05,-1.74531143012e-05,-1.92712544787e-05,-2.10738530696e-05,-2.28614296941e-05,-2.46338401556e-05,-2.63973577776e-05,-2.81527086707e-05,-2.99025346235e-05,-3.16468007912e-05,-3.3394003839e-05,-3.51478435689e-05,-3.69094469832e-05,-3.86799959759e-05,-4.04636775984e-05,-4.22575615594e-05,-4.4056390741e-05,-4.58585878099e-05,-4.76591557903e-05,-4.94526622076e-05,-5.12361178407e-05,-5.30024569217e-05,-5.4752560058e-05,-5.64864586648e-05,-5.82028644532e-05,-5.99068358215e-05,-6.15985781435e-05,-6.32804377378e-05,-6.49489379951e-05,-6.66081921684e-05,-6.82655982553e-05,-6.99248255126e-05,-7.15863400084e-05,-7.32518644401e-05,-7.49238337982e-05,-7.65987993333e-05,-7.82736990036e-05,-7.99506612688e-05,-8.16355476318e-05,-8.33295956392e-05,-8.50323580971e-05,-8.67394692608e-05,-8.84504765101e-05,-9.01630890541e-05,-9.18757647387e-05,-9.35892336812e-05,-9.53105899358e-05,-9.70352292928e-05,-9.87607208477e-05,-0.000100485935244,-0.000102208161543,-0.000103929438389,-0.00010565057717,-0.000107371888885,-0.000109095402201,-0.000110819358244,-0.000112545340182,-0.000114272337816,-0.000116004248635,-0.00011773991874,-0.000119472485594,-0.000121206269525,-0.000122936140459,-0.000124664764119,-0.000126395109521,-0.000128127010978,-0.000129851633537,-0.00013155958833,-0.000133249977685,-0.000134921172797,-0.00013657591602,-0.000138213290605,-0.000139834963134,-0.000141441476948,-0.000143027051044,-0.000144588941626,-0.000146130623079,-0.000147662910079,-0.000149189695493,-0.000150712644975,-0.000152230337458,-0.000153744723589,-0.000155261342161,-0.000156775719103,-0.000158288386249,-0.000159802447216,-0.000161315549642,-0.000162826888047,-0.000164333698349,-0.000165832181193,-0.000167323789666,-0.000168810738056,-0.000170289126986,-0.000171757976397,-0.000173215862437,-0.000174662813497,-0.000176098453272,-0.000177520348267,-0.000178928167353,-0.00018032922192,-0.000181726880249,-0.000183115483747,-0.000184493364237,-0.000185862556504,-0.00018722458315,-0.000188579377147,-0.000189931051947,-0.000191284798619,-0.000192642704995,-0.000193998886144,-0.000195346520619,-0.000196690314802,-0.000198027696246,-0.000199364613578,-0.000200701195816,-0.000202038344552,-0.000203375617265,-0.000204708311728,-0.00020602952053,-0.000207344665834,-0.000208660401394,-0.000209977815045,-0.000211296850569,-0.000212618501408,-0.000213937890638,-0.000215255678854,-0.000216571285381,-0.000217890400458,-0.000219215785618,-0.000220544106459,-0.000221872593079,-0.00022319554495,-0.000224513073148,-0.000225822352739,-0.000227129553172,-0.000228435329494,-0.000229739988932,-0.000231039298338,-0.000232331913617,-0.000233617316312,-0.000234901106414,-0.000236182726542,-0.000237468654761,-0.000238758495464,-0.000240049373955,-0.000241341363103,-0.000242634365454,-0.000243924332533,-0.000245214305333,-0.000246507098489,-0.000247801120892,-0.000249095017329,-0.000250389573668,-0.000251683112422,-0.000252976886071,-0.000254270518385,-0.000255561332643,-0.000256852103904,-0.000258144097351,-0.000259437751866,-0.000260726414718,-0.000262009986558,-0.000263288212586,-0.000264562313889,-0.000265832618438,-0.000267096616546,-0.000268354751895,-0.000269605489644,-0.000270848629245,-0.000272084297742,-0.000273315157021,-0.000274545480982,-0.00027577454602,-0.000277002885189,-0.000278228326925,-0.000279452451283,-0.000280678775568,-0.000281913066231,-0.000283154941503,-0.000284400080424,-0.000285649678246,-0.000286902377628,-0.000288156782272,-0.000289412281072,-0.000290665645963,-0.000291919426745,-0.00029316739159,-0.000294405481741,-0.000295631675127,-0.000296851359826,-0.000298066096338,-0.000299277752727,-0.000300480928313,-0.000301675880015,-0.00030287014225,-0.0003040611957,-0.000305252311405,-0.000306445571504,-0.000307640873631,-0.000308835088261,-0.000310026274992,-0.000311216702323,-0.000312404450879,-0.000313594863139,-0.00031478293932,-0.000315961192557,-0.000317127446357,-0.000318273082026,-0.000319398655713,-0.000320502033873,-0.000321578844941,-0.000322619156307,-0.000323619401168,-0.000324568864937,-0.000325461912482,-0.000326304805125,-0.000327099624979,-0.000327856173895,-0.000328579146912,-0.000329270989486,-0.000329938192392,-0.000330589163838,-0.000331235377846,-0.000331884014277,-0.000332547487795,-0.000333231339658,-0.000333935411987,-0.000334662810904,-0.000335407623697,-0.000336166327145,-0.000336937672226,-0.000337718636181,-0.000338506003595,-0.000339295085526,-0.000340086003833,-0.000340875133916,-0.00034166016431,-0.000342437722128,-0.000343205042585,-0.000343967771341,-0.000344727921666,-0.000345484475296,-0.000346238013868,-0.000346992322537,-0.000347742160991,-0.000348483342357,-0.000349219570876,-0.000349952976457,-0.000350686157823,-0.000351421025216,-0.000352154923226,-0.000352888044427,-0.000353620123527,-0.000354348695087,-0.000355073754705,-0.000355802477134,-0.000356536331059,-0.000357270778981,-0.000358005172523,-0.00035873668111,-0.000359463626464,-0.000360189607711,-0.000360916647246,-0.000361646785082,-0.000362380532454,-0.000363112041913,-0.000363838346138,-0.000364558278009,-0.000365274710056,-0.000365985754903,-0.000366692627109,-0.000367396206614,-0.000368092430364,-0.000368781775843,-0.000369460804918,-0.000370133988082,-0.00037080231708,-0.000371468976704,-0.000372130811594,-0.000372790502203,-0.000373449095319,-0.000374106938112,-0.000374762824066,-0.00037541232605,-0.000376055764136,-0.000376696812981,-0.000377335687344,-0.000377971206874,-0.000378604424031,-0.000379234312275,-0.000379859875063,-0.000380478071463,-0.000381089042597,-0.000381694970041,-0.000382300555096,-0.000382901885866,-0.00038349594854,-0.00038408191542,-0.0003846615991,-0.000385235333555,-0.000385802690505,-0.000386361232146,-0.000386916088639,-0.000387468010827,-0.000388017362626,-0.000388562722538,-0.000389107561199,-0.00038965243301,-0.000390192786235,-0.000390730084806,-0.000391263588972,-0.000391796090812,-0.000392324134089,-0.000392846530895,-0.000393360604575,-0.000393865508218,-0.000394358169488,-0.000394835922428,-0.000395302775809,-0.00039575923001,-0.000396204625318,-0.000396639440571,-0.000397065301145,-0.000397482575053,-0.000397891233142,-0.000398292520611,-0.000398686104251,-0.000399075669501,-0.000399461362524,-0.000399837525099,-0.000400206044714,-0.000400565705557,-0.000400916082725,-0.000401256427897,-0.000401588318826,-0.000401911648476,-0.000402228153236,-0.000402536413596,-0.000402836019295,-0.000403126726541,-0.000403410440213,-0.000403684412532,-0.000403947381463,-0.000404197431566,-0.000404432484308,-0.000404649016418,-0.000404845897133,-0.000405024928361,-0.000405186493451,-0.000405331757903,-0.000405460227264,-0.000405573628618,-0.000405673840246,-0.000405762017647,-0.000405840117286,-0.000405910518486,-0.000405975671295,-0.000406032451729,-0.000406078695756,-0.000406113784411,-0.000406137174032,-0.000406150073016,-0.000406148624862,-0.000406133497244,-0.000406102355297,-0.000406052209706,-0.000405982252444,-0.000405894380015,-0.000405790352578,-0.000405670552119,-0.000405534389341,-0.000405380327954,-0.000405207929764,-0.000405021820456,-0.000404821118863,-0.000404608431857,-0.000404385012839,-0.000404149919548,-0.000403902803917,-0.000403642868713,-0.00040336737851,-0.00040307625385,-0.000402770781844,-0.000402449193755,-0.000402109941655,-0.000401751570393,-0.000401376586915,-0.000400983429442,-0.000400569270769,-0.000400134919698,-0.000399682375312,-0.000399211047796,-0.000398722911544,-0.000398214361571,-0.000397689113198,-0.000397146213711,-0.000396584352032,-0.000396000265685,-0.000395395867922,-0.000394772684363,-0.000394128558812,-0.000393463325485,-0.000392777259836,-0.000392072745097,-0.000391348284791,-0.000390602456081,-0.00038983385205,-0.000389046823194,-0.000388238909646,-0.000387408169105,-0.000386557231505,-0.00038568475599,-0.000384788043481,-0.000383866708189,-0.000382918124576,-0.000381946665368,-0.000380951154898,-0.000379930069385,-0.00037888384432,-0.000377814733018,-0.000376722041743,-0.000375605167157,-0.000374469877478,-0.000373315130393,-0.000372143039453,-0.000370950922461,-0.000369735990575,-0.000368499671187,-0.000367244999275,-0.000365969363329,-0.000364672831769,-0.000363355961609,-0.000362014919601,-0.000360649574028,-0.000359260673591,-0.000357848569846,-0.000356414401676,-0.000354959784674,-0.00035348136693,-0.000351977095963,-0.000350446759483,-0.000348892991735,-0.000347314736495,-0.000345713752559,-0.000344085905895,-0.000342432722174,-0.000340753561463,-0.000339048789044,-0.00033731943052,-0.000335568331618,-0.000333797324466,-0.000332005065442,-0.000330192566203,-0.000328359407142,-0.000326506893927,-0.000324634201792,-0.000322744348846,-0.000320836085542,-0.000318907226901,-0.000316957852413,-0.000314985822484,-0.000312988615205,-0.000310965492154,-0.000308912569099,-0.000306832307513,-0.000304726210018,-0.000302592805086,-0.000300427749905,-0.00029823361306,-0.000296010490994,-0.000293759752333,-0.00029148454812,-0.000289188567518,-0.000286872041789,-0.000284537807308,-0.000282183315165,-0.00027980544201,-0.000277406429927,-0.000274986834501,-0.000272546241806,-0.000270084241352,-0.000267600149779,-0.000265089630621,-0.000262553171288,-0.000259989676607,-0.000257396827678,-0.000254780180786,-0.000252142206884,-0.000249483134528,-0.000246803589656,-0.000244101388527,-0.000241378028855,-0.0002386328543,-0.000235869894411,-0.000233087852634,-0.000230290100631,-0.000227472989528,-0.000224634236265,-0.000221772887487,-0.000218889745691,-0.000215985250037,-0.000213061296215,-0.000210117746902,-0.000207154232011,-0.000204166852655,-0.00020115469697,-0.000198118861788,-0.00019506237339,-0.000191985386566,-0.000188884518905,-0.000185759554123,-0.000182607684996,-0.00017942883687,-0.000176160926809,-0.000172746363125,-0.00016913896356,-0.000165299579419,-0.000160897917564,-0.00015707407132,-0.0001534771321,-0.000150064936261,-0.000146782873205,-0.000143570629087,-0.000140364210502,-0.000137225339843,-0.000134211626422,-0.000131369085251,-0.000128736616546,-0.000126639987327,-0.000123942954403,-0.000120996678369,-0.00011784401442,-0.000114538239854,-0.000111140478681,-0.000107715642079,-0.000104262593262,-0.000100779177786,-9.72703478529e-05,-9.37351154607e-05,-9.0176925444e-05,-8.65921592381e-05,-8.29803454224e-05,-7.93428446982e-05,-7.56824826034e-05,-7.20008138598e-05,-6.82997186558e-05,-6.45812056289e-05,-6.08440572127e-05,-5.7085441155e-05,-5.33094836922e-05,-4.95147923742e-05,-4.57010630073e-05,-4.18688776125e-05,-3.80201758426e-05,-3.41511480286e-05,-3.02606888326e-05,-2.63465070646e-05,-2.24066525924e-05,-1.84484190404e-05,-1.44690505063e-05,-1.04675548561e-05,-6.44464304462e-06,-2.39935944051e-06,1.67069291697e-06,5.76410840492e-06,9.87937581475e-06,1.40130682942e-05,1.81639827696e-05,2.23321992448e-05,2.65211038689e-05,3.0729164591e-05,3.49558929927e-05,3.92004509406e-05,4.34621413517e-05,4.77428966695e-05,5.20437314158e-05,5.636769855e-05,6.07147916261e-05,6.50902856583e-05,6.94901991134e-05,7.39159132978e-05,7.83679418941e-05,8.28497141817e-05,8.73625929976e-05,9.19033935207e-05,9.64728681948e-05,0.000101071434076,0.00010569703064,0.000110349266814,0.000115028962222,0.000119740871103,0.000124482749641,0.000129250571041,0.000134040951865,0.000138855523056,0.00014369391002,0.000148554785466,0.000153436740931,0.000158336925937,0.000163255336043,0.00016818495844,0.000173124714711,0.000178076792865,0.000183042313279,0.000188020101729,0.000193008192609,0.00019800345598,0.000203002731004,0.000208007867029,0.000213021085024,0.000218044564051,0.000223077896919,0.000228116117221,0.000233158612559,0.00023820417613,0.000243252653515,0.000248303897081,0.000253361404669,0.000258422341677,0.000263481574191,0.000268535066566,0.000273580673688,0.000278620058588,0.000283653278234,0.000288678959977,0.000293694686072,0.000298699330086,0.000303689945752,0.000308667244501,0.000313635307063,0.000318594925214,0.000323545949162,0.000328488959277,0.000333423436212,0.000338347737772,0.000343261674801,0.000348168127659,0.000353069790461,0.000357968148693,0.000362860398774,0.000367746287155,0.000372627401311,0.000377505071285,0.00038237839027,0.000387248180333,0.000392115726745,0.000396981827353,0.000401844509779,0.000406701850855,0.000411553589653,0.000416399773842,0.000421238455809,0.000426067613655,0.000430887784159,0.00043569645713,0.000440493838607,0.000445279446438,0.000450049803381,0.000454806663835,0.00045955090962,0.000464277689185,0.000468989838626,0.000473686531211,0.00047836650893,0.000483029340444,0.000487675970826,0.000492302573374,0.000496910982079,0.000501500775178,0.00050606849369,0.000510615805793,0.000515141582737,0.000519642207374,0.000524116955421,0.00052856564331,0.000532984628885,0.000537373337328,0.000541731277579,0.000546055498738,0.00055034588874,0.000554598445682,0.000558809146659,0.000562981992109,0.000567116268789,0.000571210982427,0.000575267199221,0.000579284835596,0.000583264095316,0.000587202211636,0.000591097818982,0.000594952867537,0.000598770279799,0.000602548275307,0.000606284718033,0.00060998118097,0.000613637660253,0.0006172526407,0.000620823066226,0.000624349235831,0.000627832631997,0.000631273519934,0.00063467109718,0.000638024738182,0.000641334080625,0.000644596029842,0.000647809194048,0.00065097256851,0.000654087715456,0.000657157182782,0.000660178084251,0.000663151771232,0.000666077080703,0.000668953811116,0.000671780335505,0.000674560057432,0.000677294698563,0.000679981565513,0.00068262068766,0.000685212788304,0.00068775895316,0.000690259705172,0.000692715755961,0.000695126883095,0.000697493088568,0.000699816436677,0.000702093140035,0.000704328105289,0.000706525990226,0.000708684618673,0.000710803072507,0.000712880066126,0.000714915702914,0.0007169081456,0.000718860100699,0.000720771553548,0.000722644624289,0.000724477776479,0.000726263645701,0.000727999599353,0.000729686058549,0.000731324169312,0.000732913229415,0.00073445462499,0.000735947088236,0.000737386582373,0.000738770309975,0.000740098946789,0.000741375463058,0.000742603318493,0.000743782662978,0.000744913492449,0.000745993134853,0.000747020223372,0.000747994850823,0.0007489197882,0.000749796493169,0.000750623193265,0.000751397927221,0.000752119920138,0.000752787157915,0.000753397754536,0.000753952748618,0.000754453602067,0.000754901362746,0.000755295905795,0.000755634083112,0.000755916575945,0.000756147244394,0.000756323800959,0.000756448732649,0.000756523413871,0.000756549733737,0.000756525471313,0.000756451656569,0.000756324713063,0.00075614786708,0.000755922793726,0.000755648890388,0.000755323144347,0.000754947945843,0.000754521005448,0.000754041422067,0.000753513044161,0.000752936439245,0.000752313237779,0.000751647056947,0.000750933681797,0.000750173677077,0.000749368233131,0.000748519223212,0.000747628068716,0.000746697075815,0.000745725332867,0.00074471155186,0.000743655044965,0.000742554380271,0.000741410673447,0.000740225554104,0.000739000771329,0.000737733671841,0.000736424268411,0.000735073375703,0.000733682643155,0.000732252138631,0.000730783038951,0.000729274613147,0.000727727638304,0.000726140025464,0.000724510837539,0.000722838386666,0.000721124847871,0.000719364042055,0.000717549113542,0.000715676401566,0.000713746995994,0.000711757572422,0.000709708465172,0.000707597478919,0.000705423835168,0.000703185366068,0.000700878998967,0.000698504971513,0.000696069187742,0.000693575700879,0.000691020158283,0.000688403215688,0.000685723989097,0.000682984308779,0.00068018232571,0.000677323467023,0.000674410571546,0.000671448011626,0.000668434714977,0.00066536992326,0.000662254748945,0.000659093093329,0.000655886579859,0.00065263652882,0.000649346618831,0.000646014798747,0.000642639808767,0.000639220737007,0.000635756187556,0.000632245715626,0.000628691716308,0.000625092877364,0.000621452790882,0.00061776967203,0.000614047139507,0.000610288317923,0.000606499997705,0.000602681154423,0.000598834961113,0.0005949647408,0.000591072381131,0.000587159046101,0.000583225254154,0.000579269498121,0.000575292125546,0.000571288994882,0.000567252345987,0.000563182375614,0.000559081472775,0.00055494749706,0.000550781232053,0.000546583279955,0.000542350753909,0.000538087443322,0.00053379096855,0.000529462240705,0.000525102522124,0.000520715743991,0.000516297756072,0.000511846853533,0.000507360860045,0.000502840807915,0.000498288027644,0.000493702226198,0.000489082177768,0.000484431534396,0.000479751828475,0.000475043423256,0.000470303127378,0.000465536008115,0.000460743218607,0.000455926060569,0.000451080807268,0.000446204777573,0.00044129995475,0.000436364896814,0.000431400086297,0.000426405123376,0.000421383944029,0.00041633715073,0.000411263558611,0.000406159337291,0.000401024066731,0.000395860868533,0.000390673857149,0.000385463524907,0.00038022998107,0.000374971871108,0.000369689341015,0.000364382725059,0.000359057359061,0.000353716632439,0.000348368889972,0.000343019578545,0.000337667354053,0.000332311253949,0.000326951381349,0.000321590110092,0.000316229555221,0.000310870118821,0.000305508268701,0.000300142537444,0.000294770938124,0.000289388529927,0.000283993910489,0.000278588849977,0.000273178866037,0.000267764849906,0.000262349744455,0.000256934372982,0.000251518529717,0.000246105569869,0.000240695511199,0.000235289169221,0.000229891317844,0.000224504367479,0.00021912455861,0.000213752810563,0.000208390080223,0.000203035828192,0.000197690994272,0.000192357444255,0.000187036635352,0.000181728915183,0.000176431791904,0.000171144298953,0.000165866415979,0.000160599689442,0.000155339535018,0.000150085102839,0.000144837218681,0.000139594333633,0.000134354329196,0.000129118477016,0.000123887368852,0.000118662280793,0.000113445188064,0.000108236095406,0.000103036485403,9.78468952148e-05,9.26675672991e-05,8.74984061019e-05,8.23407639171e-05,7.71953584147e-05,7.20612134188e-05,6.69403466228e-05,6.18318721695e-05,5.67288477148e-05,5.16350140319e-05,4.6547456168e-05,4.14683969352e-05,3.63966435537e-05,3.13337303766e-05,2.62812473383e-05,2.12413857664e-05,1.62102077059e-05,1.11884415668e-05,6.17999288169e-06,1.18796616247e-06,-3.78877357684e-06,-8.74515739406e-06,-1.36800488808e-05,-1.85897582732e-05,-2.34749044063e-05,-2.83363854569e-05,-3.31717262351e-05,-3.79818333077e-05,-4.27638274797e-05,-4.75219318976e-05,-5.22505891954e-05,-5.69517793825e-05,-6.16245158452e-05,-6.62713163751e-05,-7.08958016656e-05,-7.54978829007e-05,-8.00791134617e-05,-8.46371451285e-05,-8.91700716708e-05,-9.36768990414e-05,-9.81555640079e-05,-0.000102608920337,-0.000107037368963,-0.000111440462768,-0.000115816522528,-0.000120162518641,-0.000124478301141,-0.000128761710122,-0.000133015119434,-0.000137237857532,-0.000141434240946,-0.000145604048382,-0.00014974574735,-0.000153864026181,-0.000157957355605,-0.000162027304811,-0.000166070622944,-0.000170085113748,-0.000174071592049,-0.000178030978676,-0.000181959573152,-0.000185856854591,-0.000189725339877,-0.000193562221339,-0.000197362950505,-0.000201128588947,-0.000204857779966,-0.000208554936589,-0.000212221624917,-0.00021585537004,-0.000219458738314,-0.000223031489623,-0.000226571969943,-0.000230076026287,-0.000233547298696,-0.000236984959194,-0.000240393980163,-0.000243775589466,-0.000247128618926,-0.000250457052787,-0.000253757622496,-0.000257029578933,-0.000260273819945,-0.000263493634812,-0.000266690854003,-0.000269866038075,-0.000273017931408,-0.000276144844883,-0.0002792438942,-0.000282314669376,-0.000285356927691,-0.000288376865607,-0.000291370988544,-0.000294341135609,-0.000297285323275,-0.000300202423401,-0.000303089521553,-0.000305950326242,-0.000308781409733,-0.000311583555534,-0.000314357255452,-0.00031709956848,-0.000319810068257,-0.000322487518279,-0.000325131310199,-0.000327740770341,-0.000330318651048,-0.000332863822401,-0.000335378172652,-0.000337865443819,-0.000340327224201,-0.000342759803317,-0.000345165643419,-0.000347544643037,-0.000349901855327,-0.000352236906318,-0.000354550511455,-0.000356834811756,-0.000359091326811,-0.000361313556905,-0.000363500640932,-0.00036565541728,-0.000367777448677,-0.000369866403488,-0.000371920140637,-0.000373935691878,-0.00037591460938,-0.000377860099232,-0.000379779229003,-0.00038167444536,-0.000383546337255,-0.000385391590311,-0.000387209891198,-0.000389003658263,-0.000390770820303,-0.000392513931642,-0.000394232117239,-0.000395925196278,-0.000397586427159,-0.000399215368524,-0.000400811083277,-0.000402375040378,-0.000403912046666,-0.000405417866083,-0.000406893209131,-0.000408337670083,-0.000409749737296,-0.000411130605645,-0.000412480814617,-0.000413801053226,-0.000415091424696,-0.000416355353271,-0.000417590354586,-0.000418792678179,-0.000419961276206,-0.000421097580377,-0.000422201849034,-0.000423275401753,-0.000424320752687,-0.000425337626383,-0.000426328352024,-0.00042729134979,-0.000428224372276,-0.000429133961248,-0.000430021201375,-0.00043081878231,-0.000431455194067,-0.000431931856139,-0.000432250619763,-0.000432409987263)
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(248)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Bos_taurus-male-liver-H3K27Ac-ERR572199.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) : 248',bty='n')
dev.off()