# R script for Peak Model
#  -- generated by MACS
p <- c(0.0412763674266,0.0480852701172,0.054848812815,0.0616859122577,0.0686762549191,0.0685941165539,0.0685377230495,0.0686345727637,0.0685193338633,0.068564693856,0.0684457771183,0.0684506809013,0.0683722203734,0.0683513792956,0.0682888560624,0.068119675549,0.0681356128438,0.067826674515,0.0679370096324,0.0679725620592,0.0680191479976,0.0681221274405,0.0683072452487,0.0681503241928,0.0679088128802,0.0678156410033,0.0679492690899,0.0681993620227,0.068207943643,0.0681969101312,0.0680485706956,0.0677518918243,0.0676182637377,0.0678352561353,0.0681270312235,0.0683195047061,0.0682716928219,0.0681221274405,0.0680632820446,0.0679222982834,0.067880616128,0.0679835955709,0.0680277296179,0.0679308799037,0.0677420842583,0.0676660756219,0.0676366529239,0.0675839372567,0.0676060042802,0.0675324475352,0.0677126615603,0.0676415567069,0.0676709794049,0.0676574940016,0.0676342010324,0.0676758831879,0.0677285988551,0.0679100388259,0.0679039090972,0.0680081144859,0.067797251817,0.0679382355782,0.0678242226235,0.0677616993903,0.0676697534591,0.0675324475352,0.0673068735174,0.0670249059951,0.0669464454672,0.066776039008,0.0668226249465,0.066776039008,0.0667772649538,0.066741712527,0.0667576498218,0.06679565414,0.0668912779084,0.0670065168089,0.0669734162736,0.0670923330113,0.0670960108485,0.0672271870437,0.0673436518899,0.0673485556729,0.0673877859368,0.0673767524251,0.0673755264793,0.0672884843312,0.0675557405045,0.0675079286202,0.0673142291919,0.0672382205554,0.0672235092064,0.0671340151668,0.0671891827255,0.0673816562081,0.067137693004,0.0673399740526,0.0671291113838,0.0672284129894,0.0674074010688,0.0672455762299,0.0671879567797,0.0673706226963,0.0674270162008,0.0672406724469,0.067563096179,0.0675373513182,0.067811963166,0.0679308799037,0.0679333317952,0.0680596042073,0.0680179220519,0.0680350852924,0.0679357836867,0.0679566247644,0.0678683566705,0.0677653772276,0.0673399740526,0.067176923268,0.0670678140963,0.0669550270874,0.0670641362591,0.0671168519263,0.0671744713765,0.0673191329749,0.0675201880777,0.0676292972494,0.0678720345077,0.067787444251,0.067905135043,0.0681356128438,0.0682103955345,0.068168713379,0.0680375371839,0.0678732604535,0.0679284280122,0.0679382355782,0.0680608301531,0.0682496257984,0.0683513792956,0.06820303986,0.0682434960697,0.0682483998527,0.0685193338633,0.0686738030276,0.0684690700875,0.0685193338633,0.0686174095232,0.0687963976026,0.0688393057038,0.0690612018844,0.0691004321483,0.0691200472803,0.0691090137686,0.0691384364666,0.0693431694067,0.0693554288641,0.069214445103,0.0692352861807,0.0692978094139,0.0692904537394,0.0692818721192,0.0694522785783,0.0693358137322,0.0694804753306,0.0692818721192,0.0693051650884,0.0693983369654,0.0694743456018,0.0694780234391,0.0697023715111,0.0697918655508,0.0697391498836,0.069874003916,0.0697783801476,0.0699316233662,0.0698580666213,0.069859292567,0.069839677435,0.0699598201185,0.0698458071638,0.0696692709759,0.069903426614,0.0700726071274,0.0701375822521,0.0704452946351,0.0706083454197,0.0707615886384,0.0707481032351,0.0709479323922,0.0711367280376,0.0714088879939,0.0714517960951,0.0714456663664,0.0717533787494,0.0718306133316,0.0721162586911,0.0720892878846,0.0721775559786,0.0720549614037,0.0718588100838,0.0719679192555,0.0719789527672,0.0721677484126,0.072258468398,0.0724251970199,0.0723540921665,0.0723798370272,0.0723737072984,0.0724852683616,0.0725845699673,0.0727145202167,0.0728285331714,0.0732098022993,0.073269873641,0.0732024466248,0.0734022757819,0.0736499168233,0.0739183989423,0.074027508114,0.0743977437302,0.0744504593974,0.0744651707464,0.0740875794557,0.0741795253869,0.0741268097197,0.0742212075423,0.0744798820954,0.0746907447642,0.0748476658201,0.0748525696031,0.0750622063262,0.0752951360186,0.0756040743473,0.0755292916566,0.0759068829474,0.0760821931895,0.0761863985782,0.0761900764154,0.076343319634,0.0764622363717,0.0766203833733,0.07670497363,0.0766694212033,0.0769158362989,0.0768398276624,0.0772002557127,0.077110761673,0.0772750384034,0.0775901064609,0.0778377475022,0.0778990447897,0.0780142836901,0.078176108529,0.0783195441816,0.0783943268723,0.0783170922901,0.0786615830456,0.0788319895047,0.0788393451792,0.0788945127379,0.0788969646294,0.0789999440724,0.0792304218732,0.0796570509939,0.0802246638757,0.0804085557381,0.0806451632677,0.0808082140523,0.0809626832167,0.0811796756143,0.0815854636572,0.081879690637,0.0821812732913,0.0820758419569,0.0821481727561,0.0822879305715,0.0822033403148,0.0821886289658,0.0823443240759,0.0825331197213,0.0826397770014,0.0829891715399,0.082954845059,0.0831399628671,0.08329198014,0.0834623865991,0.0837210611522,0.0841415605441,0.0842457659328,0.0844198502292,0.084620905332,0.0846074199288,0.0847692447676,0.0850941203912,0.0853675062932,0.0855011343799,0.0859387970123,0.0863482628925,0.0869281352318,0.0876404097121,0.0882668679898,0.0891679381154,0.090381624407,0.0912679831837,0.0920746554866,0.0930811569466,0.0939086703272,0.0945216432018,0.0955060776383,0.095883668929,0.0964831564003,0.0968987520093,0.0970103130725,0.0973462222077,0.0977201356612,0.0981357312701,0.0982656815195,0.0986518544305,0.0987879344087,0.0991324251642,0.0993947775545,0.0995333094241,0.0996730672395,0.0999807796225,0.10009111474,0.100143830407,0.100563103853,0.100724928692,0.100807067057,0.101139298355,0.101406554529,0.101592898283,0.102010945783,0.102013397675,0.102185030079,0.102540554347,0.102628822441,0.102869107807,0.103276121796,0.103358260161,0.103597319582,0.103947940067,0.104137961658,0.104416251343,0.10466511833,0.104671248059,0.104917663154,0.105323451197,0.105452175501,0.105705946271,0.105523280354,0.105839574358,0.106030821894,0.106074955941,0.106258847804,0.106787230422,0.106978477958,0.107060616324,0.107169725495,0.107340131954,0.107999690767,0.107812121068,0.107779020533,0.108119833451,0.108333148011,0.108317210716,0.108398123136,0.108351537197,0.108562399866,0.108643312286,0.108545236626,0.108931409537,0.109316356502,0.109578708892,0.109778538049,0.109852094794,0.110070313138,0.110212522845,0.11018800393,0.110483456855,0.110798524913,0.110997128124,0.111379623198,0.111374719415,0.111525510742,0.112191199284,0.112498911667,0.112858113771,0.113396303955,0.113883004417,0.114112256272,0.114440809733,0.114617345921,0.115094238818,0.115513512264,0.115896007337,0.115991631106,0.116299343489,0.116559243988,0.116719842881,0.116712487206,0.116825274215,0.117060655799,0.117276422251,0.117443150873,0.11721022118,0.117667498945,0.117877135668,0.118005859972,0.11824001561,0.118465589628,0.118727942018,0.118876281454,0.119484350545,0.119882782914,0.120136553684,0.120396454182,0.120563182804,0.120890510319,0.121094017314,0.121463026984,0.121665308033,0.12191417502,0.121590525342,0.121692278839,0.122024510137,0.122148330658,0.12247933601,0.122475658173,0.122579863562,0.122993007279,0.123274974801,0.123522615843,0.123740834186,0.123818068768,0.123905110916,0.123929629831,0.124253279509,0.124282702207,0.124415104348,0.124343999495,0.12454995838,0.12458183297,0.124970457772,0.125231584217,0.125301463125,0.125528263088,0.125303915016,0.125875205735,0.125789389533,0.125877657627,0.125804100882,0.126028448954,0.126001478147,0.125965925721,0.126198855413,0.126406040245,0.126748079109,0.126510245633,0.126990816367,0.127010431499,0.127158770934,0.127189419578,0.127213938493,0.127358600092,0.127429704945,0.127139155802,0.127005527716,0.12700430177,0.126776275861,0.127021465011,0.127169804446,0.127287495238,0.12710237743,0.126824087745,0.126462433749,0.126614451022,0.126765242349,0.126754208837,0.127083988244,0.126875577466,0.126726012085,0.126360680252,0.126288349453,0.126354550523,0.12649676023,0.126469789423,0.126395006733,0.12628344567,0.125670472795,0.12567782847,0.12559691605,0.125764870618,0.125758740889,0.125578526864,0.125656987392,0.125621434965,0.125404442567,0.125540522546,0.1255392966,0.125447350669,0.125307592853,0.124955746423,0.124985169121,0.12485276698,0.124502146496,0.124128233043,0.124130684934,0.123910014699,0.123816842822,0.123609657991,0.1232320667,0.122926806209,0.122707361919,0.122638708958,0.12228318469,0.122393519808,0.122177753356,0.121737638832,0.121657952358,0.121361273487,0.121143055144,0.121225193509,0.120905221668,0.120536211998,0.120541115781,0.119930594798,0.119632689981,0.11961552674,0.11931271814,0.119045461967,0.118725490126,0.118471719356,0.118056123747,0.117942110793,0.117548582207,0.117465217896,0.11718447632,0.116630348841,0.116441553196,0.116352059156,0.116366770505,0.11567043332,0.115405629038,0.115209477718,0.115051330716,0.114636961053,0.114340282182,0.114119611947,0.113537287716,0.113127821836,0.11265092894,0.112842176476,0.1128642435,0.112227977656,0.111768248,0.111659138829,0.111271739972,0.111165082692,0.110948090294,0.110751938974,0.11049081253,0.110228460139,0.109953848292,0.110002886121,0.109850868849,0.109577482947,0.109415658108,0.109383783518,0.109516185659,0.109219506788,0.109171694904,0.108692350116,0.108363796655,0.108297595584,0.108078151295,0.107956782666,0.107780246478,0.107405107079,0.106953959043,0.107012804439,0.106751677995,0.106583723427,0.106363053192,0.106333630494,0.106018562437,0.105736594915,0.105416623074,0.105003479357,0.104698218865,0.104012915191,0.103968781144,0.103876835213,0.103743207127,0.103117974795,0.102926727258,0.102397118694,0.101868736076,0.101397972909,0.100908820555,0.10043437955,0.0994977569974,0.0985317117471,0.0975386956903,0.0967712536514,0.0958824429833,0.0951566830998,0.0944309232163,0.0938154984503,0.0931829104438,0.0927317624081,0.0923088111246,0.0918748263295,0.0915867290784,0.0911907486015,0.0908143832565,0.0905839054557,0.0903877541358,0.0900261001398,0.0897232915398,0.0895234623827,0.0891336116345,0.0891274819057,0.0888749370814,0.0885047014652,0.0884201112085,0.0882435750206,0.0880694907242,0.0880143231655,0.0878549502181,0.0875239448659,0.0874810367647,0.0872309438318,0.0873008227395,0.0871745503274,0.0872517849096,0.0871941654594,0.0871402238464,0.0869036163168,0.0868398671379,0.0869072941541,0.0867994109282,0.0865554477241,0.0862011494026,0.0859412489038,0.0857598089329,0.0853160165717,0.0851505138956,0.0850279193207,0.0848293161094,0.0842813183595,0.0841587237846,0.0839539908445,0.0839601205732,0.0839895432712,0.0835298136153,0.0834611606533,0.0832748168995,0.0831142180064,0.0830185942379,0.0829854937027,0.0825674462023,0.0826483586217,0.08228547868,0.0820623565536,0.0818662052338,0.0818527198305,0.0816982506661,0.0814175090896,0.0809430680847,0.0810803740086,0.0810141729381,0.0807971805405,0.0807738875713,0.080882996743,0.0808952562005,0.0806819416401,0.0803300952101,0.0803043503494,0.0802896390004,0.0800370941761,0.0799574077024,0.0797220261186,0.0792549407882,0.0787829516748,0.0784715614545,0.0782128869014,0.0782165647387,0.0779505345111,0.0775790729491,0.0771536697742,0.0770212676333,0.076700069847,0.0769403552139,0.0768606687402,0.0765995422956,0.0764818515037,0.0763519012543,0.0762476958656,0.0763347380138,0.0762060137101,0.0761778169579,0.0763347380138,0.076020895902,0.0758112591789,0.0757144094648,0.0757107316275,0.0754679943692,0.0753772743837,0.0753343662825,0.075331914391,0.0751357630712,0.0749383858056,0.074721393408,0.0746895188185,0.0746453847715,0.0744994972274,0.074305797799,0.0740937091844,0.0739551773148,0.073998085416,0.0737639297779,0.0734071795649,0.0732343212143,0.0730957893447,0.0731080488022,0.0729094455908,0.0728726672183,0.0729290607228,0.0728089180394,0.0724104856709,0.072233949483,0.0723087321737,0.0724104856709,0.0721787819243,0.0717938349591,0.0716074912052,0.0715731647243,0.0714027582651,0.0711612469526,0.0712164145113,0.071305908551,0.0710987237194,0.0708339194376,0.0707775259331,0.0707444253979,0.070587504342,0.0704636838213,0.0702920514165,0.0702381098035,0.0700333768634,0.0697011455654,0.0697832839306,0.0695503542383,0.0692978094139,0.06951234992,0.0694522785783,0.0694718937103,0.0696128774715,0.069595714231,0.0695135758658,0.0695993920682,0.0694081445314,0.0693713661589,0.0693345877864,0.0690293272949,0.0690771391791,0.0689251219062,0.0685083003515,0.0684359695523,0.0686112797944,0.0684212582033,0.0683697684819,0.0684347436066,0.0685242376462,0.068481329545,0.0682753706592,0.0681527760843,0.0682864041709,0.0683268603806,0.067890423694,0.0677886701968,0.0677715069563,0.0677236950721,0.0676243934664,0.0675974226599,0.067772732902,0.0676047783344,0.0676783350794,0.0674772799765,0.0676587199474,0.0677604734446,0.0677592474988,0.0675827113109,0.0676170377919,0.0674858615968,0.0672271870437,0.0673154551376,0.067186730834,0.0670825254453,0.0670175503206,0.0668422400785,0.0667650054963,0.0669010854744,0.0668998595287,0.0669501233044,0.0669231524979,0.0669476714129,0.0670003870801,0.0670445211271,0.066864307102,0.0670567805846,0.0669636087076,0.0668986335829,0.0666975784801,0.0664315482525,0.066512460672,0.0664462596015,0.0661937147772,0.0662832088169,0.0662844347626,0.066180229374,0.0661042207375,0.0660564088533,0.066106672629,0.0663530877246,0.0661912628857,0.066131191544,0.0661177061408,0.0660502791246,0.0659767223796,0.0657057883691,0.0658651613164,0.0657817970055,0.0658651613164,0.0656285537869,0.0657413407958,0.065818575378,0.065823479161,0.0657523743075,0.0659938856201,0.0661495807302,0.0660233083181,0.0661103504663,0.0659056175262,0.0659963375116,0.0659203288751,0.0657094662063,0.0655513192047,0.0655672564994,0.0655562229877,0.0655930013601,0.0656322316241,0.0655537710962,0.0657217256638,0.065749922416,0.0658749688824,0.0659742704881,0.0662439785529,0.0660527310161,0.0661029947918,0.0661422250557,0.0661103504663,0.0661924888315,0.0662709493594,0.0662292672039,0.0663077277319,0.0663665731278,0.0663212131351,0.0664707785165,0.0663163093521,0.0661630661335,0.0662059742347,0.0662562380104,0.0663641212363,0.066483037974,0.0661299655982,0.0659705926509,0.0659129732007,0.0660466012873,0.0659877558913,0.0659166510379,0.0659558813019,0.0658774207739,0.065715595935,0.0657732153853,0.0658786467197,0.0660895093885,0.0660380196671,0.0660515050703,0.0659325883326,0.0661740996452,0.066096865063,0.0661250618152,0.0660809277683,0.066155710459,0.0662684974679,0.0661029947918,0.0661630661335,0.0660747980395,0.0664205147408,0.0662341709869,0.0662844347626,0.0663187612436,0.0662832088169,0.0662991461116,0.0662562380104,0.0664008996088,0.0666767374023,0.0666706076736,0.0664867158112,0.0667784908995,0.066815269272,0.066825076838,0.0670383913983,0.0670788476081,0.0673264886494,0.0673399740526,0.067167115702,0.0670555546388,0.0672284129894,0.0671707935392,0.0672222832607,0.067162211919,0.067113174089,0.0672431243384,0.0671695675935,0.0673056475716,0.0673240367579,0.0677469880413,0.0677261469636,0.0676550421101,0.0675937448227,0.0678597750502,0.0679983069199,0.0679173945004,0.0679124907174,0.0679603026017,0.0679921771911,0.0677371804753,0.0678401599182,0.0679713361134,0.0680559263701,0.0681368387895,0.0682042658057,0.0680412150211,0.0682704668762,0.0682054917515,0.0682655630932,0.0684886852195,0.0685904387167,0.0686505100584,0.0686639954616,0.0686014722284,0.0686394765467,0.0688344019208,0.0687105814001,0.068872406239,0.0690697835046,0.0691421143038,0.06920954132,0.0693664623759,0.0694056926399,0.0695577099127,0.0694547304698,0.0696288147662,0.069893619048,0.0699340752577,0.0700444103751,0.069908330397,0.0698261920318,0.0697575390698,0.0697428277209,0.0696888861079,0.0697918655508,0.0696766266504,0.069581002882,0.0694400191208,0.0693174245459,0.0694228558803,0.0695797769362,0.0697011455654,0.0699340752577,0.0699487866067,0.0700909963136,0.0702785660132,0.0703288297889,0.070626734606,0.0707027432424,0.0709626437412,0.0709013464538,0.0710141334627,0.0708988945623,0.0708523086238,0.0709307691517,0.0708363713291,0.0708743756473,0.0709283172602,0.0709516102295,0.0706193789315,0.070612023257,0.0704538762553,0.070533562729,0.0707137767542,0.0705752448845,0.0706402200092,0.0706806762189,0.0706009897452,0.0705311108375,0.0707223583744,0.0707824297161,0.0707591367469,0.0707162286456,0.0705593075898,0.0708179821428,0.0707726221501,0.0707946891736,0.0709516102295,0.0711220166886,0.0711293723631,0.0713586242182,0.0714775409558,0.0717656382069,0.0717975127964,0.0716393657947,0.0718686176498,0.0719826306045,0.0717987387421,0.0718955884563,0.0719912122247,0.0718257095486,0.0718097722539,0.0718293873858,0.0720316684344,0.0720892878846,0.0719090738595,0.0719912122247,0.0721395516604,0.0717877052304,0.0720659949154,0.072224141917,0.0724117116167,0.0724178413454,0.0725244986256,0.0725330802458,0.0726850975187,0.0725073353851,0.0724975278191,0.0727733656126,0.0727083904879,0.0726532229292,0.0725392099746,0.0726385115802,0.0725600510523,0.0726556748207,0.0727512985892,0.0727231018369,0.0726814196815,0.0728787969471,0.0728248553341,0.0727954326361,0.0729045418078,0.0728199515511,0.0728407926288,0.0728775710013,0.0728383407374,0.0729302866685,0.073011199088,0.0727157461624,0.0729413201803,0.0730982412362,0.0731509569034,0.073035718003,0.0731619904151,0.0731203082596,0.0730639147552,0.0730761742127,0.0731374715001,0.0734893179301,0.0731840574386,0.0732122541908,0.0731914131131,0.0734549914492,0.0733642714637,0.0735886195358,0.0734831882014,0.0737124400565,0.0735702303496,0.0736033308848,0.0737136660022,0.073651142769,0.073611912505,0.0734623471236,0.073343430386,0.0732858109358,0.0734010498362,0.0732416768888,0.0733348487657,0.0731681201439,0.0730344920572,0.0732147060823,0.0733274930912,0.0732073504078,0.0732661958038,0.0730528812434,0.072962161258,0.0728555039778,0.0730283623285,0.0731325677171,0.0732674217495,0.0731239860969,0.0730945633989,0.0732723255325,0.073304200122,0.0735322260313,0.073700180599,0.0736842433042,0.0736486908775,0.0734831882014,0.0735886195358,0.073631527637,0.0737075362735,0.0737737373439,0.0737234735682,0.0735273222483,0.0735297741398,0.0738693611123,0.0739416919115,0.0738656832751,0.0738240011196,0.0737663816694,0.0737112141107,0.0737259254597,0.0739478216403,0.0738951059731,0.0738914281358,0.0736719838467,0.0737161178937,0.0739012357018,0.0736965027617,0.0736327535828,0.0735812638613,0.0735175146824,0.0734500876662,0.0734672509066,0.0737173438395,0.0736879211415,0.0734010498362,0.07328458499,0.0734267946969,0.0734194390224,0.0733912422702,0.073323815254,0.0731865093301,0.0731534087949,0.072971968824,0.0729756466613,0.0732404509431,0.0732404509431,0.0731950909503,0.0731975428418,0.0732588401293,0.073304200122,0.073372853084,0.073269873641,0.0732245136483,0.0732527104005,0.0730038434135,0.0731166304224,0.0730700444839,0.0728751191098,0.0728322110086,0.0728003364191,0.0728873785673,0.07303081422,0.0728579558693,0.0728407926288,0.0729204791025,0.0728346629001,0.0725845699673,0.0728285331714,0.0727365872402,0.0727672358839,0.0726434153632,0.0726863234645,0.072674064007,0.0725183688968,0.072356544058,0.0723651256782,0.072615218611,0.0726618045495,0.0728052402021,0.0726164445568,0.0725183688968,0.0723001505535,0.0723479624377,0.0725649548353,0.0725232726798,0.0725919256418,0.0725686326725,0.0725882478045,0.0724913980904,0.072620122394,0.0726115407738,0.0655047332662,0.0582802349667,0.0509123010146,0.0437662632431,0.0)
m <- c(0.0426522630598,0.0498409018461,0.0568860376912,0.0642071407309,0.0712412378883,0.0713086965358,0.0712191605127,0.0712571826595,0.071080563655,0.0709468728808,0.0710216906535,0.0711124531975,0.0712743539516,0.0711848179285,0.0712608622221,0.0712915252437,0.0716987301707,0.0716901445246,0.0717980783607,0.0719746973652,0.0719685647609,0.0719170508845,0.0720519681796,0.0719256365306,0.07196733824,0.0722604767266,0.0722923662691,0.0724910626491,0.0725842782348,0.0725290847959,0.072554841734,0.0724812504822,0.072202830246,0.0723512392705,0.0723966205425,0.0720446090544,0.0719072387176,0.0716202328354,0.0719084652385,0.0719342221767,0.0720286642832,0.0721966976416,0.0724150183555,0.0724236040015,0.0723757696878,0.0727032507586,0.0726946651126,0.0731030965604,0.0730380909546,0.0730454500798,0.0729976157661,0.0729743118697,0.0730368644338,0.0730810191849,0.0731214943734,0.072998842287,0.0729902566409,0.0728455271789,0.0727069303212,0.0725904108391,0.0726848529457,0.0726321125485,0.072500874816,0.0725707865053,0.0726885325083,0.0728136376364,0.07279033374,0.0727940133026,0.072771935927,0.0730736600597,0.0729914831618,0.0730442235589,0.0729927096826,0.0728847758466,0.0727707094062,0.0725511621714,0.0727228750925,0.0728246763242,0.073034411392,0.0728970410552,0.0730626213719,0.0730417705172,0.0731987651879,0.0732404668972,0.0732318812512,0.0732809420858,0.0733030194613,0.0733165111908,0.0731668756454,0.0733250968369,0.0731877265001,0.0732674503563,0.0732355608138,0.0733116051074,0.0735372849464,0.0736206883652,0.0734563345694,0.0735397379882,0.0736329535739,0.0736170088026,0.0736096496774,0.0735789866558,0.0735740805724,0.073586345781,0.0735470971133,0.0736820144084,0.0737359813265,0.0736562574703,0.0735274727795,0.0732576381893,0.0734624671737,0.0735164340917,0.0737433404517,0.0736182353235,0.0734673732572,0.073206124313,0.0734170859017,0.0731460247907,0.0733790637549,0.0736746552832,0.0734367102355,0.0734452958816,0.0731656491245,0.0733766107132,0.0734575610902,0.0736869204919,0.0736636165955,0.0736979591797,0.0736488983451,0.0734256715478,0.0734661467363,0.0733079255448,0.073360665942,0.0731963121461,0.0732478260224,0.073052809205,0.0727682563644,0.0729522344941,0.072881096284,0.0729939362035,0.0731300800194,0.0732686768771,0.0733226437952,0.0731582899993,0.0730012953287,0.0729448753689,0.0730368644338,0.0729203449516,0.0727854276565,0.0726774938205,0.0726578694867,0.0725303113168,0.0725339908793,0.0727032507586,0.0726357921111,0.0726308860276,0.0725155930664,0.0723168966863,0.0722715154144,0.0723512392705,0.0724861565656,0.0723917144591,0.0723193497281,0.0720495151379,0.0722150954546,0.0722617032474,0.072519272629,0.0727731624479,0.0728381680537,0.0728160906782,0.072600223006,0.0727302342177,0.0727756154896,0.0729461018898,0.072771935927,0.072699571196,0.072473891357,0.0723438801454,0.0723671840418,0.0721991506834,0.0722334932676,0.0721893385164,0.0721905650373,0.0720777251178,0.0721905650373,0.0722003772042,0.0721500898488,0.072157448974,0.0720384764501,0.0722445319553,0.0721562224531,0.0721194268272,0.0722003772042,0.0722101893711,0.0722457584762,0.0723328414576,0.0722886867065,0.0723034049568,0.0722764214978,0.0721255594315,0.0720691394717,0.0719182774054,0.0716263654397,0.0715221111662,0.0714043651632,0.0713577573704,0.07124369093,0.0713258678279,0.0713295473905,0.0713320004322,0.0712216135544,0.0712792600351,0.0715098459576,0.071479182936,0.0712633152638,0.0714485199143,0.0717060892959,0.0714804094568,0.0714951277072,0.0712608622221,0.0712817130768,0.0713418125991,0.0710167845701,0.0712596357012,0.0713871938711,0.0711553814278,0.0710621658421,0.0712007626997,0.0710572597586,0.0710437680291,0.0709824419859,0.0708683755455,0.0710499006334,0.0709873480693,0.0709873480693,0.070908850734,0.0708009168979,0.0707150604374,0.0706279774561,0.07061939181,0.0706561874359,0.0706978891453,0.07052004362,0.0703127615939,0.0702661538011,0.070212186883,0.0700343413577,0.0699435788137,0.0700183965864,0.0700870817549,0.0699779213979,0.0697853576222,0.0696479872854,0.0696038325343,0.0694591030723,0.0693560753197,0.069362207924,0.069226064108,0.0691684176274,0.0691218098346,0.069262859734,0.069217478462,0.0692653127757,0.0692861636304,0.0692432354001,0.0692321967124,0.0694149483212,0.0693769261744,0.0692493680045,0.0692137988994,0.0689169808502,0.0689231134545,0.0690347268532,0.0689206604128,0.0689697212474,0.0688249917854,0.0686802623234,0.0687599861796,0.0688617874113,0.0686287484471,0.0686238423636,0.0683687260238,0.0681418196639,0.0680731344955,0.0679100072205,0.0679014215745,0.067706404757,0.067643852193,0.0674905370849,0.0676573439225,0.0675665813785,0.0677677308003,0.0679492558882,0.067968880222,0.0679676537012,0.0680608692869,0.0680363388696,0.0679087806997,0.0678842502824,0.0678437750939,0.0679762393472,0.067842548573,0.0675690344202,0.0674500618964,0.0674279845208,0.0673139180804,0.0672795754962,0.0672341942242,0.0673433545812,0.0672808020171,0.0670771995536,0.0670992769292,0.0669999287391,0.067055122178,0.0670955973666,0.0672758959336,0.067453741459,0.0675162940231,0.0673077854761,0.0673200506847,0.067416945833,0.0673433545812,0.0673740176028,0.0673433545812,0.0672121168487,0.06690180707,0.0667987793174,0.0669275640081,0.0670305917607,0.0668515197145,0.0667006576482,0.0667779284627,0.0668490666728,0.0669079396743,0.0668429340685,0.0670906912831,0.0669766248427,0.0668735970901,0.0667852875879,0.0668870888196,0.0669398292168,0.0669692657175,0.0669361496542,0.0668883153405,0.0670477630528,0.0668134975677,0.0668098180052,0.0665841381661,0.0667337737116,0.0667693428166,0.0668797296944,0.0668551992771,0.0667006576482,0.0667987793174,0.0666381050841,0.0665657403531,0.06670311069,0.0666270663964,0.0663645909314,0.0665632873114,0.0663670439731,0.0663216627011,0.0664148782868,0.0663670439731,0.0664345026206,0.0665841381661,0.0666111216251,0.066874823611,0.0669987022183,0.0667435858785,0.0668821827362,0.0670771995536,0.0671176747421,0.0669815309262,0.0670146469895,0.0670722934701,0.0669459618211,0.0667742489001,0.0667288676281,0.0667877406296,0.0668588788397,0.0667337737116,0.0667067902525,0.0666982046065,0.06670311069,0.0666552763762,0.0666148011877,0.0666810333144,0.0667742489001,0.0668551992771,0.0667816080253,0.0667583041288,0.0668085914843,0.0669386026959,0.067019553073,0.0669876635305,0.0670097409061,0.0670330448025,0.0670256856773,0.0668662379649,0.0669398292168,0.066955773988,0.0671115421378,0.0671569234098,0.0672231555365,0.0672059842444,0.0673617523941,0.0675665813785,0.067751786029,0.0678094325096,0.0678388690104,0.0678118855514,0.0677333882161,0.0677113108405,0.0677493329873,0.0678290568435,0.0679860515141,0.0680768140581,0.0679504824091,0.0680265267026,0.0681295544553,0.0682975878137,0.0684729802973,0.0686667705939,0.0687244170745,0.0689169808502,0.0687428148875,0.0685343063405,0.0687158314284,0.0687514005335,0.0688936769538,0.0690126494776,0.0690494451036,0.069072749,0.069226064108,0.0693499427153,0.0694958986982,0.0698000758726,0.0698258328107,0.0698356449776,0.0697142194121,0.069651666848,0.0698000758726,0.0699423522929,0.0699276340425,0.0698454571446,0.0699840540022,0.0699276340425,0.0700012252943,0.0703201207191,0.0704317341178,0.0706255244143,0.0704795684315,0.0704268280343,0.0703851263249,0.0705274027452,0.0704145628256,0.0706794913324,0.0708892264002,0.0707947842936,0.0709554585269,0.0710695249672,0.0713111495775,0.0714889951029,0.0717514705679,0.0719808299695,0.0722236811007,0.0723684105627,0.072337747541,0.0725254052333,0.0725769191096,0.0726051290895,0.0727608972393,0.0727866541774,0.0729044001804,0.0728013724278,0.0730761131014,0.0729681792653,0.0730564887676,0.073152157395,0.073224522126,0.0733030194613,0.0733680250671,0.0735814396975,0.0736194618443,0.0739518489986,0.0739150533727,0.0740978049815,0.0741615840664,0.0743970760724,0.0745957724524,0.0746779493503,0.0748153196871,0.0748202257706,0.0751268559867,0.0750716625478,0.0752029002803,0.0754187679524,0.0758038955039,0.0758063485456,0.0758627685053,0.0763963050814,0.0764502719994,0.0768071895709,0.076869742135,0.0770659854733,0.0773664830851,0.0773983726276,0.0774989473385,0.0777258536984,0.0781036221246,0.078064373457,0.078244672024,0.0782655228787,0.0783599649853,0.0785856448243,0.0783992136529,0.0784065727781,0.0783636445479,0.078353832381,0.0782679759205,0.0781931581477,0.0782912798169,0.0784495010084,0.07857951222,0.0786297995755,0.0790492697111,0.0793436347185,0.0796392262469,0.0799213260457,0.0802242766992,0.0806094042506,0.0809430179257,0.0810877473877,0.0812103994742,0.0814777810226,0.081664212194,0.0820579253915,0.0820616049541,0.0821474614146,0.0823363456277,0.0824099368796,0.0825816498006,0.0827202466583,0.0829103573922,0.0830808437924,0.0830305564369,0.0830231973118,0.0834021922589,0.0834488000517,0.0836757064116,0.0838645906247,0.0839811101069,0.0840669665674,0.0841859390912,0.0841601821531,0.0846336192067,0.0848053321277,0.0848887355465,0.0853499073915,0.0853977417053,0.0855706811471,0.0855976646062,0.0858061731531,0.085979112595,0.0863164058327,0.086295554978,0.0866340747366,0.0867616329065,0.0867886163655,0.0870866609355,0.0870743957269,0.087254694294,0.0875318880093,0.0877857778283,0.0879562642284,0.0881132588991,0.0880924080444,0.0883229939669,0.0885548064102,0.0885523533685,0.0889448400451,0.0891337242582,0.089208542031,0.0895814043737,0.0896930177724,0.0898365207135,0.0900425762188,0.0903197699341,0.0904056263946,0.0907134831316,0.0909391629706,0.0913328761681,0.0917180037195,0.0916873406979,0.0919522692046,0.0922981480884,0.0926354413261,0.0929616958761,0.093749122271,0.0943108688269,0.0948063832561,0.0954920084193,0.0961077218933,0.0970521429589,0.0980088292331,0.0989311729231,0.0999700360953,0.1008286007,0.10172150789,0.10237524351,0.103184747281,0.103783289463,0.104297201705,0.104694594465,0.105049058995,0.105120197205,0.105393711358,0.105597313821,0.105509004319,0.105872054495,0.105739590241,0.105905170558,0.10597876181,0.106330773298,0.106203215128,0.106655801327,0.106577303992,0.107021304545,0.107261702634,0.107428509472,0.107797692252,0.107995162111,0.108253958013,0.108365571412,0.108740886797,0.109031572242,0.1095111419,0.109555296651,0.10990976118,0.109952689411,0.110339043483,0.110570855926,0.110850502683,0.110800215328,0.111184116359,0.111252801527,0.111509144388,0.111675951225,0.111769166811,0.111956824503,0.112047587047,0.112124857862,0.112319874679,0.112854637776,0.113099941949,0.11383953403,0.11391067224,0.114270042853,0.114408639711,0.114707910802,0.114947082371,0.115292961254,0.115789702204,0.115924619499,0.116026420731,0.115878011707,0.115943017312,0.116014155523,0.116456929555,0.116518255598,0.116880079253,0.117290963742,0.11734493066,0.11747126231,0.117738643858,0.117936113717,0.118315108664,0.118756656175,0.119036302933,0.119587010801,0.11994147533,0.120042050041,0.120243199463,0.120733807809,0.121028172816,0.12140226168,0.121716251021,0.121940704339,0.122017975154,0.12211119074,0.122345456225,0.122547832167,0.122670484254,0.122848329779,0.12321873908,0.123276385561,0.123511877567,0.123509424525,0.123813601699,0.124107966707,0.123958331161,0.124122684957,0.124403558235,0.12458140376,0.124702829326,0.124885580935,0.12527561457,0.125367603635,0.125384774927,0.125289106299,0.125852079376,0.126033604464,0.126320610346,0.126172201322,0.126108422237,0.126386842473,0.126190599135,0.126389295515,0.12651072108,0.126668942272,0.126639505771,0.126633373167,0.126521759768,0.126856599964,0.126935097299,0.126682434001,0.126917926007,0.12703567201,0.126898301673,0.126801406525,0.126713097023,0.126578179728,0.126483737621,0.126314477742,0.126565914519,0.126913019924,0.126645638375,0.126603936666,0.126657903584,0.126913019924,0.126884809944,0.126990290738,0.127121528471,0.127174268868,0.126993970301,0.126806312609,0.126944909466,0.126913019924,0.126930191216,0.126641958813,0.126427317661,0.126221262156,0.126001714921,0.125822642875,0.125508653534,0.125164001171,0.124957945666,0.124561779427,0.124348364796,0.124453845591,0.124402331714,0.12458140376,0.124224486189,0.124120231915,0.124066264997,0.124165613187,0.123791524324,0.124163160146,0.12404173458,0.123717933072,0.123697082217,0.123455457607,0.123438286315,0.123294783374,0.123272705998,0.123075236139,0.123131656099,0.122626329503,0.12222525718,0.122114870302,0.121967687798,0.121872019171,0.121873245692,0.121582560247,0.121244040488,0.121028172816,0.120596437472,0.12035235982,0.12046519974,0.12028122161,0.119923077517,0.119546535612,0.119492568694,0.119463132193,0.119393220504,0.119030170328,0.118963938202,0.119085363767,0.118841286115,0.118789772239,0.118300390414,0.118046500595,0.117657693481,0.117439372767,0.117097173446,0.117043206528,0.116747615,0.116314653134,0.115992078147,0.115610630158,0.11552845326,0.115194839585,0.11494585585,0.114674794739,0.114566860903,0.114206263768,0.114185412914,0.113713202381,0.113720561506,0.113445820833,0.113263069224,0.112987102029,0.112681698334,0.112478095871,0.112059852256,0.111964183628,0.111408569677,0.111374227093,0.110811254016,0.110730303639,0.110680016283,0.110422446902,0.1103635739,0.110092512789,0.109820225157,0.109179981266,0.109105163493,0.108912599718,0.108803439361,0.108372930537,0.107941195193,0.107829581794,0.107459172493,0.107385581241,0.107136597506,0.107180752257,0.107023757586,0.10674533735,0.106481635364,0.106296430714,0.10602169004,0.105973855727,0.105540893861,0.105179070206,0.105137368497,0.104948484284,0.104789036572,0.104348715581,0.104217477849,0.104042085365,0.104035952761,0.103615256104,0.103682714752,0.103393255828,0.103091531695,0.102988503943,0.103043697381,0.102954161358,0.10274319977,0.102640172017,0.102364204823,0.102333541801,0.101917751228,0.101804911308,0.101761983078,0.101600082324,0.100968424079,0.101037109247,0.100779539866,0.100438567065,0.100344124959,0.100052212993,0.0998510635714,0.0995395272719,0.0992500683479,0.0988391838583,0.098651526166,0.0982578129686,0.0979867518575,0.0977537128933,0.0972986736526,0.0969527947688,0.0967185292837,0.0963334017323,0.0960758323508,0.095874682929,0.0957986386354,0.0952123616622,0.0948137423813,0.0943403053277,0.0938312991689,0.0932977625929,0.0928120603306,0.0921190760422,0.0910164337851,0.0898132168171,0.0884787621166,0.0878176673707,0.0869909923081,0.086169223329,0.0852910343901,0.0847452326054,0.0842399060093,0.0839663918565,0.0838044911024,0.0835346565122,0.0835923029928,0.0832341589004,0.0832599158386,0.0830612194586,0.0830072525405,0.0828465783073,0.0826552410524,0.0823179478147,0.0820971740591,0.0821106657886,0.0817525216962,0.0817476156128,0.0813256924354,0.0811220899719,0.0811257695345,0.0808559349444,0.0807259237327,0.0807001667946,0.0805836473125,0.0805591168952,0.0805480782074,0.0804266526418,0.080289282305,0.080171536302,0.0800304864026,0.0799102873579,0.0796232814756,0.0794368503042,0.0792442865285,0.0791032366291,0.078932750229,0.0786040426373,0.0785230922602,0.0783452467349,0.0780815447491,0.077928229641,0.0779061522655,0.0777013232811,0.0774768699629,0.0773726156894,0.0771923171224,0.07723156579,0.077086836328,0.0770267368057,0.0768170017379,0.0765974545031,0.0764895206671,0.0762945038496,0.0762810121201,0.0759375862781,0.0757854976909,0.0755818952274,0.0754825470374,0.0754028231812,0.0752654528444,0.0750925134025,0.0746055846193,0.0746325680783,0.0744866120955,0.0744780264494,0.0743173522162,0.0740070424375,0.073731075243,0.0735728540515,0.0735029423622,0.0734796384658,0.0735127545291,0.0733643455045,0.0732686768771,0.0730945109144,0.0730454500798,0.0730356379129,0.0731681021662,0.0730380909546,0.0730675274554,0.073025825746,0.0730012953287,0.0728614719501,0.0729828975157,0.0729681792653,0.0729375162437,0.072862698471,0.0726284329859,0.0725217256707,0.072329161895,0.0721255594315,0.0720102664702,0.0719906421364,0.0715969289389,0.0713503982452,0.0712400113674,0.071189724012,0.0711063205932,0.0709775359024,0.0709407402765,0.0708769611915,0.0707628947511,0.0704807949523,0.0705580657668,0.0705813696632,0.0704366402012,0.0703164411565,0.0702330377377,0.0702710598845,0.070158219965,0.0702207725291,0.0699693357519,0.0700527391706,0.069777998497,0.0697976228309,0.0697497885171,0.069670064661,0.0696528933689,0.0694603295931,0.0693695670492,0.069045765541,0.069407589196,0.0693413570693,0.0692309701915,0.0690433124992,0.0689169808502,0.0690420859784,0.0689218869337,0.0689684947265,0.068901036079,0.0690200086028,0.0687612127004,0.0686348810514,0.068837256994,0.0688998095581,0.0690212351237,0.0688507487235,0.0688176326602,0.0687035662198,0.0688065939724,0.0686275219262,0.0686029915089,0.0686434666974,0.0684717537764,0.0683957094828,0.0682816430424,0.0680755875372,0.0679517089299,0.0680338858278,0.0678916094076,0.0679492558882,0.0679553884925,0.0680289797444,0.0678216977183,0.0675371448777,0.0673605258733,0.0674022275827,0.0673703380402,0.067191265994,0.0669643596341,0.0667950997548,0.0667166024195,0.0663780826609,0.0663928009113,0.0664246904537,0.0663866683069,0.066349872681,0.0664553534753,0.0663658174522,0.0663793091817,0.066467618684,0.0666491437719,0.0666614089806,0.0666957515648,0.0668085914843,0.0668233097347,0.0670048348226,0.0668883153405,0.0669619065923,0.0670428569694,0.0669655861549,0.0667325471907,0.0666687681057,0.0666565028971,0.0666552763762,0.0667558510871,0.0665522486236,0.0664271434955,0.0663633644105,0.0663192096594,0.0662995853256,0.0662627896996,0.0664884695387,0.0664565799962,0.0663327013889,0.0662002371355,0.0661928780104,0.0663388339932,0.0663756296192,0.0662873201169,0.0663425135558,0.0664001600364,0.0660702259239,0.0661266458837,0.0660800380908,0.0660996624247,0.066196557573,0.0663253422637,0.0663829887443,0.066413651766,0.0663878948278,0.0664933756221,0.0666282929172,0.0665387568941,0.0666454642093,0.0666405581259,0.0665755525201,0.0664357291415,0.0663903478695,0.0664565799962,0.0664332760998,0.0662480714493,0.0663290218263,0.0665522486236,0.0665878177287,0.0666135746668,0.0666761272309,0.0666381050841,0.0668147240886,0.0667987793174,0.0667668897749,0.0668245362555,0.0667399063159,0.0667202819821,0.0666528233345,0.066657729418,0.0666871659187,0.0669165253204,0.0667227350238,0.0667264145864,0.0668073649634,0.0667239615446,0.0667607571706,0.0669091661952,0.0669582270297,0.0669570005089,0.0668245362555,0.0666859393978,0.0668000058382,0.0668061384426,0.0670502160946,0.0671753212227,0.0673727910819,0.0673409015394,0.067236647266,0.0673776971654,0.0675064818561,0.0675432774821,0.0674279845208,0.0676303604634,0.0675592222533,0.0675555426907,0.0675653548576,0.0674414762503,0.067571487462,0.0675101614187,0.0675592222533,0.0676168687339,0.0676781947772,0.0676021504836,0.0674647801467,0.0675641283368,0.0675457305238,0.0676831008606,0.0676941395484,0.0678916094076,0.0679063276579,0.0678781176781,0.0679652006594,0.0679590680551,0.068105024038,0.0679897310767,0.0679051011371,0.067743200383,0.0677309351743,0.0676880069441,0.0677444269038,0.0677836755715,0.0678633994277,0.0678450016147,0.0679247254709,0.0679970902019,0.0681369135804,0.068222770041,0.0615235130796,0.0546464105928,0.0477803467939,0.0409572112252,0.0)
ycorr <- c(9.4058922413e-05,9.39698105955e-05,9.37041769361e-05,9.32571034018e-05,9.26244794821e-05,9.18069780206e-05,9.08021096204e-05,8.98038559308e-05,8.88080992727e-05,8.78180984519e-05,8.68283343759e-05,8.58381719216e-05,8.48411396757e-05,8.3837298972e-05,8.28242819036e-05,8.18033993786e-05,8.07721675397e-05,7.97327538902e-05,7.86855712068e-05,7.76323492211e-05,7.65655394361e-05,7.54861864021e-05,7.43944490532e-05,7.32930459689e-05,7.21855786938e-05,7.10710523203e-05,6.99531684433e-05,6.88285831517e-05,6.77008507815e-05,6.65655589637e-05,6.54266684532e-05,6.42830653572e-05,6.31397756409e-05,6.19921789069e-05,6.08428560054e-05,5.96875060103e-05,5.85280032501e-05,5.73634721382e-05,5.61892200814e-05,5.50001620393e-05,5.37944754507e-05,5.25784036235e-05,5.1350252559e-05,5.01113438997e-05,4.88570216423e-05,4.75888295784e-05,4.63035827201e-05,4.49982537059e-05,4.36773238973e-05,4.23490819651e-05,4.10189230891e-05,3.96877608197e-05,3.83494445357e-05,3.70038011075e-05,3.56523994273e-05,3.42933744434e-05,3.29232851756e-05,3.15481142747e-05,3.01707914679e-05,2.8786839388e-05,2.73935564944e-05,2.59844705206e-05,2.45605115224e-05,2.31201237179e-05,2.16633399598e-05,2.01893761426e-05,1.87066307951e-05,1.72149990557e-05,1.57082862706e-05,1.41871638699e-05,1.26505693478e-05,1.11015341703e-05,9.54293109904e-06,7.97901486132e-06,6.41057917567e-06,4.8385823127e-06,3.26069528799e-06,1.67706341328e-06,8.82841916894e-08,-1.50578677227e-06,-3.10312657679e-06,-4.70486238403e-06,-6.31145249773e-06,-7.92622119535e-06,-9.55066462331e-06,-1.11814890913e-05,-1.28164742748e-05,-1.44589159151e-05,-1.6112396401e-05,-1.77740462895e-05,-1.94413991424e-05,-2.11204435665e-05,-2.28057322007e-05,-2.44970601798e-05,-2.61882956107e-05,-2.7884950464e-05,-2.95906651808e-05,-3.13061287964e-05,-3.30221474757e-05,-3.47378975918e-05,-3.64566428884e-05,-3.81727203444e-05,-3.98860155566e-05,-4.15990518265e-05,-4.33183647696e-05,-4.5045027696e-05,-4.6772724353e-05,-4.84995556458e-05,-5.02268193663e-05,-5.19580819911e-05,-5.36897693202e-05,-5.54260634086e-05,-5.71736061508e-05,-5.8926048768e-05,-6.06798449072e-05,-6.24292362528e-05,-6.41738850738e-05,-6.59138028246e-05,-6.76537203503e-05,-6.93973574603e-05,-7.11507678222e-05,-7.29101629747e-05,-7.46679650557e-05,-7.64227102136e-05,-7.81813181865e-05,-7.99453139748e-05,-8.17181703508e-05,-8.35047202021e-05,-8.53038989053e-05,-8.71090661837e-05,-8.89115673856e-05,-9.07100726795e-05,-9.25100178384e-05,-9.43131219726e-05,-9.61138270679e-05,-9.79095272186e-05,-9.96995966737e-05,-0.000101479859056,-0.000103247227215,-0.000105002759676,-0.000106750886492,-0.000108493513016,-0.000110226289685,-0.000111951886778,-0.000113674639189,-0.000115397239115,-0.000117123395646,-0.000118849674041,-0.00012057896293,-0.000122311073905,-0.000124046849154,-0.000125782150058,-0.00012752474743,-0.000129274056765,-0.000131025594132,-0.000132776554719,-0.000134526510396,-0.000136271763208,-0.000138017560695,-0.000139764069753,-0.000141509527418,-0.000143255571471,-0.000144999021155,-0.000146729352571,-0.000148451724218,-0.000150171205851,-0.000151885239494,-0.000153600396294,-0.000155310426369,-0.000157014755513,-0.000158715057353,-0.000160409552571,-0.000162096666164,-0.000163786606458,-0.000165479897197,-0.000167170332511,-0.000168855341955,-0.000170537515474,-0.000172215357338,-0.000173892456057,-0.000175564671272,-0.000177231812593,-0.00017890093384,-0.00018056905227,-0.000182235222569,-0.000183896654062,-0.00018555685875,-0.000187212720497,-0.000188865672963,-0.000190513045311,-0.00019215844301,-0.000193805064905,-0.000195447507335,-0.00019708389277,-0.000198715471179,-0.000200342667766,-0.000201967260696,-0.000203589904419,-0.000205212749065,-0.000206832342923,-0.000208445992033,-0.000210054841779,-0.000211656217911,-0.000213257135403,-0.000214852472458,-0.000216442613482,-0.000218023630872,-0.000219597894487,-0.000221163004817,-0.000222719575602,-0.000224272019536,-0.000225818660833,-0.000227360478737,-0.000228896069619,-0.00023042465944,-0.000231953478927,-0.000233482621566,-0.000235015558884,-0.000236551770898,-0.000238091239515,-0.000239629098967,-0.000241163695766,-0.000242699350231,-0.000244234702766,-0.000245773555563,-0.000247310451945,-0.000248846171665,-0.000250379113327,-0.000251911255602,-0.000253441917882,-0.000254974373301,-0.000256514730932,-0.000258060269164,-0.000259608468514,-0.000261156010067,-0.000262704463879,-0.000264258359982,-0.000265810001329,-0.000267358827697,-0.000268904547823,-0.000270449736997,-0.000271993095344,-0.000273530836816,-0.000275066928048,-0.000276604447003,-0.000278145479404,-0.000279685091695,-0.00028122453364,-0.000282765763791,-0.000284310458503,-0.000285856340269,-0.000287405466844,-0.000288955327638,-0.000290508585527,-0.000292062331238,-0.000293614051321,-0.000295163271625,-0.000296712297794,-0.000298258112377,-0.000299804132632,-0.000301352381392,-0.000302893702955,-0.000304431934798,-0.000305965779348,-0.00030749398784,-0.000309018234765,-0.000310540747333,-0.000312058465487,-0.000313574748953,-0.000315088360868,-0.000316594441431,-0.000318094541201,-0.000319594376989,-0.000321087553902,-0.00032257662014,-0.000324061775209,-0.000325538278463,-0.000327009077886,-0.000328471840027,-0.000329926632033,-0.000331373809506,-0.000332819559135,-0.000334254686222,-0.000335679192101,-0.00033709052738,-0.000338483132258,-0.000339856826066,-0.000341210529031,-0.000342536380129,-0.000343829500307,-0.000345083070912,-0.000346287250715,-0.000347442942095,-0.000348556417548,-0.000349629661112,-0.00035066435944,-0.000351670483293,-0.000352651464286,-0.000353615056499,-0.000354570710738,-0.000355526267809,-0.000356493644239,-0.000357479778664,-0.000358484301082,-0.000359505736959,-0.0003605457704,-0.00036160211166,-0.000362669769153,-0.000363745150046,-0.000364823391137,-0.000365904007076,-0.000366984819425,-0.000368062647439,-0.000369135779326,-0.000370201273092,-0.000371263642769,-0.000372320207447,-0.000373376107098,-0.000374433652866,-0.000375494582688,-0.000376560097023,-0.000377626350615,-0.000378693237458,-0.000379756101037,-0.000380818655718,-0.000381879910302,-0.00038293755196,-0.000383989900183,-0.000385034730773,-0.000386067566338,-0.000387088388895,-0.000388095142666,-0.000389087884193,-0.00039007300256,-0.000391052982517,-0.000392027322341,-0.000392996128793,-0.000393959304355,-0.000394918996867,-0.000395874672782,-0.000396830150696,-0.000397784918695,-0.00039874122421,-0.000399698778278,-0.000400653505467,-0.000401602552183,-0.000402545601643,-0.00040348472442,-0.00040441734259,-0.000405347258371,-0.00040627014221,-0.000407186925173,-0.000408097800189,-0.00040900063298,-0.000409896580262,-0.000410784576377,-0.000411667448465,-0.000412541523968,-0.000413408092715,-0.000414266275253,-0.000415115570845,-0.000415958214218,-0.000416789500221,-0.000417608833956,-0.000418417371613,-0.000419215788743,-0.000420005464613,-0.000420786876665,-0.00042156332436,-0.000422332445572,-0.000423096065058,-0.000423854748123,-0.00042461120517,-0.000425369766554,-0.00042612689683,-0.000426881932731,-0.000427632105279,-0.000428376017679,-0.000429111017654,-0.000429842315616,-0.000430567993939,-0.000431286931994,-0.000431994226877,-0.000432686438874,-0.000433362082448,-0.000434024358614,-0.000434671897403,-0.000435306967989,-0.00043593229269,-0.000436544461127,-0.000437138724214,-0.00043771560004,-0.000438278588095,-0.000438828586414,-0.000439369725473,-0.000439903496788,-0.000440430077161,-0.000440949013716,-0.000441454680965,-0.000441947734344,-0.000442432180957,-0.000442907438131,-0.000443373538944,-0.000443827559691,-0.00044427012453,-0.00044469743916,-0.000445110454622,-0.000445506285176,-0.000445888110453,-0.000446255116165,-0.000446606757359,-0.000446943281215,-0.000447264297486,-0.000447572044169,-0.000447866546552,-0.000448146468687,-0.000448410656351,-0.000448663223902,-0.000448905186386,-0.000449132228101,-0.00044934863585,-0.000449550529408,-0.000449741296492,-0.000449919484697,-0.000450082883984,-0.000450232160649,-0.000450369417334,-0.000450493165223,-0.000450596677314,-0.000450687558023,-0.000450766137401,-0.000450835252913,-0.000450891768484,-0.000450932954552,-0.000450959597246,-0.000450972471691,-0.00045096885203,-0.000450948870395,-0.000450917492689,-0.000450869987895,-0.000450801058363,-0.000450711129754,-0.0004505966147,-0.000450461812728,-0.000450307443813,-0.000450133134657,-0.000449938583664,-0.000449726543245,-0.000449495952055,-0.000449244646386,-0.000448973194691,-0.000448679499127,-0.000448366100452,-0.000448034149875,-0.00044768320023,-0.00044731001935,-0.000446914638376,-0.000446495420456,-0.000446049235141,-0.000445577904353,-0.000445085309497,-0.000444575135661,-0.00044404938708,-0.000443506840886,-0.000442943826367,-0.000442360379239,-0.000441760369682,-0.000441145685136,-0.000440515050461,-0.000439870566698,-0.000439209324847,-0.00043852813144,-0.000437828321649,-0.000437106393947,-0.000436363612706,-0.000435604497876,-0.000434827855038,-0.000434031048092,-0.000433213661831,-0.000432376969219,-0.000431520934342,-0.000430646484446,-0.000429750420272,-0.000428830155638,-0.000427887799233,-0.000426920723349,-0.000425927392902,-0.000424907244326,-0.00042386483601,-0.000422796179022,-0.000421701464786,-0.000420580207321,-0.000419430558394,-0.000418258783448,-0.000417065962716,-0.000415850740053,-0.000414614104831,-0.000413357988822,-0.000412077555565,-0.000410773607969,-0.000409447649318,-0.000408099976542,-0.000406733887537,-0.000405351173215,-0.000403949416434,-0.000402528563896,-0.00040108973221,-0.00039963117996,-0.000398152607237,-0.000396657497195,-0.000395142765249,-0.000393609040758,-0.000392054355884,-0.000390473727921,-0.000388865231377,-0.000387229679669,-0.000385565021099,-0.000383870473728,-0.000382148280828,-0.000380399212706,-0.0003786244207,-0.000376821913874,-0.000374993756228,-0.000373139955445,-0.000371265507988,-0.000369368821223,-0.000367448958778,-0.000365508177923,-0.000363548283408,-0.000361568435163,-0.000359566142645,-0.000357543029669,-0.000355498933568,-0.000353436063373,-0.000351349937542,-0.000349240352346,-0.000347108977157,-0.000344953389536,-0.000342772076774,-0.000340566592062,-0.000338335330498,-0.000336078283296,-0.000333793464425,-0.000331479367739,-0.00032913567114,-0.000326766186855,-0.000324372560205,-0.000321954765702,-0.000319516451521,-0.00031705578398,-0.000314569671437,-0.000312061830704,-0.000309533205734,-0.000306984087832,-0.000304412988252,-0.000301820402791,-0.000299206437163,-0.000296567864219,-0.000293905711136,-0.000291216330104,-0.000288502785212,-0.000285763082262,-0.000282994316098,-0.000280198104378,-0.000277378905184,-0.000274539351373,-0.000271674464981,-0.000268787402307,-0.000265874713785,-0.00026293704372,-0.000259976470311,-0.000256996543704,-0.00025400042442,-0.00025098540009,-0.000247949133158,-0.000244887010052,-0.000241801053338,-0.000238689918161,-0.000235553803507,-0.000232393432844,-0.000229209365233,-0.00022600102351,-0.000222764758714,-0.000219501591458,-0.000216214438757,-0.000212903017282,-0.000209569041756,-0.000206211379897,-0.00020283300194,-0.000199431832748,-0.000195921191268,-0.000192209980463,-0.000188227769679,-0.000183919258613,-0.000178797385771,-0.000174552623814,-0.000170657323691,-0.000167049785003,-0.000163646745687,-0.000160353421611,-0.000157075965672,-0.000153902600696,-0.000150924081729,-0.000148211111781,-0.000145819357593,-0.000144234416866,-0.00014176636338,-0.000138941434223,-0.000135825622201,-0.000132503989966,-0.000129069780166,-0.000125614339344,-0.000122135301807,-0.000118632555338,-0.000115104749302,-0.000111554757175,-0.00010798584612,-0.000104396015152,-0.000100787018521,-9.7154793498e-05,-9.3497259252e-05,-8.98153386207e-05,-8.61122801359e-05,-8.23879903384e-05,-7.8646915813e-05,-7.48876880126e-05,-7.11054395953e-05,-6.73007873141e-05,-6.34746000646e-05,-5.9623763482e-05,-5.57524982333e-05,-5.18637152635e-05,-4.79615073591e-05,-4.40458708216e-05,-4.01186364724e-05,-3.61736747279e-05,-3.22171222324e-05,-2.82460765608e-05,-2.42593934896e-05,-2.02591932275e-05,-1.62457067989e-05,-1.2215995854e-05,-8.16486560265e-06,-4.09035091212e-06,7.06465184858e-09,4.12592435818e-06,8.26669141516e-06,1.24285211661e-05,1.66061227379e-05,2.08035408419e-05,2.50210929211e-05,2.92566233872e-05,3.35107526855e-05,3.7779618208e-05,4.20637430607e-05,4.63608908737e-05,5.06695474348e-05,5.49906642668e-05,5.93291273625e-05,6.36826504556e-05,6.80475190815e-05,7.24242525305e-05,7.68111328886e-05,8.12078887817e-05,8.56167952963e-05,9.00407830383e-05,9.44806467862e-05,9.8935073151e-05,0.000103403945065,0.000107884122205,0.000112378630456,0.000116885439637,0.000121404027154,0.000125935853723,0.000130480600109,0.000135037900895,0.000139605312366,0.000144185882293,0.000148776828007,0.000153374161954,0.000157981221621,0.000162598607891,0.000167228098239,0.000171867684425,0.000176516339594,0.000181170536597,0.000185831093883,0.00019049710856,0.000195167993343,0.000199848427041,0.000204537157201,0.000209231081102,0.000213926911599,0.000218625032682,0.000223329717282,0.000228038032432,0.000232752123418,0.000237465402168,0.000242177649792,0.0002468863174,0.000251594977485,0.00025630415186,0.000261015537786,0.00026572863001,0.000270436885224,0.000275139146466,0.000279839637994,0.000284538110232,0.00028923975367,0.000293940385829,0.000298637431394,0.000303328004262,0.000308012265369,0.000312689851869,0.000317366065369,0.00032204365764,0.00032671884615,0.000331389503311,0.000336054007224,0.000340713237584,0.000345368207045,0.000350024042069,0.0003546753292,0.00035932303626,0.000363961705848,0.000368593822596,0.000373216852781,0.000377832034836,0.000382436072066,0.000387032155492,0.000391617289673,0.00039618808963,0.000400744256777,0.000405287709787,0.000409817034226,0.000414331278493,0.00041882887681,0.000423314227448,0.000427784741859,0.000432241414846,0.000436681426855,0.000441104372894,0.000445516018618,0.000449910608934,0.000454287865381,0.000458649532705,0.000462995114374,0.000467319051606,0.00047162299028,0.000475907588391,0.000480171010425,0.000484414561697,0.000488633591539,0.000492827028482,0.000496998013085,0.0005011505329,0.000505278036425,0.000509382484161,0.000513464244872,0.000517519776476,0.00052155065735,0.000525558333622,0.000529544958533,0.000533513078556,0.000537460524442,0.000541377976606,0.00054526810509,0.000549134259249,0.000552977323241,0.000556797730146,0.00056059642636,0.000564368473068,0.000568111886061,0.000571822406804,0.000575502636795,0.000579152857167,0.000582777721404,0.000586373415569,0.000589939401563,0.000593473060558,0.000596975126578,0.000600446489697,0.000603888131368,0.000607300234977,0.000610681549291,0.000614030316827,0.000617344648715,0.000620625336324,0.000623867969074,0.000627075104282,0.000630245267932,0.000633377001262,0.000636469250273,0.000639525341701,0.000642545770231,0.000645528783562,0.000648473669582,0.000651381866305,0.000654254109099,0.000657088527585,0.000659885032156,0.000662643798908,0.000665360956514,0.000668037123183,0.000670668630859,0.000673259170415,0.000675811387586,0.000678325418522,0.000680799806968,0.000683234583182,0.000685631972883,0.000687991627779,0.0006903177732,0.000692611014545,0.000694870671407,0.000697095928504,0.000699284435137,0.000701430499739,0.00070353565342,0.000705601112554,0.000707624189049,0.000709605511445,0.000711541537462,0.000713428998942,0.000715266721868,0.000717050707771,0.000718783197355,0.000720465012558,0.000722101832478,0.000723693568587,0.000725237963389,0.00072673754223,0.000728190470289,0.000729597984378,0.000730962965617,0.000732290680969,0.000733583896339,0.000734843615375,0.000736064208542,0.000737242739678,0.000738379100943,0.000739473101434,0.000740525400862,0.000741536441935,0.000742507130775,0.000743436801148,0.000744319728372,0.00074515251377,0.000745937228986,0.000746673820291,0.000747363909722,0.000748006572251,0.000748603654178,0.000749154298556,0.000749658203271,0.000750112692334,0.000750515776672,0.000750871873898,0.000751180610346,0.000751441689916,0.000751657540141,0.000751830145613,0.000751957861129,0.000752039168739,0.00075207154614,0.000752057155534,0.00075199799517,0.000751896348345,0.000751748976503,0.000751561870796,0.00075133181868,0.000751054788712,0.000750731482319,0.000750364692775,0.000749958318017,0.000749510333381,0.000749017982436,0.000748477443861,0.000747889389718,0.000747251967058,0.000746562935332,0.00074582232475,0.000745032443459,0.000744191270651,0.000743293463711,0.000742336221572,0.00074132784298,0.000740271339824,0.000739167105391,0.000738013772391,0.000736811214315,0.000735558453888,0.000734255716998,0.00073289950185,0.000731491732435,0.000730037268865,0.000728532500962,0.000726969151327,0.000725344015314,0.000723658861989,0.000721912943692,0.000720108619064,0.000718244092332,0.000716324836544,0.000714350984276,0.000712320856568,0.00071023048128,0.000708086147648,0.000705891877692,0.000703647918138,0.000701357755342,0.000699022609637,0.000696646775569,0.000694228275113,0.000691764456644,0.00068926169866,0.000686722479401,0.000684147602867,0.000681534746023,0.000678882736726,0.000676192761073,0.000673463809781,0.000670695915465,0.000667887003348,0.000665042223543,0.000662156354745,0.000659229044003,0.000656259050464,0.000653253815931,0.000650213082433,0.000647140267291,0.000644034875241,0.000640893950089,0.000637718124516,0.000634510317737,0.000631269079553,0.000627999457174,0.000624701683914,0.000621374329782,0.000618014419252,0.000614621334936,0.000611193147816,0.000607730331931,0.000604236756746,0.000600711017331,0.00059715500999,0.00059356828112,0.000589947899684,0.000586293745281,0.000582606716873,0.000578881436866,0.000575122771527,0.000571331532948,0.00056750584569,0.000563646059058,0.000559750541017,0.000555813944442,0.000551841428333,0.000547835524732,0.000543795048615,0.00053972473042,0.000535626017893,0.000531501106039,0.00052735155859,0.000523174963386,0.000518971922612,0.000514747274987,0.000510501449599,0.000506228151566,0.000501930425033,0.000497609189452,0.000493261546116,0.000488884385624,0.000484475958519,0.000480036942694,0.000475574827274,0.000471087263407,0.000466573010068,0.000462035896085,0.00045747733336,0.000452892734157,0.000448283230536,0.000443648572344,0.000438996052949,0.000434324425091,0.000429629124053,0.000424911202469,0.000420172757421,0.000415412259489,0.000410629118813,0.000405828747987,0.000401013546566,0.000396187190547,0.000391346041047,0.000386490042547,0.000381618952566,0.000376736623009,0.000371841643168,0.000366933840647,0.00036201457558,0.000357081484476,0.000352130725236,0.000347162893205,0.000342178386445,0.000337181440072,0.000332171805373,0.000327151324919,0.000322117291695,0.000317071783487,0.00031201710568,0.000306953253807,0.000301884039746,0.000296813012775,0.000291738205453,0.00028665361408,0.000281562320492,0.000276462564639,0.000271356954005,0.000266248254018,0.000261134196411,0.000256015155586,0.000250891923127,0.000245758987921,0.000240614902005,0.000235467230887,0.000230320920731,0.000225171353311,0.000220020735453,0.000214867415586,0.000209714752632,0.000204563158186,0.000199409905532,0.000194257530544,0.000189112406343,0.000183972253166,0.000178828571834,0.000173684367522,0.000168544795266,0.000163408256026,0.000158276874948,0.00015314848959,0.000148024100828,0.000142907317331,0.000137796050601,0.000132690707074,0.000127597206095,0.000122518591473,0.000117449920213,0.000112389785358,0.000107334184174,0.000102281953348,9.7235648538e-05,9.21929649207e-05,8.71551358263e-05,8.21242132153e-05,7.70964247275e-05,7.20706606659e-05,6.70483924911e-05,6.20331304781e-05,5.70251314881e-05,5.2030182192e-05,4.70496541634e-05,4.20858910574e-05,3.7139568849e-05,3.22056000687e-05,2.7284976037e-05,2.23799353788e-05,1.74897603379e-05,1.26138042626e-05,7.75459621507e-06,2.91372920205e-06,-1.90795735535e-06,-6.71683926483e-06,-1.15162116236e-05,-1.62991630682e-05,-2.10615716371e-05,-2.58058581741e-05,-3.05347554234e-05,-3.52447246996e-05,-3.99371060714e-05,-4.46137944681e-05,-4.92780608664e-05,-5.39262914193e-05,-5.85522435423e-05,-6.31562939036e-05,-6.77417158985e-05,-7.23086583345e-05,-7.68534730232e-05,-8.13738709145e-05,-8.58714522322e-05,-9.03465062405e-05,-9.47989519497e-05,-9.92258578746e-05,-0.000103626403434,-0.000108004523007,-0.000112360612035,-0.000116693653907,-0.000121002943491,-0.000125289458133,-0.000129554131446,-0.000133796243984,-0.000138007022103,-0.000142190863103,-0.000146349679687,-0.000150484971254,-0.000154595016935,-0.000158678698913,-0.0001627357113,-0.000166767915985,-0.000170772664779,-0.000174745982101,-0.000178696587563,-0.000182627707926,-0.000186538196286,-0.000190424598879,-0.00019428771058,-0.000198126201346,-0.000201943132604,-0.000205740297124,-0.000209517851442,-0.000213277497065,-0.000217016714524,-0.000220725783569,-0.000224408117836,-0.000228058575684,-0.000231679406043,-0.000235272548795,-0.000238834496247,-0.000242359058297,-0.000245845977122,-0.000249295816804,-0.0002527112198,-0.000256093728681,-0.000259445367017,-0.000262770942576,-0.000266068920662,-0.000269337993379,-0.000272575681666,-0.000275787850518,-0.000278975904705,-0.00028213920958,-0.000285273075913,-0.000288381552488,-0.000291462167328,-0.000294516629523,-0.000297539062303,-0.000300532502205,-0.000303497173332,-0.000306437657884,-0.000309347238009,-0.000312230136177,-0.000315087376837,-0.00031792143398,-0.000320729851465,-0.000323511580732,-0.000326264619405,-0.000328989693024,-0.000331690443901,-0.00033436401117,-0.000337007271938,-0.000339622854211,-0.000342205914387,-0.000344752069967,-0.000347260573134,-0.000349730526205,-0.00035216880478,-0.000354574068812,-0.000356945550761,-0.000359278650135,-0.000361578762782,-0.000363844474302,-0.000366080815401,-0.000368288355743,-0.000370472685467,-0.000372631903231,-0.000374764206563,-0.000376869657137,-0.000378948816245,-0.000381001638676,-0.000383030796239,-0.000385032548545,-0.000387006651526,-0.000388953400341,-0.000390870371746,-0.000392757239174,-0.000394615935492,-0.000396443292657,-0.000398238462065,-0.000400001759501,-0.000401733933081,-0.000403433087829,-0.000405102254096,-0.000406742877076,-0.000408352376185,-0.000409932404337,-0.000411353281356,-0.000412488139163,-0.000413337953033,-0.000413904218731,-0.000414187262117)
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(264)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Canis_familiaris-male-liver-H3K27Ac-ERR572253.50mers.unique.MACS-2.1.0.p1e-1_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 264',bty='n')
dev.off()