# R script for Peak Model
#  -- generated by MACS
p <- c(0.0408978369342,0.0475149438971,0.0544724044477,0.0612082394063,0.0682052759555,0.0683398343507,0.0682923431524,0.0683398343507,0.068553544743,0.0686643575391,0.0686168663408,0.0686010359413,0.0686801879385,0.0687118487374,0.0679519895646,0.0678332615689,0.068442731947,0.0688938983308,0.0687118487374,0.0685772903422,0.0685772903422,0.06891764393,0.0681261239584,0.0682606823535,0.0686168663408,0.0683714951496,0.0675087383805,0.0676591271751,0.0675324839796,0.0679044983663,0.0677066183734,0.0675324839796,0.068276512753,0.0684585623464,0.068862237532,0.0695904359059,0.0696379271042,0.0692659127175,0.0695825207062,0.0691867607203,0.0692105063195,0.0696062663053,0.070089093488,0.0700416022897,0.0697566550999,0.0691709303209,0.0695191991084,0.0693767255135,0.0688226615334,0.0687039335377,0.0684110711481,0.0683398343507,0.0676828727742,0.0675483143791,0.0679757351637,0.0685139687445,0.0678965831666,0.0677857703706,0.0686881031382,0.0693688103138,0.0697170791013,0.069337149515,0.0696062663053,0.0696220967047,0.0695666903067,0.069392555913,0.0696220967047,0.0693688103138,0.0690363719257,0.068862237532,0.0687989159342,0.069083863124,0.0686881031382,0.0688226615334,0.0685218839442,0.0682606823535,0.0682052759555,0.068973050328,0.0682606823535,0.0680311415618,0.0681261239584,0.0679836503635,0.0680153111623,0.0677066183734,0.0678965831666,0.0681340391581,0.068221106355,0.0673425191864,0.0677778551708,0.0680707175603,0.0683794103493,0.0685693751425,0.0680707175603,0.0683160887516,0.068442731947,0.0686881031382,0.0689572199286,0.0692184215192,0.0694875383096,0.0693213191155,0.0688226615334,0.0684585623464,0.0693450647147,0.0690680327246,0.0687910007345,0.0687118487374,0.0686643575391,0.0687593399357,0.068331919151,0.068276512753,0.0683714951496,0.0685772903422,0.0684664775462,0.0687672551354,0.0687593399357,0.0685060535447,0.0682606823535,0.0683794103493,0.0687355943365,0.068806831134,0.0686643575391,0.0686960183379,0.0684664775462,0.0684189863479,0.0682685975533,0.0681736151567,0.0678807527672,0.0678965831666,0.0676274663762,0.0672317063904,0.0674849927813,0.0675166535802,0.0674770775816,0.0671525543933,0.0670100807984,0.0673425191864,0.0677303639725,0.0677936855703,0.0674691623819,0.0671762999924,0.0669625896001,0.0667567944074,0.0667884552063,0.0667567944074,0.0668122008055,0.0668676072035,0.0669309288012,0.0675562295788,0.0678886679669,0.0680311415618,0.0683714951496,0.0684585623464,0.0688780679314,0.0688543223323,0.0687593399357,0.0685693751425,0.0684902231453,0.0683477495504,0.068553544743,0.0690205415263,0.0690917783238,0.0693688103138,0.0691788455206,0.0692738279172,0.0694558775107,0.0694796231099,0.069558775107,0.0691946759201,0.0689493047289,0.0692738279172,0.0690047111269,0.0687672551354,0.0684743927459,0.0684269015476,0.0688780679314,0.0687910007345,0.0692105063195,0.0693529799144,0.0696379271042,0.0694558775107,0.0693529799144,0.0692579975178,0.0696300119045,0.0698991286948,0.0696300119045,0.0700416022897,0.0692738279172,0.068862237532,0.0686722727388,0.0685060535447,0.0688147463337,0.069337149515,0.0695983511056,0.0699703654923,0.0703977862769,0.0702078214838,0.070730224665,0.0708964438591,0.0715929814341,0.0716721334313,0.0715850662344,0.0714346774398,0.0717037942301,0.0714742534384,0.0710626630531,0.0707539702642,0.0710864086523,0.071315949444,0.0715613206352,0.0717592006282,0.0717275398293,0.0717037942301,0.0716958790304,0.0718383526253,0.0719491654213,0.0728752437882,0.0726061269978,0.0728198373901,0.0722341126111,0.0725665509992,0.0728277525899,0.072685278995,0.0725348902003,0.0724478230035,0.0728119221904,0.0726931941947,0.0730493781819,0.0732789189737,0.0735401205643,0.0739279653504,0.074022947747,0.0740625237456,0.0742208277399,0.074553266128,0.0748857045161,0.0750756693093,0.075503090094,0.07561390289,0.0755347508928,0.0753131253008,0.0758592740812,0.0764370836605,0.0763895924622,0.0766507940528,0.0764133380613,0.0762154580684,0.0765083204579,0.0763025252653,0.0767536916491,0.0768328436463,0.0769119956435,0.0768724196449,0.0769594868418,0.077315670829,0.0784712899876,0.0783446467921,0.077371077227,0.0774027380259,0.0772919252299,0.0775293812213,0.0773394164282,0.0771019604367,0.077481890023,0.0770940452369,0.0768170132469,0.0774106532256,0.0782575795952,0.0786929155796,0.0788591347737,0.0787878979762,0.0794686051518,0.0802601251235,0.0799989235328,0.0799197715357,0.0796664851448,0.0792232339606,0.0795715027482,0.0795952483473,0.0795398419493,0.0801255667283,0.079547757149,0.0797298067425,0.0800147539323,0.0804500899167,0.0804896659153,0.0814553202806,0.0813682530838,0.0818035890682,0.0827692434336,0.0824051442466,0.0836161698032,0.0834578658089,0.0838694561941,0.0841069121856,0.0843443681771,0.0840435905879,0.0837823889972,0.0839486081913,0.0837111521998,0.0848034497606,0.084906347357,0.0858561713229,0.0865606240977,0.0870751120792,0.0880328512449,0.0888560320154,0.0900828879714,0.0907794255465,0.0915076239204,0.0917767407107,0.0926078366809,0.0933518654543,0.0939613358324,0.0951327853904,0.0955285453763,0.0966129277374,0.0975785821028,0.0984571692713,0.0989795724526,0.0989874876523,0.0988529292571,0.0989558268534,0.098939996454,0.0990270636509,0.0993357564398,0.0995098908336,0.0991378764469,0.0986629644639,0.0988766748563,0.0995415516324,0.0998819052202,0.100380562802,0.10072091639,0.101385793166,0.101195828373,0.100831729186,0.101362047567,0.102177313138,0.102327701933,0.103008409108,0.103135052304,0.103404169094,0.103863250678,0.104116537068,0.10518508903,0.105303817026,0.105509612219,0.105715407411,0.1060320154,0.105454205821,0.105905372204,0.106269471391,0.106451520985,0.105691661812,0.105343393024,0.106269471391,0.106483181784,0.106807704972,0.107163888959,0.107654631342,0.107630885743,0.106966008966,0.107076821762,0.107892087333,0.107923748132,0.10824827132,0.109023960893,0.109142688888,0.109633431271,0.109839226463,0.110472442441,0.111263962412,0.111580570401,0.112949899952,0.114081773511,0.113416896735,0.113424811935,0.113717674324,0.114786226286,0.11524530787,0.11552233986,0.116203047035,0.116685874218,0.115838947848,0.115997251843,0.117137040602,0.117073719004,0.117659443783,0.116844178212,0.117429902991,0.117137040602,0.116717535017,0.117635698184,0.117722765381,0.117794002178,0.118039373369,0.118538030952,0.118625098148,0.119163331729,0.11943244852,0.120667219675,0.121878245232,0.121482485246,0.121830754034,0.122084040425,0.12221068362,0.122376902814,0.122780578,0.123025949191,0.123176337985,0.122883475596,0.1227726628,0.122622274005,0.122867645196,0.123310896381,0.123469200375,0.123508776373,0.123073440389,0.123508776373,0.124205313948,0.124363617943,0.123967857957,0.124798953927,0.125368848307,0.125202629113,0.125321357108,0.125368848307,0.126825245055,0.126856905853,0.126176198678,0.126271181074,0.127189344242,0.127585104227,0.127252665839,0.128273726603,0.128416200198,0.128891112181,0.128313302601,0.128724892986,0.129136483372,0.130110052937,0.129983409741,0.129381854563,0.129595564955,0.129112737773,0.130102137737,0.131202350498,0.131740584078,0.131566449685,0.131629771282,0.131463552088,0.131716838479,0.132350054457,0.132136344064,0.132215496061,0.131930548872,0.131249841696,0.130711608115,0.131186520098,0.13141606089,0.13085408171,0.131091537702,0.130917403308,0.131226096097,0.130537473722,0.12975386895,0.129326448165,0.12973012335,0.128796129784,0.128978179377,0.12861408019,0.128495352195,0.128004609812,0.127672171424,0.127846305818,0.128368708999,0.128202489805,0.127640510625,0.127727577822,0.126975633849,0.127395139434,0.126746093057,0.12723683544,0.127118107444,0.127046870647,0.126809414655,0.126904397052,0.126017894684,0.125416339505,0.125400509106,0.125353017907,0.125163053114,0.124624819533,0.125851675489,0.12527386591,0.124838529926,0.124371533143,0.124814784327,0.124561497936,0.124878105924,0.124893936324,0.124743547529,0.124735632329,0.123437539576,0.124521921937,0.124339872344,0.124965173121,0.124616904334,0.125131392315,0.124426939541,0.12414990755,0.124126161951,0.123105101188,0.123239659583,0.122068210025,0.121712026038,0.120675134875,0.120944251665,0.120880930068,0.120778032471,0.120318950888,0.120334781287,0.120239798891,0.119939021301,0.119812378106,0.120041918898,0.119479939718,0.118601352549,0.117540715787,0.116487994225,0.115997251843,0.115617322256,0.115981421443,0.115379866265,0.115079088676,0.113749335123,0.1143904663,0.1143904663,0.11412134951,0.115087003875,0.114904954282,0.114295483904,0.113907639118,0.11412926471,0.11410551911,0.114738735088,0.114335059902,0.11384431752,0.114477533497,0.114097603911,0.113773080722,0.113503963932,0.113266507941,0.112949899952,0.112459157569,0.111936754388,0.1115964008,0.111691383197,0.111153149616,0.110298308047,0.110409120843,0.11076530483,0.110607000836,0.110132088853,0.110132088853,0.110836541628,0.111200640815,0.111256047213,0.111453927205,0.111691383197,0.111778450394,0.111635976799,0.111920923989,0.112839087156,0.112973645551,0.113108203946,0.112886578354,0.113614776728,0.113773080722,0.113543539931,0.113757250323,0.113591031129,0.112641207163,0.111382690408,0.111564740002,0.110377460044,0.109483042476,0.108517388111,0.107757528938,0.106728552975,0.105834135407,0.105208834629,0.105169258631,0.104749753046,0.10352289709,0.103024239508,0.103150882703,0.102161482739,0.101235404372,0.101441199564,0.100950457182,0.0995415516324,0.0981959676807,0.0974915149059,0.096763316532,0.0959638813607,0.0946657886072,0.0941275550265,0.093248967858,0.0925603454826,0.0918321471087,0.0913888959246,0.0914205567235,0.0906369519516,0.0903836655606,0.0895683999899,0.0895683999899,0.0889351840126,0.0886818976216,0.0887214736202,0.0879774448469,0.0878982928497,0.0876370912591,0.0877637344545,0.0876608368582,0.0877874800537,0.0872017552747,0.0872096704744,0.0872096704744,0.0860382209164,0.0861569489121,0.0861965249107,0.0858878321218,0.0859274081204,0.085602884932,0.0853337681416,0.0846847217649,0.0844156049745,0.0840989969859,0.0842177249816,0.0833628834123,0.0830779362225,0.0825792786404,0.0822389250526,0.0819618930625,0.0817560978699,0.0819302322636,0.0817006914718,0.081779843469,0.081779843469,0.08231016185,0.0820806210582,0.0823418226489,0.082420974646,0.0818748258656,0.0819856386616,0.0820331298599,0.0824130594463,0.0815423874775,0.081360337884,0.0808695955016,0.0809250018996,0.0801493123274,0.0798960259365,0.0803076163218,0.0800939059294,0.0800305843317,0.0792469795598,0.08007807553,0.0800147539323,0.0800622451306,0.0793340467567,0.079603163547,0.0792074035612,0.0785979331831,0.0782575795952,0.0778143284111,0.0776401940174,0.0771969428333,0.076840758846,0.0768011828474,0.0775293812213,0.077204858033,0.0769278260429,0.0769357412426,0.0776322788177,0.0774977204225,0.0773552468276,0.0769674020415,0.0772127732327,0.0770228084395,0.0756772244877,0.0757959524835,0.0758751044806,0.0758671892809,0.0746403333249,0.0747353157215,0.0749806869127,0.0748777893164,0.0743395557357,0.0738171525544,0.0744661989311,0.0745136901294,0.0739992021479,0.0735559509638,0.0734213925686,0.0730889541805,0.0726457029964,0.0727327701933,0.0728989893873,0.0731522757782,0.0727644309921,0.0723053494086,0.0725586357995,0.0732868341734,0.0733580709708,0.0729860565842,0.0726773637952,0.0725586357995,0.0722974342089,0.0725665509992,0.0727327701933,0.0726140421975,0.0725428054001,0.0715375750361,0.0712526278463,0.0711893062486,0.0715454902358,0.0716483878321,0.0713634406423,0.0705165142727,0.0701761606849,0.0703423798789,0.0698753830957,0.0696933335022,0.0698832982954,0.0703898710772,0.0700020262911,0.0692579975178,0.0691471847218,0.0695350295079,0.0696062663053,0.0691155239229,0.0692263367189,0.0691867607203,0.0693134039158,0.0686247815405,0.0690996935235,0.069447962311,0.0698278918974,0.0692896583167,0.0691550999215,0.069139269522,0.0687197639371,0.0694796231099,0.0692421671184,0.0691550999215,0.0688305767331,0.0681498695575,0.0672554519896,0.0675483143791,0.0677066183734,0.0681182087586,0.0685693751425,0.0675799751779,0.0674770775816,0.0676749575745,0.067105063195,0.0671129783947,0.0673979255845,0.0669309288012,0.0674849927813,0.0672475367898,0.0666934728097,0.0668122008055,0.0668042856057,0.0669546744003,0.0666934728097,0.0669705047998,0.0671129783947,0.0676353815759,0.0664797624174,0.066266052025,0.0662818824245,0.0658148856412,0.0657119880449,0.0655457688508,0.0657990552418,0.0659177832375,0.0659415288367,0.0657594792432,0.0661394088296,0.0663293736228,0.0669150984018,0.0674454167828,0.0674770775816,0.0675878903777,0.0675087383805,0.0675958055774,0.0677541095717,0.0668755224032,0.0666776424103,0.0663768648211,0.0663452040222,0.0665351688154,0.0663768648211,0.0657119880449,0.0655061928523,0.0652370760619,0.0647146728806,0.0656407512474,0.0652449912616,0.0656407512474,0.0653241432588,0.0653241432588,0.065735733644,0.0660681720321,0.0663610344216,0.0667013880094,0.0667805400066,0.066796370406,0.0671446391935,0.066851776804,0.0663531192219,0.0663768648211,0.0658702920392,0.0658623768395,0.0662027304273,0.0660127656341,0.0663452040222,0.0660206808338,0.0661394088296,0.0660048504344,0.0663768648211,0.0658702920392,0.0659652744358,0.0659256984372,0.0654666168537,0.0651262632659,0.0648492312758,0.0644930472886,0.065094602467,0.065514108052,0.0649996200704,0.0651262632659,0.0653320584585,0.065458701654,0.0657990552418,0.0662581368253,0.0664718472176,0.0667013880094,0.0661077480307,0.0662818824245,0.0669705047998,0.0673504343862,0.0672950279881,0.0671921303918,0.0670179959981,0.0667251336086,0.0667251336086,0.0665984904131,0.0669467592006,0.0663293736228,0.0659969352347,0.0659652744358,0.0659098680378,0.0659415288367,0.0658544616398,0.0659415288367,0.0659494440364,0.0662185608267,0.0657594792432,0.065514108052,0.06556951445,0.0654666168537,0.0657119880449,0.0662502216256,0.0664085256199,0.0665668296142,0.0665193384159,0.0663531192219,0.0667884552063,0.0671921303918,0.0675641447785,0.0674295863833,0.0674612471822,0.0669942503989,0.0671525543933,0.0670417415972,0.0670892327955,0.0668359464046,0.0663689496213,0.066266052025,0.0660206808338,0.0664639320179,0.0663768648211,0.0665351688154,0.0665351688154,0.0665984904131,0.0667488792077,0.0672396215901,0.0677224487728,0.0675324839796,0.0673741799853,0.0673029431879,0.0672950279881,0.0670100807984,0.0669309288012,0.0664955928168,0.0664085256199,0.0663768648211,0.0660048504344,0.0662027304273,0.0661314936298,0.0663293736228,0.0664718472176,0.0664639320179,0.066266052025,0.0663926952205,0.0663847800208,0.0661710696284,0.0666776424103,0.0671446391935,0.0672633671893,0.0667726248069,0.0671367239938,0.0676195511765,0.0677936855703,0.0680865479598,0.068023226362,0.068806831134,0.0686010359413,0.0683160887516,0.0682131911552,0.0685377143436,0.0680548871609,0.0678095159697,0.0676987031737,0.0673741799853,0.0672871127884,0.0670496567969,0.066574744814,0.0666380664117,0.0673583495859,0.0674137559839,0.0672950279881,0.0674454167828,0.0679519895646,0.068387325549,0.0688305767331,0.0687751703351,0.0697091639016,0.0696775031028,0.0696062663053,0.0696775031028,0.0696775031028,0.0698674678959,0.0700257718903,0.0706273270687,0.070983511056,0.0712684582457,0.0709201894582,0.0708806134596,0.0707618854639,0.0710468326537,0.0713951014412,0.0714900838378,0.0714188470403,0.0708964438591,0.0706669030673,0.0705481750716,0.0707143942656,0.0713555254426,0.0716088118335,0.0713634406423,0.0713476102429,0.0711576454497,0.0710626630531,0.0708964438591,0.0708093766622,0.071094323852,0.0707223094653,0.0709360198577,0.070785631063,0.0709755958562,0.0714267622401,0.0716325574327,0.0714267622401,0.0721074694157,0.071569235835,0.0711576454497,0.0718937590233,0.0716008966338,0.0716721334313,0.0713634406423,0.0711101542514,0.0709439350574,0.0713238646438,0.0713001190446,0.0715454902358,0.0716167270333,0.0714267622401,0.0714979990375,0.0716404726324,0.0713951014412,0.0710784934525,0.0712209670474,0.0714742534384,0.0712367974469,0.0716088118335,0.0714900838378,0.0710705782528,0.0709993414554,0.0712367974469,0.0717512854284,0.0724240774043,0.0720678934171,0.0719966566196,0.0718858438236,0.0713792710418,0.0716325574327,0.0719966566196,0.072154960614,0.0719412502216,0.0718146070262,0.0714821686381,0.0719412502216,0.0714900838378,0.071094323852,0.0709993414554,0.0708252070616,0.0706589878676,0.0704611078747,0.0702078214838,0.0704452774752,0.0708331222613,0.0702157366835,0.0706510726679,0.0712367974469,0.0720520630177,0.0723370102074,0.0722182822117,0.0721628758137,0.0724794838023,0.0722420278108,0.0719887414199,0.0727327701933,0.0725744661989,0.0722261974114,0.0719887414199,0.0714584230389,0.0716563030318,0.0719966566196,0.0717829462273,0.0719095894228,0.0718383526253,0.0714188470403,0.071260543046,0.0718700134242,0.0719808262202,0.072376586206,0.0717117094299,0.0714663382386,0.0714188470403,0.0713396950432,0.0716325574327,0.0716167270333,0.0719175046225,0.0716483878321,0.0714900838378,0.0717671158279,0.072321179808,0.0721787062131,0.0726931941947,0.0730731237811,0.0725190598009,0.0728673285884,0.0727327701933,0.0731918517768,0.0731918517768,0.0730018869836,0.0730731237811,0.0729306501862,0.0725823813986,0.0718620982245,0.072431992604,0.0724873990021,0.0726377877967,0.0724715686026,0.0718066918264,0.0715613206352,0.0721707910134,0.0726773637952,0.0726615333958,0.0737934069552,0.0733580709708,0.0735876117626,0.0736113573618,0.0735559509638,0.0744266229325,0.0751152453079,0.0746482485246,0.0742049973405,0.0744028773334,0.0734213925686,0.073437222968,0.0732868341734,0.0732789189737,0.0728435829893,0.0723449254072,0.0716958790304,0.0717196246296,0.0727565157924,0.0722895190091,0.0728198373901,0.0728673285884,0.0724715686026,0.0724636534029,0.0728673285884,0.0731364453788,0.0736271877612,0.0733105797725,0.0725902965984,0.0728277525899,0.0722261974114,0.0725190598009,0.0735084597655,0.0740387781465,0.0742920645374,0.0743712165345,0.0742129125402,0.0744345381323,0.0741733365416,0.074664078924,0.0747590613206,0.0749965173121,0.0747036549226,0.0744187077328,0.0740387781465,0.0741495909425,0.0738171525544,0.073912134951,0.0742049973405,0.0735638661635,0.0739200501507,0.07338181657,0.0732314277754,0.0725744661989,0.0724003318052,0.0725744661989,0.0729781413845,0.0731443605785,0.072796091791,0.0730098021833,0.0729464805856,0.0728277525899,0.0725823813986,0.0732472581748,0.0734213925686,0.0732472581748,0.0729227349864,0.072851498189,0.0736905093589,0.073492629366,0.0737380005572,0.0743791317343,0.0741416757428,0.074078354145,0.0739992021479,0.0741891669411,0.0740546085459,0.0737380005572,0.0734451381677,0.0736034421621,0.0732551733745,0.072906904587,0.0732551733745,0.0732393429751,0.0735322053646,0.0731760213774,0.0734293077683,0.0730968693802,0.0725823813986,0.0724953142018,0.0724161622046,0.0725902965984,0.0718779286239,0.0716958790304,0.0716563030318,0.0716642182316,0.0714742534384,0.0719095894228,0.0716325574327,0.0718700134242,0.0723370102074,0.0721074694157,0.0724953142018,0.0724478230035,0.0721707910134,0.0718146070262,0.0721787062131,0.0720520630177,0.0727327701933,0.0728673285884,0.0723053494086,0.0721232998151,0.0649679592715,0.0576543147337,0.0504119069932,0.0435573440389,0.0)
m <- c(0.0414413626894,0.0486748521489,0.0557631879738,0.0627870110722,0.0696414882634,0.0692060273595,0.0697624496256,0.0697221291716,0.070439833254,0.070480153708,0.0704962818896,0.070351128255,0.0702704873469,0.0701011414398,0.0703188718918,0.0709398068844,0.0705043459805,0.0704075768907,0.0702382309836,0.07069788416,0.0707140123416,0.0705204741621,0.0704317691631,0.0709317427936,0.0713349473342,0.0710043196109,0.0711494732455,0.0705446664345,0.0707301405232,0.0705607946162,0.070609179161,0.0709881914293,0.0711252809731,0.0710930246098,0.0711575373363,0.0712704346077,0.0716978314208,0.0724881123205,0.0724155355032,0.0727058427725,0.0723348945951,0.072165548688,0.0722300614145,0.0719155618728,0.071044640065,0.0713188191526,0.0709156146119,0.0712784986985,0.0714236523332,0.0713107550618,0.0716817032392,0.0721574845972,0.0716575109668,0.0719800745993,0.0728187400439,0.073028406405,0.0731413036764,0.0729155091336,0.0720203950534,0.071907497782,0.0723026382318,0.0722219973237,0.073028406405,0.0731896882213,0.0730122782234,0.0728187400439,0.0730767909499,0.0732542009478,0.0740122254842,0.0739477127577,0.0735848286711,0.0735364441263,0.0737461104874,0.0740283536659,0.0741170586648,0.0740122254842,0.0738832000312,0.0735848286711,0.073504187763,0.0738025591231,0.0740928663924,0.0737461104874,0.0736735336701,0.0730929191315,0.0732542009478,0.0736654695793,0.0737461104874,0.0738832000312,0.0737541745782,0.0739315845761,0.0740686741199,0.0742057636638,0.0741654432097,0.0745363913871,0.0746331604769,0.0745928400228,0.0746734809309,0.0747057372942,0.0748589550196,0.074842826838,0.0742944686627,0.0745121991147,0.0744799427514,0.0743186609351,0.0748831472921,0.074971852291,0.0751250700165,0.0750363650175,0.0749879804726,0.0752218391062,0.0760443763692,0.0761088890957,0.0762137222763,0.0761250172773,0.0751331341073,0.074584775932,0.0744154300249,0.0746573527493,0.075447633649,0.0752137750154,0.0751492622889,0.0750202368359,0.0750202368359,0.0750686213808,0.0750041086543,0.0756734281918,0.0757621331907,0.0754395695582,0.0746654168401,0.0749234677461,0.0748347627472,0.0751653904705,0.075229903197,0.0751170059257,0.0753266722868,0.0747863782023,0.0746009041136,0.0747944422931,0.0752379672879,0.0746976732034,0.0744476863882,0.0739235204853,0.0735445082171,0.0735445082171,0.0738106232139,0.0738751359404,0.0741735073005,0.0741170586648,0.0746492886585,0.0750283009267,0.0749960445635,0.0750686213808,0.0754637618306,0.075665364101,0.0750363650175,0.0755363386479,0.075665364101,0.0756976204642,0.0749315318369,0.0746815450217,0.0752540954695,0.0753428004684,0.0750847495624,0.0752782877419,0.0757621331907,0.075447633649,0.0756250436469,0.0756089154653,0.0753428004684,0.0757218127367,0.0751734545613,0.0752863518327,0.0753024800144,0.0750363650175,0.0745928400228,0.074584775932,0.0741976995729,0.0739477127577,0.0740364177567,0.0736977259425,0.0739557768485,0.0738267513955,0.0742541482086,0.0743347891168,0.074625096386,0.0746573527493,0.0743993018433,0.0746976732034,0.0751411981981,0.0751815186522,0.0749073395645,0.0748105704748,0.0748992754737,0.0745121991147,0.0744154300249,0.0740122254842,0.0741654432097,0.0742783404811,0.0738832000312,0.0742218918454,0.0743347891168,0.0741170586648,0.0731251754948,0.0733832264008,0.0736574054885,0.0740606100291,0.0742218918454,0.0737138541241,0.0736574054885,0.0733187136743,0.0729477654969,0.0734316109457,0.073891264122,0.0744396222973,0.0744476863882,0.074584775932,0.0747218654758,0.0750524931991,0.0746976732034,0.0747218654758,0.0750041086543,0.0747944422931,0.075100877744,0.0747783141115,0.0747299295666,0.0746492886585,0.0744638145698,0.0743105968443,0.0747460577482,0.0743105968443,0.0744880068422,0.0742622122994,0.0736896618517,0.0735606363987,0.0734154827641,0.0733106495835,0.0730848550407,0.0728187400439,0.0727784195898,0.0729638936785,0.0725364968654,0.0726897145909,0.0725687532287,0.0725284327746,0.0729719577693,0.0727784195898,0.0725848814103,0.0726655223184,0.0723510227767,0.0727784195898,0.0733025854927,0.0732300086753,0.0735445082171,0.0734396750365,0.072770355499,0.0724881123205,0.0726171377735,0.0729477654969,0.0732380727662,0.0728187400439,0.0727058427725,0.0731090473131,0.0730929191315,0.0732542009478,0.0734558032181,0.0738590077588,0.073762238669,0.0737703027598,0.0736170850344,0.0734477391273,0.0728429323163,0.0724719841389,0.0726252018644,0.0722461895961,0.0724397277756,0.0723752150491,0.0722381255053,0.0721494205064,0.0717865364198,0.0718752414187,0.0720687795982,0.071560741877,0.0712543064261,0.0713349473342,0.0709317427936,0.0705849868886,0.0708672300671,0.0707059482508,0.0711252809731,0.0710607682466,0.0710123837017,0.0711897936996,0.0710204477925,0.0707865891589,0.070568858707,0.0705849868886,0.0702946796193,0.0703914487091,0.0701737182571,0.0704640255264,0.0701333978031,0.0702059746204,0.0698834109878,0.0699801800776,0.0699076032603,0.0695689114461,0.0689560405443,0.068754438274,0.0688753996362,0.0681818878262,0.068536707822,0.0686737973658,0.0690689378157,0.0688350791821,0.0691979632687,0.069270540086,0.068794758728,0.0684560669139,0.0682302723711,0.0682302723711,0.067673850105,0.0673190301092,0.0669561460226,0.0669561460226,0.0662303778494,0.0666739028442,0.0675206323796,0.0674238632898,0.0673029019276,0.0674722478347,0.0678754523753,0.0677383628315,0.0678351319213,0.0679157728294,0.0685528360036,0.0683028491884,0.0679399651018,0.0678431960121,0.0677544910131,0.067544824652,0.0671738764746,0.0671254919297,0.0670206587491,0.0666658387533,0.0662626342127,0.0660368396699,0.0661416728505,0.0664884287555,0.0662787623943,0.0665126210279,0.0667626078431,0.0667787360247,0.0665368133003,0.0667787360247,0.0668916332961,0.0668755051145,0.066681966935,0.0663190828484,0.0663674673933,0.0656739555833,0.0654159046773,0.0652868792243,0.0653030074059,0.0649562515009,0.0648917387744,0.064907866956,0.0653513919508,0.0656578274017,0.0657787887639,0.0659965192158,0.0660852242148,0.0663755314841,0.0662465060311,0.0665690696636,0.0669642101134,0.0671012996573,0.0667545437523,0.0665368133003,0.0667706719339,0.0669158255686,0.0666255182993,0.066681966935,0.0668593769329,0.0669077614777,0.0663271469392,0.0661900573954,0.0663513392116,0.0663916596657,0.0663755314841,0.0663674673933,0.0661819933045,0.0661013523964,0.0663029546667,0.0661900573954,0.0661658651229,0.0660368396699,0.0661497369413,0.0660690960332,0.0658110451271,0.0658352373996,0.0660690960332,0.066552941482,0.06633521103,0.066117480578,0.0659239423985,0.06633521103,0.0661658651229,0.0661739292137,0.0661255446689,0.0663190828484,0.0661094164872,0.0658513655812,0.0658433014904,0.0664884287555,0.0668916332961,0.0664319801198,0.0661981214862,0.0659561987618,0.0659561987618,0.065472353313,0.0659400705801,0.0657062119466,0.0660932883056,0.0655691224027,0.0654078405865,0.0658997501261,0.0663835955749,0.0669480819318,0.0671658123838,0.0673190301092,0.0675770810152,0.0681576955538,0.0679802855559,0.0682060800987,0.0682544646436,0.0684721950955,0.0678754523753,0.0675367605612,0.0676415937417,0.0680286701008,0.0680286701008,0.0675528887428,0.0673996710174,0.0675045041979,0.0685044514588,0.0679238369202,0.0684883232771,0.0683754260058,0.0686496050934,0.0693511809942,0.0686818614567,0.0684641310047,0.0682544646436,0.0679883496467,0.0673835428357,0.0677948114672,0.0675609528336,0.0683996182782,0.0683109132793,0.0678109396488,0.0684480028231,0.0689882969076,0.0697785778073,0.0703591923458,0.0707623968865,0.0703591923458,0.0709075505211,0.0705204741621,0.0700850132582,0.0700608209857,0.0703108078009,0.0701253337122,0.0701333978031,0.0701898464387,0.0694640782655,0.0701898464387,0.0700608209857,0.0700608209857,0.0707785250681,0.0710768964282,0.0710930246098,0.0710768964282,0.0713349473342,0.0717946005106,0.0723510227767,0.0723268305043,0.0723510227767,0.0725768173195,0.0721574845972,0.0721978050512,0.0720687795982,0.072165548688,0.071778472329,0.0714155882424,0.0713994600607,0.0712623705169,0.0714397805148,0.0717946005106,0.0723429586859,0.0723429586859,0.0726816505,0.0724397277756,0.0729719577693,0.0726252018644,0.0723268305043,0.0723026382318,0.07238327914,0.0722623177778,0.0723107023226,0.0720042668717,0.0717462159657,0.0724477918665,0.0723671509583,0.0721978050512,0.0726574582276,0.0726735864092,0.0731332395856,0.0732058164029,0.0732945214019,0.073633213216,0.0734235468549,0.0731896882213,0.0732622650386,0.0738186873047,0.0737864309415,0.0738186873047,0.0738993282129,0.0743509172984,0.0744880068422,0.0748266986564,0.0763024272752,0.0769959390851,0.0770120672668,0.0773507590809,0.0775039768064,0.0782458731612,0.0785523086121,0.0787458467916,0.0784152190683,0.0791893717864,0.0786893981559,0.0788506799722,0.0790684104242,0.0793022690577,0.0798425631422,0.0797054735984,0.0796570890535,0.0797377299617,0.0801651267748,0.0796974095076,0.0802377035921,0.0799957808677,0.080326408591,0.0806247799511,0.0805038185889,0.0807054208593,0.0805763954062,0.0809634717653,0.0813263558519,0.0812457149437,0.0813182917611,0.0813747403968,0.0819472908445,0.0821811494781,0.0824069440209,0.0825037131106,0.0829714303778,0.0827617640166,0.0831085199216,0.0841971721814,0.083955249457,0.0849955171719,0.0845036076323,0.0848422994465,0.0851084144433,0.0854632344391,0.0858019262532,0.0863825407918,0.0865518866989,0.0860115926144,0.0867534889692,0.0868421939682,0.0874470007792,0.087237334418,0.0876647312311,0.0876889235036,0.0876889235036,0.0874066803251,0.0872453985088,0.0878743975923,0.0874470007792,0.0875115135057,0.0877776285025,0.0885517812206,0.0891001393959,0.0895436643906,0.0890436907602,0.0891646521224,0.0898017152966,0.0904790989249,0.0909226239197,0.0910597134635,0.0917048407286,0.0918822507265,0.0921967502682,0.0930031593495,0.094664362057,0.0959707447688,0.0965029747625,0.0967852179409,0.0982286901965,0.0990834838227,0.0997528033602,0.0997689315418,0.0999705338122,0.100164071992,0.100373738353,0.100583404714,0.101284980615,0.101994620606,0.102873606505,0.103736464222,0.105042846934,0.106220204192,0.107663676448,0.109195853703,0.110268377781,0.111405414585,0.112034413669,0.112913399567,0.112550515481,0.112631156389,0.112848886841,0.113453693652,0.112824694569,0.112453746391,0.111897324125,0.111292517314,0.111316709586,0.110736095048,0.110937697318,0.111219940497,0.110478044142,0.109873237331,0.110147416419,0.110082903692,0.110316762326,0.110808671865,0.110550620959,0.11055868505,0.11065545414,0.110647390049,0.110647390049,0.111268325042,0.111324773677,0.112018285487,0.112292464575,0.112292464575,0.113219835018,0.11383270592,0.11392947501,0.11413107728,0.114243974552,0.114364935914,0.114752012273,0.114389128186,0.114897165908,0.115034255451,0.11472782,0.114558474093,0.114881037726,0.115139088632,0.115147152723,0.115364883175,0.115364883175,0.116227740892,0.116364830436,0.116945444974,0.117292200879,0.117251880425,0.117638956784,0.118066353597,0.11838891723,0.119034044495,0.119453377217,0.119308223582,0.119445313126,0.119243710856,0.119364672218,0.119388864491,0.119727556305,0.12007431221,0.120485580841,0.120759759929,0.121832284007,0.12205807855,0.123025769447,0.123308012626,0.124017652617,0.125848201232,0.126073995775,0.125622406689,0.126477200315,0.126501392588,0.126041739411,0.126251405773,0.125920778049,0.126469136225,0.126251405773,0.125315971238,0.126090123956,0.127025558491,0.126952981673,0.126614289859,0.127848095754,0.128340005293,0.12810614666,0.128622248472,0.128767402106,0.129227055283,0.128565799836,0.12840451802,0.128977068468,0.129114158011,0.128299684839,0.128033569842,0.128815786651,0.128444838474,0.128380325747,0.128202915749,0.128791594379,0.129162542556,0.128759338016,0.129525426643,0.129517362552,0.129920567093,0.129743157095,0.129710900732,0.130323771633,0.130452797086,0.129759285276,0.129549618915,0.129710900732,0.129831862094,0.129864118457,0.129856054366,0.129702836641,0.130243130725,0.130517309813,0.130726976174,0.131452744347,0.131654346618,0.13177530798,0.132202704793,0.132218832974,0.132783319331,0.133888099773,0.133710689775,0.133194587963,0.134009061135,0.133775202501,0.133501023414,0.133355869779,0.133041370237,0.133009113874,0.132783319331,0.131847884797,0.13197691025,0.131759179798,0.131420487984,0.131444680256,0.131799500252,0.132105935703,0.130807617082,0.130678591629,0.129557683006,0.129557683006,0.128985132558,0.128985132558,0.128178723477,0.127364250305,0.126565905314,0.125920778049,0.126235277591,0.126170764864,0.126533648951,0.12583207305,0.125364355783,0.125670791234,0.125219202149,0.125291778966,0.125025663969,0.124275703523,0.124154742161,0.123420909897,0.1231547949,0.123388653534,0.123735409439,0.122824167177,0.123017705357,0.122388706273,0.12196130946,0.121872604461,0.121501656284,0.121654874009,0.121348438558,0.120945234017,0.120429132205,0.119945286757,0.119009852222,0.119259839038,0.119098557221,0.118751801316,0.117606700421,0.116977701337,0.116550304524,0.115969689986,0.115292306357,0.115308434539,0.115598741808,0.114953614543,0.114631050911,0.114743948182,0.115655190444,0.116147099984,0.115832600442,0.116268061346,0.116872868157,0.116816419521,0.115993882258,0.116001946349,0.115558421354,0.115066511815,0.113993987736,0.113147258201,0.113219835018,0.112292464575,0.111486055494,0.110865120501,0.111397350495,0.111461863221,0.111107043225,0.110881248683,0.110969953681,0.110590941413,0.110090967783,0.110486108233,0.109720019605,0.109510353244,0.109139405067,0.108784585071,0.109131340976,0.109099084613,0.10926843052,0.109236174157,0.108703944163,0.107889470991,0.108486213711,0.108623303255,0.108300739622,0.107905599172,0.107599163722,0.106800818731,0.105873448287,0.105308961931,0.105228321022,0.1048089883,0.104300950579,0.10322036241,0.102631683781,0.102204286967,0.101809146518,0.101696249246,0.101784954245,0.101809146518,0.101607544247,0.101478518794,0.100914032437,0.101188211525,0.100817263348,0.100083431084,0.0989625224605,0.0992205733665,0.0991963810941,0.0990996120043,0.0991318683676,0.0998173160867,0.0993657270012,0.0989463942789,0.0983657797403,0.0982448183781,0.0986318947372,0.0979948315629,0.0975190502049,0.096567487489,0.0957288220444,0.09479338751,0.0948014516009,0.0944708238775,0.0941160038817,0.0936563507054,0.093067672076,0.0923902884477,0.091858058454,0.0913500207328,0.0904629707433,0.0893339980295,0.0883582430411,0.0872534625996,0.0867292966968,0.0865599507897,0.0863664126102,0.0857374135267,0.0853019526228,0.0851164785341,0.0852455039871,0.0848906839913,0.0842294285447,0.084213300363,0.0838423521856,0.0830198149227,0.0825843540187,0.0823908158392,0.0821892135689,0.081536022213,0.0807860617674,0.0803022163186,0.0802699599553,0.0802618958645,0.0804796263165,0.0805683313154,0.0803344726818,0.079810306779,0.0795683840546,0.0797619222341,0.0795361276913,0.0794796790556,0.0799312681412,0.0794151663291,0.0791087308782,0.0789797054252,0.0789635772436,0.0790119617885,0.0778507327114,0.0775281690788,0.0773426949901,0.0767943368148,0.0756895563734,0.0756492359193,0.0751492622889,0.0750524931991,0.0746573527493,0.0746089682044,0.075318608196,0.0747621859299,0.075318608196,0.0760685686416,0.0764233886374,0.0768104649964,0.0771652849922,0.0770765799933,0.0768507854505,0.0768427213597,0.0764556450007,0.0766895036342,0.076270170912,0.0757540690999,0.0755202104663,0.0748105704748,0.0740686741199,0.073117111404,0.073117111404,0.0728268041347,0.0728429323163,0.0727219709541,0.0724397277756,0.0722623177778,0.0720607155074,0.072294574141,0.0719881386901,0.0727864836806,0.0728590604979,0.0727542273174,0.0721978050512,0.0724074714124,0.0722542536869,0.0719316900544,0.0716736391484,0.071343011425,0.0717623441473,0.0714155882424,0.0709881914293,0.0708188455222,0.070826909613,0.0706414355243,0.0701979105296,0.0702946796193,0.0706172432518,0.0704156409815,0.0702059746204,0.0696979368991,0.0696011678094,0.069399565539,0.0693269887217,0.0687141178199,0.0691737709963,0.0689641046351,0.0682141441895,0.0688108869097,0.0685205796404,0.0688189510005,0.0691173223606,0.0688915278178,0.0693915014482,0.0697705137165,0.0695608473553,0.0694560141747,0.0701414618939,0.0693915014482,0.0697624496256,0.0695447191737,0.0691737709963,0.0695447191737,0.069230219632,0.0690931300881,0.0688512073637,0.0688028228189,0.0682141441895,0.0682222082803,0.0684399387323,0.0683512337333,0.0684641310047,0.0685528360036,0.0685609000945,0.0680931828273,0.0681093110089,0.0676254655601,0.0679722214651,0.0680528623732,0.0676335296509,0.0673916069265,0.0671900046562,0.0667948642064,0.0664158519381,0.0664319801198,0.0663190828484,0.0671658123838,0.0668674410237,0.066940017841,0.0666174542085,0.0668916332961,0.0668432487512,0.0666497105717,0.0665126210279,0.0668029282972,0.066940017841,0.0662948905759,0.0663432751208,0.0664803646646,0.0664803646646,0.0667787360247,0.0663674673933,0.0667706719339,0.0672383892011,0.0669803382951,0.0667868001155,0.0668190564788,0.0669319537502,0.0661094164872,0.0656739555833,0.0651739819529,0.0654239687681,0.0651497896804,0.0649401233193,0.064778841503,0.0648514183204,0.065214302407,0.0650449564999,0.0657223401282,0.06633521103,0.0666013260268,0.0672464532919,0.0673432223817,0.0673593505633,0.0673996710174,0.0671174278389,0.0667061592074,0.0668271205696,0.0661819933045,0.0658271733088,0.0651336614988,0.064045009239,0.0633918178832,0.0633918178832,0.0637063174249,0.0637063174249,0.0635772919719,0.063440202428,0.0634321383372,0.0636659969708,0.0636901892432,0.0641982269645,0.0645127265062,0.0643272524175,0.0638192146963,0.0639643683309,0.0639321119676,0.0637385737881,0.0639643683309,0.0636095483351,0.0637788942422,0.0638111506054,0.0637385737881,0.0635127792454,0.0642304833277,0.0640369451482,0.0640933937839,0.0641982269645,0.0640611374207,0.0644482137797,0.0651094692264,0.0653271996783,0.0654400969497,0.0656497633109,0.0654481610405,0.0657223401282,0.0658836219445,0.0659965192158,0.0662626342127,0.0664077878473,0.065859429672,0.0656820196741,0.0657465324006,0.0657384683098,0.0654965455854,0.0657384683098,0.0659078142169,0.0659723269434,0.0660690960332,0.0657707246731,0.0655852505844,0.0656416992201,0.0656900837649,0.0653675201324,0.06534332786,0.0645611110511,0.0643514446899,0.0642466115094,0.064133714238,0.0642143551461,0.064520790597,0.064520790597,0.0644482137797,0.0648836746836,0.064996571955,0.0652465587702,0.0654804174038,0.0655207378579,0.0660852242148,0.0661497369413,0.0662868264851,0.065512673767,0.0654320328589,0.0655691224027,0.0655529942211,0.0659561987618,0.0661900573954,0.0664964928463,0.065512673767,0.0653675201324,0.065254622861,0.0659078142169,0.0661013523964,0.0660690960332,0.0659078142169,0.0661336087597,0.0658352373996,0.0656255710384,0.0657384683098,0.0661255446689,0.0662706983035,0.0661900573954,0.0659320064893,0.0654320328589,0.0654159046773,0.0647223928673,0.0648836746836,0.0647062646857,0.0653755842232,0.0652626869518,0.0654239687681,0.0655933146752,0.0656255710384,0.0658836219445,0.0660045833067,0.0665448773911,0.0663190828484,0.0663513392116,0.0658433014904,0.0657949169455,0.0653917124048,0.065601378766,0.0663432751208,0.0660610319423,0.0661013523964,0.0659078142169,0.0594162211122,0.0529246280075,0.046424970812,0.0397720958911,0.0)
ycorr <- c(8.79629853218e-05,8.78822338943e-05,8.76389349933e-05,8.72322859368e-05,8.66522835558e-05,8.58957832285e-05,8.49455160564e-05,8.39605432369e-05,8.29283671366e-05,8.18460888226e-05,8.07092819146e-05,7.95216812986e-05,7.82881234756e-05,7.70107886529e-05,7.570875729e-05,7.43925488699e-05,7.30694975829e-05,7.17506460741e-05,7.0457335361e-05,6.91952492841e-05,6.79749263803e-05,6.6802304969e-05,6.56742145922e-05,6.45968995662e-05,6.35629825363e-05,6.25514429323e-05,6.15686301559e-05,6.06157325646e-05,5.96866253924e-05,5.87689977032e-05,5.78639130539e-05,5.69589429897e-05,5.60514843927e-05,5.51390900364e-05,5.42181822962e-05,5.3301080937e-05,5.23867801502e-05,5.14545410172e-05,5.05059832526e-05,4.95403271926e-05,4.85536277692e-05,4.7548626376e-05,4.65232182491e-05,4.54750271687e-05,4.44109711802e-05,4.33278982727e-05,4.22245938329e-05,4.11124710684e-05,3.99970105192e-05,3.88794967953e-05,3.77652212119e-05,3.66553498513e-05,3.55538113651e-05,3.44680946187e-05,3.33891629374e-05,3.23123833528e-05,3.12466068305e-05,3.01874917943e-05,2.91295988342e-05,2.80716024558e-05,2.70032094199e-05,2.59214810935e-05,2.48244444256e-05,2.37139058841e-05,2.2588845097e-05,2.14540285222e-05,2.03047576858e-05,1.9122995651e-05,1.79110374624e-05,1.66742717857e-05,1.54234373248e-05,1.41688738507e-05,1.29139270087e-05,1.16611834423e-05,1.03984823016e-05,9.12537322491e-06,7.84382291896e-06,6.55966418936e-06,5.27465485063e-06,3.98969055552e-06,2.68889000763e-06,1.36752577277e-06,1.85094244319e-08,-1.37420263378e-06,-2.79751413997e-06,-4.23651429188e-06,-5.70068547693e-06,-7.17527652831e-06,-8.6547949592e-06,-1.01314868637e-05,-1.16011685857e-05,-1.30574359856e-05,-1.45036464784e-05,-1.59302214065e-05,-1.73354962096e-05,-1.87417361703e-05,-2.0149119199e-05,-2.15425204062e-05,-2.29470995184e-05,-2.43688634644e-05,-2.58026078498e-05,-2.72609572403e-05,-2.87299871199e-05,-3.0210513614e-05,-3.16997140641e-05,-3.31813592331e-05,-3.46564943224e-05,-3.61363894296e-05,-3.76179359388e-05,-3.90887488125e-05,-4.05608306865e-05,-4.20284209997e-05,-4.34835650759e-05,-4.49338561185e-05,-4.63860982746e-05,-4.7849410382e-05,-4.93201789636e-05,-5.07991048438e-05,-5.22817135579e-05,-5.37775036841e-05,-5.52756235679e-05,-5.67646644535e-05,-5.82640918455e-05,-5.97734885403e-05,-6.12884190629e-05,-6.28014135941e-05,-6.43160932361e-05,-6.58431019666e-05,-6.73707832197e-05,-6.89057375905e-05,-7.04467484792e-05,-7.20135555214e-05,-7.36030303358e-05,-7.52060409919e-05,-7.6826234904e-05,-7.8470947404e-05,-8.01338223973e-05,-8.18124534243e-05,-8.34988936523e-05,-8.5203245284e-05,-8.6932585501e-05,-8.86720315401e-05,-9.04046823361e-05,-9.21414621159e-05,-9.38724227277e-05,-9.55923042489e-05,-9.73011582752e-05,-9.90010268636e-05,-0.000100691391578,-0.00010236599137,-0.000104003849712,-0.000105609743509,-0.000107196004685,-0.00010877258774,-0.000110336358056,-0.000111897553421,-0.000113457679905,-0.000114997919395,-0.000116530403262,-0.000118043411575,-0.000119552516732,-0.000121059816555,-0.000122559891022,-0.000124045003098,-0.000125505572225,-0.000126934275518,-0.000128336630431,-0.00012972412714,-0.000131108997798,-0.000132486656883,-0.000133860079172,-0.0001352229002,-0.000136589977118,-0.000137942081578,-0.000139295684308,-0.000140657311217,-0.000142020703453,-0.000143383305226,-0.000144730279172,-0.000146073565693,-0.000147414251233,-0.00014876596396,-0.000150115113314,-0.000151468911618,-0.0001528308812,-0.000154192731478,-0.000155556572475,-0.000156927613621,-0.000158306922192,-0.000159693679045,-0.00016108074043,-0.000162456586081,-0.000163814795448,-0.000165162377731,-0.000166492955053,-0.000167807278056,-0.000169104321604,-0.000170372467692,-0.000171619394673,-0.000172841380825,-0.000174041289686,-0.000175220782125,-0.000176391921183,-0.000177560094947,-0.000178725483594,-0.000179887328577,-0.000181053720254,-0.000182242645366,-0.000183460558426,-0.000184698227722,-0.000185956020847,-0.00018723868456,-0.000188548769956,-0.000189864706265,-0.000191187030035,-0.000192513917094,-0.000193837619209,-0.000195142515377,-0.00019641174418,-0.000197658741086,-0.000198885964494,-0.000200086757144,-0.000201251161296,-0.000202391313306,-0.000203517715204,-0.000204625542248,-0.000205722754584,-0.000206816491478,-0.000207916897554,-0.000209018919626,-0.000210121980019,-0.000211220516081,-0.000212320307719,-0.000213427664978,-0.000214534548905,-0.000215651605681,-0.000216778714133,-0.00021791528175,-0.000219055525248,-0.000220197353752,-0.000221335352687,-0.000222477606537,-0.000223638465398,-0.000224814149563,-0.000226000311752,-0.000227188022259,-0.000228366497311,-0.000229532160959,-0.000230685340939,-0.000231832330528,-0.000232976514018,-0.000234122708716,-0.000235246733402,-0.000236343776288,-0.000237420358494,-0.000238484138283,-0.000239539507828,-0.000240595403979,-0.000241655171472,-0.000242716048494,-0.000243780957677,-0.000244848732933,-0.000245928284471,-0.00024702113315,-0.000248118998901,-0.000249211576555,-0.00025030548518,-0.000251400294206,-0.000252498042034,-0.000253606779511,-0.000254735300001,-0.000255865500797,-0.000256999553978,-0.000258130579432,-0.000259267029516,-0.000260423971864,-0.00026160236266,-0.000262789121829,-0.000263971154213,-0.000265134216378,-0.000266265237145,-0.00026736815371,-0.00026844957899,-0.000269510627349,-0.000270552391363,-0.000271568533496,-0.000272550776002,-0.000273505297283,-0.000274433692224,-0.000275338377753,-0.000276219638893,-0.000277081055314,-0.000277908547728,-0.00027871247562,-0.000279497191035,-0.000280270751116,-0.000281028735115,-0.000281776435696,-0.000282518514848,-0.000283264837509,-0.000284024540794,-0.000284796676867,-0.000285589691268,-0.000286401033449,-0.000287220611594,-0.000288039183272,-0.00028885799068,-0.000289682880892,-0.000290504021115,-0.000291316775609,-0.000292107980145,-0.000292886093233,-0.000293659853232,-0.000294429792119,-0.000295203047985,-0.000295986311339,-0.000296777063666,-0.000297568707178,-0.000298368540304,-0.000299178394021,-0.000300006250345,-0.000300866252742,-0.000301741723963,-0.000302631000427,-0.000303525081524,-0.000304420138596,-0.00030531772977,-0.000306212614751,-0.000307107955717,-0.000307995873046,-0.000308873076403,-0.000309727912921,-0.000310564185736,-0.000311386476202,-0.000312199775838,-0.000313006218421,-0.000313809137322,-0.000314616130563,-0.000315428075337,-0.000316256767576,-0.000317111816411,-0.000317991508116,-0.000318900248833,-0.000319826094306,-0.000320769861677,-0.000321724709814,-0.000322693145523,-0.000323667297179,-0.000324644787542,-0.000325630916057,-0.000326607668079,-0.000327570950141,-0.000328522325852,-0.000329459065648,-0.000330372883078,-0.000331272760851,-0.000332162844858,-0.000333047429262,-0.000333933476057,-0.000334808902938,-0.000335680847246,-0.000336550021612,-0.000337416041394,-0.000338282131836,-0.000339162854621,-0.000340061592129,-0.000340968779762,-0.000341874606083,-0.000342777833879,-0.000343673912612,-0.000344565769501,-0.000345450107753,-0.000346328739289,-0.000347207883752,-0.000348087321954,-0.000348951919509,-0.000349804776714,-0.00035065594335,-0.000351510401354,-0.000352362400158,-0.000353213728585,-0.000354068879981,-0.000354926376628,-0.000355785881439,-0.000356635723135,-0.000357481391918,-0.000358323767077,-0.000359162673566,-0.000359985411699,-0.00036080269793,-0.00036161425126,-0.000362417256329,-0.000363221810255,-0.000364022907194,-0.000364824240821,-0.000365632231929,-0.000366439399361,-0.000367251397069,-0.0003680686476,-0.000368889687865,-0.000369708802309,-0.000370535474391,-0.000371357702034,-0.000372169818793,-0.000372974329598,-0.000373762816334,-0.000374540898806,-0.000375310193495,-0.000376071764741,-0.000376829293524,-0.000377587526487,-0.000378336875746,-0.000379072654324,-0.000379811103311,-0.000380543607442,-0.000381277374052,-0.000382018821004,-0.000382755296918,-0.00038348173568,-0.000384191985914,-0.000384877051111,-0.000385545891148,-0.000386204584704,-0.000386847954181,-0.000387475461469,-0.000388089966636,-0.000388682981206,-0.000389253010226,-0.000389808744995,-0.000390357675397,-0.000390912186084,-0.000391466496601,-0.000392016701575,-0.000392558467171,-0.000393097807748,-0.000393631038368,-0.000394151104596,-0.000394662222448,-0.000395169415107,-0.000395667405482,-0.000396150279561,-0.000396611865745,-0.000397062169519,-0.0003974954289,-0.000397919008608,-0.000398320308215,-0.000398708708785,-0.000399089733995,-0.000399456133,-0.000399801210827,-0.00040012496861,-0.000400435052598,-0.000400717052738,-0.000400971182775,-0.000401198703813,-0.000401404095374,-0.000401593910636,-0.00040176372105,-0.000401910630038,-0.000402043692419,-0.000402166263727,-0.000402274212794,-0.000402378369121,-0.00040249012901,-0.000402606318804,-0.000402731086116,-0.000402853982802,-0.000402975462009,-0.000403091538937,-0.00040319714207,-0.000403287738092,-0.000403364453956,-0.000403421257656,-0.000403447303621,-0.000403435813845,-0.000403382673906,-0.000403285151304,-0.000403149865536,-0.00040298391082,-0.00040279492463,-0.000402588963041,-0.000402369887578,-0.000402131368821,-0.000401885634857,-0.000401628334414,-0.000401369354021,-0.00040111573183,-0.000400864138335,-0.00040060267624,-0.000400327300299,-0.000400031927777,-0.000399714779288,-0.000399382140339,-0.000399024873639,-0.000398645098783,-0.00039824727073,-0.000397826597667,-0.000397379118422,-0.000396916630052,-0.00039643699482,-0.000395938660142,-0.000395424010255,-0.000394890906638,-0.000394340441733,-0.000393788121837,-0.000393224297953,-0.000392642965042,-0.000392042957437,-0.000391427493233,-0.000390792412832,-0.00039014328658,-0.000389476912673,-0.000388793476704,-0.000388097142068,-0.000387373765482,-0.000386618291583,-0.000385837795558,-0.000385037230142,-0.000384210302692,-0.000383360289242,-0.000382485169786,-0.000381588238335,-0.000380672470826,-0.000379731034062,-0.000378757220361,-0.000377759317805,-0.000376737649029,-0.00037568596471,-0.000374602820489,-0.000373483490957,-0.00037232674943,-0.000371130781281,-0.000369893898413,-0.000368617096699,-0.000367311938426,-0.000365979505122,-0.000364612933926,-0.000363212362839,-0.000361782393394,-0.000360329386906,-0.000358862242546,-0.000357375108073,-0.000355872867288,-0.000354355935948,-0.000352822100382,-0.000351253041621,-0.000349656250976,-0.000348041467339,-0.000346406880433,-0.00034475230112,-0.000343076078567,-0.000341381943151,-0.000339659919998,-0.000337904235594,-0.00033611291462,-0.000334295979656,-0.000332465199609,-0.000330614752763,-0.00032873947014,-0.000326843052833,-0.000324911357017,-0.00032293695952,-0.000320918886687,-0.00031887181686,-0.000316797069331,-0.000314698187595,-0.000312560865537,-0.000310379218424,-0.000308158772608,-0.000305898439911,-0.000303604450461,-0.000301283068156,-0.000298945714493,-0.000296590376458,-0.000294216841304,-0.000291822426102,-0.000289404561896,-0.000286971437358,-0.000284522992841,-0.00028205543851,-0.000279565129309,-0.000277049189971,-0.000274506374366,-0.000271927220855,-0.00026930620399,-0.000266648201958,-0.000263962556986,-0.00026124044536,-0.000258478960256,-0.000255682264264,-0.000252771569751,-0.000249674171749,-0.00024632049971,-0.000242665541241,-0.000238277230413,-0.000234705101965,-0.000231457808408,-0.000228472802895,-0.00022568778899,-0.000223012141126,-0.000220365792796,-0.000217823836131,-0.000215457385054,-0.000213325024127,-0.00021148855054,-0.000210375294214,-0.000208449172507,-0.000206191173329,-0.000203652545584,-0.000200901548105,-0.000198026904644,-0.000195105539954,-0.000192144286847,-0.000189152478953,-0.000186122864492,-0.000183052030977,-0.000179943687021,-0.000176792954262,-0.000173599816233,-0.000170366133452,-0.00016708974466,-0.00016377313512,-0.000160424155047,-0.000157041869918,-0.000153623469079,-0.000150177772187,-0.00014670194736,-0.000143192367411,-0.000139654859813,-0.000136093730632,-0.000132518559344,-0.000128933409103,-0.000125328981382,-0.00012170617219,-0.000118058892166,-0.000114384460259,-0.000110685174699,-0.000106958757524,-0.000103210028095,-9.94374726059e-05,-9.56333022827e-05,-9.1799767484e-05,-8.79422803962e-05,-8.40619748238e-05,-8.01668960213e-05,-7.6263303785e-05,-7.23491117049e-05,-6.84265576354e-05,-6.44930331907e-05,-6.0553021979e-05,-5.65972457902e-05,-5.26311025013e-05,-4.8644519475e-05,-4.46461754931e-05,-4.06413252028e-05,-3.66167883088e-05,-3.25787285788e-05,-2.85343514646e-05,-2.44866783579e-05,-2.04338651442e-05,-1.63745929258e-05,-1.23032778223e-05,-8.23026227245e-06,-4.14209771013e-06,-3.13923459325e-08,4.09452078117e-06,8.23827964104e-06,1.24056199812e-05,1.66063200862e-05,2.08478395507e-05,2.51301558772e-05,2.94520400859e-05,3.38057352693e-05,3.81905102333e-05,4.26008798542e-05,4.70391939737e-05,5.15130461648e-05,5.60200015363e-05,6.05557251265e-05,6.51092749587e-05,6.96675753243e-05,7.42198422733e-05,7.87767480271e-05,8.3329730196e-05,8.78939345999e-05,9.24694155052e-05,9.70532726379e-05,0.000101642570544,0.000106234644547,0.000110836250929,0.00011545532843,0.000120103777343,0.000124780800412,0.000129489989775,0.000134223765919,0.000138965690725,0.000143712213759,0.000148466920782,0.000153231247976,0.00015800701677,0.000162794053462,0.000167580097152,0.000172372692719,0.000177173062596,0.000181975824548,0.000186810472649,0.000191683897099,0.000196583395025,0.000201511125529,0.000206460196619,0.0002114206759,0.000216401829993,0.00022139572435,0.00022639842531,0.000231409246451,0.000236411620823,0.000241386503395,0.000246340555125,0.00025128155647,0.00025620451988,0.000261120353671,0.000266025630953,0.000270914371353,0.000275798085902,0.000280672173274,0.000285538841865,0.000290412310192,0.000295298102631,0.000300185104349,0.000305075545536,0.000309961190657,0.000314845015981,0.000319738449505,0.000324631936019,0.000329529357603,0.000334421926458,0.000339305790664,0.000344173615982,0.000349026086858,0.000353866308433,0.000358690478012,0.000363504575501,0.000368297924611,0.000373073698963,0.00037783682565,0.000382593918785,0.000387344836301,0.000392101313684,0.000396857702914,0.000401604305569,0.000406351431665,0.000411100391929,0.000415851141022,0.000420601869948,0.000425341648,0.000430065368377,0.000434768792193,0.000439453789808,0.000444118946923,0.000448780791784,0.000453430623937,0.000458062091843,0.000462678088173,0.000467276545441,0.000471864438704,0.000476449477044,0.000481035974787,0.000485611031801,0.000490168795026,0.00049469294027,0.000499182232016,0.00050364151662,0.000508059263105,0.000512428789396,0.000516749496845,0.000521015701329,0.000525223602641,0.000529371706353,0.000533469397402,0.000537530916007,0.000541559333764,0.000545546821089,0.000549502922606,0.000553441704564,0.000557363858298,0.000561266926841,0.000565145442776,0.00056900698944,0.000572848107961,0.000576664646267,0.000580453876607,0.000584219452857,0.000587954928084,0.000591651839886,0.000595304484103,0.000598918833888,0.000602501662409,0.00060604459165,0.000609546678914,0.000613009605495,0.000616432663315,0.000619813664101,0.000623157072265,0.000626465968044,0.000629741946155,0.000632982542661,0.000636183295629,0.000639342181809,0.000642476484224,0.000645573012668,0.000648633930363,0.000651662709883,0.00065466223424,0.00065762608761,0.000660562299857,0.000663465612934,0.00066633839761,0.00066919157613,0.000672015658835,0.000674809585082,0.000677579562391,0.000680316839683,0.000683013912124,0.000685669837843,0.000688281477283,0.000690848916212,0.000693375256918,0.000695853591526,0.000698270409824,0.000700637060378,0.000702952492129,0.000705216305383,0.000707437201857,0.000709621049206,0.000711757611949,0.000713847449602,0.000715885353681,0.000717877572717,0.000719835742677,0.000721763431958,0.000723657573195,0.000725510039203,0.000727317468879,0.000729073859386,0.000730778236875,0.000732446385834,0.00073408322105,0.00073568704973,0.000737249163186,0.000738755876115,0.000740199351935,0.000741582770136,0.000742913176362,0.000744199262438,0.000745446734006,0.000746642675329,0.000747781154583,0.000748861674458,0.000749881240964,0.000750844703405,0.000751758362932,0.000752626183245,0.000753450140117,0.000754218100392,0.000754922420226,0.000755560032481,0.000756142633159,0.000756663615654,0.000757127833184,0.000757537853452,0.000757896837713,0.000758211841437,0.000758477198543,0.000758687641612,0.000758855450702,0.000758993110986,0.000759089399469,0.000759146766392,0.000759163110437,0.000759133875334,0.000759051871902,0.000758912404693,0.000758712788295,0.000758460769967,0.000758155301204,0.000757785589278,0.00075734522105,0.000756844176846,0.000756277069454,0.000755648762744,0.000754961906731,0.000754218920715,0.000753422789703,0.0007525690419,0.000751650751175,0.000750672076599,0.000749640646205,0.000748549555048,0.000747404091534,0.000746204251506,0.000744950018523,0.000743636829421,0.000742265469459,0.000740838922569,0.000739355799253,0.000737816134002,0.000736211512686,0.000734542789376,0.00073281094178,0.00073101514539,0.000729155286017,0.000727229099162,0.000725230906394,0.00072316305394,0.000721022927553,0.000718813710128,0.000716539957831,0.000714203244791,0.000711804911806,0.000709339203716,0.000706810932626,0.000704227994819,0.000701596316999,0.000698923821431,0.000696210924187,0.00069345627506,0.000690661352732,0.000687829284263,0.000684965387007,0.000682073652864,0.000679158367745,0.000676207103885,0.000673215318102,0.000670176478393,0.000667093780644,0.00066397381416,0.000660816363626,0.0006576199491,0.000654379292744,0.000651093417788,0.000647753504737,0.000644364984712,0.000640935135637,0.000637463546526,0.000633962064905,0.000630427142021,0.000626856470653,0.000623250317487,0.00061961237201,0.000615949071394,0.000612266870731,0.00060857395532,0.00060486833804,0.000601143510102,0.00059739305601,0.000593615412102,0.000589812491159,0.000585983428185,0.000582126370238,0.000578233295775,0.000574298566914,0.000570317937367,0.000566284223097,0.000562208551344,0.000558094739815,0.000553940923746,0.0005497421915,0.000545499834744,0.000541216005103,0.00053690426218,0.000532571176266,0.000528212837651,0.000523837045357,0.000519441227002,0.000515019239351,0.000510567144968,0.00050610111382,0.000501614292463,0.000497111330257,0.000492579050932,0.000488003940191,0.000483390748541,0.000478742011005,0.000474056918991,0.000469347475602,0.000464607281588,0.000459843182396,0.000455051095702,0.000450231460995,0.000445380079095,0.000440506360738,0.000435612621532,0.000430689932178,0.000425745989736,0.000420768472169,0.000415762743901,0.000410721114017,0.000405648826013,0.000400545966168,0.000395414097609,0.000390263305519,0.000385096176999,0.000379915895,0.00037472357694,0.000369519034038,0.000364304542702,0.000359080198767,0.000353855149728,0.00034862875389,0.000343406594563,0.000338190600191,0.000332975285243,0.000327754720795,0.00032252558432,0.000317287616782,0.000312037190289,0.000306780549968,0.000301512236946,0.000296230412469,0.00029092402204,0.000285588394508,0.00028022410937,0.000274835848218,0.000269427746202,0.000264002078375,0.000258579716855,0.000253160218718,0.00024774034827,0.000242313404236,0.000236889660411,0.000231477612057,0.000226074132303,0.000220674837011,0.000215279705456,0.00020989805567,0.000204522984273,0.000199140319372,0.000193746450659,0.000188340849433,0.000182940521456,0.000177532218571,0.000172114061991,0.000166702757005,0.000161301275922,0.00015590361428,0.000150498413357,0.000145084561821,0.000139664863407,0.00013424927754,0.000128840311987,0.000123427724513,0.000118025064522,0.000112625996858,0.000107221102978,0.000101808764617,9.63887649816e-05,9.09787533219e-05,8.55928177124e-05,8.02282266715e-05,7.48750417599e-05,6.95417607066e-05,6.42285585299e-05,5.89314913981e-05,5.36517559375e-05,4.83914868287e-05,4.31614413261e-05,3.79551509544e-05,3.27576289292e-05,2.75748264537e-05,2.24073115533e-05,1.72607220386e-05,1.21226286953e-05,6.98876539832e-06,1.86950033304e-06,-3.23095266719e-06,-8.32068138291e-06,-1.33969317894e-05,-1.84489466506e-05,-2.34729309396e-05,-2.8478523538e-05,-3.34703202896e-05,-3.84478398461e-05,-4.33918012876e-05,-4.83010412126e-05,-5.31815484355e-05,-5.80307213076e-05,-6.28489536478e-05,-6.76411535735e-05,-7.2411533321e-05,-7.71590284321e-05,-8.18766749221e-05,-8.65576600981e-05,-9.12052944945e-05,-9.58358010805e-05,-0.000100443405938,-0.000105022028358,-0.000109574840544,-0.00011409804009,-0.00011860029415,-0.000123079289544,-0.000127533932466,-0.000131969738538,-0.000136390350186,-0.000140783181617,-0.000145146226269,-0.000149498006824,-0.000153841215424,-0.000158167573885,-0.000162477362803,-0.00016676597097,-0.000171044978893,-0.000175300266797,-0.000179529959746,-0.000183736812967,-0.000187934826276,-0.000192109450969,-0.000196243649232,-0.000200348895561,-0.000204421736028,-0.000208460649428,-0.000212456458594,-0.000216408074661,-0.000220332884713,-0.00022423065474,-0.000228092012029,-0.000231911581786,-0.000235702412811,-0.000239465752849,-0.00024319382151,-0.000246895379457,-0.000250566782733,-0.000254214164526,-0.000257822412133,-0.00026138662819,-0.000264910121578,-0.000268396058395,-0.000271844265092,-0.000275250724535,-0.000278628067486,-0.000281967524328,-0.000285269428172,-0.00028853446202,-0.000291769931679,-0.000294981408524,-0.000298167672966,-0.00030132565002,-0.00030445553394,-0.000307556413066,-0.000310619468913,-0.000313638156158,-0.00031662271676,-0.000319577742475,-0.000322499175008,-0.000325377817833,-0.00032821895878,-0.000331022686953,-0.000333796567937,-0.000336541377011,-0.000339258915475,-0.000341958848601,-0.000344641514909,-0.000347305625716,-0.000349946967044,-0.000352572875738,-0.000355176048739,-0.000357756537117,-0.00036030434567,-0.000362820418767,-0.000365304902034,-0.000367757750882,-0.000370174594712,-0.000372547390736,-0.000374871948801,-0.000377149237136,-0.000379382078644,-0.000381577098403,-0.000383737553399,-0.000385862452371,-0.000387945342736,-0.000389988054833,-0.000391980920459,-0.000393935450966,-0.000395856031022,-0.000397753324194,-0.000399619759926,-0.000401462107262,-0.000403277021134,-0.000405058440099,-0.000406820516683,-0.000408552245867,-0.000410258678266,-0.000411944303823,-0.000413609149433,-0.000415242759895,-0.000416842851616,-0.000418286342513,-0.000419437793614,-0.000420305473746,-0.000420877851397,-0.000421161064208)
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(278)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Oryctolagus_cuniculus-male-liver-H3K4me3-ERR572267.50mers.unique.MACS2_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 278',bty='n')
dev.off()
