# R script for Peak Model
#  -- generated by MACS
p <- c(0.0422524551302,0.0493003940074,0.0564890454152,0.0634719047469,0.0705673341031,0.0704952189312,0.0705339148771,0.0705901998894,0.0704846654914,0.0706324136485,0.0705356737837,0.0707291535133,0.0705110490909,0.0705004956511,0.0705321559705,0.070591958796,0.0704653175184,0.0701293663516,0.0704934600246,0.0704019968797,0.0702630432557,0.0701715801108,0.0700678046195,0.0702612843491,0.0700765991526,0.0700537333664,0.0703527474939,0.0704019968797,0.0700009661674,0.0698514591036,0.0700695635261,0.0698567358235,0.0700607689929,0.0699640291281,0.0699218153689,0.0698743248899,0.0697424068924,0.0697177821996,0.0695172668434,0.0696614971873,0.06952430247,0.0693448939934,0.0692868500745,0.0690388442393,0.069265743195,0.0691127183179,0.0690687456521,0.0691250306643,0.0693765543128,0.0693747954062,0.0692340828756,0.0695735518557,0.0696491848409,0.0698813605164,0.0697371301725,0.0695893820154,0.0696456670276,0.0696667739072,0.0697547192388,0.0696790862536,0.0697670315853,0.0696403903077,0.0694891243373,0.0694451516715,0.069438116045,0.0694152502587,0.0693835899393,0.0694134913521,0.0691338251975,0.0690441209592,0.0690705045587,0.0689614523475,0.0688770248291,0.0687081697924,0.0685058955296,0.068570975075,0.0681840156159,0.0680520976184,0.0684091556648,0.068398602225,0.0682842732939,0.0680221962056,0.0680345085521,0.0680151605791,0.068125971697,0.0680679277781,0.0685094133429,0.0684971009965,0.0681840156159,0.0683616651858,0.0683106568934,0.0684355392643,0.0684003611317,0.0682033635888,0.0681347662301,0.0681488374832,0.0680855168444,0.0678902782082,0.0678656535153,0.0676246833067,0.0676053353337,0.0676405134664,0.0674786940561,0.0678357521026,0.0678392699158,0.0679025905546,0.0679729468199,0.0680767223113,0.0681418018567,0.0681453196699,0.0681470785766,0.0681101415373,0.0682754787608,0.0681752210827,0.0682578896944,0.0681523552965,0.0678656535153,0.0680309907388,0.0679729468199,0.0680081249526,0.0680468208985,0.0679711879133,0.0680767223113,0.0680556154317,0.0678990727414,0.0677495656776,0.0678832425817,0.0679430454072,0.0681224538837,0.0681453196699,0.0681998457755,0.0685428325689,0.068212158122,0.0680309907388,0.0681945690557,0.0685094133429,0.068351111746,0.0683071390801,0.0682315060949,0.0681664265495,0.0680433030852,0.0678902782082,0.0678638946087,0.0679940536995,0.0681664265495,0.0681136593505,0.0682420595347,0.0681681854562,0.0681769799893,0.0682965856403,0.0685481092888,0.0687574191781,0.0690722634654,0.0693783132194,0.069227047249,0.0693273049271,0.0691760389567,0.0690493976791,0.0689245153082,0.0690529154924,0.0689174796817,0.0688981317087,0.0689596934409,0.0687539013648,0.0686835450995,0.0687064108858,0.0688541590429,0.0687046519791,0.0688506412296,0.0687046519791,0.0687591780847,0.0687028930725,0.0687275177654,0.0687890794975,0.0688735070159,0.0689122029618,0.0689245153082,0.069246395222,0.0694046968189,0.0697037109465,0.0697001931332,0.0697723083052,0.0698197987842,0.0697424068924,0.0699182975557,0.0698444234771,0.0701487143246,0.0702876679485,0.0703932023465,0.0702085171501,0.0702894268552,0.0704143092261,0.0702630432557,0.0705180847174,0.0707062877271,0.0709349455894,0.0708065454052,0.0709437401225,0.0709261510562,0.0712937625424,0.0712409953435,0.0709595702822,0.0709525346557,0.0710158552945,0.0707027699139,0.0705673341031,0.0705356737837,0.0705620573832,0.0704881833047,0.0702735966955,0.0706025122358,0.07090328527,0.0712005404909,0.0710387210807,0.0713412530215,0.0715470450975,0.0718900318909,0.0719410401833,0.0720694403674,0.0719515936231,0.0718231934389,0.0721134130333,0.0721890460185,0.0724599176399,0.0723666955884,0.0722013583649,0.0724616765465,0.072301616043,0.0725672109445,0.0727817975537,0.0728996442981,0.0728433592858,0.0729875896297,0.0730473924552,0.0732197653052,0.0737527140149,0.0735521986588,0.0737175358823,0.0735979302312,0.0738547305996,0.07400599657,0.0741291200343,0.0743489833634,0.0745319096532,0.0744017505624,0.0740517281425,0.074317323044,0.0747025235966,0.0750648583629,0.0751352146282,0.075265373719,0.0753814615568,0.0753550779573,0.0752600969991,0.075437746569,0.0757649032027,0.075682234591,0.0758035991486,0.0757578675762,0.0758475718144,0.0761078899961,0.0760709529568,0.0761395503155,0.0764420822563,0.0766250085461,0.0768008992094,0.0769328172068,0.0769169870471,0.0770436283247,0.0771931353884,0.0769679953395,0.0772371080543,0.0773830973048,0.0772072066415,0.0774165165308,0.0774217932507,0.0775396399951,0.0775642646879,0.0776803525257,0.0779019747614,0.0784507536308,0.078426128938,0.0786670991466,0.078990737967,0.07918245879,0.0796696759273,0.0795342401165,0.0799036105094,0.0801973479171,0.0803521317007,0.0805579237768,0.0807689925727,0.0807091897472,0.0811577109385,0.0812685220564,0.0810381052875,0.0817100076212,0.0818753448446,0.0822869289967,0.0828673681855,0.0832455331115,0.0841935837865,0.085287623712,0.0860175699646,0.0869902453325,0.0882918362407,0.0892680294218,0.0903304090279,0.09125911173,0.0922054034984,0.0927418700213,0.0935368958193,0.0938834004259,0.094486705401,0.094951056752,0.0953362573045,0.0955156657811,0.0956370303387,0.0960275076112,0.0959800171321,0.0962983792326,0.0963265217387,0.0965059302153,0.0966308125862,0.0968418813821,0.0966765441586,0.0968911307678,0.0971004406571,0.0968541937285,0.0967979087163,0.0973554821189,0.0971954216153,0.097483882303,0.0975313727821,0.097867323949,0.0982578012214,0.0985603331622,0.0988646240097,0.0992216820561,0.099610400422,0.0995523565031,0.0997757376454,0.100199634144,0.1004001495,0.100396631687,0.100584834696,0.100822287092,0.10110019434,0.101052703861,0.101427350974,0.101564545691,0.10178440902,0.101743954167,0.101650732116,0.102095735494,0.102477418233,0.102305045383,0.102347259142,0.102727182975,0.102822163933,0.103024438196,0.103531003306,0.103592565038,0.104023497163,0.103960176525,0.103687545997,0.104007667004,0.104158932974,0.104463223822,0.104491366328,0.104778068109,0.104853701094,0.105094671303,0.105117537089,0.105240660553,0.105717324251,0.105891456007,0.106311834692,0.106441993783,0.107075200171,0.107238778488,0.107439293844,0.107516685736,0.107938823328,0.108218489482,0.108431317185,0.10887807947,0.108751438192,0.108906221976,0.108816517737,0.108988890587,0.10921227173,0.109732908093,0.10991231657,0.110153286778,0.110271133523,0.110142733338,0.110475166692,0.110647539542,0.111020427748,0.111220943104,0.111375726888,0.111256121237,0.111483020193,0.111569206618,0.112102155327,0.112510221666,0.112652693103,0.112652693103,0.112605202624,0.112598166998,0.112580577931,0.112881350966,0.113106491015,0.113347461223,0.113255998078,0.113219061039,0.113468825781,0.113818848201,0.114066854036,0.114302547525,0.1145611068,0.114671917918,0.114933995006,0.114997315645,0.115384275104,0.115706155018,0.115702637204,0.11607552541,0.116103667917,0.116610233027,0.116882863555,0.117144940643,0.117181877682,0.11750199869,0.117531900102,0.118020876146,0.118727956613,0.118882740396,0.119246834069,0.119157129831,0.119248592976,0.119522982411,0.1197322923,0.12006648456,0.120098144879,0.119999646108,0.119765711526,0.119918736403,0.12006120784,0.119987333762,0.119992610481,0.120189608024,0.120252928663,0.120136840825,0.120430578233,0.120641647029,0.120884376144,0.12110599838,0.12128364795,0.121908059804,0.122173654706,0.121902783085,0.122184208146,0.122425178354,0.12233371521,0.122379446782,0.12248498118,0.122553578539,0.122528953846,0.122261600038,0.122214109559,0.122745299362,0.122609863551,0.122977475037,0.123255382285,0.123480522334,0.123786572088,0.12334156871,0.123255382285,0.123248346659,0.123306390577,0.122951091438,0.123021447703,0.122915913305,0.122929984558,0.122643282777,0.122085709374,0.1224638743,0.122520159313,0.122676702003,0.122977475037,0.123234275405,0.123359157776,0.123221963059,0.123037277863,0.123130499914,0.123309908391,0.123165678047,0.122958127064,0.122995064103,0.122921190025,0.122893047519,0.12300737645,0.123272971351,0.123459415454,0.123454138735,0.123512182653,0.123816473501,0.124016988857,0.124108452002,0.12402578339,0.123756670675,0.123601886892,0.123144571167,0.123132258821,0.122627452617,0.122481463367,0.122085709374,0.121915095431,0.121732169141,0.121535171598,0.121470092053,0.121141176513,0.120838644572,0.120513246845,0.120534353724,0.120277553356,0.120335597275,0.120369016501,0.12021775053,0.120034824241,0.119969744695,0.119953914536,0.120033065334,0.119751640273,0.119829032165,0.119681284007,0.119297842362,0.118840526637,0.118476432964,0.118193248996,0.118057813186,0.117651505753,0.117347214906,0.117167806429,0.117118557044,0.116742151024,0.116531082228,0.116093114477,0.116121256983,0.115968232106,0.115859179895,0.115681530325,0.115540817794,0.115524987634,0.115002592365,0.114861879834,0.114633221972,0.114645534318,0.114427429896,0.114386975043,0.114270887205,0.114309583151,0.114035193717,0.113820607107,0.113875133213,0.113977149798,0.113820607107,0.113996497771,0.11369924255,0.113897998999,0.113386157169,0.11352159298,0.113553253299,0.113336907783,0.11314518696,0.113175088373,0.113118803361,0.112918288005,0.112707219209,0.112200654099,0.112008933276,0.111810176826,0.111352861102,0.111043293534,0.110846295992,0.11041888168,0.110200777257,0.110054788007,0.109806782172,0.109507768044,0.109474348818,0.108656457234,0.108586100969,0.108462977504,0.108181552443,0.107646844827,0.106718142125,0.105810546302,0.105099948023,0.103909168232,0.102730700788,0.101624348516,0.100287579476,0.0988382404102,0.0971092351903,0.0959413211862,0.0951885091474,0.094486705401,0.0934981998734,0.0930760622815,0.0923513927489,0.0919257373438,0.0915264655382,0.0914420380198,0.0915546080443,0.0912292103172,0.0909636154157,0.0905520312637,0.0904148365463,0.0901105456988,0.0902283924432,0.0901210991386,0.0901809019642,0.089927619409,0.0897482109325,0.0896532299744,0.0895441777631,0.0894368844585,0.0893471802203,0.0893893939794,0.0890552017192,0.0888195082305,0.0884800392504,0.0882689704544,0.0881159455774,0.0879840275799,0.0878837699019,0.0877993423835,0.0874563555901,0.0870570837845,0.0870007987723,0.0868460149886,0.0868002834161,0.0866877133917,0.0863570389447,0.0863974937973,0.0861107920161,0.08573790381,0.0856446817585,0.0857062434906,0.0855268350141,0.0855338706406,0.0854635143753,0.0852172674467,0.0851979194738,0.0846385871646,0.0844802855676,0.0842234851993,0.0843202250641,0.0843307785039,0.0843096716243,0.083875221686,0.0835621363054,0.0833985579885,0.0834003168952,0.0836623939834,0.0837591338482,0.0838259723003,0.0835234403595,0.0829447600773,0.0826299157901,0.0827618337875,0.0825331759253,0.0824786498196,0.0822464741441,0.0821004848936,0.0815411525844,0.0813705386411,0.0813476728548,0.0813300837885,0.0813265659752,0.0809308119829,0.0808991516635,0.080580789563,0.0805157100176,0.080183276664,0.0802976055951,0.0799757256813,0.0798086295512,0.0796186676349,0.0795148921436,0.0795166510502,0.0794093577456,0.0793407603869,0.0793284480405,0.0792844753747,0.0790452640727,0.0790698887655,0.07883771309,0.0786864471196,0.078631921014,0.0782484793681,0.0780901777711,0.07814822169,0.0778333774027,0.0776328620466,0.0776662812726,0.0775326043686,0.077372543865,0.0771157434966,0.0768941212609,0.0770682530175,0.0768061759293,0.0764069041236,0.0763664492711,0.0764368055364,0.0762908162859,0.0761078899961,0.0761624161017,0.0762292545537,0.0760234624777,0.075993561065,0.0759056157333,0.0759583829323,0.0759038568267,0.0757437963231,0.0756681633379,0.0758229471216,0.0755608700333,0.0754342287558,0.0755450398736,0.0754219164093,0.0753392477976,0.0753146231047,0.0749997788175,0.0746726221838,0.0744298930685,0.0742733503782,0.0741343967542,0.0743032517909,0.0741906817665,0.0742592791251,0.0743050106976,0.0740622815823,0.0738688018527,0.0738389004399,0.0738635251328,0.0735803411649,0.0737826154277,0.0735715466318,0.0734308341011,0.0729981430695,0.0726956111287,0.0727624495807,0.0728539127256,0.0728732606986,0.072693852222,0.0729365813374,0.0726621919027,0.0726973700353,0.0724141860675,0.0724634354532,0.0723192051093,0.0721063774067,0.0721239664731,0.0720711992741,0.0718548537583,0.0715013135251,0.0713641188077,0.0710334443608,0.071109077346,0.0710721403067,0.0711477732919,0.0712708967562,0.0709226332429,0.0706517616215,0.0706077889557,0.0705849231695,0.0704829065848,0.0704582818919,0.0701733390174,0.0699235742756,0.0699270920888,0.0697881384649,0.069883119423,0.0700361443001,0.0701170540052,0.0700818758725,0.0700502155531,0.0697406479858,0.0699851360077,0.0699816181945,0.069883119423,0.0698092453445,0.0696755684404,0.0696685328138,0.0697072287598,0.0696650150006,0.069485606524,0.0697336123592,0.0695506860694,0.0697723083052,0.0697670315853,0.0695454093495,0.0694539462046,0.0693255460205,0.069212975996,0.0692252883424,0.069246395222,0.0692059403694,0.0691232717577,0.0690230140796,0.0689790414138,0.0691883513031,0.0693255460205,0.0691865923965,0.0692006636495,0.0691777978633,0.0692710199149,0.0691883513031,0.0692833322613,0.069054674399,0.0689667290674,0.0686641971266,0.068570975075,0.0687204821388,0.0685868052347,0.0684443337975,0.0682965856403,0.0680046071393,0.0677231820781,0.0678955549281,0.0681119004439,0.0681646676429,0.0680608921516,0.0679905358863,0.0678076095965,0.0677478067709,0.0679922947929,0.0681717032694,0.068351111746,0.0683405583062,0.0681857745225,0.0683774953454,0.0684460927041,0.0683528706526,0.0685656983551,0.0688629535761,0.0687134465123,0.0686518847801,0.0685217256893,0.068623742274,0.0685551449154,0.068331763773,0.0683634240924,0.0681875334291,0.0682807554807,0.0682191937485,0.0684320214511,0.0686905807261,0.0689139618684,0.0686342957138,0.0686008764878,0.0686026353944,0.0685744928883,0.0686518847801,0.0686677149398,0.0687380712051,0.0683687008123,0.0683106568934,0.0681242127903,0.0681294895102,0.0682244704684,0.06814004295,0.0680784812179,0.0680626510582,0.0681119004439,0.0679852591664,0.0680010893261,0.0678322342893,0.0677865027169,0.0678902782082,0.0679289741541,0.0680679277781,0.0682367828148,0.0683616651858,0.068092552471,0.0678973138347,0.0679131439944,0.0680520976184,0.0680327496454,0.0679852591664,0.0680134016725,0.0681119004439,0.0681347662301,0.0682033635888,0.0681171771638,0.0681136593505,0.0683581473725,0.0683898076919,0.0683757364388,0.0685111722495,0.0684883064633,0.0682807554807,0.0682965856403,0.0682526129745,0.068590323048,0.0688524001363,0.0687327944853,0.0687081697924,0.0687363122985,0.0686659560332,0.0686747505664,0.0690107017332,0.0689808003205,0.0690177373597,0.0687767671511,0.0686131888342,0.0687679726179,0.0689702468807,0.0691127183179,0.0687679726179,0.0684812708368,0.0684971009965,0.0683880487852,0.0684883064633,0.0687275177654,0.0686694738465,0.0685023777164,0.0684636817705,0.0685006188097,0.068968487974,0.0694574640179,0.069438116045,0.0695612395092,0.0694451516715,0.0693308227404,0.0695788285756,0.0697687904919,0.0696491848409,0.069504954497,0.0694557051113,0.0691989047429,0.069212975996,0.069227047249,0.0692604664751,0.0693765543128,0.0693290638337,0.0693730364995,0.069557721696,0.0698074864378,0.0699640291281,0.0699200564623,0.0696931575067,0.0700519744598,0.070366818747,0.0702630432557,0.0703298817077,0.0702085171501,0.0701188129118,0.0702489720026,0.0702349007496,0.0703844078133,0.0705638162899,0.0702524898159,0.070161026671,0.0703316406144,0.0703896845332,0.0704758709582,0.0705620573832,0.0703386762409,0.0703210871746,0.0705638162899,0.0708856962037,0.0708470002577,0.070625378022,0.0708241344715,0.0710914882797,0.07124803097,0.0712163706506,0.0715910177634,0.0713693955276,0.0709736415353,0.0709226332429,0.0712304419037,0.0715804643236,0.0713957791271,0.0711970226776,0.0712216473705,0.0713183872353,0.0710703814001,0.0713500475547,0.0716666507486,0.0715452861909,0.0713641188077,0.071367636621,0.0714221627266,0.0714942778986,0.07142040382,0.07159277667,0.0715628752572,0.0715276971246,0.0713922613139,0.0713430119281,0.0713447708348,0.0712005404909,0.0712937625424,0.0713940202205,0.0713465297414,0.0712234062771,0.07142040382,0.0717862563996,0.0721362788195,0.0722769913501,0.0726551562761,0.0727905920868,0.0726516384629,0.0723086516695,0.0726199781435,0.07262701377,0.0724810245195,0.0721239664731,0.0718777195445,0.0717018288812,0.0715224204047,0.0713957791271,0.0716385082424,0.071626195896,0.0714942778986,0.0715136258715,0.0716349904292,0.0715540807241,0.0715189025914,0.0714678942991,0.071386984594,0.0714520641394,0.071487242272,0.0715030724317,0.0713306995817,0.0715241793113,0.0716560973088,0.071712382321,0.0719674237827,0.0721310020996,0.0722224652445,0.0723983559078,0.0722171885246,0.0723526243353,0.0724722299863,0.0723367941756,0.0722998571363,0.0723965970011,0.0724581587333,0.072574246571,0.0725478629715,0.0724089093476,0.0725003724925,0.0727642084874,0.0727941099001,0.0726657097159,0.072693852222,0.0726956111287,0.0726182192368,0.0726920933154,0.0726059068904,0.0727167180083,0.0725971123572,0.0723579010552,0.072488060146,0.0725302739052,0.0723895613746,0.072646361743,0.0725566575047,0.0726147014236,0.0728029044333,0.0726657097159,0.0729875896297,0.0730808116812,0.073024526669,0.0731230254404,0.0734167628481,0.0734712889537,0.0736770810297,0.0735891356981,0.0734484231675,0.0735346095925,0.0732619790644,0.0734923958333,0.0734413875409,0.0735645110052,0.0734185217547,0.0730984007476,0.0731881049858,0.0731177487205,0.0732443899981,0.0733305764231,0.0735135027129,0.0734906369267,0.0735521986588,0.0734536998874,0.0734871191134,0.0734836013001,0.0732848448506,0.0733147462634,0.0732250420251,0.0731265432537,0.0730526691751,0.0729594471236,0.0731159898139,0.0733833436221,0.0731353377868,0.0730597048016,0.073230318745,0.0734150039414,0.073349924396,0.0735662699119,0.0736436618037,0.0734783245802,0.0734783245802,0.0732549434379,0.0732373543715,0.0733235407965,0.0734308341011,0.0732953982904,0.0735521986588,0.0734097272215,0.0734695300471,0.0736207960175,0.0735381274057,0.0734132450348,0.0736841166562,0.0739250868649,0.0736049658578,0.0738283470001,0.073766785268,0.073733366042,0.0737826154277,0.0734695300471,0.0733763079955,0.0733921381552,0.0732373543715,0.0731652391996,0.0732707735976,0.0731089541874,0.0729735183766,0.0729700005634,0.0729330635241,0.0734132450348,0.0732443899981,0.0734202806613,0.0734079683149,0.073455458794,0.0733622367425,0.0731406145067,0.0731247843471,0.0731757926394,0.0730702582414,0.0730667404282,0.0732109707721,0.0731652391996,0.0732901215705,0.073196899519,0.0730649815215,0.0733534422093,0.0732443899981,0.0733006750103,0.0733974148751,0.0730984007476,0.0730403568287,0.073091365121,0.073110713094,0.0732901215705,0.0732408721848,0.0733745490889,0.0735996891379,0.0734589766073,0.0732021762389,0.0731881049858,0.0731687570129,0.0729805540032,0.0726762631557,0.0724687121731,0.072746619421,0.0725531396914,0.0724247395072,0.0724511231067,0.0724845423328,0.0726586740894,0.0728961264848,0.0729031621113,0.0733094695435,0.0731845871726,0.0730262855756,0.0728574305389,0.0729277868042,0.0729101977379,0.0730684993348,0.0728926086715,0.0727255125414,0.0726129425169,0.0723526243353,0.0723192051093,0.0720958239669,0.0721134130333,0.0648033970678,0.0575426304881,0.0501904007635,0.0429841602894,0.0)
m <- c(0.0439029071137,0.0509980060234,0.0584138471094,0.0656375953536,0.0728331464834,0.0727732276153,0.0727450305009,0.0726868739525,0.0726868739525,0.0725088796678,0.0724084274478,0.0725546999787,0.0723696564155,0.0725194535857,0.0726093318879,0.0725353144626,0.072628717404,0.0724736332749,0.0727291696241,0.072804949369,0.0727027348293,0.0727644160171,0.0727450305009,0.0726410536416,0.0725388391019,0.0727908508118,0.0727115464276,0.0727556044188,0.0725494130198,0.0726463406005,0.0729794190143,0.0731944220116,0.073287824953,0.0734763931555,0.0735415989826,0.0733759409355,0.0734728685162,0.0734763931555,0.0734922540324,0.0734499583608,0.0733442191818,0.0733318829443,0.0733847525338,0.0733547930997,0.0733213090264,0.0733213090264,0.0732807756744,0.073428810525,0.0735327873843,0.0736173787275,0.0736667236777,0.0733406945425,0.0734887293931,0.0731997089705,0.0734975409913,0.0736808222349,0.0737865614139,0.0736173787275,0.0738887759536,0.0739416455431,0.0739733672968,0.0742165674084,0.074082631115,0.0742165674084,0.0742729616372,0.0742059934905,0.0742764862765,0.0743593153,0.074047384722,0.0741742717368,0.0743187819481,0.0742183297281,0.0742606253997,0.0744280457664,0.0742482891621,0.0742976341123,0.0741725094172,0.0743258312267,0.0743170196285,0.0741037789508,0.0740667702382,0.074228903646,0.0742747239569,0.0742835355551,0.0742271413263,0.0740667702382,0.0741566485403,0.0740791064757,0.0742447645228,0.074399848652,0.0743205442678,0.0743099703499,0.0741654601386,0.0741090659098,0.0742324282853,0.0743170196285,0.0742148050888,0.0742095181298,0.0741390253438,0.0741601731796,0.0741495992617,0.0741866079744,0.0741108282294,0.0741601731796,0.0740121383291,0.0740156629684,0.074047384722,0.0740667702382,0.0739610310592,0.0739398832234,0.0739204977073,0.0737460280619,0.074017425288,0.0740491470417,0.0744826776755,0.0746624342798,0.0747346893854,0.0747593618605,0.0746906313942,0.0746871067549,0.0745549327812,0.0745972284528,0.0744227588074,0.0743822254555,0.074052671681,0.0739345962645,0.0739927528129,0.0739275469859,0.074193657253,0.0742553384407,0.0745443588633,0.0745091124703,0.0746589096405,0.0744121848895,0.074465054479,0.0743275935464,0.0741196398277,0.0739592687396,0.0737530773405,0.0738359063641,0.0736455758419,0.0735010656306,0.073499303311,0.0736032801703,0.073635001924,0.0738235701265,0.0738552918802,0.0739099237894,0.0739328339448,0.0738975875518,0.0739892281736,0.0741760340565,0.0741830833351,0.0741355007045,0.0739310716252,0.0736913961528,0.0737583642995,0.0739839412147,0.0738165208479,0.0735539352201,0.0733918018124,0.073328358305,0.0733336452639,0.073569796097,0.0735715584166,0.0734340974839,0.0733318829443,0.073257865519,0.0732843003137,0.0734182366071,0.0736790599153,0.0736191410472,0.0733177843871,0.0733072104692,0.073494016352,0.0737583642995,0.0739046368304,0.0738006599711,0.0737795121353,0.0735327873843,0.0732543408797,0.0732508162404,0.0733653670176,0.0733759409355,0.0734094250088,0.0733900394927,0.0732437669618,0.0733248336657,0.073428810525,0.0736385265633,0.0737195932672,0.0738041846104,0.073640288883,0.0733882771731,0.0730587233986,0.0730657726772,0.0730270016449,0.0728366711227,0.0727097841079,0.0724701086356,0.0722938766706,0.0724524854391,0.072487731832,0.0725388391019,0.0728084740083,0.0728190479262,0.0726146188468,0.0724013781692,0.0724683463159,0.0725476507001,0.072739743542,0.0723678940959,0.0724560100784,0.0724806825534,0.0722903520313,0.0720242417642,0.0721000215091,0.0723009259492,0.0723537955387,0.0723855172924,0.0722445317204,0.0723255984243,0.0722216215649,0.0720577258375,0.0719625605764,0.0718867808315,0.0717070242272,0.0713968559689,0.0710990239481,0.0708540615168,0.0706972150679,0.0705597541353,0.0707113136251,0.070792380329,0.0705297947012,0.0707818064111,0.0707306991413,0.0710285311621,0.0710496789979,0.0710884500302,0.0712012384878,0.0713210762239,0.0710866877105,0.0711113601856,0.0712188616843,0.0709386528599,0.0711025485874,0.0712294356022,0.0712823051916,0.0711871399306,0.0710355804407,0.0708487745578,0.0708646354347,0.0706690179535,0.0707060266662,0.0708047165666,0.070691928109,0.0706302469212,0.0706038121265,0.0705121715047,0.0704963106279,0.0704328671205,0.0704363917598,0.0703764728917,0.0703024554664,0.0702161018036,0.0703993830471,0.0701403220586,0.0701949539678,0.0702548728359,0.0702619221145,0.0702830699503,0.0700010988063,0.0701279858211,0.0702495858769,0.0701438466979,0.0697772842108,0.0697032667855,0.0694829768293,0.0695622812135,0.0695605188939,0.0697402754981,0.0699376552989,0.0697667102929,0.069514698583,0.0694600666738,0.0695569942546,0.0695569942546,0.0696486348764,0.0693930985272,0.0694301072398,0.0692433013569,0.0691833824888,0.0691481360958,0.0690776433099,0.0693948608468,0.0693842869289,0.06947945219,0.0692503506355,0.0693419912573,0.0691639969727,0.0692168665622,0.0692450636766,0.0691745708906,0.0692803100696,0.0690230114007,0.0689948142863,0.0689807157291,0.0690758809902,0.0691604723334,0.069267973832,0.069167521612,0.0691164143421,0.0689824780488,0.0689243215003,0.0689278461396,0.0691692839316,0.0691498984155,0.0690230114007,0.0687604257729,0.068815057682,0.0689860026881,0.0689102229431,0.0691287505797,0.0691305128993,0.0690388722776,0.0688432547964,0.0686811213887,0.0686405880367,0.0689225591807,0.0688027214445,0.0686282517992,0.0686740721101,0.0684308719984,0.068302222664,0.0682652139513,0.0682634516317,0.0681629994116,0.068543660456,0.0682951733854,0.06837271545,0.0682193936404,0.0680784080685,0.0682810748282,0.0684061995233,0.0685189879809,0.0685753822097,0.0688256315999,0.0685542343739,0.0687022692245,0.0685172256612,0.0685418981363,0.0688062460838,0.0688344431982,0.0690794056295,0.0688644026322,0.0687533764943,0.0686529242743,0.0686476373153,0.0687815736087,0.0689225591807,0.0689049359842,0.0686582112332,0.0685507097346,0.0683780024089,0.0686511619546,0.0685207503005,0.0686335387581,0.0687304663389,0.0687251793799,0.0687251793799,0.0690071505239,0.0690423969169,0.0690282983597,0.0688538287143,0.0686758344297,0.068855591034,0.0688573533536,0.0689066983038,0.0689419446968,0.0690846925885,0.0687991968052,0.0689807157291,0.0690512085151,0.0694530173952,0.0693261303805,0.0691798578495,0.0692397767176,0.069273260791,0.0689771910898,0.0687533764943,0.0688696895912,0.0688520663947,0.0689066983038,0.068649399635,0.0690846925885,0.0692838347089,0.0691921940871,0.0694142463629,0.0695305594598,0.069620437762,0.0698953596273,0.0699147451435,0.0698953596273,0.0699781886509,0.0697455624571,0.0697649479732,0.0699552784954,0.0697438001374,0.0697825711697,0.0698389653985,0.0698301538003,0.0699729016919,0.0701156495835,0.0700063857653,0.0699817132902,0.0701403220586,0.0698231045217,0.0699870002491,0.0699200321024,0.0697896204483,0.0698001943662,0.0694847391489,0.0694706405917,0.0697402754981,0.0698354407592,0.0695957652869,0.0699112205042,0.069821342202,0.0702231510822,0.070279545311,0.0702072902053,0.0704293424812,0.0704628265545,0.0703465134576,0.0704822120707,0.0709404151796,0.0711554181769,0.0712329602415,0.0711994761681,0.0716805894325,0.0716841140718,0.0717951402097,0.0720330533624,0.0723485085797,0.0724401492015,0.0723943288906,0.0723643694566,0.0725370767822,0.0727221203455,0.0726322420433,0.0729089262283,0.07305167412,0.0729036392694,0.0725494130198,0.0726763000346,0.0727591290581,0.0729547465392,0.0729794190143,0.0730076161287,0.0731362654631,0.0731944220116,0.0733477438211,0.0734411467625,0.0736491004812,0.0735327873843,0.0737143063082,0.0735116395485,0.0736667236777,0.0736808222349,0.0736720106367,0.0736226656865,0.0735363120236,0.0737319295047,0.0741055412705,0.0744509559218,0.0745267356668,0.0747752227374,0.0750959649136,0.0752545736821,0.0754431418846,0.0755894144155,0.0757973681342,0.0760863885568,0.0762414726859,0.0761639306214,0.0761692175803,0.0762555712431,0.0760423305655,0.0760493798441,0.0762291364484,0.0765604525425,0.0765639771818,0.0765622148622,0.0765551655836,0.0768001280149,0.0769287773493,0.0771296817894,0.0771931252968,0.0775085805141,0.0775085805141,0.0776389921682,0.0778857169191,0.0780919083181,0.0782099837347,0.0781042445557,0.0783280591512,0.0783932649782,0.0786435143685,0.0787104825152,0.078726343392,0.0787862622601,0.0787598274654,0.0790312246914,0.0794136480554,0.0799317700324,0.080014599056,0.0804587036077,0.0806754689246,0.0805133355168,0.0809398168721,0.0808058805787,0.0812059271392,0.081121335796,0.0809873995026,0.0811495329104,0.0812129764178,0.0809592023882,0.0808657994468,0.0812094517785,0.0811935909016,0.0815848258639,0.0815055214796,0.0816306461748,0.0817910172629,0.081845649172,0.0821011855212,0.082303852281,0.0825629132695,0.0826334060555,0.082851933692,0.0829100902405,0.0831797251469,0.0832801773669,0.0833947281441,0.0835586238716,0.0835973949038,0.083752479033,0.0840080153822,0.0844626938519,0.0845772446291,0.0846389258168,0.0850178245415,0.0853050826444,0.0857104161639,0.0859677148327,0.0860487815366,0.0863325150002,0.0862091526247,0.0865669035136,0.0865616165547,0.0868277268218,0.0868682601737,0.0869898602295,0.0870409674994,0.0870444921387,0.087354660397,0.0872295357019,0.0875872865908,0.0871572805963,0.0875696633943,0.087772330154,0.0879467997993,0.0879221273242,0.0881882375914,0.0882305332629,0.0884296753834,0.0887698030758,0.0889707075158,0.0893125975279,0.0895557976395,0.0897108817687,0.0898871137337,0.0900897804934,0.0898659658979,0.0901232645667,0.0901849457545,0.0902589631798,0.0904351951447,0.0905567952006,0.0904633922591,0.0906096647901,0.0906220010276,0.0909832765558,0.0915419318848,0.0918538624628,0.0919613639614,0.0923772713987,0.0926680541409,0.0934945820566,0.0940972953768,0.0948286580315,0.0957996961585,0.0970421315115,0.0980484160315,0.099243268754,0.100765912931,0.102017159883,0.103115085024,0.103886981031,0.105055398959,0.106169184977,0.107050344802,0.107459202961,0.108049580044,0.108299829434,0.10862233393,0.109057626883,0.109662102523,0.110144978107,0.11038289126,0.110580271061,0.110622566732,0.111026137932,0.111211181495,0.111806845537,0.111983077502,0.11229500808,0.112330254473,0.11249591252,0.112837802532,0.112929443154,0.113059854808,0.113209651978,0.113410556418,0.11354977967,0.114037942213,0.114177165466,0.114360446709,0.114293478563,0.114145443712,0.114245895932,0.114675901927,0.114563113469,0.114624794657,0.114573687387,0.114400980061,0.114446800372,0.114649467132,0.114774591827,0.115065374569,0.115338534115,0.11541255154,0.115742105315,0.116031125737,0.116172111309,0.116330720078,0.116448795494,0.116475230289,0.116499902764,0.116579207148,0.11657215787,0.11676953767,0.11686998989,0.117160772633,0.117573155431,0.117990825188,0.118369723912,0.118766245834,0.119319614204,0.119351335957,0.11979191587,0.119776054993,0.120021017424,0.120274791454,0.120484507492,0.120338234961,0.120228971143,0.120287127691,0.120424588624,0.120814061267,0.121111893287,0.1210502121,0.121311035408,0.121270502056,0.121191197672,0.121510177528,0.121686409493,0.122095267652,0.122197482192,0.122326131526,0.122107603889,0.122773760717,0.122978189796,0.123050444902,0.122979952116,0.123152659442,0.123397621873,0.123267210219,0.123649633583,0.12381705395,0.123847013384,0.123831152507,0.123676068378,0.123855824982,0.12376594668,0.123693691574,0.123434630586,0.123505123372,0.123506885691,0.123492787134,0.123427581307,0.123422294348,0.123568566879,0.123450491462,0.123674306058,0.123482213216,0.123589714715,0.123358850841,0.123127986967,0.123053969541,0.122990526034,0.122727940406,0.122604578031,0.122683882415,0.122514699728,0.122616914268,0.122717366488,0.123043395623,0.123101552172,0.123536845125,0.123831152507,0.123905169932,0.123635535026,0.123651395903,0.123892833695,0.124021483029,0.123855824982,0.123649633583,0.123438155225,0.12306278114,0.122849540462,0.122837204224,0.122891836134,0.122622201227,0.12235432864,0.122183383634,0.121808009549,0.121561284798,0.121274026695,0.121140090402,0.120958571478,0.120791151111,0.120801725029,0.120489794451,0.120454548058,0.120428113263,0.120320611765,0.1202430697,0.120010443506,0.119608634626,0.119693225969,0.11953990416,0.119226211262,0.119127521362,0.118702802326,0.118212877464,0.11823226298,0.11802959622,0.11772823956,0.117655984454,0.117553769915,0.117120239281,0.117130813199,0.116737815917,0.116799497104,0.116803021744,0.11656863323,0.116499902764,0.11651928828,0.11632014616,0.115911288001,0.11591833728,0.115567635669,0.115846082174,0.115495380564,0.115239844214,0.115220458698,0.114963160029,0.114866232449,0.114289953923,0.114009745099,0.113736585553,0.113419368016,0.113188504142,0.113130347594,0.112654521288,0.112257999367,0.111935494871,0.111827993373,0.11204299637,0.111716967235,0.111457906246,0.111147737988,0.110994416178,0.110643714568,0.110811134935,0.110751216067,0.110555598586,0.110495679717,0.110342357908,0.110407563735,0.110370555022,0.110263053524,0.109857720004,0.110009279494,0.109741406907,0.109341360347,0.109149267505,0.108736884707,0.108282206237,0.108047817724,0.107892733595,0.10801785829,0.107728837867,0.107559655181,0.107235388365,0.107223052128,0.107002762172,0.106838866444,0.106754275101,0.106602715611,0.106209718329,0.105860779039,0.105629915165,0.105425486085,0.105243967161,0.104704697348,0.104509079867,0.10429231455,0.104278215993,0.10389403031,0.103858783917,0.103619108444,0.103864070876,0.103559189576,0.103280743072,0.103527467822,0.103372383693,0.103204963327,0.102591676088,0.102399583247,0.102269171593,0.102121136742,0.101765148173,0.101165959492,0.101121901501,0.100943907216,0.100808208603,0.100498040345,0.100762388292,0.100626689679,0.100325333019,0.0998036864026,0.0996979472236,0.0997684400096,0.0995675355696,0.0991903991645,0.0992027354021,0.0991093324606,0.0986705148679,0.0985665380085,0.0984854713046,0.098513668419,0.0980607522691,0.0978052159198,0.0974862360632,0.0972201257961,0.0968324154732,0.0965504443292,0.0965381080917,0.0959917890003,0.0958208439943,0.095575881563,0.0954736670233,0.0952480901081,0.0950947682986,0.0951458755684,0.0952322292313,0.0953890756801,0.0951247277326,0.0952498524278,0.0950489479877,0.0948621421048,0.0946735739023,0.094529063691,0.0942841012597,0.0939492605263,0.0932020369948,0.0924636250616,0.0917498856034,0.0909779895969,0.0899276470856,0.0892368177829,0.0881159824857,0.087012770385,0.0860135351436,0.0846283518989,0.0835938702645,0.0827250466772,0.0820941362426,0.0811812546641,0.08059792686,0.0798366047714,0.0796057408972,0.0791968827385,0.0789008130374,0.0787474912278,0.0788197463335,0.078555398386,0.078319247553,0.0784919548786,0.078560685345,0.0785307259109,0.0782099837347,0.0782892881189,0.078343920028,0.0784038388961,0.0780496126465,0.078178261981,0.0780496126465,0.0775297283499,0.0772459948863,0.0772459948863,0.0773305862295,0.0771279194697,0.076583362698,0.076548116305,0.0765992235748,0.0764494264046,0.0762855306772,0.0764282785688,0.0764018437741,0.0762220871698,0.0759788870581,0.0759665508206,0.0759859363367,0.0758766725184,0.0757374492661,0.0754783882776,0.0752827707965,0.0753250664681,0.0753814606969,0.0753127302305,0.0752422374446,0.0753127302305,0.0754043708523,0.0751876055354,0.0749955126936,0.0749426431041,0.0749461677434,0.074882724236,0.0746342371654,0.0744104225699,0.0741830833351,0.0736825845546,0.07360504249,0.0735327873843,0.0734006134106,0.0732208568063,0.0731961843312,0.0728384334423,0.0727221203455,0.072774989935,0.072739743542,0.0729388856624,0.0728225725655,0.0727238826651,0.0724419115212,0.0724172390461,0.0723502708994,0.0723414593011,0.0722938766706,0.0720365780017,0.0720735867144,0.0719431750603,0.0717352213416,0.0718180503652,0.0717863286115,0.0716876387111,0.0714620617959,0.0711307457018,0.0709862354905,0.0708100035255,0.0706284846016,0.0704293424812,0.0705333193405,0.07013327278,0.0701702814927,0.0701121249442,0.0700715915923,0.0701879046892,0.0701967162874,0.0703412264987,0.0703165540236,0.0703694236131,0.0702636844341,0.0705068845458,0.070515696144,0.0703059801057,0.0702707337127,0.0703482757773,0.070209052525,0.0701790930909,0.0700786408709,0.0699817132902,0.0698090059645,0.0695287971402,0.0695869536886,0.0696944551873,0.0697279392606,0.0697349885392,0.0695358464188,0.0693367042984,0.0692556375945,0.069197481046,0.0690529708348,0.0691816201692,0.0690071505239,0.0688168200017,0.0689313707789,0.068850304075,0.0690441592365,0.0689014113449,0.0687727620105,0.0686388257171,0.0687304663389,0.0685700952507,0.0684960778254,0.0685771445293,0.0683427560159,0.0682740255496,0.0680819327078,0.0681806226081,0.0681947211653,0.0682176313208,0.0680008660039,0.0679832428074,0.0679726688895,0.0680466863148,0.0680889819864,0.0679409471358,0.0678757413087,0.0678545934729,0.0678457818747,0.0674845063465,0.0675497121735,0.0675409005753,0.0675955324844,0.0674351613963,0.067013967,0.067054500352,0.067049213393,0.0670210162786,0.0669064655014,0.0671655264899,0.0671531902524,0.0670122046804,0.0668253987975,0.0668165871993,0.0670527380323,0.0670650742699,0.0671390916952,0.0668447843137,0.0668007263224,0.0667936770438,0.066948761173,0.0669381872551,0.0670386394751,0.0669540481319,0.0671443786541,0.067054500352,0.0669875322053,0.0672712656689,0.0674439729946,0.0673576193317,0.0674069642819,0.0675285643378,0.0675514744932,0.0676184426399,0.0672818395868,0.0673294222173,0.0673170859798,0.067290651185,0.0673699555693,0.06756733537,0.0675179904199,0.0673294222173,0.067119706179,0.0670703612288,0.0671091322611,0.0674104889212,0.0674615961911,0.0676325411971,0.0673470454138,0.0671761004078,0.0671073699415,0.067436923716,0.0678651673908,0.0677012716634,0.0677224194992,0.0675003672234,0.067361143971,0.06736643093,0.06736643093,0.067436923716,0.0674175381998,0.0673399961352,0.0671408540148,0.0673593816514,0.067572622329,0.0675743846486,0.0675761469683,0.0673717178889,0.0675268020181,0.067542662895,0.0674897933055,0.067361143971,0.0673117990208,0.0674104889212,0.0672818395868,0.0673805294872,0.067401677323,0.0675285643378,0.0674774570679,0.0674739324286,0.0675497121735,0.0675708600093,0.0674897933055,0.0674245874784,0.0675831962469,0.0675356136164,0.0675144657806,0.0674756947483,0.0678422572354,0.0678634050712,0.0678528311533,0.0680625471916,0.0681136544615,0.068226442919,0.0682017704439,0.0681859095671,0.0682740255496,0.0684220604002,0.0681718110099,0.0682299675583,0.0683515676142,0.0682705009103,0.0685154633416,0.0685313242184,0.068644112676,0.0688379678375,0.0689983389256,0.0689190345414,0.0690282983597,0.0690300606793,0.0691340375386,0.0691816201692,0.0690776433099,0.0691551853744,0.0691446114565,0.068920796861,0.0690406345972,0.0690987911456,0.0691904317674,0.0692309651194,0.0691692839316,0.0689842403684,0.0689877650077,0.0690441592365,0.068996576606,0.0691780955299,0.0692433013569,0.0691710462513,0.0691446114565,0.0690899795474,0.0692186288818,0.0693754753307,0.0694970753865,0.0695552319349,0.0695411333777,0.0695887160083,0.0694336318791,0.0695675681725,0.0694600666738,0.0696891682283,0.0697067914248,0.0697843334894,0.0697649479732,0.0697790465304,0.0699570408151,0.0698231045217,0.0698407277182,0.0697931450876,0.0699658524133,0.0701367974193,0.0630681333043,0.0561104953273,0.0491475703912,0.0420225120474,0.0)
ycorr <- c(7.32974837143e-05,7.31807760465e-05,7.28217275269e-05,7.22177173825e-05,7.13627413051e-05,7.02575450845e-05,6.89016566944e-05,6.75607614038e-05,6.62298984676e-05,6.49021150089e-05,6.35718554973e-05,6.22320575632e-05,6.08856905132e-05,5.9540467815e-05,5.81907002495e-05,5.6837051235e-05,5.54780412943e-05,5.41101059294e-05,5.27381414855e-05,5.13622160975e-05,4.99826541191e-05,4.86006297668e-05,4.72208030874e-05,4.58395800222e-05,4.44624763373e-05,4.30906607559e-05,4.17179735841e-05,4.0349152536e-05,3.89828398855e-05,3.76203376418e-05,3.62627472468e-05,3.49129428216e-05,3.3565229573e-05,3.22174675552e-05,3.08660819435e-05,2.95033166934e-05,2.81352746566e-05,2.67613842599e-05,2.53759528298e-05,2.39779324425e-05,2.2566004706e-05,2.11397551846e-05,1.97037485997e-05,1.82616197005e-05,1.68134806732e-05,1.53643927997e-05,1.39116655006e-05,1.24524569946e-05,1.09863695972e-05,9.5120299472e-06,8.02916511536e-06,6.53495771128e-06,5.02600888319e-06,3.49780211517e-06,1.95434945495e-06,3.91313317515e-07,-1.1896518879e-06,-2.78697277521e-06,-4.40024344216e-06,-6.02246058119e-06,-7.64699396e-06,-9.26888605275e-06,-1.08869358474e-05,-1.24999106515e-05,-1.41103682241e-05,-1.57261916464e-05,-1.73376531036e-05,-1.89504425953e-05,-2.05588613575e-05,-2.21606853497e-05,-2.37651591072e-05,-2.53784816846e-05,-2.70091682949e-05,-2.86536775386e-05,-3.03107031688e-05,-3.1969084591e-05,-3.36373573417e-05,-3.531960614e-05,-3.70123826916e-05,-3.87177094999e-05,-4.04388827434e-05,-4.21716448471e-05,-4.39095925423e-05,-4.56539623629e-05,-4.7406420273e-05,-4.91632040823e-05,-5.09265774214e-05,-5.2680767518e-05,-5.44300014624e-05,-5.61740130874e-05,-5.79121640982e-05,-5.9639798754e-05,-6.13573963934e-05,-6.30701961218e-05,-6.47730609848e-05,-6.64669569499e-05,-6.81580508476e-05,-6.98524440205e-05,-7.1550601053e-05,-7.32526618662e-05,-7.495704111e-05,-7.66681557524e-05,-7.83846393558e-05,-8.00998589445e-05,-8.18119914463e-05,-8.35194973517e-05,-8.52199987211e-05,-8.69104042675e-05,-8.85957084199e-05,-9.02795674116e-05,-9.1961167648e-05,-9.36455944534e-05,-9.53318322662e-05,-9.70256277494e-05,-9.87351483633e-05,-0.000100461658892,-0.000102203618648,-0.000103960671822,-0.000105732269989,-0.000107511913336,-0.000109298284638,-0.000111082940334,-0.000112865172732,-0.000114638318901,-0.000116400000962,-0.000118148816871,-0.000119887838915,-0.000121620745888,-0.000123346154362,-0.000125063836628,-0.000126774017194,-0.000128474140952,-0.000130168669985,-0.000131858360493,-0.000133547941041,-0.000135235805102,-0.000136919073207,-0.000138596816479,-0.000140263530187,-0.00014192650011,-0.000143587002225,-0.000145244912174,-0.00014690537525,-0.000148566711998,-0.000150223927396,-0.000151882595051,-0.000153544236972,-0.000155205476304,-0.000156868293327,-0.000158532621137,-0.000160192358866,-0.000161850778609,-0.000163504219618,-0.000165149711854,-0.000166793529874,-0.00016844142511,-0.000170080887596,-0.000171718646505,-0.0001733489583,-0.00017497074048,-0.000176590669343,-0.000178209801503,-0.000179828134552,-0.000181449068152,-0.000183071362946,-0.000184685026556,-0.000186292676031,-0.000187895112746,-0.000189497271104,-0.000191100898087,-0.000192700922814,-0.000194296879941,-0.00019588749699,-0.000197471217353,-0.000199039991655,-0.0002005980136,-0.000202150956545,-0.00020369159774,-0.000205225903035,-0.00020674900429,-0.000208264322537,-0.000209772324132,-0.000211269170342,-0.000212759624452,-0.000214249090715,-0.000215741325402,-0.000217236661367,-0.000218735025574,-0.000220238715222,-0.000221742121929,-0.00022324490391,-0.000224751124596,-0.000226261363559,-0.000227780713802,-0.000229306749776,-0.000230834150525,-0.000232364039919,-0.000233894481235,-0.00023542072163,-0.000236950814601,-0.000238485839253,-0.000240017462655,-0.000241545790832,-0.000243065617881,-0.000244570759995,-0.000246064827197,-0.000247549730223,-0.000249032713316,-0.000250513274123,-0.000251995205632,-0.000253467029986,-0.000254935191143,-0.000256400121008,-0.000257863251474,-0.00025933195478,-0.000260808708175,-0.00026228465875,-0.000263756078683,-0.000265217149177,-0.000266670896581,-0.000268118483161,-0.000269559431314,-0.000270995736459,-0.000272430561959,-0.000273865763255,-0.000275294667559,-0.000276721335739,-0.000278148801754,-0.000279583522452,-0.000281019455224,-0.000282457324912,-0.000283905437599,-0.000285361670169,-0.000286821051329,-0.000288273967786,-0.000289719039252,-0.000291163531523,-0.00029260225303,-0.000294037492883,-0.000295460530636,-0.000296880889505,-0.000298293745748,-0.000299694320388,-0.000301087794064,-0.000302482230581,-0.000303884652536,-0.000305287975588,-0.00030668691773,-0.00030808495594,-0.000309485833398,-0.000310890696209,-0.000312295147294,-0.000313705836037,-0.000315117431859,-0.000316525144271,-0.000317926053765,-0.000319322035514,-0.00032071850194,-0.000322111986822,-0.000323499688311,-0.000324875678561,-0.000326240340029,-0.00032759431319,-0.000328933851049,-0.000330267860362,-0.00033159250576,-0.000332908326887,-0.000334218950487,-0.000335524396089,-0.000336829670874,-0.000338137347491,-0.000339452256975,-0.000340777410755,-0.0003421156008,-0.000343462335571,-0.000344813895763,-0.000346176658367,-0.000347542215348,-0.000348906882999,-0.000350269934896,-0.000351629743775,-0.000352980400497,-0.000354310009754,-0.000355611982648,-0.000356878270301,-0.000358108636986,-0.000359290759743,-0.000360426259979,-0.000361508605639,-0.000362533104659,-0.000363494339464,-0.00036438705673,-0.000365215832882,-0.000365989875865,-0.000366715729496,-0.000367399243742,-0.000368048432441,-0.000368671694167,-0.000369278865681,-0.000369876557774,-0.000370476519103,-0.000371086858866,-0.000371718778884,-0.000372369888101,-0.000373039857353,-0.000373731156529,-0.000374444805151,-0.000375175386125,-0.000375918373349,-0.000376671510911,-0.00037743621778,-0.000378207611745,-0.000378976263291,-0.00037974387065,-0.000380510701265,-0.000381268803952,-0.000382013432082,-0.000382747868846,-0.000383476816574,-0.000384203962052,-0.000384917764793,-0.000385623228905,-0.000386322960013,-0.000387021429558,-0.000387712682577,-0.000388403955404,-0.000389102328795,-0.000389804861685,-0.000390506284897,-0.00039120462263,-0.000391901724827,-0.000392600519805,-0.000393295412765,-0.000393980311601,-0.00039465739928,-0.000395329810813,-0.000395992529107,-0.000396647413764,-0.000397296564431,-0.000397943838917,-0.000398587009554,-0.000399221099584,-0.000399848228471,-0.000400471807108,-0.000401094474008,-0.000401714744578,-0.000402328102403,-0.000402929908051,-0.000403517278295,-0.000404085118842,-0.000404637698123,-0.000405179264269,-0.0004057135279,-0.000406238538225,-0.000406754171187,-0.000407254765763,-0.000407741923907,-0.000408223010019,-0.000408700514542,-0.000409183126132,-0.000409670631762,-0.000410153967371,-0.000410626732672,-0.000411091454187,-0.000411550835374,-0.000412004151121,-0.000412455379072,-0.000412899099961,-0.000413334793369,-0.000413759687177,-0.000414167472867,-0.000414568044184,-0.00041496043853,-0.000415346165087,-0.000415719192867,-0.000416076680317,-0.000416419739377,-0.000416747864047,-0.000417065070065,-0.000417364187468,-0.000417651408867,-0.000417919554306,-0.000418170232447,-0.000418404296102,-0.000418621877629,-0.000418828544796,-0.000419027885802,-0.000419221052057,-0.000419407857155,-0.000419589287261,-0.000419765884349,-0.000419940457499,-0.000420117167316,-0.000420285874757,-0.000420450016361,-0.000420611143163,-0.000420762136821,-0.000420901893364,-0.000421025055269,-0.000421133618459,-0.000421224314046,-0.000421295673528,-0.000421344388008,-0.000421377080203,-0.000421398244985,-0.000421406237552,-0.000421398919817,-0.000421379195581,-0.000421345868604,-0.000421299425634,-0.00042123923099,-0.000421170972764,-0.000421095656297,-0.000421009190978,-0.000420910811168,-0.000420798365343,-0.000420673011503,-0.000420531922482,-0.000420374625863,-0.000420200573435,-0.000420013899539,-0.000419810930379,-0.0004195890277,-0.000419352020011,-0.000419097165018,-0.000418821334239,-0.000418524479446,-0.000418206700814,-0.0004178724125,-0.00041752334959,-0.000417155906813,-0.000416769057054,-0.00041636666075,-0.000415948489201,-0.00041551225336,-0.000415059662133,-0.000414589136755,-0.00041410236194,-0.000413598073881,-0.000413071328256,-0.000412525772392,-0.000411965481328,-0.000411387401527,-0.000410786159934,-0.000410155621628,-0.00040949899658,-0.000408818665614,-0.000408117235061,-0.000407394270414,-0.000406653239035,-0.000405896880997,-0.000405118830917,-0.000404315252917,-0.000403488578679,-0.00040264807822,-0.000401798520524,-0.000400938132874,-0.00040006098449,-0.000399166437108,-0.000398254924304,-0.000397321607096,-0.000396365754374,-0.00039539444955,-0.000394410908599,-0.000393414101743,-0.000392395543073,-0.00039135464773,-0.000390293355735,-0.000389217297838,-0.000388121996298,-0.000387009434483,-0.000385881815662,-0.000384740114317,-0.000383580736217,-0.000382398515897,-0.000381195535668,-0.000379974415936,-0.00037873703997,-0.000377480806458,-0.000376209981533,-0.000374925894048,-0.000373622433965,-0.000372295978336,-0.000370946346203,-0.000369574524712,-0.000368190221576,-0.000366789497591,-0.000365374126533,-0.000363935888089,-0.000362472421678,-0.000360978482458,-0.000359461898044,-0.000357927509311,-0.000356372542541,-0.000354798577432,-0.000353200133167,-0.000351573088711,-0.000349919238106,-0.00034823902996,-0.000346540725557,-0.000344824486666,-0.000343089173589,-0.000341327529928,-0.000339542420965,-0.000337738648775,-0.000335914322507,-0.000334071723214,-0.000332208953027,-0.000330328334876,-0.00032842345444,-0.000326492821292,-0.000324535510246,-0.000322553476219,-0.000320550072823,-0.000318519777902,-0.000316464976055,-0.000314386200496,-0.000312283670779,-0.000310157225127,-0.000308006846304,-0.000305837002348,-0.000303648556528,-0.000301442450012,-0.000299217352942,-0.000296974078259,-0.000294710212711,-0.000292422662878,-0.000290113485353,-0.00028778923501,-0.000285448023451,-0.000283086219097,-0.000280706598874,-0.000278307282148,-0.000275890781239,-0.000273457072552,-0.000271002147438,-0.000268530587657,-0.000266042462153,-0.000263530926169,-0.000260993375752,-0.000258434784822,-0.000255854350181,-0.000253251687465,-0.000250625797577,-0.000247973580985,-0.000245298159515,-0.000242601400756,-0.000239877582118,-0.000237128268827,-0.000234358061674,-0.000231567204992,-0.000228751678419,-0.000225912311503,-0.000223048804663,-0.000220163348285,-0.000217255208887,-0.000214323824864,-0.000211369491115,-0.00020839750814,-0.000205406750269,-0.000202396794369,-0.000199362189411,-0.000196307012077,-0.000193230722548,-0.000190132563848,-0.000187014247699,-0.00018387889527,-0.000180725882232,-0.000177552661542,-0.000174355108104,-0.000171135012309,-0.000167896340372,-0.000164641459839,-0.000161369129724,-0.000158079576895,-0.000154772920208,-0.00015144530067,-0.00014809606074,-0.000144724268778,-0.000141336632894,-0.000137934311136,-0.000134516382147,-0.000131078480884,-0.000127623021714,-0.000124149837167,-0.000120656446514,-0.000117141198411,-0.000113605593417,-0.000110051425823,-0.000106478447587,-0.000102774519906,-9.88411304916e-05,-9.4594937798e-05,-8.99700879431e-05,-8.43982154912e-05,-7.97891563969e-05,-7.55621517072e-05,-7.16476373277e-05,-6.79564954393e-05,-6.43805329544e-05,-6.08102102469e-05,-5.73537023708e-05,-5.41088486276e-05,-5.11580719746e-05,-4.85664639149e-05,-4.6900228969e-05,-4.42465483094e-05,-4.11872238251e-05,-3.77934260474e-05,-3.41535894536e-05,-3.03766317345e-05,-2.65691349776e-05,-2.27286319778e-05,-1.88505887791e-05,-1.49392835326e-05,-1.09962058973e-05,-7.02370007011e-06,-3.02691236078e-06,9.89879212017e-07,5.02488326494e-06,9.07791492264e-06,1.31538931966e-05,1.72426851534e-05,2.13404668314e-05,2.5441549758e-05,2.9554042996e-05,3.36777509145e-05,3.78125730015e-05,4.19649049768e-05,4.61403225187e-05,5.03374246929e-05,5.45525744554e-05,5.87838935958e-05,6.3034565587e-05,6.73053122071e-05,7.15909216009e-05,7.5885256646e-05,8.01919982661e-05,8.45105679782e-05,8.88338352109e-05,9.31600968258e-05,9.74864530202e-05,0.000101817093532,0.000106153218266,0.00011049690608,0.000114850927068,0.000119212631613,0.00012358328184,0.000127956203925,0.000132333576341,0.000136717459361,0.000141108106555,0.000145511859317,0.000149927533686,0.000154354334023,0.000158789767752,0.000163239401599,0.000167699696055,0.000172172364466,0.000176658157605,0.000181156881709,0.000185672039356,0.000190198524998,0.000194733053816,0.000199276111999,0.000203825154515,0.000208381584204,0.000212942668012,0.000217517065031,0.000222101702063,0.0002266995771,0.000231303782103,0.000235918435426,0.00024054323522,0.000245173808751,0.000249808517241,0.000254451008248,0.000259101562905,0.000263753333415,0.000268409843883,0.000273065647041,0.000277720501493,0.00028237819036,0.000287030124794,0.000291678057916,0.000296331619224,0.000300988531514,0.000305647105629,0.000310308423561,0.000314970313038,0.000319631580972,0.000324296053961,0.000328956476532,0.00033361307542,0.000338270996169,0.000342925662759,0.000347570246656,0.000352204288736,0.000356824799343,0.000361430310641,0.000366024001225,0.000370600040942,0.000375163611778,0.000379717262274,0.000384260754525,0.000388789552048,0.00039330369693,0.000397809092601,0.000402302787156,0.000406785860958,0.000411256940034,0.000415716803543,0.000420163509636,0.000424596593364,0.000429019386251,0.000433430033106,0.000437830229744,0.000442216599527,0.000446590783323,0.000450951842496,0.000455299118896,0.000459637012078,0.000463959976485,0.000468274402377,0.000472573341973,0.000476854078351,0.000481120094991,0.000485370416764,0.000489603855336,0.000493819233556,0.000498016821159,0.000502192188631,0.000506343638032,0.000510467250179,0.000514561888407,0.000518628308489,0.000522659947686,0.000526656675186,0.000530617963865,0.000534547326009,0.000538442454647,0.000542304088427,0.000546135700962,0.000549935188055,0.000553707405082,0.000557452404393,0.000561175195371,0.000564878123498,0.000568556773232,0.000572208812704,0.000575836504544,0.000579436664231,0.000583013277795,0.000586562326752,0.000590080663854,0.000593570910828,0.000597028127359,0.000600445478244,0.00060383177971,0.000607188224003,0.000610513206081,0.000613804995363,0.000617058987632,0.00062027233754,0.000623447465496,0.000626584410812,0.000629683256568,0.000632741965045,0.000635761727232,0.00063873480001,0.000641664544198,0.000644553354702,0.000647402455248,0.000650218744898,0.000652998583975,0.000655737625783,0.000658439042859,0.000661102950876,0.000663726905997,0.000666311568923,0.000668857431322,0.000671360197951,0.000673818095879,0.000676235497547,0.000678613732493,0.000680959827129,0.000683272212661,0.000685553970626,0.000687805794551,0.000690033032303,0.000692233111691,0.000694407647509,0.000696554577365,0.000698668548931,0.000700739299982,0.000702761828918,0.000704734346268,0.000706660893654,0.000708534929604,0.000710357465197,0.00071212841054,0.000713848922768,0.000715517749327,0.00071713903129,0.00071871952294,0.000720263776709,0.000721771437447,0.000723240885745,0.000724672883094,0.000726066664766,0.000727417994092,0.000728731223154,0.000730006232775,0.000731236518317,0.000732426293908,0.000733571588649,0.000734673152344,0.00073573339856,0.000736756365088,0.000737739088214,0.000738679122946,0.000739574148314,0.000740423205574,0.000741232960585,0.000742001596254,0.000742724412638,0.000743401609881,0.000744032117949,0.000744610172353,0.000745131772947,0.000745604226449,0.000746028366844,0.000746404357271,0.000746727902603,0.000746998743443,0.000747224692441,0.000747405368981,0.000747540970667,0.000747629715978,0.000747675845735,0.000747682597238,0.000747645210232,0.000747566984856,0.000747451414218,0.000747296462789,0.000747097759167,0.000746856693322,0.000746571756426,0.000746246893913,0.000745884175674,0.000745478676213,0.000745029776085,0.000744540202855,0.000744010767638,0.000743437844261,0.000742821910691,0.000742161745371,0.000741457395347,0.000740708338377,0.000739910577278,0.000739063406124,0.000738171127961,0.00073723176131,0.000736243650103,0.000735208599191,0.000734132418262,0.000733016455279,0.000731855781518,0.000730652446616,0.000729413728895,0.00072814027022,0.000726835947288,0.000725497624206,0.000724115536113,0.000722689069915,0.000721216572501,0.000719699002822,0.000718142460327,0.000716548661956,0.000714910041232,0.000713222659661,0.00071148643404,0.000709701526942,0.000707879329973,0.00070602604664,0.000704139596869,0.000702214217135,0.000700244491986,0.000698227535636,0.000696164405626,0.000694062589845,0.000691913317311,0.000689715761317,0.000687465127356,0.000685151773182,0.000682774127529,0.000680335959337,0.000677839035459,0.000675275830613,0.000672643612491,0.000669939575927,0.000667160835377,0.000664314091657,0.000661398581229,0.000658417459059,0.000655374565136,0.000652269559596,0.000649099893767,0.000645870129876,0.000642587135065,0.000639252244251,0.000635873150324,0.000632449097778,0.000628980137248,0.000625467928556,0.000621910029385,0.000618305032992,0.000614658815133,0.000610980689567,0.000607271323179,0.000603531059951,0.000599756667402,0.000595945994709,0.000592098185353,0.000588216731198,0.000584306192357,0.000580367442871,0.00057640458277,0.000572415506206,0.000568391687134,0.000564333603596,0.000560245303535,0.0005561282668,0.000551985823242,0.000547821107509,0.000543631717727,0.000539420810181,0.00053518905273,0.000530934290671,0.000526658413399,0.000522364352128,0.000518052929489,0.000513724413984,0.000509386023552,0.000505036342967,0.000500670790101,0.000496285665934,0.000491878536252,0.000487449267272,0.000483001941733,0.000478533161127,0.000474043154699,0.000469531544379,0.000464994466832,0.00046043015662,0.000455840553915,0.000451235137028,0.00044661425565,0.000441970039853,0.000437304922815,0.000432616784745,0.000427904928044,0.000423171663809,0.00041841872576,0.000413647199334,0.000408853033967,0.000404033117281,0.000399182600448,0.000394309395168,0.000389418643843,0.000384511019693,0.000379585842691,0.000374645143667,0.000369680828769,0.000364692972834,0.00035968722329,0.000354663132397,0.000349624557962,0.00034457406954,0.000339507967423,0.000334424724675,0.000329327220863,0.000324214601509,0.000319094389138,0.000313967480642,0.00030883269515,0.000303686023019,0.000298529791511,0.000293361751295,0.000288180455069,0.000282989271418,0.000277788390543,0.000272574076066,0.00026734931117,0.000262112218292,0.000256869024712,0.000251621773282,0.000246371713517,0.000241120564825,0.000235872282507,0.000230625988688,0.000225384316041,0.000220153932013,0.000214930301558,0.000209715766037,0.000204504203327,0.000199297283045,0.000194094929718,0.000188898324523,0.000183705666204,0.000178516020718,0.000173332601119,0.000168150642686,0.000162970247079,0.000157792105619,0.000152615791288,0.000147446440103,0.000142280638476,0.000137116183878,0.00013195169275,0.00012678540237,0.000121614418966,0.000116436330918,0.000111251969329,0.000106064176136,0.000100878045052,9.56899051203e-05,9.05003522403e-05,8.5308685015e-05,8.01161821431e-05,7.49303980043e-05,6.97561882472e-05,6.45945965205e-05,5.94470169597e-05,5.43086670489e-05,4.91800788524e-05,4.4060766949e-05,3.89549807636e-05,3.38669631997e-05,2.88023027856e-05,2.37598807553e-05,1.87348043112e-05,1.37279596138e-05,8.73838336239e-06,3.77174124221e-06,-1.16907235217e-06,-6.08162686817e-06,-1.09676237625e-05,-1.58297610574e-05,-2.06760316029e-05,-2.55107705187e-05,-3.0335628048e-05,-3.51498334744e-05,-3.99498934281e-05,-4.47329403308e-05,-4.94996636744e-05,-5.425221553e-05,-5.89939076887e-05,-6.37206686981e-05,-6.84324986371e-05,-7.31249262516e-05,-7.77904817906e-05,-8.24270047659e-05,-8.70366731207e-05,-9.1621997578e-05,-9.61881158488e-05,-0.000100740838439,-0.000105276484559,-0.000109798683146,-0.000114303132627,-0.00011878378111,-0.000123241915051,-0.000127681733904,-0.000132097117731,-0.000136489496527,-0.000140860406899,-0.000145199043763,-0.000149505572746,-0.000153775781362,-0.000158007020905,-0.00016220250031,-0.000166369692697,-0.000170505626239,-0.000174614728251,-0.000178698011118,-0.000182752783228,-0.000186779918782,-0.000190784346053,-0.000194763011173,-0.000198720800005,-0.000202663100158,-0.000206586930027,-0.000210486012266,-0.000214367258394,-0.000218225270382,-0.000222061872902,-0.000225875910242,-0.000229664079301,-0.000233428536084,-0.000237170250884,-0.000240883618702,-0.000244568292724,-0.000248228833467,-0.000251863685552,-0.000255467935615,-0.000259043932785,-0.000262590508459,-0.000266112651977,-0.000269609973115,-0.00027307886592,-0.000276517274174,-0.000279928699903,-0.000283307673624,-0.00028665346114,-0.000289974941295,-0.000293267758228,-0.000296533200785,-0.000299766049643,-0.000302967384607,-0.000306137386071,-0.000309278046587,-0.000312386401477,-0.000315466503624,-0.000318518090158,-0.000321539593116,-0.000324530079314,-0.000327492414425,-0.000330427739701,-0.000333336236272,-0.00033621246048,-0.000339057621339,-0.00034187251507,-0.000344657994342,-0.000347412950286,-0.00035014066543,-0.000352834142238,-0.000355486674623,-0.000358098080949,-0.000360665541825,-0.000363201079849,-0.000365707001342,-0.000368186049794,-0.000370635891657,-0.000373053980636,-0.000375434575309,-0.000377779437808,-0.000380102376827,-0.000382405304486,-0.00038469070788,-0.000386948031336,-0.000389173214296,-0.000391361278559,-0.00039350894375,-0.000395621380992,-0.000397701020315,-0.000399752865428,-0.000401776067408,-0.000403762238206,-0.000405709755895,-0.000407620984323,-0.000409502620611,-0.000411351435336,-0.000413173532132,-0.000414967649547,-0.000416736500894,-0.000418478830551,-0.000420186627422,-0.000421858983101,-0.000423500397193,-0.00042511499505,-0.000426700400432,-0.00042826053801,-0.000429793887771,-0.000431296635475,-0.000432765905828,-0.000434195908525,-0.000435591929235,-0.000436957983656,-0.000438293105917,-0.000439598408468,-0.000440872741075,-0.000442110713351,-0.000443314378224,-0.000444485418957,-0.000445629506064,-0.000446751984239,-0.000447853523111,-0.000448932069024,-0.000449986336686,-0.000451010313663,-0.000452004581328,-0.000452976716418,-0.000453930404461,-0.000454866478071,-0.00045578131599,-0.00045660042636,-0.000457255031699,-0.000457737599475,-0.000458053656211,-0.000458205039935)
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(240)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Oryctolagus_cuniculus-male-liver-H3K27Ac-ERR572232.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) : 240',bty='n')
dev.off()