# R script for Peak Model
#  -- generated by MACS
p <- c(0.0434633485568,0.0507054982442,0.0580019901804,0.0652065183109,0.072366109582,0.0723776050577,0.0722856412521,0.072417316701,0.0725176408525,0.0724298572199,0.0723514789766,0.0723399835009,0.0722741457764,0.072267875517,0.0720902181653,0.0721968125763,0.0722657854305,0.0720672272139,0.0718446330028,0.0719042004677,0.0719888489706,0.0718404528298,0.0715551560239,0.0717014620782,0.0719146509002,0.0717066872944,0.0715865073213,0.0715290299428,0.0716554801754,0.0715457506347,0.0714590120454,0.0714840930833,0.0716251739213,0.0714715525643,0.0715238047266,0.0714820029968,0.0715258948131,0.0716481648727,0.0716387594835,0.0715823271483,0.0717610295432,0.0718895698623,0.0719345067218,0.0719376418516,0.0718300023973,0.0719710832354,0.071645029743,0.0715332101158,0.0715060389914,0.0716554801754,0.0714391562237,0.0712844898235,0.0712970303424,0.0713670482398,0.0714224355318,0.0713189762506,0.0715603812401,0.0715823271483,0.0717296782458,0.0716471198295,0.0717787952783,0.0717631196297,0.071786110581,0.0715447055915,0.0715457506347,0.0715311200293,0.0715363452455,0.0715969577537,0.071478867867,0.0712876249532,0.0712092467098,0.0713837689317,0.0714600570886,0.0714140751858,0.0712709042613,0.0712259674018,0.0712291025315,0.0711057874286,0.0709991930176,0.0711987962774,0.0714119850994,0.0711695350665,0.0710765262177,0.0711319135097,0.071124598207,0.0712238773153,0.0710848865637,0.0712050665369,0.0710922018664,0.0712259674018,0.0708831932174,0.0709762020662,0.0709647065905,0.0710577154393,0.0711632648071,0.0710545803096,0.0711402738557,0.0709647065905,0.0711528143746,0.0710859316069,0.0713910842345,0.0714036247534,0.0714757327373,0.0713869040615,0.0713419672019,0.071269859218,0.0710922018664,0.0711089225583,0.0709469408554,0.0708779680012,0.0707003106496,0.0707400222929,0.0706292477089,0.0706365630116,0.0707003106496,0.0708340761849,0.0709573912878,0.0711068324718,0.071333606856,0.0712510484396,0.0712970303424,0.0711183279475,0.0713064357316,0.071427660748,0.0712844898235,0.0711549044611,0.0712479133099,0.0710587604826,0.0710002380609,0.0710901117799,0.0710984721259,0.071337787029,0.0711946161044,0.0711893908882,0.0711266882935,0.0712980753857,0.0712792646072,0.0714506516994,0.0713492825047,0.0713586878939,0.0715081290779,0.0713430122452,0.0713064357316,0.0713754085858,0.071542615505,0.0714893182995,0.0713127059911,0.0712813546937,0.0712897150397,0.0713315167695,0.0710890667367,0.071227012445,0.0713346518992,0.071179985499,0.0711057874286,0.0711778954125,0.07128657991,0.0711967061909,0.0712907600829,0.0712959852992,0.0714621471751,0.0715143993374,0.0713910842345,0.071436021094,0.0715656064564,0.0716262189646,0.0717631196297,0.0716889215593,0.0716000928834,0.0715217146401,0.0715593361969,0.0714840930833,0.0714861831697,0.0715771019321,0.0716377144403,0.0715917325375,0.0715676965429,0.0717066872944,0.0719177860299,0.0719825787111,0.0720693173004,0.0720536416517,0.0719658580192,0.0721341099816,0.0722574250845,0.0723389384576,0.0721780017979,0.0723002718575,0.0722459296088,0.0723859654036,0.0722940015981,0.0724329923497,0.0727600908853,0.072732919761,0.0726190100473,0.0726346856959,0.0729711896208,0.0730568831669,0.0730537480371,0.0729900003992,0.073074648902,0.0731885586157,0.0732115495671,0.0731237659346,0.0733045584159,0.0732909728537,0.0732617116429,0.0732627566861,0.073394432135,0.0735658192272,0.07365046773,0.073590900265,0.0736765938111,0.0738093143032,0.0738469358601,0.073867836725,0.0740110076495,0.0740371337306,0.0741134218875,0.0741604488335,0.0742586828986,0.074520988753,0.0746328083802,0.0747038713209,0.0747090965371,0.0747561234831,0.074943186224,0.0750759067161,0.0752065371217,0.0752807351921,0.0752681946732,0.0753068612732,0.0753267170949,0.0754354015924,0.0754395817653,0.0756621759765,0.0755430410466,0.075707112836,0.0757802658632,0.0759297070472,0.0760540671934,0.0760519771069,0.0761857426422,0.076287111837,0.0764720844913,0.0765065709184,0.0766810931403,0.0766309310646,0.0767019940052,0.0767061741782,0.0767751470324,0.076901597265,0.0768859216163,0.076995651157,0.0772182453682,0.0773875423739,0.0774742809632,0.0776216320608,0.0777188210825,0.0779529107694,0.0780093431046,0.0780950366507,0.0783103155592,0.0783771983268,0.078352117289,0.0784911080405,0.07865517983,0.078868368652,0.0789446568088,0.0789854134954,0.079116043901,0.079269665258,0.0793971605339,0.0794201514853,0.0794943495557,0.0797639707129,0.0797618806264,0.0798078625292,0.0800638981242,0.0802290149569,0.0804463839518,0.0806261313899,0.0806386719089,0.0809312840175,0.0811308872772,0.081035788342,0.081121481888,0.081181049353,0.0812374816882,0.0811956799584,0.0811068512826,0.0810796801582,0.0812845086343,0.081283463591,0.0813890129587,0.081449625467,0.0816722196781,0.0820933721058,0.0823034257981,0.0826566504149,0.083391315816,0.0839734049035,0.0846161064991,0.08551170856,0.0865630220644,0.0877125696338,0.0886060816083,0.0892613237228,0.0902332139406,0.0910264017635,0.091595950332,0.0921540034248,0.0926650295716,0.0929680921126,0.0930715513939,0.0931551548535,0.0935460010271,0.0939034058168,0.0939535678926,0.0940246308332,0.0943287384175,0.0946652423424,0.0947206296344,0.0947937826615,0.0951344667594,0.095213890046,0.0952546467325,0.0955054571113,0.0957458170577,0.096029023777,0.0961774199178,0.0961617442691,0.0963759781344,0.0965849867833,0.0965431850535,0.0968065359513,0.0970291301624,0.0969047700163,0.0969267159244,0.0973624989576,0.0973436881792,0.097633165158,0.097948768218,0.0980626779317,0.098298857705,0.0984284430674,0.0985162267,0.098618640938,0.0988046586356,0.098708514657,0.0991850543767,0.0992467119282,0.0993230000851,0.0996521887072,0.0996197923666,0.0997483326858,0.0998173055399,0.100095287043,0.100455826963,0.100597952844,0.100422385579,0.100637664487,0.100798601147,0.100936546855,0.101111069077,0.10127618591,0.101623140267,0.101711968943,0.10170778877,0.101951283846,0.102171787971,0.102201049182,0.102394382182,0.102634742128,0.103009912653,0.103087245853,0.103041263951,0.103386128221,0.103614992692,0.103698596152,0.103905514714,0.104099892758,0.104101982844,0.104154235006,0.104214847515,0.104466702937,0.104560756829,0.104680936802,0.104610918904,0.104572252304,0.104767675391,0.104833513116,0.104956828219,0.105016395683,0.105195098078,0.105407241857,0.105681043187,0.105753151171,0.106057258755,0.106364501469,0.106518122826,0.106702050438,0.107168139725,0.107283094482,0.10750464365,0.107553760682,0.107600787628,0.107865183569,0.108158840721,0.108357398938,0.108239309051,0.108523560813,0.108537146376,0.109036677047,0.109075343647,0.109346009847,0.10974312628,0.109930189021,0.110013792481,0.110131882367,0.110548854622,0.110741142579,0.11097314218,0.110976277309,0.111320096537,0.111579267262,0.111716167927,0.111785140781,0.111888600062,0.11222614903,0.11226481563,0.112521896269,0.112710004053,0.112713139182,0.112618040247,0.112648346501,0.112723589615,0.112874075842,0.113042327805,0.112990075642,0.113370471383,0.113401822681,0.113294183227,0.113396597465,0.113714290611,0.113820885022,0.114011082893,0.114243082493,0.114481352353,0.114687225872,0.114808450889,0.115002828932,0.115253639311,0.115629854879,0.115582827933,0.115895295863,0.115979944366,0.115886935517,0.115714503382,0.116172232323,0.115947548025,0.115838863528,0.115943367853,0.115868124739,0.116139835983,0.116242250221,0.116319583421,0.116548447891,0.116913167984,0.116975870579,0.11731132946,0.117533923671,0.117620662261,0.11778159892,0.117769058401,0.117686499985,0.117765923272,0.117889238375,0.117929995061,0.117503617417,0.117468085947,0.117434644563,0.117382392401,0.117405383352,0.117573635315,0.117632157736,0.117778463791,0.117882968115,0.11782653578,0.118001058002,0.11798120218,0.118060625467,0.118294715154,0.118348012359,0.118089886678,0.118070030856,0.118062715553,0.117929995061,0.117935220277,0.118044949818,0.118237237775,0.118247688208,0.11814213884,0.118060625467,0.118396084348,0.118428480689,0.118403399651,0.118201706305,0.118032409299,0.117894463591,0.117702175634,0.117654103644,0.11755273445,0.117447185082,0.116972735449,0.11696333006,0.116656087346,0.116606970313,0.11668325847,0.116568303713,0.11664459187,0.11633212394,0.116172232323,0.116139835983,0.116204628664,0.115970538977,0.115883800388,0.115907836382,0.115682107041,0.115425026403,0.114967297462,0.114904594867,0.114807405845,0.114737387948,0.114309965261,0.113896128136,0.113625461935,0.113219985156,0.112949318956,0.112923192875,0.112745535523,0.112559517825,0.112183302257,0.11175274444,0.111645104986,0.111546870921,0.111631519424,0.111391159478,0.111270979504,0.110939700796,0.110828926212,0.110567665401,0.110328350497,0.110117251762,0.110121431935,0.109903017897,0.109489180772,0.109332424285,0.108968749236,0.10868345243,0.108542371592,0.108469218565,0.108336498073,0.108084642651,0.107999994148,0.108042840921,0.107970732937,0.107941471726,0.107865183569,0.107859958353,0.107639454228,0.107446121228,0.107127383038,0.107282049438,0.107044824622,0.106773113378,0.106812825022,0.106558879513,0.106342555561,0.106151312647,0.106070844318,0.10608756501,0.106187889161,0.105837799674,0.105699853966,0.105413512117,0.104933837267,0.1049442877,0.10494115257,0.104723783575,0.104655855764,0.104321441926,0.104189766477,0.103858487768,0.103468686638,0.103390308394,0.103280578854,0.102911678588,0.102412147917,0.102210454571,0.101368149715,0.100739033682,0.0998497018805,0.0991610183821,0.0982539208455,0.0971733461302,0.0961262127988,0.0950529533863,0.0942785763418,0.0932094971022,0.0926848853932,0.0920338234516,0.0916586529267,0.0911591222556,0.0908989064876,0.0906961680981,0.0905331413519,0.0903345831354,0.0902582949785,0.0900325656376,0.0897472688317,0.0894954134097,0.0893031254526,0.0893438821392,0.0893417920527,0.0891087474091,0.0888370361654,0.0888882432844,0.0887064057598,0.0887701533977,0.0885695050947,0.0884200639107,0.0881765688346,0.0880657942506,0.0875756689688,0.0874847502064,0.0874910204659,0.0872632010385,0.0870824085571,0.086902661119,0.0868462287838,0.0867971117513,0.0868953458163,0.0865901931888,0.0865337608536,0.0865975084915,0.086283995518,0.0862913108207,0.0860300500095,0.0858241764902,0.0858022305821,0.0857583387658,0.0854897626519,0.0855409697709,0.0857374379009,0.0852431324461,0.0852828440894,0.0849808265916,0.0850153130187,0.0849515653807,0.0847592774237,0.0845157823476,0.0842252603255,0.0839734049035,0.0836431712381,0.0836807927949,0.0832481448915,0.0829962894695,0.0826723260635,0.0824748128902,0.0824748128902,0.0824298760307,0.082311786144,0.0823170113602,0.0822365430304,0.0821393540086,0.0822668492845,0.0822072818195,0.0821842908681,0.0819930479543,0.0814788866778,0.0813409409695,0.0812897338505,0.0809584551418,0.0807515365793,0.0805696990547,0.0806104557413,0.0805164018492,0.080502816287,0.0805080415033,0.0806355367791,0.0805728341845,0.0805926900061,0.0804275731734,0.0801725826216,0.080302167984,0.0800106009187,0.0798538444319,0.0797587454966,0.0795403314585,0.0792759355175,0.0790846926037,0.0789404766359,0.0789101703818,0.0788161164897,0.078403324408,0.0782622435699,0.0782894146943,0.0778797577423,0.0777031454339,0.0778149650611,0.0776561184878,0.0773436505576,0.0773457406441,0.0774251639307,0.0774282990604,0.0772997587413,0.0771200113032,0.0771722634654,0.077165993206,0.0768671108379,0.0765828590753,0.0764156521561,0.0762223191558,0.076129310307,0.0758199775065,0.0756987524901,0.0756788966684,0.0754928789708,0.0753423927436,0.0753455278733,0.0754385367221,0.075510644706,0.0753988250788,0.0752190776407,0.075309996403,0.0752922306678,0.0751772759109,0.0752723748461,0.0753214918787,0.0752452037218,0.074879438586,0.0747603036561,0.0746443038559,0.0744436555529,0.0746307182938,0.0745439797044,0.0745366644017,0.0742795837635,0.0740287733847,0.0739138186277,0.0741311876227,0.0741834397849,0.0742670432445,0.0743621421798,0.074013097736,0.0738876925466,0.0738406656006,0.0739232240169,0.0740141427792,0.0739598005305,0.073970250963,0.0737643774437,0.0734613149027,0.073249171124,0.073134216367,0.0731154055886,0.0726315505662,0.0723567041928,0.0721811369276,0.0720264705274,0.0719282364624,0.0720630470409,0.0718958401218,0.0718373177,0.0719094256839,0.0718749392569,0.0720996235545,0.0721518757168,0.0721518757168,0.0721915873601,0.072204127879,0.0720766326031,0.0720494614788,0.0719710832354,0.0718101465757,0.0717317683323,0.071696236862,0.0716669756511,0.071598002797,0.0714642372616,0.0714391562237,0.0713931743209,0.0716951918187,0.0717317683323,0.071683696343,0.071598002797,0.0715791920185,0.071542615505,0.0716251739213,0.071534255159,0.0713273365965,0.071218652099,0.0709939678014,0.071013823623,0.0709835173689,0.0709406705959,0.0709427606824,0.0707954095848,0.0706950854333,0.0708999139093,0.0710274091852,0.0709584363311,0.0708225807092,0.0707013556928,0.0708758779147,0.070804814974,0.0707462925523,0.0708873733904,0.0708967787796,0.0707212115145,0.0706156621467,0.070565500071,0.0705184731249,0.0704024733247,0.0701934646758,0.0702154105839,0.070343950903,0.0703575364652,0.0703867976761,0.0703376806436,0.070505932606,0.0705205632114,0.0707295718604,0.0708654274823,0.070872742785,0.070860202266,0.070659553963,0.0705989414548,0.0706177522332,0.0706794097847,0.0705884910223,0.0704745813086,0.0703293202976,0.0703867976761,0.0704662209627,0.0706031216278,0.0705456442493,0.0704766713951,0.0704808515681,0.0705644550277,0.0703627616814,0.0706156621467,0.0706365630116,0.0707818240227,0.0707713735902,0.0706187972765,0.0706961304766,0.0708476617471,0.070651193617,0.0706731395252,0.071013823623,0.0709762020662,0.0711266882935,0.0710054632771,0.0708006348011,0.0708560220931,0.0708696076552,0.0708393014011,0.0709511210283,0.0708340761849,0.0706438783143,0.0705477343358,0.0703920228923,0.0703972481085,0.0706731395252,0.0707159862982,0.0707776438497,0.0707828690659,0.0708873733904,0.0708591572228,0.0706835899576,0.0708507968768,0.0709553012013,0.0709134994715,0.0707003106496,0.0707901843686,0.0706961304766,0.0705069776492,0.0702467618813,0.0702561672705,0.0704202390599,0.0702875185678,0.0703282752544,0.070352311249,0.0704798065249,0.0705216082547,0.0705257884277,0.0707431574226,0.070872742785,0.0709270850337,0.070868562612,0.0707870492389,0.0706752296117,0.0706187972765,0.0706825449144,0.0705696802439,0.0706470134441,0.0706156621467,0.0706156621467,0.0706386530981,0.070714941255,0.0708779680012,0.0709323102499,0.0710368145744,0.0708873733904,0.0707765988064,0.0708246707957,0.0708811031309,0.0709072292121,0.0709782921527,0.0711183279475,0.07112877838,0.0709835173689,0.0710190488393,0.071030544315,0.0711998413206,0.071184165672,0.0711475891584,0.0712259674018,0.0712688141748,0.0712102917531,0.0712280574882,0.071376453629,0.0712897150397,0.0714590120454,0.0715729217591,0.0717119125107,0.0716993719917,0.0716575702619,0.0714098950129,0.0713639131101,0.0713315167695,0.0714119850994,0.0715258948131,0.0714067598831,0.0714746876941,0.0713942193642,0.0715008137752,0.0715353002023,0.0717202728566,0.0718320924838,0.0719365968083,0.0719282364624,0.0717652097161,0.0717558043269,0.0717254980728,0.0717223629431,0.0716387594835,0.0717359485053,0.0717892457108,0.0717129575539,0.0716314441808,0.0716429396565,0.072003479576,0.07215292076,0.0721424703276,0.0720275155706,0.0719867588841,0.0718843446461,0.0719418220245,0.0718906149055,0.0719031554245,0.0720066147057,0.0718153717919,0.0718331375271,0.0718258222243,0.0719836237543,0.0722292089169,0.0724444878254,0.0723891005334,0.0723953707928,0.0725991542256,0.0726608117771,0.0726315505662,0.072669172123,0.0725479471066,0.0725521272796,0.0724016410523,0.0723828302739,0.0725542173661,0.0727956223556,0.0726900729879,0.0726252803067,0.0729398383234,0.0730119463074,0.0729220725883,0.0730161264803,0.073040162475,0.0729022167666,0.0727370999339,0.0726942531609,0.0726911180312,0.0728771357288,0.0729471536262,0.0728959465072,0.0731749730536,0.0730255318695,0.073074648902,0.0730986848967,0.0731007749832,0.0731028650697,0.0731143605454,0.0730056760479,0.0729931355289,0.0731279461075,0.0730976398534,0.0733118737186,0.0735804498326,0.0737110802382,0.0739138186277,0.0737382513626,0.0737372063193,0.0737748278762,0.0736389722543,0.0736703235517,0.0737466117085,0.0738249899519,0.0737298910166,0.0737236207572,0.0735626840974,0.0736410623408,0.0737173504977,0.0736316569516,0.0736859992003,0.073539693146,0.0734613149027,0.0733421799727,0.0733285944106,0.0733411349295,0.0735062517622,0.0736285218219,0.0736327019948,0.0737455666653,0.0737194405842,0.0739775662657,0.0741771695255,0.0741405930119,0.0741123768443,0.0742910792392,0.0742722684607,0.074213746039,0.074226286558,0.0742116559525,0.0741886650011,0.0740967011956,0.0740935660659,0.0741186471037,0.0739911518279,0.0737309360599,0.0738228998654,0.0738866475034,0.0739169537575,0.0738427556871,0.0737330261464,0.0735031166325,0.0733839817025,0.0734111528269,0.073437278908,0.0735888101786,0.0735292427136,0.0733651709241,0.0733066485024,0.0732303603455,0.0734289185621,0.0736253866921,0.0736473326003,0.0737769179626,0.0738573862925,0.0736703235517,0.0735846300056,0.0737204856274,0.0737455666653,0.0739869716549,0.0739984671306,0.0740423589469,0.0739681608765,0.0739253141034,0.0741447731849,0.0745241238828,0.0744802320665,0.0745220337963,0.0745126284071,0.0742586828986,0.074213746039,0.0741165570172,0.0742053856931,0.074021458082,0.073761242314,0.0735428282758,0.0736295668651,0.0735720894866,0.0735689543569,0.0737779630059,0.0737298910166,0.0737225757139,0.0737873683951,0.0739012781088,0.0739556203575,0.0739451699251,0.0738991880223,0.0738469358601,0.073761242314,0.0737215306707,0.0736849541571,0.0737110802382,0.0736650983354,0.0736985397193,0.0738866475034,0.0738803772439,0.0739002330655,0.073906503325,0.073970250963,0.0737466117085,0.0739138186277,0.073902323152,0.0739242690602,0.0739901067846,0.0739200888872,0.0738803772439,0.0739681608765,0.0740653498982,0.0741761244822,0.0744447005962,0.0744060339961,0.0744143943421,0.0743610971366,0.0742618180283,0.0742513675958,0.0742659982013,0.0741165570172,0.0741531335308,0.0741207371902,0.0740904309361,0.0740695300712,0.0739598005305,0.0739085934115,0.0737957287411,0.0736159813029,0.0736703235517,0.0737852783086,0.0737591522275,0.0736682334652,0.0736630082489,0.0734550446432,0.0736337470381,0.0736713685949,0.0739848815684,0.074013097736,0.0737027198923,0.0736389722543,0.0734080176972,0.073343225016,0.0733777114431,0.0733829366593,0.0730809191615,0.0730474777777,0.0727015684636,0.0726952982041,0.0730161264803,0.07298059501,0.0731446667995,0.0731478019292,0.0729900003992,0.0729753697938,0.0731906487022,0.0729983607452,0.0730338922155,0.0728771357288,0.0728029376584,0.0727423251502,0.0726712622095,0.072562577712,0.0724925598146,0.0725521272796,0.072472703993,0.0724956949444,0.0725280912849,0.0725061453768,0.0724883796416,0.0727569557556,0.0728760906855,0.0729063969396,0.0729095320693,0.072921027545,0.0728374240854,0.072869820426,0.0728844510315,0.0731530271454,0.0731310812373,0.0725469020634,0.0723368483711,0.0723995509658,0.0724246320037,0.0723284880252,0.0722783259494,0.0650372213053,0.0577156483312,0.050290616076,0.042973223275,0.0)
m <- c(0.0431854126208,0.0504331313838,0.0577393584719,0.0650017043162,0.072238975164,0.072238975164,0.0720707637295,0.0720038970724,0.0722180793336,0.0722473334961,0.0722379303725,0.0722076314184,0.0720864356023,0.0720624053974,0.0721083762242,0.072184646005,0.0723883803511,0.0725137553333,0.072551367828,0.072553457411,0.0726892803084,0.0726568917714,0.072753012591,0.0727425646759,0.072577487616,0.0725106209588,0.0724792772132,0.0724531574253,0.0724353959695,0.0723152449448,0.0723162897364,0.0723716636868,0.0725482334534,0.0726245032343,0.0728428646616,0.0729557021456,0.0729525677711,0.0729065969442,0.0727885355027,0.072861670909,0.0729703292269,0.07300689693,0.072777042796,0.0728083865415,0.0728762979902,0.0728689844496,0.0728710740326,0.0731103312903,0.0731939146118,0.0733077968873,0.0733767531275,0.0733182448025,0.0732983937636,0.0733057073043,0.0733276479262,0.0734070520816,0.0733819770851,0.0733025729297,0.073145854202,0.0731166000394,0.0732210791913,0.0732461541877,0.0734864562369,0.0735198895655,0.0733224239686,0.0732085416931,0.0732983937636,0.0732921250145,0.0734143656222,0.0734749635302,0.0733046625127,0.0734791426963,0.0732712291842,0.0733004833467,0.0734749635302,0.0737131759964,0.0738437749362,0.074143630102,0.0742042280101,0.0741258686462,0.0741990040525,0.0740631811551,0.0742533332114,0.0742230342574,0.07436930507,0.074343185282,0.0741248238547,0.0739472092966,0.0740537780314,0.074197959261,0.07428676654,0.0741916905119,0.0742198998829,0.0743807977767,0.0742209446744,0.0741384061444,0.0741467644766,0.0742407957132,0.0741687050985,0.0740746738618,0.0740088519961,0.0741990040525,0.0741404957275,0.0740715394872,0.0740276582435,0.0740109415792,0.0740245238689,0.0738061624416,0.0737936249434,0.0739169103425,0.0737915353603,0.0739346717983,0.0739649707524,0.0740161655368,0.0741101967734,0.0740454196993,0.0740339269926,0.0742031832186,0.0742773634164,0.0742397509217,0.0741394509359,0.0741164655225,0.0742198998829,0.0741781082221,0.0741687050985,0.0740684051127,0.074197959261,0.0740245238689,0.0739566124202,0.0739378061729,0.0740736290703,0.0740621363636,0.073917955134,0.0738176551483,0.0736536228799,0.0738813874309,0.0738782530563,0.0740339269926,0.0739691499184,0.0738333270211,0.0737089968304,0.0736692947527,0.0736463093393,0.0737110864134,0.0737204895371,0.073659891629,0.0737089968304,0.0737643707808,0.0740203447028,0.0741613915578,0.0743682602785,0.074310796745,0.0743222894517,0.0742731842503,0.0743536331972,0.0742418405047,0.0741070623989,0.0741164655225,0.073974373876,0.0739012384697,0.0741948248864,0.0742522884199,0.0741791530136,0.0742470644623,0.0742136311337,0.0742052728016,0.0742084071762,0.0741310926038,0.0741572123917,0.0741498988511,0.0737215343286,0.0736400405902,0.0738552676429,0.0737685499469,0.0738333270211,0.0739325822153,0.0739890009573,0.0741185551056,0.0740976592752,0.0741091519819,0.0742136311337,0.0742251238404,0.0742104967592,0.0740997488582,0.0741237790632,0.074145719685,0.0741331821868,0.0739649707524,0.0739033280528,0.0740109415792,0.0741216894801,0.074228258215,0.0741237790632,0.0743170654941,0.0743306477838,0.0743630363209,0.0741958696779,0.0741488540596,0.0743787081936,0.0743442300735,0.0740161655368,0.073861536392,0.0738458645193,0.0737204895371,0.0736954145406,0.0737351166183,0.0736170551767,0.0736682499611,0.0732733187672,0.0731688396154,0.0732670500181,0.073174063573,0.0731468989935,0.0731333167037,0.0729776427675,0.0727665948808,0.0728982386121,0.0729337615237,0.0730539125483,0.073063315672,0.0730539125483,0.0732106312761,0.0731155552479,0.0731374958698,0.0733025729297,0.0733652604208,0.0733767531275,0.0732722739757,0.0734415302017,0.0734133208307,0.0734289927034,0.0734383958271,0.0733924250003,0.0733109312619,0.0732085416931,0.0731730187814,0.0731949594033,0.0730946594176,0.0728282375804,0.0728439094531,0.0727686844638,0.07260778657,0.0727467438419,0.0727300271776,0.0728731636157,0.0728303271634,0.0728930146545,0.0729013729867,0.0730340615095,0.0729274927746,0.0729358511068,0.0728292823719,0.0726485334392,0.0727404750928,0.0725649501177,0.0724531574253,0.0723350959837,0.0722337512064,0.0720341960264,0.0720603158144,0.0721167345563,0.0721961387117,0.07212613768,0.071896283546,0.0717991179348,0.0718127002245,0.0718085210584,0.0721355408037,0.0722295720403,0.072180466839,0.0719401647897,0.0718147898075,0.0718743429241,0.0719903147826,0.0719391199982,0.0720540470652,0.0721930043372,0.0717750877298,0.071588070048,0.071384335702,0.0716695637865,0.0718085210584,0.0718032971008,0.0718753877156,0.0718440439701,0.0717740429383,0.0715849356735,0.0717312064861,0.071670608578,0.0717865804365,0.0717301616945,0.0716465783731,0.071755236691,0.071557771094,0.0716570262883,0.0717458335673,0.0716455335816,0.0714543367337,0.0716371752494,0.0717155346133,0.0715347856806,0.0715828460905,0.0713623950801,0.0713153794617,0.0713206034193,0.07124537843,0.0712286617657,0.0713101555042,0.0711900044795,0.0710792565786,0.0712506023876,0.0711701534407,0.0713435888327,0.0713592607055,0.0713874700765,0.0713812013274,0.0715535919279,0.0716319512918,0.0716831460762,0.0716580710798,0.0716058315039,0.0715567263025,0.0713728429953,0.0713070211296,0.0712391096809,0.0711419440697,0.0711356753206,0.0710186586705,0.0709298513915,0.0709528368049,0.0707720878722,0.0708065659923,0.0708932836883,0.0711126899072,0.0710991076174,0.0710625399143,0.0708452232785,0.0708859701477,0.0709434336812,0.0709914940911,0.0710614951228,0.0709444784727,0.0709768670098,0.0708368649463,0.0708097003669,0.0707062660065,0.0708316409887,0.0707731326637,0.0707762670383,0.0706153691444,0.070731341003,0.070759550374,0.0707229826708,0.0706926837168,0.0706707430949,0.0709570159709,0.071047912833,0.0709455232642,0.0710123899214,0.0711106003241,0.0709225378508,0.0710656742889,0.0710364201263,0.0711147794902,0.0711419440697,0.0709538815964,0.0708922388968,0.0712673190519,0.071184780522,0.0712955284229,0.0715055315181,0.071499262769,0.0715535919279,0.0714752325641,0.071499262769,0.0715535919279,0.0715201585994,0.0713373200836,0.0713049315466,0.0711785117728,0.0709434336812,0.0709883597165,0.070787759745,0.0708389545294,0.0709664190946,0.0710071659638,0.0710343305433,0.0712140346845,0.0713529919564,0.071384335702,0.0714909044368,0.0713571711225,0.0715588158855,0.0716068762954,0.0714156794475,0.0715118002672,0.0713916492426,0.071217169059,0.0712129898929,0.0713258273769,0.0712809013416,0.0713164242533,0.0713289617515,0.0714355304864,0.0716225481682,0.0715170242248,0.0714637398574,0.0715598606771,0.0714115002814,0.0713780669529,0.0714397096524,0.0716716533695,0.0716779221186,0.0717301616945,0.0715326960976,0.0714950836029,0.0715316513061,0.0714282169457,0.071588070048,0.0717197137794,0.071900462712,0.0717583710655,0.0718346408464,0.0717761325214,0.0719412095813,0.0719182241679,0.0720718085211,0.0723465886904,0.0722859907823,0.0723204689024,0.0722233032912,0.0723925595172,0.0724959938775,0.0725482334534,0.0726370407325,0.0728292823719,0.0730257031773,0.073065405255,0.0734864562369,0.0736107864276,0.0737998936925,0.0737507884911,0.0736912353746,0.0737800426536,0.0736609364205,0.0737957145264,0.0737110864134,0.0737528780741,0.0736818322509,0.073690190583,0.0735679499754,0.0735251135231,0.0737863114027,0.073915865551,0.0740119863707,0.0740401957417,0.0742355717556,0.0740119863707,0.0739409405474,0.0740788530279,0.0743139311195,0.0746148310768,0.0745082623419,0.0746002039955,0.0748373716702,0.0748363268787,0.0748519987515,0.0751267789208,0.0751100622565,0.0753158861856,0.0753117070196,0.0753514090973,0.0755039486589,0.0755572330264,0.0756951455068,0.0758382819448,0.076017986086,0.0760879871177,0.0763251547924,0.0760973902414,0.0762384370964,0.0762467954285,0.0763157516687,0.0763878422835,0.076475604771,0.0765612776755,0.0766260547497,0.076872625548,0.077015761986,0.0773365129822,0.0775026348336,0.0776802493917,0.0776154723176,0.0777763702114,0.0778986108191,0.0778515952008,0.0779372681053,0.0778474160347,0.0781002555821,0.0780950316245,0.0781190618295,0.0781462264089,0.0784471263662,0.0783698117939,0.078376080543,0.0786863836239,0.0789642981678,0.0791962418849,0.0792934074961,0.0793362439484,0.0794104241462,0.0797458022236,0.079911924075,0.0802201375729,0.0804510364985,0.0806767114665,0.0808198479045,0.0811008968229,0.0812158238899,0.0813798561583,0.0816013519602,0.0817664290201,0.0818897144193,0.0819868800305,0.0821770320869,0.0822292716628,0.0822752424896,0.0820735977265,0.0822595706168,0.0825437539098,0.082755846588,0.0826868903478,0.0829773423899,0.0832312267289,0.0832113756901,0.0833440642129,0.0834506329478,0.0838998933007,0.0840858661909,0.0842300474205,0.0842624359575,0.0846552775685,0.0846678150667,0.0847816973422,0.0849614014833,0.0850627462606,0.0850930452147,0.0851724493701,0.0851714045785,0.0850930452147,0.0852340920696,0.0850711045928,0.0852278233205,0.085281107688,0.0854973795323,0.0857481294967,0.0859602221749,0.0859560430088,0.0860751492419,0.0862339575527,0.0863844075314,0.0865985897926,0.0866623220753,0.0866184408315,0.0865954554181,0.0865797835453,0.0867166512342,0.0871920313751,0.0872494949086,0.0875472604913,0.0875493500744,0.0877217406749,0.087869056279,0.0882995103846,0.0885001103561,0.0886380228365,0.0888177269777,0.088723695741,0.0888845936349,0.0889431019599,0.0892544498324,0.0893651977333,0.0895051997968,0.089572066454,0.0897538601782,0.0900526705524,0.0902867038525,0.0903629736334,0.0905322298594,0.0905552152728,0.0906586496331,0.0907537256613,0.0908226819015,0.0911800006008,0.0913001516254,0.0915101547206,0.0913732870317,0.0916365744943,0.0919270265364,0.0924055410518,0.0928809211927,0.0934628700684,0.0941879553822,0.0945996032404,0.0957478291191,0.0964708248498,0.0979627871381,0.0989772797024,0.0997211712635,0.100587303432,0.101374031446,0.102070907388,0.102830470822,0.103266148885,0.103431225945,0.103773917563,0.103700782157,0.103770783189,0.104248252913,0.104686020559,0.104901247612,0.105116474664,0.105258566311,0.105497823569,0.105554242311,0.105827977688,0.105909471427,0.106234401589,0.106246939087,0.106361866154,0.106439180727,0.106733811935,0.106848739002,0.106985606691,0.107241580613,0.107240535821,0.107395164966,0.107413971213,0.10754248057,0.107583227439,0.107731587835,0.107899799269,0.1080930857,0.108273834633,0.108272789841,0.108350104414,0.10870533353,0.109076234519,0.109294595946,0.10925593866,0.10948265842,0.109214147,0.109279968865,0.109636242773,0.10997162085,0.110291327055,0.110158638532,0.110262072892,0.110473120779,0.110777155111,0.110942232171,0.111684034149,0.11178119976,0.11213224971,0.112279565314,0.112629570473,0.113021367293,0.113180175603,0.113438239108,0.113756900521,0.113957500493,0.113855110924,0.114192578585,0.114076606726,0.114226011913,0.114456910839,0.114613629567,0.115074382626,0.115195578442,0.115360655502,0.115641704421,0.115733646074,0.115875737721,0.116266489749,0.116452462639,0.116592464702,0.116780527176,0.116695899063,0.11659768866,0.116671868858,0.116773213635,0.117165010454,0.117153517748,0.117049038596,0.11723083232,0.117224563571,0.117174413578,0.117295609394,0.117730242666,0.117971589507,0.117950693676,0.117893230143,0.117735466623,0.117827408277,0.117838900984,0.117970544715,0.118070844701,0.118147114482,0.117904722849,0.117818005153,0.117990395754,0.117948604093,0.118456372771,0.118348759245,0.118408312361,0.118118905111,0.1182557728,0.118075023867,0.118408312361,0.118301743626,0.118238011344,0.118322639457,0.118248459259,0.118220249888,0.118156517605,0.118274579047,0.11829025092,0.118481447768,0.118292340503,0.11847622381,0.118344580079,0.118250548842,0.11794651451,0.117988306171,0.118147114482,0.117968455132,0.117775168701,0.117346804179,0.117246504193,0.116928887571,0.11670112302,0.116590375119,0.116567389706,0.116468134512,0.115927977297,0.115827677311,0.115489164859,0.115471403403,0.11503572534,0.114876917029,0.114807960789,0.114628256648,0.114530046245,0.114331535857,0.114263624408,0.114284520238,0.114493478542,0.114192578585,0.114445418132,0.114358700436,0.114217653581,0.114068248394,0.114053621313,0.114082875475,0.114270937949,0.11433362544,0.114197802542,0.114304371277,0.11402436715,0.113862424465,0.113730780734,0.113740183857,0.113489433893,0.113273162048,0.11293047043,0.112562703816,0.11219389241,0.111958814318,0.111811498714,0.111864783082,0.112096726799,0.111756124764,0.111357014404,0.111190892552,0.110985068623,0.110595361387,0.110515957231,0.110351924963,0.110242221854,0.109609078194,0.109066831395,0.108832798095,0.10869175124,0.108571600216,0.108290551297,0.108393985658,0.1080930857,0.108049204457,0.107597854521,0.107746214916,0.107534122238,0.107384717051,0.107553973277,0.107266655609,0.107457852457,0.107113071256,0.107112026465,0.106781872345,0.106666945278,0.106466345306,0.106298133872,0.106349328656,0.106074548487,0.105933501632,0.105440360035,0.105139460078,0.104803037209,0.104760200757,0.104746618467,0.104596168488,0.104330791443,0.10403302586,0.103757200899,0.10353048114,0.103426001988,0.103218088476,0.103256745762,0.10300077184,0.102880620815,0.102555690653,0.10256718336,0.102369717763,0.102028070936,0.101895382413,0.101613288703,0.101619557452,0.101415823106,0.101199551262,0.101123281481,0.101149401269,0.100915367969,0.100782679446,0.101001040874,0.10088193464,0.100827605481,0.100732529453,0.10044103262,0.100497451362,0.100126550373,0.0997922170868,0.09974624626,0.0997817691716,0.0993857931861,0.0993565390236,0.0993053442392,0.0992405671651,0.0991998202959,0.0989229505435,0.0988560838863,0.09866593183,0.0985844380915,0.098099654827,0.0981456256538,0.0978353225729,0.0974560632517,0.097245015365,0.0969451601992,0.0968835174996,0.0968991893724,0.0968866518742,0.0966024685812,0.0964750040159,0.0963632113235,0.096279628002,0.0962461946734,0.096080072822,0.0959202197197,0.0955817072677,0.0953497635506,0.0951387156639,0.0950917000456,0.0950070719326,0.094719754265,0.0945222886681,0.0943425845269,0.0941848210076,0.0940448189442,0.0939821314531,0.0936143648386,0.0934304815314,0.0932173440616,0.0930606253338,0.092897637857,0.0926792764296,0.0926803212212,0.0923303160625,0.0924347952143,0.0922947931509,0.0920565806847,0.0918664286283,0.0913576151589,0.0906450673433,0.0901477465806,0.0894466914718,0.0885168270204,0.0877175615088,0.0865557533404,0.0854963347408,0.0847649806779,0.0839646703748,0.0834391402411,0.083007641344,0.0821937487511,0.0818176238045,0.0816003071687,0.0813704530347,0.0811970176426,0.0812576155507,0.0809828353813,0.0808240270705,0.0804761114949,0.0804970073253,0.080621337516,0.080510589615,0.0804061104632,0.0804311854596,0.0804186479614,0.0800884938416,0.0801407334175,0.0799693876085,0.079883714704,0.079686249107,0.0793341543653,0.0790520606554,0.0787438471574,0.0785202617725,0.0783436920059,0.078176525363,0.0780198066352,0.077866222282,0.0776906973069,0.0773448713143,0.0774033796394,0.0773291994416,0.0771902421696,0.077015761986,0.0769917317811,0.0770021796963,0.0768715807565,0.076872625548,0.0769593432441,0.0772006900848,0.0770909869754,0.0772811390317,0.07712859947,0.0772330786219,0.077039792191,0.0768956109614,0.0768339682618,0.0766469505801,0.0764181412375,0.0761841079374,0.0760953006583,0.0758717152734,0.0756700705104,0.0754026038817,0.0754026038817,0.0753681257616,0.0751717049561,0.0750661810127,0.0751267789208,0.0751476747512,0.075109017465,0.0748906560377,0.075135137253,0.0751602122494,0.0750024487301,0.0749512539457,0.0749470747796,0.0747840873028,0.0746378164902,0.0743233342432,0.0741143759395,0.0741216894801,0.0739346717983,0.073913775968,0.0738751186818,0.0738072072331,0.0738949697206,0.0740182551198,0.0740422853247,0.0741321373953,0.0742460196708,0.0742512436284,0.0741854217627,0.0740255686604,0.0740234790774,0.074000493664,0.0737351166183,0.0735230239401,0.0734854114454,0.0734007833324,0.073033016718,0.0727728636299,0.0726527126053,0.0726694292696,0.0724991282521,0.0724656949235,0.0723027074466,0.0722734532841,0.0720989731005,0.0720644949804,0.0722525574537,0.072269274118,0.0723340511922,0.0723559918141,0.0722400199555,0.0721292720546,0.0722797220332,0.0722703189096,0.0722233032912,0.0721710637153,0.0720895699769,0.0720153897791,0.0719652397862,0.0719119554187,0.0719203137509,0.0718847908393,0.0718586710513,0.0716486679561,0.0715943387972,0.0714574711082,0.0712547815537,0.0712401544724,0.0711722430237,0.0710071659638,0.0710332857518,0.0708859701477,0.0707961180771,0.0708598503597,0.0708358201548,0.0708650743173,0.070902686812,0.0708191034905,0.0708452232785,0.0710510472076,0.0710019420062,0.0710259722112,0.0710416440839,0.0710646294973,0.0710040315893,0.0708838805647,0.0708671639004,0.0709538815964,0.0710792565786,0.0708797013986,0.0707564159994,0.0706728326779,0.0706425337239,0.0705693983176,0.0705976076886,0.0708211930736,0.0708629847343,0.0706979076744,0.0705046212435,0.070334320226,0.0704805910386,0.0704931285368,0.0703479025157,0.0703917837595,0.0702967077313,0.0700031213147,0.0699550609048,0.0700281963111,0.0699884942334,0.0702183483674,0.0702455129469,0.070332230643,0.0702381994063,0.0701504369188,0.0701640192085,0.0703520816818,0.0702747671094,0.0704179035475,0.0703520816818,0.0702873046077,0.0701190931732,0.0700449129754,0.0701587952509,0.0700605848482,0.0700762567209,0.0699686431946,0.0701556608763,0.0700752119294,0.0702789462755,0.0702308858657,0.070304021272,0.0702381994063,0.0704137243814,0.0705976076886,0.0707929837026,0.0709173138932,0.0708222378651,0.0707668639146,0.0707428337097,0.0707365649606,0.0707282066284,0.0709079107696,0.0707271618369,0.0707689534976,0.0704764118725,0.0705725326922,0.0705453681127,0.0705349201975,0.0705871597734,0.0705610399855,0.0706937285083,0.0704147691729,0.0704680535403,0.0703593952224,0.0705192483247,0.0704785014555,0.070733430586,0.0706362649748,0.0706059660208,0.070677011844,0.0704711879149,0.0707585055825,0.0707104451726,0.0707720878722,0.070620593102,0.0705725326922,0.0704001420916,0.0705192483247,0.0704231275051,0.0705370097806,0.0704450681269,0.0702287962826,0.0703583504309,0.0703573056394,0.0704931285368,0.0704607399997,0.0705098452011,0.0706446233069,0.0707292514199,0.0706038764377,0.0708138795329,0.0709580607625,0.0709413440982,0.0710322409603,0.0711074659496,0.0711168690733,0.07112836178,0.071160750317,0.0711910492711,0.0712046315608,0.0712370200979,0.0713049315466,0.0715535919279,0.0715149346418,0.0716894148253,0.0716173242106,0.0716591158713,0.0715044867266,0.0714794117301,0.0715535919279,0.0713195586278,0.0713822461189,0.071299707589,0.0712328409318,0.0710959732429,0.0711795565644,0.0711095555326,0.0711492576103,0.0710886597023,0.0709664190946,0.0712976180059,0.071100152409,0.0709904492995,0.0712161242675,0.0713059763381,0.0714961283944,0.0715023971435,0.0715212033909,0.0715849356735,0.0716465783731,0.0715776221329,0.071696728366,0.0716361304579,0.0714658294404,0.0714344856948,0.0713216482109,0.0714825461047,0.0714564263167,0.0714135898645,0.0713749325783,0.0714177690306,0.071386425285,0.0714303065288,0.0716340408749,0.0715755325498,0.0717312064861,0.0717071762811,0.0718753877156,0.0720853908108,0.0722776324502,0.065075884514,0.0579817501042,0.0508332865354,0.0435688511081,0.0)
ycorr <- c(6.66250971101e-05,6.64983703741e-05,6.61103852172e-05,6.54484801184e-05,6.45110141493e-05,6.32921261456e-05,6.17882573168e-05,6.03007770832e-05,5.88294871265e-05,5.73596565825e-05,5.5890027461e-05,5.44058985041e-05,5.29106310559e-05,5.14153163292e-05,4.9924607933e-05,4.84336408848e-05,4.69414526239e-05,4.54445163915e-05,4.39382403547e-05,4.24238003961e-05,4.09059779714e-05,3.93852552672e-05,3.7867737391e-05,3.63499061993e-05,3.48266513326e-05,3.32936124854e-05,3.1754981297e-05,3.02103542079e-05,2.86656144103e-05,2.71245965762e-05,2.5576733347e-05,2.40213698675e-05,2.24555448289e-05,2.08814640817e-05,1.92975217702e-05,1.77155915679e-05,1.61333757728e-05,1.4542720668e-05,1.29409961842e-05,1.13202370317e-05,9.68814949968e-06,8.05045910583e-06,6.40855166818e-06,4.76065104034e-06,3.10200806692e-06,1.42317547586e-06,-2.7949979129e-07,-2.0045937054e-06,-3.74138199022e-06,-5.4879191751e-06,-7.24143530004e-06,-9.00711999785e-06,-1.07905006656e-05,-1.25939396613e-05,-1.44124387969e-05,-1.62385622203e-05,-1.80643232771e-05,-1.98892464477e-05,-2.17159596329e-05,-2.35500178565e-05,-2.53931030798e-05,-2.72515955247e-05,-2.91223884574e-05,-3.09997071011e-05,-3.28797846067e-05,-3.47646859179e-05,-3.66624052955e-05,-3.85748398135e-05,-4.05043336944e-05,-4.24438690417e-05,-4.43921870585e-05,-4.63401072159e-05,-4.82766524463e-05,-5.02099258361e-05,-5.21445469572e-05,-5.4084856494e-05,-5.60263111592e-05,-5.79628065814e-05,-5.98920675976e-05,-6.18180883691e-05,-6.3740064746e-05,-6.56630807392e-05,-6.76010418783e-05,-6.95563061465e-05,-7.15216151723e-05,-7.34920422255e-05,-7.54591235077e-05,-7.74304187164e-05,-7.94110642681e-05,-8.13992108357e-05,-8.33943754578e-05,-8.53952729113e-05,-8.73896929439e-05,-8.93721511616e-05,-9.13477345385e-05,-9.33169787709e-05,-9.52913879429e-05,-9.72675090529e-05,-9.92451518745e-05,-0.000101216857972,-0.000103185766672,-0.000105148962361,-0.000107117618201,-0.000109089130389,-0.000111060937849,-0.000113030916153,-0.000114999377683,-0.000116957345811,-0.000118910138447,-0.000120856618635,-0.000122803435839,-0.0001247482893,-0.000126689164644,-0.000128624813181,-0.000130558770061,-0.000132491699986,-0.000134420267057,-0.000136351560363,-0.000138286365424,-0.000140220864908,-0.000142151606647,-0.000144073421727,-0.000145985374464,-0.000147888256169,-0.00014977474478,-0.000151649014147,-0.000153514916407,-0.000155370827012,-0.000157204247533,-0.000159018919373,-0.000160816745114,-0.000162602723047,-0.000164377839233,-0.000166143244013,-0.000167906759935,-0.0001696707626,-0.000171431549404,-0.000173186144376,-0.000174939607185,-0.000176702436574,-0.000178471346276,-0.000180242635848,-0.000182017637383,-0.000183795658898,-0.000185571502438,-0.000187340339015,-0.000189102318925,-0.000190861486627,-0.000192620691782,-0.000194376982661,-0.000196125993084,-0.000197867148712,-0.000199601732849,-0.000201326799154,-0.000203047909494,-0.000204766906499,-0.000206482534307,-0.00020819167078,-0.000209890270064,-0.000211572767516,-0.000213238499881,-0.000214893677645,-0.000216538650545,-0.0002181826316,-0.000219827677275,-0.000221466115775,-0.000223091736699,-0.000224709251076,-0.000226319650356,-0.000227922151309,-0.000229521974349,-0.000231117871257,-0.000232709679055,-0.000234284747562,-0.000235836845452,-0.000237362265745,-0.000238871520083,-0.000240374078895,-0.000241865960821,-0.00024335260471,-0.000244832125649,-0.000246306244558,-0.000247766667586,-0.000249221416885,-0.000250675694193,-0.000252136009544,-0.00025360775278,-0.000255080002654,-0.000256556084532,-0.000258031229293,-0.000259505997806,-0.000260980150541,-0.000262451266652,-0.000263924706761,-0.000265389444344,-0.000266855605591,-0.000268314235264,-0.000269759823411,-0.000271194644532,-0.000272611841694,-0.000274015741515,-0.000275406131826,-0.000276793483055,-0.000278175382042,-0.000279555910783,-0.000280931970641,-0.000282298740847,-0.000283662920503,-0.000285025425727,-0.000286390411717,-0.000287761626023,-0.000289137890323,-0.000290515943445,-0.000291888550232,-0.000293259036446,-0.00029462464383,-0.000295985098589,-0.000297341821491,-0.000298689411509,-0.000300033475455,-0.000301373876012,-0.000302704391518,-0.000304029829684,-0.000305350796153,-0.000306668822805,-0.000307981185651,-0.000309298235986,-0.00031062073685,-0.000311948039002,-0.000313281469766,-0.000314609143131,-0.000315937023474,-0.000317261813599,-0.000318580524692,-0.000319893602388,-0.000321209258272,-0.000322519322948,-0.000323820014356,-0.000325113133458,-0.000326398904165,-0.000327681959315,-0.000328965276343,-0.00033024442344,-0.000331524072002,-0.000332808232976,-0.000334082503487,-0.000335350767076,-0.000336614951288,-0.000337870096345,-0.000339118993645,-0.000340358497214,-0.000341589355751,-0.000342817157034,-0.000344041701017,-0.000345259164945,-0.000346470870136,-0.000347685341389,-0.000348894647631,-0.000350108366437,-0.000351325691253,-0.00035254225603,-0.000353757281059,-0.000354966686589,-0.00035616576735,-0.000357359303444,-0.000358552688206,-0.000359737610011,-0.000360916255008,-0.000362085283229,-0.000363242171972,-0.00036439160553,-0.000365535830151,-0.000366673443972,-0.000367807970573,-0.000368937603492,-0.00037005743781,-0.00037116874825,-0.000372276370322,-0.000373382791545,-0.000374481432261,-0.000375578738498,-0.000376671484463,-0.000377756066518,-0.000378833154434,-0.000379890353378,-0.000380919662241,-0.000381916762259,-0.000382869957598,-0.000383770334316,-0.000384611108052,-0.000385385069455,-0.00038607699182,-0.000386689868658,-0.000387227179158,-0.000387698378204,-0.000388116288392,-0.000388487434892,-0.00038882434427,-0.000389141260949,-0.000389449596576,-0.000389758399609,-0.000390089487662,-0.000390447387498,-0.000390830420583,-0.000391235672093,-0.000391664173906,-0.000392118083173,-0.000392599353385,-0.00039309940754,-0.000393616034121,-0.000394147476845,-0.00039468172195,-0.000395214463158,-0.000395746109129,-0.000396276777135,-0.000396806384652,-0.000397323877726,-0.000397822113364,-0.00039830300609,-0.000398769077959,-0.000399218266896,-0.000399650551148,-0.000400075253279,-0.000400489702994,-0.000400895169614,-0.000401287528114,-0.000401676231171,-0.000402065025744,-0.000402454087459,-0.000402842479704,-0.000403230285521,-0.000403620908572,-0.000404011487376,-0.00040440081056,-0.000404791438218,-0.000405188980571,-0.000405591800791,-0.000405998450826,-0.000406403531405,-0.000406812441803,-0.000407220905552,-0.000407624671334,-0.000408021498797,-0.000408412497089,-0.000408794869728,-0.000409164831251,-0.000409520048321,-0.000409863789342,-0.000410191634451,-0.000410505909813,-0.00041080745171,-0.000411101196692,-0.00041138664906,-0.000411663335373,-0.000411935905823,-0.000412206855115,-0.000412476131295,-0.000412737858144,-0.000413000930639,-0.000413265093223,-0.000413528486918,-0.000413788347307,-0.0004140451954,-0.000414298690865,-0.00041454800727,-0.000414785230511,-0.000415009526606,-0.000415224453213,-0.000415430508634,-0.000415622749848,-0.000415801960648,-0.000415973800521,-0.000416139954802,-0.000416302050248,-0.000416460119367,-0.00041661592864,-0.000416774442961,-0.000416934561864,-0.000417091913863,-0.000417245200343,-0.000417394456512,-0.000417537902382,-0.000417669058437,-0.000417782911714,-0.000417880862727,-0.000417964411737,-0.000418025412828,-0.000418061265843,-0.000418075656395,-0.000418074218932,-0.000418059233042,-0.000418029831498,-0.000417985099055,-0.000417932184246,-0.000417869009672,-0.000417793772876,-0.000417713141495,-0.000417633095896,-0.000417555129953,-0.000417473150355,-0.000417380405652,-0.000417278581663,-0.000417171766068,-0.000417057113012,-0.000416931201994,-0.000416798470905,-0.000416655338167,-0.000416496452376,-0.000416321508082,-0.000416131967158,-0.00041593207267,-0.000415722762738,-0.000415502457931,-0.000415262615545,-0.000415008878568,-0.00041474055501,-0.000414454092501,-0.000414152163601,-0.000413833082406,-0.000413496367846,-0.000413143633447,-0.000412771070579,-0.000412379301103,-0.000411972653568,-0.000411554496509,-0.000411123345589,-0.000410682907368,-0.000410233649987,-0.000409775784618,-0.000409312300285,-0.000408840153132,-0.000408355101812,-0.00040785981964,-0.000407356337485,-0.000406838970013,-0.000406304250429,-0.000405752287632,-0.00040518304092,-0.000404602016741,-0.000404002115166,-0.000403380104346,-0.000402740537801,-0.000402085870836,-0.00040141486871,-0.000400726794368,-0.000400030948703,-0.000399328798654,-0.000398615274701,-0.000397886111274,-0.000397137074879,-0.000396378909041,-0.000395609822322,-0.00039482556476,-0.000394026440504,-0.000393213401498,-0.000392378924308,-0.000391517774588,-0.000390634762866,-0.000389730959207,-0.000388814939528,-0.000387884094906,-0.000386935471483,-0.000385968968366,-0.000384988365325,-0.00038398916863,-0.000382975523126,-0.000381949965838,-0.000380915378491,-0.000379867575106,-0.000378807303128,-0.000377726225062,-0.000376628281744,-0.000375512349815,-0.000374376445613,-0.000373223484959,-0.000372052457211,-0.000370865243529,-0.000369659744135,-0.000368434514048,-0.000367185951779,-0.000365917071095,-0.000364627451132,-0.00036332034454,-0.000361997595253,-0.000360665171196,-0.0003593207456,-0.000357962748498,-0.000356584482049,-0.000355190038377,-0.00035377632679,-0.000352347026431,-0.00035090453647,-0.000349445997271,-0.000347967097271,-0.000346457154402,-0.000344916179689,-0.000343342547204,-0.0003417394652,-0.000340111240198,-0.000338458072895,-0.000336782704235,-0.000335076872684,-0.000333339037901,-0.000331571988459,-0.000329778994913,-0.000327968636778,-0.0003261433625,-0.000324299172995,-0.000322434533811,-0.000320547846456,-0.000318634429479,-0.000316698459019,-0.000314744738719,-0.000312773856184,-0.000310786714367,-0.000308777590186,-0.000306739603669,-0.000304674108742,-0.000302584100963,-0.000300475512208,-0.000298343684882,-0.000296191993919,-0.000294016978214,-0.000291819735159,-0.000289598027651,-0.000287352006372,-0.000285086895284,-0.000282811212287,-0.000280518327076,-0.000278204954237,-0.000275871891813,-0.000273521782236,-0.000271157429409,-0.000268775093812,-0.000266377177396,-0.000263960096401,-0.000261525058653,-0.000259067292807,-0.000256583823643,-0.000254073476533,-0.000251542780725,-0.00024898787815,-0.000246412177455,-0.000243812541596,-0.000241193003876,-0.000238551551129,-0.000235890114497,-0.000233204563654,-0.000230497737735,-0.000227773876092,-0.000225027757535,-0.000222261748461,-0.000219472406126,-0.000216654470237,-0.000213808339053,-0.000210931769423,-0.000208026051747,-0.000205094650786,-0.000202139555619,-0.000199157826763,-0.000196154112756,-0.000193128387428,-0.000190077658755,-0.000187009213064,-0.000183923972342,-0.000180827888577,-0.000177717896947,-0.000174593361606,-0.00017145267256,-0.000168298815731,-0.000165132574826,-0.000161945443243,-0.000158740686292,-0.000155516518607,-0.000152270390076,-0.000149000354456,-0.000145706580187,-0.000142389895652,-0.000139053122026,-0.000135694132004,-0.000132311826193,-0.000128907007846,-0.000125480428364,-0.000122040719239,-0.00011858513324,-0.000115115178023,-0.000111631500862,-0.00010813176964,-0.000104615965891,-0.000101084545373,-9.73889426452e-05,-9.33909326915e-05,-8.89742752753e-05,-8.4044927068e-05,-7.77980841748e-05,-7.28480944572e-05,-6.84059133021e-05,-6.43850560636e-05,-6.06668230616e-05,-5.71096439822e-05,-5.35655059556e-05,-5.01867247168e-05,-4.71115435584e-05,-4.44543740861e-05,-4.23113976504e-05,-4.1484155249e-05,-3.93497885156e-05,-3.6692265713e-05,-3.36066849311e-05,-3.02110440508e-05,-2.66482697352e-05,-2.30608936774e-05,-1.94454932132e-05,-1.58017113216e-05,-1.21311476794e-05,-8.42915802338e-06,-4.70094865063e-06,-9.56972301053e-07,2.80167307639e-06,6.57861983444e-06,1.03719231861e-05,1.41838184397e-05,1.80075154981e-05,2.18402481805e-05,2.56801355513e-05,2.95253753532e-05,3.33737939195e-05,3.72315808706e-05,4.1100344281e-05,4.49781821931e-05,4.88744639283e-05,5.27862211464e-05,5.67103620296e-05,6.06521665528e-05,6.46146019914e-05,6.85953793492e-05,7.2598459846e-05,7.66137011147e-05,8.06359367091e-05,8.46679584391e-05,8.87063712512e-05,9.27485725031e-05,9.67999260389e-05,0.000100860128542,0.000104926072033,0.000109000634906,0.000113084953194,0.00011718254302,0.000121306438809,0.000125455340344,0.000129625038946,0.000133813800696,0.000138020951318,0.000142242342834,0.000146480255468,0.00015073667713,0.000155004213852,0.000159283421647,0.000163570259239,0.000167860908089,0.000172158776773,0.000176463980513,0.000180781281128,0.000185108055998,0.000189448715459,0.000193798092972,0.000198158383151,0.000202528396977,0.000206907103597,0.000211294038126,0.000215693418729,0.000220108132697,0.000224542543466,0.000228993782558,0.000233457911915,0.000237932349147,0.000242416618303,0.000246907952555,0.000251411367149,0.000255928769018,0.000260456361035,0.000264989288973,0.000269518154848,0.000274041174948,0.000278561025639,0.000283080566869,0.000287599324373,0.000292123788806,0.000296649360002,0.000301170584016,0.000305686322738,0.000310195736839,0.000314699999645,0.000319205608366,0.000323706941473,0.000328203907148,0.000332698135788,0.000337190226162,0.000341677265942,0.000346159261957,0.000350637549073,0.000355112139843,0.000359583936121,0.000364045871467,0.000368497485063,0.000372936682217,0.000377358699046,0.000381761342231,0.000386146926248,0.000390519328392,0.000394874919153,0.000399214686173,0.000403538037032,0.000407851081707,0.000412160235447,0.000416464447561,0.000420769195756,0.000425073464692,0.00042937035341,0.000433657310383,0.000437931631523,0.000442199061976,0.000446459363482,0.000450706314591,0.000454933374163,0.000459137004732,0.000463318852092,0.000467477394888,0.000471615608798,0.000475733436809,0.000479832820572,0.000483908188908,0.000487954017811,0.000491969597162,0.000495958119475,0.000499919658999,0.000503857152126,0.000507765607014,0.000511639724264,0.000515477174309,0.000519280211467,0.000523048514554,0.000526785971109,0.000530499293292,0.000534188835808,0.000537857458325,0.00054149831155,0.000545113827175,0.000548710325958,0.000552289356488,0.000555852274528,0.000559400586747,0.000562930832235,0.000566440359441,0.000569923124631,0.000573381974344,0.000576818811742,0.000580234708135,0.000583626866318,0.00058699545042,0.000590338111499,0.00059365181189,0.000596938526091,0.000600196799339,0.000603429470877,0.000606633117076,0.000609798361998,0.000612922096237,0.00061600513502,0.000619046901049,0.000622044984266,0.000625003777941,0.000627925979035,0.00063081031725,0.000633656228552,0.000636458985259,0.000639226703765,0.000641962632693,0.00064466718889,0.000647342306731,0.000649984549653,0.000652590144644,0.000655156427137,0.000657683269351,0.000660168761851,0.000662621149541,0.000665041399746,0.00066742603818,0.000669775033543,0.000672081738047,0.000674348487338,0.000676572408397,0.00067875473229,0.000680899593846,0.000683008135822,0.000685078031369,0.000687100829034,0.000689077671991,0.000691005437723,0.00069289192147,0.000694737326369,0.00069654022624,0.000698305700783,0.000700026119024,0.000701693837593,0.000703308291747,0.000704873377681,0.000706393551475,0.00070786963943,0.000709300216563,0.000710678764212,0.000712013056828,0.000713295900424,0.000714528139266,0.000715723210119,0.000716879199683,0.000717993414184,0.000719061820102,0.000720083718383,0.000721058558641,0.000721994881776,0.000722891624794,0.000723745792715,0.000724567166134,0.000725350629942,0.000726092325651,0.000726800863582,0.000727476706064,0.000728118423163,0.000728719475053,0.000729279375013,0.00072979293541,0.000730265622098,0.000730692415827,0.000731068840818,0.00073139805671,0.000731674760943,0.000731898022395,0.00073207018228,0.000732199213513,0.000732290552385,0.000732345156342,0.000732357337101,0.000732323138126,0.000732247958552,0.000732135985788,0.000731986904945,0.000731800311093,0.0007315756789,0.000731311728205,0.000731004553645,0.000730650857966,0.000730252594194,0.000729816803532,0.000729342560987,0.000728830200182,0.00072827431389,0.00072767588706,0.00072703403127,0.000726346455339,0.000725611622183,0.000724832379824,0.000724011814823,0.000723145833637,0.00072223408168,0.000721273131542,0.000720266116263,0.000719216632657,0.000718128109476,0.000717005083938,0.000715848282026,0.000714658821529,0.000713433312885,0.000712165413344,0.000710852746255,0.000709499955484,0.000708112185853,0.000706684183477,0.000705216586974,0.000703707703166,0.000702155082311,0.000700555447002,0.000698910566213,0.00069722365302,0.000695502684191,0.000693748610451,0.000691954481157,0.000690119529732,0.000688241812979,0.000686317502364,0.000684345335716,0.000682331154891,0.000680271460934,0.000678167351108,0.000676012912969,0.000673800158226,0.000671529726889,0.000669199563252,0.00066680725229,0.000664351441839,0.000661834440474,0.000659251635999,0.000656600714856,0.000653886859454,0.000651108692405,0.00064827281366,0.000645384083584,0.00064244611462,0.000639459774046,0.000636427358892,0.000633354187658,0.000630240128934,0.000627090600684,0.000623904450902,0.000620686702686,0.00061743485992,0.000614143111843,0.000610813932122,0.00060744930646,0.000604056804653,0.000600632301334,0.000597180517456,0.000593703066665,0.000590198341782,0.000586663244428,0.000583095281172,0.00057950061035,0.000575882203108,0.000572242245936,0.000568577590246,0.000564886681392,0.000561165226854,0.000557407602429,0.000553615455554,0.000549790907131,0.000545943596459,0.000542075017488,0.000538180964806,0.000534261539919,0.000530313729449,0.000526335094049,0.000522330260952,0.000518311651582,0.000514278113531,0.000510230289463,0.000506161590822,0.000502065416015,0.000497943849,0.00049379605669,0.000489619137531,0.000485418490676,0.000481200179014,0.000476955383646,0.000472683251371,0.00046838018763,0.00046404625128,0.00045968760709,0.00045530650382,0.000450899818895,0.000446473362369,0.000442026240494,0.000437550217145,0.000433043106834,0.000428508903491,0.000423947070445,0.000419368640097,0.000414769184622,0.00041014829389,0.000405506132836,0.000400846945998,0.000396170983454,0.000391485945233,0.000386793610973,0.000382091085559,0.000377380020531,0.000372653423233,0.000367909499752,0.000363147662562,0.000358369422967,0.000353573581776,0.000348752065119,0.000343904778123,0.000339032772862,0.000334139249956,0.000329227231918,0.000324297148243,0.000319357744519,0.000314410910392,0.000309457451906,0.000304495840572,0.000299532897086,0.000294566763029,0.000289595199682,0.000284617067555,0.000279635174644,0.000274648608162,0.000269650602281,0.000264639328712,0.000259615051524,0.000254581955921,0.000249540997809,0.000244487801756,0.000239425796264,0.000234357624947,0.00022928126851,0.000224197043351,0.00021911233399,0.000214031758791,0.000208957718554,0.000203885543495,0.000198815618565,0.000193750829702,0.000188693053728,0.00018363941616,0.00017859030212,0.000173547510344,0.000168507776452,0.000163466607137,0.000158423782287,0.000153377478596,0.000148328107341,0.000143278187643,0.000138230042333,0.000133181788352,0.00012814267727,0.000123110635381,0.000118086204312,0.000113071346067,0.000108067255169,0.000103071271448,9.80861518761e-05,9.31126044037e-05,8.81465649489e-05,8.31924332806e-05,7.82481403293e-05,7.33121073447e-05,6.83853589082e-05,6.34665388909e-05,5.85549223714e-05,5.36568284038e-05,4.877698365e-05,4.39116357471e-05,3.90639309493e-05,3.42389721137e-05,2.94332080123e-05,2.46481249688e-05,1.98824967006e-05,1.51368068075e-05,1.04104432383e-05,5.70357360777e-06,1.00918349126e-06,-3.66139168094e-06,-8.3106004551e-06,-1.29435037888e-05,-1.75627355488e-05,-2.21770959723e-05,-2.67815873398e-05,-3.13752014867e-05,-3.59527513419e-05,-4.05115202754e-05,-4.50499949143e-05,-4.95755631783e-05,-5.40942961898e-05,-5.86016812617e-05,-6.30937679182e-05,-6.75651808902e-05,-7.20087250648e-05,-7.64258166852e-05,-8.08206328798e-05,-8.51954987416e-05,-8.9548795661e-05,-9.38840662588e-05,-9.81902104906e-05,-0.000102466061343,-0.000106714696031,-0.000110937346807,-0.000115142645355,-0.000119331676678,-0.000123502277462,-0.000127652428273,-0.000131786747833,-0.000135904186071,-0.000140002673166,-0.000144083597397,-0.000148149917806,-0.00015219475485,-0.000156209228516,-0.000160190833609,-0.000164141210861,-0.000168059813788,-0.000171943154245,-0.000175787773726,-0.000179600590149,-0.000183383623399,-0.00018713503049,-0.000190853890882,-0.000194550113406,-0.000198230917755,-0.000201890402189,-0.000205531883154,-0.000209158403776,-0.000212763238807,-0.000216345457699,-0.000219903423932,-0.000223436007749,-0.000226947715594,-0.000230437032079,-0.000233894695746,-0.000237319875856,-0.000240717176234,-0.000244074515298,-0.000247396600551,-0.000250686241342,-0.000253941567826,-0.00025716066338,-0.000260338472849,-0.000263476221528,-0.000266578789884,-0.000269649985035,-0.000272687835912,-0.000275697052466,-0.000278686034787,-0.000281653818439,-0.000284600122956,-0.000287528873982,-0.000290441357463,-0.000293334717144,-0.000296200844238,-0.000299037991379,-0.000301844657458,-0.000304627752198,-0.000307382362955,-0.000310103122266,-0.000312787460752,-0.000315439621114,-0.000318061172251,-0.000320650846815,-0.000323217001978,-0.000325762614303,-0.000328288219629,-0.000330785879065,-0.000333257540244,-0.000335700335753,-0.000338117500339,-0.000340506006806,-0.000342863673319,-0.000345189274492,-0.000347481366402,-0.000349742850855,-0.000351969733352,-0.000354166993023,-0.000356329550364,-0.000358456630007,-0.00036055637834,-0.00036262480788,-0.000364662802003,-0.000366674301978,-0.000368656998211,-0.000370609138614,-0.000372531060859,-0.000374424782082,-0.000376288486058,-0.000378134452233,-0.00037995156063,-0.000381737606411,-0.000383500112293,-0.000385241036345,-0.000386959824544,-0.0003886544291,-0.000390323279401,-0.000391963615222,-0.000393583900202,-0.000395175583667,-0.00039674034838,-0.000398281200384,-0.00039979321478,-0.000401270571959,-0.000402715761516,-0.000404126073126,-0.000405509156185,-0.000406864620794,-0.000408184842344,-0.000409467001628,-0.000410720021611,-0.000411944367267,-0.000413141749475,-0.000414312526288,-0.000415457686929,-0.000416572587202,-0.000417659336921,-0.000418714543036,-0.000419748283803,-0.00042077018015,-0.000421778602037,-0.000422774063956,-0.000423668127465,-0.000424374538926,-0.000424899017522,-0.000425243307074,-0.000425412472689)
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(242)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Rattus_norvegicus-male-liver-H3K27Ac-ERR572251.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) : 242',bty='n')
dev.off()