# R script for Peak Model
#  -- generated by MACS
p <- c(0.042208985272387166,0.049269250129798936,0.05635754426983828,0.06341780912725005,0.07054036127938976,0.07050610326728939,0.07023515353522286,0.07042512978414307,0.07061199166832688,0.07053101818518057,0.0705901911151721,0.07054659000886254,0.07066182150410923,0.07061199166832688,0.07064624968042725,0.07083934029408386,0.07125666516876104,0.07128469445138862,0.07111651875562318,0.07165218949028344,0.07167087567870183,0.07215048784810695,0.07207574309443343,0.07223146133125327,0.07239340829754591,0.07206017127075144,0.0720103414349691,0.07192936795182277,0.07222834696651688,0.07182970828025807,0.0717051336908022,0.0715026999829364,0.071303380639807,0.07137812539348053,0.07108226074352282,0.07128780881612501,0.07144041268820846,0.07164907512554705,0.07140926904084449,0.07122552152139708,0.07147155633557242,0.07128158008665221,0.07152761490082757,0.0714995856182,0.07188265248077681,0.0720975436475882,0.07198231215234152,0.0718079077271033,0.07214737348337055,0.07222523260178047,0.07224391879019885,0.07241209448596429,0.07248683923963782,0.07248061051016502,0.07258649891120252,0.07249618233384701,0.07244323813332826,0.07265501493540324,0.07234669282649996,0.07267681548855803,0.0726114138290937,0.0723996370270187,0.07258961327593891,0.07248683923963782,0.07241209448596429,0.07283253372537787,0.07288859229063302,0.07299448069167051,0.07286367737274184,0.07296956577377933,0.07311282655165359,0.07338066191898372,0.07322182931742749,0.07342426302529328,0.07309102599849882,0.07282007626643229,0.07299448069167051,0.07302562433903448,0.07334951827161976,0.07312216964586278,0.07296956577377933,0.07277647516012273,0.07284187681958706,0.072904164114315,0.07315642765796315,0.07349277904949401,0.07344606357844806,0.07338689064845652,0.0736048961800043,0.07356129507369474,0.07407516525520023,0.07436480117568514,0.07434611498726676,0.0745080619535594,0.07475721113247115,0.07470426693195241,0.07487244262771783,0.07502816086453769,0.07485998516877225,0.07519633656030311,0.0748132696977263,0.07480081223878071,0.07498767412296453,0.07500013158191011,0.07508421942979283,0.0752181371134579,0.07550777303394281,0.07539565590343252,0.07539565590343252,0.07569152055339022,0.07583166696652809,0.07606524432175785,0.07615244653437697,0.0761181885222766,0.07612130288701299,0.07598738520334793,0.07583166696652809,0.07610261669859461,0.07627702112383285,0.07604032940386668,0.07603721503913027,0.07587215370810124,0.07597492774440234,0.07595624155598396,0.0758285526017917,0.07592509790862,0.07595935592072035,0.07579118022495493,0.07568529182391744,0.0757226642007542,0.07583166696652809,0.07594689846177477,0.07592509790862,0.07609638796912183,0.07649502665538062,0.07673483274008319,0.07704315484898648,0.07707118413161405,0.0776286554194291,0.07775323000888497,0.07775323000888497,0.07781551730361291,0.07804909465884267,0.07829512947301803,0.07798057863464194,0.07805220902357907,0.07792763443412319,0.07830135820249083,0.07789960515149563,0.078130068141989,0.07853493555772059,0.0787249118066408,0.07844461898036509,0.07840724660352832,0.07847576262772905,0.07813941123619819,0.07808023830620664,0.07803663719989709,0.07809581012988863,0.07759439740732874,0.07720821618001551,0.07705561230793206,0.07719887308580632,0.07711167087318721,0.07718641562686074,0.07713970015581478,0.07716772943844236,0.07698709628373133,0.07697152446004935,0.07756948248943756,0.07746047972366367,0.07759751177206513,0.07778748802098534,0.07765357033732027,0.07765045597258387,0.07761619796048351,0.07758193994838314,0.07750408082997322,0.07751030955944602,0.07729853275737103,0.0776286554194291,0.07744179353524529,0.07730476148684381,0.07763176978416549,0.0778186316683493,0.0781176106830434,0.07798369299937834,0.07811449631830701,0.07833561621459119,0.07834184494406399,0.0784352758861559,0.07864082395875809,0.07844150461562868,0.07829201510828164,0.07830758693196362,0.07825152836670847,0.07844150461562868,0.07877162727768676,0.07868442506506765,0.07877474164242315,0.07874982672453198,0.07868753942980404,0.07911109303395401,0.079126664857636,0.07908617811606285,0.07929484055340144,0.07931352674181982,0.07918272342289115,0.07924189635288269,0.07907060629238086,0.07936647094233856,0.079730851616497,0.07974019471070619,0.0797277372517606,0.07949415989653084,0.07921386707025511,0.07917026596394557,0.07879342783084153,0.07888374440819705,0.07893980297345218,0.0787249118066408,0.07834495930880038,0.07803975156463348,0.07789026205728644,0.07809892449462502,0.07837610295616435,0.07821727035460811,0.07820481289566251,0.07811138195357062,0.07803040847042429,0.07768159961994785,0.07785911840992246,0.07793697752833238,0.07828267201407245,0.07835430240300957,0.07820169853092612,0.07827332891986326,0.07849444881614744,0.07843839025089229,0.07849444881614744,0.07875294108926838,0.0787280261713772,0.07879654219557793,0.0786221377703397,0.07847576262772905,0.0787249118066408,0.07894914606766137,0.07909240684553563,0.07925435381182827,0.07938204276602055,0.07910174993974482,0.07899586153870733,0.07855050738140258,0.07840413223879192,0.07865016705296728,0.07863459522928529,0.0787280261713772,0.07866885324138566,0.07853493555772059,0.07878719910136874,0.0793290985655018,0.07975888089912457,0.08000180134856354,0.08040355439955874,0.0800391737254003,0.07997377206593596,0.08011080411433742,0.08035683892851278,0.08069007595530725,0.08040044003482233,0.08030389472799403,0.08005163118434588,0.08039421130534954,0.08060910247216092,0.08111051519472083,0.08136589310310538,0.08146866713940647,0.08137523619731457,0.08135343564415978,0.08165864338832668,0.08181436162514653,0.08161192791728072,0.08186107709619247,0.08173338814200021,0.08178633234251896,0.08157144117570757,0.081527840069398,0.08171158758884543,0.08154652625781639,0.08169290140042705,0.08166487211779948,0.0822441439587693,0.08211022627510423,0.0822472583235057,0.08189222074355645,0.08206973953353107,0.08211334063984063,0.08238740473664356,0.08331548542808984,0.0839477014695784,0.08488201089049748,0.08576960484037059,0.08699043581703818,0.0882797828179065,0.08980582153874096,0.09150315032007728,0.09331571059666027,0.09473274655172086,0.0955954255837028,0.09615289687151785,0.09696263170298104,0.09758239028552403,0.09796545714810084,0.0984045825759328,0.09886862292165595,0.09916448757161365,0.09908039972373094,0.09926103287844196,0.09918628812476843,0.0997219588594287,0.10000225168570441,0.09998356549728603,0.10050366440826432,0.10010191135726912,0.10036974672459925,0.10019222793462462,0.099818504166257,0.09954755443419047,0.10005519588622316,0.0999150494730853,0.09963164228207319,0.09978113178942023,0.099410522385789,0.099818504166257,0.09984030471941177,0.09979358924836582,0.10004896715675037,0.09996176494413125,0.0999212782025581,0.0999275069320309,0.10007076770990515,0.09985276217835737,0.09955378316366326,0.0993139770789607,0.09909908591214932,0.09856652954222545,0.0982083775975398,0.09866618921379014,0.09865684611958095,0.0985042422474975,0.09814297593807547,0.09827689362174054,0.09863504556642617,0.09865684611958095,0.09842949749382399,0.09888730911007433,0.09951018205735371,0.09901811242900299,0.09873159087325448,0.09856030081275265,0.09873781960272728,0.09874716269693647,0.09863504556642617,0.09874093396746367,0.09919251685424123,0.0991115433710949,0.09897139695795704,0.09930151962001511,0.09887796601586514,0.09929529089054231,0.0992174317721324,0.09913957265372247,0.09924857541949636,0.09937937873842503,0.09914891574793167,0.0993108627142243,0.09959426990523643,0.09974687377731987,0.1004133478309088,0.10006142461569596,0.10029500197092572,0.10047252076090035,0.10057529479720144,0.10042891965459079,0.10016108428726066,0.1003199168888169,0.10007699643937794,0.10009879699253271,0.10004273842727758,0.1007216699398121,0.10076527104612165,0.1009303323771507,0.10058152352667424,0.10090853182399591,0.10100507713082421,0.10116390973238046,0.10143797382918339,0.10142551637023779,0.10143485946444698,0.10118259592079884,0.10158123460705765,0.10166843681967676,0.10251554402797672,0.10251242966324031,0.10291729707897192,0.10310727332789213,0.10363982969781599,0.10387963578251855,0.10426893137456816,0.10458036784820786,0.1046301976839902,0.1046333120487266,0.10444645016454279,0.10455545293031668,0.10485443194501079,0.10499457835814864,0.10471117116713653,0.1047423148145005,0.10485754630974718,0.1050257220055126,0.10483574575659241,0.10502260764077621,0.10517209714812327,0.1054399325154534,0.10521569825443282,0.10496966344025747,0.10487311813342916,0.10467691315503616,0.10417550043247625,0.10426270264509538,0.1044371070703336,0.10442464961138802,0.10395749490092848,0.10348722582573254,0.10365851588623437,0.1035245982025693,0.10330659267102152,0.10331282140049432,0.10348099709625976,0.10298581310317265,0.10245014236851238,0.10230065286116533,0.10229442413169253,0.1023255677790565,0.1018210406917602,0.10183349815070579,0.10226016611959217,0.10238785507378444,0.10195807274016166,0.10187709925701535,0.10207018987067196,0.10202036003488961,0.10227262357853775,0.10209510478856314,0.10246259982745796,0.10254980204007708,0.10206707550593556,0.10201413130541681,0.10230688159063812,0.10253734458113149,0.10237228325010246,0.10256225949902266,0.10281763740740721,0.10332839322417631,0.10340625234258623,0.10349034019046895,0.10359311422677003,0.10350902637888733,0.10392012252409172,0.10432498993982331,0.10459905403662624,0.10486377503921997,0.10491049051026592,0.10522504134864201,0.10570776788278353,0.10585725739013059,0.10622786679376181,0.10688188338840517,0.10705628781364339,0.1069503994126059,0.1076542458430316,0.10827711879031097,0.10909619671598336,0.10941697628383223,0.10948860667276937,0.11035440006948771,0.11064092162523623,0.11081844041521084,0.1118648669666402,0.11283966312913243,0.11355596701850372,0.11362448304270445,0.11380823056215186,0.11474876871254373,0.11593845604184734,0.11640561075230688,0.11719665939535169,0.1182991445120362,0.11883481524669647,0.11922722520348247,0.11971929483183318,0.12037954015594932,0.12114567388110296,0.1211020727747934,0.12153185510841617,0.12174674627522757,0.12280563028560251,0.12317935405397014,0.1235219341749738,0.12392991595544178,0.12409186292173442,0.1243254402769642,0.12425380988802706,0.12469293531585902,0.12447804414904765,0.12449673033746603,0.12403580435647928,0.12379911263651312,0.12364339439969327,0.12317623968923373,0.12315132477134257,0.12298937780504993,0.12267171260193745,0.12200523854834851,0.12138547996580552,0.12061934624065189,0.11982518323287067,0.11924902575663725,0.11832094506519097,0.11785067598999505,0.11666098866069143,0.11568930686293559,0.1148702289372632,0.11416015377736471,0.11329124601590998,0.11264657251547583,0.11184929514295822,0.11074992439101011,0.11005230669005721,0.10915848401071129,0.10860101272289625,0.10805911325876319,0.10742689721727462,0.1066514203979118,0.10611574966325153,0.10590708722591294,0.1054399325154534,0.10493229106342071,0.10395438053619208,0.10358688549729725,0.10304187166842779,0.10249997220429473,0.10195184401068888,0.10157189151284846,0.1014286307349742,0.10127291249815434,0.10093656110662348,0.10074658485770327,0.10090853182399591,0.10087115944715914,0.10065315391561137,0.10037908981880844,0.10008322516885074,0.1000240522388592,0.09970327267101031,0.09937937873842503,0.09946346658630775,0.09950395332788091,0.0994136367505254,0.09915203011266806,0.0994136367505254,0.09948526713946253,0.09935134945579746,0.09953198261050848,0.0995132964220901,0.09936069255000665,0.09933577763211549,0.09948838150419893,0.09941986547999819,0.09968458648259193,0.09975310250679266,0.09984653344888457,0.10031057379460771,0.09996799367360405,0.1003136881593441,0.10039154727775403,0.10055349424404667,0.1003168025240805,0.10057529479720144,0.1002202572172522,0.09955066879892686,0.0992236605016052,0.09874093396746367,0.09863504556642617,0.09837032456383243,0.09816789085596664,0.09789694112390011,0.09746093006080454,0.09681314219563399,0.09644564715673916,0.09647679080410312,0.09623387035466417,0.09637713113253843,0.0964145035093752,0.09556739630107523,0.09417216089916942,0.09261809289570737,0.09144086302534934,0.09055326907547623,0.08946324141773732,0.08843550105472633,0.08769428224746387,0.0867630871912812,0.08546751146094009,0.08494741254996181,0.085152960622564,0.08518098990519157,0.08530867885938384,0.08542702471936693,0.08567617389827868,0.08572911809879742,0.08579763412299816,0.08583500649983493,0.08594400926560881,0.08612152805558344,0.0859626954540272,0.08619627280925696,0.08632084739871283,0.08623987391556652,0.08593466617139962,0.08612464242031984,0.08603432584296432,0.08591286561824485,0.08581009158194375,0.085560942403032,0.08560142914460515,0.0855671711325048,0.08557651422671399,0.08539276670726656,0.08564503025091472,0.08533982250674782,0.08516541808150958,0.08480103740735115,0.08489758271417945,0.08488201089049748,0.0849598700089074,0.08496921310311659,0.08481660923103314,0.08521213355255554,0.08486021033734269,0.0850470722215265,0.08504084349205371,0.0851591893520368,0.08513116006940923,0.08521524791729194,0.08508444459836327,0.08507198713941769,0.08499724238574416,0.08470449210052285,0.08514673189309122,0.08491004017312505,0.0850501865862629,0.08509690205730885,0.0849536412794346,0.08474809320683241,0.08450517275739344,0.0844615716510839,0.08470137773578645,0.08476055066577799,0.08459237497001255,0.08486643906681549,0.08483218105471513,0.08503772912731732,0.08536473742463899,0.0855578280382956,0.08588795070035367,0.08600629656033676,0.0862523313745121,0.08629281811608527,0.08617135789136579,0.08631773303397644,0.08648590872974188,0.0866634275197165,0.08672882917918083,0.08690011923968266,0.08687831868652789,0.08689077614547347,0.08681291702706355,0.08695306344020141,0.08714303968912163,0.08706518057071169,0.08728007173752309,0.08714615405385802,0.0875728220227444,0.08750119163380726,0.08760085130537197,0.08745759052749771,0.08728318610225948,0.08720532698384956,0.08751364909275285,0.08748873417486168,0.08742956124487014,0.08739530323276977,0.08713369659491244,0.08722712753700433,0.08735481649119661,0.08740776069171535,0.087373502679615,0.08742956124487014,0.08713369659491244,0.08700600764072015,0.08671325735549885,0.08659491149551576,0.08632707612818563,0.08599383910139116,0.08580074848773456,0.08563257279196912,0.08537719488358458,0.08511870261046364,0.08503772912731732,0.08497544183258939,0.08473875011262322,0.08479169431314196,0.08456746005212139,0.08422487993111773,0.08392901528116002,0.08383558433906811,0.08398507384641517,0.08370478102013944,0.08344006001754571,0.08329679923967145,0.08330614233388065,0.08282653016447553,0.08270818430449244,0.08277358596395677,0.08260541026819133,0.08202613842722152,0.0817427312362094,0.08144686658625169,0.08119148867786714,0.08100774115841973,0.08067761849636165,0.08045026987060469,0.08018554886801095,0.08011080411433742,0.08015129085591058,0.08027897981010286,0.07998622952488155,0.08030078036325763,0.08025406489221168,0.08022292124484771,0.07992394223015362,0.07986476930016206,0.08004540245487309,0.07995197151278118,0.0800267162664547,0.07992394223015362,0.07989591294752604,0.07972462288702421,0.07971839415755141,0.07958447647388635,0.07978068145227936,0.0797277372517606,0.07990214167699883,0.07976822399333376,0.07934778475392018,0.0794381013312757,0.07947235934337606,0.07920452397604592,0.07930729801234702,0.07927926872971945,0.0796343063096687,0.07929795491813783,0.07879342783084153,0.07891488805556102,0.07871556871243161,0.07877162727768676,0.07844150461562868,0.0785255924635114,0.07809581012988863,0.07788714769255004,0.07748228027681844,0.07791517697517761,0.07820481289566251,0.07790583388096842,0.07841658969773752,0.07823284217829009,0.07857230793455736,0.07848199135720184,0.0789211167850338,0.07907060629238086,0.0791297792223724,0.07917026596394557,0.07891800242029741,0.07919829524657314,0.07894914606766137,0.07907372065711725,0.07902077645659851,0.07911420739869042,0.0786221377703397,0.07868442506506765,0.07863459522928529,0.07855050738140258,0.07848199135720184,0.07846330516878347,0.0785193637340386,0.07884325766662388,0.07871245434769522,0.07857853666403015,0.07880277092505072,0.07864082395875809,0.07860656594665773,0.07862525213507611,0.0785287068282478,0.07841347533300111,0.07817678361303496,0.07779683111519453,0.07786223277465887,0.07780305984466732,0.07791206261044122,0.07789960515149563,0.07797434990516915,0.0781176106830434,0.07821727035460811,0.07818612670724415,0.07836675986195515,0.07865639578244008,0.07884014330188749,0.07893980297345218,0.07866262451191286,0.07875294108926838,0.0787280261713772,0.07870311125348603,0.07870622561822242,0.07888685877293344,0.07889308750240624,0.07857853666403015,0.07864705268823088,0.07866885324138566,0.07874671235979558,0.07846953389825626,0.07850067754562022,0.07834807367353677,0.07817989797777135,0.0779307487988596,0.07785600404518607,0.07783108912729489,0.0774231073468269,0.07717084380317875,0.07706806976687765,0.07724247419211588,0.07729541839263462,0.077314104581053,0.07735147695788977,0.07740753552314492,0.07748539464155484,0.07767225652573866,0.07813629687146179,0.07868753942980404,0.07915469414026358,0.07925435381182827,0.07925746817656468,0.07937892840128415,0.07978379581701575,0.07996754333646316,0.08019800632695653,0.07995197151278118,0.07969036487492384,0.07961250575651392,0.07980559637017053,0.07964676376861428,0.07935712784812937,0.07926058254130107,0.07904257700975328,0.0791297792223724,0.07899897590344374,0.07927304000024665,0.07946613061390327,0.07936958530707496,0.07907994938659005,0.07919829524657314,0.07926992563551026,0.07899274717397094,0.07910486430448123,0.07873736926558639,0.07841347533300111,0.07857230793455736,0.0783169300261728,0.07830758693196362,0.07800549355253313,0.07819546980145332,0.0783231587556456,0.07865951014717647,0.07837921732090075,0.07852247809877501,0.07867819633559485,0.07867819633559485,0.0788370289371511,0.07884637203136029,0.07875916981874118,0.0786221377703397,0.07851002063982941,0.07855673611087537,0.07846019080404706,0.0782266134488173,0.07806778084726106,0.07773765818520299,0.07727673220421624,0.07689055097690303,0.0768251493174387,0.07654174212642657,0.07648879792590783,0.07600607139176631,0.07598738520334793,0.07606212995702145,0.0761181885222766,0.07573823602443618,0.07594689846177477,0.07610261669859461,0.07620539073489571,0.07566972000023545,0.07536762662080494,0.07547974375131523,0.07560120397603472,0.07534582606765017,0.07514027799504798,0.07504373268821966,0.07497521666401893,0.07475721113247115,0.07460772162512411,0.07473852494405277,0.07434922935200317,0.07424956968043846,0.07395059066574436,0.07398796304258112,0.0736080105447407,0.07374504259314216,0.07322805804690027,0.07283253372537787,0.0723062060849268,0.0727017304064492,0.07288236356116022,0.0722937486259812,0.07206951436496063,0.07176119225605734,0.07201345579970549,0.07170201932606579,0.0718982243044588,0.07217228840126173,0.07284499118432346,0.07267370112382163,0.07274221714802236,0.073100369092708,0.07305053925692566,0.07297890886798852,0.07293842212641537,0.0729072784790514,0.07279516134854111,0.07258027018172972,0.07222834696651688,0.07207885745916982,0.0719947696112871,0.07193559668129557,0.07183905137446726,0.0718079077271033,0.07154007235977315,0.07148089942978161,0.0713999259466353,0.07150892871240919,0.07128158008665221,0.07101685908405848,0.07115389113245994,0.07128469445138862,0.0712971519103342,0.07154318672450956,0.07175807789132094,0.07185773756288565,0.07196051159918673,0.07179856463289411,0.07196985469339592,0.07193248231655917,0.07189510993972241,0.07173316297342977,0.07167399004343822,0.07173939170290256,0.07161793147818309,0.07122240715666067,0.07092342814196657,0.07089228449460261,0.07072099443410078,0.07073345189304636,0.07042512978414307,0.07007320656893022,0.06995486070894713,0.06930084411430379,0.06935690267955893,0.06952196401058797,0.06954999329321554,0.06961539495267988,0.06971194025950818,0.06954376456374274,0.06940361815060489,0.06972751208319017,0.07002960546262066,0.07045315906677065,0.07028186900626882,0.07043135851361586,0.07066805023358202,0.07044070160782505,0.07007632093366661,0.07035038503046954,0.07071476570462798,0.07037218558362432,0.07043447287835226,0.07058084802096291,0.07074902371672835,0.07044693033729785,0.07013549386365815,0.069898802143692,0.06979291374265449,0.06931641593798578,0.06896449272277293,0.06902055128802807,0.06863748442545124,0.06836653469338472,0.06792118053607996,0.0683789921523303,0.0684848805533678,0.06884926122752624,0.06921987063115746,0.0695904800347887,0.06950016345743319,0.06940361815060489,0.06944410489217805,0.06933198776166775,0.06947524853954201,0.06913266841853835,0.06912332532432916,0.06909529604170159,0.06880566012121668,0.06886171868647183,0.06886483305120822,0.06904858057065565,0.06909529604170159,0.06895826399330013,0.06901432255855527,0.0691856126190571,0.06922921372536665,0.069082838582756,0.0692977297495674,0.06925724300799423,0.06941296124481408,0.0695811369405795,0.06952196401058797,0.06969636843582619,0.06954065019900635,0.06945033362165084,0.06962162368215268,0.06992683142631957,0.06978357064844531,0.06940984688007767,0.06915446897169314,0.06875271592069794,0.06866239934334242,0.06844439381179464,0.06862814133124205,0.06851602420073177,0.0680893562318454,0.06753499930876675,0.06752565621455756,0.06783086395872445,0.0681859015386737,0.06836964905812111,0.06852536729494096,0.06895203526382733,0.06866862807281522,0.06855651094230493,0.06855962530704132,0.06874648719122514,0.06890843415751778,0.06884303249805344,0.06856273967177773,0.068282446845502,0.06813607170289135,0.06753499930876675,0.06739485289562888,0.06751942748508476,0.06756925732086712,0.06715504681092632,0.06680623796044988,0.06660380425258407,0.06641071363892746,0.06648857275733738,0.06639514181524549,0.06659134679363848,0.06698375675042449,0.06716438990513551,0.06708653078672559,0.06747582637877521,0.06772186119295057,0.06779972031136049,0.0678931512534524,0.06783397832346084,0.0675817147798127,0.0675754860503399,0.06739796726036529,0.06683738160781384,0.06689344017306899,0.06694638437358773,0.06685606779623222,0.06665051972363002,0.06675952248940392,0.06651971640470136,0.06664740535889363,0.06629859650841718,0.06613353517738814,0.0660681335179238,0.06586258544532161,0.06550131913589957,0.06531134288697936,0.0652739705101426,0.0648659887296746,0.06498433458965769,0.06481304452915586,0.06490024674177497,0.06489401801230217,0.06545148930011722,0.0654701754885356,0.0656663804669286,0.06533314344013413,0.06524282686277863,0.06528954233382459,0.06499990641333968,0.06474452850495513,0.06489090364756578,0.06452963733814374,0.06394725113243752,0.06360778537617026,0.06327143398463939,0.06352369752828754,0.06362647156458864,0.06390053566139156,0.06394413676770112,0.06428983125344118,0.06398773787401069,0.06381333344877245,0.06372301687141695,0.06381956217824525,0.06404379643926582,0.06398773787401069,0.06380399035456326,0.06353304062249673,0.063660729576689,0.06333683564410372,0.06312817320676513,0.06323717597253903,0.06338043675041329,0.06354238371670592,0.06360467101143386,0.06367630140037099,0.06353615498723313,0.06357975609354269,0.06345518150408681,0.06334929310304932,0.06370433068299856,0.06409674063978457,0.06410608373399376,0.06388184947297318,0.06356729863459709,0.06358909918775188,0.06403756770979303,0.06393167930875554,0.06390987875560075,0.06419328594661287,0.06401576715663825,0.06374793178930811,0.06374793178930811,0.06373547433036253,0.06385070582560921,0.06348632515145078,0.06291328203995375,0.06268593341419677,0.06282296546259825,0.06295065441679051,0.06302851353520043,0.0629693406052089,0.06297556933468168,0.06286968093364419,0.06239941185844826,0.06265478976683281,0.06289459585153537,0.06320291796043866,0.06275133507366111,0.06224369362162842,0.06200700190166225,0.0617609670874869,0.0613529853070189,0.061483788625947576,0.061539847191202715,0.06136232840122809,0.06136544276596449,0.06141215823701045,0.06141215823701045,0.06152738973225713,0.06160213448593065,0.06189799913588836,0.05585924591201477,0.04955888605028385,0.04355439083851063,0.03734123318939882,0.0)
m <- c(0.037320132759454235,0.04355261986023149,0.04959501610443504,0.05583061944876269,0.0621877562915555,0.062222034970609776,0.06212231517699734,0.06240277709653231,0.0623529171997261,0.06235914968682687,0.06246821821109048,0.06272686642577273,0.06297928215335422,0.06325974407288919,0.0632566278293388,0.06315690803572636,0.06312574560022248,0.06316937300992792,0.06320676793253258,0.06337816132780395,0.06338439381490472,0.06277672632257895,0.0628203537322844,0.06244952074978814,0.06239654460943154,0.06241835831428426,0.06260533292730758,0.062377847148129204,0.06228124359806716,0.06236849841747804,0.06259286795310602,0.06298551464045499,0.0628452836806875,0.06288579484684255,0.06294811971785032,0.06285774865488905,0.06289202733394333,0.06293253850009838,0.06292007352589682,0.06316937300992792,0.06258351922245485,0.06231552227712143,0.06252431059499747,0.0625741704918037,0.06249938064659436,0.0625461242998502,0.06265519282411379,0.06290137606459449,0.06313821057442404,0.06287332987264099,0.0630665369727651,0.06339997503265668,0.06323793036803646,0.06307900194696664,0.0632566278293388,0.06325039534223802,0.06295123596140072,0.0629263060129976,0.0630073283453077,0.06314444306152481,0.06343113746816056,0.06356201969727689,0.06366485573443971,0.064020107499184,0.06401387501208324,0.064244477034812,0.06411047856214529,0.06395778262817624,0.06390480648781963,0.06376769177160253,0.06382690039905992,0.06355267096662572,0.06378950547645525,0.06387676029586613,0.06393285267977313,0.06379262172000565,0.06412294353634683,0.06417280343315306,0.06421331459930811,0.06403880496048635,0.06381443542485836,0.06403257247338556,0.0639702476023778,0.06427875571386626,0.06428498820096705,0.06450000900594387,0.06456856636405241,0.06474619224642457,0.06497056178205254,0.06537567344360307,0.0656686003373396,0.06582441251485903,0.0660238521020839,0.06599892215368079,0.06580883129710709,0.06571534399059542,0.06560627546633183,0.06564990287603727,0.06554395059532406,0.06557199678727756,0.0654193008533085,0.06542241709685889,0.06521051253543247,0.06494251559009905,0.06542553334040928,0.0655875780050295,0.06590231860361874,0.06599892215368079,0.06593036479557224,0.06604566580693662,0.06624822163771188,0.06623575666351032,0.06639468508458014,0.06637598762327782,0.06632924397002199,0.06650375360884375,0.0665972409153554,0.06631989523937082,0.06654426477499881,0.06653179980079725,0.0667094256831694,0.06678421552837872,0.06693379521879739,0.06687770283489039,0.06683719166873534,0.06667514700411513,0.06661593837665775,0.06690574902684389,0.06700235257690593,0.06696184141075087,0.06703351501240981,0.06718932718992925,0.06729527947064246,0.06767546118378988,0.06762248504343327,0.0676692286966891,0.06756950890307666,0.06757262514662705,0.06770039113219298,0.06807745660179,0.06799331802592952,0.06781880838710776,0.0678312733613093,0.06778452970805347,0.06805564289693729,0.06814913020344894,0.06809927030664273,0.06818340888250322,0.06797773680817758,0.06775959975965037,0.06820833883090632,0.06854177689079792,0.06841089466168158,0.0683267560858211,0.06819587385670478,0.06842959212298393,0.06859163678760413,0.06864149668441034,0.06863214795375919,0.06860721800535607,0.06830494238096838,0.06812420025504584,0.06823015253575905,0.06845452207138703,0.06860410176180569,0.06847010328913898,0.06856359059565063,0.06851373069884442,0.06872251901672045,0.06886586622003833,0.06852931191659636,0.06860721800535607,0.0688440525151856,0.06878172764417784,0.06861033424890646,0.0690123296669066,0.06912451443472059,0.06916502560087565,0.06919930427992992,0.06937381391875168,0.06955767228822461,0.06941744132845712,0.06949534741721683,0.06962934588988355,0.06990045907876735,0.0696667408124882,0.06960441594148044,0.06988487786101541,0.06978515806740297,0.06987241288681385,0.06975711187544947,0.06993785400137202,0.06948911493011606,0.06942990630265868,0.06924916417673613,0.06919618803637953,0.06950781239141839,0.06946730122526333,0.06989734283521697,0.06969790324799209,0.06992227278362008,0.06995343521912396,0.06990357532231775,0.06997213268042629,0.07034919815002331,0.07054240525014742,0.07014975856279845,0.0701372935885969,0.06970101949154249,0.06985994791261231,0.0699690164368759,0.07015910729344961,0.07041463926458148,0.0706016138776048,0.0703554306371241,0.07024636211286049,0.07024636211286049,0.0701902697289535,0.07027440830481399,0.07015599104989922,0.07015910729344961,0.06993473775782164,0.06985994791261231,0.06976022811899987,0.06990980780941852,0.07002199257723252,0.07007496871758911,0.06999083014172863,0.07031491947096905,0.07052059154529469,0.07063277631310869,0.07076054229867462,0.07095063315524833,0.07077923975997695,0.07099426056495377,0.0708727270664886,0.07078235600352734,0.07078858849062812,0.07078235600352734,0.07064212504375986,0.07085402960518628,0.07115942147312436,0.07125290877963603,0.07146481334106244,0.07132458238129497,0.07148662704591517,0.07158634683952761,0.07159881181372917,0.07185122754131064,0.07186680875906258,0.07164867171053538,0.07160504430082994,0.07147104582816323,0.07148351080236479,0.07173592652994626,0.07208494580758978,0.07231866407386893,0.07264898589021013,0.07244331381588448,0.07283284425968306,0.07288893664359006,0.07299800516785365,0.07341869804715612,0.07354023154562128,0.0733968843423034,0.07304786506465988,0.07328469957448941,0.07291075034844277,0.0732317234341328,0.07311018993566765,0.0731787472937762,0.07272377573541945,0.07266456710796207,0.0725741960450008,0.07284219299033422,0.07305098130821026,0.07316628231957464,0.0736679975311872,0.07365553255698566,0.07356516149402438,0.0736991599666911,0.07410738787179201,0.0738082284909547,0.07398585437332685,0.07376771732479964,0.07358385895532672,0.07349660413591584,0.0738082284909547,0.07360255641662905,0.07389236706681519,0.07382380970870664,0.07358385895532672,0.07400766807817957,0.07425696756221066,0.07427878126706339,0.07448133709783865,0.07462468430115651,0.07458105689145107,0.07497993606590082,0.07518872438377686,0.07588676293906392,0.07642587307328115,0.07671568372346729,0.07705847051401003,0.07738255984325046,0.07783441515805681,0.07823017808895616,0.07829873544706471,0.07833924661321977,0.07835482783097171,0.07847947757298726,0.07870073086506485,0.07881291563287884,0.07864463848115785,0.07869761462151446,0.07845454762458415,0.07815227200019645,0.07815850448729722,0.07833924661321977,0.07881914811997962,0.0786321735069563,0.0786602196989098,0.07867268467311135,0.07874435827477029,0.07853245371334386,0.0786041273150028,0.07880356690222767,0.07900300648945255,0.0788503105554835,0.0783298978825686,0.07813357453889412,0.07808059839853751,0.07806813342433595,0.07818966692280112,0.07850752376494075,0.0787131958392664,0.07862282477630513,0.07844831513748336,0.07853245371334386,0.0786041273150028,0.07837975777937482,0.07819901565345228,0.07763185932728155,0.07713637660276976,0.07707093548821159,0.07674996240252156,0.07682475224773089,0.07670633499281612,0.07670945123636651,0.07671879996701768,0.07671568372346729,0.07680917102997895,0.07713949284632014,0.07761316186597922,0.0775882319175761,0.07798399484847546,0.07801827352752974,0.07823017808895616,0.07824264306315772,0.07819901565345228,0.07831743290836704,0.07851064000849114,0.0787692882231734,0.07871942832636718,0.07891886791359205,0.07865087096825862,0.07865398721180902,0.07865087096825862,0.07848259381653765,0.07863840599405707,0.07875682324897185,0.07871631208281679,0.07836729280517327,0.07819901565345228,0.07804631971948324,0.07799022733557624,0.07790608875971575,0.0777533928257467,0.0778375314016072,0.07751344207236678,0.07755395323852184,0.07741372227875434,0.0775352557772195,0.07768483546763816,0.0775103258288164,0.07771288165959166,0.07789362378551419,0.0777845552612506,0.07777832277414981,0.07807436591143674,0.07802138977108013,0.07815538824374683,0.07808683088563828,0.0782738054986616,0.07845143138103376,0.07829873544706471,0.07828315422931277,0.07847636132943686,0.07842650143263065,0.0785480349310958,0.07858854609725086,0.078710079595716,0.07869449837796406,0.07853556995689424,0.07842650143263065,0.07862282477630513,0.07865398721180902,0.07873189330056873,0.0787131958392664,0.07866333594246018,0.07883784558128194,0.07890017045228973,0.07920556232022781,0.07932086333159219,0.0796729988527861,0.07965430139148377,0.07970727753184037,0.07959820900757678,0.07992853082391797,0.0797820673770497,0.07976648615929775,0.07988801965776292,0.07952341916236745,0.07918998110247587,0.07879733441512689,0.07856361614884774,0.07841715270197948,0.07839533899712677,0.07848259381653765,0.07863840599405707,0.07859477858435163,0.07830808417771588,0.07876305573607262,0.0787381257876695,0.07865087096825862,0.07893133288779361,0.07859477858435163,0.07853556995689424,0.07817720194859956,0.07799645982267701,0.07760069689177766,0.07763185932728155,0.0772360963963822,0.0775383720207699,0.07771288165959166,0.07784064764515758,0.07796529738717313,0.07812110956469256,0.078164736974398,0.07829873544706471,0.07866645218601057,0.0787381257876695,0.07901858770720449,0.07902482019430526,0.07915570242342158,0.07898119278459982,0.07929281713963869,0.07942058312520461,0.07980388108190242,0.08001266939977845,0.08014978411599556,0.08009369173208856,0.08021522523055372,0.08040531608712742,0.08050815212429026,0.08078549780027484,0.0812093069231277,0.08163311604598054,0.08160818609757745,0.08200706527202718,0.08222831856410477,0.08259291905950024,0.08296375204199649,0.08303854188720582,0.08327537639703536,0.08355895456012072,0.08359634948272539,0.0838643464280588,0.08406066977173329,0.08410429718143873,0.08427257433315971,0.08440345656227603,0.0847711733012219,0.08528846973058642,0.08526977226928407,0.08536014333224536,0.0856748839308346,0.08551595550976478,0.08550349053556322,0.08572474382764082,0.08621711030860223,0.08625450523120688,0.08630436512801311,0.08644771233133099,0.08691826510743966,0.08677803414767217,0.08684347526223034,0.08708342601561025,0.0872641681415328,0.08717068083502114,0.08675933668636984,0.08684970774933111,0.08676245292992023,0.08668143059761013,0.08676868541702101,0.08711458845111415,0.0871582158608196,0.08733895798674213,0.08758202498367244,0.08792792801776558,0.08789053309516091,0.08814606506629279,0.08821462242440134,0.08815229755339356,0.08815541379694394,0.08824266861635482,0.08828941226961066,0.0880868564388354,0.08796220669681985,0.08766616355953294,0.08776276710959498,0.08746360772875768,0.08692761383809083,0.08665338440565663,0.086223342795703,0.08620152909085028,0.08592729965841608,0.08564372149533071,0.08551907175331516,0.08548479307426089,0.08558139662432294,0.08577460372444703,0.08574344128894315,0.08576837123734626,0.08588055600516024,0.08535079460159418,0.08538507328064845,0.08532586465319107,0.08505475146430726,0.0848272656851289,0.08447201392038459,0.08410118093788835,0.08410118093788835,0.0839484850039193,0.08404197231043097,0.08426322560250855,0.08401392611847747,0.084082483476586,0.08412922712984185,0.08415415707824495,0.08429127179446205,0.08448447889458614,0.0848553118770824,0.08518874993697398,0.08488647431258628,0.08494568294004366,0.0850983788740127,0.08488959055613667,0.08502047278525299,0.08522614485957863,0.08532274840964069,0.0852915859741368,0.0852635397821833,0.08544428190810584,0.08576213875024548,0.0857839524550982,0.0860052057471758,0.08660352450885041,0.08653496715074187,0.08650692095878837,0.08636980624257126,0.0863853874603232,0.08662222197015275,0.08632929507641621,0.08649445598458681,0.08641031740872632,0.0862513889876565,0.08602390320847812,0.08631371385866426,0.08638227121677282,0.08662845445725352,0.0868278940444784,0.08676245292992023,0.08666896562340858,0.08647887476683487,0.08650380471523797,0.08657859456044731,0.08664091943145508,0.08643213111357904,0.08627631893605961,0.08615790168114484,0.0858649747874083,0.0858119986470517,0.08587743976160986,0.08588367224871064,0.08616413416824562,0.08605194940043162,0.08657236207334652,0.08712082093821492,0.08796220669681985,0.08893135844099072,0.0901716233740454,0.09120621623277442,0.09247764360133298,0.09357456133106978,0.09478989631572134,0.09599276632617135,0.09670326985565997,0.09730782110443535,0.09769735154823393,0.09804637082587746,0.0983361814760636,0.09829255406635816,0.09848576116648226,0.09863222461335053,0.0985262723326373,0.09881608298282345,0.09900929008294755,0.09947049412840507,0.09962007381882372,0.0997914672140951,0.09989118700770754,0.100199695119196,0.10037108851446738,0.10024643877245183,0.10027136872085494,0.10029006618215727,0.09991611695611063,0.09961384133172294,0.09947049412840507,0.09918068347821893,0.09937389057834302,0.09950788905100973,0.09918068347821893,0.09921807840082358,0.0992991007331337,0.09914017231206387,0.09916510226046697,0.09930844946378485,0.0991588697733662,0.09955463270426555,0.09942998296225002,0.09916821850401737,0.09932403068153679,0.0995702139220175,0.09951412153811051,0.09976653726569198,0.1001186727868859,0.10070452657435897,0.10122493924727387,0.10147735497485534,0.10171418948468487,0.1020912549542819,0.10259297016589447,0.1030510579678016,0.1035683543971661,0.1038457000731507,0.10424769549115083,0.1046154122300967,0.10470266704950758,0.1051638710949651,0.10536019443863957,0.10592111827770953,0.10639167105381821,0.10661292434589581,0.10666278424270202,0.10720189437691925,0.10791551414995826,0.10835178824701266,0.10917136030076487,0.10973228413983482,0.11032125417085828,0.11087594552282745,0.11146803179740129,0.1123966723754171,0.11361200736006867,0.11434744083796039,0.1146995763591543,0.11544747481124756,0.11623276818594551,0.11701182907354266,0.11813367675168257,0.11900622494579138,0.11991928430605525,0.12043034824831898,0.12102243452289282,0.12173293805238143,0.1226210674642422,0.1232225024694672,0.12387691361504881,0.12444095369766915,0.12463727704134364,0.12492708769152978,0.12475881053980879,0.12507355113839805,0.12537894300633615,0.12548801153059974,0.12542568665959197,0.12523247955946787,0.12465597450264597,0.12427579278949856,0.12409816690712641,0.12404830701032019,0.12388626234569998,0.1233565009421339,0.12252134767062976,0.12213804971393195,0.12130289644242781,0.12089778478087729,0.12103489949709438,0.12048644063222598,0.11982891324309398,0.1186166945019928,0.11802460822741896,0.11756963666906223,0.1172206173914187,0.11613928087943384,0.11604579357292219,0.11489278345927839,0.11403270023937113,0.11349670634870429,0.1127830865756653,0.11271141297400636,0.11202583939292085,0.11130910337633147,0.1109413866373856,0.11060794857749402,0.10988809631735426,0.10922745268467186,0.10827699840180333,0.10759142482071783,0.10698064108484166,0.10635739237476394,0.1058463284325002,0.10550977412905822,0.10498936145614333,0.10476499192051535,0.10381765388119721,0.1036244467810731,0.10352161074391028,0.10325673004212725,0.10328789247763114,0.10292640822578605,0.10265217879335185,0.10262101635784797,0.10225018337535172,0.10215981231239045,0.10282668843217362,0.10260855138364641,0.10251818032068515,0.10206009251877801,0.10175158440728954,0.10163005090882439,0.10161446969107245,0.10154902857651428,0.10159888847332049,0.10134647274573902,0.10111275447945987,0.10181079303474692,0.10200088389132063,0.10245897169322776,0.10287654832897984,0.10287031584187906,0.10301054680164655,0.10293264071288684,0.1028578508676775,0.10291082700803411,0.10292017573868528,0.1026428300627007,0.10271450366435962,0.10270515493370846,0.10268334122885574,0.10285473462412711,0.1030510579678016,0.10365560921657699,0.10381453763764681,0.10399216352001897,0.10412616199268568,0.10421341681209656,0.10420718432499579,0.10431002036215861,0.10419783559434462,0.10448141375742998,0.10461852847364708,0.10472759699791068,0.10472759699791068,0.10478368938181767,0.1048865254189805,0.10500805891744566,0.1052698233756783,0.10508596500620537,0.1051638710949651,0.10470266704950758,0.10459983101234475,0.10391737367480965,0.10357458688426689,0.10333463613088696,0.10322245136307298,0.10278617726601856,0.10276436356116585,0.10297626812259228,0.10287031584187906,0.10309468537750704,0.10297626812259228,0.10325673004212725,0.10372105033113516,0.1036524929730266,0.10356212191006534,0.10372105033113516,0.10335644983573969,0.10320375390177064,0.10298250060969305,0.10297315187904188,0.10256492397394097,0.10194790775096403,0.10178897932989421,0.10175781689439031,0.10116884686336687,0.10099122098099472,0.10073880525341324,0.10035862354026583,0.10013737024818824,0.0998756057899556,0.10004699918522696,0.10015295146594018,0.09994727939161452,0.09995662812226569,0.09995662812226569,0.10005946415942851,0.10004388294167657,0.0999815580706688,0.10014983522238978,0.10024643877245183,0.10014360273528901,0.09997220934001763,0.09977900223989354,0.09937077433479263,0.09971044488178499,0.09905914997975376,0.09884412917477695,0.09878180430376918,0.09858859720364509,0.0982271129518,0.0985013423842342,0.09833929771961399,0.09832060025831166,0.09846706370517992,0.09821464797759845,0.0983081352841101,0.09854808603749003,0.09877868806021879,0.09881608298282345,0.09887840785383123,0.09866338704885441,0.09896566267324211,0.09909342865880805,0.09896566267324211,0.09888775658448239,0.0989687789167925,0.09905291749265299,0.09897189516034288,0.09932403068153679,0.09913705606851349,0.09882543171347462,0.0987225956763118,0.0990747311975057,0.09925235707987787,0.09969797990758343,0.09984132711090131,0.09963253879302528,0.09974160731728887,0.0991869159653197,0.09950165656390896,0.10000025553197113,0.1000625804029789,0.09933961189928875,0.09951412153811051,0.0993770068218934,0.09945802915420351,0.09988183827705636,0.09992234944321142,0.10016230019659134,0.0998475595980021,0.09946737788485467,0.09966681747207955,0.0998444433544517,0.09980393218829665,0.09958579513976945,0.09904356876200182,0.09883478044412579,0.09865715456175363,0.09882231546992423,0.09929286824603291,0.09949854032035856,0.09938947179609496,0.09953593524296322,0.09940816925739729,0.09935207687349029,0.09923989210567631,0.09847952867938148,0.09777525763699366,0.09668768863790801,0.0955128648194115,0.09381762832800009,0.09213797305434061,0.0903866441790222,0.08839848079387426,0.08676245292992023,0.08575279001959432,0.08443461899777993,0.08344988603585712,0.08276742869832202,0.08208808760433729,0.08199148405427524,0.08228441094801177,0.08247450180458547,0.08284533478708173,0.08292012463229105,0.08283598605643056,0.08316007538567098,0.08258980281594985,0.08229064343511255,0.08220338861570167,0.08210678506563962,0.08162688355887977,0.08116567951342225,0.08075745160832135,0.0807668003389725,0.08077926531317406,0.08018406279504983,0.08048633841943753,0.08040219984357704,0.08024327142250721,0.08019029528215062,0.08003448310463118,0.07974778869799543,0.07970416128828998,0.0794829079962124,0.07938007195904957,0.0797010450447396,0.07981634605610398,0.07995969325942186,0.07973220748024348,0.07943928058650696,0.07938318820259996,0.07950472170106511,0.07951718667526667,0.07943304809940617,0.07928346840898752,0.0792865846525379,0.07898119278459982,0.07881914811997962,0.07874435827477029,0.07869761462151446,0.07848259381653765,0.0785231049826927,0.078276921742212,0.0783018516906151,0.07842961767618103,0.0782738054986616,0.07828938671641354,0.07820213189700266,0.07810552834694062,0.07806190093723518,0.07825510803735927,0.07859477858435163,0.07882226436353,0.07891263542649127,0.07893756537489438,0.07877863695382456,0.07897807654104944,0.07928346840898752,0.07938007195904957,0.07962002271242949,0.0793146308444914,0.07894379786199517,0.0787381257876695,0.078710079595716,0.07829873544706471,0.07828003798576239,0.07788115881131263,0.07754772075142105,0.07782195018385525,0.07761939435307999,0.07772223039024281,0.07774716033864593,0.07798399484847546,0.07777520653059943,0.07776585779994825,0.07795594865652196,0.07840468772777792,0.07855738366174697,0.07835482783097171,0.07817720194859956,0.0782177131147546,0.07826757301156083,0.07831120042126627,0.07837040904872365,0.0786602196989098,0.07838287402292521,0.07803697098883207,0.07788739129841342,0.078164736974398,0.07845766386813453,0.07850440752139036,0.07847636132943686,0.07837975777937482,0.07857296487949891,0.07857919736659968,0.07875370700542145,0.0789874252717006,0.07900923897655332,0.07904975014270837,0.0790154714636541,0.0789843090281502,0.07893756537489438,0.07866333594246018,0.07866333594246018,0.0782738054986616,0.07820213189700266,0.07796841363072352,0.0780556684501344,0.07747604714976211,0.07756953445627378,0.07746046593201017,0.07771599790314204,0.07788739129841342,0.07766613800633582,0.07806813342433595,0.07836729280517327,0.07866645218601057,0.07865710345535941,0.07895937907974711,0.07878175319737495,0.07886277552968506,0.07850752376494075,0.07875993949252223,0.07879733441512689,0.07895003034909594,0.07880356690222767,0.07872566081346796,0.07892198415714244,0.07884096182483233,0.07892821664424322,0.07905909887335955,0.07914635369277043,0.07897807654104944,0.07894379786199517,0.07877863695382456,0.07856673239239814,0.07858542985370047,0.07851064000849114,0.07866645218601057,0.07863840599405707,0.07854491868754541,0.0786041273150028,0.07855426741819659,0.07877552071027417,0.07838287402292521,0.07868514964731291,0.07831431666481665,0.07782195018385525,0.0774791633933125,0.07732335121579308,0.0772610263447853,0.07739190857390162,0.07713326035921937,0.07696809945104877,0.07734828116419618,0.07700237813010305,0.07718623649957597,0.07771599790314204,0.07800892479687857,0.07783441515805681,0.07761004562242883,0.07754148826432028,0.07763185932728155,0.07738879233035123,0.07692447204134333,0.07697121569459915,0.07678735732512623,0.07631992079256793,0.07626382840866094,0.0763853619071261,0.07658480149435097,0.07593662283587013,0.07592415786166858,0.07590857664391663,0.0759428553229709,0.07599271521977713,0.07632303703611833,0.07650689540559125,0.07648508170073853,0.07648196545718815,0.07669075377506418,0.07729842126738996,0.0772080502044287,0.07724856137058375,0.07712702787211859,0.07683098473483167,0.07660038271210291,0.07645080302168425,0.07628564211351366,0.07601452892462984,0.07554397614852117,0.07501109850140471,0.07541932640650562,0.07535076904839708,0.07533830407419552,0.07558760355822661,0.07555020863562194,0.07531025788224202,0.0752323517934823,0.07555955736627311,0.07570913705669176,0.0756966720824902,0.07518560814022647,0.0750671908853117,0.0750952370772652,0.07493942489974577,0.0749581223610481,0.07497370357880005,0.074989284796552,0.07474933404317206,0.07497993606590082,0.07518560814022647,0.0750391446933582,0.0749581223610481,0.07490826246424188,0.07479919393997828,0.07459040562210224,0.07465273049311001,0.07433798989452077,0.07429747872836572,0.07384250717000897,0.07359944017307866,0.07393287823297025,0.07392664574586946,0.07401390056528034,0.07415724776859822,0.07393599447652063,0.07370539245379187,0.07398273812977646,0.07410738787179201,0.0739172970152183,0.07375836859414849,0.0736711137747376,0.073562045250474,0.07359944017307866,0.07344362799555923,0.07366488128763682,0.07384250717000897,0.07330962952289252,0.0730135863856056,0.07299177268075288,0.07291698283554356,0.072960610245249,0.0732036772421793,0.07322860719058241,0.07299488892430327,0.07269884578701634,0.07250875493044263,0.07277363563222568,0.07272065949186907,0.07269572954346595,0.07277675187577606,0.0725461498530473,0.07261159096760546,0.07224075798510922,0.07239968640617904,0.07261159096760546,0.07247759249493875,0.07256173107079925,0.07265210213376051,0.07274870568382256,0.07277986811932645,0.07289516913069083,0.07241838386748137,0.0722719204206131,0.07217531687055105,0.07213480570439601,0.0721628518963495,0.07203196966723317,0.0720257371801324,0.07201950469303163,0.07200080723172929,0.07191355241231841,0.07193224987362075,0.07246201127718681,0.07247759249493875,0.0723280128045201,0.07232489656096971,0.07222206052380689,0.07182941383645791,0.07175774023479899,0.07180136764450443,0.07135574481679885,0.07146792958461284,0.07112825903762048,0.07084156463098472,0.07063900880020946,0.07067328747926374,0.07083844838743433,0.07110644533276776,0.07127783872803913,0.07140560471360506,0.0644906602752927,0.05728590518679418,0.05009673131604761,0.043138159468029805,0.0)
ycorr <- c(-3.354330941207157e-05,-3.375954607699482e-05,-3.441299415688825e-05,-3.550015300171116e-05,-3.702833677972117e-05,-3.899914899028908e-05,-4.140967282959338e-05,-4.385060748501389e-05,-4.630728677508668e-05,-4.877244686716513e-05,-5.12484863831698e-05,-5.3716114542043295e-05,-5.617607753150728e-05,-5.86166587915259e-05,-6.103040310946907e-05,-6.342275277205292e-05,-6.578792442427022e-05,-6.811345432846145e-05,-7.040940006143276e-05,-7.26835276341017e-05,-7.493664739478774e-05,-7.717147694669893e-05,-7.940174565410418e-05,-8.162149656369557e-05,-8.384593198102004e-05,-8.606954174278443e-05,-8.828255177955437e-05,-9.049258306173958e-05,-9.270981456022443e-05,-9.492700519498945e-05,-9.715267906943096e-05,-9.939987137343756e-05,-0.00010167714592278806,-0.00010399191837535427,-0.0001063479962637327,-0.00010873730547239675,-0.00011117263941950035,-0.00011365706245415529,-0.00011618895327540548,-0.00011877285766767994,-0.00012141328554533403,-0.00012410320972558743,-0.00012683702130305365,-0.00012960516452969638,-0.0001324115668436596,-0.00013525725212181372,-0.00013814991458240637,-0.0001410989486130411,-0.00014410189533671432,-0.00014715083321847168,-0.00015024449257740192,-0.00015339510525704268,-0.00015660578044049685,-0.00015988895128537001,-0.00016324901850413688,-0.00016668040013103597,-0.00017019124143356388,-0.0001737798769489477,-0.000177454879931566,-0.00018123520343781891,-0.00018512486088299515,-0.00018911562759119593,-0.00019320597153382927,-0.00019739761687621163,-0.00020168462647180346,-0.00020608446747445526,-0.00021059375247583007,-0.0002152146651722593,-0.00021993556866606968,-0.00022474205739237893,-0.0002296241175226578,-0.00023459057163112973,-0.00023964476709365686,-0.0002447786345866006,-0.0002499820129994517,-0.00025523399193470554,-0.0002605150737359688,-0.0002658099673493358,-0.00027111377087132263,-0.00027643573568644796,-0.0002817640805394993,-0.0002870858224739108,-0.000292376949216765,-0.0002976215429527591,-0.0003028098068872647,-0.0003079417242692583,-0.00031302521906980085,-0.0003180534869979469,-0.00032302619571816245,-0.0003279116237547262,-0.00033270574264103366,-0.0003373985779828819,-0.0003420007287863354,-0.0003465307403233993,-0.0003509845328061355,-0.0003553580567177755,-0.0003596316600617612,-0.0003638056889712217,-0.0003678734631685309,-0.000371843780609834,-0.0003757249473807277,-0.0003795194280517289,-0.0003832157357258728,-0.00038680569587229435,-0.00039029035612298587,-0.00039367626659244975,-0.0003969761127098881,-0.00040019009478726715,-0.0004033162763132967,-0.0004063686080774739,-0.00040934271759633027,-0.00041224755910168495,-0.0004150719251435409,-0.0004178237050658924,-0.000420496830698719,-0.0004230764177729315,-0.00042557456253101544,-0.00042799027942742304,-0.0004303400376182707,-0.0004326206635725995,-0.0004348323072720021,-0.0004369622320686228,-0.0004390248697389236,-0.0004410319448701887,-0.0004429990686272818,-0.00044493901103104147,-0.00044685072253462793,-0.00044872732477200085,-0.00045057463869431014,-0.0004523891970273407,-0.0004541803069139131,-0.0004559630059491984,-0.0004577405657784455,-0.0004595022683276151,-0.00046123128784676117,-0.00046293061655182014,-0.0004645937269147686,-0.00046622901477015447,-0.0004678425369212061,-0.0004694370502551638,-0.0004710123364928407,-0.0004725562057592692,-0.0004740702441279799,-0.00047556619442475296,-0.0004770583157925949,-0.0004785609472475344,-0.00048006811664018796,-0.00048158807798613927,-0.0004831148020159158,-0.0004846386298689979,-0.00048615109220378783,-0.000487666273929499,-0.0004891870605542441,-0.0004906971286668684,-0.0004922012514259105,-0.0004936935287104212,-0.0004951815288490629,-0.0004966694944576251,-0.0004981597042375992,-0.0004996567134008174,-0.0005011696010704262,-0.0005026934413127165,-0.0005042244353586103,-0.0005057710984404226,-0.0005073290420320339,-0.000508890755651909,-0.0005104559404132406,-0.0005120202927853795,-0.0005135879670828657,-0.0005151481490087478,-0.0005167070508354796,-0.0005182662807446085,-0.0005198269593821486,-0.000521387011570092,-0.0005229342634410643,-0.0005244750791752184,-0.0005260034525079121,-0.0005275156988074137,-0.0005289916731954505,-0.0005304340787104659,-0.0005318419584867309,-0.0005332100959728535,-0.0005345283272390043,-0.0005358098775086924,-0.0005370621108302932,-0.0005382908961619594,-0.0005394936796930088,-0.0005406757726737551,-0.0005418432369990091,-0.000543013086825494,-0.0005441750683030343,-0.0005453276648350601,-0.0005464797129134426,-0.0005476197030107859,-0.0005487390504174262,-0.0005498258236976915,-0.0005508943761624517,-0.0005519363463202884,-0.0005529533422940832,-0.0005539409966803516,-0.0005548987159544114,-0.0005558203580109756,-0.0005567120468687459,-0.0005575720359486737,-0.0005584149510625088,-0.0005592409290698021,-0.000560044727093932,-0.0005608272336824108,-0.0005615977106172862,-0.0005623636025096794,-0.0005631246891586785,-0.0005638838376927838,-0.0005646571438012969,-0.0005654406553874659,-0.0005662256713256645,-0.0005670184556479826,-0.0005678233437174271,-0.0005686380913674231,-0.0005694486570563255,-0.0005702464911566899,-0.0005710242007311167,-0.0005717988452778403,-0.0005725483542813014,-0.0005732706461536895,-0.0005739728942396166,-0.0005746584947068002,-0.0005753168440218999,-0.0005759610134394419,-0.00057659332821275,-0.0005772214562340241,-0.0005778555751328803,-0.0005784896391093835,-0.000579108723788179,-0.0005797379918028435,-0.0005803789499677667,-0.0005810233385127657,-0.0005816743657147394,-0.0005823383889006729,-0.0005830108245118605,-0.0005836914139497566,-0.0005843652103960933,-0.0005850295186826887,-0.000585700663743442,-0.0005863719123641007,-0.0005870317431764727,-0.0005876911227467805,-0.0005883473969493787,-0.0005889920400885906,-0.0005896225464419067,-0.0005902390995751254,-0.0005908586131641843,-0.0005915028998838618,-0.0005921698924388176,-0.0005928506127714616,-0.0005935512022296656,-0.0005942566107868874,-0.0005949636462394197,-0.0005956871517794244,-0.0005964295528783183,-0.0005971736564883326,-0.0005979159818834804,-0.0005986423972590547,-0.0005993390372967529,-0.0006000200662822612,-0.0006006868115619027,-0.0006013429772027474,-0.0006019974578919718,-0.0006026226634136343,-0.0006032214849070426,-0.000603804468703349,-0.0006043946093618444,-0.0006049732031510335,-0.0006055402221306159,-0.0006060912326557019,-0.0006066103793673545,-0.0006071071831717486,-0.0006075793878121174,-0.0006080423299333284,-0.0006085062148092444,-0.0006089656556144556,-0.0006094037102995777,-0.0006098124921303565,-0.00061019343341913,-0.0006105324853846317,-0.0006108225405450185,-0.0006110397426669856,-0.000611161654515486,-0.0006111516892351639,-0.0006109732632594937,-0.0006105974713518262,-0.0006099845924557336,-0.0006091269724042737,-0.0006080304608269752,-0.0006066872111052887,-0.0006051168207277203,-0.0006033338970839686,-0.0006013616957838976,-0.0005992239657275456,-0.0005969702006500225,-0.0005946420508713212,-0.0005922840935238846,-0.0005899353693091507,-0.0005876090431129085,-0.000585317289697931,-0.0005830497794781945,-0.0005808071505491704,-0.0005785905516462015,-0.0005764044875265749,-0.0005742321324920729,-0.0005720525478072854,-0.0005698545158088811,-0.0005676332594217732,-0.0005653868981020684,-0.0005631030526906033,-0.000560788856501638,-0.0005584623056648363,-0.0005561173788050595,-0.0005537545604242874,-0.0005513701077893212,-0.0005489693919268243,-0.0005465563479531292,-0.0005441230958760965,-0.0005416646977769533,-0.0005391849529565112,-0.0005367068851938688,-0.0005342192271640219,-0.0005317255391683315,-0.0005292228773445428,-0.000526707501813184,-0.0005241826041349553,-0.0005216553539405984,-0.0005191289355043534,-0.0005166050336562378,-0.0005140822278154812,-0.0005115400145301087,-0.0005089652500288354,-0.0005063525356090957,-0.0005037096623226138,-0.0005010444775463409,-0.0004983627047533723,-0.0004956568183858527,-0.0004929259544134874,-0.0004901701988955709,-0.0004873980321807384,-0.0004846132242281111,-0.0004818291791688899,-0.0004790472737985735,-0.00047626318676836227,-0.0004734753045693699,-0.0004706889105766576,-0.0004678993288086522,-0.0004651123315843976,-0.00046232882890706616,-0.00045953765597595724,-0.0004567425052589997,-0.000453941483121725,-0.00045113093789109703,-0.00044832047391323753,-0.00044549944199998514,-0.0004426555367280998,-0.00043978431550928485,-0.00043688771412894284,-0.00043395250634410665,-0.0004309827628579124,-0.0004279761875366179,-0.0004249312815663319,-0.00042186117868103437,-0.0004187645429123246,-0.0004156431239217683,-0.0004125146374205835,-0.00040939100782577047,-0.0004062633681461622,-0.00040313506757382056,-0.00040002810031658173,-0.00039695125507873655,-0.00039391495356668653,-0.00039090748881370107,-0.00038791128365385855,-0.0003849382353588132,-0.0003819838472072485,-0.00037905097386388545,-0.0003761427323881762,-0.00037327605088653345,-0.00037043654917053145,-0.0003676052415564651,-0.0003647662163272888,-0.00036193342367004777,-0.0003591224829285807,-0.000356341654856449,-0.0003535852237434782,-0.00035084845538443894,-0.00034813288078159026,-0.0003454331832488245,-0.0003427447628280756,-0.00034008691337985284,-0.00033747160581256347,-0.00033490154567806775,-0.00033236391666317545,-0.00032984807266660845,-0.00032734919864631684,-0.0003248632180143542,-0.00032239957025717315,-0.00031994675322853737,-0.00031751180337895204,-0.0003150872093970927,-0.0003126696802657598,-0.00031024636908144653,-0.0003078262689669859,-0.0003054076868920614,-0.0003030075010708466,-0.00030062888148043036,-0.00029826934951900395,-0.00029593443445170636,-0.0002936370758083446,-0.00029137913557060084,-0.0002891606311671883,-0.0002869874507708919,-0.00028486284288560445,-0.00028278278987316506,-0.0002807401012089765,-0.00027873313467380724,-0.00027676046644245327,-0.000274833746769309,-0.0002729351959030252,-0.0002710554230480266,-0.0002691922683203412,-0.0002673402789890946,-0.0002654932791541004,-0.000263664623587126,-0.0002618489864961169,-0.00026004890249710843,-0.0002582513159362475,-0.00025645252590416213,-0.000254640549238534,-0.00025282719215987564,-0.0002510174965870128,-0.00024921505933955975,-0.0002474265854890893,-0.00024564338455461486,-0.00024386219041460223,-0.0002420838761452055,-0.00024031656614143123,-0.00023854971145323802,-0.00023679990317125084,-0.0002350563742468064,-0.0002332996742547356,-0.0002315201951541924,-0.0002297133713591176,-0.00022787958966979577,-0.00022602829287864045,-0.00022414913862178987,-0.0002222431243034321,-0.0002203134492777014,-0.00021835565583676943,-0.00021636223375379738,-0.00021435941849007613,-0.0002123591572859535,-0.0002103498963837646,-0.0002083205461179439,-0.00020627044660471392,-0.00020419269263810585,-0.00020208392994520237,-0.00019993173910672226,-0.00019773700900503174,-0.0001955103928571716,-0.00019323622719290975,-0.0001909080994582284,-0.00018853391608473363,-0.00018613553488530373,-0.00018369887126565618,-0.00018123176058937996,-0.00017873493876738027,-0.00017621948692732542,-0.00017369406900881896,-0.00017116035996466792,-0.00016862249639828906,-0.0001660900919251852,-0.00016355577224607252,-0.00016101363674851717,-0.00015847177135003545,-0.00015594240346076014,-0.00015342309627901368,-0.0001509099691388639,-0.00014839496210947292,-0.0001458743617838303,-0.00014333801792273924,-0.00014078287556236054,-0.000138207409349559,-0.00013561188343103322,-0.00013298757807435625,-0.0001303368838697729,-0.0001276629800054048,-0.0001249676128365003,-0.00012225991887563823,-0.0001195452155959639,-0.00011682802224337998,-0.00011410545049744799,-0.00011139173713209193,-0.00010868566032429394,-0.00010598669247484043,-0.00010329393624768307,-0.0001005905198806137,-9.7880583016399e-05,-9.516039866080973e-05,-9.242530761349147e-05,-8.967493540451597e-05,-8.691280144622786e-05,-8.413808569987494e-05,-8.135318743124482e-05,-7.856604671214463e-05,-7.577064731193645e-05,-7.297408581755685e-05,-7.017840871913082e-05,-6.738050168861755e-05,-6.458187865683366e-05,-6.178857309413077e-05,-5.899906378962378e-05,-5.620664015240459e-05,-5.340520617656182e-05,-5.0580638440819384e-05,-4.774405998288828e-05,-4.490846108045445e-05,-4.207504032876822e-05,-3.924773367673437e-05,-3.641636518457957e-05,-3.357315919561859e-05,-3.071923349399149e-05,-2.7861486130915785e-05,-2.499621200884836e-05,-2.2129987237008873e-05,-1.9257774270733725e-05,-1.6361712476155288e-05,-1.344268032732576e-05,-1.0495377894524777e-05,-7.524289599239356e-06,-4.5438620235696405e-06,-1.5402724258799176e-06,1.493023518331008e-06,4.559730428008796e-06,7.65327677727393e-06,1.0766978320308403e-05,1.3890687014308365e-05,1.7025358184655866e-05,2.018287077661138e-05,2.33639983038217e-05,2.6580088881001093e-05,2.982529346941601e-05,3.30867451790425e-05,3.636350145479021e-05,3.965125892987196e-05,4.2958998251944876e-05,4.629074401860324e-05,4.965948752793398e-05,5.305897677325227e-05,5.647423361685199e-05,5.9906351071497264e-05,6.33484394628394e-05,6.680366404118985e-05,7.026600494355291e-05,7.373908441748236e-05,7.722592427303636e-05,8.072466336701854e-05,8.423112028210772e-05,8.773131221297899e-05,9.122403387500517e-05,9.471120206516432e-05,9.817918921498553e-05,0.00010163415326620674,0.00010507742128092843,0.0001085049758318491,0.00011190975071905443,0.00011528952566884306,0.00011862393627345267,0.00012191609450717382,0.00012517735910188172,0.00012840701308130829,0.0001316150958175929,0.00013480722748022758,0.00013797366747913016,0.00014111466453615334,0.0001442393746827461,0.0001473400312869636,0.00015042021435975907,0.00015349231897215959,0.00015655264823955761,0.0001595873191299627,0.00016259332694697003,0.0001655584621725357,0.0001684793963882905,0.00017135606711487936,0.0001743539443826182,0.0001776526721592776,0.00018142230584596171,0.00018578789513177816,0.00019170870285319688,0.00019613945742859754,0.00019988772147679123,0.0002030526105521428,0.00020575094367223556,0.0002081328255542778,0.00021035205954783945,0.00021223737596341868,0.00021360417455000273,0.0002142906729244549,0.0002141696362143971,0.0002122795807381973,0.00021166904651246526,0.0002115438333220821,0.00021181371581059232,0.00021235664426786768,0.00021302699192327597,0.00021367957672756673,0.0002143230241554208,0.00021496302749644269,0.0002156219435701153,0.0002162967962086408,0.00021697826779692198,0.00021765380164147198,0.0002183228967541733,0.00021898820095439504,0.0002196634659218648,0.0002203512811205586,0.00022104595681990104,0.0002217421373670083,0.00022242564107470252,0.00022308021726498352,0.00022372477487161177,0.00022438016270026948,0.00022505765494554604,0.00022575420023175709,0.00022646367420755067,0.00022719302352209176,0.0002279504426846317,0.00022873793004688246,0.000229566164969663,0.00023044476453387127,0.00023136097688248382,0.00023230151938068998,0.00023326583806800513,0.00023426325584660935,0.0002352987164127669,0.0002363740034870033,0.000237476161637439,0.00023860010205338207,0.0002397529653671974,0.00024093282801859639,0.00024214996338748555,0.000243417656215699,0.0002447361179278048,0.0002460985762498926,0.0002474966412538616,0.00024891380453431235,0.00025035302651873684,0.00025182988023501185,0.0002533337980944049,0.000254870456259674,0.0002564433293594225,0.0002580455749981859,0.0002596787278260143,0.00026134139132459806,0.00026303960560111587,0.0002647793835415299,0.0002665856723489567,0.00026845501368225673,0.0002703819500248683,0.0002723691891435189,0.00027440626036217885,0.00027648050596698327,0.00027859243767345995,0.0002807436639068841,0.0002829462537554061,0.0002852104842978797,0.00028752879748724085,0.00028989105727688464,0.0002923071572331753,0.00029476969156030073,0.0002972838994318522,0.0002998645310546515,0.0003025196402135548,0.0003052495169186828,0.00030803645665206217,0.000310868435758625,0.00031372098317656054,0.0003166004161819994,0.00031949416191602836,0.00032240339328005796,0.0003253267414480574,0.0003282589159839055,0.00033118873527367257,0.00033411158368031827,0.0003370155734195431,0.0003399081661301494,0.0003427965210844672,0.00034567701140489273,0.00034854938844910776,0.0003514090309638552,0.0003542457602692675,0.00035705600986517185,0.0003598288044949332,0.00036255303919701087,0.0003652383962598838,0.00036789100316362325,0.0003705092291964374,0.00037308449418777884,0.00037562674343673454,0.00037812885644836685,0.0003805998188753621,0.0003830392243775475,0.000385441681036387,0.0003878202873801082,0.0003901832891372948,0.0003925145444306411,0.00039479983654206884,0.00039704898828143813,0.00039925530669156906,0.00040142126969983755,0.0004035500592012921,0.00040564729240999067,0.0004077214304354452,0.00040978178434578766,0.000411816686516268,0.0004138199033948495,0.0004158138825005877,0.00041781178269459796,0.0004198126736250119,0.0004218304251081943,0.0004238668630681112,0.000425922302670827,0.0004279961837350378,0.00043008168703625776,0.00043218537207743817,0.0004343312302544247,0.0004365218134381928,0.0004387443643847806,0.0004410036208856428,0.00044329215376078316,0.00044559398821214264,0.00044789836355656133,0.0004502115550676548,0.0004525431593524435,0.00045489908277715686,0.0004572667763864437,0.0004596354849015765,0.00046200441886348184,0.00046437712560417125,0.00046675616230102795,0.00046915968606271345,0.00047160233638529863,0.0004740837382795095,0.00047658911473011845,0.00047910877467689637,0.0004816439443458041,0.00048420014569178563,0.00048677665933239236,0.0004893739138776912,0.0004919766453548424,0.0004945740630419253,0.000497144828302071,0.0004996868778624407,0.0005022056593453672,0.000504698352294778,0.0005071560329336113,0.0005095684504874702,0.0005119357591336305,0.0005142456195067683,0.0005164908928034679,0.0005186709202259781,0.0005207885712083607,0.0005228428884850482,0.0005248155573876584,0.0005267127724798034,0.0005285329462161689,0.0005302770655359598,0.000531939134153311,0.0005335189466272921,0.0005350281413796133,0.0005364627895623061,0.0005378212105478672,0.0005390867083557729,0.000540262951249059,0.0005413336429995209,0.0005422872958654011,0.0005431299696471957,0.0005438628047922288,0.0005444786797951532,0.0005449715976009562,0.0005453431401236239,0.000545593529859815,0.0005457282765910013,0.0005457568373956306,0.0005456855848047042,0.0005455394764051039,0.0005453127455056569,0.0005450044910109931,0.0005446212588205927,0.0005441685546071248,0.000543637266651182,0.0005430238185314152,0.0005423477606302534,0.0005416148462792293,0.0005408275156176325,0.0005399870453207943,0.0005390899261557599,0.0005381349109550761,0.0005371170339492389,0.0005360342356369007,0.0005349033121641817,0.0005337428949392731,0.0005325534278559156,0.0005313271446279048,0.0005300592410700036,0.0005287448401638241,0.0005273964362263299,0.0005260256670744836,0.0005246520627548987,0.0005232955673009496,0.0005219515550608613,0.0005206181834003538,0.0005192935331733263,0.0005179834166342943,0.0005167023092116561,0.0005154628305489642,0.0005142731670977574,0.0005131249593278177,0.0005120252504145452,0.0005109744912215814,0.0005099742723603133,0.0005090299900034783,0.000508145140630542,0.0005073287075998489,0.0005065801862488115,0.0005058904286071321,0.0005052513009438451,0.0005046674849028802,0.0005041319534436155,0.0005036336974831018,0.0005031744315239776,0.0005027545437936784,0.000502372964369311,0.0005020221556238239,0.0005016950707071379,0.0005013939829308738,0.0005011170022987793,0.0005008720028763152,0.0005006568539661775,0.0005004704869692059,0.0005003141866113415,0.000500182863758053,0.0005000696665674282,0.0004999793985674047,0.0004999171569706992,0.0004998856033429156,0.0004998838847904151,0.0004999151856414459,0.0004999712709708569,0.0005000488581176764,0.0005001643775357443,0.0005003098903522508,0.0005004785067986932,0.0005006542422433338,0.0005008330878062808,0.0005010007148378643,0.0005011513702484388,0.0005012783696187262,0.0005013904540407673,0.0005014868273480632,0.0005015426121205128,0.0005015464112857249,0.0005015031878586536,0.000501428400557296,0.000501325282146148,0.0005011980688731423,0.0005010521912956076,0.0005008919990136374,0.000500708709368501,0.0005004986860323061,0.0005002621248965653,0.0005000198686080712,0.0004997722985955163,0.0004995177743002638,0.0004992375834884206,0.0004989372793027109,0.0004986185292932562,0.0004982747367027697,0.0004978965258593316,0.0004974861734135297,0.0004970391062258956,0.0004965539679238866,0.0004960296446367092,0.0004954432452635446,0.0004948012793012422,0.0004940982002004013,0.0004933204035568434,0.0004924447789684025,0.0004914791425754347,0.0004904228878666785,0.0004892810013181549,0.00048803801928985394,0.0004866958605718937,0.00048526441450701845,0.0004837686494291148,0.0004822081551945153,0.00048059579805154564,0.0004789489656642523,0.00047727807583434535,0.0004755859958610204,0.00047388442832434734,0.00047217782352034475,0.00047047664153466323,0.0004687804158849739,0.00046708398636763126,0.0004653761282840717,0.00046364938442151475,0.00046191562548660963,0.00046017382601348106,0.0004584256847645745,0.00045666362059356596,0.0004548918653995803,0.00045310559819280186,0.00045131089247365337,0.0004495052280088273,0.00044769953493884986,0.0004459154151904018,0.00044415472022802337,0.0004424090905492653,0.0004406790114180606,0.0004389615175407093,0.0004372699545977018,0.000435604082956238,0.00043396771999727746,0.0004323505587191777,0.0004307605775481705,0.0004291822420287106,0.0004276059693231419,0.00042603740520703187,0.0004244758434953984,0.0004229275418121965,0.0004213865730478947,0.00041983940375451596,0.00041828237660413136,0.00041671683234637105,0.0004151451532882012,0.0004135623159195531,0.00041196623623540943,0.0004103476749971299,0.0004087059052578575,0.0004070395940004854,0.00040534039937258184,0.0004036141787860392,0.0004018543325698417,0.00040005433468694846,0.0003982052669520254,0.00039630701699052497,0.00039435529739707885,0.00039235147408825784,0.00039029338975048915,0.00038816956480888293,0.00038597229306822794,0.00038369809295695146,0.0003813572311971032,0.00037895194903429314,0.00037647476259639365,0.00037392570518464825,0.0003712994651463613,0.0003685996703972874,0.000365822785953866,0.0003629738132315811,0.0003600502581635797,0.00035704757274883137,0.0003539574460864409,0.0003507751255920217,0.0003475052087499473,0.0003441448152957163,0.00034069159126096945,0.0003371432257987437,0.0003334977442903339,0.0003297535911931337,0.00032591447679184685,0.00032199117452709995,0.000317985653126458,0.00031390605238240714,0.00030974741101480447,0.0003055125911664715,0.0003012117966796299,0.0002968509024076828,0.00029243608556645966,0.00028797176182515573,0.0002834649937517738,0.0002789150227970263,0.0002743206566900154,0.0002696935984552409,0.0002650449150015607,0.0002603861981336434,0.00025572425525535904,0.00025106546730599893,0.00024641471130808397,0.00024178935080772002,0.00023718631028590078,0.0002326149092770839,0.0002280820484955167,0.00022359184486848044,0.00021914328130181418,0.0002147357017851781,0.00021036675496719553,0.00020603681804344886,0.00020174911554436735,0.00019749687271569883,0.00019328835771580854,0.00018912977355533433,0.00018502871746085966,0.00018097491873743677,0.00017698401522670435,0.00017304901202323992,0.0001691841268776923,0.00016539218451942396,0.00016167785987340402,0.000158046728299519,0.00015449428680536716,0.00015101022308049896,0.00014758467213506798,0.00014421999526360223,0.000140904547178401,0.00013763659671338452,0.00013442261932686706,0.00013123407206127124,0.00012807479676726606,0.000124935951560285,0.00012182676671506959,0.00011875226658002919,0.00011571247243861754,0.00011271786587264791,0.00010976155427735324,0.00010685230659976286,0.00010398557722379479,0.00010117383342322423,9.84176731660773e-05,9.57101109807864e-05,9.304166095656184e-05,9.040145295375833e-05,8.779561222021682e-05,8.520998855750426e-05,8.265240796401665e-05,8.01236032952732e-05,7.762242259025386e-05,7.514354771679798e-05,7.266907853917219e-05,7.021334537899254e-05,6.77741011229582e-05,6.536561790826833e-05,6.297708530733803e-05,6.0603912778562894e-05,5.824750528621568e-05,5.590062657450626e-05,5.355523089072795e-05,5.121609161083866e-05,4.888751589315085e-05,4.657146875686582e-05,4.426764242581842e-05,4.196263633569392e-05,3.965791085653641e-05,3.7349152236277645e-05,3.5036322472639155e-05,3.271960337303893e-05,3.0390709856387628e-05,2.804954584412335e-05,2.569741044588771e-05,2.3324339886580055e-05,2.093307668246905e-05,1.8519600085298096e-05,1.6095041863775864e-05,1.36658375434432e-05,1.123707408946886e-05,8.806166016269366e-06,6.371042424412443e-06,3.944343883145957e-06,1.5237099540599943e-06,-8.928826639086298e-07,-3.2988684635735797e-06,-5.683685491829527e-06,-8.054496490811139e-06,-1.0412850367394744e-05,-1.2765255429665414e-05,-1.5110140928330972e-05,-1.744007172453168e-05,-1.9754881008718514e-05,-2.205523845935518e-05,-2.433974914836518e-05,-2.661105013289557e-05,-2.8871859736057393e-05,-3.1126776207045524e-05,-3.337089242039445e-05,-3.560152506692356e-05,-3.781738583609962e-05,-4.00138888801655e-05,-4.219526434908688e-05,-4.435620850049879e-05,-4.650317376925907e-05,-4.8626963608644204e-05,-5.072635870248651e-05,-5.280146650332805e-05,-5.4855496962973014e-05,-5.6888534572933386e-05,-5.890361998560711e-05,-6.089803899912887e-05,-6.287456293616606e-05,-6.483193663501902e-05,-6.676380974032152e-05,-6.867927727691972e-05,-7.05864316936962e-05,-7.247888140899014e-05,-7.435054402351924e-05,-7.620461333880718e-05,-7.803216921963303e-05,-7.98394136464423e-05,-8.162959875623075e-05,-8.340703000371607e-05,-8.516912306887357e-05,-8.692973287837404e-05,-8.868496776458855e-05,-9.043440568272421e-05,-9.217982056254208e-05,-9.392769118018116e-05,-9.568378991446432e-05,-9.745505616075955e-05,-9.923350822827089e-05,-0.00010102591347020719,-0.0001028307540700269,-0.0001046450940768479,-0.00010645691113963,-0.00010826060323216811,-0.000110057914654317,-0.00011185333772062995,-0.0001136471463464363,-0.00011544010531105471,-0.0001172381554500333,-0.00011903893095149312,-0.00012085539689593573,-0.0001226845615668056,-0.0001245350267653534,-0.00012642077004779544,-0.00012834395604702166,-0.00013030378109222797,-0.00013229445456921645,-0.00013431555752995626,-0.00013636304967194093,-0.00013843723817908216,-0.00014052872826037077,-0.00014263518133636634,-0.00014475114153377335,-0.00014687586302997496,-0.00014900362615768683,-0.00015112888512000818,-0.0001532571383775758,-0.000155389410135467,-0.00015752969853543054,-0.00015967459269149555,-0.0001618282401774876,-0.00016399114753244405,-0.00016616461923898794,-0.00016835462925367925,-0.00017056064083446678,-0.00017278261629994867,-0.0001750184539118987,-0.00017727004040046622,-0.0001795339657742626,-0.00018180950011180267,-0.00018408826703307068,-0.00018636450628158106,-0.00018864626550348353,-0.00019091982507770798,-0.00019318997819266196,-0.00019546204051585993,-0.0001977345414942845,-0.0002000123113727246,-0.000202285014603158,-0.0002045511988495992,-0.00020681391260835746,-0.00020907661067779104,-0.0002113318344748517,-0.00021358286494370442,-0.00021583663503430478,-0.00021808465374641733,-0.00022031972282652353,-0.00022254314343048595,-0.00022475700166178927,-0.00022696296846600036,-0.00022916885063994973,-0.0002313738082939783,-0.00023358703107526326,-0.00023581897180035148,-0.000238070121750712,-0.00024035614070375475,-0.00024269218526896046,-0.00024506361666412136,-0.0002474572677169318,-0.0002496505285898876,-0.0002514209476396281,-0.0002527569635393741,-0.00025363958655773083,-0.0002540741611832953)
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(189, 267)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('T1P_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) : 189,267',bty='n')
dev.off()