# R script for Peak Model
#  -- generated by MACS
p <- c(0.0415459793155,0.048692457431,0.0557786816431,0.062790044945,0.0695731737644,0.0697557613504,0.0696644675574,0.0697904529918,0.0697192438332,0.069631601792,0.0699054831709,0.0699164384261,0.0698342740124,0.0699803440812,0.070035120357,0.0698050599986,0.0701118071431,0.0698890502882,0.0699657370743,0.0700972001362,0.069644382923,0.0693558945371,0.0694124966888,0.0691970433373,0.0693248546475,0.0694344071991,0.0691039236685,0.0691404411857,0.0690655802754,0.0690637543995,0.0692317349786,0.0693084217648,0.069083839034,0.0691477446891,0.0691349635581,0.0690765355306,0.0688793409377,0.0687679625102,0.0688464751722,0.0686876239724,0.0688720374343,0.068576245545,0.0683790509521,0.0682128962488,0.0681635976006,0.0681088213248,0.068302364166,0.0683078417936,0.0681307318351,0.0682713242764,0.0679444924974,0.0682530655178,0.0684429566072,0.0683224488004,0.0679317113664,0.0677783377942,0.0678422434493,0.0679280596147,0.0680083981525,0.0676943475046,0.067767382539,0.0674916752842,0.0674971529118,0.0676541782357,0.0678404175734,0.0678897162216,0.0677345167736,0.0675610585669,0.0674734165256,0.0675427998083,0.0673857744843,0.06754645156,0.0674277696291,0.0669713006641,0.0673218688292,0.067077201464,0.0670151216848,0.0669366090228,0.0668142753402,0.0667284591748,0.0669384348987,0.0669439125262,0.066985907671,0.0671904057673,0.0665969961129,0.0666755087748,0.0668179270919,0.0669293055194,0.0669512160297,0.0670388580709,0.067011469933,0.0668453152298,0.0668507928574,0.0668526187332,0.0671447588708,0.0670918084709,0.0669311313952,0.066869051616,0.0669822559193,0.0668434893539,0.0668599222367,0.0667065486644,0.066582389106,0.0667138521679,0.0667266332989,0.066816101216,0.0668179270919,0.0669311313952,0.0667759319471,0.0669384348987,0.0667485438092,0.067272570181,0.0672816995603,0.0674533318911,0.0673236947051,0.0673255205809,0.067363863974,0.0672378785397,0.067168495257,0.0670132958089,0.0668672257401,0.066425363782,0.0666663793955,0.0662701643339,0.0664162344027,0.0663833686373,0.0665093540716,0.0665239610785,0.0667138521679,0.0667814095747,0.0670607685813,0.067077201464,0.0668526187332,0.0670297286916,0.0668708774918,0.0670534650778,0.0671520623743,0.0672196197811,0.0671849281397,0.0673346499602,0.0672579631741,0.0673729933533,0.0674569836429,0.0673876003602,0.0676012278358,0.0675555809393,0.0674661130222,0.0673346499602,0.067338301712,0.0672579631741,0.0672397044155,0.0672196197811,0.0671246742364,0.0671100672295,0.0670607685813,0.0670297286916,0.0668489669815,0.0671885798915,0.0675281928014,0.0676706111185,0.0678824127182,0.0679536218767,0.0681836822351,0.0684137425934,0.0684886035037,0.0684922552554,0.0685981560553,0.0685342504002,0.0683498369383,0.0682128962488,0.0681435129662,0.0682329808833,0.0683315781797,0.0681690752282,0.0681873339868,0.0684484342348,0.0686638875862,0.0685908525518,0.068419220221,0.0686474547035,0.0688154352826,0.0687369226206,0.0687150121103,0.0688556045515,0.0687570072551,0.0688172611585,0.0689158584549,0.0690783614064,0.0693212028958,0.0692901630062,0.0690820131581,0.0692755559993,0.0691002719167,0.0692061727166,0.0694380589508,0.0694234519439,0.0695183974886,0.0693485910337,0.0694837058473,0.0697265473367,0.0700752896259,0.0701063295155,0.0703564745083,0.0707161720527,0.0706906097907,0.0708348539836,0.070712520301,0.0709790981765,0.0710795213488,0.0710667402178,0.0710740437213,0.0712584571831,0.0714520000242,0.0712949747003,0.0713534027278,0.0714136566312,0.0714118307553,0.0715359903138,0.0712803676934,0.0716309358585,0.0717331849067,0.071767876548,0.071950464134,0.0719048172375,0.0721129670855,0.0721494846027,0.0724617093748,0.0727264613744,0.0729985168776,0.0728688796915,0.0729364370983,0.0732285772359,0.0731719750842,0.0733290004082,0.0735974041596,0.0738238127662,0.0737945987525,0.0736120111665,0.0738274645179,0.0738329421455,0.0740721318832,0.0741433410417,0.0741196046555,0.0745705959929,0.0745760736205,0.0747020590548,0.0748225668616,0.075025239082,0.0753739813712,0.0755803053434,0.0755456137021,0.075468926916,0.0755967382261,0.0755912605986,0.0757610670535,0.0759710427774,0.0761682373703,0.0764877656458,0.076653920349,0.0767543435213,0.0772765440172,0.0775942464168,0.0780854070232,0.0782333029678,0.0784834479606,0.078465189202,0.0787920209809,0.079117026884,0.0792320570631,0.0795515853386,0.0794310775319,0.0795004608145,0.0795168936973,0.0797926009521,0.0796848742764,0.0799751885381,0.0798126855866,0.0796483567592,0.0799094570072,0.0800226613105,0.0802381146619,0.0802052488965,0.0804079211169,0.0805357324271,0.0808680418336,0.081032370661,0.0814285857226,0.0818521889221,0.0816732530878,0.0817864573911,0.0818777511841,0.082491245473,0.0829038934173,0.0829038934173,0.0830736998723,0.0833366259961,0.0834973030718,0.0836488507682,0.084185658271,0.084485101912,0.0850894668216,0.0858545088069,0.0865410381302,0.0873882445292,0.0883358741005,0.0893364540717,0.0905944825391,0.0916407094068,0.092811095833,0.0939906116385,0.0947793900099,0.095391058423,0.0959497764361,0.0964610216769,0.0970836453451,0.0973064022,0.0976807067513,0.0978030404339,0.0979856280199,0.0980148420336,0.0983398479367,0.098244902392,0.0983307185574,0.0985863411778,0.0987196301155,0.09902637726,0.099117671053,0.0993586866665,0.0995923987765,0.100008698473,0.100121902776,0.100414042913,0.100740874692,0.101023885451,0.101463921533,0.101986122029,0.102404247601,0.102577705807,0.102818721421,0.102941055104,0.103196677724,0.103271538634,0.103574634027,0.103826604896,0.103843037778,0.103791913254,0.103927028068,0.10426116335,0.104279422109,0.10450400484,0.104987861942,0.105391380507,0.105734645169,0.106191114134,0.106413870989,0.106695055871,0.107016410023,0.107365152312,0.107482008367,0.107876397553,0.108090025028,0.108480762462,0.108442419069,0.108687086435,0.108966445441,0.109390048641,0.109532466958,0.109810000088,0.110204389274,0.110691898129,0.111115501328,0.111336432307,0.111780120141,0.111770990762,0.112046698017,0.112039394513,0.11221285272,0.112687580444,0.113091099009,0.113240820829,0.11301988985,0.113213432691,0.11322256207,0.113598692498,0.113830578732,0.114444073021,0.11505756731,0.115247458399,0.115477518757,0.115610807695,0.116114749432,0.11661869117,0.116985692218,0.117336260383,0.117741604824,0.117644833403,0.117496937458,0.117619271141,0.117971665182,0.118347795609,0.118530383195,0.11864723925,0.118992329788,0.119423236491,0.119609475828,0.119958218118,0.120297831027,0.120427468214,0.120681264958,0.121066524764,0.121207117206,0.121652630915,0.121866258391,0.121692800184,0.121973985067,0.122251518198,0.122476100928,0.1232648793,0.123608143961,0.123931323989,0.124267285147,0.124342146057,0.12468906247,0.125169267822,0.125591045145,0.125874055903,0.126379823517,0.126723088178,0.126797949089,0.126604406247,0.12681073022,0.127137561999,0.127091915102,0.127387706991,0.127614115598,0.127849653584,0.127809484315,0.127380403488,0.127641503736,0.128079713942,0.128202047625,0.128525227652,0.129091249169,0.129166110079,0.129058383403,0.129195324093,0.129631708423,0.12990193805,0.130217814574,0.130126520781,0.130626810767,0.130692542298,0.130648721277,0.131136230132,0.131426544393,0.131468539538,0.131645649497,0.132060123317,0.131930486131,0.132264621413,0.13230113893,0.132319397689,0.132668139978,0.132593279068,0.132617015454,0.132753956143,0.132887245081,0.132848901688,0.133005927012,0.133212250984,0.133153822957,0.133303544777,0.133155648833,0.133013230516,0.133382057439,0.13352264988,0.133225032115,0.133299893026,0.133854959287,0.133730799729,0.13376549137,0.133560993274,0.133785576004,0.133887825052,0.133517172253,0.133617595425,0.133752710239,0.133948078956,0.133435007839,0.133369276308,0.133615769549,0.133655938818,0.133595684915,0.133802008887,0.133760013742,0.133526301632,0.133323629412,0.13310817606,0.133225032115,0.133277982515,0.13300227526,0.133162952336,0.132973061247,0.132649881219,0.132795951288,0.132788647785,0.132638925964,0.132485552392,0.132189760503,0.132025431675,0.131837366462,0.131612783731,0.131550703952,0.131652953,0.131327947097,0.131072324477,0.131147185387,0.130984682435,0.13104858809,0.130729059815,0.130371188146,0.130111913774,0.129907415678,0.129005433003,0.128696859983,0.128503317142,0.127933643873,0.127256243929,0.126432773917,0.126226449944,0.1261844548,0.125596522773,0.125130924429,0.124964769725,0.124471783243,0.124013488402,0.123955060375,0.123661094361,0.123104202224,0.122671469645,0.122167527908,0.121444481067,0.120998967358,0.120765255248,0.120206537234,0.120002039138,0.119069016574,0.118331362726,0.118137819885,0.11755353961,0.1170550755,0.117250444217,0.116523745625,0.115924858343,0.116085535419,0.115557857295,0.115274846537,0.115088607199,0.114765427172,0.11414462938,0.113658946401,0.112882949161,0.112656540554,0.112382659175,0.11135286519,0.110768584915,0.110668161743,0.110368718101,0.110074752088,0.110030931067,0.109968851288,0.110111269605,0.110019975812,0.10978261195,0.110018149936,0.109665755895,0.109616457247,0.109768004944,0.109402829772,0.109066868613,0.108652394793,0.108226965718,0.107735805112,0.10739254045,0.10679730492,0.106497861279,0.10587523761,0.105336604232,0.104984210191,0.104363412398,0.104140655543,0.103671405447,0.103350051296,0.103079821669,0.102773074524,0.102561272925,0.10238233709,0.10189300236,0.101306896209,0.101177259023,0.100452386307,0.0998242850107,0.0991925319632,0.0978632943373,0.0968809731246,0.0956466810434,0.0941932838589,0.0934026796116,0.0926705033918,0.0918360781238,0.0911112054075,0.0904411089669,0.0899609036157,0.0897052809954,0.08956651443,0.089292633051,0.0893894044716,0.088914676748,0.0886517506242,0.0883851727487,0.0882190180454,0.0880729479766,0.087625608391,0.0873809410257,0.0870595868744,0.0872001793156,0.0868678699091,0.0866834564473,0.0866725011921,0.0864953912337,0.0863055001443,0.0859220662137,0.0858672899379,0.085814339538,0.0856226225727,0.0851935417456,0.0849890436493,0.0846713412497,0.0840888868504,0.0838387418576,0.0834133127822,0.0830097942172,0.0827633009761,0.082608101528,0.0820548611425,0.0822082347147,0.0819781743564,0.0818430595428,0.0818448854186,0.0817809797635,0.0817335069912,0.0819562638461,0.0815710040396,0.0812459981366,0.0816495167016,0.0814815361225,0.0811912218608,0.0809246439852,0.0810670623023,0.0808844747163,0.0807219717648,0.0801541243724,0.0801303879862,0.0799496262761,0.0796319238765,0.0790275589668,0.0790786834909,0.0788048021119,0.0782789498643,0.0779722027198,0.0777129283477,0.0777658787477,0.0775723359065,0.0773897483205,0.0768785030798,0.0770026626382,0.0766593979766,0.0766137510801,0.0764786362665,0.0762467500323,0.0761773667496,0.0759418287637,0.0759381770119,0.0757190719088,0.0756149969847,0.0751804385301,0.0749576816752,0.0747750940892,0.0747477059513,0.0745888547515,0.0743514908897,0.0741086494004,0.0739187583109,0.0738256386421,0.073748951856,0.0735316726286,0.0736284440492,0.0735462796355,0.0732066667256,0.0731701492084,0.0727921929054,0.0726077794435,0.0723831967128,0.0722170420095,0.0720454096787,0.071924901872,0.071663801624,0.0715378161897,0.0713625321071,0.0711014318592,0.0711653375142,0.0712785418176,0.0710740437213,0.0709626652938,0.0708111175974,0.0707106944251,0.0703254346187,0.0700570308673,0.0699547818192,0.0697721942332,0.0695110939852,0.0691915657097,0.0691167047995,0.0691897398339,0.0690856649099,0.0693504169095,0.0694143225646,0.0693558945371,0.0691897398339,0.0689888934893,0.0688665598067,0.0688592563032,0.0686638875862,0.0685324245243,0.0682585431453,0.0677984224287,0.0676048795875,0.0672433561672,0.0669877335469,0.0670826790916,0.0672634408017,0.0671885798915,0.0668781809953,0.0665111799474,0.0666116031197,0.0663194629822,0.0660894026238,0.0663304182373,0.066503876444,0.0663559804994,0.0662391244443,0.0661587859065,0.0661587859065,0.0662482538236,0.066034626348,0.0663578063752,0.0664162344027,0.0663797168855,0.0661806964168,0.0661934775478,0.0658794268999,0.0656037196451,0.0655763315072,0.0654886894659,0.0654941670935,0.0653535746523,0.065278713742,0.0650979520319,0.0652294150938,0.0650888226526,0.0650851709009,0.0651308177974,0.0650486533837,0.0649628372183,0.0650194393699,0.0648149412736,0.0647820755081,0.0649500560873,0.0647455579909,0.0647108663496,0.064849632915,0.0648332000322,0.0647656426254,0.0647893790116,0.0648313741564,0.0648003342667,0.0650303946251,0.0648149412736,0.0647601649978,0.0647729461288,0.0646834782117,0.0645958361704,0.0646213984325,0.0645538410257,0.0642507456329,0.0641211084469,0.0638727893299,0.0638581823231,0.0638161871783,0.063728545137,0.0636208184613,0.0635824750682,0.0635295246683,0.0635039624062,0.0635970820751,0.0635185694131,0.0636463807233,0.063637251344,0.063741326268,0.0637796696611,0.063898351592,0.0640480734125,0.0642215316192,0.0642270092467,0.0642489197571,0.0645209752602,0.064510020005,0.0644661989844,0.0644260297155,0.0643091736604,0.0641393672055,0.0641028496883,0.0640918944331,0.0640827650538,0.0641594518399,0.0640006006401,0.0639330432333,0.0638928739644,0.0640535510401,0.0642452680053,0.0644260297155,0.0641393672055,0.0638873963368,0.0640517251642,0.0639841677574,0.0640334664056,0.0640699839228,0.0643876863224,0.0643456911776,0.0643073477846,0.0642397903778,0.064575751536,0.0647875531357,0.0647309509841,0.0648788469287,0.0650322205009,0.0649391008321,0.0647072145979,0.0646688712048,0.0647820755081,0.0649993547355,0.0648916280597,0.0650851709009,0.0650468275078,0.0649098868183,0.0647619908737,0.0648441552874,0.0650486533837,0.0649883994803,0.0648386776598,0.0646889558393,0.0646177466808,0.064197795233,0.0642507456329,0.0644753283637,0.0648021601426,0.064771120253,0.0646268760601,0.0647985083909,0.0648368517839,0.0650888226526,0.065565376252,0.0659688948171,0.0659524619343,0.0657735261001,0.0656931875622,0.0660181934653,0.0663322441132,0.0663943238924,0.0665933443611,0.0663030300994,0.0659999347067,0.0659232479206,0.0659488101826,0.0659579395619,0.0659944570791,0.065852038762,0.0655909385141,0.0655032964728,0.0654503460729,0.0655690280038,0.0656986651898,0.0656256301554,0.0660309745963,0.0661642635341,0.0660638403618,0.065956113686,0.0661953034237,0.0664399707889,0.0666225583749,0.0668745292436,0.0670735497123,0.0671265001122,0.0668927880022,0.0669274796435,0.0672561372983,0.0677235615184,0.0673876003602,0.0671630176294,0.0669000915056,0.0669311313952,0.0670260769399,0.0671849281397,0.0672086645259,0.0671265001122,0.0670297286916,0.0667175039196,0.0671137189812,0.0673857744843,0.0675574068151,0.0673346499602,0.0671995351466,0.0674168143739,0.0675190634221,0.0677180838908,0.0677819895459,0.0678130294355,0.0675446256841,0.0673547345947,0.0676103572151,0.0677089545115,0.0678276364424,0.0677911189252,0.0680010946491,0.068106995449,0.0681818563592,0.0683680956969,0.0687515296275,0.0688683856825,0.0688665598067,0.0689961969927,0.0691897398339,0.0692646007441,0.0693230287716,0.0693595462888,0.0691568740684,0.0693558945371,0.0695129198611,0.0697174179574,0.0696334276678,0.0695640443851,0.0693485910337,0.0694453624543,0.0693157252682,0.0692426902338,0.0695330044955,0.0693686756681,0.0691915657097,0.0694234519439,0.0694526659577,0.0696936815712,0.0698689656537,0.0697630648539,0.0699730405778,0.07007346375,0.0702688324671,0.0702980464808,0.0702487478326,0.0699949510881,0.0700004287157,0.0700917225086,0.0701793645499,0.0702797877222,0.0701921456809,0.0702213596947,0.0700442497363,0.0701574540396,0.0705244550874,0.0704897634461,0.0707746000802,0.0706449628942,0.0708604162457,0.0711379493764,0.0710996059833,0.0712182879142,0.0716491946171,0.0717057967688,0.0713990496243,0.0718536927134,0.0718573444651,0.071859170341,0.0715049504242,0.0713753132381,0.0713150593348,0.0714848657897,0.0712785418176,0.0715688560793,0.0717989164376,0.0716418911137,0.0717185778998,0.0719614193892,0.0722261713888,0.0719961110305,0.0722827735405,0.0722772959129,0.0722353007681,0.072158613982,0.0723338980646,0.0721549622303,0.0721476587269,0.0724124107265,0.0722225196371,0.0724653611265,0.0724817940092,0.0724781422575,0.072328420437,0.072328420437,0.0721823503682,0.0722699924095,0.0723631120783,0.072067320189,0.0720764495683,0.0721111412097,0.0721513104786,0.0723138134301,0.0726917697331,0.07241971423,0.0726954214848,0.0726004759401,0.0723831967128,0.0724105848507,0.0726461228366,0.0727757600227,0.0726735109745,0.0725274409057,0.0724434506162,0.0726917697331,0.0727027249883,0.0728122775398,0.0728287104226,0.0730167756362,0.0730332085189,0.073071551912,0.0731573680774,0.0732468359945,0.073318045153,0.0734275977046,0.0731738009601,0.0732431842428,0.0733983836909,0.0731025918016,0.0732450101186,0.0731044176774,0.073135457567,0.0730350343948,0.0731153729326,0.0730697260361,0.0730003427534,0.0731591939532,0.0731975373463,0.0734002095667,0.0733326521599,0.0734422047115,0.0734330753322,0.0733874284357,0.0730660742844,0.0729090489604,0.0729309594707,0.0730167756362,0.0728122775398,0.0727921929054,0.0727501977606,0.0729546958569,0.0731245023119,0.0734549858425,0.0736649615664,0.0737708623663,0.0738731114144,0.073891370173,0.0740648283797,0.0742492418416,0.0742382865864,0.0739844898419,0.0739424946971,0.0737690364904,0.0736485286837,0.0735334985045,0.073500632739,0.0734531599667,0.0733856025598,0.0732979605186,0.0734002095667,0.0735061103666,0.0734951551114,0.0732870052634,0.0735115879942,0.0735645383941,0.0737763399939,0.0736065335389,0.0735061103666,0.0734933292356,0.0735627125183,0.0734002095667,0.0732687465048,0.0734129906977,0.0732541394979,0.0734111648219,0.0733417815392,0.0732486618704,0.073370995553,0.0733618661737,0.0729327853466,0.0729656511121,0.0730551190292,0.0731482386981,0.0729528699811,0.0729820839948,0.072744720133,0.0729455664776,0.072848795057,0.0728999195811,0.073122676436,0.0732103184773,0.0731701492084,0.0729455664776,0.0732632688772,0.0731957114704,0.0733509109185,0.0732431842428,0.073462289346,0.0732450101186,0.0733399556634,0.0732194478566,0.0731719750842,0.0733198710289,0.0732431842428,0.07327970176,0.0731811044635,0.0731920597187,0.073122676436,0.0730551190292,0.0730770295395,0.0730514672775,0.0731920597187,0.0731683233325,0.0731025918016,0.0730094721327,0.0731920597187,0.0733399556634,0.0731902338428,0.0732084926014,0.0731738009601,0.0732212737325,0.0728597503122,0.0728542726846,0.0730204273879,0.0730879847947,0.0727538495123,0.0724471023679,0.0727757600227,0.0731738009601,0.0729236559673,0.0726625557193,0.0729254818432,0.0728615761881,0.0727575012641,0.0725767395539,0.0726662074711,0.0729309594707,0.0726114311953,0.0721768727406,0.0721805244923,0.0722334748923,0.072158613982,0.0725347444091,0.0725749136781,0.0725201374023,0.0726771627262,0.072797670533,0.0729236559673,0.0729693028638,0.0730149497603,0.073396557815,0.0733326521599,0.0729875616224,0.0727136802434,0.0728743573191,0.0727246354986,0.0723612862025,0.0722645147819,0.0722772959129,0.0724507541196,0.0724343212369,0.0724416247403,0.0724544058713,0.0723594603266,0.0722170420095,0.0723558085749,0.0723996295955,0.0723265945611,0.0723065099267,0.0722225196371,0.0720928824511,0.0721823503682,0.0721841762441,0.0723503309473,0.0651928975766,0.0579003493923,0.0507173537596,0.0435745273958,0.0)
m <- c(0.0430279566914,0.0502861453879,0.057424062818,0.0646202935895,0.0716871416349,0.0717144760136,0.0717472772681,0.0716689187158,0.0716871416349,0.0716780301753,0.0714411322264,0.0713573067983,0.0713281501277,0.0711331648928,0.0712898819975,0.0714794003566,0.0713755297175,0.0715085570273,0.0715832709958,0.0716342951694,0.0717983014417,0.0718730154102,0.0720771121047,0.07243428132,0.0723431667242,0.0721500037813,0.0721882719115,0.0722010279549,0.0723650342272,0.0725272182076,0.0729536345157,0.0729827911863,0.0731540866263,0.0732196891352,0.073394629159,0.0735349456365,0.0736169487726,0.0738046448399,0.0737700212935,0.0738392683862,0.0735695691829,0.073759087542,0.0735987258535,0.0734675208356,0.0735786806424,0.0737281085794,0.0736388162756,0.0734146743701,0.0733235597744,0.0732379120544,0.0733800508237,0.0732397343463,0.0732288005948,0.0731777764212,0.0730010141055,0.072755004697,0.0725800646731,0.0727203811506,0.0728679867957,0.0729572790995,0.0731285745395,0.0732196891352,0.0731978216322,0.0733417826935,0.0735130781335,0.073715352536,0.073886647976,0.0737481537905,0.0734547647922,0.0736133041888,0.0732707133088,0.0732907585199,0.0735094335497,0.0734930329224,0.0735057889658,0.073565924599,0.0738028225479,0.0740287867454,0.0742456394832,0.0740269644535,0.074016030702,0.0738811811003,0.0736442831514,0.0737481537905,0.0735841475182,0.0737445092067,0.0735786806424,0.073631527108,0.0737736658773,0.073629704816,0.0739923409071,0.0740014523667,0.0740433650807,0.0739540727769,0.0740014523667,0.0736971296169,0.0736278825241,0.0733855176995,0.0734183189539,0.0733873399914,0.0731795987131,0.0729773243106,0.072990080354,0.0729572790995,0.0730192370246,0.0729536345157,0.0732379120544,0.0734729877114,0.0734073852024,0.0736151264807,0.0738738919326,0.0740069192424,0.0739558950688,0.0737918887965,0.0736497500271,0.0737572652501,0.0735786806424,0.0733909845752,0.0732871139361,0.0733162706067,0.0731231076637,0.0732269783029,0.073416496662,0.0737499760824,0.074036075913,0.0740834555028,0.0741271905088,0.0742529286509,0.0741672809309,0.0744624922211,0.0744515584696,0.0745700074441,0.0743823113768,0.07418550385,0.0741144344654,0.074079810919,0.0741800369743,0.0742201273964,0.074549962233,0.0744533807615,0.0743859559607,0.0742802630296,0.0743896005445,0.0744060011717,0.0741927930177,0.073994163199,0.0737517983743,0.0735477016799,0.0733581833207,0.0730429268195,0.0729499899318,0.0732014662161,0.0732014662161,0.0732123999676,0.0735094335497,0.0737426869148,0.0739066931871,0.0739158046467,0.0739449613173,0.0740816332109,0.0740105638262,0.073545879388,0.073374583948,0.0734875660467,0.0732597795573,0.0731832432969,0.073075728074,0.0727914505353,0.0728424747089,0.073053860571,0.0733326712339,0.0734401864569,0.0735294787607,0.0732962253956,0.0732998699795,0.0733417826935,0.0732506680978,0.0736424608594,0.0732688910169,0.0731048847446,0.0732123999676,0.0732433789301,0.0731613757939,0.0731759541293,0.0733071591471,0.0731048847446,0.0731668426697,0.0730010141055,0.0731158184961,0.0727987397029,0.0724925946612,0.0724579711149,0.0724525042391,0.0724798386178,0.0724178806927,0.0724488596553,0.0723140100536,0.0721572929489,0.0722010279549,0.0724087692332,0.0725308627914,0.0725454411268,0.0725709532136,0.0724433927795,0.0723304106808,0.0723030763021,0.0724051246493,0.0724160584008,0.072561841754,0.0725071729965,0.0723376998485,0.0720661783532,0.0721718712842,0.0720716452289,0.0719513739625,0.0717108314298,0.0713718851337,0.0715650480766,0.0715304245302,0.0711495655201,0.0711696107311,0.0713153940843,0.0711659661473,0.0713135717924,0.0711331648928,0.0712989934571,0.0716379397532,0.0715085570273,0.0711914782341,0.0715213130707,0.0713172163762,0.0713263278358,0.0709910261235,0.0709254236145,0.0710037821669,0.0708835109005,0.0707085708767,0.0705718989831,0.0705445646043,0.0703368233261,0.0703277118665,0.0703258895746,0.0704261156299,0.0702165520597,0.0701163260044,0.070081702458,0.0701090368367,0.0700944585014,0.0701345489235,0.0700033439057,0.0699049401423,0.0698411599252,0.0697008434478,0.0698648497201,0.0699085847261,0.0698867172231,0.0696479969823,0.0695313702997,0.0694110990334,0.0694493671636,0.0696425301065,0.0693236290215,0.069354607984,0.0691213546189,0.0689974387687,0.0688024535338,0.0687951643662,0.0687969866581,0.0686348026777,0.0685983568394,0.0681682959475,0.0682703442947,0.0684325282751,0.0685947122556,0.068756896236,0.0689008572972,0.068991971893,0.0689555260547,0.0689500591789,0.0688607668751,0.0689646375142,0.0688808120862,0.068756896236,0.0686129351747,0.0682922117977,0.0681300278173,0.0679805998803,0.0678657954896,0.0679751330045,0.0681263832335,0.0679496209177,0.0678293496513,0.067601563162,0.0675687619075,0.0677036115092,0.0676926777577,0.067730945888,0.0676762771305,0.0674922256471,0.0673591983373,0.0676143192054,0.0678421056948,0.0679623769611,0.0677892592292,0.067709078385,0.0676762771305,0.0675013371067,0.0674557798088,0.0675906294105,0.0673191079152,0.0669637609918,0.0668762909799,0.0666776611612,0.0667997547195,0.0667359745025,0.066746908254,0.066788820968,0.0667159292914,0.0667049955399,0.0667523751297,0.066788820968,0.0666047694846,0.0666193478199,0.0666102363604,0.0667487305459,0.066810688471,0.0669309597374,0.0669619386999,0.0668179776387,0.0667833540923,0.0668270890982,0.0668234445144,0.0667724203408,0.0663478263246,0.0660708379536,0.06576287062,0.0655769968447,0.0654931714166,0.0654166351562,0.0653127645171,0.0653692555664,0.0651560474124,0.065185204083,0.0655824637204,0.065613442683,0.0657482922847,0.0656754006081,0.0656626445647,0.0656261987264,0.065784738123,0.0656936235272,0.0658503406319,0.0658448737562,0.0656261987264,0.0654731262056,0.0654257466158,0.065336454312,0.0652890747222,0.065292719306,0.0650211978107,0.0649665290533,0.0648626584141,0.0647442094397,0.0645601579563,0.0645073114907,0.0644890885716,0.0643633504295,0.064352416678,0.0644289529384,0.0645054891988,0.0645729139997,0.0646038929622,0.0646622063035,0.0647733661103,0.0648243902839,0.064886348209,0.0651578697043,0.065207071586,0.0649902188481,0.0651469359528,0.0649264386311,0.0649246163392,0.0647241642286,0.0648098119486,0.0647697215265,0.0645783808754,0.0645054891988,0.0644417089818,0.0643560612618,0.0641720097784,0.0641100518533,0.0641100518533,0.0641610760269,0.0638348857742,0.063816662855,0.0638002622278,0.0636818132533,0.0636799909614,0.0637765724329,0.0638622201529,0.0640371601767,0.0639405787052,0.064031693301,0.0642394345793,0.0642467237469,0.064394329392,0.0644435312737,0.064629405049,0.0645838477512,0.0647423871477,0.0648262125758,0.0649027488362,0.0649264386311,0.0650211978107,0.065314586809,0.0653127645171,0.0652872524303,0.0651524028286,0.0651888486669,0.0651305353256,0.0652580957596,0.0655296172549,0.065613442683,0.0655423732983,0.0653984122371,0.0655150389196,0.0655769968447,0.0656918012353,0.0657300693655,0.0657501145766,0.0656517108132,0.0655223280873,0.0654913491247,0.065569707677,0.0656826897758,0.0654275689077,0.0655369064226,0.0655569516336,0.0658430514643,0.0659378106438,0.0660526150345,0.0658940756379,0.0659651450225,0.0661091060838,0.066318669654,0.0666958840804,0.0666922394965,0.0669674055757,0.066981983911,0.0671623908105,0.0672516831144,0.0676635210871,0.067878551533,0.0680225125943,0.0678767292411,0.0682120309535,0.0681610067798,0.068007934259,0.0679040636199,0.0678329942352,0.0678621509058,0.0678038375645,0.0679842444641,0.0680480246811,0.0683049678411,0.0681099826062,0.0682375430403,0.0685309320385,0.0687368510249,0.0689227248002,0.0689099687568,0.0693710086112,0.0693837646546,0.0696807982368,0.0698010695031,0.0699523197321,0.0702839768605,0.0703623354129,0.070573721275,0.0707468390069,0.0709946707073,0.0707304383797,0.0708561765218,0.0708051523482,0.0707614173422,0.0707687065099,0.0710074267507,0.0711185865575,0.0710311165456,0.0710037821669,0.0713573067983,0.0715450028656,0.0714411322264,0.0715267799464,0.0716342951694,0.0717782562306,0.0717873676902,0.0718803045779,0.0721008018996,0.0722921425506,0.0721736935761,0.0719404402111,0.071984175217,0.0720807566885,0.0723777902706,0.0725144621642,0.0726456671821,0.0728351855412,0.0731267522476,0.0731540866263,0.0732506680978,0.073844735262,0.0742784407377,0.0744825374322,0.0747085016296,0.0751422071053,0.0751094058508,0.0753663490108,0.0755886686244,0.0758292111572,0.0761080218201,0.0760661091061,0.0764597241597,0.0767440016984,0.0766984444005,0.0767002666924,0.0771048154975,0.0770410352805,0.0769535652686,0.077115749249,0.077308912192,0.0778373768472,0.0776095903579,0.0777663074626,0.0781289435536,0.0780542295851,0.0781617448081,0.0782382810685,0.0784733567255,0.0786136732029,0.0787503450965,0.0788815501144,0.0792332524539,0.0795193522846,0.0798838106675,0.0803703626088,0.0805343688811,0.0809462068538,0.0812377735602,0.0813616894104,0.081562141521,0.0816514338248,0.0816824127874,0.0818263738487,0.0817352592529,0.0818555305193,0.081990380121,0.0820304705431,0.0821999436912,0.0824933326895,0.0825607574903,0.082568046658,0.0829561948358,0.0828905923269,0.0830017521337,0.0831256679839,0.0832623398775,0.0834609696962,0.083614042217,0.0841370399966,0.0846436371489,0.0846636823599,0.0848914688493,0.0852668609837,0.0852996622382,0.0854946474731,0.0858026148067,0.0861105821403,0.0863839259275,0.08632925717,0.0863565915488,0.0868613664091,0.0872185356244,0.0874718342006,0.0879383409308,0.0881916395069,0.0886326341503,0.0891465204703,0.0892212344388,0.0895128011451,0.0899392174532,0.0903729229289,0.0903947904319,0.090584308791,0.0908740532055,0.0912385115884,0.0913223370165,0.0916521718531,0.0924375796683,0.0930116016215,0.0936275362887,0.0942033805337,0.0949286527158,0.0959382024366,0.0969860202876,0.0978661872824,0.0989449840959,0.0998779975563,0.100581402235,0.101055198133,0.101669310509,0.102144928698,0.102582278758,0.102771797117,0.102999583606,0.103456978877,0.103708455161,0.103910729564,0.104180428767,0.104502974436,0.104603200491,0.105213668283,0.10587698254,0.106398158027,0.106926622683,0.10724734606,0.107467843381,0.107708385914,0.108176714936,0.108621354163,0.108737980846,0.108982167962,0.109279201545,0.109616325549,0.109789443281,0.11002634123,0.11043635691,0.110534760674,0.110542049842,0.110782592374,0.111484174761,0.111393060166,0.111648181034,0.111875967523,0.112480968439,0.112741556183,0.113118770609,0.113543364625,0.113960669474,0.114501890172,0.114602116228,0.115006665033,0.115354722788,0.115697313668,0.115526018228,0.115866786816,0.116019859337,0.11639342918,0.11678339965,0.117178836995,0.117689078731,0.117977000854,0.118512754677,0.118973794531,0.119250782902,0.119921386327,0.120413405144,0.12079973103,0.121158722537,0.121357352356,0.121960530979,0.122815185887,0.122948213197,0.123296270953,0.123996031048,0.124176437948,0.124714014063,0.125302614351,0.125883925472,0.126397811792,0.126612842238,0.127095749595,0.127465674854,0.127682527592,0.128034229931,0.128373176227,0.1283567756,0.128349486433,0.128752212946,0.129010978398,0.129209608216,0.12917498467,0.129236942595,0.129623268481,0.13010799813,0.13037405275,0.131093858056,0.131704325848,0.131749883146,0.131930290045,0.132190877789,0.132509778874,0.133012731442,0.133344388571,0.133491994216,0.133686979451,0.133927521984,0.134007702828,0.134082416796,0.134230022442,0.134403140173,0.134426829968,0.134408607049,0.134443230596,0.134366694335,0.134251889945,0.134011347412,0.133564885893,0.133568530476,0.133570352768,0.13362866611,0.133349855447,0.133364433782,0.133318876484,0.133187671466,0.133515684011,0.133437325459,0.133575819644,0.133282430646,0.133787205506,0.133615910066,0.133896543021,0.13400952512,0.133993124493,0.133723425289,0.133193138342,0.133134825001,0.133220472721,0.133275141478,0.132808634748,0.132870592673,0.132599071178,0.132221856751,0.132110696945,0.132132564448,0.132351239477,0.132303859888,0.132041449852,0.131884732747,0.131458316439,0.131055589926,0.13101185492,0.130816869685,0.130867893859,0.13093531866,0.130625529034,0.130434188383,0.130556281941,0.130769490095,0.130842381772,0.130785890723,0.130993632001,0.131297954751,0.130774956971,0.130512546935,0.130510724643,0.130359474415,0.130053329373,0.129694337866,0.12944103929,0.129320768023,0.128921686094,0.128447890196,0.128673854393,0.128506203537,0.128353131016,0.128210992247,0.127999606385,0.127833777821,0.127498476108,0.127225132321,0.126931743323,0.126946321658,0.126412390127,0.126365010537,0.125836545882,0.125309903519,0.124697613435,0.124251151916,0.123892160409,0.123571437032,0.123117686345,0.122432504585,0.121914973682,0.121226147338,0.121045740438,0.121020228351,0.120896312501,0.120974671054,0.120983782513,0.120777863527,0.120746884564,0.120172862611,0.119910452575,0.119923208619,0.119728223384,0.119221626232,0.119110466425,0.118727785123,0.118197498175,0.11796424481,0.117532361627,0.117685434147,0.117594319552,0.117100478443,0.11676517673,0.116779755066,0.116513700446,0.1160508383,0.115777494513,0.115221695479,0.114651318109,0.114254058472,0.114108275119,0.113898711549,0.113592566507,0.11338664752,0.113078680187,0.112626751792,0.112526525737,0.112705110344,0.112812625567,0.112570260743,0.112187579441,0.111823121058,0.111540665811,0.110999445112,0.110753435704,0.110866417802,0.110582140264,0.109927937466,0.109494231991,0.109173508614,0.108962122751,0.108717935635,0.108417257469,0.108153025141,0.107724786541,0.10740953004,0.107150764588,0.107223656265,0.107108851874,0.106777194746,0.106279709053,0.106225040295,0.105647373758,0.105558081455,0.105282915375,0.105317538922,0.104730760925,0.104338968164,0.10395446457,0.103805036633,0.103615518273,0.103094342786,0.103123499457,0.102678860229,0.102697083148,0.101969988674,0.101979100134,0.102055636394,0.101776825731,0.101565439869,0.101199159195,0.101193692319,0.101281162331,0.10120462607,0.100812833309,0.100632426409,0.100462953261,0.0999399554814,0.0997832383767,0.0995171837572,0.0993094424789,0.0993258431061,0.0988101344943,0.0984347423598,0.0979664133377,0.0977222262211,0.0973687015897,0.0969513967412,0.0965468479361,0.096442977297,0.0963445735336,0.0957741961643,0.0954862740417,0.0955810332213,0.0955063192528,0.0947391343567,0.0944275224392,0.0936767381704,0.0932594333219,0.0923537542402,0.0911565084522,0.090070422471,0.0890207823281,0.0875337921257,0.0863529469649,0.0854873583054,0.0843593596102,0.0839493439294,0.0831274902758,0.082418618721,0.0819867355372,0.081625921738,0.0811320806291,0.0810974570827,0.0811011016666,0.0812086168895,0.08102820999,0.0806327726445,0.0803904078198,0.0802810703049,0.080408630739,0.0801826665415,0.0802847148888,0.0798856329594,0.079615933756,0.0794100147697,0.0792733428761,0.0789125290769,0.0786792757119,0.0785754050727,0.0781034314668,0.0778811118532,0.0778811118532,0.0775294095136,0.077436472626,0.0774455840856,0.077372692409,0.0771849963417,0.0771813517579,0.0768606283809,0.0767403571145,0.0764670133273,0.0759294372125,0.0759950397214,0.075725340518,0.0754082617249,0.0752788789989,0.0754756865257,0.0753900388057,0.0753444815078,0.0751531408568,0.0753007465019,0.075149496273,0.0751185173104,0.0750893606398,0.0748251283121,0.0746684112075,0.074506227227,0.0743695553334,0.0741235459249,0.0740397204969,0.0738301569267,0.0737845996288,0.0736479277352,0.0733545387369,0.0734656985437,0.0731704872535,0.0727422486536,0.0722265400417,0.0722976094264,0.0723249438051,0.072412413817,0.0724452150714,0.0722520521285,0.0722228954578,0.0719076389566,0.0720771121047,0.07217733816,0.0723668565191,0.0721190248187,0.0720789343966,0.0715978493311,0.0714338430588,0.0712661922026,0.0712042342775,0.0712461469915,0.0707778179694,0.0705554983558,0.0703769137482,0.0705372754367,0.0702274858112,0.070358690829,0.0700616572469,0.0698721388878,0.0698211147142,0.0694439002878,0.0695022136291,0.0693527856921,0.0695878613491,0.0693582525678,0.0693710086112,0.0692762494317,0.0693473188163,0.0694566563312,0.0692853608912,0.0695113250887,0.0696716867772,0.0697883134597,0.0694439002878,0.0692853608912,0.0692507373449,0.069205180047,0.0692525596368,0.0690320623151,0.0689245470921,0.06888445667,0.0685163537032,0.0685692001687,0.0685527995415,0.06862751351,0.0685728447526,0.0684070161883,0.0683213684683,0.0686184020504,0.0683632811824,0.0680443800973,0.0678165936079,0.0675104485663,0.067474002728,0.0674412014735,0.0673118187476,0.0672006589408,0.0671933697731,0.0668708241042,0.0671168335127,0.0672024812327,0.0673300416667,0.0672826620769,0.0670475864199,0.0668161553467,0.0668362005578,0.0670220743331,0.0670785653825,0.067109544345,0.0669491826565,0.0669400711969,0.066874468688,0.0667815318004,0.0669327820293,0.0668161553467,0.0669036253586,0.0668562457689,0.0665337001,0.0663296034055,0.0664389409204,0.0660471481587,0.0660890608728,0.0663332479893,0.0663168473621,0.0661655971332,0.0660507927425,0.0660781271213,0.066125506711,0.0664972542617,0.0663204919459,0.0666521490744,0.0668854024395,0.0668270890982,0.0667778872165,0.067153279351,0.0669856284948,0.0667487305459,0.0665373446838,0.066169241717,0.0662038652634,0.0660234583638,0.0659177654328,0.0661346181706,0.0662293773502,0.0661309735868,0.0660799494132,0.0661619525493,0.0663587600761,0.0663933836225,0.0662949798591,0.0664006727902,0.0661455519221,0.065804783334,0.0656626445647,0.0657027349868,0.0657701597877,0.0656735783162,0.06542027974,0.0652981861817,0.0653273428524,0.06550592746,0.0657027349868,0.0656826897758,0.0656699337324,0.0656371324779,0.0655405510064,0.0658011387502,0.0661965760957,0.0665920134412,0.0666284592795,0.0664389409204,0.0662512448532,0.0664571638395,0.066426184877,0.066511832597,0.0667815318004,0.066404317374,0.0661437296302,0.0659669673145,0.065976078774,0.0661856423442,0.0664407632123,0.0663642269519,0.0664553415476,0.0662986244429,0.0660362144072,0.0661801754685,0.0662949798591,0.0659159431408,0.0659268768923,0.0657865604149,0.0655988643477,0.0655733522609,0.0654749484975,0.065655355397,0.0657574037443,0.0657355362413,0.0655933974719,0.0657574037443,0.0655569516336,0.0656754006081,0.0658521629238,0.0659596781468,0.0660343921153,0.0660070577366,0.0659943016932,0.0662166213068,0.066404317374,0.0667122847076,0.0670184297493,0.067131411848,0.0672261710276,0.0672881289527,0.0674648912684,0.0674120448029,0.0673956441756,0.0675013371067,0.0677200121365,0.0676361867084,0.0678348165271,0.0675031593986,0.0672243487356,0.0669528272403,0.0669710501595,0.0670512310037,0.0672644391578,0.0673263970829,0.0671496347671,0.0671496347671,0.0670967883016,0.0672498608225,0.0673828881322,0.0676817440063,0.0676963223416,0.0677546356828,0.0676799217143,0.0675541835722,0.0675906294105,0.067794726105,0.0677017892173,0.0677036115092,0.0679077082037,0.0677965483969,0.067772858602,0.0676361867084,0.0677746808939,0.0676817440063,0.0674867587714,0.0673591983373,0.0676562319194,0.0677874369373,0.0676489427518,0.0678749069492,0.0678001929807,0.0680279794701,0.0680881151032,0.0682466544998,0.06862751351,0.0687222726896,0.0684197722317,0.068436172859,0.0686876491432,0.0685710224607,0.0685363989143,0.0684799078649,0.0684179499398,0.0684671518215,0.068328657636,0.0614750177446,0.0547452937033,0.04788983152,0.040919564946,0.0)
ycorr <- c(9.57078497973e-05,9.56416783285e-05,9.54417492283e-05,9.51051001566e-05,9.46333637427e-05,9.40218153756e-05,9.3264367123e-05,9.24969965606e-05,9.17160412567e-05,9.09216042732e-05,9.01170081878e-05,8.93001570792e-05,8.84689450841e-05,8.76227071739e-05,8.6765069611e-05,8.58947726719e-05,8.50161645971e-05,8.41331032797e-05,8.32499092598e-05,8.23689107726e-05,8.1486863594e-05,8.0605685757e-05,7.97264677135e-05,7.8849319964e-05,7.79716992543e-05,7.70967633527e-05,7.62228740903e-05,7.53489097296e-05,7.44704293646e-05,7.35860395904e-05,7.2691904999e-05,7.17861628679e-05,7.08644583294e-05,6.99252753427e-05,6.89716652186e-05,6.80054338996e-05,6.70198629235e-05,6.60174591444e-05,6.50059354868e-05,6.39867808003e-05,6.29575526997e-05,6.19217052428e-05,6.08806227925e-05,5.98304259971e-05,5.87726149389e-05,5.77051196692e-05,5.6626256028e-05,5.55373759936e-05,5.44369774629e-05,5.33123066846e-05,5.21683893421e-05,5.10051952774e-05,4.98244463019e-05,4.86311309658e-05,4.74233763076e-05,4.61955513337e-05,4.49526859645e-05,4.36969888587e-05,4.24252195631e-05,4.11440502601e-05,3.98562641474e-05,3.8557307318e-05,3.72464082984e-05,3.59206204818e-05,3.4579699168e-05,3.32291643175e-05,3.18750173416e-05,3.05112048138e-05,2.91364065199e-05,2.77520265232e-05,2.6357404536e-05,2.49581190818e-05,2.3550973191e-05,2.21378702103e-05,2.07204241828e-05,1.9299585411e-05,1.78755131179e-05,1.64458929661e-05,1.5009883995e-05,1.35723868859e-05,1.21287165934e-05,1.0671404228e-05,9.20478417872e-06,7.7357126039e-06,6.26250547694e-06,4.78381825443e-06,3.29475604149e-06,1.79458315231e-06,2.86293143735e-07,-1.22760954738e-06,-2.74830753621e-06,-4.2662407002e-06,-5.77985575631e-06,-7.29637747626e-06,-8.81543949093e-06,-1.03360035833e-05,-1.18550897618e-05,-1.33691302297e-05,-1.48771360214e-05,-1.63803750938e-05,-1.78778779544e-05,-1.93666723853e-05,-2.08510954638e-05,-2.23310217724e-05,-2.38064656489e-05,-2.52744861428e-05,-2.67384330267e-05,-2.82023048595e-05,-2.96643670793e-05,-3.11285190659e-05,-3.25923565668e-05,-3.40605163271e-05,-3.5531701807e-05,-3.7010142047e-05,-3.84909770608e-05,-3.9976243427e-05,-4.14699291094e-05,-4.29649616036e-05,-4.4455441048e-05,-4.59413922341e-05,-4.74205708326e-05,-4.88964131624e-05,-5.03675905368e-05,-5.18354181588e-05,-5.32978439911e-05,-5.47566022595e-05,-5.62050162938e-05,-5.7643977424e-05,-5.90802721641e-05,-6.05203965621e-05,-6.19655407687e-05,-6.3412122586e-05,-6.48600666757e-05,-6.63020590679e-05,-6.77403339905e-05,-6.9174454331e-05,-7.06046547999e-05,-7.2038611166e-05,-7.34750266326e-05,-7.49077172312e-05,-7.63345918427e-05,-7.77588697942e-05,-7.91831516548e-05,-8.06080758582e-05,-8.20386313474e-05,-8.34769441008e-05,-8.49234171287e-05,-8.63711836212e-05,-8.78151845601e-05,-8.92562210821e-05,-9.06968861075e-05,-9.21364312875e-05,-9.3572070503e-05,-9.50010457959e-05,-9.6422346838e-05,-9.78337433703e-05,-9.92317330667e-05,-0.000100619388928,-0.000102007167846,-0.000103396703881,-0.000104786559736,-0.00010617573652,-0.000107562766319,-0.000108947690366,-0.000110331490347,-0.000111713243368,-0.000113100063261,-0.000114490158281,-0.000115879613198,-0.000117260377373,-0.000118629608205,-0.000119984982212,-0.000121327775379,-0.000122659896864,-0.000123984181868,-0.000125300626027,-0.000126606714155,-0.000127897096681,-0.000129170560954,-0.000130429622251,-0.000131684245712,-0.000132937712584,-0.000134198817462,-0.00013546856353,-0.000136743018569,-0.000138021163974,-0.000139297377139,-0.000140575578112,-0.000141859748804,-0.00014315387402,-0.000144448705376,-0.00014574366155,-0.000147034367444,-0.000148312549789,-0.000149580574282,-0.000150840891454,-0.000152097374449,-0.000153356245295,-0.000154614038982,-0.000155869396845,-0.000157128888035,-0.000158393408246,-0.00015965629716,-0.000160920401192,-0.000162183842832,-0.000163441264623,-0.000164695604845,-0.000165945075928,-0.000167191246797,-0.000168434792385,-0.000169672830018,-0.000170899968988,-0.00017211742418,-0.000173333846154,-0.000174554203348,-0.000175786432633,-0.000177031091354,-0.000178282748054,-0.000179535246182,-0.000180787480311,-0.000182040163226,-0.000183296329163,-0.000184562166637,-0.000185836038941,-0.000187108520075,-0.000188374547649,-0.000189629416988,-0.000190876043081,-0.000192119046699,-0.000193362507279,-0.000194606226533,-0.000195849855306,-0.000197091646655,-0.000198328006361,-0.00019956576852,-0.000200809310929,-0.000202056586543,-0.000203306513131,-0.000204560863465,-0.00020581367325,-0.000207067504648,-0.000208322220483,-0.000209582156083,-0.000210841395785,-0.000212097605762,-0.000213346175752,-0.000214590037008,-0.00021583420158,-0.000217077827976,-0.000218323361201,-0.000219573519442,-0.000220829085721,-0.000222083433549,-0.000223338671471,-0.00022460285023,-0.000225873714492,-0.000227153581649,-0.000228437522957,-0.000229726027721,-0.00023102347759,-0.000232323238519,-0.000233623907592,-0.000234922514956,-0.000236226194892,-0.000237526936315,-0.000238825748461,-0.000240123792047,-0.00024142123825,-0.00024272289334,-0.000244022351374,-0.00024531779115,-0.000246609711691,-0.000247902672541,-0.000249195101947,-0.000250487786517,-0.000251782722056,-0.000253080226701,-0.000254382527279,-0.000255684812395,-0.000256984693949,-0.000258289657086,-0.000259598125132,-0.000260903349957,-0.000262205607453,-0.000263498950265,-0.000264781892863,-0.000266046754593,-0.000267281465532,-0.000268481173949,-0.000269645630145,-0.000270767410058,-0.000271841834398,-0.000272873346002,-0.000273867916902,-0.000274830617837,-0.000275766117788,-0.000276677384334,-0.000277576017453,-0.000278473536073,-0.000279374416205,-0.000280287809947,-0.000281223987766,-0.000282187239092,-0.000283172435128,-0.000284176686548,-0.000285194665938,-0.000286229364578,-0.000287283673935,-0.000288351671899,-0.000289431557284,-0.000290518820379,-0.000291607491577,-0.000292695166017,-0.000293779125954,-0.000294861391938,-0.00029594716143,-0.000297037152229,-0.00029812605826,-0.000299211796449,-0.000300302159942,-0.000301391993854,-0.000302488256567,-0.000303592478134,-0.000304704399803,-0.000305822657884,-0.000306951106913,-0.000308085225678,-0.00030922417924,-0.000310369128131,-0.000311512660396,-0.000312656174537,-0.00031380104452,-0.000314943737905,-0.000316083481366,-0.000317222754769,-0.000318359062035,-0.000319490942914,-0.000320621506784,-0.000321752149799,-0.000322883133785,-0.000324019175746,-0.00032515460977,-0.000326290025659,-0.000327425858383,-0.000328563022714,-0.00032969896046,-0.000330834466469,-0.000331968014061,-0.000333099037262,-0.000334226942386,-0.000335353985589,-0.000336478804495,-0.000337603040913,-0.000338726212343,-0.000339846279327,-0.000340959399131,-0.000342070376595,-0.000343181033617,-0.000344294769526,-0.000345414064844,-0.000346534071254,-0.000347654270483,-0.000348771829504,-0.000349889602152,-0.00035100916717,-0.000352134817578,-0.000353267109919,-0.000354400691898,-0.000355529601412,-0.000356650342443,-0.000357762138733,-0.000358869039081,-0.000359974093482,-0.000361075858986,-0.000362170296527,-0.000363257423893,-0.000364336580014,-0.000365408514843,-0.000366476620768,-0.000367543563511,-0.000368608609986,-0.000369671525263,-0.000370729030293,-0.000371780281323,-0.000372828387616,-0.000373876265097,-0.000374921133565,-0.00037596267989,-0.000376999884569,-0.00037803158577,-0.000379061513393,-0.000380088550631,-0.00038111377831,-0.000382139085957,-0.000383162917821,-0.000384181464856,-0.000385190532207,-0.000386193389652,-0.000387190133081,-0.000388184008602,-0.000389170382226,-0.000390147478899,-0.000391116827125,-0.000392074068112,-0.000393020942092,-0.000393957981648,-0.000394891349743,-0.000395818696157,-0.000396737273456,-0.000397644879775,-0.000398544264873,-0.000399433833392,-0.000400311803126,-0.000401178016517,-0.000402034160596,-0.00040287940196,-0.000403712479634,-0.000404533191725,-0.000405344451206,-0.000406148195883,-0.000406940364803,-0.000407721886353,-0.000408497236784,-0.000409269684217,-0.00041003739365,-0.000410798703624,-0.000411551410466,-0.00041229770601,-0.000413038740622,-0.000413772474981,-0.00041449851094,-0.000415218330656,-0.000415925963904,-0.000416618131067,-0.000417292997583,-0.000417953613921,-0.000418599858075,-0.000419232605065,-0.000419847023348,-0.000420439187441,-0.00042101000169,-0.000421562550265,-0.000422094843139,-0.000422610802379,-0.000423114954495,-0.000423606537894,-0.000424082346503,-0.000424543906915,-0.000424992140593,-0.000425429684978,-0.000425861895273,-0.00042628322652,-0.000426694990567,-0.000427101088269,-0.000427495068749,-0.000427873709476,-0.000428241523937,-0.000428595433698,-0.000428933327953,-0.000429251937189,-0.0004295467868,-0.000429817517798,-0.000430067077415,-0.000430292557579,-0.000430497282816,-0.000430682384098,-0.000430845750943,-0.000430983055469,-0.000431099459889,-0.00043119860147,-0.000431281675197,-0.000431350039163,-0.000431403355755,-0.000431438595975,-0.000431453395671,-0.000431444888949,-0.00043141617046,-0.000431369734051,-0.000431305386877,-0.000431218866625,-0.000431108397839,-0.000430975788737,-0.000430823608303,-0.000430649484358,-0.000430454500194,-0.00043024032661,-0.000430005214701,-0.000429747387943,-0.000429469080512,-0.000429173979643,-0.000428866486371,-0.000428544423205,-0.000428202631326,-0.000427838994916,-0.000427455282021,-0.000427053088928,-0.000426632505193,-0.000426195850639,-0.000425736894393,-0.000425251807733,-0.000424736713196,-0.000424188955821,-0.000423612822315,-0.000423013759668,-0.000422391335299,-0.000421743079714,-0.000421067338237,-0.000420359317531,-0.000419619576313,-0.000418853977345,-0.000418058044065,-0.000417238038026,-0.000416392129495,-0.000415516087867,-0.000414608572885,-0.000413669323228,-0.000412700628808,-0.000411707007148,-0.000410690688814,-0.000409647778903,-0.000408581573396,-0.000407491255822,-0.000406375359819,-0.000405237862026,-0.000404079239219,-0.000402898667444,-0.000401695648985,-0.000400466691928,-0.000399213532406,-0.000397937628538,-0.000396641621779,-0.000395321589455,-0.000393980907668,-0.000392614554108,-0.000391221805168,-0.000389804154542,-0.000388360732483,-0.000386891629641,-0.000385396510087,-0.000383873324337,-0.00038231918448,-0.000380737466586,-0.000379123791213,-0.00037747712848,-0.000375794572373,-0.000374079069153,-0.000372330920667,-0.000370554813488,-0.000368752573555,-0.000366920729064,-0.000365059251166,-0.000363169345375,-0.000361249083056,-0.000359304846907,-0.00035734315188,-0.000355364082698,-0.000353363817593,-0.000351338730233,-0.000349283220558,-0.000347198741636,-0.00034509090851,-0.000342956166217,-0.00034079457143,-0.000338606214953,-0.000336386164217,-0.000334129743843,-0.000331838996584,-0.000329516397941,-0.000327163061847,-0.000324780964759,-0.000322367277391,-0.000319922784694,-0.000317451053014,-0.000314949716078,-0.0003124203388,-0.000309865726743,-0.000307287592309,-0.000304685324223,-0.000302057571216,-0.000299406326419,-0.000296730648708,-0.000294026895263,-0.000291292223148,-0.000288528215809,-0.000285734586404,-0.000282905762271,-0.000280042629555,-0.000277144321493,-0.000274213296832,-0.000271247036291,-0.000268170456794,-0.000264914883237,-0.000261425809645,-0.00025765574615,-0.000253200079787,-0.000249455656604,-0.000245989113656,-0.000242748340707,-0.000239668088176,-0.000236668514106,-0.000233671950766,-0.000230754262259,-0.000227984104861,-0.000225421965481,-0.000223113542512,-0.000221460941975,-0.000219070999019,-0.000216377578521,-0.00021343394826,-0.000210307714159,-0.000207075959042,-0.00020381714489,-0.000200529932791,-0.000197215067123,-0.000193871413935,-0.000190502956785,-0.000187110970502,-0.000183695343914,-0.000180251707793,-0.00017677675762,-0.000173273363126,-0.000169743171765,-0.000166183669898,-0.000162592407313,-0.000158972613614,-0.000155322504735,-0.00015163974028,-0.000147923167698,-0.000144173302034,-0.000140396344838,-0.000136592452038,-0.000132755373111,-0.000128889713791,-0.000124997761743,-0.000121082591674,-0.000117144827443,-0.00011318263641,-0.000109192451051,-0.000105177387399,-0.000101138383198,-9.70724445998e-05,-9.29807282269e-05,-8.8864045257e-05,-8.47235432007e-05,-8.05592292389e-05,-7.63655487921e-05,-7.21420531349e-05,-6.78978208252e-05,-6.36353288344e-05,-5.93483814227e-05,-5.50370113403e-05,-5.07069223543e-05,-4.63604815093e-05,-4.19938303938e-05,-3.76024071573e-05,-3.31862207117e-05,-2.87517223087e-05,-2.42936306617e-05,-1.98072114476e-05,-1.5295503913e-05,-1.07599408208e-05,-6.19704674803e-06,-1.60282390001e-06,3.02067465183e-06,7.66929645081e-06,1.23404559979e-05,1.70330126699e-05,2.17490714084e-05,2.64851579904e-05,3.12414036616e-05,3.60180129473e-05,4.08154769555e-05,4.56307945719e-05,5.04646005483e-05,5.53212451235e-05,6.01976864465e-05,6.50993318378e-05,7.00215016627e-05,7.4964711814e-05,7.99270401185e-05,8.49113014824e-05,8.99118767382e-05,9.49280326957e-05,9.99616141667e-05,0.000105009451405,0.000110069637491,0.000115142485394,0.000120226920978,0.000125323512556,0.000130432815245,0.000135554113609,0.000140685876249,0.000145831948138,0.000150988989516,0.000156152373784,0.00016132620641,0.000166509748146,0.000171701393712,0.000176897593055,0.000182101825724,0.000187306126379,0.000192516084991,0.000197726723406,0.000202938006771,0.000208152388977,0.0002133725829,0.000218594811477,0.000223819132691,0.000229049355693,0.0002342828774,0.000239519818337,0.000244759288284,0.000249998917237,0.000255240381782,0.000260483313064,0.000265720460622,0.000270951028726,0.000276174668129,0.000281392074448,0.000286601176186,0.000291804077993,0.000296999104025,0.000302192142671,0.000307380033557,0.00031256712726,0.000317755838697,0.000322950039772,0.000328147020568,0.000333345967542,0.0003385447731,0.000343742337031,0.000348938103761,0.000354128549859,0.000359312084882,0.000364486512518,0.000369646250225,0.000374787276812,0.000379912117298,0.000385021406757,0.000390112430404,0.000395184599156,0.000400239947934,0.000405277923983,0.000410300883766,0.000415304230417,0.000420291692643,0.000425262022758,0.000430216195325,0.000435147792142,0.00044005884621,0.000444952836655,0.000449829288057,0.000454686720615,0.000459524304318,0.000464344695944,0.000469147478399,0.000473932749898,0.000478698669907,0.000483444326823,0.000488174329043,0.000492885229923,0.000497573346606,0.00050223585872,0.000506869621234,0.000511474978812,0.000516050738897,0.000520598132682,0.000525116043378,0.000529603383753,0.000534061364188,0.000538484322106,0.000542872659101,0.000547230820256,0.000551560889408,0.00055586236926,0.000560131643465,0.000564364489529,0.000568563185709,0.000572728636128,0.00057685964485,0.000580958778632,0.000585025648846,0.000589057374771,0.000593050205514,0.000597001540636,0.000600908740363,0.000604777185888,0.000608606895778,0.000612394643855,0.000616139199414,0.000619842997809,0.000623502305414,0.000627118958412,0.000630696082639,0.000634230435158,0.000637727907349,0.00064118867874,0.000644608338619,0.000647989302872,0.000651329068882,0.000654626103327,0.000657882144582,0.000661097790761,0.000664270079846,0.000667401895726,0.000670493697217,0.000673537536258,0.00067653585297,0.000679491879968,0.000682401690293,0.00068526279558,0.000688075236397,0.000690835806238,0.000693542875253,0.000696196769968,0.000698797094597,0.000701346812266,0.000703850614501,0.000706303169244,0.000708704847032,0.000711059990653,0.00071337256059,0.000715640272436,0.000717864759638,0.000720046295549,0.000722184068959,0.000724277459995,0.000726320447882,0.000728313399426,0.000730258574655,0.000732150021161,0.000733985928811,0.000735766465681,0.00073749401522,0.000739165929605,0.000740780350067,0.000742339286942,0.000743838155895,0.000745283164685,0.000746672733829,0.000748010347309,0.000749297648399,0.000750533409468,0.00075171719355,0.000752849605558,0.000753931453338,0.000754960838319,0.000755939181225,0.00075686493639,0.000757737878462,0.000758560903942,0.000759327761092,0.000760038741309,0.000760694917847,0.000761296399318,0.000761845463783,0.000762342726747,0.000762793482123,0.000763194844492,0.000763548130502,0.00076384793937,0.000764094518092,0.000764294013693,0.000764445944025,0.000764549418068,0.000764602254393,0.000764599392927,0.000764543099025,0.000764432871755,0.000764269096035,0.000764052109711,0.000763786076689,0.000763467531724,0.000763093730121,0.000762666181798,0.00076218441391,0.000761652402592,0.000761067566834,0.000760428929018,0.000759736563309,0.000758992313543,0.000758196520865,0.000757346521463,0.000756443395048,0.000755487962291,0.000754479750614,0.000753421412687,0.000752310256355,0.000751147977084,0.000749928328241,0.000748651570997,0.000747318198367,0.000745928260612,0.000744481528265,0.000742972819504,0.000741402171653,0.000739768744384,0.000738072328476,0.000736314951492,0.000734503896262,0.000732641203513,0.000730720638137,0.000728741080112,0.000726708308339,0.000724625136038,0.000722494049669,0.00072031443603,0.000718085609411,0.000715805165886,0.000713470519704,0.00071107790089,0.000708633989669,0.000706143827263,0.000703604000895,0.000701011160376,0.000698364209218,0.00069566200891,0.000692906475431,0.00069009911583,0.00068724353392,0.000684345267896,0.000681403381762,0.000678415488222,0.000675379955527,0.000672302119562,0.000669184845372,0.000666036064713,0.000662859507951,0.000659655830015,0.000656423980104,0.000653157291332,0.000649854538823,0.000646519289656,0.000643154867749,0.000639760362005,0.00063633210409,0.000632862414022,0.000629345330603,0.000625780901924,0.000622171306211,0.00061852135104,0.000614832154486,0.000611100544177,0.000607320113881,0.000603493534652,0.000599623579019,0.000595716230289,0.00059177789611,0.000587809586532,0.000583809030226,0.000579773003284,0.00057570022706,0.000571595790952,0.000567464944452,0.000563307468483,0.000559120069315,0.000554900971351,0.000550646338305,0.000546352671897,0.000542021587281,0.000537658148008,0.000533262849254,0.000528833182736,0.000524370096366,0.00051987183507,0.000515339461743,0.000510772327101,0.000506173248767,0.000501547160437,0.000496892907427,0.000492208466652,0.000487492739152,0.000482749815037,0.000477978266948,0.000473179236382,0.000468356227477,0.000463512022046,0.000458644295454,0.000453751867629,0.00044883266855,0.000443889706747,0.000438925994153,0.000433940107215,0.000428929843652,0.000423898429633,0.000418842874856,0.000413762696556,0.000408661238121,0.000403539938061,0.000398401923745,0.000393249742818,0.00038808118872,0.000382894789145,0.000377694058673,0.000372479573634,0.000367253366964,0.000362015094333,0.000356764072764,0.000351498998037,0.000346222191822,0.000340931677565,0.000335627161215,0.000330312156378,0.000324986631423,0.000319650494602,0.000314304294119,0.000308948640395,0.000303585805784,0.0002982161616,0.000292840418979,0.000287460432473,0.0002820778143,0.000276694014657,0.000271310422427,0.000265926235043,0.000260542263264,0.000255161953127,0.000249785253056,0.000244411459202,0.000239042896002,0.000233677505653,0.000228314940889,0.00022295624666,0.000217599739103,0.000212246601729,0.000206899502059,0.000201555074437,0.000196210534477,0.000190869905381,0.000185533110322,0.000180195909188,0.000174863504305,0.000169533908313,0.000164209156918,0.000158891036583,0.000153578076716,0.000148267854808,0.00014296502894,0.000137667917884,0.000132375122412,0.000127089663303,0.000121814403465,0.000116546844415,0.000111287729041,0.000106033867564,0.000100785575765,9.55490667416e-05,9.03266674475e-05,8.51200185455e-05,7.99324511185e-05,7.47657558806e-05,6.9614620111e-05,6.44811934891e-05,5.9364588104e-05,5.42652759979e-05,4.91852323434e-05,4.41234605383e-05,3.90783787257e-05,3.40493858846e-05,2.90300879091e-05,2.40191454352e-05,1.90168165497e-05,1.40254302347e-05,9.0460340743e-06,4.08325734601e-06,-8.61950467147e-07,-5.79028616474e-06,-1.07058351088e-05,-1.56109997278e-05,-2.05023809973e-05,-2.53769202996e-05,-3.02286480906e-05,-3.50584553971e-05,-3.98625349407e-05,-4.46405833031e-05,-4.93939680766e-05,-5.41229825042e-05,-5.88243949061e-05,-6.34917276402e-05,-6.81245250003e-05,-7.27238751964e-05,-7.72911980714e-05,-8.18292579315e-05,-8.63425185349e-05,-9.08339990668e-05,-9.53035500641e-05,-9.97504402842e-05,-0.000104174096101,-0.000108577716605,-0.000112962367602,-0.000117325346253,-0.000121667380677,-0.000125984711173,-0.000130277458954,-0.000134539341504,-0.000138770335646,-0.000142977444622,-0.000147161151747,-0.000151320632283,-0.000155454273218,-0.00015956070717,-0.00016364364681,-0.000167702284935,-0.000171737210346,-0.000175749725308,-0.000179744538624,-0.000183713853608,-0.000187653394267,-0.000191560754911,-0.000195435026624,-0.000199277509703,-0.000203089549195,-0.000206870293219,-0.000210620525358,-0.00021433968725,-0.000218025479896,-0.000221676463679,-0.00022529566938,-0.000228883181616,-0.000232442829778,-0.000235976574446,-0.000239477704998,-0.000242948131371,-0.000246387192197,-0.000249795907687,-0.000253173207347,-0.000256519054609,-0.000259834187441,-0.000263120123722,-0.000266376678401,-0.00026960066948,-0.000272795729104,-0.000275963426641,-0.00027910135037,-0.000282209129478,-0.00028528836086,-0.000288341375763,-0.000291369613826,-0.000294368472265,-0.000297335704678,-0.000300273763892,-0.00030318123674,-0.000306050487623,-0.000308883159757,-0.000311682741602,-0.000314444762022,-0.000317165449534,-0.000319841756093,-0.00032247671381,-0.000325074006901,-0.000327634378428,-0.000330151321111,-0.000332635350512,-0.0003350878027,-0.000337504688818,-0.000339886117408,-0.000342238240079,-0.000344560037822,-0.000346856490395,-0.000349125383656,-0.000351365177557,-0.000353584517665,-0.000355783546025,-0.000357957511861,-0.000360107493375,-0.000362237187263,-0.000364342618428,-0.000366424305435,-0.000368478750245,-0.000370502811406,-0.000372496390246,-0.000374457149641,-0.000376376517212,-0.00037825762189,-0.000380102068584,-0.000381909247364,-0.000383679387495,-0.000385411924803,-0.000387107783143,-0.000388771133075,-0.000390399279792,-0.000391994573539,-0.00039355815339,-0.000395093619438,-0.000396597851872,-0.000398066051789,-0.000399498641813,-0.000400897631867,-0.000402264370796,-0.000403592111878,-0.000404885001458,-0.000406147529619,-0.000407379322548,-0.000408583206509,-0.0004097578795,-0.000410811976749,-0.000411651921046,-0.000412278815106,-0.000412692976692,-0.0004128970623)
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(265)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Mus_musculus_domesticus-male-liver-H3K27Ac-ERR572185.50mers.unique.MACS2_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 265',bty='n')
dev.off()