# R script for Peak Model
#  -- generated by MACS
p <- c(0.0253533220299,0.0292815320281,0.0336680331927,0.0374325677743,0.0416553935223,0.0423264627304,0.0421955223971,0.0424083004387,0.0419991118972,0.0421791548554,0.0416553935223,0.0417535987723,0.0413607777725,0.0416062908974,0.0421464197721,0.0413607777725,0.0418354364806,0.0416553935223,0.0417863338556,0.0416881286057,0.0415408207307,0.0417535987723,0.0419172741889,0.0419827443555,0.0414753505641,0.0418518040223,0.0413771453141,0.0415080856474,0.0413280426892,0.0415571882724,0.0422609925637,0.0418681715639,0.0418845391056,0.0422773601054,0.0422937276471,0.0420318469805,0.0421300522305,0.042342830272,0.0425065056886,0.0428502240635,0.0427847538968,0.0436031309798,0.0433739853966,0.0432430450633,0.0432266775216,0.0437177037714,0.0437995414797,0.0439959519796,0.0446179185626,0.0441759949378,0.0439141142713,0.0435049257298,0.0444378756044,0.0447488588959,0.0448797992292,0.0447815939792,0.0444542431461,0.0440123195213,0.0437995414797,0.0440123195213,0.0440123195213,0.0440450546046,0.0436686011464,0.0435376608131,0.0436686011464,0.0433739853966,0.0440123195213,0.0439632168963,0.0438486441047,0.043832276563,0.043783173938,0.0442742001878,0.0444542431461,0.0441105247712,0.0443233028128,0.0444378756044,0.0441923624795,0.0446179185626,0.0452398851457,0.0447979615209,0.0450434746458,0.0445360808543,0.0440286870629,0.0440614221462,0.0437340713131,0.0435540283548,0.0435703958965,0.0432921476883,0.0432266775216,0.0434230880215,0.0434558231048,0.0440941572296,0.044601551021,0.0448961667708,0.0445197133127,0.0446670211876,0.0442578326461,0.0447324913543,0.0444869782294,0.0445360808543,0.044650653646,0.0448470641459,0.0445688159377,0.0448470641459,0.0451416798957,0.0455181333539,0.0460255271453,0.0462219376452,0.0455672359789,0.0455672359789,0.0457472789371,0.045370825479,0.0454199281039,0.0451907825207,0.0453053553123,0.0451416798957,0.0450598421874,0.0448961667708,0.0456818087705,0.0463365104368,0.0460091596037,0.045894586812,0.0457636464788,0.045894586812,0.0461564674786,0.0459600569787,0.0464019806035,0.0463528779785,0.0458291166454,0.0455999710622,0.0460255271453,0.0461564674786,0.0466474937284,0.0469421094782,0.0469421094782,0.0476459137696,0.047433135728,0.047531340978,0.0483006154359,0.0476131786863,0.047384033103,0.0468275366866,0.0468275366866,0.0463037753535,0.0465492884784,0.0466474937284,0.0468439042283,0.04666386127,0.0458618517287,0.0469257419366,0.0471712550615,0.0479241619778,0.0479241619778,0.0479077944361,0.0472858278531,0.0465492884784,0.0467784340616,0.0471057848948,0.0479405295194,0.0478586918111,0.0478259567278,0.0475968111446,0.0475149734363,0.0485461285608,0.0494299758104,0.0501665151851,0.0497736941853,0.0493645056438,0.0491189925189,0.0488080092274,0.0492171977688,0.0491189925189,0.0491844626855,0.0489062144773,0.0484970259358,0.0482351452693,0.0486934364358,0.0490371548106,0.0496754889353,0.0500519423935,0.049495445977,0.0498391643519,0.0503465581433,0.05021561781,0.0503956607683,0.0508048493098,0.0504447633933,0.050984892268,0.0508375843931,0.0512958755595,0.0519342096842,0.051705064101,0.0515904913094,0.0516886965594,0.0513940808095,0.0511813027679,0.0517377991843,0.0517377991843,0.0522942956007,0.0516723290177,0.0513777132678,0.052376133309,0.0527525867672,0.0531617753087,0.0539801523916,0.0541438278082,0.0543729733915,0.0548967347245,0.0543893409331,0.0551586153911,0.055305923266,0.0547166917663,0.0541929304332,0.0542256655165,0.0544220760164,0.0545693838914,0.0544548110997,0.0540783576416,0.0548967347245,0.0549131022662,0.0555678039326,0.0559278898491,0.0564680187238,0.0565825915154,0.056697164307,0.0567626344737,0.0568935748069,0.0571227203902,0.0566316941404,0.0566644292237,0.056795369557,0.0570081475986,0.05741733614,0.0577774220565,0.0576792168066,0.0578428922232,0.0584812263479,0.0590704578476,0.0593814411391,0.0594141762224,0.0597906296806,0.0601670831388,0.0600852454305,0.0596433218057,0.0597742621389,0.0603143910137,0.0598888349306,0.0591359280142,0.0594469113058,0.0600197752638,0.0600525103472,0.060396228722,0.0608545198884,0.0613946487632,0.0616237943464,0.0615419566381,0.0621639232212,0.0624258038877,0.0623930688044,0.0624258038877,0.0621311881379,0.0623767012627,0.0628840950542,0.0637679423038,0.0642426010119,0.0647827298866,0.064668157095,0.0652573885947,0.065388328928,0.0656665771362,0.0658302525528,0.0656993122195,0.0656665771362,0.0653064912197,0.0655192692613,0.065388328928,0.0662885437193,0.0676306821353,0.0676143145936,0.0679580329685,0.0688418802181,0.069038290718,0.0687600425098,0.0692838038429,0.0696111546761,0.0701349160091,0.069758462551,0.0692019661346,0.0694147441761,0.0695784195927,0.069709359926,0.0700203432175,0.0706750448839,0.0710842334254,0.0712642763836,0.0716079947585,0.0723772692164,0.0723936367581,0.0735884672992,0.0739976558407,0.0746032548821,0.0749960758819,0.07547073459,0.0759944959231,0.0767801379227,0.077729455339,0.0785805675052,0.0800209111712,0.0802991593794,0.0808883908792,0.0806919803792,0.0808392882542,0.0812157417123,0.0810520662957,0.0818213407537,0.0815103574622,0.0821650591286,0.082001383712,0.0822305292952,0.0820995889619,0.0828033932533,0.0840800615027,0.0848002333357,0.0853894648354,0.0848657035023,0.0854221999187,0.084783865794,0.0849311736689,0.0852257894188,0.0866825006265,0.086944381293,0.0871898944179,0.0873699373761,0.0882210495424,0.0885975030006,0.0886302380839,0.0888593836671,0.0897268633751,0.0905616079997,0.0907416509579,0.091216309666,0.091216309666,0.0919201139574,0.0920510542906,0.0935732356649,0.0956682809973,0.096355717747,0.0969613167884,0.0976651210797,0.097845164038,0.0985489683293,0.0993673454123,0.10003841462,0.100987732037,0.100398500537,0.0994982857455,0.100251192662,0.100480338245,0.100414868078,0.100463970703,0.101429655661,0.101789741578,0.101871579286,0.102002519619,0.102869999327,0.104130300035,0.104637693826,0.105472438451,0.106667268992,0.107551116242,0.107714791658,0.108827784491,0.109875307157,0.110120820282,0.11079188949,0.111348385907,0.111823044615,0.112346805948,0.11236317349,0.113001507614,0.113459798781,0.11404903028,0.114605526697,0.115882194946,0.116569631696,0.117158863196,0.118435531445,0.118648309487,0.11966309707,0.119384848861,0.120006815444,0.120890662694,0.121299851235,0.12183998011,0.122281903735,0.122658357193,0.123149383443,0.124458786776,0.125359001567,0.127977808232,0.129156271232,0.130236528981,0.131365889356,0.131595034939,0.132855335647,0.133608242563,0.133853755688,0.134884910812,0.135719655437,0.136472562353,0.137340042061,0.137487349936,0.137454614853,0.138764018186,0.139713335602,0.140891798601,0.142037526517,0.142037526517,0.141922953726,0.142381244892,0.1440343666,0.145000051558,0.14640766014,0.147700695932,0.148764586139,0.149828476347,0.150303135055,0.150794161305,0.152430915471,0.153003779429,0.15380578897,0.154640533595,0.156015407094,0.157144767469,0.157930409468,0.158666948843,0.160958404675,0.163004347383,0.164690204174,0.165426743548,0.16583593209,0.166539736381,0.167816404631,0.167947344964,0.168618414172,0.170026022754,0.170549784088,0.170844399837,0.171155383129,0.173054017961,0.173479574045,0.174003335378,0.174592566877,0.175574619377,0.177064065668,0.177997015542,0.178929965417,0.180861335333,0.182252576374,0.182530824582,0.184151211206,0.186900958205,0.188161258913,0.189863483245,0.190665492787,0.191598442661,0.192547760077,0.193218829285,0.194708275576,0.1967214832,0.197736270783,0.197654433075,0.198914733783,0.200633325657,0.201729950948,0.203464910364,0.205429015363,0.206165554738,0.206591110821,0.206771153779,0.20747495807,0.20865342107,0.209111712236,0.209193549945,0.210241072611,0.209864619153,0.209635473569,0.211386800527,0.212516160901,0.214382060651,0.215593258733,0.217459158482,0.219521468732,0.221796557022,0.222925917397,0.224955492562,0.226526776562,0.226755922145,0.228130795644,0.228310838602,0.22996396031,0.230667764601,0.232288151226,0.231862595142,0.232893750267,0.233974008016,0.233597554558,0.23628183139,0.236821960265,0.238295039014,0.23824593639,0.239195253806,0.238786065264,0.238606022306,0.239326194139,0.240095468597,0.241879530638,0.241077521097,0.241535812263,0.241617649971,0.242534232304,0.243319874304,0.244285559262,0.246151459011,0.245120303886,0.244580175012,0.244989363553,0.244007311054,0.243794533012,0.243925473345,0.244220089095,0.243549019887,0.242354189346,0.241650385055,0.242059573596,0.241470342096,0.240750170263,0.240832007972,0.239751750222,0.238098628515,0.237705807515,0.23618362614,0.235578027099,0.234448666725,0.234268623766,0.23253366435,0.230913277726,0.229751182268,0.228752762227,0.227901650061,0.224660876812,0.222713139355,0.219636041523,0.217328218149,0.214889454442,0.214316590484,0.213301802901,0.211272227735,0.209913721778,0.208604318445,0.208915301736,0.208817096486,0.209291755195,0.208980771903,0.208718891237,0.207262180029,0.205903674071,0.205019826822,0.204528800572,0.204250552364,0.202597430656,0.201860891281,0.201369865032,0.201631745698,0.201631745698,0.203006619198,0.20411961203,0.206787521321,0.208735258778,0.21151774086,0.214382060651,0.216951764691,0.21989792219,0.222140275397,0.224300790896,0.225577459145,0.226788657228,0.225462886354,0.223973440063,0.21989792219,0.216133387608,0.211861459235,0.206001879321,0.201566275532,0.196246824492,0.190354509495,0.185362409289,0.181434199291,0.177407784043,0.172955812711,0.16938768863,0.165803197006,0.163560843799,0.159894514468,0.156882886802,0.154722371303,0.151252452472,0.148666380889,0.145818428641,0.145425607641,0.143657913142,0.141906586184,0.140106156602,0.138485769977,0.136898118437,0.134999483604,0.134377517021,0.132036958564,0.130596614898,0.129287211565,0.127699560024,0.127257636399,0.126030070775,0.125604514692,0.12499891565,0.124589727109,0.123280323776,0.123133015901,0.12193818536,0.120186858403,0.11877924982,0.116749674654,0.115669416905,0.113476166322,0.111986720031,0.111692104282,0.110857359657,0.110284495699,0.109662529116,0.109171502866,0.109007827449,0.108402228408,0.107305603117,0.10704372245,0.106061669951,0.104195770202,0.103442863285,0.102067989786,0.100954996953,0.100185722495,0.0996455936205,0.0981561473295,0.0971904623716,0.0959628967472,0.0952263573725,0.0946534934144,0.09342592779,0.0924929779154,0.0919201139574,0.0910853693328,0.0900869492916,0.0906598132496,0.0902833597915,0.0898905387916,0.0895795555001,0.089203102042,0.0888757512088,0.0891212643337,0.0886466056256,0.0882537846257,0.0876481855844,0.0866333980015,0.0863387822516,0.0863387822516,0.0860277989601,0.0857168156686,0.0852421569605,0.0845219851275,0.0844892500442,0.0834908300029,0.0834744624613,0.0827051880033,0.0826069827534,0.0819195460037,0.0813303145039,0.0805774075876,0.079742662963,0.079071593755,0.0786133025885,0.0785641999636,0.0777949255056,0.0777785579639,0.0769765484226,0.0763873169229,0.076190906423,0.0760599660897,0.0760108634647,0.0759781283814,0.0756671450899,0.0751597512985,0.0750779135902,0.0750288109652,0.0744886820905,0.0742922715905,0.0737848777991,0.0732283813827,0.073212013841,0.072590047258,0.072540944633,0.0725736797163,0.0716570973834,0.0710678658837,0.0709696606338,0.0709696606338,0.0710023957171,0.0708059852172,0.0705768396339,0.070380429134,0.0703640615924,0.0698730353426,0.0701840186341,0.0704622668423,0.0698566678009,0.0691692310513,0.0685636320099,0.0682035460934,0.0682853838017,0.0681217083851,0.0667468348857,0.0664031165109,0.0663703814276,0.0661412358443,0.066206706011,0.0665667919275,0.0662558086359,0.0657811499278,0.0649955079282,0.0650773456365,0.065437431553,0.0652082859698,0.0649627728449,0.0643735413451,0.0639152501787,0.0627695222626,0.0625240091377,0.0627858898042,0.0630150353874,0.0628349924292,0.0628513599709,0.0630150353874,0.0631296081791,0.0633587537623,0.0634405914706,0.0641607633036,0.0640134554286,0.0639152501787,0.0632441809707,0.0627858898042,0.0626876845543,0.0628186248875,0.0621639232212,0.0615092215548,0.0618693074713,0.0610018277634,0.061018195305,0.060298023472,0.0604780664303,0.0595287490141,0.059626954264,0.0592505008059,0.0590540903059,0.0592505008059,0.0583175509313,0.0588085771811,0.0583993886396,0.0587758420977,0.0584484912646,0.0591359280142,0.0587431070144,0.0587103719311,0.0587103719311,0.0586940043894,0.0589886201393,0.0584484912646,0.0586121666812,0.0581702430564,0.0580393027231,0.0581538755147,0.0585630640562,0.0582684483063,0.0583339184729,0.058137507973,0.0585466965145,0.0592832358892,0.0587594745561,0.0586940043894,0.0590704578476,0.0592996034308,0.0586940043894,0.0587431070144,0.0587431070144,0.0587267394728,0.0578919948482,0.0574009685984,0.0574009685984,0.0578101571399,0.0570572502235,0.056075197724,0.0565007538071,0.0566316941404,0.0563698134739,0.0561897705156,0.056697164307,0.0562388731406,0.0565989590571,0.0563370783905,0.0561897705156,0.0563861810155,0.0560588301823,0.0552731881827,0.0551749829327,0.0550440425995,0.0543402383081,0.0542092979749,0.0537673743501,0.053145407767,0.0535873313918,0.0539474173083,0.053096305142,0.0534891261419,0.0532108779337,0.0526871166006,0.0528016893922,0.0530308349754,0.0529980998921,0.053096305142,0.052474338559,0.0521797228091,0.0520651500175,0.0521469877258,0.0521633552675,0.0529489972671,0.052376133309,0.0516723290177,0.0520651500175,0.0514595509761,0.0518196368926,0.0519342096842,0.0523106631424,0.0519833123092,0.0517705342677,0.0516723290177,0.0522615605174,0.051852371976,0.0506411738932,0.0513122431012,0.0512140378512,0.0507557466848,0.0502810879767,0.0499864722268,0.0497245915603,0.0490698898939,0.0488080092274,0.0495281810604,0.0503465581433,0.0507230116015,0.0502810879767,0.0502810879767,0.0499701046852,0.0498555318935,0.0502483528934,0.0498227968102,0.0494463433521,0.0490535223523,0.0485461285608,0.0470566822698,0.0470730498115,0.0469421094782,0.0472858278531,0.0473021953947,0.0467456989783,0.0467456989783,0.0467784340616,0.0469584770199,0.0468275366866,0.0475968111446,0.0475477085196,0.0472203576864,0.0470730498115,0.0468766393116,0.0472530927698,0.0476950163945,0.047482238353,0.0473512980197,0.0473021953947,0.0468766393116,0.0470239471865,0.0466311261867,0.0466474937284,0.0468439042283,0.0465656560201,0.0459109543537,0.0462546727285,0.0457309113955,0.0456654412288,0.045272620229,0.0452889877707,0.0454853982706,0.0455508684372,0.0452562526873,0.0454853982706,0.0455345008956,0.045223517604,0.0458127491038,0.045943689437,0.0464674507701,0.0457145438538,0.0458618517287,0.0455508684372,0.0455508684372,0.0449289018542,0.0448470641459,0.0446179185626,0.0447979615209,0.0442414651045,0.0440777896879,0.044650653646,0.0442578326461,0.0444869782294,0.0446342861043,0.0453544579373,0.0456163386038,0.0456163386038,0.0449125343125,0.0457800140204,0.045992792062,0.0460091596037,0.0461892025619,0.0460746297703,0.0456981763121,0.0454035605623,0.0449780044791,0.0455999710622,0.0457800140204,0.0450762097291,0.0450762097291,0.0449452693958,0.0451744149791,0.0450762097291,0.0452562526873,0.0451744149791,0.0453871930206,0.0450762097291,0.0450762097291,0.0449616369375,0.0448143290626,0.0443396703544,0.0440777896879,0.0435540283548,0.0436031309798,0.0434885581882,0.0436686011464,0.043161207355,0.0431448398133,0.0436031309798,0.043161207355,0.0434067204799,0.0437177037714,0.0441432598545,0.043832276563,0.043832276563,0.0431284722717,0.0433739853966,0.0438486441047,0.0439141142713,0.0439795844379,0.0440941572296,0.0439959519796,0.0444869782294,0.0450107395625,0.0445197133127,0.0447979615209,0.0444542431461,0.0443724054378,0.0436194985214,0.0434558231048,0.0436849686881,0.0433085152299,0.0429811643967,0.0420645820638,0.0425065056886,0.0431775748966,0.0434230880215,0.0425883433969,0.0432430450633,0.0434558231048,0.0433412503132,0.0436194985214,0.0436194985214,0.0442087300212,0.0441432598545,0.0438650116463,0.0438650116463,0.0442087300212,0.0440450546046,0.0438159090213,0.0433576178549,0.0433248827716,0.0427192837302,0.0422446250221,0.0420645820638,0.0417863338556,0.0420973171471,0.0422609925637,0.0420645820638,0.0420973171471,0.0422446250221,0.0420318469805,0.0423755653553,0.0429484293134,0.0433248827716,0.0435376608131,0.0432921476883,0.0425228732303,0.0429156942301,0.0428829591468,0.0426865486469,0.0427520188135,0.0428174889801,0.0424737706053,0.0424737706053,0.0422118899388,0.0418845391056,0.0426047109386,0.0425719758553,0.0425065056886,0.0424246679803,0.0425065056886,0.0422446250221,0.0418518040223,0.0413935128558,0.0412789400642,0.0418190689389,0.0411479997309,0.0408206488977,0.0408861190644,0.0406733410228,0.040182314773,0.0404605629812,0.0409352216893,0.0408861190644,0.0403623577313,0.0399368016481,0.0405915033145,0.0403950928146,0.0401004770647,0.0404114603563,0.0408533839811,0.0411479997309,0.0409679567727,0.0409843243143,0.0415408207307,0.0415244531891,0.0414753505641,0.0415735558141,0.0416881286057,0.0411643672726,0.0412134698976,0.0404769305229,0.0406078708562,0.0408861190644,0.0409188541477,0.0406733410228,0.0404769305229,0.040329622648,0.0403459901896,0.0409679567727,0.0404114603563,0.0403132551063,0.0401659472314,0.0399531691898,0.0396912885233,0.0400841095231,0.0399531691898,0.040280520023,0.0401659472314,0.0398385963982,0.0397076560649,0.0399695367315,0.0400513744398,0.0398713314815,0.0401004770647,0.0400350068981,0.0397403911482,0.0392329973568,0.0393475701484,0.0390856894819,0.0392329973568,0.0386601333987,0.0382836799406,0.0385782956904,0.0383164150239,0.0382182097739,0.0387583386487,0.0389874842319,0.0389874842319,0.0392657324401,0.0393803052317,0.0400513744398,0.0401332121481,0.0397731262316,0.0396585534399,0.0401168446064,0.0398549639399,0.0396912885233,0.0398549639399,0.0399368016481,0.03956034819,0.0392820999818,0.0393312026068,0.0393966727734,0.0399368016481,0.0393312026068,0.0393312026068,0.0398385963982,0.0395439806483,0.0395439806483,0.0400841095231,0.040231417398,0.0406406059395,0.0401495796897,0.0399204341065,0.0396585534399,0.0398713314815,0.039609450815,0.0398713314815,0.0397894937732,0.03956034819,0.0392657324401,0.0388238088153,0.0396912885233,0.0395930832733,0.0396258183566,0.0392984675234,0.0391184245652,0.0393966727734,0.0391184245652,0.0392002622735,0.0398713314815,0.0401986823147,0.0397731262316,0.0400350068981,0.0402641524813,0.040329622648,0.0403459901896,0.0400022718148,0.0402477849397,0.0401986823147,0.0394130403151,0.0392166298151,0.0392984675234,0.0386110307738,0.038169107149,0.0378744913991,0.0382509448573,0.0382345773156,0.0377599186075,0.0377762861491,0.0382018422323,0.0383818851905,0.0382018422323,0.0386601333987,0.0390202193152,0.0394785104817,0.0392493648985,0.0390365868569,0.0393639376901,0.0396421858983,0.0392329973568,0.0390038517736,0.0389711166903,0.0384309878155,0.0384964579821,0.0381527396073,0.0379399615657,0.0379235940241,0.038021799274,0.0374162002326,0.0377435510658,0.0376126107326,0.0375635081076,0.0380054317324,0.0379890641907,0.0384637228988,0.0385455606071,0.0390856894819,0.0391675271902,0.0397894937732,0.0392984675234,0.039511245565,0.0397567586899,0.0396749209816,0.0397567586899,0.03946214294,0.0393803052317,0.0390202193152,0.0351083768587,0.0309019186523,0.027366529654,0.0233564819475,0.0)
m <- c(0.0220187114846,0.0254402064291,0.0289435553196,0.0329052863079,0.0367196801934,0.0369979836099,0.0367033094042,0.0371289499236,0.0370798375559,0.0372762870264,0.0377510399135,0.038422242271,0.038896995158,0.0382912759573,0.0384549838494,0.0385368377954,0.038504096217,0.0381275680652,0.038422242271,0.0382257928005,0.0379638601732,0.0375873320214,0.0374563657077,0.0375709612322,0.0373090286048,0.0375218488645,0.0371944330804,0.037243545448,0.0367524217718,0.0365396015121,0.0366214554581,0.0365723430905,0.0361958149387,0.0366050846689,0.0363922644092,0.0361139609927,0.0364086351984,0.0364741183552,0.0363431520416,0.0364741183552,0.0363922644092,0.0363267812524,0.0365068599337,0.0365232307229,0.0367196801934,0.0365723430905,0.0368997588746,0.0366214554581,0.0370143543991,0.0369325004531,0.0374399949185,0.0381275680652,0.0378165230703,0.0377510399135,0.0378820062271,0.0380129725408,0.0378165230703,0.0383240175357,0.0383731299034,0.0386514333199,0.0385532085846,0.0377837814919,0.0382257928005,0.0383403883249,0.0381275680652,0.0381930512221,0.0388806243688,0.038896995158,0.039600939094,0.0398956132997,0.0394536019911,0.0399119840889,0.0400265796134,0.0398628717213,0.0400265796134,0.0404194785543,0.0399938380349,0.0398137593537,0.0391425569961,0.0388642535796,0.0394044896235,0.0390607030501,0.0389952198933,0.0394372312019,0.0392735233098,0.0393226356774,0.0392407817314,0.0397155346184,0.0400102088242,0.0401739167162,0.0397973885644,0.0398956132997,0.0402393998731,0.0400429504026,0.040157545927,0.0399119840889,0.0400265796134,0.0399938380349,0.0400265796134,0.0395845683047,0.0394536019911,0.0396500514616,0.039371748045,0.0393226356774,0.0393881188342,0.0393226356774,0.0391261862069,0.0387660288443,0.0385532085846,0.0387823996336,0.0393226356774,0.0395845683047,0.0395354559371,0.0396664222508,0.0400920627702,0.0399774672457,0.0397319054076,0.0401248043486,0.0397810177752,0.0399119840889,0.039764646986,0.039208040153,0.0391916693638,0.038815141212,0.0386350625307,0.0391098154177,0.039208040153,0.039371748045,0.0399283548781,0.0398956132997,0.03968279304,0.0402066582946,0.0405668156572,0.0407305235493,0.0408123774953,0.0408451190738,0.0415326922205,0.0412216472255,0.0413526135392,0.0415163214313,0.0420565574751,0.0421547822104,0.0420565574751,0.0424167148377,0.0418273664262,0.0414508382744,0.0409597145982,0.0410579393335,0.0409597145982,0.0408451190738,0.0406977819709,0.0405013325004,0.0406322988141,0.0405177032896,0.0410088269658,0.0412380180147,0.041254388804,0.0408123774953,0.040550444868,0.0403703661867,0.0400429504026,0.0397482761968,0.0393881188342,0.0394863435695,0.039600939094,0.0394863435695,0.03968279304,0.0402066582946,0.0402066582946,0.0407632651277,0.040943343809,0.0417782540586,0.0420238158967,0.0416964001126,0.0419255911615,0.0418764787939,0.0414017259068,0.0411234224903,0.0415163214313,0.0410906809119,0.0411397932795,0.0404522201328,0.040075691981,0.0405177032896,0.0401739167162,0.0403539953975,0.0409924561766,0.0411397932795,0.041025197755,0.0409924561766,0.0407305235493,0.0408778606522,0.0406814111817,0.0402230290839,0.040157545927,0.0403539953975,0.0399774672457,0.0402557706623,0.0407141527601,0.040861489863,0.0414017259068,0.041729141691,0.042514939573,0.0428750969355,0.0432352542981,0.042907838514,0.0433171082441,0.0431042879844,0.0425476811514,0.0426459058866,0.0423021193133,0.0421384114212,0.0415654337989,0.0409760853874,0.0407632651277,0.0407796359169,0.040550444868,0.0404849617112,0.040550444868,0.0405340740788,0.0403703661867,0.0405177032896,0.0409924561766,0.0415818045881,0.0415490630097,0.0415490630097,0.0419583327399,0.041729141691,0.0419910743183,0.0420565574751,0.0420238158967,0.0420729282643,0.0422857485241,0.0419419619507,0.0424003440485,0.042907838514,0.0431042879844,0.0436936363959,0.0443812095427,0.0443157263858,0.0444958050671,0.04464314217,0.0445449174347,0.0451833782139,0.0451506366354,0.0448068500621,0.0443157263858,0.0439555690233,0.0431534003521,0.0434480745578,0.0435790408715,0.0432843666657,0.0437263779743,0.0432679958765,0.0431861419305,0.0432352542981,0.0435626700823,0.0434317037686,0.0433007374549,0.0433007374549,0.043382591401,0.0434317037686,0.0432679958765,0.0434153329794,0.0431697711413,0.0435135577146,0.0434808161362,0.043464445347,0.0435299285039,0.0435626700823,0.0436117824499,0.0436117824499,0.0436445240283,0.0439719398125,0.044332097175,0.0441192769153,0.0442993555966,0.0445121758563,0.0449214455865,0.0449050747973,0.0452488613707,0.0453634568951,0.0450851534786,0.0447741084837,0.0447741084837,0.0449541871649,0.0447086253268,0.0446104005916,0.0443648387535,0.0444303219103,0.0438737150772,0.0440046813909,0.044332097175,0.0444958050671,0.0444794342779,0.0441356477045,0.0441520184938,0.0440865353369,0.0444466926995,0.0441356477045,0.0445285466455,0.0446595129592,0.0446922545376,0.0445285466455,0.0444303219103,0.0450524119002,0.0450851534786,0.0453798276843,0.0452816029491,0.0456090187333,0.0455599063656,0.0457236142577,0.045903692939,0.0463620750368,0.0464766705613,0.04629659188,0.0469186818699,0.0469514234483,0.0468531987131,0.0466076368749,0.0469023110807,0.0464111874044,0.0460510300419,0.045903692939,0.0463129626692,0.0468368279239,0.0464439289829,0.0465257829289,0.046771344767,0.0472133560756,0.0468204571346,0.0474589179138,0.0475735134382,0.0476717381735,0.0478027044871,0.0476062550166,0.0478354460655,0.0481792326389,0.0485230192123,0.0490468844669,0.0493579294619,0.0492760755158,0.0493251878835,0.0499472778734,0.0500455026086,0.0498326823489,0.0498163115597,0.0497671991921,0.0493088170942,0.0490959968345,0.0493743002511,0.0489159181533,0.0495543789324,0.049128738413,0.0489977720993,0.0490468844669,0.0491451092022,0.0493906710403,0.0501928397115,0.0495380081432,0.0496198620892,0.0499145362949,0.0494888957755,0.0496526036676,0.0503238060251,0.0501928397115,0.0498326823489,0.0497999407705,0.0495543789324,0.0501764689223,0.0496034913,0.0501273565546,0.0497835699813,0.0496689744568,0.0490468844669,0.0489650305209,0.0492269631482,0.049128738413,0.048899547364,0.0489322889425,0.0497344576137,0.0499636486626,0.0508967836474,0.0511096039071,0.0516989523186,0.0524028962545,0.0534997391315,0.0539417504401,0.054089087543,0.0543510201703,0.0544819864839,0.054252795435,0.0537289301804,0.0535652222883,0.0531232109797,0.0530904694013,0.0523537838869,0.0522555591517,0.0522555591517,0.0526648288819,0.0526811996711,0.0528285367739,0.0533360312394,0.0541545706998,0.0548257730573,0.0553660091012,0.0560044698803,0.0563482564537,0.0568721217083,0.0568884924975,0.0571995374925,0.0574287285414,0.0579362230068,0.0580508185313,0.0581326724773,0.0579034814284,0.0576415488011,0.0579362230068,0.0576742903795,0.0573141330169,0.0569539756543,0.0568557509191,0.0564955935565,0.0559717283019,0.0560372114587,0.0563809980321,0.0565938182918,0.0565447059241,0.0572977622277,0.0572159082817,0.0577234027471,0.0587875040456,0.0591476614082,0.0598188637657,0.0596387850844,0.0595569311384,0.0598024929765,0.0601790211283,0.0597206390305,0.0600153132362,0.0599334592902,0.0590821782514,0.0591967737758,0.0594259648247,0.0597206390305,0.0597533806089,0.0591640321974,0.0583946051046,0.0586892793104,0.0595078187708,0.0600644256038,0.0605391784909,0.0605882908585,0.0605064369125,0.0603263582312,0.0608502234858,0.0618815832059,0.062520043985,0.0630275384505,0.0623890776714,0.0625036731958,0.0623727068822,0.0628638305584,0.0626837518771,0.0634859205483,0.0637478531756,0.0636823700188,0.0641243813274,0.0648938084202,0.0658924265619,0.0659087973511,0.0663671794489,0.0665636289194,0.0673821683798,0.0669892694388,0.0672348312769,0.0671529773309,0.0668091907575,0.0658924265619,0.0658760557727,0.0663671794489,0.0666782244438,0.0665636289194,0.0673330560122,0.0678241796884,0.067398539169,0.0679060336344,0.0688719101977,0.0691174720358,0.06944488782,0.0690192473006,0.0687736854625,0.0687082023056,0.0677259549532,0.0681188538941,0.0684298988891,0.0683971573107,0.0680369999481,0.0687900562517,0.0687900562517,0.069051988879,0.069919640707,0.0700178654423,0.0710655959516,0.0716058319954,0.0725389669803,0.0731937985486,0.0738322593277,0.0747653943126,0.0751419224643,0.0753711135133,0.075354742724,0.0765498103362,0.0764679563902,0.07605868666,0.0755675629837,0.0757967540327,0.0758786079787,0.0756330461406,0.0761896529736,0.0767953721743,0.0774338329534,0.0775320576887,0.0784488218843,0.078972687139,0.0799713052807,0.0809044402655,0.0821649910345,0.0830817552302,0.0838675531122,0.0848498004646,0.0850135083567,0.0849807667783,0.0848661712538,0.0854882612437,0.0856847107142,0.085275440984,0.0851608454596,0.0850626207243,0.0852426994056,0.0855537444006,0.0866505872775,0.0878620256789,0.0880584751494,0.0884022617228,0.088893385399,0.0905959474766,0.0908742508931,0.0916109364075,0.0926586669168,0.0931170490146,0.0930188242794,0.092675037706,0.0936409142693,0.0946722739894,0.0963912068562,0.0971770047382,0.098339330772,0.0991251286539,0.0987649712914,0.0989941623403,0.100483904158,0.10251388202,0.103790803578,0.104445635147,0.104511118303,0.104281927254,0.105296916185,0.105722556705,0.106819399582,0.109045826914,0.109635175325,0.109929849531,0.110928467673,0.111763377922,0.112156276863,0.112909333167,0.113924322098,0.115430434705,0.116903805734,0.117214850729,0.118246210449,0.119392165693,0.120112480418,0.12153673908,0.123337525892,0.125220166651,0.126464346631,0.127774009768,0.12875625712,0.130082291046,0.13081897656,0.131997673383,0.134093134402,0.135206348068,0.136024887529,0.136859797778,0.137842045131,0.139249933003,0.141443618756,0.143064326888,0.145487203691,0.147484439974,0.148843215478,0.151446170962,0.15418009276,0.157241430342,0.159778902669,0.163036689722,0.165672386784,0.168831949101,0.17195876984,0.175642197412,0.179030950778,0.183189131237,0.188575120886,0.193109829497,0.199609032812,0.203898179585,0.208711191612,0.213147675487,0.217715125676,0.221316699302,0.224132475046,0.2246563403,0.224099733467,0.22383780084,0.220923800361,0.218893822499,0.216274496226,0.213933473369,0.210348270533,0.208760303979,0.20730330374,0.207057741902,0.20689403401,0.206975887956,0.207172337426,0.207745315048,0.207483382421,0.208760303979,0.210135450273,0.210315528954,0.211166809993,0.212378248394,0.211968978664,0.211068585258,0.211543338145,0.212034461821,0.213851619423,0.214702900462,0.215063057824,0.216078046755,0.217027552529,0.217977058303,0.22031808116,0.222921036644,0.224934643717,0.226260677643,0.227734048671,0.228536217343,0.230566195204,0.231826745973,0.232743510169,0.233480195683,0.234298735144,0.236115892746,0.236983544574,0.237130881677,0.237622005353,0.237409185093,0.23768748851,0.238620623495,0.239324567431,0.239439162955,0.239455533744,0.239979398999,0.240257702415,0.242353163434,0.244464995242,0.246003849427,0.247035209147,0.246052961795,0.246658680996,0.248181164392,0.247837377819,0.247215287829,0.247477220456,0.246429489947,0.244350399717,0.243777422095,0.243073478159,0.242909770267,0.240241331626,0.238456915603,0.238555140338,0.23685257826,0.23623048827,0.235772106172,0.234855341977,0.234298735144,0.2337584991,0.23333285858,0.235592027491,0.235379207231,0.234396959879,0.234315105933,0.232776251747,0.230909981778,0.229338386014,0.229125565754,0.227652194725,0.227210183417,0.224132475046,0.221676856664,0.220367193528,0.218861080921,0.218157136985,0.218435440401,0.218435440401,0.216552799642,0.216651024378,0.215292248873,0.213949844158,0.214719271251,0.214080810472,0.2126729226,0.210937618944,0.209005865817,0.207941764519,0.206746696907,0.204258336947,0.202883190654,0.203243348016,0.201458931993,0.200574909375,0.200607650954,0.200656763321,0.199543549655,0.199396212552,0.198021066259,0.196678661544,0.195909234451,0.194386751055,0.192913380026,0.191489121365,0.190392278488,0.188575120886,0.188460525362,0.187560131955,0.186365064343,0.185972165402,0.185644749618,0.18435145727,0.182943569398,0.182043175992,0.18084810838,0.180095052076,0.177279276333,0.175658568201,0.175511231098,0.174381646643,0.172024252997,0.171451275375,0.170256207762,0.168962915415,0.166703746504,0.165181263108,0.165377712578,0.16390434155,0.162365487364,0.161383240012,0.159647936356,0.157634329283,0.156881272979,0.156111845887,0.156193699833,0.154949519853,0.152903171202,0.152002777796,0.151397058595,0.150742227027,0.15066037308,0.15046392361,0.149661754939,0.148581282851,0.147238878136,0.146780496038,0.145896473421,0.14529075422,0.144013832662,0.142540461633,0.141902000854,0.141443618756,0.141492731124,0.140559596139,0.139069854321,0.138284056439,0.139168079057,0.138595101434,0.137301809087,0.136728831465,0.13579569648,0.134600628867,0.132161381276,0.131097279977,0.130753493404,0.130573414722,0.128887223434,0.12710280741,0.126988211886,0.126611683734,0.126447975842,0.125171054284,0.125072829548,0.124810896921,0.124123323774,0.122830031427,0.122404390908,0.121880525653,0.121487626712,0.120259817521,0.118737334125,0.118999266752,0.119162974644,0.118508143076,0.118409918341,0.117656862037,0.116641873106,0.116920176523,0.116314457322,0.116134378641,0.115856075224,0.114317221039,0.113122153427,0.112041681339,0.111566928452,0.111828861079,0.111092175565,0.109209534806,0.107228669312,0.1066393209,0.105935376964,0.10560796118,0.104805792509,0.103921769892,0.10313597201,0.100794949153,0.100844061521,0.100434791791,0.101138735727,0.100467533369,0.0996489939086,0.0991414994431,0.0987322297129,0.0986340049777,0.0980446565662,0.0985357802425,0.0980773981446,0.0978482070957,0.0970460384245,0.0959655663368,0.0962766113318,0.0958346000231,0.0957691168663,0.0958182292339,0.0952125100332,0.0946886447786,0.0940174424211,0.0942138918916,0.0935263187448,0.093149790593,0.0920365769269,0.0919219814025,0.091889239824,0.0908415093147,0.0903994980061,0.090464981163,0.0892535427616,0.0880912167278,0.0877965425221,0.0874200143703,0.0875182391055,0.0864377670178,0.0853409241409,0.0855701151898,0.0846533509941,0.0840640025827,0.0840640025827,0.0840803733719,0.0836874744309,0.0837529575877,0.0834255418035,0.0833928002251,0.0829507889165,0.0818703168288,0.0820503955101,0.0814610470986,0.0811172605252,0.0803478334325,0.0800204176483,0.0797748558102,0.0790054287174,0.0787271253009,0.0779576982081,0.0778758442621,0.0769099676988,0.0766316642823,0.076533439547,0.0759440911355,0.0755511921945,0.0742742706363,0.0735539559112,0.0734066188083,0.0736521806464,0.0727190456616,0.072440742245,0.0714584948926,0.0706890677998,0.0709182588487,0.070787292535,0.0711310791084,0.07109833753,0.0705417306969,0.0692811799279,0.068740943884,0.0684298988891,0.0685117528351,0.0681515954726,0.0671038649633,0.0663835502381,0.0655158984101,0.065352190518,0.0649920331554,0.0656141231453,0.0660888760324,0.0661543591892,0.0655650107777,0.064877437631,0.0646809881605,0.0646809881605,0.0651393702583,0.0645336510576,0.0645991342144,0.0639770442245,0.0638624487001,0.063616886862,0.0636005160728,0.0639770442245,0.0638297071217,0.0627656058232,0.062045291098,0.061652392157,0.0612922347944,0.0609484482211,0.060866594275,0.060784740329,0.0606046616477,0.0602281334959,0.0602608750743,0.0604082121772,0.0601462795499,0.0605882908585,0.0601626503391,0.059917088501,0.0596551558737,0.0592949985111,0.059213144565,0.059049436673,0.058738391678,0.0582145264234,0.0585092006291,0.05787073985,0.0575433240658,0.0575105824874,0.0572977622277,0.0572813914385,0.0571504251248,0.0573141330169,0.057559694855,0.0579853353744,0.0577888859039,0.0580671893205,0.05787073985,0.0581163016881,0.0577070319579,0.0575105824874,0.0573141330169,0.056692043027,0.0563809980321,0.0561681777724,0.05621729014,0.0556934248853,0.0559717283019,0.0557752788314,0.0561354361939,0.0555297169933,0.0554151214688,0.0557589080422,0.0552677843659,0.0553823798904,0.0549076270034,0.054956739371,0.0543673909595,0.0535815930775,0.0529431322984,0.0532869188718,0.0534342559746,0.0536798178128,0.0538107841264,0.0534506267639,0.0531395817689,0.0530086154552,0.0530413570337,0.0539090088617,0.0535979638667,0.0538107841264,0.0539253796509,0.0530413570337,0.0527139412495,0.0525666041466,0.0528285367739,0.0528612783524,0.0531395817689,0.0523701546761,0.0528449075632,0.0529267615092,0.0523210423085,0.0525666041466,0.0529758738768,0.0532869188718,0.0537125593912,0.0534342559746,0.0531723233473,0.0536307054451,0.0534997391315,0.0531723233473,0.0532869188718,0.0530577278229,0.0526157165142,0.0518462894215,0.0519445141567,0.0523701546761,0.0523374130977,0.0520754804704,0.0519117725783,0.0515025028481,0.0519445141567,0.052435637833,0.0522555591517,0.0527957951955,0.0520263681028,0.0516825815294,0.0519608849459,0.051649839951,0.0519608849459,0.0516662107402,0.0507985589122,0.0501437273439,0.0501437273439,0.049996390241,0.0495052665647,0.0491942215698,0.0492269631482,0.0495380081432,0.0488504349964,0.0494561541971,0.0494561541971,0.0492269631482,0.0495871205108,0.0496034913,0.0498326823489,0.0504056599712,0.0497344576137,0.0492760755158,0.0494725249863,0.0490796260453,0.0487685810504,0.0490959968345,0.0485066484231,0.0480973786929,0.0474425471245,0.0469023110807,0.0465585245073,0.046771344767,0.0462311087232,0.0462311087232,0.0466567492426,0.0468531987131,0.0469350526591,0.0467222323994,0.0471478729188,0.0473279516001,0.0473606931785,0.0472297268648,0.0477208505411,0.0472297268648,0.047164243708,0.0473115808109,0.0469841650267,0.047246097654,0.0477208505411,0.0473115808109,0.0475080302814,0.0472788392325,0.0464111874044,0.0466567492426,0.0470496481836,0.0461492547771,0.0464439289829,0.0461819963555,0.0456581311009,0.0454944232088,0.0460182884635,0.0462474795124,0.0466403784534,0.0464111874044,0.0455762771548,0.0458873221498,0.0457890974145,0.0461656255663,0.0462802210908,0.0460182884635,0.0449705579541,0.0446758837484,0.0442338724398,0.0444794342779,0.0444794342779,0.0448232208513,0.0451506366354,0.045036041111,0.0447577376944,0.0451833782139,0.0451833782139,0.0448395916405,0.045510793998,0.0451670074246,0.0454616816304,0.0449869287434,0.0444139511211,0.0437427487636,0.0441029061261,0.0442011308614,0.0445121758563,0.0446104005916,0.0449214455865,0.0451670074246,0.0451342658462,0.0449214455865,0.0451833782139,0.0455599063656,0.0452979737383,0.0449541871649,0.0450032995326,0.0452979737383,0.0452488613707,0.0447904792729,0.0447086253268,0.045036041111,0.0447904792729,0.0448232208513,0.0446267713808,0.044724996116,0.0444958050671,0.0447086253268,0.044168389283,0.0447904792729,0.0442011308614,0.0441847600722,0.0446104005916,0.0446595129592,0.04464314217,0.0449705579541,0.0447904792729,0.0446922545376,0.0447086253268,0.0440865353369,0.0444466926995,0.0448232208513,0.0448068500621,0.0445940298024,0.0444303219103,0.0443157263858,0.0447413669052,0.0445940298024,0.0447904792729,0.0448723332189,0.0445285466455,0.0439555690233,0.043857344288,0.0439555690233,0.0445285466455,0.0439228274448,0.0439883106017,0.0440046813909,0.0435790408715,0.0436281532391,0.0438246027096,0.0436117824499,0.0436445240283,0.0434153329794,0.0430060632492,0.04298969246,0.042514939573,0.0419583327399,0.0419255911615,0.0376691859674,0.0333964099842,0.0292054879469,0.0245725546011,0.0)
ycorr <- c(3.13000165122e-05,3.10687993133e-05,3.03803078761e-05,2.92343813592e-05,2.76341597152e-05,2.55803515772e-05,2.30739125574e-05,2.04911140627e-05,1.78391806272e-05,1.51292827469e-05,1.23738541357e-05,9.58879899075e-06,6.78961998851e-06,3.98787851282e-06,1.19687439347e-06,-1.57070559857e-06,-4.30613421153e-06,-7.00246793501e-06,-9.65690462799e-06,-1.22706187146e-05,-1.48477002907e-05,-1.7392305966e-05,-1.99127466793e-05,-2.24136172292e-05,-2.49036180306e-05,-2.73904771304e-05,-2.98801635835e-05,-3.23762515222e-05,-3.48825514563e-05,-3.74001271174e-05,-3.99287366261e-05,-4.24690845281e-05,-4.50203557336e-05,-4.75828898955e-05,-5.01568434316e-05,-5.27384856926e-05,-5.53269048699e-05,-5.79244353597e-05,-6.05324613168e-05,-6.3152440702e-05,-6.57873590179e-05,-6.84412759595e-05,-7.11161813931e-05,-7.38156240465e-05,-7.65394976097e-05,-7.92925485987e-05,-8.20759899677e-05,-8.48880949327e-05,-8.77278100465e-05,-9.05941169151e-05,-9.34866604163e-05,-9.64021936042e-05,-9.93368030594e-05,-0.000102288189179,-0.000105252574599,-0.000108228465919,-0.000111213263496,-0.000114207561246,-0.000117209720955,-0.000120219238095,-0.000123235696331,-0.000126255526944,-0.000129282914356,-0.000132321294522,-0.00013537224121,-0.000138435956581,-0.000141509972888,-0.000144592880774,-0.000147686433922,-0.000150789671659,-0.000153901606153,-0.000157022603741,-0.000160149019811,-0.00016327315343,-0.000166390797641,-0.000169498286492,-0.000172595660053,-0.000175681512593,-0.000178754334424,-0.000181810571598,-0.000184849264201,-0.000187870513314,-0.000190873268229,-0.000193861688702,-0.000196838650063,-0.000199804961506,-0.000202760516128,-0.000205708108319,-0.000208647865541,-0.000211579227346,-0.000214501975303,-0.000217415609206,-0.000220318906015,-0.000223207908284,-0.00022608234661,-0.000228939614679,-0.000231779990801,-0.000234599967405,-0.000237394073871,-0.00024016413398,-0.000242907938782,-0.000245625503968,-0.00024831935534,-0.000250989913565,-0.000253636668182,-0.00025626003324,-0.000258860142237,-0.000261434471574,-0.00026398878281,-0.000266524864699,-0.000269043506828,-0.000271544817722,-0.000274027441815,-0.000276490542168,-0.000278932630913,-0.000281354083206,-0.000283753525178,-0.000286135303734,-0.000288498239558,-0.000290839215305,-0.000293157462279,-0.0002954534277,-0.000297726969927,-0.000299979844482,-0.000302212375899,-0.000304424993516,-0.000306619043258,-0.000308792650696,-0.000310942884639,-0.000313071292924,-0.000315179107041,-0.00031726477626,-0.000319328046122,-0.000321369809055,-0.000323386392686,-0.000325377516047,-0.000327345265081,-0.000329288836139,-0.000331208242411,-0.000333104091407,-0.000334976184669,-0.000336824379377,-0.000338647207903,-0.000340444455504,-0.000342219111658,-0.000343974200531,-0.000345706986685,-0.000347418516517,-0.000349110771321,-0.000350785559298,-0.000352440827858,-0.0003540772234,-0.000355697903582,-0.000357304214188,-0.000358895686415,-0.000360471005969,-0.000362028763099,-0.000363569555753,-0.000365090549537,-0.000366590224604,-0.000368070096759,-0.00036953166412,-0.000370973017331,-0.000372390888494,-0.000373786848072,-0.000375161228072,-0.00037651449489,-0.000377847273488,-0.000379161834397,-0.000380458274979,-0.000381736505388,-0.000382995107866,-0.000384233582951,-0.000385453233465,-0.000386653465318,-0.000387832327762,-0.000388990630419,-0.000390128549077,-0.000391248468376,-0.000392349490353,-0.000393430586037,-0.000394492924554,-0.000395538444395,-0.000396569203125,-0.000397585703322,-0.000398589361749,-0.000399581928898,-0.00040056203894,-0.000401525721339,-0.000402472216256,-0.000403403577959,-0.000404321886175,-0.000405226403525,-0.000406113444969,-0.000406983333388,-0.000407836086941,-0.000408669868715,-0.000409483833525,-0.000410279360143,-0.000411059828083,-0.000411824403574,-0.000412571228651,-0.000413300461643,-0.000414013281863,-0.000414711156966,-0.000415392027067,-0.000416056037258,-0.000416705983068,-0.000417344357847,-0.000417969422746,-0.000418581498689,-0.000419180462787,-0.000419766273837,-0.000420340482107,-0.000420903215928,-0.000421456124758,-0.00042200092676,-0.000422537259776,-0.000423063759781,-0.000423578969665,-0.000424084648419,-0.00042458094488,-0.000425067922399,-0.000425543982686,-0.000426004712515,-0.000426450603815,-0.000426879796353,-0.00042729110532,-0.000427684152486,-0.000428058810808,-0.000428414260805,-0.000428747186506,-0.000429058498062,-0.000429349091937,-0.000429623865909,-0.000429884343955,-0.000430130165013,-0.00043036296231,-0.000430584017492,-0.000430794762683,-0.000430996754568,-0.000431193680767,-0.000431387584029,-0.000431576639552,-0.000431759078706,-0.000431931733702,-0.000432097530158,-0.000432255825526,-0.000432406271289,-0.000432548782326,-0.000432681153455,-0.000432801358978,-0.00043290736142,-0.000433001130689,-0.000433083082999,-0.00043315477529,-0.000433216558425,-0.00043326705827,-0.000433306939973,-0.000433334971667,-0.000433351425865,-0.000433359085985,-0.000433357016926,-0.000433344251438,-0.000433320227734,-0.000433284803028,-0.000433237239399,-0.000433177551172,-0.00043310485648,-0.000433021566383,-0.000432927337748,-0.000432822545112,-0.000432706976476,-0.000432582756489,-0.000432449556169,-0.000432307387397,-0.000432156647324,-0.000431998342342,-0.000431833785379,-0.000431661915757,-0.000431482110349,-0.000431294516976,-0.000431098918313,-0.000430894235301,-0.000430680960749,-0.000430460880451,-0.000430233156364,-0.000429997712718,-0.000429752175413,-0.000429496467097,-0.000429230540996,-0.000428952524175,-0.000428663559984,-0.00042836240954,-0.00042804949265,-0.000427722757629,-0.000427380751687,-0.000427023447915,-0.000426651823725,-0.000426266142933,-0.000425866512305,-0.00042545411001,-0.000425028618254,-0.000424590561247,-0.000424140630326,-0.000423680056058,-0.000423210709549,-0.00042273278141,-0.00042224597819,-0.000421749438346,-0.00042124458144,-0.000420731114832,-0.000420208901858,-0.000419677871472,-0.000419136932296,-0.000418584287929,-0.000418019187102,-0.000417441566612,-0.00041685241417,-0.000416252647598,-0.000415642426229,-0.000415021385917,-0.000414389788941,-0.000413748865164,-0.000413100240665,-0.000412445813302,-0.000411786482131,-0.000411122620535,-0.000410452715054,-0.000409777264828,-0.000409095604272,-0.000408407434477,-0.00040771338743,-0.000407012620983,-0.000406302902621,-0.000405582804471,-0.00040485105254,-0.000404108512685,-0.000403354275213,-0.000402589155156,-0.000401812773041,-0.000401025387078,-0.000400225863622,-0.000399414218059,-0.000398591478951,-0.000397759725952,-0.000396919804507,-0.000396070915541,-0.000395214356911,-0.000394351206686,-0.000393481223205,-0.000392604252984,-0.000391721441546,-0.000390833966968,-0.000389940935951,-0.000389042345229,-0.000388137247529,-0.000387225080674,-0.000386306107938,-0.000385378302173,-0.000384441451168,-0.000383496719359,-0.000382544126768,-0.000381583025657,-0.000380614104007,-0.000379638116962,-0.000378655505834,-0.000377667265405,-0.000376674248552,-0.000375676466376,-0.00037467449466,-0.000373667775297,-0.00037265509853,-0.000371635523375,-0.000370608263622,-0.000369571952881,-0.00036852600349,-0.00036746952656,-0.000366402049077,-0.000365323417731,-0.00036423281062,-0.000363129843758,-0.000362015034397,-0.000360888829929,-0.000359752896663,-0.000358606799152,-0.000357450051103,-0.000356282701011,-0.000355103212924,-0.000353910893684,-0.000352705968835,-0.000351489234705,-0.000350261107819,-0.000349020908034,-0.000347767385167,-0.000346499824073,-0.000345220430314,-0.000343930173969,-0.000342631661494,-0.000341325407126,-0.000340013219848,-0.00033869500171,-0.000337370154106,-0.000336039039815,-0.000334702428213,-0.000333361521386,-0.000332015420366,-0.000330663456584,-0.000329303512408,-0.000327934887929,-0.000326558053123,-0.000325171005341,-0.000323773881665,-0.000322368020904,-0.000320953026443,-0.000319530205195,-0.000318099462885,-0.000316660943494,-0.000315215046976,-0.000313763872336,-0.000312306679242,-0.000310845513024,-0.000309381935979,-0.00030791479806,-0.000306443636593,-0.000304968633566,-0.000303489234052,-0.000302006194164,-0.000300520292197,-0.000299030907651,-0.000297536586009,-0.000296036175066,-0.00029452744093,-0.000293009446932,-0.000291483659473,-0.000289949216788,-0.000288405558102,-0.000286850878621,-0.00028528383101,-0.000283704404805,-0.000282112669154,-0.000280509910268,-0.000278896189467,-0.000277272673272,-0.000275638537387,-0.000273991568377,-0.000272331729067,-0.000270660678483,-0.000268979639656,-0.000267287899866,-0.000265586089549,-0.000263873022408,-0.000262148896496,-0.000260414475177,-0.000258669497975,-0.000256915374462,-0.000255154157609,-0.000253384562455,-0.000251604626118,-0.000249814578024,-0.000248014697124,-0.000246203934979,-0.000244383495096,-0.000242551916427,-0.000240708889938,-0.000238853262813,-0.000236984952819,-0.00023510336909,-0.0002332114913,-0.000231308572908,-0.00022939382058,-0.000227468703464,-0.000225532994204,-0.000223586349636,-0.000221629498529,-0.000219663216717,-0.000217687413498,-0.000215700933987,-0.000213703357831,-0.000211695050563,-0.000209676912463,-0.000207648913119,-0.000205611893292,-0.000203565583856,-0.000201511145531,-0.000199449791618,-0.000197380017306,-0.000195303862732,-0.000193221262958,-0.000191130069378,-0.000189029533849,-0.000186920208312,-0.00018479960178,-0.00018266773659,-0.000180524007545,-0.000178365929869,-0.000176192696051,-0.000174006085096,-0.000171804632787,-0.00016959013139,-0.000167363467614,-0.000165123121022,-0.000162869310625,-0.000160602982687,-0.00015832236181,-0.000156028040753,-0.00015371975323,-0.000151395231027,-0.000149052806309,-0.000146691268513,-0.000144309878591,-0.000141909379648,-0.000139490515775,-0.000137053178992,-0.000134598494358,-0.000132125990217,-0.000129636962383,-0.000127131766265,-0.000124611269197,-0.000122077338317,-0.000119530034972,-0.000116969117454,-0.000114394000587,-0.000111803581573,-0.000109195526618,-0.000106569995781,-0.000103927075298,-0.000101265310498,-9.85849367802e-05,-9.58860027279e-05,-9.31669007627e-05,-9.04276329256e-05,-8.76671586786e-05,-8.48863978242e-05,-8.20864692962e-05,-7.92682640876e-05,-7.64307594864e-05,-7.35753239518e-05,-7.07029931432e-05,-6.7814547014e-05,-6.49103583743e-05,-6.19902562744e-05,-5.90554806725e-05,-5.61049603597e-05,-5.31385913147e-05,-5.01557629017e-05,-4.71572886919e-05,-4.41416715866e-05,-4.11076815585e-05,-3.80521084975e-05,-3.4973959402e-05,-3.18716072563e-05,-2.87440663838e-05,-2.55910577184e-05,-2.24123472547e-05,-1.92068725402e-05,-1.59741025449e-05,-1.27122432974e-05,-9.42172426379e-06,-6.10215489332e-06,-2.75422542367e-06,6.21747575573e-07,4.02453269579e-06,7.45453469547e-06,1.09130362635e-05,1.44006683565e-05,1.79180350068e-05,2.14643112993e-05,2.50393582226e-05,2.8641955203e-05,3.22727756098e-05,3.5931620717e-05,3.96200675778e-05,4.33382462483e-05,4.70856258941e-05,5.08605108854e-05,5.46624393362e-05,5.84907962707e-05,6.23462986446e-05,6.6229784103e-05,7.01410331104e-05,7.40798363981e-05,7.80471030527e-05,8.20420038014e-05,8.60654314694e-05,9.01181856397e-05,9.42023250388e-05,9.83176217747e-05,0.000102465684414,0.000106646465356,0.0001108659319,0.000115134636726,0.000119460426093,0.000123851216839,0.000128344791294,0.000132741534534,0.000137076260935,0.000141355770626,0.000145586849513,0.000149777702174,0.000153935451868,0.000158053646767,0.000162124095415,0.000166140250205,0.000170094600545,0.000173951625597,0.000177911975381,0.000181941844654,0.000186035957641,0.000190187575822,0.0001943891183,0.000198634834975,0.000202925103849,0.000207259526988,0.000211637704036,0.000216058451877,0.000220520148164,0.000225021766084,0.000229561537426,0.00023413831329,0.000238751094749,0.000243396864739,0.000248073712738,0.000252778652739,0.000257507623641,0.000262257014615,0.000267022680496,0.00027179968917,0.000276583371985,0.000281368047238,0.000286146188595,0.000290912606524,0.000295663167653,0.000300392561599,0.000305097060056,0.000309774160814,0.000314422487965,0.00031904216763,0.00032363430093,0.000328200304942,0.000332745059835,0.000337274634692,0.0003417927614,0.000346304614007,0.000350816339905,0.000355334778189,0.000359865630516,0.000364412351816,0.0003689790645,0.000373568884553,0.000378183030025,0.00038282184924,0.000387485126112,0.000392173747722,0.000396886825193,0.000401622611984,0.000406378790708,0.000411154143903,0.000415947012962,0.000420755256757,0.000425578311804,0.000430416234682,0.000435268484748,0.000440135167584,0.000445015296852,0.000449907617283,0.000454810005033,0.000459720767899,0.000464637643702,0.000469559138474,0.000474483300271,0.000479405384749,0.000484322066661,0.000489228409576,0.000494119694444,0.000498992847215,0.000503845101744,0.000508674547541,0.000513479110652,0.000518255970693,0.000523003119695,0.000527719221582,0.000532403890779,0.000537055852723,0.000541676937623,0.000546265659461,0.000550820943702,0.000555341383207,0.000559825731522,0.000564272161417,0.000568679484985,0.00057304564195,0.000577368087096,0.00058164588084,0.000585875742529,0.000590054213558,0.000594181209219,0.000598255360587,0.000602275158209,0.000606240720148,0.000610151337051,0.000614007486257,0.000617809718222,0.000621557792331,0.000625252316711,0.000628896379462,0.000632490934931,0.000636036035625,0.000639532980175,0.00064298295185,0.000646385736919,0.000649740533359,0.000653047457091,0.000656305860442,0.000659515777907,0.000662675064574,0.000665781056104,0.000668832715476,0.000671827997489,0.000674764363668,0.000677641598361,0.000680459491139,0.000683218140391,0.000685917460147,0.00068855705146,0.000691137372964,0.000693660504443,0.000696128286045,0.000698541347213,0.000700902625095,0.000703212081855,0.00070546958559,0.000707674729278,0.000709828361048,0.000711929909236,0.000713979986116,0.000715977306722,0.000717919054723,0.000719804978974,0.000721633115004,0.000723401756902,0.000725110526103,0.000726757934086,0.000728342913496,0.000729864257733,0.000731319769503,0.000732708003661,0.000734029655839,0.000735285125734,0.00073647251301,0.000737591819663,0.000738642197437,0.000739623605661,0.00074053444933,0.000741374846932,0.000742144673152,0.000742844495737,0.000743473138134,0.000744028778625,0.000744512111653,0.000744923538738,0.000745263566451,0.000745533153397,0.000745733821158,0.000745867086816,0.000745933625016,0.000745935222714,0.000745873625748,0.000745751031206,0.000745569010918,0.000745327328377,0.000745026007539,0.000744665598947,0.000744244971431,0.00074376333032,0.000743221547214,0.000742618508405,0.000741952882807,0.000741224179583,0.000740431683683,0.000739576214986,0.000738659262617,0.000737680803766,0.000736642317673,0.000735545574869,0.000734391094145,0.000733179572171,0.000731912226633,0.000730589109551,0.000729211364548,0.00072778056674,0.000726295878404,0.000724757676454,0.000723167728458,0.000721524918313,0.000719829983374,0.000718083618985,0.000716286857228,0.000714441640158,0.000712549329932,0.000710609695802,0.000708623981946,0.00070659362216,0.000704516888035,0.000702394053552,0.000700226157969,0.000698012915426,0.000695753284598,0.000693446102941,0.000691089803785,0.000688684811532,0.000686231074886,0.000683726499114,0.000681172789066,0.000678571259309,0.000675920909905,0.000673221328298,0.000670474516943,0.000667683555078,0.000664850637142,0.000661977139128,0.000659064008534,0.000656113404292,0.000653128098329,0.000650108532327,0.000647055517459,0.000643972434626,0.000640861008765,0.00063771929642,0.000634547194855,0.000631344725225,0.000628113005402,0.000624852671017,0.000621563499135,0.000618244634685,0.000614896815769,0.000611520538258,0.000608114986864,0.000604680601172,0.000601218662866,0.000597728330289,0.00059420957748,0.000590661459044,0.000587082279383,0.000583473020335,0.000579834385436,0.000576165460416,0.00057246728841,0.000568740517502,0.000564986013952,0.000561205373922,0.000557401256749,0.00055357491818,0.000549728470836,0.000545865365214,0.000541986050269,0.000538092405643,0.000534185492002,0.000530266587751,0.000526335324692,0.000522392909925,0.000518439002311,0.000514474171602,0.000510498348097,0.000506510562231,0.000502510471864,0.000498498262435,0.000494473709789,0.000490437160336,0.000486388391234,0.000482327908794,0.000478254906485,0.000474168349844,0.000470068970841,0.000465956954329,0.000461833658911,0.000457697959053,0.000453549521134,0.000449387940228,0.000445214119871,0.000441027680796,0.000436829399064,0.000432620375762,0.000428401671482,0.000424172759359,0.000419933598575,0.000415685728539,0.000411430797191,0.00040717041009,0.00040290514238,0.000398635741282,0.000394362537836,0.000390086295143,0.000385806419959,0.000381524200178,0.000377239975567,0.000372954461615,0.000368667415364,0.000364378549327,0.000360086851453,0.000355793123954,0.000351496860256,0.000347198768796,0.00034289930475,0.00033859850456,0.000334296856007,0.000329994081058,0.000325690325682,0.00032138514817,0.000317079311132,0.000312772778111,0.000308466627329,0.000304160735146,0.000299855369919,0.00029555014929,0.000291245552641,0.000286940328672,0.000282634345958,0.000278328310225,0.000274024084791,0.000269722842386,0.000265424445325,0.000261128862313,0.000256836698367,0.000252549294374,0.000248266806123,0.000243991754243,0.000239725804133,0.000235469037589,0.000231221454696,0.000226980875144,0.000222748242462,0.000218525650781,0.000214313333547,0.000210111764403,0.000205921444656,0.000201742051075,0.00019757233113,0.000193413611631,0.000189267100349,0.000185134077092,0.000181015989858,0.000176910611596,0.000172816017491,0.000168731995546,0.000164659030419,0.000160595905889,0.000156544301339,0.000152503705164,0.000148472960753,0.000144451843123,0.000140437848749,0.000136432232808,0.000132436895951,0.000128451333056,0.000124475527747,0.000120508781964,0.000116551488398,0.000112602857677,0.000108664130689,0.000104734343499,0.000100814068671,9.69044781831e-05,9.30051971643e-05,8.91171970398e-05,8.5241064276e-05,8.13778427479e-05,7.75271359444e-05,7.36887297826e-05,6.98623549308e-05,6.60484091838e-05,6.22481684841e-05,5.84609992015e-05,5.46869640664e-05,5.092482401e-05,4.7173806119e-05,4.34360662518e-05,3.97105482987e-05,3.59992372945e-05,3.23024983792e-05,2.86204343563e-05,2.49540263632e-05,2.1304355144e-05,1.76718346748e-05,1.40587144405e-05,1.04662046005e-05,6.89303420168e-06,3.33929219755e-06,-1.94084520511e-07,-3.70903498944e-06,-7.20531869639e-06,-1.06829783505e-05,-1.41449917518e-05,-1.75920491447e-05,-2.10252987833e-05,-2.44464629992e-05,-2.78559938176e-05,-3.12530880197e-05,-3.4638757162e-05,-3.80122636083e-05,-4.13713144696e-05,-4.47158287355e-05,-4.80449739285e-05,-5.13564939737e-05,-5.46491706406e-05,-5.79213565191e-05,-6.11722983718e-05,-6.44022788073e-05,-6.76104571812e-05,-7.07961330961e-05,-7.39613787106e-05,-7.71082699795e-05,-8.02353743597e-05,-8.3343785223e-05,-8.6435431584e-05,-8.95119466795e-05,-9.25740205035e-05,-9.56211487676e-05,-9.86543895303e-05,-0.000101674954531,-0.000104682290239,-0.000107674555003,-0.000110652009994,-0.000113614764305,-0.000116562437735,-0.00011949360451,-0.000122407048889,-0.000125302606521,-0.000128179196365,-0.000131036999423,-0.000133875704001,-0.000136696270605,-0.000139498306022,-0.000142282596633,-0.000145049056229,-0.000147797516081,-0.000150529372221,-0.000153244962861,-0.000155944640107,-0.000158628443924,-0.000161295564943,-0.000163946414845,-0.000166582193528,-0.00016920284551,-0.000171806958834,-0.000174394917232,-0.000176965148601,-0.000179517444284,-0.0001820533314,-0.000184572808401,-0.000187076329051,-0.000189561992821,-0.00019202874673,-0.000194475703924,-0.000196905318617,-0.000199318096923,-0.000201715582706,-0.000204098722676,-0.000206467346799,-0.000208819812126,-0.000211156409118,-0.000213479693507,-0.000215790937874,-0.000218089110169,-0.00022037222179,-0.000222638717991,-0.000224887521932,-0.000227117944587,-0.000229329873285,-0.00023152353919,-0.000233698369772,-0.000235853055634,-0.000237986250476,-0.000240099719446,-0.000242196088243,-0.000244276193148,-0.000246340533562,-0.000248390208901,-0.000250423411282,-0.00025244034769,-0.00025444205996,-0.000256430152394,-0.000258404242682,-0.000260363812129,-0.000262305905821,-0.000264231007852,-0.000266141184827,-0.000268036066149,-0.000269916243906,-0.000271783575126,-0.000273637187795,-0.000275474944566,-0.000277297341027,-0.000279104988724,-0.00028089915962,-0.000282680625117,-0.000284446326446,-0.000286195161294,-0.000287927302742,-0.00028964054357,-0.000291335210156,-0.000293011512871,-0.000294669077763,-0.000296306886795,-0.000297924716798,-0.000299522153726,-0.00030110014805,-0.000302659160981,-0.000304198719546,-0.000305720191936,-0.000307225933239,-0.000308716588303,-0.000310193618589,-0.000311658287229,-0.000313110154636,-0.000314550540469,-0.000315978520288,-0.000317394661152,-0.00031880020231,-0.000320194656437,-0.000321575749346,-0.000322941076793,-0.000324288862558,-0.000325617127896,-0.000326925393993,-0.00032821298957,-0.00032947997238,-0.000330726310019,-0.000331951769192,-0.000333155773266,-0.000334338396309,-0.000335501127357,-0.000336645171996,-0.000337772381393,-0.000338884395443,-0.000339980276163,-0.000341060384483,-0.000342122900657,-0.000343168337089,-0.000344196738516,-0.00034520913275,-0.000346204798572,-0.000347183701082,-0.000348145516998,-0.000349088525294,-0.000350013885069,-0.000350922406068,-0.000351815805635,-0.000352695085842,-0.000353559795551,-0.000354406559843,-0.000355234780691,-0.000356044841716,-0.000356835288865,-0.0003576070625,-0.000358360375305,-0.000359093089908,-0.000359803686561,-0.000360490047819,-0.000361150746658,-0.000361787258015,-0.000362401236658,-0.0003629920352,-0.000363561224715,-0.000364108806479,-0.000364632054437,-0.000365132223622,-0.000365610568419,-0.000366068561919,-0.000366508058081,-0.000366930741655,-0.000367336795127,-0.000367726059317,-0.0003680968243,-0.000368447145255,-0.000368776882683,-0.000369086892868,-0.000369374380944,-0.000369637341974,-0.000369876224092,-0.000370088435341,-0.00037027291827,-0.000370428217515,-0.000370555206061,-0.000370655701188,-0.000370730734209,-0.000370780608887,-0.000370805719579,-0.000370806683591,-0.000370781865276,-0.000370731501816,-0.000370656530483,-0.000370557012385,-0.000370432347994,-0.000370280312899,-0.000370130393639,-0.000370011097896,-0.000369921104377,-0.000369860013373,-0.000369828675906)
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(166)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('HUDEP2-BCL11A-ER-V5-Rep2-GSM2771530/SRR5164418.1x36mers.hg19.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) : 166',bty='n')
dev.off()