# R script for Peak Model
#  -- generated by MACS
p <- c(0.0507420438619,0.0594730692402,0.0680034218578,0.0765865830967,0.0852507175547,0.0848599337576,0.0845712466281,0.085190867784,0.0854232257175,0.0854619520397,0.0858844210096,0.0856062956044,0.0855147606609,0.0853528142225,0.0852964850265,0.085219032382,0.0852155118073,0.0847085490433,0.0844550676614,0.0849057012293,0.0846381375484,0.0846557404221,0.0846170140999,0.0842015862794,0.0839938723692,0.0841030101865,0.0838213642065,0.08377207616,0.0835749239741,0.0830292348879,0.0830292348879,0.0829940291404,0.0827792740807,0.0831418932799,0.0830538789112,0.0828602473,0.0829729056919,0.0828074386787,0.0830750023597,0.0827159037352,0.082465942928,0.0823180787886,0.0824201754563,0.0822195026956,0.0819343361409,0.0815505934932,0.0816104432639,0.0815224288952,0.0816104432639,0.0820822002804,0.0823004759148,0.0821314883268,0.0819589801641,0.0815611552175,0.0817899925762,0.0823145582138,0.0821420500511,0.0819660213136,0.0815294700447,0.0812654269385,0.0807338201514,0.0809133694636,0.0812267006163,0.0815470729185,0.081413291078,0.0810717953273,0.0810260278556,0.0810717953273,0.0809732192343,0.0810471513041,0.0812971121113,0.0810999599253,0.0807443818756,0.0805437091149,0.0801036372712,0.0804240095734,0.080247980836,0.080205733939,0.080107157846,0.0797727032448,0.0793185491021,0.0789101624312,0.0790861911687,0.078970012202,0.0793009462284,0.0790439442717,0.0787517365675,0.0785862695543,0.0781532388601,0.0783151852986,0.0785017757603,0.0787763805907,0.0783363087471,0.0784454465643,0.0781743623086,0.0776850024185,0.0779983335711,0.0779067986277,0.0784243231158,0.0781215536874,0.0777413316144,0.0778011813852,0.0778575105812,0.0775265765547,0.0776709201195,0.0776814818437,0.077354068392,0.0773188626445,0.0769421611464,0.0770231343656,0.0769808874686,0.0769280788474,0.0768013381564,0.0767238855119,0.0763683074622,0.0765302539007,0.0762908548177,0.076259169645,0.0764035132097,0.0761922787247,0.0764844864289,0.0759880853893,0.0757662891801,0.076005688263,0.0757909332033,0.0753191761869,0.0756993982598,0.0754459168779,0.0753438202102,0.0751325857252,0.0749354335392,0.0753121350374,0.0753684642334,0.0755620958446,0.0758472623993,0.0758965504458,0.0756853159608,0.0754987254991,0.0757346040073,0.0758824681468,0.075991605964,0.0754107111304,0.0752910115889,0.074924871815,0.0748755837685,0.0749424746887,0.074784048825,0.0746397052603,0.0745974583633,0.0746115406623,0.0744953616956,0.0744812793966,0.0742946889349,0.0740693721509,0.0738405347922,0.0736856295032,0.0737560409982,0.0742031539914,0.0737666027225,0.073590573985,0.0731469815666,0.0732420370848,0.0730836112211,0.0732420370848,0.0731117758191,0.0730941729453,0.0731997901878,0.0727174714472,0.0727632389189,0.0729111030584,0.0731540227161,0.0733335720283,0.0735835328355,0.0731469815666,0.0729568705301,0.0726541011017,0.072354852248,0.0727421154704,0.0726928274239,0.0726153747794,0.0728230886897,0.072495675238,0.0725414427097,0.0726857862744,0.0728160475402,0.0731610638656,0.0729639116796,0.0727033891482,0.0723478110985,0.0721260148893,0.0717563545406,0.0719464655771,0.0717704368396,0.0718830952316,0.0718091631618,0.0714993525839,0.0715627229294,0.0718936569558,0.072199946959,0.0723161259257,0.0723900579955,0.0722914819025,0.07218586466,0.0718478894841,0.0721119325903,0.072101370866,0.072411181444,0.0721084120155,0.0722738790288,0.0718795746568,0.0717317105174,0.0716753813214,0.0716401755739,0.0719535067266,0.0720802474175,0.0722914819025,0.0722633173045,0.0723618933975,0.072383016846,0.0728054858159,0.0729603911049,0.0728512532876,0.0728758973109,0.0727209920219,0.072143617763,0.0719535067266,0.0715592023546,0.0714606262617,0.0713303649959,0.071090965913,0.07085156683,0.0705840031491,0.0707283467138,0.0705523179763,0.0711226510857,0.0710240749927,0.0711543362585,0.0709571840725,0.0709149371755,0.0707072232653,0.070837484531,0.071076883614,0.070936060624,0.0713690913182,0.0714078176404,0.0720309593711,0.0720802474175,0.0722316321318,0.072383016846,0.0726963479987,0.0727350743209,0.0726752245502,0.0723583728227,0.0721189737398,0.0718619717831,0.0712775563747,0.0712247477535,0.0713726118929,0.0712986798232,0.0713866941919,0.0715627229294,0.0715592023546,0.0720450416701,0.0720978502913,0.072298523052,0.0728653355866,0.0730519260484,0.0729674322544,0.0728019652412,0.0728336504139,0.0726118542047,0.0728125269654,0.0727456360452,0.0730237614504,0.0729287059321,0.0727421154704,0.0726259365037,0.0727773212179,0.0727385948957,0.0725027163875,0.0727597183442,0.0728653355866,0.0725484838592,0.072157700062,0.0723020436268,0.0722914819025,0.0725484838592,0.0726505805269,0.0729392676564,0.0733969423738,0.0732913251313,0.0733300514536,0.0738651788154,0.0740764133004,0.0741080984732,0.0741785099681,0.0740728927257,0.0740588104267,0.0744742382471,0.0745024028451,0.0748016516988,0.0747488430775,0.0750586536555,0.0756113838911,0.0758472623993,0.0762239638975,0.0767661324089,0.0771146693091,0.0770020109171,0.0775019325315,0.0779912924216,0.078561625531,0.0787341336938,0.0788960801322,0.0790897117434,0.0792481376072,0.0791460409394,0.0792410964577,0.0795403453113,0.0798571970388,0.0800191434773,0.0802022133642,0.080247980836,0.0806176411846,0.0809415340616,0.0809767398091,0.0811985360183,0.0816139638387,0.0816069226892,0.0816174844134,0.0815013054467,0.0817688691277,0.0819272949914,0.0817231016559,0.081342879583,0.0814097705032,0.0814590585497,0.0812619063638,0.081427373377,0.0814449762507,0.0814062499285,0.0814238528022,0.081328797284,0.0813393590083,0.0818956098186,0.0822406261441,0.082606765918,0.0829165764959,0.0829095353464,0.0831383727052,0.0831700578779,0.0832615928214,0.083729829263,0.0841980657047,0.0840642838642,0.084067804439,0.0840290781167,0.0842191891532,0.0846733432959,0.0842649566249,0.0846451786979,0.0845888495019,0.0844585882361,0.084011475243,0.084067804439,0.0842755183492,0.0849162629536,0.0847789605383,0.0848845777808,0.085064127093,0.0853352113487,0.0853668965215,0.0859548325046,0.0865040421655,0.0872011159659,0.0878207371217,0.0875602145903,0.087803134248,0.0875038853943,0.0876552701085,0.0878066548227,0.0879369160885,0.0875355705671,0.0875883791883,0.0872222394144,0.0869053876869,0.0868279350424,0.0873313772316,0.0880108481582,0.0880883008027,0.0883347410351,0.0885283726464,0.0889297181678,0.0890142119618,0.0892430493205,0.0892184052972,0.0896655182904,0.0893733105862,0.0890881440315,0.0898802733501,0.0898697116258,0.0903203451938,0.0904787710575,0.090528059104,0.0907287318647,0.0910385424426,0.0912462563528,0.0919151655552,0.0926263216546,0.0925594307343,0.0925488690101,0.0929959820032,0.0933057925812,0.0940310309795,0.094221142016,0.0943971707535,0.094404211903,0.0943302798332,0.0943866090292,0.0945485554677,0.0950519976568,0.0952245058196,0.0954392608793,0.0955307958228,0.09578075663,0.0962313901979,0.0966890649153,0.096594009397,0.0965341596263,0.096734832387,0.0968862171012,0.0965693653738,0.0968228467558,0.0968510113537,0.096903819975,0.0965271184768,0.0964602275566,0.09669258549,0.09669258549,0.0969531080215,0.0969355051477,0.0968404496295,0.0964602275566,0.0967418735365,0.0968932582507,0.0974178238884,0.0975832909016,0.0978402928583,0.0978543751573,0.0977522784896,0.0975762497521,0.0977417167653,0.0981571445857,0.0979529512503,0.0978543751573,0.0976853875693,0.0973896592904,0.0972101099782,0.0976889081441,0.0975128794066,0.0977945253866,0.0977065110178,0.0976255377986,0.0976396200976,0.0981289799878,0.0978578957321,0.098238117805,0.0984493522899,0.0984035848182,0.0985444078082,0.0988084509144,0.0988788624094,0.0988260537881,0.0987662040174,0.0982064326322,0.0984810374627,0.0980796919413,0.0978191694098,0.0979353483765,0.0980515273433,0.0977804430876,0.097942389526,0.0980620890675,0.0981325005625,0.097998718722,0.0977593196391,0.0975304822804,0.0974530296359,0.0970270400912,0.0967418735365,0.0968017233073,0.0966890649153,0.0965447213506,0.0967031472143,0.0964144600848,0.0964602275566,0.0965517625001,0.0965623242243,0.096777079284,0.0966010505465,0.0961116906564,0.0960131145634,0.0958617298492,0.0951329708761,0.095470946052,0.0954603843278,0.0960447997362,0.0959004561714,0.0958194829522,0.0958230035269,0.0961644992776,0.0961468964039,0.0962102667494,0.0964285423838,0.0960483203109,0.0956047278925,0.0951153680023,0.0950625593811,0.0945239114444,0.0943021152352,0.0938550022421,0.0937669878733,0.0932494633852,0.0931649695912,0.0933198748802,0.0934430949964,0.0934360538469,0.0932565045347,0.0931156815447,0.093083996372,0.093069914073,0.0925699924586,0.0929220499335,0.0924362106181,0.0923165110766,0.0915771903793,0.0912920238246,0.0910596658911,0.0908625137052,0.0908026639344,0.0905386208282,0.0907744993364,0.0902076868018,0.0898169030046,0.0894049957589,0.0897218474864,0.0895422981742,0.0894366809317,0.0893697900114,0.0894683661044,0.0889649239153,0.0888311420748,0.0887220042576,0.0887642511546,0.0889790062143,0.089123349779,0.0889473210415,0.0885670989686,0.0885142903474,0.0884790845999,0.0885494960949,0.0884297965534,0.0883065764372,0.0888205803506,0.0885530166696,0.0884755640251,0.0884086731049,0.0887184836828,0.0889860473638,0.0890599794335,0.0896725594399,0.0899189996723,0.0906160734727,0.0910385424426,0.0920243033724,0.0923693196979,0.0929079676345,0.092943173382,0.0926896920001,0.0926368833788,0.0926228010798,0.0924714163656,0.0918870009572,0.0911195156619,0.0904541270342,0.0900034934663,0.0893873928852,0.0891057469052,0.0886938396596,0.0879122720652,0.0870532518264,0.08644067182,0.0860146822753,0.0859865176774,0.0856203779034,0.0853774582457,0.08510637399,0.0847507959403,0.0846134935251,0.0841030101865,0.0837826378843,0.0836312531701,0.0834235392598,0.0822793524663,0.0815224288952,0.0806774909554,0.080121240145,0.0798501558893,0.0794593720921,0.0794171251951,0.0793115079526,0.0785052963351,0.0781004302389,0.0785017757603,0.0783891173683,0.0779631278237,0.0779631278237,0.0775300971295,0.077368150691,0.0770689018373,0.0769914491928,0.0773751918405,0.0770266549403,0.0766182682694,0.0764351983825,0.0766147476947,0.0762204433227,0.0765267333259,0.0761922787247,0.0761570729773,0.0761148260803,0.0758543035488,0.0756465896386,0.0755409723961,0.0754952049244,0.0754459168779,0.0755656164194,0.0754247934294,0.0755409723961,0.0753684642334,0.0747594048018,0.0743686210046,0.074657308134,0.0746925138815,0.0746819521573,0.074685472732,0.0745798554896,0.0742277980146,0.0742101951409,0.0740095223802,0.0741257013469,0.0739215080114,0.0736222591577,0.0734849567425,0.0728547738624,0.0728125269654,0.0724780723642,0.072214029258,0.0718267660356,0.0716648195971,0.0716894636204,0.0717598751154,0.0715204760324,0.0710839247635,0.0712388300525,0.0710733630392,0.0710557601655,0.0712282683282,0.0713127621222,0.0714078176404,0.0710557601655,0.0714113382152,0.0715275171819,0.0715239966072,0.0717387516669,0.0713233238464,0.0713233238464,0.0714254205142,0.0713972559162,0.0713303649959,0.0715380789061,0.0712423506272,0.0707529907371,0.0709959103948,0.070823402232,0.0707741141855,0.0707072232653,0.0704854270561,0.0702213839499,0.0702812337206,0.0705171122288,0.0705417562521,0.0708621285543,0.0706051265976,0.0704114949864,0.0704290978601,0.0703692480894,0.0703622069399,0.0703270011924,0.0703199600429,0.0701826576277,0.0700312729134,0.0700911226842,0.0700770403852,0.0701685753287,0.0703023571691,0.0700981638337,0.0697813121062,0.069517269,0.069728503485,0.0692637876181,0.0695419130233,0.0693799665848,0.0696651331395,0.0694996661263,0.0693377196878,0.0694222134818,0.0693975694586,0.0697320240597,0.0695700776213,0.0700453552124,0.0698482030265,0.0699291762457,0.0698094767042,0.0699362173952,0.0703305217671,0.0704114949864,0.0707776347603,0.0708762108533,0.0705734414248,0.0701439313054,0.0700453552124,0.0703129188934,0.0702249045247,0.0706016060228,0.0703305217671,0.0704255772854,0.0703938921126,0.0707283467138,0.0711508156837,0.0716965047699,0.0718338071851,0.0718619717831,0.0717986014376,0.0717774779891,0.072059123969,0.0721788235105,0.0719535067266,0.0715873669526,0.0715662435041,0.0708691697038,0.0709888692453,0.070879731428,0.071006472119,0.0708410051058,0.0706403323451,0.0704467007339,0.070781155335,0.0707776347603,0.0704326184349,0.0704431801591,0.0703058777439,0.0705664002753,0.0703340423419,0.0703340423419,0.0702953160196,0.0703798098136,0.0702530691226,0.0704044538369,0.0706156883218,0.0711120893615,0.0716190521254,0.0713127621222,0.0716366549991,0.0715944081021,0.0714042970657,0.0715908875274,0.0719675890256,0.0717704368396,0.0717457928164,0.0716542578729,0.0713902147667,0.0714641468364,0.0714324616637,0.0711296922352,0.0713796530424,0.071189542006,0.070823402232,0.0712106654545,0.0713761324677,0.0715380789061,0.0714571056869,0.0714923114344,0.0713374061454,0.0720027947731,0.0722245909823,0.0721647412115,0.072171782361,0.0718760540821,0.0718338071851,0.0719218215538,0.0717000253446,0.0717387516669,0.0720380005206,0.0717422722416,0.072073206268,0.072537922135,0.0727104302977,0.0728653355866,0.0727808417927,0.0728935001846,0.0729991174271,0.0731821873141,0.0730624877726,0.0730026380019,0.0728054858159,0.0724569489157,0.0725731278824,0.0729991174271,0.0731293786928,0.0726787451249,0.0727350743209,0.0725027163875,0.0728406915634,0.0730378437494,0.0730343231746,0.0730061585766,0.0730800906464,0.0728301298391,0.0731293786928,0.073717314676,0.0739778372074,0.0741538659449,0.0738933434134,0.0741609070944,0.0740658515762,0.0745868966391,0.0746749110078,0.0750868182535,0.0752874910142,0.0748861454928,0.0747594048018,0.074953036413,0.0751853943464,0.0752276412434,0.0757486863063,0.075949359067,0.0761359495288,0.0757275628578,0.0756958776851,0.0759986471135,0.0766182682694,0.0767661324089,0.0771780396546,0.0771991631031,0.0769175171231,0.0766041859704,0.0766006653957,0.0770794635616,0.0773857535648,0.077692043568,0.0775969880497,0.077494891382,0.077537138279,0.0780652244914,0.0784419259896,0.0787235719695,0.0784982551856,0.0785440226573,0.0781391565611,0.0782130886309,0.0784595288633,0.0789031212817,0.078744695418,0.0782306915046,0.0784665700128,0.0783715144946,0.078955929903,0.0790369031222,0.0793185491021,0.0795086601386,0.0796142773811,0.0795262630124,0.079839594165,0.0806000383109,0.080262063135,0.0804873799189,0.0805155445169,0.0806634086564,0.0807831081979,0.0805472296897,0.0805296268159,0.0807584641746,0.0805190650917,0.080008581753,0.0803324746299,0.0805577914139,0.0807795876231,0.0811140422243,0.0814344145265,0.0821033237289,0.0823920108583,0.0825469161473,0.0829588233929,0.0833812923629,0.0834869096053,0.0834939507548,0.0835819651236,0.0837122263893,0.083800240758,0.0834798684558,0.0832299076486,0.0831242904062,0.0831630167284,0.0832721545456,0.083743911562,0.0838495288045,0.083800240758,0.0834728273063,0.0834517038578,0.0836030885721,0.0837122263893,0.0839445843227,0.0840361192662,0.0841311747845,0.084011475243,0.0844656293856,0.0847860016878,0.0846592609969,0.0848528926081,0.085064127093,0.0855605281327,0.0856485425014,0.0857259951459,0.0859653942289,0.086328013428,0.0866765503282,0.0866413445807,0.0870110049294,0.0873032126336,0.0874369944741,0.0874581179226,0.0872574451619,0.0874193916003,0.0873313772316,0.0871131015971,0.0864653158433,0.086412507222,0.0865850153847,0.086257601933,0.0860076411258,0.0858245712389,0.0863385751523,0.0864934804413,0.0866695091787,0.0863526574513,0.0865638919362,0.0870110049294,0.0873208155073,0.0871799925174,0.0875566940155,0.0878665045935,0.0877080787298,0.0874229121751,0.087648228959,0.0883136175867,0.0885002080484,0.08791579264,0.0879263543642,0.0885706195434,0.0886551133373,0.0885530166696,0.0887114425333,0.089137432078,0.0890916646063,0.089123349779,0.0890177325365,0.08910926748,0.088982526789,0.088883950696,0.0888170597758,0.0886656750616,0.0887396071313,0.0887079219586,0.0884790845999,0.0883523439089,0.0888346626496,0.0894683661044,0.0897781766824,0.0894683661044,0.0897535326591,0.0896760800146,0.0903344274928,0.0908343491072,0.0910068572699,0.0908765960042,0.090598470599,0.0905351002535,0.0904118801372,0.0907357730142,0.0906829643929,0.0909153223264,0.0901091107088,0.0896725594399,0.0897253680611,0.0904611681837,0.0906935261172,0.0904822916322,0.0907287318647,0.0907076084162,0.0908730754294,0.0908871577284,0.0911723242831,0.0909646103729,0.0908097050839,0.0906371969212,0.0908132256587,0.0912885032498,0.0908202668082,0.0912955443993,0.0910244601436,0.0914328468145,0.091651122449,0.0919468507279,0.0924256488939,0.0922179349836,0.0919785359007,0.0916757664722,0.0923693196979,0.0923129905019,0.0924608546413,0.0923517168241,0.0922038526846,0.0924467723424,0.0921827292362,0.0922355378574,0.0923693196979,0.0927777063688,0.0925946364818,0.0925101426878,0.0925770336081,0.0928340355648,0.0929079676345,0.0926685685516,0.0926439245283,0.092746021196,0.0929818997042,0.0925840747576,0.0924221283191,0.0925981570566,0.0927636240698,0.0923446756746,0.0923305933756,0.0923622785484,0.0923165110766,0.0921404823392,0.091749698542,0.0920665502694,0.0922144144089,0.0920665502694,0.091932768429,0.0919081244057,0.0917849042895,0.0922284967079,0.0928375561395,0.0929396528073,0.0931931341892,0.0928516384385,0.0927671446445,0.0930311877507,0.0932036959135,0.0941859362685,0.0944112530525,0.0942528271888,0.094235224315,0.0944218147767,0.0944851851222,0.0945274320192,0.0947773928264,0.0946189669627,0.0945274320192,0.0940556750028,0.0940732778765,0.0938338787936,0.0934325332722,0.0934466155712,0.0932529839599,0.093140325568,0.0933374777539,0.093069914073,0.0931051198205,0.092788268093,0.0930382289002,0.0934818213187,0.0940415927038,0.0941155247735,0.0943091563847,0.0946330492617,0.0943830884545,0.0944781439727,0.0943549238565,0.0947140224809,0.094404211903,0.0942035391423,0.0937388232754,0.0937141792521,0.0938268376441,0.0939078108633,0.0940556750028,0.0941964979928,0.094390129604,0.0943373209827,0.0947985162749,0.0945661583414,0.0945485554677,0.094136648222,0.0939676606341,0.0937071381026,0.0933445189034,0.0933586012024,0.0934430949964,0.0930523111992,0.0925911159071,0.0930875169467,0.0934114098237,0.0936050414349,0.0933586012024,0.0936296854581,0.0936508089066,0.0936965763784,0.0934430949964,0.0935627945379,0.0933550806277,0.0932705868337,0.092717856598,0.0927108154485,0.0927917886678,0.0927953092425,0.0926580068273,0.0921968115351,0.0926439245283,0.0930734346477,0.0934501361459,0.0932917102822,0.0937141792521,0.0938057141956,0.0937176998269,0.0934114098237,0.0939430166108,0.094066236727,0.0933973275247,0.0929924614285,0.0928974059103,0.0929220499335,0.0928903647608,0.0923834019969,0.0927425006213,0.0930241466012,0.0929220499335,0.0929678174052,0.0930347083255,0.0925981570566,0.0923798814221,0.0924010048706,0.0921440029139,0.0922355378574,0.091904603831,0.0915595875055,0.0912638592266,0.0914926965853,0.0916476018743,0.0920348650967,0.0915032583095,0.0911054333629,0.0910209395689,0.0912251329043,0.0913870793428,0.0914574908378,0.0911828860073,0.0907498553132,0.0908308285324,0.0907709787617,0.091538464057,0.0913624353196,0.0912110506053,0.0910596658911,0.0913061061236,0.0915349434823,0.0916123961268,0.0919151655552,0.091749698542,0.0919996593492,0.0919609330269,0.0920665502694,0.0923129905019,0.0925981570566,0.0917461779672,0.091425805665,0.0916546430238,0.0917673014157,0.091806027738,0.0914504496883,0.0913166678478,0.0917849042895,0.0915349434823,0.0910385424426,0.0823321610876,0.0732913251313,0.0639934872184,0.0546076349367,0.0)
m <- c(0.0550307943109,0.0645390277048,0.0738675945913,0.0828051226092,0.0922076698223,0.0920949378962,0.0915242325202,0.0913657032491,0.0912424027049,0.0910204617253,0.0913199059041,0.0910592133249,0.0903335015505,0.0902559983513,0.0900234887537,0.0900798547167,0.090692834565,0.0905272595485,0.0906611287108,0.0905871483843,0.09064703722,0.0906329457293,0.0914396835756,0.0917743564812,0.0918483368078,0.0917179905182,0.0912776314318,0.0917637878632,0.0918659511712,0.0917778793539,0.0917919708447,0.0917778793539,0.0914713894298,0.0917602649905,0.0916581016824,0.0917109447728,0.0924472251653,0.092119598005,0.0920068660789,0.0920244804423,0.0918271995716,0.0917461734997,0.0920773235327,0.0915629841198,0.0912424027049,0.0912529713229,0.0907879521277,0.0910662590703,0.0915101410294,0.0920139118243,0.0920068660789,0.0920456176785,0.0921583496046,0.0922288070584,0.0926163230545,0.0927501922167,0.0924824538922,0.0925458656006,0.0923943820749,0.0923309703665,0.0925247283645,0.0928699698882,0.0927396235987,0.0926057544364,0.0927678065802,0.0926198459272,0.0932222571574,0.093169414067,0.093306806102,0.0934512438823,0.0932398715208,0.0929721331963,0.0929650874509,0.0930637278863,0.093032022032,0.0933913550466,0.0929580417055,0.0928981528698,0.0926621203995,0.0925705257095,0.0929263358513,0.0928171267979,0.0928453097794,0.0932821459931,0.0937823939153,0.0935498843177,0.0939233088229,0.0941558184206,0.0940325178764,0.0939514918045,0.0936590933711,0.0940466093671,0.0940008120222,0.093877511478,0.0933490805743,0.0935992045353,0.0935956816627,0.0932046427939,0.0933596491923,0.0939092173322,0.094025472131,0.093602727408,0.0936872763526,0.0935428385723,0.0938352370057,0.0936062502807,0.0934688582458,0.0936203417715,0.0935076098454,0.0931940741758,0.0930179305413,0.0930496363955,0.0929615645782,0.0933349890835,0.0929333815967,0.0930848651224,0.0932891917385,0.0932011199212,0.093352603447,0.0930637278863,0.0930108847959,0.0932751002477,0.0931658911943,0.093067250759,0.0928523555248,0.0925212054918,0.0920350490604,0.0921090293869,0.0921407352411,0.0921724410954,0.0928911071244,0.0928911071244,0.092746669344,0.0928981528698,0.0930461135228,0.093077819377,0.0933103289747,0.0937295508249,0.0939902434041,0.0943390078005,0.0940360407491,0.094117066821,0.0944904913262,0.0940360407491,0.094025472131,0.0944165109997,0.0946067461251,0.0942579817286,0.0942227530017,0.0939620604226,0.0935956816627,0.0934441981369,0.0932257800301,0.0936344332623,0.0937753481699,0.0933878321739,0.0935287470815,0.0934723811185,0.0928629241429,0.0929615645782,0.0934653353731,0.0935639758084,0.0937048907161,0.0934864726092,0.0934301066462,0.0935005641,0.0933279433381,0.0935534071904,0.0935815901719,0.0937154593342,0.0936414790076,0.0935040869727,0.0931482768309,0.0933420348289,0.0935287470815,0.0936802306072,0.0937295508249,0.0933843093012,0.0936978449707,0.0936132960261,0.0930742965043,0.0932891917385,0.0935745444265,0.0932574858843,0.0932927146112,0.0933490805743,0.0933913550466,0.0932962374839,0.0934406752642,0.0934160151554,0.0936273875169,0.0931905513032,0.0932469172662,0.0933032832293,0.0931517997036,0.0930602050136,0.0926550746541,0.0927959895617,0.0927079177444,0.0925634799641,0.0927114406171,0.0930531592682,0.0923767677115,0.0918906112801,0.0917391277543,0.091503095284,0.0913621803764,0.0911684223783,0.0909359127807,0.0911085335426,0.0909887558711,0.0906576058381,0.0911684223783,0.0917849250993,0.0919575458612,0.0919645916066,0.0923908592022,0.0922252841857,0.0921794868407,0.0921160751323,0.0921442581138,0.0921548267319,0.0921724410954,0.0912318340868,0.0911684223783,0.0912388798322,0.0908372723454,0.0912036511053,0.0911085335426,0.0908055664911,0.0907351090373,0.0908936383084,0.0907034031831,0.0913692261217,0.0912353569595,0.0913304745221,0.0916158272101,0.0915735527378,0.0917144676455,0.0918095852082,0.091834245317,0.0919962974608,0.0919681144793,0.091936408625,0.0920526634239,0.092211192695,0.0924225650564,0.0923697219661,0.092404950693,0.0923274474938,0.0919575458612,0.0916263958282,0.0915136639021,0.0917990165901,0.0918624282985,0.0910909191791,0.0906047627477,0.090601239875,0.0902841813328,0.0899882600268,0.0900692860987,0.090065763226,0.090076331844,0.0895690381765,0.0892378881435,0.0894175546508,0.0893752801785,0.0890370844001,0.0887940061844,0.0892167509074,0.0892061822893,0.0892026594166,0.0894598291231,0.0897310903203,0.0895655153038,0.0895584695584,0.08940346316,0.0893470971969,0.0893506200696,0.0891145875993,0.088684797131,0.0883148954984,0.0879555624839,0.0879273795023,0.0878428305578,0.0877899874674,0.0874940661613,0.0877124842682,0.0873637198717,0.0871065501653,0.0873848571079,0.0875469092517,0.0869867724938,0.0866344852246,0.0864407272266,0.0862293548651,0.0861377601752,0.0859122963229,0.0863597011547,0.0863420867913,0.0855776234172,0.0850104409139,0.0852817021112,0.0852464733843,0.0856304665076,0.085591714908,0.0856938782161,0.0851478329489,0.0848589573882,0.0844925786283,0.0848378201521,0.0851936302939,0.0850703297497,0.084918846224,0.0841473371046,0.0841332456138,0.0843904153203,0.0845454217187,0.0843798467022,0.084450304156,0.0844256440472,0.0839993764515,0.0840240365604,0.0836259519463,0.0837809583447,0.0835590173651,0.0834181024575,0.083344122131,0.0834075338394,0.0829918348618,0.0827875082457,0.0825585215208,0.0823436262866,0.0822097571243,0.0821357767978,0.0819561102906,0.0817024634568,0.0817482608018,0.0813396075696,0.0812515357523,0.0814135878961,0.0811352809535,0.0806913989944,0.0804941181237,0.080251039908,0.0802686542714,0.0802193340538,0.0797507919858,0.0797860207127,0.0797648834766,0.0796415829324,0.0799586414746,0.080307405871,0.0805751441956,0.0803884319429,0.0805187782325,0.0802651313987,0.0805540069594,0.0803954776883,0.080399000561,0.0804588893968,0.0801171707457,0.0799551186019,0.0799797787108,0.0802651313987,0.0801453537272,0.0800255760557,0.0796944260228,0.0796697659139,0.0798142036943,0.0793632759898,0.0797120403862,0.0798001122035,0.0794196419528,0.0790744004291,0.078436760472,0.0781373162932,0.078207773747,0.0785213094166,0.0781020875663,0.0781795907655,0.0779999242582,0.0778378721144,0.0779999242582,0.0779928785129,0.0785671067615,0.0788559823222,0.0786199498519,0.0781091333117,0.0782183423651,0.0779787870221,0.0776617284799,0.0775983167714,0.0774292188822,0.0772988725927,0.0769818140504,0.0769254480874,0.0769571539416,0.0767563501982,0.0763970171837,0.076541454964,0.0769430624508,0.0769360167055,0.0770170427774,0.0769853369231,0.0769677225597,0.0768091932886,0.0767352129621,0.0768303305247,0.0770980688493,0.0765379320913,0.0763723570749,0.0759672267154,0.0751992404686,0.0751146915241,0.074910364908,0.0745616005115,0.0745721691296,0.0747342212734,0.0744946659304,0.0748610446903,0.0746179664746,0.0745510318934,0.075252083559,0.0750759399245,0.0749526393803,0.0745651233842,0.0741670387701,0.0736033791395,0.0734941700861,0.0733285950696,0.0732370003796,0.0733180264515,0.0728177785293,0.0727156152213,0.0726451577674,0.0729481248189,0.073060856745,0.0734166668868,0.073392006778,0.0732299546342,0.0728389157655,0.0724690141329,0.0725676545682,0.072627543404,0.0726592492582,0.0725218572233,0.0722787790076,0.0719617204653,0.0722083215537,0.0721308183545,0.0725077657325,0.0728635758743,0.0726980008578,0.0725711774409,0.0724654912602,0.0724866284963,0.0726416348948,0.0727226609667,0.0723175306072,0.0723562822068,0.0722611646441,0.0717890997035,0.0720709295188,0.0725993604225,0.0728389157655,0.0727614125663,0.073060856745,0.0728530072562,0.0729305104554,0.0726839093671,0.0724584455148,0.0729798306731,0.0727614125663,0.0722470731533,0.0720603609007,0.0722118444264,0.0717327337404,0.0719018316296,0.0716728449046,0.0717362566131,0.0715918188327,0.0711866884732,0.0711831656006,0.0711690741098,0.0711514597463,0.0711373682556,0.0708766756764,0.0706195059699,0.0712712374178,0.071669322032,0.0719863805742,0.0722012758083,0.0722400274079,0.0721766156995,0.0722400274079,0.0721343412272,0.072729706712,0.0730361966362,0.0726698178763,0.0725148114779,0.0722224130445,0.0723844651883,0.0722576417714,0.0723598050795,0.0719934263196,0.0721167268638,0.0720533151553,0.0719758119561,0.0721625242087,0.0720004720649,0.0722717332622,0.0721413869726,0.0723950338064,0.0727085694759,0.0730432423816,0.0727578896936,0.072719138094,0.0731735886711,0.0731700657985,0.0736879280841,0.0734659871045,0.0735329216857,0.0735575817945,0.0733603009238,0.0734272355049,0.0738006600102,0.0737654312833,0.0735188301949,0.0736914509568,0.073300412088,0.0739450977905,0.0740049866263,0.0739556664086,0.0739944180082,0.0740472610986,0.0739380520452,0.0743467052774,0.0743431824047,0.0743748882589,0.0744171627312,0.0743114765504,0.0742410190966,0.0743361366593,0.0746038749838,0.0745052345485,0.0747870643638,0.0746214893473,0.0748962734172,0.0746214893473,0.0750407111975,0.0749420707622,0.0753225410128,0.0757100570089,0.0758192660623,0.0763230368572,0.0768585135063,0.076781010307,0.076678846999,0.0770839773585,0.0769219252147,0.0768761278697,0.0767140757259,0.0767281672167,0.0767387358347,0.076678846999,0.0761962134403,0.0767739645617,0.0768831736151,0.0768866964878,0.0772319380115,0.077534905063,0.0777004800795,0.0773587614284,0.0775384279357,0.077774460406,0.0779012838229,0.0780104928763,0.0779611726586,0.077968218404,0.0778977609502,0.0779611726586,0.0782324338559,0.0787150674146,0.0785706296342,0.0785142636712,0.0783522115274,0.0780809503301,0.078436760472,0.078493126435,0.0786833615604,0.0789334855214,0.0787855248684,0.0786199498519,0.0786340413427,0.0782641397101,0.0786269955973,0.0789757599937,0.0792329297002,0.0796873802774,0.0799797787108,0.0799973930742,0.0804377521606,0.0806209415406,0.080969705937,0.0818574698552,0.0823612406501,0.0828156912273,0.0833582136217,0.0837069780182,0.0838725530346,0.0842812062668,0.0847532712075,0.0855353489449,0.0863597011547,0.08654993628,0.0869938182391,0.087120641656,0.0869304065307,0.0872615565637,0.0876702097959,0.0883254641165,0.0887552545848,0.0888715093836,0.0893752801785,0.0904568020947,0.0910451218341,0.0914713894298,0.0920808464054,0.0922358528038,0.0926339374179,0.0928734927609,0.093067250759,0.0934124922827,0.0933279433381,0.0927149634898,0.0922323299311,0.0920420948058,0.0916510559371,0.091457297939,0.0915066181567,0.0911472851422,0.0908090893638,0.0901009919529,0.0896359727576,0.0895831296673,0.0895373323223,0.0895655153038,0.0898931424641,0.0899953057721,0.0896465413757,0.0898790509733,0.0897134759568,0.089974168536,0.089974168536,0.0896782472299,0.0895197179588,0.0895091493407,0.0896183583942,0.0899178025729,0.0898156392649,0.08949505785,0.0898614366099,0.0898191621376,0.089974168536,0.0904004361316,0.0905166909305,0.0910169388526,0.0909077297992,0.0904004361316,0.0908161351092,0.091126147906,0.0908196579819,0.0918201538262,0.0918236766989,0.0921372123685,0.0926163230545,0.0924648395287,0.0927149634898,0.0934406752642,0.0934512438823,0.093785916788,0.0942967333282,0.0939867205314,0.0945574259074,0.0944165109997,0.0950259679753,0.0948639158315,0.0948885759404,0.0951246084107,0.0952937062999,0.095406438226,0.0952796148091,0.0955262158975,0.0953289350268,0.0957129281501,0.0958221372036,0.0959172547662,0.0958186143309,0.0956776994232,0.0959031632755,0.0963223851257,0.0966253521772,0.096604214941,0.0969529793375,0.0970445740274,0.0970657112636,0.0974637958777,0.0977209655842,0.0981049587075,0.0982634879786,0.0975941421673,0.0978971092187,0.098076775726,0.0980380241264,0.0976575538757,0.097837220383,0.0976751682392,0.0981155273256,0.0977561943111,0.0976857368573,0.0977949459107,0.0972770836251,0.0972101490439,0.09741447566,0.0975412990769,0.0973475410789,0.0974320900235,0.0973369724608,0.0972770836251,0.0977491485657,0.097974612418,0.0983550826686,0.0985594092847,0.0985241805578,0.0989610167715,0.0987989646277,0.0990032912438,0.0990913630611,0.0992358008414,0.0990772715703,0.09902442848,0.0992252322234,0.0994506960756,0.099457741821,0.0991477290242,0.0987919188823,0.0987108928104,0.0982846252148,0.0984572459767,0.0979781352906,0.097837220383,0.0976117565307,0.0969670708282,0.0971678745716,0.0971960575532,0.09750607035,0.0976152794034,0.0976751682392,0.0977033512207,0.0977280113296,0.0974320900235,0.0969917309371,0.0968543389021,0.096695809631,0.096547848978,0.0967063782491,0.0966464894133,0.0968120644298,0.0965795548322,0.0963857968342,0.0967275154852,0.0971220772267,0.0974814102412,0.0969952538098,0.0971502602082,0.0968191101752,0.0963576138526,0.0960828297827,0.0961039670189,0.0961920388361,0.0958045228401,0.0956741765505,0.095269046191,0.0954698499344,0.0952091573553,0.095075288193,0.0949942621211,0.0945820860162,0.094162864166,0.0939937662768,0.0944869684536,0.0942121843836,0.0939056944595,0.0935851130446,0.0933878321739,0.0929615645782,0.0929051986152,0.0925810943276,0.0918941341528,0.0918025394628,0.0912036511053,0.0905624882754,0.0903335015505,0.0903194100597,0.0899424626818,0.0899847371541,0.0896324498849,0.0894844892319,0.0899213254456,0.0893893716692,0.0892449338889,0.0892061822893,0.0893858487965,0.0886566141494,0.0882444380446,0.087634981069,0.0876666869232,0.0874905432886,0.0870431384568,0.0869902953665,0.0867296027873,0.0866978969331,0.0862962894463,0.0860954857029,0.0857431984337,0.0857150154522,0.0852535191296,0.0855705776719,0.0854930744726,0.0855670547992,0.0855106888361,0.0854895516,0.084918846224,0.085021009532,0.085260564875,0.0854754601092,0.0854085255281,0.085066806877,0.0849963494232,0.0846229249179,0.0841050626323,0.0836611806732,0.0838091413262,0.0835625402378,0.0835660631105,0.0834357168209,0.0833370763856,0.0829389917715,0.0826747763196,0.0826148874838,0.0826923906831,0.0825620443935,0.0822520315966,0.0822626002147,0.081917358691,0.0813079017154,0.0811247123354,0.0812761958612,0.0811317580808,0.0806350330313,0.0807019676125,0.081015503282,0.0812163070254,0.0808569740109,0.0805680984502,0.0805610527048,0.0804729808875,0.0799727329654,0.0801030792549,0.0800044388196,0.0795147595155,0.0791025834106,0.0789053025399,0.0787467732688,0.0790250802114,0.0786622243242,0.0785213094166,0.0787397275234,0.0782852769462,0.078197205129,0.0780104928763,0.0779012838229,0.0773587614284,0.0770839773585,0.0767211214713,0.0768655592516,0.076816239034,0.0764533831468,0.0762631480214,0.0763617884568,0.0765379320913,0.0762243964218,0.0765449778367,0.0767387358347,0.0766753241263,0.0766083895452,0.0763371283479,0.0765344092187,0.0767352129621,0.0767105528532,0.0763970171837,0.0763195139845,0.075822788935,0.0753260638855,0.0747659271276,0.0744629600762,0.0739063461909,0.0730185822727,0.0724161710425,0.0719300146111,0.0716270475597,0.0716129560689,0.0716904592681,0.0719229688657,0.0723527593341,0.0718771715207,0.0720216093011,0.0721343412272,0.0721413869726,0.0722682103895,0.0721167268638,0.071725687995,0.0712747602905,0.0711056624013,0.0706829176784,0.0706265517153,0.0702954016823,0.0704046107358,0.0702672187008,0.0697599250333,0.0699008399409,0.0697528792879,0.0700981208116,0.0700347091032,0.0700945979389,0.070048800594,0.0703200617912,0.0706018916065,0.0703799506269,0.0705173426619,0.070105166557,0.0700065261217,0.0699994803763,0.0699078856863,0.0696894675794,0.0699783431401,0.0698268596144,0.0692667228565,0.0698092452509,0.0699431144132,0.0698691340867,0.0698444739779,0.0693054744561,0.0691187622035,0.0692808143473,0.0692455856203,0.0693160430742,0.0691258079488,0.0687065860986,0.0681887238129,0.0683578217021,0.0685374882094,0.0686713573717,0.0688404552608,0.0686466972628,0.0681464493407,0.0679068939976,0.0678751881434,0.0678505280346,0.0682697498848,0.0682098610491,0.0679174626157,0.0680372402872,0.0678470051619,0.0676004040735,0.0676779072727,0.0677800705808,0.0680372402872,0.0678258679257,0.0678293907984,0.068097129123,0.0684141876652,0.068382481811,0.068622037154,0.0685586254455,0.0688298866428,0.0688404552608,0.0687594291889,0.0691328536942,0.0689003440966,0.0687206775893,0.0685339653367,0.0684071419198,0.068336684466,0.068153495086,0.0682767956302,0.0682063381764,0.0683754360656,0.0683261158479,0.068142926468,0.0679068939976,0.0678152993077,0.0678505280346,0.0674031232028,0.0679738285788,0.0677765477081,0.0678998482523,0.0678892796342,0.0675369923651,0.0678540509073,0.0680795147595,0.0678329136711,0.0677131359996,0.0680442860326,0.0681182663591,0.0681217892318,0.0682697498848,0.0681957695583,0.0684071419198,0.0683860046837,0.0685093052279,0.0688651153697,0.0689884159139,0.0690905792219,0.0690342132589,0.0690976249673,0.0688298866428,0.0687277233347,0.068622037154,0.0685515797002,0.0684529392648,0.0688298866428,0.0690729648585,0.0689426185689,0.0688334095155,0.0685868084271,0.0686185142813,0.0688792068604,0.0690483047496,0.0693019515834,0.0692702457292,0.068815795152,0.0687840892978,0.0687277233347,0.0686819259897,0.0690306903862,0.0690729648585,0.0691962654027,0.0691363765669,0.06910114784,0.0694076377641,0.0694640037272,0.0693195659469,0.0695732127806,0.0698409511052,0.0699853888855,0.0703411990273,0.0702460814647,0.0706864405511,0.0708308783314,0.0709436102575,0.0712430544363,0.0714156751982,0.0713980608347,0.071531929997,0.0718313741758,0.0717327337404,0.0719793348288,0.0717010278862,0.0718595571573,0.0717890997035,0.072102635373,0.0720850210095,0.0722541188987,0.0723985566791,0.0722470731533,0.0726486806401,0.0726557263855,0.0730080136547,0.0727614125663,0.0729727849277,0.0727367524574,0.0730890397266,0.0731489285623,0.0729868764185,0.0730538109996,0.0728353928928,0.0730784711085,0.0725958375498,0.0727156152213,0.0729551705643,0.0731841572892,0.0732052945254,0.0735364445584,0.0736562222299,0.0736632679752,0.073585764776,0.0738182743737,0.0744840973123,0.0750548026883,0.075104122906,0.0749596851256,0.0749526393803,0.0747588813822,0.0745651233842,0.0745897834931,0.0745756920023,0.0746320579653,0.0746426265834,0.0740613525894,0.0738464573552,0.0738852089548,0.0739908951355,0.0741247642978,0.0746144436019,0.0749350250168,0.0753789069759,0.0750477569429,0.0749843452345,0.0755515277378,0.0758791548981,0.076256102276,0.0764639517648,0.0763899714383,0.0765485007094,0.0764111086745,0.0759460894792,0.0761010958776,0.0760412070419,0.0756431224278,0.0752696979225,0.075104122906,0.0749949138526,0.0753824298486,0.0750865085425,0.0748046787272,0.0751006000333,0.0751182143967,0.0754986846474,0.0760095011876,0.0761292788592,0.0763617884568,0.0762314421672,0.0762842852576,0.0764569060194,0.0768338533974,0.0772565981204,0.0776018396441,0.0777357088064,0.0779893556402,0.0780809503301,0.0782606168374,0.0786340413427,0.0785635838888,0.0784261918539,0.0785952897431,0.0785917668704,0.0784578977081,0.0782852769462,0.077876623714,0.0779541269133,0.077820257751,0.0778977609502,0.0780386758578,0.0784297147266,0.0784156232358,0.078401531745,0.0781690221474,0.0786833615604,0.0790497403202,0.079211792464,0.0793350930082,0.0793315701356,0.0796873802774,0.07996568722,0.0801383079819,0.0802193340538,0.0806209415406,0.0802933143803,0.0800150074377,0.0800960335096,0.080113647873,0.0801805824542,0.0800396675465,0.0798106808216,0.0801770595815,0.0802686542714,0.0804624122695,0.0808358367747,0.0810119804093,0.0810577777543,0.0810789149904,0.0814699538592,0.0814241565142,0.0817412150564,0.081677803348,0.0817940581468,0.0814452937503,0.0810190261547,0.0809661830643,0.0809732288097,0.0811846011712,0.0811493724443,0.0811740325531,0.0808076537932,0.0725112886052,0.0643664069429,0.0564716492417,0.0485733686677,0.0)
ycorr <- c(-0.000329098110153,-0.000329065891118,-0.000328956701173,-0.000328795795603,-0.000328628542354,-0.000328468964728,-0.000328301465588,-0.000328066249617,-0.000327751326086,-0.000327377185886,-0.000326961412921,-0.000326498213822,-0.000326012997955,-0.000325504941251,-0.000324945443538,-0.000324299116428,-0.000323527404384,-0.000322637111076,-0.000321626103522,-0.000320444861277,-0.000319049187851,-0.000317453266537,-0.000315666508192,-0.000313700260024,-0.000311617133279,-0.000309415508708,-0.00030713044683,-0.000304759920314,-0.000302306876025,-0.000299827080274,-0.000297383720396,-0.000295010280717,-0.000292721787703,-0.00029051795634,-0.000288363442421,-0.000286253148532,-0.000284180464982,-0.00028215338236,-0.000280186507077,-0.000278258717516,-0.000276335989286,-0.000274401940232,-0.000272443567138,-0.000270470586115,-0.000268473914895,-0.000266466027162,-0.000264450208169,-0.00026242457416,-0.000260377276049,-0.000258328243389,-0.000256271978284,-0.000254240341043,-0.00025221181753,-0.000250151725828,-0.000248064701865,-0.000245963621465,-0.00024381973916,-0.000241673335542,-0.000239509055141,-0.000237329255674,-0.000235135088431,-0.000232907302044,-0.000230627942277,-0.000228333345562,-0.000226022344938,-0.00022367422692,-0.000221295180369,-0.000218878351023,-0.000216393993239,-0.000213843975915,-0.00021124741312,-0.000208545844052,-0.000205783864602,-0.000202969253584,-0.000200088394881,-0.000197172582142,-0.000194202565006,-0.000191189217361,-0.000188144220601,-0.000185058570126,-0.000181959167336,-0.000178816392716,-0.000175645257573,-0.000172426544678,-0.000169155321471,-0.00016583946483,-0.000162481516932,-0.000159086561367,-0.000155656416862,-0.000152199521754,-0.000148681355948,-0.000145121652819,-0.00014153798461,-0.00013796554958,-0.000134407649702,-0.000130808289827,-0.00012718915384,-0.000123534474283,-0.000119843098897,-0.000116072331416,-0.000112271128777,-0.000108439881388,-0.000104592420423,-0.00010068362064,-9.67132107226e-05,-9.26984496852e-05,-8.865673922e-05,-8.45778015151e-05,-8.04875612951e-05,-7.64020687866e-05,-7.23289550347e-05,-6.82508342086e-05,-6.41623044386e-05,-6.00298673445e-05,-5.59094564296e-05,-5.179662673e-05,-4.76972179038e-05,-4.36316378132e-05,-3.95713047107e-05,-3.55228118361e-05,-3.14460740652e-05,-2.73785519449e-05,-2.33022528971e-05,-1.92294934441e-05,-1.51446404641e-05,-1.10123563813e-05,-6.83533543976e-06,-2.61306486708e-06,1.65626286898e-06,5.98357745193e-06,1.03916308499e-05,1.48444971585e-05,1.93760873965e-05,2.39411566345e-05,2.85612939734e-05,3.32025937052e-05,3.78526461068e-05,4.25512981698e-05,4.72646897778e-05,5.19723175064e-05,5.66300924543e-05,6.12371900093e-05,6.57969897917e-05,7.03142571519e-05,7.48302521752e-05,7.93371376307e-05,8.38573234314e-05,8.83831707461e-05,9.28860770273e-05,9.74103581133e-05,0.000101952190915,0.000106533819786,0.000111137577589,0.000115762777968,0.000120387796557,0.000124978446886,0.000129513698693,0.000133978064861,0.000138425669451,0.000142827224254,0.000147200760472,0.000151577249593,0.000155953590236,0.000160334902805,0.000164704446576,0.000169087524252,0.000173504437509,0.000177970113945,0.000182460731921,0.000186955665624,0.000191480515144,0.000196013965275,0.000200549001861,0.000205090453414,0.000209633646706,0.000214158389854,0.000218667904622,0.000223168085946,0.000227645441849,0.000232119889946,0.000236580545226,0.000241008869712,0.00024542895273,0.000249847848057,0.000254234321395,0.000258612305858,0.000263008355199,0.000267384844675,0.000271724543975,0.000276036778557,0.000280300461036,0.0002845082425,0.000288660048085,0.000292699177814,0.000296652891561,0.000300529462658,0.000304322835132,0.000308010360161,0.000311639064973,0.000315227377717,0.000318780264643,0.000322298291317,0.000325774657065,0.000329236003104,0.000332694891094,0.00033611280187,0.000339491485253,0.000342847400763,0.000346202556909,0.000349514188327,0.000352746608072,0.000355895297976,0.000358950249433,0.000361917072891,0.000364784916055,0.000367583171569,0.000370307695825,0.000373004409091,0.000375629405968,0.000378172313402,0.000380646764102,0.000383106681282,0.000385562119061,0.000388045971284,0.000390554470754,0.000393098206354,0.000395663553129,0.000398208627964,0.000400709000324,0.000403180306547,0.000405638116507,0.000408069400945,0.000410456467349,0.000412773045521,0.000415013465572,0.00041716939237,0.000419228239265,0.000421214991591,0.000423153639352,0.00042504920941,0.000426928053292,0.000428766126902,0.000430553634262,0.000432298058714,0.000434020469922,0.000435701050463,0.000437327020193,0.000438891510731,0.000440404892521,0.000441889347767,0.000443323713483,0.000444696376627,0.000446048311857,0.000447357144531,0.000448610677431,0.000449807470377,0.000450972569814,0.000452117958041,0.000453242245422,0.000454287179404,0.000455268810302,0.000456180900063,0.000456987908089,0.000457708811251,0.000458373767308,0.000458987493,0.000459536105253,0.000460037604496,0.000460492395188,0.000460915774133,0.000461302398647,0.000461628350039,0.000461924067468,0.000462202817627,0.000462412014771,0.000462545891528,0.000462620559931,0.000462613037035,0.000462503401924,0.000462299085022,0.000461998434894,0.000461648710773,0.000461232384513,0.000460730701726,0.000460172130778,0.00045959069649,0.000458992546172,0.000458366222466,0.000457741704519,0.000457134061435,0.000456524166759,0.000455913686379,0.000455304714635,0.00045469954925,0.000454082768047,0.000453425113605,0.000452677149819,0.000451831684746,0.000450855429504,0.000449716939766,0.000448447786108,0.000447043351642,0.000445501781816,0.000443820574874,0.000442001436937,0.000440067231554,0.000438055067573,0.000436006551583,0.00043392463781,0.000431845904786,0.000429771373082,0.000427663521133,0.000425508487863,0.000423299947818,0.000421048436007,0.00041874588273,0.000416393951599,0.000413943680026,0.000411399328391,0.000408760566316,0.000406017323058,0.000403176505936,0.000400235803569,0.000397255241802,0.000394228670221,0.000391153480285,0.00038804220397,0.000384883311552,0.000381703913385,0.000378503185312,0.000375275170852,0.000372036752819,0.000368826759002,0.000365590356504,0.000362304548633,0.000358986243237,0.000355610604885,0.000352207936809,0.000348778101239,0.000345295968664,0.000341740883446,0.000338119232435,0.000334420437681,0.000330643688146,0.000326857613703,0.000323033655039,0.000319161483743,0.000315240036604,0.000311241349297,0.000307189287704,0.000303139354446,0.000299089365281,0.000295045763466,0.000290983643609,0.000286856467656,0.000282662312171,0.000278434007521,0.000274157133178,0.0002698464227,0.000265518432137,0.000261141226707,0.000256690836016,0.000252157579824,0.000247567028159,0.000242921054843,0.000238226772179,0.000233463148398,0.000228640221435,0.000223764029963,0.000218835095703,0.000213830030488,0.000208770627644,0.000203663413315,0.000198517809594,0.000193341894352,0.000188162510971,0.000183010697527,0.000177891088449,0.000172786909178,0.000167710539272,0.000162636786325,0.000157581277367,0.000152524160562,0.000147454204066,0.000142386821597,0.000137295715978,0.000132159410428,0.000126967471305,0.000121740271309,0.000116436829958,0.000111083945759,0.000105689433591,0.000100253432156,9.48064180089e-05,8.93192388773e-05,8.37882719616e-05,7.82376601185e-05,7.2681062333e-05,6.71016966504e-05,6.14872106577e-05,5.58731895279e-05,5.02208232202e-05,4.45476559268e-05,3.88394333601e-05,3.30956057652e-05,2.73335966977e-05,2.15389916126e-05,1.56929436831e-05,9.79602721949e-06,3.87977015302e-06,-2.04647008757e-06,-7.94918767328e-06,-1.38153626158e-05,-1.96558392182e-05,-2.54688961427e-05,-3.12665381398e-05,-3.70702606718e-05,-4.28684805963e-05,-4.86456160689e-05,-5.44084998836e-05,-6.01660223122e-05,-6.59438835192e-05,-7.1787769343e-05,-7.76906781332e-05,-8.36523243252e-05,-8.96443657664e-05,-9.56378448453e-05,-0.000101614521261,-0.00010757879297,-0.000113549978776,-0.000119547702414,-0.000125567804845,-0.000131596269558,-0.000137605234556,-0.000143598698762,-0.000149599127808,-0.000155615135614,-0.000161669760095,-0.000167752122264,-0.000173854274773,-0.000179974701585,-0.000186104396074,-0.000192232633166,-0.000198379935541,-0.00020453298494,-0.000210686672859,-0.000216820291923,-0.00022293364907,-0.000229023079458,-0.00023508767033,-0.000241128016816,-0.000247126353878,-0.000253086140176,-0.000258998198042,-0.000264865054089,-0.000270682290309,-0.000276464839308,-0.000282186296921,-0.000287862485535,-0.000293508061367,-0.000299105072719,-0.00030466588834,-0.000310188944398,-0.000315670706373,-0.000321103735017,-0.000326495582857,-0.000331854538185,-0.00033720134016,-0.000342551102823,-0.00034787007271,-0.000353164983626,-0.000358437816334,-0.000363686086784,-0.000368898608013,-0.000374089851031,-0.000379292454675,-0.000384480570702,-0.000389655079859,-0.000394801760167,-0.000399922443571,-0.000405027498009,-0.000410100669462,-0.000415163005604,-0.000420228302609,-0.000425332717013,-0.000430418013333,-0.000435467068236,-0.000440474316594,-0.00044543493632,-0.000450330685329,-0.000455169281279,-0.000459960073562,-0.000464717728093,-0.000469427090791,-0.000474023849757,-0.000478517758377,-0.000482946645151,-0.00048732202192,-0.000491649115195,-0.00049596239266,-0.000500276633146,-0.000504598994446,-0.000508884450206,-0.000513126223909,-0.000517344136407,-0.00052156365028,-0.000525770424157,-0.000529953934236,-0.000534105963558,-0.000538225872093,-0.000542273129491,-0.000546194554829,-0.000549999509836,-0.000553721783556,-0.000557346286077,-0.000560859965467,-0.000564283594786,-0.000567616352619,-0.000570877104371,-0.000574050789525,-0.000577121080757,-0.000580148594704,-0.000583168581697,-0.000586181538142,-0.000589213798581,-0.000592247101683,-0.000595273221029,-0.000598259234654,-0.000601205721985,-0.000604096912256,-0.000606977121207,-0.00060985924754,-0.000612695300568,-0.000615472693038,-0.000618170266927,-0.000620777424805,-0.00062332766132,-0.000625838576734,-0.000628303837289,-0.000630703777088,-0.00063302648471,-0.000635242887265,-0.000637349634202,-0.000639354304686,-0.000641256715961,-0.000643065921924,-0.000644760094308,-0.00064634627065,-0.000647824654689,-0.00064924510023,-0.000650618674038,-0.000651948970677,-0.000653229752349,-0.000654486396277,-0.000655722809982,-0.000656951172266,-0.000658160511753,-0.000659349274269,-0.000660517105378,-0.000661642654503,-0.000662700770852,-0.000663691963225,-0.000664621534144,-0.000665473968524,-0.000666209327613,-0.000666835424282,-0.000667363488033,-0.000667794567273,-0.00066813513772,-0.000668362462958,-0.000668501407959,-0.000668548297872,-0.000668522374377,-0.000668427005487,-0.0006682858631,-0.000668103655239,-0.000667851958162,-0.000667545492809,-0.000667169756504,-0.000666751358086,-0.000666282924709,-0.000665747456723,-0.000665119428016,-0.000664370083081,-0.000663505088955,-0.000662529124122,-0.000661465425491,-0.000660322964709,-0.000659075587069,-0.000657726837751,-0.00065582710703,-0.000653087836878,-0.000649323576132,-0.000644474150666,-0.000636317173155,-0.000632149938119,-0.000629374961333,-0.000627759771832,-0.000627000244972,-0.000626678720124,-0.000626337908596,-0.000626404223854,-0.000627154206437,-0.00062879358423,-0.00063141610944,-0.000637225477198,-0.000638911459331,-0.000639096832706,-0.000638025161802,-0.000636023301847,-0.000633453549987,-0.000630773490731,-0.000628000976497,-0.000625168070754,-0.000622242278742,-0.0006192402767,-0.000616176226078,-0.0006130404586,-0.000609797771138,-0.000606421150178,-0.000602912708538,-0.000599335032976,-0.000595683469614,-0.000591915827924,-0.000588082896025,-0.000584189398908,-0.000580236863833,-0.000576240224277,-0.000572193140618,-0.000568118211915,-0.000564023331672,-0.000559889563539,-0.000555724568416,-0.000551539118334,-0.000547322549227,-0.000543046443205,-0.000538721937816,-0.000534344499142,-0.000529922810188,-0.000525478087856,-0.00052099425378,-0.000516504040589,-0.000512002261467,-0.00050748530539,-0.00050295128225,-0.000498423657834,-0.000493890190047,-0.00048935457191,-0.000484794033462,-0.000480205364053,-0.000475620947983,-0.000471034464586,-0.000466414165054,-0.000461782923946,-0.000457148470469,-0.000452511284594,-0.000447839524034,-0.00044311501317,-0.000438373959354,-0.000433606531263,-0.000428805388135,-0.000423907747129,-0.000418949852652,-0.000413896798628,-0.000408735472177,-0.000403464041454,-0.00039813549182,-0.000392783431999,-0.000387403457978,-0.000381950496919,-0.000376439473353,-0.000370905116472,-0.000365350806645,-0.000359762674645,-0.000354159094058,-0.000348551322164,-0.00034291454069,-0.000337203899953,-0.000331424343007,-0.000325597349285,-0.000319713025242,-0.000313766990422,-0.000307729570189,-0.000301671574895,-0.00029557575932,-0.000289436553464,-0.000283244449568,-0.000277033762332,-0.000270794545416,-0.000264546467737,-0.000258275750544,-0.000251973680186,-0.000245662501653,-0.000239315361105,-0.00023290029811,-0.000226415906426,-0.000219893722051,-0.000213331438706,-0.0002067220452,-0.000200074219134,-0.000193402241769,-0.00018672775555,-0.000180050603993,-0.000173358604018,-0.000166659709868,-0.000159965078165,-0.000153277851074,-0.000146599699121,-0.000139891706842,-0.000133156990255,-0.000126395569521,-0.000119568893843,-0.000112680633628,-0.000105770112339,-9.88722526732e-05,-9.19982061092e-05,-8.51260316982e-05,-7.82438271583e-05,-7.13566875681e-05,-6.4511299119e-05,-5.76937005946e-05,-5.09416569689e-05,-4.42712518545e-05,-3.76527764087e-05,-3.1090445786e-05,-2.45125138376e-05,-1.79313743571e-05,-1.13341182311e-05,-4.75896116219e-06,1.80961553374e-06,8.37598343671e-06,1.49377473168e-05,2.1541580198e-05,2.8202187205e-05,3.49372259663e-05,4.17109958719e-05,4.84822369575e-05,5.52403623864e-05,6.19617269885e-05,6.86901447105e-05,7.54312395759e-05,8.22054602448e-05,8.89877393501e-05,9.57443350327e-05,0.00010245424668,0.000109076654684,0.000115663868725,0.000122219898835,0.00012876176786,0.000135275994029,0.00014173716275,0.000148151104538,0.000154494287393,0.000160766336928,0.000166970861472,0.000173137935462,0.000179274550154,0.000185369806506,0.000191409032472,0.000197406484036,0.000203376084261,0.000209299770394,0.000215165364093,0.000220993489251,0.000226819300508,0.00023265144865,0.000238445735493,0.000244196147897,0.000249940885019,0.000255676927892,0.000261373791951,0.000267033713843,0.000272684555365,0.000278317119679,0.000283915400734,0.000289462404231,0.000294960575151,0.000300447987685,0.00030588085867,0.000311241190182,0.000316558017615,0.000321862805836,0.000327143958606,0.000332378656994,0.000337579069044,0.000342721533796,0.000347832535064,0.000352880501127,0.000357877553614,0.000362851271467,0.00036777254517,0.000372621636802,0.000377375986486,0.000382075131602,0.000386707899755,0.000391280327448,0.000395816540376,0.000400297620234,0.000404731414806,0.000409091332896,0.000413404594825,0.000417641121911,0.000421783419945,0.000425815187593,0.000429762784096,0.000433617525924,0.000437363703805,0.000440972851134,0.000444457331395,0.000447847368154,0.000451139630706,0.000454360309738,0.000457559118435,0.000460749020693,0.000463909675351,0.000467012951605,0.00047006897338,0.000473121660943,0.000476176584197,0.000479195283521,0.000482146342716,0.000485005372666,0.000487763357172,0.000490422172381,0.000492968940426,0.000495437915042,0.000497809465173,0.000500088031471,0.00050225885197,0.000504324889668,0.000506318128508,0.00050827192473,0.000510213178548,0.000512104955855,0.000513933736363,0.000515730251989,0.000517508225046,0.000519232444416,0.000520893170083,0.000522509818973,0.000524107025764,0.000525654659896,0.000527132385104,0.000528544624655,0.00052992998343,0.000531285580547,0.000532575497666,0.000533801775232,0.000535006614799,0.000536199847613,0.000537309207125,0.000538337675191,0.000539300257392,0.000540210553402,0.000541007629159,0.000541669797489,0.000542208669125,0.0005426683914,0.000543006132029,0.000543187228568,0.000543252861787,0.000543238847283,0.000543131624813,0.000542916353665,0.000542613227895,0.000542269344517,0.000541887993578,0.000541476438312,0.000541005770339,0.000540513451611,0.000540022893533,0.00053949593157,0.000538925301882,0.000538318071584,0.00053771162158,0.000537065996535,0.000536366595203,0.000535592985845,0.000534757568759,0.000533871241434,0.000532894170814,0.000531834798257,0.00053070163074,0.000529491030694,0.000528179391509,0.000526756977606,0.00052524848798,0.000523648976364,0.000521991748486,0.000520258527132,0.000518453288021,0.000516575336346,0.000514611809958,0.000512566544802,0.000510445979057,0.000508254230369,0.00050598904166,0.000503650833592,0.000501251702481,0.000498786858174,0.000496266689983,0.000493706855518,0.000491117293916,0.000488489084499,0.000485814536462,0.000483112250226,0.000480385133907,0.000477624029602,0.00047480850869,0.000471916209521,0.000468927010903,0.000465799850716,0.000462541225177,0.000459183304148,0.000455732387152,0.00045218696764,0.000448535533433,0.000444788843767,0.000440944864077,0.000437035674468,0.000433066567358,0.000429091375372,0.000425113288812,0.000421099354045,0.000417047196299,0.000412974289115,0.000408888134273,0.000404772136937,0.000400637274068,0.000396459556501,0.000392240912396,0.000387972721102,0.000383642467461,0.000379296994952,0.000374926730746,0.000370517653735,0.000366047759439,0.00036153804261,0.000356995570621,0.000352434323101,0.000347890223161,0.000343347968863,0.000338801828828,0.000334217790436,0.000329584681737,0.000324932701824,0.000320264696044,0.000315598580742,0.000310890467077,0.000306131824112,0.00030131450364,0.000296455492181,0.000291580307414,0.000286711303689,0.000281864233751,0.000277009975999,0.000272111398146,0.000267159463352,0.000262187432538,0.000257226023126,0.000252294665893,0.000247349249249,0.000242369498379,0.000237319524158,0.000232205314252,0.000227007336501,0.000221798283273,0.000216623290231,0.000211477427335,0.000206335432749,0.000201148495952,0.000195921297788,0.000190669335151,0.000185434110995,0.000180224102783,0.000175055686132,0.000169906097983,0.00016469324026,0.000159414070353,0.000154081655264,0.000148704831386,0.000143341315402,0.000137977468658,0.000132593590921,0.00012717250691,0.000121703553008,0.000116208386132,0.000110726675545,0.000105272089117,9.98122207642e-05,9.43638918983e-05,8.892448405e-05,8.34819313605e-05,7.8050436235e-05,7.26494273e-05,6.72617574239e-05,6.19085672208e-05,5.65766447251e-05,5.12642794125e-05,4.60027791572e-05,4.07927983797e-05,3.55934225116e-05,3.04181942186e-05,2.5250188675e-05,2.00868692116e-05,1.49520393903e-05,9.84007829845e-06,4.74485447349e-06,-3.41702781551e-07,-5.42377920051e-06,-1.04987270916e-05,-1.55482978426e-05,-2.0584362838e-05,-2.56133706586e-05,-3.06332924676e-05,-3.56344294264e-05,-4.06336853242e-05,-4.56307874932e-05,-5.06355851204e-05,-5.56352830257e-05,-6.06082997593e-05,-6.55905272788e-05,-7.05693489655e-05,-7.55112473488e-05,-8.04460441305e-05,-8.53483538586e-05,-9.02269951181e-05,-9.50711716348e-05,-9.98649998002e-05,-0.0001046151433,-0.000109357668008,-0.000114095788854,-0.000118781467355,-0.000123431375377,-0.000127994064312,-0.000132465422508,-0.000136883846127,-0.000141269754088,-0.00014563384698,-0.000149972878238,-0.000154271624738,-0.000158505961115,-0.000162707884349,-0.000166895222944,-0.000171077517482,-0.000175293357445,-0.000179538885304,-0.000183759015543,-0.000187931578731,-0.000192076366282,-0.000196202505502,-0.000200303010158,-0.000204368262227,-0.000208388005207,-0.000212369000764,-0.000216326171071,-0.000220227918753,-0.000224095255798,-0.000227939473629,-0.000231738755017,-0.000235455746497,-0.000239107900178,-0.000242679209562,-0.000246177132058,-0.000249583760119,-0.000252884768189,-0.000256068103827,-0.000259159717254,-0.000262151846443,-0.000265063969844,-0.000267934772981,-0.000270738872916,-0.000273499015608,-0.000276214169294,-0.000278911722083,-0.000281605608903,-0.000284286941049,-0.000286921841296,-0.000289505717096,-0.000292029571752,-0.000294485141068,-0.000296882413194,-0.000299275308367,-0.000301630360108,-0.000303962778354,-0.000306218603935,-0.000308420837359,-0.000310566188276,-0.000312690501823,-0.000314809251194,-0.000316920902898,-0.000319028204941,-0.00032107415062,-0.000323048989054,-0.000324943819471,-0.000326794383545,-0.000328609907995,-0.000330380590316,-0.000332124500445,-0.000333803564064,-0.000335406620976,-0.000336928146973,-0.000338381471359,-0.000339802184969,-0.000341181872749,-0.000342531224175,-0.000343806325752,-0.000345037398751,-0.000346206351643,-0.000347314061314,-0.000348365725502,-0.000349385241532,-0.000350365855442,-0.000351263982671,-0.000352100836632,-0.000352856691913,-0.00035354703402,-0.000354198082729,-0.00035479780539,-0.000355348799758,-0.000355860253594,-0.000356337890913,-0.000356756522107,-0.000357157928158,-0.000357553378837,-0.000357909619491,-0.000358241941105,-0.000358525763265,-0.000358742768433,-0.000358902505525,-0.000359012471392,-0.000359041563303,-0.000358994524509,-0.000358874266276,-0.000358636609019,-0.000358331429029,-0.00035795344145,-0.000357509713178,-0.00035700633551,-0.000356459364849,-0.000355874417772,-0.000355229172581,-0.000354581426747,-0.00035391523702,-0.000353237930454,-0.000352562241016,-0.000351882066663,-0.000351225140256,-0.000350576588724,-0.000349935879719,-0.000349274215001,-0.0003485899747,-0.000347872062329,-0.000347095232796,-0.00034625718746,-0.000345347921092,-0.000344374844849,-0.000343309364757,-0.000342153516522,-0.000340899653551,-0.000339542383148,-0.000338119564884,-0.000336618389227,-0.000335067230443,-0.000333498491549,-0.000331926036697,-0.000330328467471,-0.000328678639323,-0.000327006377784,-0.000325292870029,-0.000323566052457,-0.000321831566316,-0.000320071343015,-0.000318296938199,-0.000316506824022,-0.000314655385767,-0.000312750351155,-0.000310826258074,-0.000308858013059,-0.00030685648493,-0.000304803756781,-0.00030271224129,-0.000300596711548,-0.000298438999726,-0.000296207797755,-0.00029393011295,-0.000291614614329,-0.000289256918844,-0.000286867340797,-0.000284468537149,-0.000282064489449,-0.000279666797723,-0.000277239255264,-0.000274812310566,-0.000272403829909,-0.000270236857419,-0.000268483275251,-0.000267144299164,-0.000266268217812,-0.000265829015434)
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(0, 260)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Rattus_norvegicus-male-liver-H3K4me3-ERR572264.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) : 0,260',bty='n')
dev.off()
