# R script for Peak Model
#  -- generated by MACS
p <- c(0.042842528523279605,0.04994676107089746,0.057026527901605735,0.0642286233168619,0.07115547941688533,0.0711830033484086,0.07150105766823307,0.07125945871375101,0.0709842193985183,0.07061417543026098,0.07054077827953226,0.07066922329330752,0.07067228150792122,0.07040621683652959,0.07046432291418983,0.07031752861273238,0.07006063858518184,0.07021966574509408,0.07043679898266655,0.07041539148037068,0.07056830221105552,0.07058053506951031,0.07071203829789928,0.07107290762231551,0.07110043155383879,0.0713817872982989,0.07163867732584943,0.07168149233044119,0.07160809517971246,0.0718619269926493,0.07199343022103827,0.07173348197887404,0.07155916374589331,0.07161421160893985,0.07184969413419452,0.07182217020267125,0.07161115339432617,0.0715683383897344,0.0713817872982989,0.07134203050832083,0.07119523620686338,0.07141236944443587,0.0716723176866001,0.07159586232125768,0.07158974589203028,0.07169066697428228,0.07178852984192058,0.07171207447657815,0.07209740951790397,0.07213410809326833,0.07251944313459413,0.07257449099764068,0.072369590618523,0.07223197096090662,0.07204236165485742,0.07185275234880821,0.07172430733503295,0.07202095415256154,0.07183440306112604,0.07203930344024373,0.07194755700183282,0.07201789593794784,0.07232983382854492,0.07243687134002431,0.07260201492916395,0.07276410030368989,0.07298123354126236,0.07299652461433084,0.07321977428113072,0.07309744569658284,0.07310662034042394,0.0732503564272677,0.07281608995212273,0.0729414767512843,0.072742692801394,0.07277327494753098,0.07277939137675837,0.07277021673291728,0.07264788814836941,0.07276104208907619,0.07277939137675837,0.07288642888823776,0.07335739393874709,0.07321365785190333,0.07355617788863737,0.07369685576086743,0.07410665651910282,0.07435437190281226,0.07457150514038474,0.07452257370656559,0.07454398120886147,0.07461737835959019,0.07469689193954632,0.07495684018171055,0.07514950770237346,0.07536969915455963,0.07520455556542,0.07526877807230763,0.07507916876625842,0.07543392166144726,0.0755929488213595,0.07558683239213211,0.07545532916374315,0.0754950859537212,0.07546756202219793,0.07551955167063078,0.07570916097667998,0.07555625024599513,0.07586207170736482,0.07602415708189077,0.07597216743345792,0.07576115062511284,0.0758926538535018,0.07589571206811549,0.07578561634202241,0.07561129810904169,0.0755042605975623,0.07573362669358956,0.07588347920966071,0.07610978709107427,0.07644313248396724,0.07674589573072323,0.07701807683134225,0.07720768613739146,0.0774615179503283,0.0776572436856049,0.07772758262171993,0.07767559297328708,0.0776541854709912,0.07719239506432297,0.07695997075368201,0.07699666932904636,0.07677647787686019,0.07704865897747921,0.07699666932904636,0.07692633039293134,0.07714346363050383,0.07731166543425715,0.0775624390325803,0.07789578442547325,0.07785296942088149,0.07785296942088149,0.07819548945761555,0.07839733162211954,0.07870621129810293,0.07872150237117141,0.07828723589602646,0.07829641053986754,0.0781343251653416,0.07827194482295796,0.07840344805134693,0.07879795773651384,0.07865727986428378,0.07835757483214148,0.07836980769059627,0.07800282193695264,0.07807316087306768,0.07820772231607033,0.07837592411982366,0.07815879088225118,0.07830252696909494,0.0777520483386295,0.07758690474948987,0.07717710399125448,0.07694773789522721,0.07747069259416939,0.07776428119708428,0.0776603019002186,0.07734224758039411,0.07755632260335289,0.07742481937496393,0.07753491510105702,0.07767559297328708,0.07798141443465677,0.07809151016074985,0.07802728765386222,0.07836063304675518,0.07847072877284826,0.07838509876366476,0.07811597587765942,0.07825053732066209,0.078241362676821,0.0780486951561581,0.07797529800542938,0.07785296942088149,0.07776428119708428,0.07740035365805435,0.07728108328812018,0.07750739116953374,0.0774554015211009,0.07753797331567072,0.07782238727474453,0.07811597587765942,0.07837286590520996,0.07838509876366476,0.07825053732066209,0.078140441594569,0.07822301338913881,0.07801199658079373,0.07805786979999918,0.07797223979081568,0.07758384653487617,0.07758078832026247,0.077464576164942,0.07777039762631167,0.07818325659916076,0.078140441594569,0.07795083228851979,0.07810680123381834,0.07809151016074985,0.07784073656242671,0.07797529800542938,0.07792025014238282,0.0780425787269307,0.07820160588684294,0.07798447264927046,0.0782321880329799,0.07807010265845397,0.078241362676821,0.07851660199205372,0.0787306770150125,0.07876125916114947,0.0787398516588536,0.07875514273192208,0.07855635878203178,0.07839733162211954,0.07807316087306768,0.07810680123381834,0.0782444208914347,0.07780709620167604,0.07785602763549519,0.07802117122463482,0.07791413371315543,0.07802728765386222,0.07771534976326513,0.07783462013319932,0.07790801728392804,0.07805786979999918,0.0777520483386295,0.07817408195531966,0.07815573266763749,0.07788049335240477,0.0780456369415444,0.07771534976326513,0.0777612229824706,0.07807621908768136,0.0778590858501089,0.07810680123381834,0.07799670550772525,0.07797835622004307,0.07795083228851979,0.07815267445302379,0.07810068480459094,0.07800893836618003,0.07817714016993337,0.07782238727474453,0.07820772231607033,0.07807316087306768,0.0783331091152319,0.07829335232525385,0.07821383874529773,0.07831781804216342,0.07831475982754972,0.0783453419736867,0.07820160588684294,0.07836063304675518,0.07861140664507832,0.07865116343505638,0.07838815697827844,0.07813738337995531,0.07825665374988948,0.07818019838454707,0.07829641053986754,0.07835145840291409,0.07874902630269469,0.07901509097408631,0.0790364984763822,0.07900897454485892,0.07921387492397661,0.07924445707011357,0.07931479600622861,0.07954722031686957,0.07972459676446399,0.07991114785589949,0.07996007928971864,0.07968483997448593,0.07991114785589949,0.08028119182415681,0.08064511936318675,0.08117113227674261,0.08158093303497799,0.08155952553268211,0.08152282695731776,0.08162986446879714,0.08162374803956975,0.08198767557859968,0.0818714634232792,0.08214364452389822,0.08251980492138293,0.08340362894474133,0.08400915543825331,0.08512846198686637,0.08648630927534778,0.08835182018970289,0.0896179210397734,0.09165775018710921,0.09339787430230274,0.09477101266385264,0.09597594922164922,0.09671603715816386,0.09769160761993316,0.0984378119856752,0.09904639669380089,0.09894853382616257,0.0997130874795868,0.09972532033804159,0.09989658035640861,0.09962439925578959,0.09978342641570183,0.0997161456942005,0.09983541606413468,0.09972532033804159,0.09983235784952098,0.10008924787707152,0.09986599821027164,0.09947454673971844,0.09947454673971844,0.09989046392718122,0.10018405253009612,0.10045623363071514,0.10045929184532884,0.10082627759897246,0.10095166439813404,0.10066113400983283,0.10055103828373975,0.10103423619270385,0.10090273296431489,0.10120855442568458,0.10110763334343258,0.10105870190961343,0.1009853047588847,0.10058162042987671,0.1005999697175589,0.10084768510126835,0.10082016116974507,0.1004042439822823,0.1003981275530549,0.10037060362153163,0.1005999697175589,0.10085685974510944,0.1005999697175589,0.10065501758060544,0.10090884939354228,0.10080487009667659,0.10065195936599174,0.10074676401901635,0.10074370580440264,0.10008313144784413,0.09959687532426632,0.09933692708210208,0.09963051568501699,0.09946231388126366,0.09884455452929689,0.0986274212917244,0.09867329451092986,0.0980585933735768,0.09781393620448103,0.09794543943287,0.09806776801741787,0.09788733335520976,0.0976549090445688,0.0974561250946785,0.09752646403079353,0.09787815871136867,0.09801883658359872,0.09857543164329156,0.09903110562073239,0.09907392062532415,0.09915955063450767,0.09926352993137336,0.09935221815517056,0.10003725822863867,0.10026968253927963,0.09993327893177298,0.1001993436031646,0.10024215860775636,0.1001075971647537,0.10054492185451235,0.10015652859857285,0.10005560751632085,0.10043482612841927,0.10046846648916993,0.10041341862612338,0.1005969115029452,0.10055103828373975,0.10065195936599174,0.10092108225199707,0.10090273296431489,0.1014746190970762,0.10220553238974976,0.1019731080791088,0.10222082346281824,0.1022575220381826,0.10283552460017131,0.10309241462772185,0.10329119857761215,0.10340435251831893,0.1035327975320942,0.10352668110286681,0.10333095536759021,0.10394259829032959,0.1038294443496228,0.10445026191620327,0.10439827226777042,0.10443191262852108,0.10419643010326643,0.10457564871536484,0.10455118299845527,0.10474996694834557,0.10481724766984689,0.10473773408989077,0.1050129734051235,0.1046154055053429,0.10464598765147987,0.1046184637199566,0.10479584016755102,0.10447778584772655,0.10440744691161151,0.10396400579262546,0.10383861899346389,0.1035327975320942,0.10308935641310815,0.10303736676467531,0.10296396961394659,0.10261533314798514,0.10236455954966199,0.10224834739434151,0.10236455954966199,0.10267649744025907,0.10228198775509217,0.10205567987367861,0.10218106667284019,0.10197922450833619,0.10179267341690068,0.10180796448996916,0.10211378595133885,0.10229116239893327,0.10199757379601837,0.10165505375928433,0.10185689592378831,0.10193946771835813,0.10172233448078564,0.10161835518391996,0.10151131767244057,0.10193335128913074,0.10169481054926238,0.10136452337098312,0.1012697187179585,0.10119020513800239,0.10134005765407354,0.1012788933617996,0.10133699943945984,0.10125136943027634,0.10126360228873112,0.10094860618352033,0.1011932633526161,0.10124219478643524,0.10175597484153631,0.10214130988286212,0.1022575220381826,0.10287833960476307,0.10339517787447784,0.10405269401642267,0.10457259050075114,0.10467656979761683,0.10502214804896458,0.10512001091660289,0.10546253095333694,0.10581422563391207,0.10632188925978577,0.10630048175748988,0.10674698109108963,0.10728522686310028,0.1078601712104753,0.10847181413321466,0.10878681023842544,0.10950243245803051,0.10995810643547135,0.1104046057690711,0.11085416331728454,0.11184196663750863,0.11217837024501529,0.11258205457402327,0.1131478242775572,0.11387567935561706,0.1149001812512055,0.11575648134304063,0.1162824942565965,0.11703787326617963,0.11786664942649148,0.11816941267324747,0.11915109956424418,0.11979026641850682,0.12050588863811189,0.1215670891090647,0.12203193773034664,0.12250596099546965,0.12357633611026356,0.1243225404760056,0.12458248871816983,0.12509932698788462,0.1250228716225422,0.12547242917075563,0.12586388064130882,0.1259005792166732,0.12644188320329755,0.12671712251853026,0.12659479393398237,0.12655503714400432,0.12682416003000965,0.12662843429473306,0.12635625319411403,0.12616970210267853,0.12545102166845976,0.12483326231649298,0.12377512006015386,0.12324604893198429,0.12212980059798494,0.12102272690782667,0.11975662605775615,0.11895843204358127,0.11819693660477075,0.11731617079602605,0.11614487459898014,0.11525799236100805,0.11463105836520018,0.11338330680281186,0.11260957850554655,0.1119642952220565,0.11125173121706514,0.11057280757282442,0.1099183496454933,0.10884491631608569,0.10835866019250788,0.10771643512363153,0.10674392287647592,0.10624543389444334,0.10568578062013681,0.10541359951951779,0.10498239125898652,0.10407104330410485,0.10365206790202838,0.10355114681977638,0.10296702782856028,0.10237679240811678,0.10223305632127302,0.10183548842149244,0.10143792052171184,0.10061220257601368,0.10007701501861672,0.10013817931089067,0.09993939536100037,0.09915649241989397,0.09911673562991591,0.09901581454766391,0.0986365959355655,0.0984347537710615,0.098147281597374,0.09803718587128091,0.09812281588046443,0.09807388444664528,0.09788733335520976,0.0980341276566672,0.09799131265207546,0.09800048729591655,0.09783228549216322,0.09798825443746176,0.09830019232805884,0.0987375170178175,0.09882008881238731,0.09859683914558744,0.09875892452011337,0.09880785595393252,0.0992207149267816,0.0992115402829405,0.09939197494514863,0.09923294778523639,0.09865188700863398,0.09841334626876562,0.09829407589883145,0.09838582233724236,0.09828795946960406,0.09859072271636005,0.09836747304956017,0.09836747304956017,0.09832159983035473,0.0982359698211712,0.09866717808170247,0.09833689090342321,0.09804024408589461,0.09761209403997705,0.09685671503039392,0.09603099708469576,0.09508600876906342,0.09387801399665315,0.09239172169439647,0.09084426509986585,0.08927234278842565,0.08822337517592761,0.08757809189243758,0.08684412038515033,0.08621412817472877,0.08526608164448274,0.08459939085869682,0.0845107026348996,0.08465443872174336,0.08505200662152396,0.08544651630669085,0.08543122523362237,0.0851101126991842,0.08516210234761704,0.08496026018311305,0.0850061334023185,0.08498472590002262,0.0850122498315459,0.085293605576006,0.08522020842527728,0.08474006873092688,0.08492356160774868,0.08492967803697608,0.08501530804615959,0.0851070544845705,0.08545569095053195,0.0852997220052334,0.08537617737057582,0.08497860947079523,0.08482569874011038,0.08503059911922807,0.08455657585410506,0.08433944261653258,0.08403362115516289,0.08415289152509707,0.08405502865745877,0.08430580225578191,0.08384707006372738,0.08387153578063695,0.08400303900902592,0.08414677509586968,0.084415897981875,0.08437308297728324,0.084314976899623,0.08408561080359574,0.08396939864827525,0.08406726151591355,0.08427522010964494,0.08435473368960106,0.08469419551172142,0.08473701051631317,0.08463914764867488,0.08498778411463632,0.0851070544845705,0.08514681127454855,0.0852049173522088,0.08523549949834576,0.08554437917432915,0.08582573491878927,0.08561471811044417,0.08551379702819219,0.0858899574256769,0.08564224204196745,0.08573398848037836,0.08546180737975934,0.08537311915596213,0.08528137271755122,0.08503671554845547,0.0848104076670419,0.08477065087706384,0.08488074660315693,0.08479205837935971,0.08479817480858712,0.0849021541054528,0.0853914684436443,0.08550768059896478,0.08555049560355654,0.08577068705574271,0.0858899574256769,0.08591748135720018,0.0860887413755672,0.0863762135492547,0.08633645675927665,0.0863762135492547,0.08670650072753397,0.08698785647199408,0.08707348648117759,0.08697868182815299,0.08719275685111177,0.08729367793336376,0.08744047223482122,0.08714076720267892,0.08746799616634449,0.0876484308285526,0.08733037650872813,0.087351784011024,0.087452705093276,0.08763619797009782,0.087452705093276,0.08748022902479928,0.08741600651791165,0.0872569793579994,0.08714688363190631,0.08664839464987373,0.08641291212461906,0.0861866042432055,0.08600616958099738,0.08610403244863568,0.08633339854466295,0.08636092247618622,0.08590830671335908,0.08585325885031253,0.08572787205115097,0.08557801953507982,0.08570646454885508,0.0856024852519894,0.08566059132964964,0.08523549949834576,0.08476147623322275,0.08457798335640093,0.08449235334721743,0.08463608943406117,0.08455045942487767,0.08497860947079523,0.0846024490733105,0.08443424726955719,0.08399998079441223,0.08348620073931115,0.08328741678942085,0.08308251641030316,0.08315591356103189,0.08277363673431978,0.08233019561533372,0.08194791878862162,0.08170631983413956,0.08112831727215085,0.08060842078782239,0.08040352040870469,0.08005182572812955,0.07952581281457369,0.07906708062251916,0.07888052953108365,0.07894781025258497,0.07847684520207567,0.07870621129810293,0.07877043380499056,0.07884994738494668,0.07899674168640412,0.07905484776406436,0.0788254816680371,0.0787276188003988,0.0788285398826508,0.07880407416574123,0.07877043380499056,0.07866033807889747,0.0786389305766016,0.07875208451730838,0.07868174558119335,0.07855635878203178,0.07894781025258497,0.07907931348097394,0.07881630702419601,0.07870315308348923,0.07880713238035492,0.0786328141473742,0.0784309719828702,0.07869092022503445,0.07861752307430571,0.07841873912441542,0.07827500303757166,0.07809151016074985,0.07815267445302379,0.07815573266763749,0.07791107549854173,0.0777489901240158,0.07771840797787884,0.07742176116035024,0.07736365508269,0.07742787758957763,0.07741258651650915,0.07764195261253641,0.0774554015211009,0.0771648711327997,0.07740035365805435,0.07733918936578042,0.07755632260335289,0.07740952830189544,0.07751044938414745,0.07777957227015277,0.07786214406472258,0.0779447158592924,0.07802117122463482,0.0783300509006182,0.07828723589602646,0.07851354377744002,0.07837592411982366,0.07859917378662354,0.07857776628432765,0.07836369126136887,0.07835451661752778,0.07770311690481035,0.07758078832026247,0.07756855546180769,0.07734836400962151,0.07740952830189544,0.07760219582255835,0.0775502061741255,0.07770617511942404,0.07779180512860756,0.07773981548017471,0.07782238727474453,0.07777957227015277,0.07777957227015277,0.07797529800542938,0.0780486951561581,0.07782850370397192,0.07790190085470064,0.07789272621085956,0.07800282193695264,0.07802117122463482,0.0780486951561581,0.07815267445302379,0.07801505479540743,0.07817408195531966,0.07801505479540743,0.07796918157620197,0.0779355412154513,0.07781015441628975,0.07773675726556101,0.07788049335240477,0.07802117122463482,0.07815267445302379,0.07815573266763749,0.07818325659916076,0.07823830446220731,0.07847072877284826,0.07851966020666741,0.07841262269518802,0.07858694092816874,0.07851660199205372,0.07850436913359893,0.07866645450812487,0.0789233445356754,0.0784309719828702,0.07840956448057433,0.07825971196450318,0.07810068480459094,0.07825359553527579,0.07807927730229507,0.07777651405553908,0.07800588015156634,0.07780709620167604,0.07777345584092538,0.07817714016993337,0.07836980769059627,0.0785288348505085,0.07859611557200984,0.07883159809726449,0.07906708062251916,0.07916188527554376,0.07928115564547794,0.07925057349934098,0.07914965241708898,0.07929338850393272,0.07927809743086424,0.07918635099245333,0.07907319705174655,0.07891416989183431,0.07871844415655771,0.0788377145264919,0.0785410677089633,0.07870009486887553,0.07884077274110558,0.07870926951271662,0.07847990341668935,0.07873373522962619,0.07883159809726449,0.07877655023421795,0.07894781025258497,0.07899368347179044,0.0790273238325411,0.07874902630269469,0.07870315308348923,0.07870315308348923,0.07888052953108365,0.07846155412900717,0.07877960844883165,0.07867257093735226,0.07849213627514415,0.07869703665426184,0.07881936523880971,0.07910377919788351,0.07901203275947262,0.07907013883713285,0.07890193703337953,0.0791251867001794,0.07855635878203178,0.07851966020666741,0.07831170161293603,0.07790801728392804,0.07770005869019665,0.07739117901421326,0.07721380256661885,0.07689880646140806,0.0766724985799945,0.07663885821924384,0.07671225536997256,0.07670613894074517,0.07672143001381365,0.07673366287226843,0.07657769392696989,0.07650735499085487,0.07622599924639475,0.07596910921884421,0.07571527740590737,0.07552260988524447,0.07535746629610485,0.07523207949694327,0.07498130589862012,0.07468160086647783,0.07484062802639006,0.07463572764727237,0.07462043657420389,0.07466630979340935,0.07466019336418195,0.07465407693495456,0.07440636155124511,0.07419228652828633,0.0741158311629439,0.07397821150532755,0.07367239004395786,0.07366321540011676,0.07351947931327302,0.07327482214417727,0.0733359864364512,0.07306074712121849,0.0729537096097391,0.07289560353207886,0.07278550780598576,0.07281303173750904,0.07295676782435279,0.07292618567821582,0.07296900068280758,0.07281914816673643,0.0726448299337557,0.07267847029450637,0.07298429175587606,0.07290171996130625,0.07307603819428697,0.0729506513951254,0.07252250134920783,0.07237264883313668,0.0721708066686327,0.07247968634461607,0.07232983382854492,0.07198425557719718,0.07182828663189864,0.07168455054505489,0.07125334228452362,0.07111572262690727,0.07113101369997575,0.07110043155383879,0.07102397618849636,0.07072732937096776,0.07087718188703891,0.07096587011083612,0.07081601759476497,0.07103009261772375,0.07119829442147708,0.07123499299684144,0.07138484551291259,0.07151940695591526,0.07152246517052895,0.07161115339432617,0.07160809517971246,0.0716723176866001,0.07162338625278095,0.07137261265445781,0.07115547941688533,0.07110348976845247,0.07114936298765794,0.07073956222942256,0.07092611332085806,0.07088941474549369,0.07075791151710473,0.07062335007410207,0.07051937077723637,0.07058359328412402,0.07055912756721444,0.07058359328412402,0.07041844969498438,0.07060805900103359,0.07065393222023904,0.07070286365405819,0.0707946100924691,0.07086494902858412,0.07084965795551564,0.07101174333004158,0.07103009261772375,0.07095669546699503,0.07094752082315393,0.07110960619767988,0.07092611332085806,0.0706967472248308,0.07073956222942256,0.07082213402399237,0.07118911977763599,0.07074262044403624,0.07092611332085806,0.07082519223860606,0.07089858938933478,0.07081601759476497,0.07112489727074836,0.07154693088743853,0.07140931122982216,0.07134508872293453,0.0711799451337949,0.07129615728911538,0.07144600980518653,0.07174571483732882,0.07168149233044119,0.07162338625278095,0.07133285586447975,0.07105150012001964,0.071290040859888,0.07131450657679757,0.07121052727993187,0.0714796501659372,0.07132368122063866,0.07123805121145514,0.07132062300602496,0.07114630477304423,0.07104844190540593,0.07091388046240327,0.07023495681816257,0.07009427894593251,0.07013097752129688,0.06982821427454088,0.06969671104615191,0.06957744067621774,0.06965083782694646,0.07007898787286403,0.07002394000981749,0.07002088179520378,0.07039398397807481,0.07024413146200366,0.07007287144363664,0.07006369679979554,0.07015238502359275,0.07032670325657348,0.06998112500522573,0.06996277571754354,0.06996889214677093,0.06993219357140658,0.06988632035220112,0.06978845748456282,0.06964777961233276,0.06988326213758743,0.06984656356222306,0.06955297495930816,0.06977316641149434,0.06938783137016853,0.0695071017401027,0.06951321816933011,0.06949792709626161,0.06956520781776294,0.06956826603237665,0.06969976926076561,0.06948569423780683,0.06973035140690258,0.0696080228223547,0.0694092388724644,0.06918598920566453,0.06919516384950562,0.06897803061193315,0.06885876024199897,0.06891380810504551,0.06836332947458007,0.06806056622782408,0.06784037477563791,0.06742445758817513,0.06766605654265719,0.06774251190799961,0.06780061798565985,0.06781590905872834,0.06765688189881609,0.06749173830967646,0.06749785473890385,0.06787707335100227,0.06767523118649828,0.06792294657020773,0.06758654296270107,0.06758960117731476,0.0671675675606246,0.06702383147378084,0.06752232045581343,0.06762935796729282,0.06759571760654216,0.06757431010424628,0.06748868009506277,0.06719814970676156,0.06751620402658604,0.0672562557844218,0.0671553347021698,0.06732047829130944,0.06712475255603284,0.06704829719069041,0.06694125967921102,0.06694125967921102,0.06699019111303017,0.06703912254684932,0.06667825322243309,0.06662626357400024,0.06671801001241115,0.06649476034561128,0.06604214458278414,0.06576384705293772,0.06577607991139252,0.06516443698865314,0.06506351590640114,0.06477910194732733,0.06492589624878478,0.06477298551809994,0.0649014305318752,0.06488919767342041,0.06495647839492175,0.0651063309109929,0.0650054098287409,0.06512162198406138,0.0652041937786312,0.06526535807090514,0.06487084838573824,0.06495953660953545,0.06474546158657667,0.06486167374189715,0.06498706054105871,0.06476075265964515,0.06477298551809994,0.06505128304794636,0.06458949264127813,0.06459560907050552,0.06457114335359594,0.06458031799743703,0.06459255085589181,0.06430202046759062,0.06410017830308662,0.06414910973690577,0.06419192474149753,0.06376071648096626,0.06414299330767838,0.06404513044004008,0.06434789368679607,0.06405736329849486,0.06391362721165111,0.06398396614776614,0.06410323651770032,0.06387387042167306,0.06367508647178276,0.06362615503796361,0.06308179283672556,0.0630389778321338,0.06279737887765176,0.06311849141208993,0.06302062854445162,0.06288606710144896,0.062653642790808,0.06275456387306,0.06271480708308194,0.06287077602838048,0.06316742284590908,0.06316742284590908,0.06303286140290641,0.0628493685260846,0.06302062854445162,0.0630389778321338,0.06277902958996957,0.06291664924758593,0.0629411149644955,0.0631368406997721,0.06306650176365708,0.06317659748975016,0.06318271391897756,0.06339678894193634,0.0633478575081172,0.06351300109725683,0.06377600755403476,0.06379435684171693,0.06390139435319632,0.06342737108807331,0.06345795323421027,0.06336314858118568,0.06340902180039112,0.06320412142127343,0.06323164535279671,0.06307873462211186,0.06292582389142702,0.0629472313937229,0.06285854316992569,0.06308485105133926,0.05683386038094283,0.05054922934979574,0.04427683117710344,0.03790657013677284,0.0)
m <- c(0.0377335097989304,0.04388044992047128,0.05038284620058581,0.056296901252716365,0.062177249255327006,0.06213128509689076,0.061950492740374855,0.061950492740374855,0.06169309345313186,0.06172680050265178,0.061702286284819115,0.061993392621582016,0.061518429651074125,0.06223547052267959,0.06277784759222732,0.06274720481993648,0.06283606885957989,0.06304750398838664,0.06301073266163763,0.06319458929538263,0.06355004545395627,0.06339683159250212,0.06370019503818135,0.06325281056273521,0.06306895392899022,0.06318846074092446,0.06309653242405197,0.06323442489936071,0.06332022466177503,0.06317620363200813,0.06320991068152805,0.0633263532162332,0.06340296014696029,0.06361439527576702,0.06369713076095226,0.06388405167192635,0.06398517282048609,0.0638932445036136,0.06382583040457376,0.0636940664837232,0.06350101701829095,0.06341215297864754,0.06322829634490254,0.06306588965176113,0.0630536325428448,0.06291880434476514,0.06285445452295439,0.06262156945354407,0.06280542608728906,0.0630536325428448,0.06332328893900412,0.06366648798866144,0.06373390208770127,0.0637829305233666,0.06393920866204984,0.06392082299867534,0.06408935824627492,0.06445400723653581,0.06424870066218724,0.06419967222652191,0.06433756470183066,0.06434062897905975,0.06450916422665931,0.0647481778505278,0.06462560676136447,0.06442336446424499,0.06430079337508166,0.06418128656314742,0.0645489998306374,0.06470221369209156,0.06466544236534257,0.06445094295930674,0.06447852145436848,0.06427015060279083,0.06467769947425889,0.0651312125041632,0.06518024093982853,0.06521088371211936,0.06509137690018513,0.06517717666259945,0.06526297642501377,0.06551118288056952,0.06560004692021293,0.06575326078166709,0.06536409757357353,0.06525071931609745,0.06527523353393011,0.06557859697960935,0.06568278240539818,0.06570116806877267,0.06592179602926666,0.06603517428674274,0.06605968850457541,0.0662803164650694,0.06650707298002155,0.06655610141568688,0.06696977884161312,0.06680124359401354,0.06679817931678446,0.06660819412858131,0.0662435451383204,0.06615468109867699,0.06617000248482241,0.066117909771928,0.06638756616808732,0.06631095923736023,0.06630483068290206,0.0662987021284439,0.06621596664325866,0.06635998767302556,0.06646723737604347,0.06658061563351955,0.06669092961376655,0.06687172197028246,0.06692687896040596,0.06733136355464493,0.06736507060416484,0.06770826965382216,0.06803308304010498,0.06841611769374038,0.0687593167433977,0.0688849521097901,0.06880221662460487,0.06863674565423437,0.0685019174561547,0.06825983955505714,0.0682475824461408,0.06810968997083207,0.06810968997083207,0.067702141099364,0.06776342664394566,0.06793809044600341,0.0680484044262504,0.0683027394362643,0.06844369618880214,0.06859078149579813,0.06870109547604512,0.06866125987206703,0.06870722403050329,0.06896462331774628,0.06917605844655302,0.0690351016940152,0.06919137983269844,0.06905655163461877,0.06891865915931003,0.06900139464449527,0.06920363694161476,0.06917299416932393,0.06944265056548325,0.0694518433971705,0.06907800157522236,0.06921282977330201,0.06887575927810285,0.06930475809017451,0.06924040826836377,0.06943039345656692,0.06907187302076419,0.06925572965450917,0.069323143753549,0.06946103622885776,0.06944877911994142,0.06911477290197135,0.0695774787635629,0.0691607370604076,0.06959280014970833,0.06982874949634774,0.07006776312021622,0.07030371246685563,0.07008308450636164,0.06985019943695131,0.06979197816959874,0.06986858510032581,0.06978278533791149,0.06993293492213656,0.06977665678345332,0.06938442929813067,0.06949474327837767,0.06911783717920043,0.06912090145642952,0.0689799447038917,0.06932007947631992,0.06938136502090159,0.06900752319895344,0.06895849476328811,0.0687225454166487,0.06918525127824027,0.0691239657336586,0.06900445892172435,0.06896462331774628,0.06930782236740358,0.06958667159525016,0.0697429497339334,0.0701443700509433,0.07024855547673213,0.07044160494216437,0.06971843551610074,0.06964795713983182,0.06985632799140948,0.06982262094188957,0.0697613353973079,0.06933233658523626,0.06925572965450917,0.06956522165464658,0.06981036383297323,0.06990535642707481,0.07043547638770621,0.0704538620510807,0.07095946779387943,0.07100849622954476,0.07131492395245308,0.0714742663683654,0.07149571630896899,0.07117090292268617,0.07107897460581368,0.07144055931884549,0.07116171009099892,0.07120767424943517,0.07105139611075192,0.07136701666534749,0.07099011056617026,0.07099623912062843,0.07090124652652685,0.07128121690293317,0.07118009575437342,0.07055498319964044,0.0705457903679532,0.07049676193228786,0.07023936264504488,0.0699819633578019,0.0702546840311903,0.07040483361541537,0.0706928756749492,0.07020565559552497,0.07019339848660863,0.07028226252625204,0.07043547638770621,0.07071126133832369,0.07092882502158859,0.07107284605135551,0.07123525274449692,0.07129653828907859,0.07135475955643117,0.07174392276452472,0.07190326518043705,0.07230468549744695,0.0723138783291342,0.07215760019045096,0.07199519349730955,0.07199519349730955,0.07202583626960038,0.0718573010220008,0.07152635908125982,0.07157845179415423,0.07153861619017615,0.07144055931884549,0.07165199444765223,0.07156006613077974,0.07176537270512831,0.07201970771514221,0.07197680783393505,0.07214227880430554,0.07232919971527961,0.07230468549744695,0.07243644941829754,0.07258353472529352,0.07246709219058836,0.0728623839531401,0.07305849769580142,0.0729512479927835,0.07296656937892892,0.0727888412996421,0.0729880193195325,0.07313204034929942,0.0731718759532775,0.07313204034929942,0.07370812446836705,0.07391036676548654,0.07411260906260603,0.07403906640910804,0.07405745207248253,0.07432710846864185,0.07429646569635102,0.07456918636973943,0.07464579330046651,0.07496447813229117,0.07421679448839487,0.07421679448839487,0.07416163749827137,0.07464272902323743,0.07478368577577525,0.07503189223133098,0.07529235579580307,0.07533831995423931,0.07554975508304605,0.07542411971665364,0.0757948972613727,0.07601246094463761,0.07607374648921927,0.07616261052886268,0.07665595916274508,0.07673869464793033,0.07677240169745024,0.07682143013311557,0.07742202847001588,0.07778974173750586,0.07809004090595602,0.07809923373764327,0.07804714102474886,0.07839646862886433,0.07858951809429657,0.07888062443105948,0.07917785932228055,0.07915640938167696,0.07880095322310332,0.07870289635177265,0.07882546744093598,0.07888062443105948,0.07926365908469488,0.07892658858949572,0.07854355393586032,0.07857419670815116,0.07879482466864515,0.07922688775794588,0.07930043041144387,0.07942913005506537,0.07958540819374861,0.07942913005506537,0.07951799409470878,0.07936478023325462,0.07935558740156737,0.07920237354011321,0.07878869611418698,0.07838727579717708,0.07813600506439226,0.07813294078716318,0.07799198403462536,0.07813906934162135,0.07806859096535243,0.07799198403462536,0.07828921892584642,0.07826776898524283,0.078420982846697,0.0784761398368205,0.07866612502502365,0.07875192478743798,0.07861096803490016,0.07824938332186834,0.0778755414999202,0.07820954771789027,0.07812681223270501,0.07783877017317119,0.0776181422126772,0.0774925068462848,0.07759669227207362,0.07752927817303379,0.07789392716329469,0.07805020530197793,0.07816051928222492,0.07828309037138825,0.078163583559454,0.07840566146055158,0.07875192478743798,0.07866918930225274,0.07823712621295201,0.07804407674751977,0.07793376276727278,0.07797359837125085,0.07792150565835644,0.07779893456919311,0.07802262680691618,0.07775603468798595,0.07735155009374696,0.07761201365821904,0.07779893456919311,0.07802875536137435,0.07782651306425487,0.0777805489058186,0.07801649825245802,0.07793069849004369,0.0777468418562987,0.07798585548016719,0.07847307555959142,0.07841179001500975,0.0784761398368205,0.07833211880705358,0.07839953290609342,0.07862628942104558,0.07883772454985231,0.07882853171816506,0.07878869611418698,0.07898787413407739,0.07843323995561333,0.07806859096535243,0.07819116205451576,0.07830147603476276,0.07826164043078468,0.07818196922282851,0.07768862058894611,0.07790311999498194,0.07778974173750586,0.07744654268784855,0.07763346359882262,0.0779827912029381,0.07771619908400787,0.07754459955917921,0.0775813708859282,0.07784489872762936,0.0780931051831851,0.07795827698510543,0.07783264161871302,0.07802875536137435,0.07813600506439226,0.07787247722269111,0.07795214843064727,0.07819422633174485,0.0777652275196732,0.07732397159868522,0.0773270358759143,0.07707576514312948,0.07721365761843822,0.07735767864820513,0.07737606431157963,0.07754153528195012,0.07748024973736846,0.07733622870760155,0.07770087769786245,0.07778667746027677,0.07793376276727278,0.07782651306425487,0.07756604949978278,0.07737606431157963,0.07737912858880872,0.07724430039072905,0.07739138569772505,0.07711560074710756,0.07699609393517332,0.07699302965794423,0.07680610874697016,0.07705125092529681,0.0773086502125398,0.07730558593531071,0.07729639310362346,0.07754766383640829,0.07784796300485844,0.07816051928222492,0.07827083326247192,0.07833824736151175,0.07840566146055158,0.07854355393586032,0.07859564664875474,0.07846081845067508,0.07869676779731448,0.07882853171816506,0.07861709658935832,0.0787672461735834,0.0789848098568483,0.07893884569841206,0.07901545262913914,0.07923301631240405,0.07937703734217096,0.07940768011446178,0.07945364427289803,0.07958234391651953,0.07984893603544976,0.08010327104546366,0.08019213508510709,0.0805353341347644,0.08086934035273446,0.08097352577852329,0.08143623164011486,0.08187135900664468,0.0819755444324335,0.0820460228087024,0.08211650118497132,0.081993930095808,0.08237390047221431,0.08249340728414856,0.08246582878908681,0.0825792070465629,0.08261904265054097,0.08273854946247522,0.08297449880911462,0.08325947659141936,0.08379266082927983,0.08419408114628973,0.08451889453257255,0.08477629381981554,0.08524206395863618,0.08549333469142101,0.08563735572118791,0.08565267710733333,0.08581814807770381,0.08586411223614007,0.0859131406718054,0.08637891081062604,0.08642793924629137,0.0866608243157017,0.08673130269197062,0.08673743124642877,0.08683855239498853,0.08703773041487893,0.08710208023668968,0.08709595168223151,0.08693967354354827,0.08641874641460412,0.08633601092941888,0.0866056673255782,0.08652293184039295,0.0865872816622037,0.0865321246720802,0.08712965873175142,0.08727061548428926,0.08776396411817164,0.08791411370239673,0.0881010346133708,0.08821134859361779,0.08783137821721147,0.0877179999597354,0.08767203580129915,0.08759849314780116,0.08710514451391876,0.08689983793957018,0.08652599611762203,0.08616441140459022,0.08586411223614007,0.08526964245369793,0.08514400708730552,0.08502450027537127,0.08523287112694893,0.08525432106755251,0.08519916407742902,0.08506433587934935,0.08513481425561827,0.08515319991899277,0.0852573853447816,0.08549333469142101,0.08579363385987115,0.08599587615699064,0.08537995643394493,0.08542285631515209,0.08564348427564608,0.0856220343350425,0.08522980684971984,0.08534931366165409,0.08542898486961026,0.08508578581995294,0.08473339393860838,0.08435342356220206,0.08474871532475378,0.08460469429498688,0.08419101686906065,0.08434423073051481,0.08446680181967814,0.08398571029471207,0.0836700897401165,0.08392136047290133,0.08420020970074789,0.0840898957205009,0.08397651746302483,0.08415118126508256,0.0843626163938893,0.08405618867098098,0.08413585987893715,0.0842921380176204,0.0846751726712558,0.08471500827523387,0.08432278078991122,0.08448825176028171,0.08449744459196896,0.08446067326521997,0.08421246680966422,0.08432278078991122,0.08426149524532955,0.0843626163938893,0.0841450527106244,0.08410215282941723,0.08415730981954073,0.08413585987893715,0.08435648783943114,0.08413279560170807,0.08435648783943114,0.08455566585932155,0.08477322954258645,0.08488660780006253,0.08488047924560436,0.08515932847345094,0.08513787853284735,0.08529722094875967,0.0848743506911462,0.08513787853284735,0.08515626419622185,0.08502450027537127,0.0850183717209131,0.08532479944382143,0.08560671294889707,0.08550252752310825,0.085346249384425,0.08564348427564608,0.08652906039485112,0.08706530890994067,0.08807958467276722,0.08916433881186266,0.08993347239636254,0.09075163441652775,0.09210910922901161,0.09349722681378629,0.09527144332942546,0.09670246079540731,0.09717129521145704,0.09774125077606652,0.0982192780238035,0.09858392701406439,0.0989455117270962,0.09913243263807028,0.09905276143011411,0.09881068352901655,0.09871569093491496,0.09842458459815207,0.09873407659828946,0.09923048950940094,0.09963190982641083,0.09928871077675352,0.09942660325206226,0.09947869596495668,0.09946031030158219,0.10003026586619165,0.09971770958882517,0.09973915952942874,0.09934999632133519,0.09868198388539505,0.0982529850733234,0.09855328424177355,0.0986727910537078,0.09864827683587514,0.09811815687524375,0.09777495782558643,0.09815492820199274,0.09805993560789117,0.09853796285562814,0.09878616931118388,0.09871569093491496,0.09879842642010021,0.09903437576673962,0.0991109826974667,0.09948788879664393,0.0993837033708551,0.09950014590556026,0.0999107590542574,0.10006090863848249,0.10026621521283106,0.1004776503416378,0.1007687566784007,0.10092809909431302,0.10162981857977307,0.10242040210487655,0.10305777176852585,0.10380851968965123,0.10394947644218905,0.10424671133341012,0.1046879672543981,0.10545097228443982,0.10609447050254729,0.1065295978690771,0.1068053828196946,0.10719454602778815,0.10799738666180794,0.10821801462230193,0.1090085981474054,0.10966435347442921,0.11032317307868209,0.11077055755412824,0.11130680606921779,0.11221076785179733,0.11310553680268963,0.1141473910605779,0.11432205486263565,0.11525053086304786,0.11608707854658758,0.1171381256361631,0.11827497248815297,0.11929231252820859,0.12016869581572638,0.12074171565756493,0.1215690705094174,0.12230143276716827,0.12357004354000872,0.12430853435221777,0.12505315371888498,0.12580696591723944,0.12623290045208202,0.12664964215523733,0.12697139126429105,0.1273299117000938,0.1274739327298607,0.12752296116552603,0.1275658610467332,0.12734216880901011,0.12697751981874922,0.12662819221463376,0.12630031455112184,0.1257426160954287,0.12546070259035305,0.12505928227334315,0.12461189779789701,0.12383050710448079,0.12303992357937733,0.12242093957910252,0.12160277755893731,0.12083364397443744,0.11971211850859298,0.11908087739940185,0.11811869434946973,0.11741084630955151,0.1164272133190158,0.11609627137827482,0.11515860254617537,0.11490120325893237,0.11463767541723122,0.11385628472381501,0.11359888543657203,0.11294925866400639,0.11218318935673559,0.11129148468307237,0.1107950717719609,0.10996158836565027,0.10959081082093121,0.10849073529569034,0.10769402321612871,0.10739985260213673,0.10716083897826824,0.10689731113656709,0.10681763992861092,0.10647137660172452,0.10602705640350746,0.10597189941338396,0.10548161505673065,0.10524566571009124,0.1048902095515176,0.10411188313533046,0.1035204776301174,0.1029382649565916,0.10231315240185863,0.10185657509472523,0.10139999778759184,0.10067989263875729,0.10100164174781102,0.10052974305453222,0.1006431213120083,0.10081472083683696,0.10075343529225529,0.10066150697538279,0.10078101378731703,0.10091890626262578,0.10130806947071934,0.10124984820336676,0.10083923505466962,0.1012621053122831,0.1012437196489086,0.10132032657963568,0.10169723267881291,0.10181367521351807,0.10202204606509573,0.10239282360981479,0.1022089669760698,0.10241427355041838,0.10233766661969129,0.10227025252065147,0.10215993854040448,0.10203430317401206,0.10177690388676908,0.10186883220364157,0.10208026733244831,0.10206801022353197,0.10223348119390246,0.10228557390679688,0.1026839299465777,0.10283407953080277,0.10295971489719519,0.10309760737250392,0.10325694978841625,0.10341935648155766,0.103394842263725,0.10335194238251784,0.1037227199272369,0.10412107596701771,0.10403834048183247,0.10430799687799179,0.10434476820474078,0.10441831085823879,0.10463893881873278,0.10449798206619494,0.10465732448210727,0.10468183869993994,0.10431718970967904,0.10404753331351972,0.10387593378869106,0.10389125517483648,0.10394641216495998,0.1041241402442468,0.10392802650158547,0.10405979042243604,0.10379626258073489,0.1035940202836154,0.10343774214493216,0.10306390032298401,0.10288923652092627,0.10261345157030878,0.10236524511475305,0.10210784582751006,0.1018443179858089,0.10148273327277708,0.10128355525288668,0.10132951941132293,0.10124984820336676,0.10139386923313368,0.10152869743121333,0.10090664915370945,0.10057570721296846,0.100005751648359,0.09994140182654825,0.1000394586978789,0.10016509406427132,0.1000946156880024,0.10000881592558807,0.09992914471763191,0.09992608044040283,0.10031217937126731,0.10049297172778322,0.10094648475768753,0.10066457125261187,0.10038572202476531,0.09977286657894867,0.09923048950940094,0.09915081830144477,0.09897615449938704,0.09869424099431139,0.0986176340635843,0.09837249188525765,0.09813960681584732,0.09818557097428357,0.09840313465754848,0.0986360197269588,0.0990190543805942,0.09912323980638303,0.09904663287565595,0.09908646847963404,0.09910485414300853,0.09925193945000453,0.09936225343025151,0.09926113228169177,0.09959513849966184,0.09988318055919566,0.09973915952942874,0.09979431651955224,0.099895437668112,0.09994753038100641,0.0998402806779885,0.09989850194534108,0.1000210730345044,0.10041023624259797,0.10022025105439482,0.10016202978704224,0.10055119299513579,0.10083617077744053,0.10109969861914168,0.10136016218361375,0.10183512515412166,0.10187802503532882,0.10192092491653598,0.10193931057991049,0.10182286804520532,0.10159917580748225,0.10187189648087065,0.10195769624328498,0.10160530436194042,0.10096180614383295,0.10072585679719354,0.10092809909431302,0.10068908547044454,0.10039491485645255,0.1004776503416378,0.10048071461886689,0.0997299666977415,0.09942660325206226,0.09958900994520367,0.10021412249993665,0.09997817315329724,0.09981576646015583,0.09964416693532717,0.099785123687865,0.09966561687593076,0.09976060947003233,0.09995978748992274,0.09984334495521759,0.09998123743052632,0.09968706681653433,0.09960739560857818,0.09933467493518977,0.09904969715288503,0.0986023126774389,0.09777802210281551,0.09677293917167622,0.09576172768607877,0.09432151738840967,0.09286904998182424,0.0915820535456093,0.08998250083202787,0.0883921409501337,0.08716336578127135,0.08621343984025555,0.08527270673092702,0.08471807255246296,0.08393361758181765,0.0832502837597321,0.0825792070465629,0.08192651599676817,0.08165379532337977,0.08160170261048535,0.08150364573915468,0.0809919114418978,0.08089385457056714,0.08076821920417472,0.08076209064971655,0.08078047631309106,0.0809919114418978,0.08126769639251528,0.0816292811055471,0.08145155302626027,0.08110222542214479,0.08127995350143162,0.08098271861021054,0.08037905599608115,0.08018294225341983,0.08039131310499749,0.07997763567907126,0.08008794965931826,0.07959153674820678,0.07979684332255535,0.07995925001569676,0.07960992241158128,0.0796221795204976,0.07965895084724661,0.0796221795204976,0.07937397306494187,0.07937397306494187,0.07890207437166306,0.07893578142118297,0.07870596062900173,0.07849146122296591,0.07823099765849384,0.07823406193572292,0.07853742538140215,0.07858951809429657,0.07855887532200574,0.07847307555959142,0.07831066886645001,0.07836889013380259,0.07813906934162135,0.07813600506439226,0.07815439072776677,0.07810229801487234,0.07763959215328078,0.07756604949978278,0.07722591472735456,0.07706350803421315,0.0771278578560239,0.07705125092529681,0.07720140050952189,0.0770727008659004,0.07730252165808163,0.0772534932224163,0.07730252165808163,0.07725655749964538,0.07744654268784855,0.07771313480677879,0.07797359837125085,0.0777468418562987,0.07763959215328078,0.07804101247029069,0.07807165524258151,0.07820954771789027,0.07843630423284241,0.0782034191634321,0.07860790375767107,0.07858951809429657,0.07846388272790417,0.07864467508442007,0.07876418189635431,0.07831373314367909,0.0782034191634321,0.07798585548016719,0.07791231282666919,0.07805326957920701,0.07772539191569511,0.07752314961857562,0.07735461437097604,0.07718607912337647,0.07698383682625698,0.07718607912337647,0.07732397159868522,0.07729945738085255,0.07740364280664137,0.07726268605410355,0.07744347841061947,0.07778361318304769,0.0776916848661752,0.07784183445040027,0.07837808296548983,0.07840566146055158,0.07833518308428267,0.07856193959923483,0.07862016086658741,0.07893271714395389,0.07884691738153957,0.0789511028073284,0.07916560221336422,0.07919624498565504,0.07901545262913914,0.07908593100540805,0.07883159599539415,0.07851597544079858,0.07852823254971492,0.07872128201514715,0.07860483948044199,0.07831373314367909,0.07811149084655959,0.07817890494559943,0.07772845619292419,0.07778361318304769,0.07795521270787635,0.07812681223270501,0.07808391235149785,0.07775297041075686,0.07825244759909743,0.07848226839127866,0.07850984688634041,0.07831066886645001,0.07901545262913914,0.07884385310431048,0.0789664241934738,0.07887143159937222,0.07899400268853556,0.07905222395588814,0.07862322514381649,0.07824019049018109,0.07845468989621691,0.0786569321933364,0.0786017752032129,0.07868144641116907,0.0787856318369579,0.0789664241934738,0.07894803853009931,0.07888368870828856,0.07888062443105948,0.07914415227276063,0.07907980245094988,0.07922995203517497,0.07884998165876865,0.07917479504505147,0.0790399668469718,0.07898787413407739,0.07866612502502365,0.07880401750033239,0.07891433148057939,0.07902464546082638,0.0790399668469718,0.07872741056960532,0.07869676779731448,0.07843323995561333,0.07859564664875474,0.07844856134175875,0.078457754173446,0.07815439072776677,0.07802875536137435,0.0777100705295497,0.07752927817303379,0.07736074292543421,0.07717995056891831,0.07697770827179881,0.07671111615286857,0.07637098138044035,0.07629743872694235,0.07636791710321127,0.07635565999429493,0.07619325330115352,0.0760890678753647,0.07640162415273118,0.07656709512310167,0.07640162415273118,0.0762882458952551,0.07660999500430883,0.07636791710321127,0.07658548078647617,0.07663757349937059,0.07678159452913749,0.07701141532131874,0.07690416561830082,0.07660080217262158,0.07643839547948017,0.07617180336054993,0.07590827551884878,0.07626986023188059,0.0758500542514962,0.07600939666740852,0.07588988985547429,0.07581021864751812,0.07569071183558387,0.07571216177618746,0.07581634720197629,0.07600326811295036,0.07635872427152401,0.07615648197440453,0.07596343250897228,0.07567232617220938,0.07556201219196239,0.07527397013242856,0.07511156343928715,0.07520349175615965,0.07508704922145448,0.07468562890444459,0.07430872280526736,0.07423211587454027,0.0745569292608231,0.07440065112213985,0.07442516533997252,0.07464272902323743,0.07446806522117969,0.07410648050814787,0.07404213068633712,0.07418308743887495,0.07427808003297652,0.07414018755766778,0.07396858803283912,0.07352426783462206,0.07309526902255041,0.07283174118084926,0.07292979805217992,0.0728439982897656,0.07292979805217992,0.07304930486411416,0.07309526902255041,0.07305236914134325,0.07271836292337318,0.07295737654724167,0.07309526902255041,0.07301559781459425,0.07305236914134325,0.07310446185423766,0.07303398347796874,0.07276126280458034,0.0725498276757736,0.07278577702241301,0.07294511943832534,0.07271836292337318,0.07303704775519783,0.07302172636905242,0.07288689817097276,0.07293899088386717,0.07292979805217992,0.07288689817097276,0.07239048525986128,0.07212389314093104,0.07211470030924379,0.07229855694298878,0.07210244320032747,0.07216066446768005,0.07198293638839322,0.07183891535862631,0.07153248763571798,0.07157232323969608,0.07177150125958648,0.07185423674477172,0.0718971366259789,0.07193390795272789,0.07197680783393505,0.07198906494285139,0.07198293638839322,0.07196455072501871,0.07231081405190512,0.07254676339854452,0.0727888412996421,0.07279190557687118,0.07292060522049268,0.07259885611143893,0.0724058066460067,0.0723690353192577,0.07226178561623979,0.07238129242817404,0.07208712181418205,0.07178988692296097,0.07170408716054665,0.07135782383366024,0.07138233805149291,0.07150490914065624,0.07139153088318016,0.0711463887048535,0.07130266684353675,0.07143749504161641,0.07143443076438732,0.07159990173475782,0.07166118727933948,0.07187262240814622,0.07158151607138331,0.07139459516040925,0.07163667306150681,0.0715478090218634,0.06435595036520515,0.0570016850154055,0.04996304022020141,0.04272215312787783,0.0)
ycorr <- c(-2.1671884042249642e-05,-2.1861212497613296e-05,-2.244945005387996e-05,-2.344261660218276e-05,-2.4853472122428088e-05,-2.6683429377111833e-05,-2.8941886831495452e-05,-3.1180529884610205e-05,-3.340683967116685e-05,-3.565093486393892e-05,-3.790245970739164e-05,-4.01642217546441e-05,-4.242612383190263e-05,-4.4662318609807144e-05,-4.686518154929554e-05,-4.904838178999802e-05,-5.1228833789308164e-05,-5.339416865634711e-05,-5.5528379158979754e-05,-5.762357782081658e-05,-5.968342464513675e-05,-6.172164650998354e-05,-6.37521693425753e-05,-6.579109273251502e-05,-6.784702424945305e-05,-6.992434603675771e-05,-7.20069843377734e-05,-7.409330824085604e-05,-7.61996783208425e-05,-7.833551950748866e-05,-8.051098346393804e-05,-8.271668554286222e-05,-8.495354720227566e-05,-8.721749958843169e-05,-8.95114165171857e-05,-9.1838531435739e-05,-9.420157789527924e-05,-9.661872337576943e-05,-9.910182326786478e-05,-0.00010164628361612825,-0.00010426217603011824,-0.00010693743619249643,-0.00010966863294251031,-0.0001124593954111284,-0.00011531110702255429,-0.00011823384282996475,-0.00012122969873660418,-0.00012429218283248808,-0.0001274053815366219,-0.00013057068338919066,-0.0001337837397915254,-0.00013705640631701122,-0.00014039901331314432,-0.00014382119240048964,-0.0001473239320194208,-0.00015090189973196672,-0.00015455704805574237,-0.00015829783304187325,-0.00016214309986639687,-0.00016608592016668686,-0.0001701295267225539,-0.00017428149670880712,-0.00017854434247804992,-0.00018292641906229878,-0.00018742271279731913,-0.0001920376766111183,-0.0001967705829536427,-0.0002016201320932429,-0.00020658412142817828,-0.00021166168156827096,-0.00021685851991575382,-0.000222162792527949,-0.00022757088389482977,-0.00023305607648940402,-0.00023860229386850256,-0.0002441970556710321,-0.00024982826732276875,-0.0002554837052281391,-0.00026114678489038784,-0.0002668020705680731,-0.0002724196706204828,-0.00027798748443609713,-0.0002834916963163597,-0.0002889186416167052,-0.0002942700948861992,-0.0002995444993417201,-0.00030473976466153586,-0.0003098503975916677,-0.0003148592178402711,-0.0003197602445207962,-0.0003245556481268894,-0.0003292422580500233,-0.00033381935976443847,-0.0003382791513378131,-0.000342623853053601,-0.00034685020190603193,-0.0003509550418482151,-0.00035492881456319816,-0.00035879011673535207,-0.000362541756137369,-0.00036619363048360565,-0.0003697474620837524,-0.0003732067222142737,-0.00037658558864573976,-0.000379892621842322,-0.0003831149353916097,-0.00038624980971741906,-0.00038930459529097313,-0.00039228097056192223,-0.00039517087944539305,-0.00039797601201936285,-0.00040068824313964054,-0.0004033129935325601,-0.0004058631517306547,-0.0004083298879597804,-0.0004107296729426041,-0.00041307090236860895,-0.0004153557158662558,-0.00041758636988633793,-0.00041976655899832275,-0.00042189516167527347,-0.0004239858319934996,-0.0004260258885503669,-0.0004280010620066685,-0.00042990331153405965,-0.00043172488470279114,-0.0004334588968072607,-0.0004351107263132725,-0.0004366755434785145,-0.0004381709263823342,-0.0004395931847966248,-0.0004409599143617753,-0.00044228140853849935,-0.00044357562058672684,-0.00044485092168633034,-0.0004461199230620515,-0.00044739265691385774,-0.0004486763849940069,-0.0004499710632700036,-0.00045128446811051507,-0.0004526117600292466,-0.00045395303884191807,-0.00045529414840041123,-0.0004566379495020205,-0.00045798691104749104,-0.0004593448212651836,-0.00046070915088555845,-0.0004620740581049998,-0.00046343799863088483,-0.00046479665773671976,-0.0004661488980068621,-0.00046747599088737434,-0.0004687913644733413,-0.00047009110520609086,-0.00047136943763623055,-0.0004726322210440717,-0.0004738808730222398,-0.00047511229698578116,-0.0004763294452847985,-0.00047753273442027353,-0.00047873160328217105,-0.0004799371884219155,-0.0004811520741464313,-0.0004823758559275242,-0.00048361548497751215,-0.0004848665942444066,-0.0004861201906448962,-0.0004873871413057884,-0.000488673760648941,-0.0004899792617255017,-0.0004912984353788515,-0.0004926269408737226,-0.0004939600068379356,-0.0004953057582564749,-0.0004966538817459043,-0.0004980049691844356,-0.0004993585792556928,-0.0005007055744999682,-0.0005020313065917274,-0.0005033274123427977,-0.0005046060025612707,-0.0005058676093776121,-0.0005071225232484482,-0.0005083593128374059,-0.0005095785185901907,-0.0005107761854347357,-0.0005119495690657122,-0.00051310097366324,-0.0005142349057635497,-0.000515353438933757,-0.0005164558695895282,-0.0005175309909957682,-0.000518568140686039,-0.000519560330790316,-0.000520515202697898,-0.0005214314321494349,-0.0005223203629769827,-0.0005231732620353387,-0.0005239986462913078,-0.0005248051441732196,-0.0005255780039328302,-0.0005263236713961,-0.0005270358780208503,-0.0005277313499894847,-0.000528416512045895,-0.0005290968079124011,-0.0005297675979668527,-0.000530438747344959,-0.0005311106968090814,-0.0005317790874525078,-0.0005324524937314641,-0.0005331437982494262,-0.0005338664874024017,-0.0005346158549225889,-0.0005353702449595088,-0.0005361128073438897,-0.000536838607348863,-0.000537552622515234,-0.0005382507224052716,-0.0005389327164546001,-0.0005395933081936485,-0.0005402205395847558,-0.0005408130262808348,-0.0005413637098338021,-0.0005418994325325508,-0.0005424413206423899,-0.0005430090261530643,-0.0005436027626068705,-0.0005442084489285949,-0.0005448268383383579,-0.0005454704290771682,-0.0005461411960395588,-0.000546843450630422,-0.0005475828004571284,-0.0005483597872219934,-0.0005491598377634504,-0.0005499700532766573,-0.0005507887749591848,-0.0005516294075511971,-0.0005524966320351011,-0.0005533809802592308,-0.0005542798907530332,-0.0005551954724202371,-0.0005561291006364858,-0.0005570686650065943,-0.0005580103206545278,-0.0005589627962870747,-0.0005599310819925181,-0.0005609117520043831,-0.0005618990567881326,-0.0005629076562736297,-0.0005639364386242604,-0.000564975672966496,-0.0005660213960651046,-0.0005670707674711025,-0.0005681278048967256,-0.0005691970813814835,-0.000570271337827049,-0.0005713350635300966,-0.0005723742920556537,-0.0005733816166026126,-0.0005743562260855233,-0.0005753046206385289,-0.0005762271116123522,-0.0005771267227281193,-0.0005780031631527016,-0.0005788409492632845,-0.0005796303788161614,-0.0005803774987572037,-0.0005811137213752126,-0.0005818446022446826,-0.0005825762228718752,-0.0005832893628188835,-0.0005839872051186057,-0.0005846712216851922,-0.0005853415077034078,-0.0005860026675628343,-0.000586668363511004,-0.0005873464624735915,-0.0005880202733079227,-0.0005886733253641988,-0.0005892941395554136,-0.0005898789822266803,-0.000590421670068047,-0.0005908982386038899,-0.0005912897242850623,-0.000591577475555883,-0.0005917267508337708,-0.000591719497997999,-0.0005915258101587077,-0.0005911238283975251,-0.0005904958554279404,-0.000589643003190492,-0.0005885610885870483,-0.0005872582427056327,-0.0005857632278374496,-0.0005840910236057638,-0.0005822572261231815,-0.000580289497622099,-0.0005782141112759569,-0.0005760560288783296,-0.0005738575001152424,-0.000571638359567387,-0.0005694075239950651,-0.0005671768384164389,-0.0005649467157397109,-0.000562706764975348,-0.0005604641605205869,-0.0005582229062245271,-0.0005559896172629231,-0.0005537745145992968,-0.0005515654440800903,-0.0005493421567242708,-0.0005471065237865615,-0.0005448522987993096,-0.0005425622871384886,-0.0005402450887917166,-0.0005379104095513343,-0.0005355497385680458,-0.0005331685733343772,-0.0005307475312686622,-0.000528281696869841,-0.0005257843123311587,-0.0005232568017393778,-0.0005207003545295959,-0.0005181266196224401,-0.0005155476931198994,-0.0005129578688906577,-0.0005103511358238034,-0.0005077206387895299,-0.0005050605660117753,-0.0005023825901191753,-0.0004996781710905428,-0.0004969408827015208,-0.0004941842934689863,-0.0004914137601921197,-0.0004886298887640075,-0.0004858264941646002,-0.0004830064392288398,-0.0004801608488780272,-0.00047731434689078916,-0.0004744559022165325,-0.0004715920299178188,-0.000468726751420972,-0.00046585813903359723,-0.000462971257865378,-0.0004600582857392186,-0.00045711434717460406,-0.0004541416555878651,-0.00045114627041967556,-0.0004481307424151096,-0.0004450917529545395,-0.00044203876934433646,-0.0004389726539968398,-0.0004358918303583702,-0.00043280264346856026,-0.00042970887283514433,-0.00042661701291864284,-0.0004235338879354812,-0.0004204664541404674,-0.0004173984615866628,-0.00041433825891234544,-0.00041128893886166733,-0.0004082465710486285,-0.0004052069257492544,-0.0004021729040655188,-0.0003991405844176184,-0.00039612612234955373,-0.0003931151463733081,-0.0003901059344381533,-0.00038710088225350433,-0.0003841140207622032,-0.00038113054543526594,-0.0003781453528513847,-0.0003751579438545829,-0.00037216800061331423,-0.0003691773680266674,-0.0003661827892086086,-0.0003631811610489801,-0.00036017797702742987,-0.0003571796540113855,-0.0003541794364626308,-0.00035118358594120964,-0.00034821179273063793,-0.0003452624963491871,-0.00034235025552842096,-0.00033947442224568924,-0.0003366363614080136,-0.0003338541899365143,-0.0003311195137725145,-0.0003284335332687432,-0.00032580008280219815,-0.00032321837612015434,-0.00032067821414527136,-0.000318185989834524,-0.0003157412118740485,-0.0003133392940062211,-0.00031098068230135293,-0.0003086630867714779,-0.00030638287931311647,-0.0003041463842322059,-0.0003019500732444539,-0.00029978776719341365,-0.00029765385863140983,-0.00029554469781183004,-0.00029345522168263023,-0.0002913961482933456,-0.0002893580154638023,-0.00028734185466337635,-0.00028535050822124967,-0.0002833827149152618,-0.0002814285235358303,-0.0002794999379486051,-0.00027760199388639174,-0.0002757454204950924,-0.00027393058746388133,-0.0002721475568962428,-0.00027040241603306064,-0.00026869828120603447,-0.0002670288231985881,-0.0002653845557753826,-0.00026377683053535156,-0.00026219785933466835,-0.0002606418646609366,-0.0002590973979201541,-0.0002575689825552332,-0.00025605711028075357,-0.00025455798611432944,-0.0002530510385439534,-0.0002515423237074549,-0.00025003487935353,-0.0002485328284100378,-0.00024702750009178166,-0.00024553879009838906,-0.00024407107063700146,-0.0002426185719882255,-0.00024117316996099343,-0.00023973374432757286,-0.00023830870515927224,-0.0002368953694948563,-0.00023549637143612006,-0.00023410391781368905,-0.0002327311045558341,-0.00023136082207095204,-0.00022998097331774605,-0.00022857445891125085,-0.00022715393859708266,-0.00022572278463916186,-0.00022428731922962393,-0.00022284983602457306,-0.00022140605067789667,-0.00021994168975401245,-0.00021845762005615163,-0.00021694069498035966,-0.00021539494357526492,-0.00021382995763402605,-0.00021224242079823918,-0.00021062609485415432,-0.00020896885272537414,-0.00020726473683690196,-0.00020550948122839948,-0.00020371308488148054,-0.0002018748419326547,-0.00020000475735142324,-0.00019809544984911607,-0.00019615623810899052,-0.00019419399693956075,-0.00019221835119755186,-0.00019022639060809003,-0.00018822342270082817,-0.0001862169803611998,-0.00018420290468374066,-0.00018217238369282976,-0.0001801266654734368,-0.00017807073732672697,-0.00017599673641192725,-0.00017390291341805167,-0.00017177763839379846,-0.00016962471487509467,-0.00016745448642807099,-0.00016526720953646384,-0.00016305293877245334,-0.00016081335106212066,-0.00015854958524529858,-0.00015626530516503937,-0.00015396880518935116,-0.00015166027260342946,-0.00014934026374569933,-0.00014700836983921151,-0.0001446603829487487,-0.00014228905386740197,-0.00013990008177329266,-0.00013750071968845709,-0.0001350988518499444,-0.0001327090287036306,-0.00013032078510332064,-0.0001279121075617386,-0.00012549494663181002,-0.00012306440295946843,-0.00012062076204397135,-0.00011816368808124307,-0.00011569757592809483,-0.00011321382942218911,-0.00011070168930486511,-0.00010815026525722111,-0.00010555622687701082,-0.00010294258809760774,-0.00010030914226457084,-9.765850843151461e-05,-9.499084858753982e-05,-9.230177958134269e-05,-8.958445963453038e-05,-8.68430874500179e-05,-8.408389050849817e-05,-8.131743628900137e-05,-7.854522789767117e-05,-7.575881605462051e-05,-7.293860469972424e-05,-7.008716737095686e-05,-6.720215993563988e-05,-6.428809527841742e-05,-6.135074539830353e-05,-5.8401163560400296e-05,-5.54391356160278e-05,-5.245902949759486e-05,-4.9453933538915126e-05,-4.6418373335020134e-05,-4.33616359161281e-05,-4.0290169619653395e-05,-3.720208638272641e-05,-3.409796984542996e-05,-3.097224873740197e-05,-2.7820395212620613e-05,-2.4630683686390477e-05,-2.139393010560188e-05,-1.8125294127054127e-05,-1.4829042149836879e-05,-1.1507794440398967e-05,-8.1626971864952e-06,-4.7926224179504616e-06,-1.4027392556630376e-06,2.00335863284041e-06,5.425285841774608e-06,8.858371556265632e-06,1.2305388572923102e-05,1.577095002466947e-05,1.9261854670618163e-05,2.2775219166449662e-05,2.630846745016404e-05,2.9862371633246732e-05,3.343859475972313e-05,3.7034742580884734e-05,4.0656186188771396e-05,4.4299927448961804e-05,4.796202180970943e-05,5.16238911221011e-05,5.527448132625532e-05,5.891136323155042e-05,6.253314797650524e-05,6.613383300370032e-05,6.97164839960362e-05,7.327770589939086e-05,7.680716599645803e-05,8.02938482687456e-05,8.373071508826903e-05,8.712331657550043e-05,9.047585839181018e-05,9.379797247013661e-05,9.709382310550571e-05,0.00010036327322949804,0.00010360943743564885,0.00010682467256344915,0.00011001430325792312,0.0001131887895096956,0.00011634858522868737,0.00011950607609314612,0.00012264751684267004,0.00012576654394866286,0.0001288567895909368,0.00013191431960666013,0.00013492832412078743,0.0001378923261340644,0.00014080877097952452,0.00014366171306856302,0.00014644847991103607,0.0001491676689607614,0.00015181741752328998,0.00015440508049051956,0.00015692415873102484,0.00015938187889333265,0.00016195235610578138,0.00016483329140367539,0.00016818346809567103,0.00017214310768800644,0.000177676433155719,0.0001817207415244039,0.00018510552251777048,0.00018792763316999197,0.00019030631150563395,0.00019239578659343648,0.00019434011391243676,0.00019596021074653466,0.00019707255251726763,0.00019751723867875585,0.00019715928868495927,0.00019504390043040092,0.00019423260617476107,0.00019390116333043318,0.00019395412013763102,0.00019428402348813442,0.00019474277227628608,0.0001951924255316877,0.00019564298417358092,0.00019609618958736007,0.00019655936127864587,0.0001970344160207761,0.00019752300351964024,0.00019802702159441536,0.00019854662201882996,0.00019907267282437624,0.00019960188562718304,0.00020013523649751845,0.0002006615176875555,0.00020117419930778358,0.000201673746245408,0.00020216145609151483,0.0002026322390284908,0.00020308908331945316,0.0002035399785621963,0.00020399355208921595,0.00020445551186881102,0.0002049213514990951,0.00020540180791513848,0.00020589228424408319,0.0002064056802845122,0.000206942748695709,0.00020751100306428224,0.0002081052112537442,0.00020872764563874453,0.00020937100994770116,0.0002100447006369237,0.0002107505857979269,0.00021148961994918068,0.0002122702498491153,0.00021309934631442138,0.00021397417222674797,0.0002148994787575654,0.00021588180459918062,0.00021692662561163608,0.00021803843397285048,0.0002192066700438244,0.00022043283460781855,0.00022172471469380085,0.00022307900349574219,0.0002244879956350647,0.00022596022897336288,0.0002274967265354924,0.00022909627382024732,0.0002307523580909052,0.0002324680392932111,0.00023424948653535163,0.0002361046494142643,0.0002380181349758149,0.00023999731063656274,0.00024204926239599267,0.0002441681865472327,0.0002463483959383667,0.0002485835806556018,0.00025087913005621744,0.0002532368507332867,0.00025566859510574286,0.0002581597486095309,0.0002607230647899818,0.0002633585628165008,0.00026605380247884215,0.0002688112257715915,0.0002716337905289127,0.0002745227553385101,0.000277475590349283,0.0002804786188253387,0.00028351270396216024,0.00028658021475483255,0.0002896759423880544,0.0002927899360334306,0.00029592754402803093,0.0002990899824202586,0.00030226366029702625,0.00030543870002966276,0.0003086148999126903,0.00031179348774198,0.0003149710279003083,0.0003181561439792473,0.0003213314099948755,0.00032449481888555283,0.0003276449662609689,0.00033076049253419446,0.0003338299990227978,0.00033686437764621755,0.0003398531488305396,0.00034279473177557763,0.00034568903196771416,0.00034853593131149957,0.0003513329273136567,0.00035408135885672603,0.0003567694339450515,0.00035939412422092616,0.00036197830008127417,0.0003645234028268686,0.0003670357977072653,0.00036952237540280677,0.0003719866641787183,0.0003744184290572102,0.0003768208083387255,0.0003792007176262446,0.0003815683868408258,0.0003839442662734884,0.00038633402067347455,0.0003887295068186983,0.00039112258539196904,0.0003935083326389018,0.0003958986948413214,0.00039828778154907425,0.0004007032419478921,0.0004031447377827034,0.0004056040572502251,0.00040808009067246705,0.00041056744838662815,0.0004130684623597142,0.00041559090118921784,0.0004181561248175787,0.000420751765224905,0.0004233847097504757,0.0004260476397605423,0.00042872749041785965,0.00043142758290284526,0.0004341564844424927,0.00043690928424777346,0.0004396843055149165,0.0004424906487252228,0.0004453122006990714,0.0004481503388598236,0.000451019563578205,0.0004539064935843748,0.0004568223321360708,0.00045976949521454587,0.00046274275454218626,0.000465739676662285,0.0004687543485947832,0.0004717899756219786,0.00047484196335179204,0.0004779157006065665,0.00048099185939732214,0.000484059287122122,0.00048712373701417756,0.0004901829930664302,0.0004932185712203833,0.0004962219250968227,0.0004991932186427435,0.00050211192364899,0.0005049683981638237,0.0005077476065649705,0.00051044422432169,0.0005130680711652913,0.0005156054718910445,0.0005180377173051979,0.0005203630725577463,0.0005225897449266406,0.0005247200703613907,0.0005267492379979642,0.0005286889202868101,0.0005305349736071307,0.000532293182693821,0.000533947702528207,0.0005354899693854711,0.0005369249008391354,0.000538254426165698,0.0005394673752644356,0.0005405606311439954,0.0005415335282913121,0.0005423785592135392,0.0005430979268030405,0.000543690248872622,0.0005441406418564585,0.0005444638890952991,0.0005446623679679817,0.0005447498848446254,0.0005447303385892999,0.0005445994615337591,0.0005443635829900195,0.0005440268568784987,0.0005435876912818571,0.0005430401651340691,0.0005424100461733814,0.0005417003331063017,0.0005409120764998301,0.0005400355402525732,0.0005390637735812283,0.000538013254233786,0.0005368879054021966,0.0005356849344446651,0.0005344138631116489,0.0005330834343071236,0.0005317095515306564,0.0005302805658707534,0.0005288120661475428,0.0005273127632333068,0.000525798882506108,0.0005242735360087795,0.0005227266901205977,0.0005211772873441492,0.0005196305180330962,0.0005180882187035137,0.0005165517604963677,0.0005150310714004995,0.000513528102752999,0.000512048574034368,0.0005105988087780388,0.0005091784162196626,0.0005078042631580199,0.0005064783800377224,0.0005051916671935726,0.0005039512228233394,0.0005027585101167165,0.0005016182872956948,0.0005005275826613918,0.0004994921711835234,0.0004985111787888166,0.0004975789372205282,0.0004966973723336396,0.000495853188339214,0.0004950583587808087,0.0004943162188937585,0.0004936204926693121,0.00049297379430972,0.0004923787280153367,0.0004918267269138991,0.0004913194291843698,0.0004908594307017061,0.000490452175473925,0.0004901012620571907,0.0004898067982657566,0.0004895717833703774,0.0004893949201469302,0.000489280611749847,0.0004892291762759165,0.000489242110918612,0.0004893104980049854,0.0004894300062964596,0.000489591726021191,0.0004897992722069848,0.0004900553958675134,0.000490352563342694,0.0004906871525076526,0.0004910505530327276,0.0004914355209746642,0.0004918369235675506,0.0004922527211455074,0.0004926911863224274,0.0004931479654264813,0.0004936176197382436,0.0004940838655167742,0.0004945417514039944,0.0004949957720414105,0.0004954329214906467,0.0004958589400118904,0.0004962639393533246,0.0004966437251668448,0.0004969910151911405,0.0004972990772158766,0.0004975650507872379,0.0004977957014850349,0.0004979928152424081,0.0004981525283433994,0.000498274542970387,0.0004983598778406184,0.0004984046806393719,0.0004984148437247782,0.0004983870904706428,0.0004983265559667893,0.0004982360409240815,0.0004981083230892641,0.0004979395813458886,0.000497726808618828,0.0004974709463267757,0.0004971695048781929,0.00049682722792625,0.000496446277308493,0.0004960319557350333,0.0004955821587080548,0.0004950869829154906,0.00049454805188404,0.0004939661394300557,0.000493334169201413,0.0004926468140496515,0.0004918948253862885,0.000491071518298425,0.0004901693447052454,0.000489177210378148,0.0004880980844807858,0.0004869322751826524,0.0004856893178709395,0.0004843737377378158,0.00048298141209713523,0.00048153777335381765,0.0004800495238993306,0.0004785338343704032,0.00047700302358771293,0.0004754714400454736,0.00047394014359606506,0.0004724066159967994,0.0004708718038752977,0.0004693374709824624,0.0004678174960879956,0.00046630824611295046,0.000464799605690261,0.00046329378443862006,0.0004617848796764339,0.0004602769040426951,0.000458775218645967,0.00045729420645767075,0.00045584072857315417,0.00045441493062711773,0.0004530196497777351,0.0004516462197154132,0.000450307454113055,0.0004490032629050603,0.0004477410584397994,0.0004465125978752522,0.0004453013929177139,0.00044410457640621477,0.00044290950017268133,0.00044171446443037654,0.00044052312017739674,0.0004393255236394692,0.0004381213959705815,0.00043691420474002495,0.00043569229364415354,0.0004344534940562611,0.00043320694044253147,0.000431960667873184,0.0004307033019642003,0.00042943404513731307,0.0004281370730829429,0.0004268143320021066,0.00042546141096938165,0.00042406492369808925,0.00042260510533740145,0.0004210759797953058,0.00041947657345325364,0.0004177840895697297,0.0004160017693972588,0.00041412971659748855,0.000412163164584616,0.0004101079926714086,0.0004079563836712929,0.0004057059508634731,0.0004033793851778446,0.0004009856204484939,0.00039851937486742623,0.0003959709259304182,0.00039335451052500536,0.0003906574387810347,0.0003878776897235842,0.00038502187084658504,0.0003820850982192617,0.0003790603425167999,0.00037594165370722683,0.0003727107327983161,0.0003693687337925262,0.0003659225962603842,0.0003623643069260225,0.0003586883068541725,0.00035490031101308265,0.00035099294913354715,0.000346960209945098,0.0003428120443334102,0.0003385534075978549,0.0003341950143954829,0.0003297334834903652,0.00032516937842775885,0.000320507313859294,0.00031575905185639216,0.00031093589113436045,0.0003060382732953974,0.0003010832319761262,0.00029608646256500993,0.0002910380973681114,0.0002859424798423516,0.00028081018369391147,0.0002756525126151568,0.00027048558906646395,0.0002653182375784408,0.00026015105739597856,0.00025499391876684284,0.00024985105637102063,0.00024471296708618984,0.00023958862637033637,0.00023449528645782698,0.00022943481189350345,0.00022442027397020833,0.0002194540845727185,0.0002145452756975915,0.00020970344278070055,0.0002049338478179799,0.0002002378547938347,0.00019562159584245815,0.00019110392805620895,0.00018667440621254243,0.00018233408620532544,0.000178096018729508,0.00017394509146831716,0.00016987282847331076,0.00016586597412316704,0.0001619188236806837,0.00015803332483821418,0.00015420958565894217,0.0001504402710291525,0.00014672224375094446,0.00014306593197035432,0.00013946057974049066,0.0001359049651555622,0.0001323979375700922,0.00012894793127473688,0.00012556361033264277,0.00012223787930982922,0.00011897297724632734,0.00011576761301220231,0.00011262903683985266,0.00010955010400822755,0.00010652390878968054,0.00010355753263184047,0.00010064971409601986,9.780349583106635e-05,9.501127756986996e-05,9.227017264990259e-05,8.958634897132636e-05,8.695350814689604e-05,8.43654172260857e-05,8.183088058237474e-05,7.935167594777709e-05,7.691501375339566e-05,7.452110859177876e-05,7.216482781532838e-05,6.983810409025167e-05,6.754384757050891e-05,6.5274662901618e-05,6.302657578928519e-05,6.080470303395735e-05,5.8598560333334145e-05,5.639663123016021e-05,5.4201587558045815e-05,5.202048407107374e-05,4.98473054873542e-05,4.7679100554543765e-05,4.551759825929812e-05,4.334727962823254e-05,4.117468814519232e-05,3.8988901414728485e-05,3.6782779200296125e-05,3.4563694637448535e-05,3.2332382094581826e-05,3.0081853986640158e-05,2.7807909927609528e-05,2.5511881428321163e-05,2.3203604445349327e-05,2.088527336691813e-05,1.857317642881067e-05,1.6262312381157574e-05,1.3965357332095629e-05,1.1675239087880176e-05,9.39252574119979e-06,7.1120716686354265e-06,4.835850649095634e-06,2.5766581662861683e-06,3.3244208071687337e-07,-1.895938085056003e-06,-4.124994653730473e-06,-6.355178698160462e-06,-8.592515784632386e-06,-1.0842667540279147e-05,-1.3095701261988946e-05,-1.534724848111163e-05,-1.757975633850484e-05,-1.9797952015143144e-05,-2.2005106148454566e-05,-2.4205192264694863e-05,-2.640657752216383e-05,-2.859320091108964e-05,-3.076972206578087e-05,-3.291609152853977e-05,-3.502941845234686e-05,-3.711141504250691e-05,-3.917390280541706e-05,-4.123150992407236e-05,-4.328037296231017e-05,-4.5320510886371795e-05,-4.733073553220517e-05,-4.930966840412005e-05,-5.125421133614769e-05,-5.3161263696891595e-05,-5.504950145769311e-05,-5.691054404868565e-05,-5.8744741638018805e-05,-6.054941326081965e-05,-6.233061353328701e-05,-6.40755369925443e-05,-6.578823514717352e-05,-6.748886277328322e-05,-6.917014603946287e-05,-7.083663794333872e-05,-7.248331813165694e-05,-7.41157085738916e-05,-7.57397954315366e-05,-7.734787788658007e-05,-7.893682530498412e-05,-8.051037233030438e-05,-8.208366314592135e-05,-8.365229690556957e-05,-8.521636098572697e-05,-8.679083149267407e-05,-8.838010598832771e-05,-8.998761584754659e-05,-9.160872096498116e-05,-9.32422101085735e-05,-9.488750043301798e-05,-9.655538441072511e-05,-9.824084502561592e-05,-9.994706250199578e-05,-0.00010167743045575871,-0.00010343098599748871,-0.00010520496837364306,-0.00010699115973123492,-0.0001087855035872439,-0.00011059292223187876,-0.00011242192142012138,-0.00011426955897838982,-0.00011613188182130374,-0.00011799890231356865,-0.00011987698335555085,-0.000121765632500232,-0.0001236566298438769,-0.00012555665219641493,-0.00012748195968232756,-0.0001294335923329058,-0.00013140565220730096,-0.0001333988053501435,-0.00013541746322174965,-0.0001374630068640961,-0.00013954391728542706,-0.00014165464208349153,-0.00014380308977110103,-0.00014599248250730715,-0.00014822388450219838,-0.00015049244850170125,-0.00015280114824838673,-0.00015514205665533335,-0.00015751666269152656,-0.00015992621303144233,-0.00016236763033644825,-0.0001648354918906529,-0.0001673296270136299,-0.00016985426880588217,-0.00017239408557996686,-0.00017494873930306594,-0.00017750882654566424,-0.00018008499143959736,-0.00018267732442563042,-0.0001852809975096612,-0.00018788274443602192,-0.00019048736236828255,-0.0001930979579710762,-0.00019569939178441947,-0.0001982848063508352,-0.0002008594797508117,-0.00020342759493214004,-0.00020599258479055195,-0.0002085456694405473,-0.00021108974842819027,-0.0002136350819979276,-0.00021618625569292432,-0.00021872533222512782,-0.00022125869923582796,-0.00022379765630754704,-0.00022634341903696197,-0.00022890605447651018,-0.00023146596327656272,-0.00023402681125385844,-0.0002365766644616977,-0.00023910762368691224,-0.00024161248671468498,-0.0002441154106532958,-0.000246638468439507,-0.0002491860425572809,-0.0002517521685386621,-0.00025432077221451644,-0.0002566536266283938,-0.00025851932964801344,-0.00025990195730251806,-0.00026080537132552086,-0.0002612518138446692)
xcorr <- c(-600.0,-598.999165971643,-597.9983319432861,-596.9974979149291,-595.9966638865722,-594.9958298582152,-593.9949958298582,-592.9941618015013,-591.9933277731443,-590.9924937447873,-589.9916597164304,-588.9908256880734,-587.9899916597165,-586.9891576313595,-585.9883236030025,-584.9874895746456,-583.9866555462886,-582.9858215179316,-581.9849874895747,-580.9841534612177,-579.9833194328608,-578.9824854045038,-577.9816513761468,-576.9808173477899,-575.9799833194329,-574.9791492910759,-573.978315262719,-572.977481234362,-571.976647206005,-570.9758131776481,-569.9749791492911,-568.974145120934,-567.9733110925772,-566.9724770642201,-565.9716430358633,-564.9708090075062,-563.9699749791492,-562.9691409507923,-561.9683069224353,-560.9674728940784,-559.9666388657214,-558.9658048373644,-557.9649708090075,-556.9641367806505,-555.9633027522935,-554.9624687239366,-553.9616346955796,-552.9608006672227,-551.9599666388657,-550.9591326105087,-549.9582985821518,-548.9574645537948,-547.9566305254378,-546.9557964970809,-545.9549624687239,-544.954128440367,-543.95329441201,-542.952460383653,-541.9516263552961,-540.9507923269391,-539.9499582985821,-538.9491242702252,-537.9482902418682,-536.9474562135113,-535.9466221851543,-534.9457881567973,-533.9449541284404,-532.9441201000834,-531.9432860717264,-530.9424520433695,-529.9416180150125,-528.9407839866556,-527.9399499582986,-526.9391159299416,-525.9382819015847,-524.9374478732277,-523.9366138448707,-522.9357798165138,-521.9349457881568,-520.9341117597999,-519.9332777314429,-518.9324437030859,-517.931609674729,-516.930775646372,-515.929941618015,-514.9291075896581,-513.9282735613011,-512.9274395329442,-511.92660550458714,-510.9257714762302,-509.9249374478732,-508.92410341951626,-507.9232693911593,-506.92243536280233,-505.92160133444537,-504.9207673060884,-503.91993327773145,-502.9190992493745,-501.9182652210175,-500.91743119266056,-499.9165971643036,-498.91576313594663,-497.91492910758967,-496.9140950792327,-495.91326105087575,-494.9124270225188,-493.9115929941618,-492.91075896580486,-491.90992493744784,-490.9090909090909,-489.9082568807339,-488.90742285237695,-487.90658882402,-486.90575479566303,-485.90492076730607,-484.9040867389491,-483.90325271059214,-482.9024186822352,-481.9015846538782,-480.90075062552125,-479.8999165971643,-478.89908256880733,-477.89824854045037,-476.8974145120934,-475.89658048373644,-474.8957464553795,-473.8949124270225,-472.89407839866556,-471.8932443703086,-470.89241034195163,-469.89157631359467,-468.8907422852377,-467.88990825688074,-466.8890742285238,-465.8882402001668,-464.88740617180986,-463.8865721434529,-462.88573811509593,-461.88490408673897,-460.884070058382,-459.88323603002505,-458.8824020016681,-457.8815679733111,-456.88073394495416,-455.8798999165972,-454.87906588824023,-453.8782318598833,-452.8773978315263,-451.87656380316935,-450.8757297748124,-449.8748957464554,-448.87406171809846,-447.87322768974144,-446.8723936613845,-445.8715596330275,-444.87072560467055,-443.8698915763136,-442.86905754795663,-441.86822351959967,-440.8673894912427,-439.86655546288574,-438.8657214345288,-437.8648874061718,-436.86405337781486,-435.8632193494579,-434.86238532110093,-433.86155129274397,-432.860717264387,-431.85988323603004,-430.859049207673,-429.85821517931606,-428.8573811509591,-427.85654712260214,-426.8557130942452,-425.8548790658882,-424.85404503753125,-423.8532110091743,-422.8523769808173,-421.85154295246036,-420.8507089241034,-419.84987489574644,-418.8490408673895,-417.8482068390325,-416.84737281067555,-415.8465387823186,-414.8457047539616,-413.84487072560466,-412.8440366972477,-411.84320266889074,-410.8423686405338,-409.8415346121768,-408.84070058381985,-407.8398665554629,-406.8390325271059,-405.83819849874897,-404.837364470392,-403.83653044203504,-402.8356964136781,-401.8348623853211,-400.83402835696415,-399.8331943286072,-398.83236030025023,-397.83152627189327,-396.8306922435363,-395.82985821517934,-394.8290241868224,-393.8281901584654,-392.82735613010846,-391.8265221017515,-390.82568807339453,-389.82485404503757,-388.8240200166806,-387.82318598832364,-386.8223519599667,-385.8215179316097,-384.82068390325276,-383.81984987489574,-382.8190158465388,-381.8181818181818,-380.81734778982485,-379.8165137614679,-378.8156797331109,-377.81484570475396,-376.814011676397,-375.81317764804004,-374.8123436196831,-373.8115095913261,-372.81067556296915,-371.8098415346122,-370.8090075062552,-369.80817347789826,-368.8073394495413,-367.80650542118434,-366.8056713928273,-365.80483736447036,-364.8040033361134,-363.80316930775643,-362.8023352793995,-361.8015012510425,-360.80066722268555,-359.7998331943286,-358.7989991659716,-357.79816513761466,-356.7973311092577,-355.79649708090074,-354.7956630525438,-353.7948290241868,-352.79399499582985,-351.7931609674729,-350.7923269391159,-349.79149291075896,-348.790658882402,-347.78982485404504,-346.7889908256881,-345.7881567973311,-344.78732276897415,-343.7864887406172,-342.7856547122602,-341.78482068390326,-340.7839866555463,-339.78315262718934,-338.7823185988324,-337.7814845704754,-336.78065054211845,-335.7798165137615,-334.7789824854045,-333.77814845704756,-332.7773144286906,-331.77648040033364,-330.7756463719767,-329.7748123436197,-328.77397831526275,-327.7731442869058,-326.77231025854877,-325.7714762301918,-324.77064220183485,-323.7698081734779,-322.7689741451209,-321.76814011676396,-320.767306088407,-319.76647206005003,-318.7656380316931,-317.7648040033361,-316.76396997497915,-315.7631359466222,-314.7623019182652,-313.76146788990826,-312.7606338615513,-311.75979983319434,-310.7589658048374,-309.7581317764804,-308.75729774812345,-307.7564637197665,-306.7556296914095,-305.75479566305256,-304.7539616346956,-303.75312760633864,-302.7522935779817,-301.7514595496247,-300.75062552126775,-299.7497914929108,-298.7489574645538,-297.74812343619686,-296.7472894078399,-295.7464553794829,-294.7456213511259,-293.74478732276896,-292.743953294412,-291.74311926605503,-290.74228523769807,-289.7414512093411,-288.74061718098415,-287.7397831526272,-286.7389491242702,-285.73811509591326,-284.7372810675563,-283.73644703919933,-282.73561301084237,-281.7347789824854,-280.73394495412845,-279.7331109257715,-278.7322768974145,-277.73144286905756,-276.7306088407006,-275.72977481234363,-274.7289407839867,-273.7281067556297,-272.72727272727275,-271.7264386989158,-270.7256046705588,-269.72477064220186,-268.7239366138449,-267.72310258548794,-266.722268557131,-265.721434528774,-264.72060050041705,-263.7197664720601,-262.71893244370307,-261.7180984153461,-260.71726438698914,-259.7164303586322,-258.7155963302752,-257.71476230191826,-256.7139282735613,-255.71309424520433,-254.71226021684737,-253.7114261884904,-252.71059216013344,-251.70975813177648,-250.70892410341952,-249.70809007506256,-248.7072560467056,-247.70642201834863,-246.70558798999167,-245.7047539616347,-244.70391993327775,-243.70308590492078,-242.70225187656382,-241.70141784820686,-240.7005838198499,-239.69974979149293,-238.69891576313597,-237.698081734779,-236.69724770642205,-235.69641367806508,-234.69557964970812,-233.69474562135116,-232.6939115929942,-231.69307756463718,-230.69224353628022,-229.69140950792325,-228.6905754795663,-227.68974145120933,-226.68890742285237,-225.6880733944954,-224.68723936613844,-223.68640533778148,-222.68557130942452,-221.68473728106756,-220.6839032527106,-219.68306922435363,-218.68223519599667,-217.6814011676397,-216.68056713928274,-215.67973311092578,-214.67889908256882,-213.67806505421186,-212.6772310258549,-211.67639699749793,-210.67556296914097,-209.674728940784,-208.67389491242704,-207.67306088407008,-206.67222685571312,-205.67139282735616,-204.6705587989992,-203.66972477064223,-202.66889074228527,-201.6680567139283,-200.66722268557135,-199.66638865721438,-198.66555462885736,-197.6647206005004,-196.66388657214344,-195.66305254378648,-194.66221851542952,-193.66138448707255,-192.6605504587156,-191.65971643035863,-190.65888240200167,-189.6580483736447,-188.65721434528774,-187.65638031693078,-186.65554628857382,-185.65471226021685,-184.6538782318599,-183.65304420350293,-182.65221017514597,-181.651376146789,-180.65054211843204,-179.64970809007508,-178.64887406171812,-177.64804003336116,-176.6472060050042,-175.64637197664723,-174.64553794829027,-173.6447039199333,-172.64386989157634,-171.64303586321938,-170.64220183486242,-169.64136780650546,-168.6405337781485,-167.63969974979148,-166.6388657214345,-165.63803169307755,-164.6371976647206,-163.63636363636363,-162.63552960800666,-161.6346955796497,-160.63386155129274,-159.63302752293578,-158.63219349457881,-157.63135946622185,-156.6305254378649,-155.62969140950793,-154.62885738115097,-153.628023352794,-152.62718932443704,-151.62635529608008,-150.62552126772312,-149.62468723936615,-148.6238532110092,-147.62301918265223,-146.62218515429527,-145.6213511259383,-144.62051709758134,-143.61968306922438,-142.61884904086742,-141.61801501251045,-140.6171809841535,-139.61634695579653,-138.61551292743957,-137.6146788990826,-136.61384487072564,-135.61301084236868,-134.61217681401166,-133.6113427856547,-132.61050875729774,-131.60967472894077,-130.6088407005838,-129.60800667222685,-128.6071726438699,-127.60633861551293,-126.60550458715596,-125.604670558799,-124.60383653044204,-123.60300250208508,-122.60216847372811,-121.60133444537115,-120.60050041701419,-119.59966638865723,-118.59883236030026,-117.5979983319433,-116.59716430358634,-115.59633027522938,-114.59549624687241,-113.59466221851545,-112.59382819015849,-111.59299416180153,-110.59216013344457,-109.5913261050876,-108.59049207673064,-107.58965804837368,-106.58882402001672,-105.58798999165975,-104.58715596330279,-103.58632193494577,-102.58548790658881,-101.58465387823185,-100.58381984987489,-99.58298582151792,-98.58215179316096,-97.581317764804,-96.58048373644704,-95.57964970809007,-94.57881567973311,-93.57798165137615,-92.57714762301919,-91.57631359466222,-90.57547956630526,-89.5746455379483,-88.57381150959134,-87.57297748123437,-86.57214345287741,-85.57130942452045,-84.57047539616349,-83.56964136780653,-82.56880733944956,-81.5679733110926,-80.56713928273564,-79.56630525437868,-78.56547122602171,-77.56463719766475,-76.56380316930779,-75.56296914095083,-74.56213511259386,-73.5613010842369,-72.56046705587994,-71.55963302752298,-70.55879899916602,-69.55796497080905,-68.55713094245209,-67.55629691409513,-66.55546288573817,-65.5546288573812,-64.55379482902424,-63.55296080066728,-62.55212677231032,-61.551292743953354,-60.55045871559639,-59.54962468723943,-58.54879065888247,-57.547956630525505,-56.54712260216854,-55.54628857381158,-54.545454545454504,-53.54462051709754,-52.54378648874058,-51.54295246038362,-50.542118432026655,-49.54128440366969,-48.54045037531273,-47.53961634695577,-46.538782318598805,-45.53794829024184,-44.53711426188488,-43.53628023352792,-42.535446205170956,-41.534612176813994,-40.53377814845703,-39.53294412010007,-38.53211009174311,-37.531276063386144,-36.53044203502918,-35.52960800667222,-34.52877397831526,-33.527939949958295,-32.52710592160133,-31.52627189324437,-30.525437864887408,-29.524603836530446,-28.523769808173483,-27.52293577981652,-26.52210175145956,-25.521267723102596,-24.520433694745634,-23.51959966638867,-22.51876563803171,-21.517931609674747,-20.517097581317785,-19.516263552960822,-18.51542952460386,-17.514595496246898,-16.513761467889935,-15.512927439532973,-14.51209341117601,-13.511259382819048,-12.510425354462086,-11.509591326105124,-10.508757297748161,-9.507923269391199,-8.507089241034237,-7.506255212677274,-6.505421184320312,-5.50458715596335,-4.503753127606387,-3.502919099249425,-2.5020850708924627,-1.5012510425355003,-0.500417014178538,0.5004170141784243,1.5012510425353867,2.502085070892349,3.5029190992493113,4.503753127606274,5.504587155963236,6.505421184320198,7.506255212677161,8.507089241034237,9.507923269391199,10.508757297748161,11.509591326105124,12.510425354462086,13.511259382819048,14.51209341117601,15.512927439532973,16.513761467889935,17.514595496246898,18.51542952460386,19.516263552960822,20.517097581317785,21.517931609674747,22.51876563803171,23.51959966638867,24.520433694745634,25.521267723102596,26.52210175145956,27.52293577981652,28.523769808173483,29.524603836530446,30.525437864887408,31.52627189324437,32.52710592160133,33.527939949958295,34.52877397831526,35.52960800667222,36.53044203502918,37.531276063386144,38.53211009174311,39.53294412010007,40.53377814845703,41.534612176813994,42.535446205170956,43.53628023352792,44.53711426188488,45.53794829024184,46.538782318598805,47.53961634695577,48.54045037531273,49.54128440366969,50.542118432026655,51.54295246038362,52.54378648874058,53.54462051709754,54.545454545454504,55.54628857381147,56.54712260216843,57.54795663052539,58.54879065888235,59.549624687239316,60.55045871559628,61.55129274395324,62.5521267723102,63.552960800667165,64.55379482902413,65.55462885738109,66.55546288573805,67.55629691409501,68.55713094245198,69.55796497080894,70.5587989991659,71.55963302752286,72.56046705587983,73.5613010842369,74.56213511259386,75.56296914095083,76.56380316930779,77.56463719766475,78.56547122602171,79.56630525437868,80.56713928273564,81.5679733110926,82.56880733944956,83.56964136780653,84.57047539616349,85.57130942452045,86.57214345287741,87.57297748123437,88.57381150959134,89.5746455379483,90.57547956630526,91.57631359466222,92.57714762301919,93.57798165137615,94.57881567973311,95.57964970809007,96.58048373644704,97.581317764804,98.58215179316096,99.58298582151792,100.58381984987489,101.58465387823185,102.58548790658881,103.58632193494577,104.58715596330273,105.5879899916597,106.58882402001666,107.58965804837362,108.59049207673058,109.59132610508755,110.59216013344451,111.59299416180147,112.59382819015843,113.5946622185154,114.59549624687236,115.59633027522932,116.59716430358628,117.59799833194324,118.59883236030021,119.59966638865717,120.60050041701413,121.6013344453711,122.60216847372806,123.60300250208502,124.60383653044198,125.60467055879894,126.6055045871559,127.60633861551287,128.60717264386983,129.6080066722268,130.60884070058376,131.60967472894072,132.61050875729768,133.61134278565464,134.6121768140116,135.61301084236857,136.61384487072564,137.6146788990826,138.61551292743957,139.61634695579653,140.6171809841535,141.61801501251045,142.61884904086742,143.61968306922438,144.62051709758134,145.6213511259383,146.62218515429527,147.62301918265223,148.6238532110092,149.62468723936615,150.62552126772312,151.62635529608008,152.62718932443704,153.628023352794,154.62885738115097,155.62969140950793,156.6305254378649,157.63135946622185,158.63219349457881,159.63302752293578,160.63386155129274,161.6346955796497,162.63552960800666,163.63636363636363,164.6371976647206,165.63803169307755,166.6388657214345,167.63969974979148,168.64053377814844,169.6413678065054,170.64220183486236,171.64303586321932,172.6438698915763,173.64470391993325,174.6455379482902,175.64637197664717,176.64720600500414,177.6480400333611,178.64887406171806,179.64970809007502,180.65054211843199,181.65137614678895,182.6522101751459,183.65304420350287,184.65387823185984,185.6547122602168,186.65554628857376,187.65638031693072,188.65721434528768,189.65804837364465,190.6588824020016,191.65971643035857,192.66055045871553,193.6613844870725,194.66221851542946,195.66305254378642,196.66388657214338,197.66472060050035,198.6655546288573,199.66638865721427,200.66722268557123,201.6680567139283,202.66889074228527,203.66972477064223,204.6705587989992,205.67139282735616,206.67222685571312,207.67306088407008,208.67389491242704,209.674728940784,210.67556296914097,211.67639699749793,212.6772310258549,213.67806505421186,214.67889908256882,215.67973311092578,216.68056713928274,217.6814011676397,218.68223519599667,219.68306922435363,220.6839032527106,221.68473728106756,222.68557130942452,223.68640533778148,224.68723936613844,225.6880733944954,226.68890742285237,227.68974145120933,228.6905754795663,229.69140950792325,230.69224353628022,231.69307756463718,232.69391159299414,233.6947456213511,234.69557964970807,235.69641367806503,236.697247706422,237.69808173477895,238.69891576313591,239.69974979149288,240.70058381984984,241.7014178482068,242.70225187656376,243.70308590492073,244.7039199332777,245.70475396163465,246.7055879899916,247.70642201834858,248.70725604670554,249.7080900750625,250.70892410341946,251.70975813177643,252.7105921601334,253.71142618849035,254.7122602168473,255.71309424520427,256.71392827356124,257.7147623019182,258.71559633027516,259.7164303586321,260.7172643869891,261.71809841534605,262.718932443703,263.71976647206,264.72060050041705,265.721434528774,266.722268557131,267.72310258548794,268.7239366138449,269.72477064220186,270.7256046705588,271.7264386989158,272.72727272727275,273.7281067556297,274.7289407839867,275.72977481234363,276.7306088407006,277.73144286905756,278.7322768974145,279.7331109257715,280.73394495412845,281.7347789824854,282.73561301084237,283.73644703919933,284.7372810675563,285.73811509591326,286.7389491242702,287.7397831526272,288.74061718098415,289.7414512093411,290.74228523769807,291.74311926605503,292.743953294412,293.74478732276896,294.7456213511259,295.7464553794829,296.74728940783984,297.7481234361968,298.74895746455377,299.74979149291073,300.7506255212677,301.75145954962466,302.7522935779816,303.7531276063386,304.75396163469554,305.7547956630525,306.75562969140947,307.75646371976643,308.7572977481234,309.75813177648035,310.7589658048373,311.7597998331943,312.76063386155124,313.7614678899082,314.76230191826517,315.7631359466221,316.7639699749791,317.76480400333605,318.765638031693,319.76647206005,320.76730608840694,321.7681401167639,322.76897414512086,323.7698081734778,324.7706422018348,325.77147623019175,326.7723102585487,327.7731442869057,328.77397831526264,329.7748123436197,330.7756463719767,331.77648040033364,332.7773144286906,333.77814845704756,334.7789824854045,335.7798165137615,336.78065054211845,337.7814845704754,338.7823185988324,339.78315262718934,340.7839866555463,341.78482068390326,342.7856547122602,343.7864887406172,344.78732276897415,345.7881567973311,346.7889908256881,347.78982485404504,348.790658882402,349.79149291075896,350.7923269391159,351.7931609674729,352.79399499582985,353.7948290241868,354.7956630525438,355.79649708090074,356.7973311092577,357.79816513761466,358.7989991659716,359.7998331943286,360.80066722268555,361.8015012510425,362.8023352793995,363.80316930775643,364.8040033361134,365.80483736447036,366.8056713928273,367.8065054211843,368.80733944954125,369.8081734778982,370.80900750625517,371.80984153461213,372.8106755629691,373.81150959132606,374.812343619683,375.81317764804,376.81401167639694,377.8148457047539,378.81567973311087,379.81651376146783,380.8173477898248,381.81818181818176,382.8190158465387,383.8198498748957,384.82068390325264,385.8215179316096,386.82235195996657,387.82318598832353,388.8240200166805,389.82485404503745,390.8256880733944,391.8265221017514,392.82735613010846,393.8281901584654,394.8290241868224,395.82985821517934,396.8306922435363,397.83152627189327,398.83236030025023,399.8331943286072,400.83402835696415,401.8348623853211,402.8356964136781,403.83653044203504,404.837364470392,405.83819849874897,406.8390325271059,407.8398665554629,408.84070058381985,409.8415346121768,410.8423686405338,411.84320266889074,412.8440366972477,413.84487072560466,414.8457047539616,415.8465387823186,416.84737281067555,417.8482068390325,418.8490408673895,419.84987489574644,420.8507089241034,421.85154295246036,422.8523769808173,423.8532110091743,424.85404503753125,425.8548790658883,426.8557130942452,427.85654712260225,428.8573811509591,429.8582151793162,430.859049207673,431.8598832360301,432.86071726438695,433.861551292744,434.8623853211009,435.86321934945795,436.8640533778148,437.8648874061719,438.8657214345287,439.8665554628858,440.86738949124265,441.8682235195997,442.8690575479566,443.86989157631365,444.8707256046705,445.8715596330276,446.8723936613844,447.8732276897415,448.87406171809835,449.8748957464554,450.87572977481227,451.87656380316935,452.8773978315262,453.8782318598833,454.8790658882401,455.8798999165972,456.88073394495405,457.8815679733111,458.88240200166797,459.88323603002505,460.8840700583819,461.88490408673897,462.8857381150958,463.8865721434529,464.88740617180974,465.8882402001668,466.88907422852367,467.88990825688074,468.8907422852376,469.89157631359467,470.8924103419515,471.8932443703086,472.89407839866544,473.8949124270225,474.89574645537937,475.89658048373644,476.8974145120933,477.89824854045037,478.8990825688072,479.8999165971643,480.90075062552114,481.9015846538782,482.90241868223507,483.90325271059214,484.904086738949,485.90492076730607,486.9057547956629,487.90658882402,488.90742285237684,489.9082568807339,490.909090909091,491.90992493744784,492.9107589658049,493.91159299416177,494.91242702251884,495.9132610508757,496.91409507923277,497.9149291075896,498.9157631359467,499.91659716430354,500.9174311926606,501.91826522101746,502.91909924937454,503.9199332777314,504.92076730608846,505.9216013344453,506.9224353628024,507.92326939115924,508.9241034195163,509.92493744787316,510.92577147623024,511.9266055045871,512.9274395329442,513.928273561301,514.9291075896581,515.9299416180149,516.930775646372,517.9316096747289,518.9324437030859,519.9332777314428,520.9341117597999,521.9349457881567,522.9357798165138,523.9366138448706,524.9374478732277,525.9382819015846,526.9391159299416,527.9399499582985,528.9407839866556,529.9416180150124,530.9424520433695,531.9432860717263,532.9441201000834,533.9449541284403,534.9457881567973,535.9466221851542,536.9474562135113,537.9482902418681,538.9491242702252,539.949958298582,540.9507923269391,541.951626355296,542.952460383653,543.9532944120099,544.954128440367,545.9549624687238,546.9557964970809,547.9566305254377,548.9574645537948,549.9582985821517,550.9591326105087,551.9599666388656,552.9608006672227,553.9616346955797,554.9624687239366,555.9633027522937,556.9641367806505,557.9649708090076,558.9658048373644,559.9666388657215,560.9674728940784,561.9683069224354,562.9691409507923,563.9699749791494,564.9708090075062,565.9716430358633,566.9724770642201,567.9733110925772,568.974145120934,569.9749791492911,570.975813177648,571.976647206005,572.9774812343619,573.978315262719,574.9791492910758,575.9799833194329,576.9808173477898,577.9816513761468,578.9824854045037,579.9833194328608,580.9841534612176,581.9849874895747,582.9858215179315,583.9866555462886,584.9874895746455,585.9883236030025,586.9891576313594,587.9899916597165,588.9908256880733,589.9916597164304,590.9924937447872,591.9933277731443,592.9941618015011,593.9949958298582,594.9958298582151,595.9966638865722,596.997497914929,597.9983319432861,598.9991659716429,600.0)
altd  <- c(185, 276)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('T2P_H3K27ac_hg38_callpeaks_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) : 185,276',bty='n')
dev.off()