# R script for Peak Model
#  -- generated by MACS
p <- c(0.0424607029016,0.0444956701369,0.0464793356773,0.0484373503701,0.0504979684529,0.0524645334282,0.054422548121,0.0568679289164,0.0590995526492,0.0612542238396,0.0636568532224,0.0657345718703,0.0676840362806,0.0697446543634,0.0716770182087,0.073985594484,0.0760462125669,0.0783633391247,0.0781752329097,0.0782094340397,0.0779785764122,0.0774655594621,0.0771149978795,0.076867039687,0.0763198216069,0.0762343187819,0.0762172182169,0.0762086679344,0.0761060645444,0.0758666566343,0.0757555029618,0.0757726035268,0.0756186984418,0.0756871007018,0.0755160950518,0.0754134916618,0.0758324555043,0.0759778103069,0.0763882238669,0.0764737266919,0.0763540227369,0.0764053244319,0.0765335786694,0.0759949108719,0.0760291120019,0.0760376622844,0.0756101481593,0.0754476927918,0.0757213018318,0.0758837571993,0.0759436091768,0.0755673967468,0.0754562430743,0.0752082848817,0.0753450894018,0.0750201786667,0.0748577232992,0.0752766871417,0.0752937877067,0.0752852374242,0.0757555029618,0.0753108882717,0.0753194385542,0.0750714803617,0.0753108882717,0.0752339357292,0.0750201786667,0.0746012148241,0.0747893210392,0.0748064216042,0.0751826340342,0.0754904442043,0.0755502961818,0.0755673967468,0.0754647933568,0.0756186984418,0.0757726035268,0.0759179583293,0.0756956509843,0.0759778103069,0.0762086679344,0.0760975142619,0.0762257684994,0.0765250283869,0.0765677797994,0.0764480758444,0.076713134602,0.077226151552,0.0776964170896,0.0778246713271,0.0781239312147,0.0782436351697,0.0788165040973,0.0788678057923,0.0791328645498,0.0792611187874,0.0793722724599,0.079902389975,0.0800990464725,0.0805009097501,0.0807061165301,0.0809711752876,0.0817321504303,0.0821425639903,0.0819715583403,0.0820827120128,0.0816722984527,0.0813986894127,0.0813131865877,0.0812789854577,0.0812020329152,0.0813302871527,0.0814072396952,0.0814841922377,0.0819715583403,0.0821682148378,0.0816295470402,0.0816038961927,0.0819459074928,0.0820057594703,0.0819373572103,0.0819117063628,0.0819288069278,0.0816209967577,0.0813046363052,0.0813559380002,0.0812789854577,0.0818860555153,0.0815269436502,0.0813986894127,0.0812960860227,0.0810652283951,0.0809198735926,0.0807916193551,0.080415406925,0.0800648453425,0.0797826860199,0.0795347278274,0.0790473617248,0.0792269176574,0.0798083368675,0.0794834261324,0.0795176272624,0.0792354679399,0.0789618588998,0.0790986634198,0.0790644622898,0.0788421549448,0.0787994035323,0.0785086939272,0.0781923334747,0.0778588724571,0.0779871266947,0.0781752329097,0.0777733696321,0.0778246713271,0.0777391685021,0.0779614758472,0.0779187244347,0.0782265346047,0.0782350848872,0.0780897300847,0.0781153809322,0.0774399086146,0.0774741097446,0.0775510622871,0.0777391685021,0.0777990204796,0.0772005007045,0.0769952939245,0.0767900871445,0.0764480758444,0.0764138747144,0.0763027210419,0.0760376622844,0.0755075447693,0.0750030781017,0.0750800306442,0.0754818939218,0.0756700001368,0.0760718634144,0.0755844973118,0.0754476927918,0.0755930475943,0.0756357990068,0.0756015978768,0.0756101481593,0.0755417458993,0.0755759470293,0.0754476927918,0.0755160950518,0.0755759470293,0.0756015978768,0.0753365391193,0.0753365391193,0.0752339357292,0.0751142317742,0.0751313323392,0.0750030781017,0.0749090249942,0.0750885809267,0.0751569831867,0.0749603266892,0.0751655334692,0.0755930475943,0.0754733436393,0.0755673967468,0.0759607097418,0.0760547628494,0.0761317153919,0.0761317153919,0.0761830170869,0.0760462125669,0.0759265086118,0.0757982543743,0.0759521594593,0.0756614498543,0.0757897040918,0.0759094080468,0.0756528995718,0.0753707402493,0.0755331956168,0.0757298521143,0.0758153549393,0.0759692600244,0.0756871007018,0.0754818939218,0.0753023379892,0.0752852374242,0.0753279888368,0.0751911843167,0.0749261255592,0.0748919244292,0.0745328125641,0.0747636701917,0.0747380193442,0.0742848543716,0.0741138487216,0.0736521334665,0.0736863345965,0.0739257425065,0.0740539967441,0.0740625470266,0.074036896179,0.0738402396815,0.0742079018291,0.0742763040891,0.0745584634116,0.0746097651066,0.0746525165191,0.0743190555016,0.0741993515466,0.0741566001341,0.0745926645416,0.0746183153891,0.0750714803617,0.0756101481593,0.0755160950518,0.0754476927918,0.0752339357292,0.0751997345992,0.0755075447693,0.0756015978768,0.0756015978768,0.0756785504193,0.0756614498543,0.0752595865767,0.0754391425093,0.0757982543743,0.0763454724544,0.0762172182169,0.0765592295169,0.076678933472,0.076935441947,0.0776109142646,0.0776878668071,0.0778845233046,0.0780726295197,0.0782863865822,0.0783633391247,0.0790131605948,0.0789533086173,0.0792183673749,0.0794663255674,0.0796629820649,0.0798425379975,0.0803555549475,0.0807317673776,0.0806548148351,0.0803726555125,0.0804496080551,0.0802529515575,0.08019309958,0.0807146668126,0.0807488679426,0.0814157899777,0.0815867956277,0.0818262035378,0.0823563210528,0.0827154329179,0.0830146928055,0.0832883018455,0.0840065255756,0.0840236261406,0.0842544837681,0.0843656374407,0.0846819978932,0.0845622939382,0.0852890679508,0.0854344227533,0.0854258724708,0.0857422329234,0.0854857244483,0.0853831210583,0.0856823809459,0.0858619368784,0.0854942747308,0.0856738306634,0.0859046882909,0.0861526464834,0.0863578532635,0.086537409196,0.086400604676,0.086315101851,0.0868708702136,0.0869734736036,0.0871701301011,0.0871957809486,0.0872470826436,0.0871701301011,0.0873411357511,0.0872299820786,0.0871615798186,0.0873667865986,0.0875805436612,0.0874351888586,0.0877429990287,0.0880080577862,0.0877429990287,0.0879738566562,0.0878114012887,0.0878627029837,0.0876403956387,0.0878798035487,0.0876831470512,0.0875634430962,0.0877943007237,0.0876574962037,0.0877429990287,0.0879311052437,0.0878798035487,0.0880166080687,0.0885125244538,0.0887348317988,0.0887604826463,0.0883928204988,0.0882303651313,0.0881277617412,0.0878798035487,0.0879054543962,0.0876916973337,0.0880080577862,0.0879653063737,0.0883586193688,0.0882987673913,0.0881705131538,0.0883329685213,0.0882218148488,0.0882474656963,0.0880935606112,0.0876489459212,0.0874180882936,0.0871957809486,0.0870846272761,0.0876061945087,0.0875976442262,0.0876061945087,0.0879482058087,0.0880850103287,0.0883415188038,0.0884270216288,0.0884013707813,0.0884441221938,0.0885809267138,0.0890169911214,0.0892563990314,0.0893162510089,0.0893419018564,0.0890939436639,0.0891110442289,0.0892563990314,0.0892906001614,0.089624061179,0.089726664569,0.0902995334966,0.0905218408416,0.0906244442316,0.0906928464916,0.0909408046842,0.0905047402766,0.0906928464916,0.0909664555317,0.0909066035542,0.0914281707868,0.0918214837818,0.0921292939519,0.0924285538394,0.0930270736145,0.0933006826546,0.0937025459321,0.0941215097747,0.0941813617522,0.0941300600572,0.0943438171197,0.0947371301148,0.0948397335048,0.0947969820923,0.0950363900023,0.0947798815273,0.0948995854823,0.0947713312448,0.0946858284198,0.0951047922623,0.0951902950873,0.0954724544099,0.0956263594949,0.0953270996074,0.0956862114724,0.0953955018674,0.0954810046924,0.0953014487599,0.0952244962174,0.0955494069524,0.09584866684,0.0957802645799,0.0962676306825,0.0964215357675,0.0966096419826,0.0968661504576,0.0966267425476,0.0965668905701,0.0965070385926,0.0965754408526,0.0964044352025,0.09646428718,0.0964557368975,0.095934169665,0.0962590804,0.0967293459376,0.0964557368975,0.096207778705,0.09584866684,0.09639588492,0.0966267425476,0.0970457063901,0.0970884578026,0.0972081617577,0.0973620668427,0.0972851143002,0.0975245222102,0.0973706171252,0.0972509131702,0.0975929244702,0.0975416227752,0.0978323323803,0.0979520363353,0.0980888408553,0.0984479527204,0.0981999945278,0.0978836340753,0.0979263854878,0.0979862374653,0.0980973911378,0.0977211787077,0.0973620668427,0.0975416227752,0.0975843741877,0.0978408826628,0.0979776871828,0.0982256453753,0.0980546397253,0.0978494329453,0.0984565030029,0.0983710001778,0.0984736035679,0.0984052013079,0.0984052013079,0.0989353188229,0.0988241651504,0.0986702600654,0.0987643131729,0.0992003775805,0.099174726733,0.099294430688,0.0992174781455,0.099260229558,0.099653542553,0.100089606961,0.100029754983,0.100029754983,0.100397417131,0.100405967413,0.100482919956,0.100431618261,0.100619724476,0.100936084928,0.100850582103,0.100824931256,0.101055788883,0.101679959506,0.102560638603,0.102654691711,0.102851348209,0.103065105271,0.103347264594,0.103390016006,0.103261761769,0.103552471374,0.103313063464,0.103390016006,0.103595222786,0.103834630696,0.104125340301,0.104296345951,0.104450251036,0.104860664596,0.105100072506,0.105168474766,0.105330930134,0.105895248779,0.105980751604,0.106040603582,0.106091905277,0.105938000192,0.106365514317,0.106476667989,0.106416816012,0.106758827312,0.106895631832,0.106869980984,0.106998235222,0.107348796804,0.107571104149,0.107622405844,0.107707908669,0.107673707539,0.107528352737,0.108032819404,0.108280777597,0.108409031834,0.108793794547,0.108964800197,0.109264060085,0.109742875905,0.110016484945,0.110538052177,0.110691957262,0.110828761782,0.11129902732,0.11157263636,0.112111304157,0.112248108678,0.112709823933,0.112812427323,0.11331689399,0.113231391165,0.113513550488,0.11369310642,0.114026567438,0.11410351998,0.114129170828,0.11441133015,0.114915796818,0.115112453315,0.115497216028,0.115813576481,0.116223990041,0.116138487216,0.116377895126,0.116412096256,0.116377895126,0.116181238628,0.116343693996,0.115907629588,0.115522866876,0.11506115162,0.114291626195,0.11437712902,0.114223223935,0.11348789964,0.112744025063,0.112196806983,0.111692340315,0.111393080427,0.110657756132,0.10982837873,0.108793794547,0.108203825054,0.107528352737,0.106758827312,0.105955100757,0.105117173071,0.104629806969,0.103774778719,0.102988152729,0.102552088321,0.101996319958,0.101406350466,0.100414517696,0.0995081877505,0.0987814137379,0.0981999945278,0.0972423628877,0.0965839911351,0.0958230159924,0.0956691109074,0.0950278397198,0.0947029289848,0.0939761549722,0.0934716883046,0.0931980792645,0.092967221637,0.092864618247,0.0920095899969,0.0919411877368,0.0917103301093,0.0916932295443,0.0914794724818,0.0914110702218,0.0915393244593,0.0916077267193,0.0920266905619,0.0918471346293,0.0915136736118,0.0910690589217,0.0910519583567,0.0910263075092,0.0910947097692,0.0911118103342,0.0912058634417,0.0913170171142,0.0913255673967,0.0914025199393,0.0918043832168,0.0921292939519,0.0922746487544,0.0924029029919,0.0925653583594,0.0927705651395,0.0927363640095,0.092881718812,0.0927192634445,0.092915919942,0.0929757719195,0.092950121072,0.093086925592,0.093138227287,0.093189528982,0.0931467775695,0.0935999425421,0.0933263335021,0.0933605346321,0.0934032860446,0.0932493809595,0.0930954758745,0.0926252103369,0.0922233470594,0.0914025199393,0.0913597685268,0.0914709221993,0.0913426679617,0.0912913662667,0.0913341176792,0.0912058634417,0.0907526984692,0.0907184973392,0.0903080837791,0.0901285278466,0.0898549188065,0.0892136476189,0.0890169911214,0.0890511922514,0.0887091809513,0.0883244182388,0.0884099210638,0.0883158679563,0.0884184713463,0.0881876137188,0.0877600995937,0.0878798035487,0.0879054543962,0.0874351888586,0.0871102781236,0.0865972611735,0.0859388894209,0.0852976182333,0.0851437131483,0.0848872046732,0.0848786543907,0.0848444532607,0.0846392464807,0.0846905481757,0.0845109922432,0.0846135956332,0.0842715843331,0.0838697210556,0.0841091289656,0.0840236261406,0.0837243662531,0.0834422069305,0.0834251063655,0.083365254388,0.083382354953,0.0833054024105,0.083262650998,0.0834080058005,0.083125846478,0.083057444218,0.083142947043,0.0827752848954,0.0826555809404,0.0825871786804,0.0825102261379,0.0822451673803,0.0823563210528,0.0818262035378,0.0816979493002,0.0819886589053,0.0821083628603,0.0821938656853,0.0823306702053,0.0823050193578,0.0822964690753,0.0823648713353,0.0819373572103,0.0816295470402,0.0815098430852,0.0811165300902,0.0812105831977,0.0813559380002,0.0814157899777,0.0818775052328,0.0815354939327,0.0815012928027,0.0813217368702,0.0814328905427,0.0814414408252,0.0814243402602,0.0813217368702,0.0809027730276,0.0805265605976,0.080073395625,0.0800648453425,0.0797997865849,0.0794321244374,0.0795090769799,0.0791243142673,0.0788592555098,0.0785001436447,0.0784402916672,0.0780469786722,0.0779700261297,0.0778674227396,0.0778075707621,0.0776707662421,0.0781581323447,0.0782778362997,0.0785685459048,0.0784659425147,0.0782094340397,0.0782949368647,0.0780982803672,0.0778759730221,0.0779101741522,0.0777391685021,0.0774228080496,0.0775681628521,0.076918341382,0.076849939122,0.0768071877095,0.0770978973145,0.0772176012695,0.077174849857,0.0771320984445,0.077003844207,0.077140648727,0.0776023639821,0.0778503221746,0.0778588724571,0.0779871266947,0.0782179843222,0.0782949368647,0.0789447583348,0.0791927165274,0.0794321244374,0.0798425379975,0.0800477447775,0.0802187504275,0.080073395625,0.0800477447775,0.08026150184,0.0799280408225,0.08015889845,0.0800819459075,0.0803384543825,0.080312803535,0.0804667086201,0.0807403176601,0.0809455244401,0.0808856724626,0.0811934826327,0.0813730385652,0.0815525944977,0.0818518543853,0.0818775052328,0.0818347538203,0.0813217368702,0.0809711752876,0.0808429210501,0.0805009097501,0.0803213538175,0.08005629506,0.0797912363024,0.0796886329124,0.07985108828,0.0797484848899,0.0795005266974,0.0792696690699,0.0786796995773,0.0787395515548,0.0786968001423,0.0786454984473,0.0786540487298,0.0785856464698,0.0786711492948,0.0786540487298,0.0781581323447,0.0778417718921,0.0775681628521,0.0772945538121,0.0770123944895,0.077038045337,0.0768242882745,0.0768413888395,0.0766874837545,0.0767558860145,0.0762428690644,0.0759265086118,0.0755759470293,0.0753621899668,0.0754989944868,0.0755331956168,0.0755502961818,0.0754647933568,0.0756956509843,0.0757469526793,0.0757469526793,0.0758410057868,0.0757127515493,0.0754220419443,0.0754220419443,0.0751569831867,0.0752082848817,0.0752339357292,0.0750116283842,0.0746439662366,0.0742934046541,0.073985594484,0.0739257425065,0.0741480498516,0.0740112453315,0.0738060385515,0.073763287139,0.0737205357265,0.0736008317715,0.073643583184,0.0734811278165,0.0736179323365,0.073575180924,0.0733870747089,0.073506778664,0.0734811278165,0.0738060385515,0.0739599436365,0.0741566001341,0.0741138487216,0.073763287139,0.0734298261215,0.073523879229,0.0733357730139,0.0732759210364,0.0732417199064,0.0732075187764,0.0737205357265,0.0740112453315,0.0743361560666,0.073831689399,0.073694884879,0.073814588834,0.0741822509816,0.0743105052191,0.0741737006991,0.0742934046541,0.0745841142591,0.0746354159541,0.0743874577616,0.0745670136941,0.0745157119991,0.0746183153891,0.0749090249942,0.0751398826217,0.0752766871417,0.0751142317742,0.0749945278192,0.0750116283842,0.0748235221692,0.0746610668016,0.0747636701917,0.0746781673666,0.0745926645416,0.0743874577616,0.0748662735817,0.0750971312092,0.0755673967468,0.0756101481593,0.0756614498543,0.0756015978768,0.0757640532443,0.0759521594593,0.0757555029618,0.0755331956168,0.0757982543743,0.0760291120019,0.0760889639794,0.0760034611544,0.0758837571993,0.0757811538093,0.0764480758444,0.0764480758444,0.0759436091768,0.0756272487243,0.0754476927918,0.0755246453343,0.0754134916618,0.0757127515493,0.0755930475943,0.0754134916618,0.0752595865767,0.0756357990068,0.0756956509843,0.0756785504193,0.0761830170869,0.0761830170869,0.0759179583293,0.0759692600244,0.0762770701944,0.0763198216069,0.0757897040918,0.0756186984418,0.0754134916618,0.0755417458993,0.0757042012668,0.0753621899668,0.0755588464643,0.0756101481593,0.0753621899668,0.0751911843167,0.0749688769717,0.0743789074791,0.0746867176492,0.0747893210392,0.0747636701917,0.0749346758417,0.0747551199092,0.0748748238642,0.0753279888368,0.0756272487243,0.0757469526793,0.0753108882717,0.0752852374242,0.0752852374242,0.0752510362942,0.0751997345992,0.0752253854467,0.0751826340342,0.0751569831867,0.0750800306442,0.0751142317742,0.0752253854467,0.0755759470293,0.0759265086118,0.0759179583293,0.0761830170869,0.0766532826245,0.0767729865795,0.0763283718894,0.0764395255619,0.0765335786694,0.0769781933595,0.0768242882745,0.076986743642,0.0774655594621,0.0779785764122,0.0781153809322,0.0790901131373,0.0792012668099,0.0788592555098,0.0791414148323,0.0792098170924,0.0788336046623,0.0790046103123,0.0789960600298,0.0789362080523,0.0789704091823,0.0791157639848,0.0795176272624,0.0793038701999,0.0793124204824,0.0794748758499,0.0795005266974,0.0795432781099,0.0795945798049,0.07988528941,0.0795945798049,0.0795518283924,0.0792012668099,0.0789191074873,0.0787823029673,0.0785428950573,0.0780127775422,0.0778503221746,0.0782179843222,0.0781153809322,0.0780384283897,0.0780298781072,0.0782008837572,0.0779871266947,0.0777306182196,0.0773544057896,0.0772774532471,0.0769439922295,0.076764436297,0.0769439922295,0.0767900871445,0.076627631777,0.077055145902,0.076952542512,0.0769097910995,0.077174849857,0.0773715063546,0.0775425120046,0.0774228080496,0.0774399086146,0.0774912103096,0.0774484588971,0.0773544057896,0.0774228080496,0.0774228080496,0.0773116543771,0.0774399086146,0.0775510622871,0.0775339617221,0.077243252117,0.077243252117,0.0773971572021,0.0779101741522,0.0782265346047,0.0781666826272,0.0784402916672,0.0786112973173,0.0787908532498,0.0784573922322,0.0785257944923,0.0785685459048,0.0784488419497,0.0782778362997,0.0783120374297,0.0783804396897,0.0785001436447,0.0784659425147,0.0785599956223,0.0784060905372,0.0785086939272,0.0784317413847,0.0782778362997,0.0781752329097,0.0780726295197,0.0781495820622,0.0782778362997,0.0783120374297,0.0785770961873,0.0786027470348,0.0784659425147,0.0785172442097,0.0786540487298,0.0784915933622,0.0781581323447,0.0779101741522,0.0779358249997,0.0776023639821,0.0773629560721,0.0771491990095,0.0773116543771,0.0773031040946,0.0771149978795,0.0771662995745,0.076867039687,0.077072246467,0.077140648727,0.077106447597,0.0773629560721,0.0773544057896,0.0775510622871,0.0776878668071,0.0778930735872,0.0779871266947,0.0782008837572,0.0781410317797,0.0779358249997,0.0779785764122,0.0781666826272,0.0781068306497,0.0780384283897,0.0779871266947,0.0777220679371,0.0776964170896,0.0774228080496,0.0774912103096,0.0777135176546,0.0778332216096,0.0779529255647,0.0782008837572,0.0784146408197,0.0789875097473,0.0788250543798,0.0791243142673,0.0790559120073,0.0793124204824,0.0787481018373,0.0783804396897,0.0782179843222,0.0783462385597,0.0784915933622,0.0783718894072,0.0780555289547,0.0779358249997,0.0782692860172,0.0782350848872,0.0782265346047,0.0782265346047,0.0782863865822,0.0779101741522,0.0777648193496,0.0777562690671,0.0779443752822,0.0778503221746,0.0775254114396,0.0777135176546,0.0776451153946,0.0777306182196,0.0778930735872,0.0779956769772,0.0779956769772,0.0782094340397,0.0782863865822,0.0783291379947,0.0782094340397,0.0781752329097,0.0782094340397,0.0778759730221,0.0784231911022,0.0784830430797,0.0788849063573,0.0786711492948,0.0790644622898,0.0793295210474,0.0792867696349,0.0793551718949,0.0792696690699,0.0794748758499,0.0796715323474,0.0797484848899,0.0795090769799,0.0774655594621,0.0750543797967,0.0727116023913,0.070300422726,0.0683595085982,0.0662133876903,0.0640672667825,0.0617586905071,0.0596809718593,0.0576374543415,0.0553374283486,0.0533195616783,0.051045186533,0.0488990656251,0.0466161401973,0.0445127707019,0.0421870938616,0.0397759141962)
m <- c(0.0422244831275,0.0443785338835,0.0467276364797,0.0490512975315,0.0512307898319,0.0534187626471,0.0554710472257,0.0578286303367,0.0598978759448,0.0623996278072,0.064562159078,0.0667331708636,0.0687430528683,0.071151519068,0.0735345437233,0.0756885944793,0.0779868139868,0.0799458129027,0.0799118908436,0.0796744364295,0.0796659559147,0.0798101246661,0.0798440467253,0.0798440467253,0.0795048261338,0.0793012937789,0.0795472287077,0.0795048261338,0.0791401639979,0.0793436963528,0.079335215838,0.0798694882696,0.0798016441513,0.0799627739323,0.0798779687844,0.0801578257724,0.080132384228,0.0803189555534,0.0803698386421,0.0801493452576,0.0802002283463,0.0802850334942,0.0805224879083,0.0804376827604,0.080573370997,0.0801493452576,0.0801493452576,0.0802171893759,0.0802341504055,0.0799542934175,0.0798694882696,0.0799118908436,0.0797422805478,0.0800051765062,0.0797507610626,0.0799712544471,0.0800390985654,0.0798440467253,0.0795387481929,0.0794793845894,0.0797168390034,0.0798016441513,0.0795048261338,0.0790129562761,0.0794793845894,0.0792673717197,0.0790044757613,0.0787924628916,0.0786991772289,0.0783938786966,0.0783345150931,0.0784023592114,0.0785210864184,0.0783599566374,0.0785041253888,0.0786058915663,0.0784702033297,0.0784278007557,0.0784786838445,0.0784362812705,0.0783599566374,0.0784193202409,0.0784193202409,0.0783938786966,0.0784871643592,0.0787330992881,0.0786058915663,0.0785295669332,0.0786822161994,0.0788687875247,0.0788433459803,0.0788687875247,0.0787076577437,0.0788942290691,0.0789196706134,0.0788687875247,0.0787670213472,0.0785719695071,0.0781225022234,0.0784617228149,0.0781564242825,0.0784702033297,0.0787330992881,0.0789111900986,0.0792080081162,0.0794030599563,0.0796744364295,0.0794030599563,0.0791571250275,0.0793097742936,0.0790299173057,0.0791825665718,0.0794200209859,0.0795387481929,0.0796405143704,0.0798101246661,0.0798779687844,0.0798779687844,0.0800730206245,0.080132384228,0.0803443970977,0.0800051765062,0.080132384228,0.0803104750386,0.0804037607012,0.0799882154767,0.080132384228,0.0801069426837,0.0802002283463,0.0801663062872,0.0803952801865,0.0804376827604,0.0805140073935,0.0805055268787,0.0809465136477,0.0812348511504,0.0815486301976,0.0814553445349,0.0814977471088,0.0814977471088,0.0812687732096,0.0814553445349,0.0814299029905,0.0814383835053,0.0815740717419,0.0814892665941,0.0814553445349,0.0815995132863,0.0816673574046,0.0814892665941,0.0815147081384,0.081650396375,0.081769123582,0.0821083441736,0.0819811364517,0.0820998636588,0.0819811364517,0.0822440324102,0.0822440324102,0.0821337857179,0.0817352015229,0.0820574610848,0.0823118765285,0.0824221232207,0.0825578114573,0.0824475647651,0.0822185908658,0.0821253052031,0.0820065779961,0.0818624092447,0.0819726559369,0.0815486301976,0.0808956305589,0.0807090592336,0.0805055268787,0.0801239037133,0.0805224879083,0.0802850334942,0.0803783191569,0.0806751371744,0.08045464379,0.0803783191569,0.0801154231985,0.0798779687844,0.0795048261338,0.0794369820155,0.0792249691458,0.0789535926726,0.078656774655,0.0783514761226,0.0783938786966,0.0781818658269,0.0783345150931,0.0782921125191,0.0783260345783,0.0783429956079,0.0789451121578,0.0789111900986,0.0786482941402,0.0785634889923,0.0785465279628,0.0782836320043,0.07825819046,0.0782073073713,0.0780716191347,0.0779189698685,0.0774949441291,0.0774440610404,0.0773507753777,0.0774525415552,0.0772829312594,0.0772829312594,0.0770454768454,0.0766384121355,0.0766468926503,0.0762059058814,0.0760702176448,0.0756716334498,0.075620750361,0.0753748154322,0.075340893373,0.0751543220477,0.074942309178,0.0745522054978,0.0745606860126,0.0745267639534,0.074424997776,0.0741196992436,0.0738822448296,0.0735515047529,0.0732801282797,0.0730002712917,0.072669531215,0.072347271653,0.0723048690791,0.0722539859904,0.0722200639312,0.0724151157713,0.072347271653,0.0723218301087,0.0724575183453,0.0727119337889,0.0727967389368,0.0730002712917,0.0733734139423,0.0735345437233,0.0736787124747,0.0739670499775,0.0739246474035,0.0743486731429,0.0740348940958,0.0742723485098,0.0742808290246,0.0744758808647,0.0747811793971,0.0749507896928,0.0750779974146,0.0751712830773,0.0753578544026,0.0760193345561,0.0760362955856,0.0759684514673,0.0759599709525,0.0760871786744,0.0760702176448,0.0761550227927,0.076222866911,0.0764348797806,0.0762907110293,0.0762652694849,0.0760956591891,0.0759260488934,0.0756970749941,0.0757055555089,0.0758582047751,0.075900607349,0.0758497242603,0.0760362955856,0.0762652694849,0.076299191544,0.0762652694849,0.076180464337,0.0758242827159,0.0753917764618,0.0751543220477,0.0750016727815,0.0750186338111,0.0747811793971,0.0750779974146,0.0749168676337,0.0750186338111,0.0748575040302,0.074823581971,0.0750864779294,0.0748744650597,0.0745606860126,0.0744589198351,0.0744334782908,0.07466245219,0.0746539716753,0.0745182834386,0.0743910757168,0.0743571536577,0.074382595202,0.0744334782908,0.0745946080717,0.0747387768231,0.0748405430006,0.0749677507224,0.0751373610181,0.0751458415329,0.07526456874,0.075222166166,0.0748829455745,0.0747472573379,0.0746963742492,0.0747302963083,0.0744843613795,0.0753069713139,0.0753069713139,0.075620750361,0.0758666852899,0.0758582047751,0.0760871786744,0.0757479580829,0.0761889448518,0.0757140360237,0.0755783477871,0.0754172180061,0.0752052051364,0.0750695168998,0.0752900102843,0.0756122698462,0.0756292308758,0.0753069713139,0.0755953088167,0.075900607349,0.0760702176448,0.0759345294082,0.0759769319821,0.0758836463195,0.0760193345561,0.0758836463195,0.0758666852899,0.0757309970533,0.0755868283019,0.0754681010949,0.0753917764618,0.0754850621244,0.0753239323435,0.0754681010949,0.0752560882252,0.0753663349174,0.0756970749941,0.0756716334498,0.0758497242603,0.0757055555089,0.0755529062427,0.0755274646984,0.0751373610181,0.0754172180061,0.0751288805034,0.075340893373,0.0754341790357,0.0756122698462,0.0756122698462,0.0759514904378,0.0755698672723,0.0755274646984,0.075340893373,0.0751712830773,0.0751288805034,0.0751712830773,0.0748490235154,0.0750101532963,0.0750440753555,0.0750864779294,0.0752560882252,0.0753663349174,0.0757903606568,0.0758582047751,0.0759938930117,0.0763246330884,0.076299191544,0.076341594118,0.0767571393426,0.0767062562538,0.0767147367686,0.0766129705912,0.0765281654433,0.0760193345561,0.0758327632307,0.0757733996272,0.0758412437455,0.0759854124969,0.0762398279405,0.0762059058814,0.0761465422779,0.0762143863962,0.0764433602954,0.0766299316208,0.0769945937566,0.0774101389812,0.0776136713361,0.0779274503833,0.0779698529572,0.0783853981818,0.0783090735487,0.078215787886,0.0789535926726,0.0791486445127,0.0790638393648,0.0792928132641,0.0794454625302,0.0795133066485,0.0794624235598,0.0796998779739,0.079776202607,0.0797677220922,0.080132384228,0.0804800853343,0.0807005787188,0.0807769033519,0.0811076434286,0.0815062276236,0.0818539287299,0.0823118765285,0.0828037463861,0.0831514474924,0.0833719408769,0.0834313044804,0.0836772394093,0.083609395291,0.0840334210303,0.0841521482374,0.0840503820599,0.0840164600008,0.083685719924,0.0833889019065,0.0836602783797,0.0834228239656,0.0839486158825,0.0837196419832,0.0839740574268,0.0839401353677,0.0838214081606,0.0838298886754,0.0841860702965,0.0843472000775,0.0843896026514,0.0848984335387,0.0848899530239,0.0850765243492,0.0854496669999,0.0853818228816,0.0852715761893,0.0848814725091,0.0846779401542,0.0846779401542,0.0848729919943,0.0848729919943,0.0843811221366,0.084406563681,0.0847457842725,0.0847118622133,0.0849577971422,0.0854666280294,0.0854072644259,0.0858143291357,0.0858652122245,0.0861450692124,0.0862637964195,0.0867471857624,0.0871881725313,0.0874595490045,0.087518912608,0.0878666137143,0.0879938214361,0.0886044185009,0.0886468210748,0.0891302104177,0.089477911524,0.0897408074824,0.0897323269676,0.0896899243937,0.0897916905711,0.089477911524,0.0898680152042,0.0896305607902,0.0894439894648,0.0896220802754,0.089876495719,0.0900969891035,0.0904022876358,0.090716066683,0.0908602354344,0.090716066683,0.0910044041857,0.0909704821266,0.090275079914,0.0904446902098,0.0903853266062,0.0896135997606,0.0898934567486,0.0899443398373,0.0903090019732,0.090275079914,0.0907330277125,0.0905803784464,0.090436209695,0.090673664109,0.0907923913161,0.0905888589612,0.0907923913161,0.0907754302865,0.0908093523456,0.0906143005055,0.090436209695,0.0904870927837,0.0905634174168,0.0906312615351,0.0902157163105,0.0902326773401,0.0898086516007,0.0902241968253,0.0903090019732,0.090393807121,0.0903429240323,0.0907415082273,0.0905379758724,0.0906991056534,0.0904870927837,0.0909195990379,0.0912164170554,0.0911994560259,0.0915471571322,0.0916658843392,0.0915301961026,0.0917676505166,0.0918778972089,0.0921323126525,0.0922001567708,0.0924206501553,0.0921407931673,0.0918694166941,0.0920475075046,0.0920814295638,0.0919796633863,0.0923358450074,0.0920559880194,0.0920814295638,0.0922425593447,0.0924291306701,0.0924460916996,0.0925987409658,0.0922849619187,0.0925054553031,0.0928361953799,0.0931160523679,0.0936079222255,0.0936079222255,0.093870818184,0.0940658700241,0.0943287659825,0.0940319479649,0.0944050906156,0.0940743505389,0.0944220516451,0.0941676362015,0.0941676362015,0.0943372464973,0.0948375968697,0.0948375968697,0.0949732851063,0.0954481939344,0.0954905965084,0.0954142718753,0.0953379472422,0.0953379472422,0.0955584406267,0.0960927130583,0.0964573751942,0.0961944792358,0.0966778685786,0.0968983619631,0.0973054266729,0.0977548939567,0.0983570105066,0.0986114259502,0.0995866851508,0.0998665421388,0.100740035162,0.101376073771,0.102079956498,0.1025972679,0.102749917167,0.103173942906,0.103521644012,0.104471461668,0.105209266455,0.106065798449,0.106337174922,0.106964733016,0.107405719785,0.108253771264,0.108898290388,0.109500406938,0.109746341866,0.109966835251,0.11058591283,0.111289795558,0.112137847036,0.112731483072,0.113130067267,0.113681300728,0.114495430147,0.115080585668,0.115411325744,0.116064325383,0.116072805898,0.116335701856,0.116437468034,0.116123688987,0.11577598788,0.115860793028,0.115665741188,0.115589416555,0.115496130892,0.115301079052,0.115029702579,0.114749845591,0.11499578052,0.114860092283,0.114546313236,0.113783066905,0.113070703663,0.112544911746,0.112426184539,0.112231132699,0.111976717255,0.111433964309,0.11081488673,0.110170367606,0.109890510618,0.110043159884,0.109458004364,0.108966134506,0.10801631685,0.107685576773,0.107270031548,0.106871447353,0.106201486685,0.105735058372,0.105285591088,0.10482764329,0.104573227846,0.104005033355,0.103937189237,0.103971111296,0.104089838503,0.104089838503,0.103784539971,0.103665812764,0.103445319379,0.102919527462,0.102775358711,0.102656631504,0.102241086279,0.102054514954,0.101927307232,0.10220716422,0.102317410912,0.102605748415,0.102953449521,0.103089137758,0.103131540332,0.103530124527,0.103852384089,0.104217046225,0.10422552674,0.10442057858,0.104395137035,0.104310331887,0.10482764329,0.104759799171,0.105014214615,0.104819162775,0.105073578218,0.104785240716,0.104853084834,0.1050057341,0.105234707999,0.105641772709,0.105463681899,0.105438240354,0.105446720869,0.105387357266,0.105132941822,0.104929409467,0.104759799171,0.10498877307,0.104912448437,0.104853084834,0.104878526378,0.104887006893,0.105115980792,0.104564747331,0.10459866939,0.104352734461,0.103597968645,0.103597968645,0.103513163497,0.103309631143,0.10302129364,0.102953449521,0.102987371581,0.102342852457,0.102529423782,0.102275008338,0.101689852818,0.101359112741,0.100994450606,0.101079255753,0.100833320825,0.100994450606,0.101087736268,0.101113177813,0.100570424866,0.100231204275,0.0996884513282,0.0994085943403,0.0990100101452,0.0987640752164,0.0986707895537,0.0985944649206,0.0983485299918,0.098102595063,0.0978821016785,0.0977379329271,0.0975683226313,0.097542881087,0.0972206215251,0.0972884656434,0.0971866994659,0.0971866994659,0.0972969461581,0.0967202711526,0.0963132064428,0.096185998721,0.0959570248217,0.0955669211415,0.0954990770232,0.0957704534964,0.0956856483485,0.0959485443069,0.0960503104844,0.0962114402653,0.0961181546027,0.0959570248217,0.0955584406267,0.0953718693014,0.0947443112071,0.0944390126747,0.0946171034853,0.0944050906156,0.095066570769,0.0952616226091,0.0954905965084,0.0954566744492,0.0954142718753,0.0955329990823,0.0959231027626,0.0956008432006,0.095626284745,0.0959570248217,0.095787414526,0.0952446615795,0.0944814152487,0.0940573895093,0.0938453766396,0.093429831415,0.0930736497939,0.0932517406045,0.0935824806812,0.0934891950185,0.0935824806812,0.0937605714917,0.093590961196,0.0927429097172,0.0924545722144,0.0920051049307,0.0918948582384,0.0917846115462,0.0917676505166,0.0915810791913,0.0917252479427,0.0916574038244,0.0917422089723,0.0913605858068,0.0912503391146,0.0914453909547,0.0907923913161,0.0905294953576,0.0901733137366,0.0898425736598,0.0897068854232,0.0895796777014,0.089036924755,0.0889775611515,0.0886128990156,0.0881719122467,0.0881803927615,0.0885874574713,0.0890708468142,0.0891386909325,0.088918197548,0.089198054536,0.089316781743,0.089596638731,0.0892743791691,0.0890878078437,0.0889775611515,0.0890623662994,0.089198054536,0.0896560023345,0.0899019372634,0.0901393916774,0.0901817942513,0.0901224306478,0.0903259630027,0.090393807121,0.0904531707246,0.0902835604288,0.0903174824879,0.0906651835942,0.0905803784464,0.090156352707,0.0904870927837,0.0904701317541,0.0900800280739,0.0899697813817,0.0897068854232,0.0896644828493,0.0899697813817,0.089876495719,0.0898171321155,0.0897323269676,0.0895881582162,0.0889012365184,0.0889521196071,0.0889266780628,0.089079327329,0.0888757949741,0.0886044185009,0.0879090162883,0.087518912608,0.0871033673834,0.0868065493659,0.0860857056089,0.0854751085442,0.0858143291357,0.0853394203076,0.0851528489823,0.0846270570655,0.0842623949296,0.0837535640423,0.0836687588945,0.0833549798473,0.0831938500664,0.0831175254333,0.0826002140312,0.0823542791024,0.082371240132,0.0822609934397,0.0821761882919,0.0823373180728,0.0822525129249,0.0821507467475,0.0819387338778,0.0815486301976,0.081650396375,0.0819217728482,0.0819896169665,0.0818708897595,0.0821677077771,0.0819896169665,0.0821507467475,0.0821677077771,0.0821422662327,0.0824645257946,0.0825323699129,0.0824645257946,0.0823542791024,0.0819556949074,0.0820744221144,0.081930253363,0.0811839680617,0.0810567603399,0.0808956305589,0.080971955192,0.0807429812927,0.0806751371744,0.0806496956301,0.0803104750386,0.0803104750386,0.0802595919499,0.0802511114351,0.0799458129027,0.0797846831217,0.079453943045,0.0791571250275,0.0789535926726,0.0789027095838,0.0792843327493,0.0793776184119,0.0794369820155,0.0794454625302,0.0792080081162,0.0790468783352,0.0790299173057,0.0788603070099,0.0787500603177,0.0784278007557,0.0780122555311,0.0775543077326,0.0771048404489,0.0769097886088,0.0770793989045,0.0769352301531,0.0774695025847,0.0775288661882,0.077537346703,0.0774355805256,0.0774695025847,0.0773507753777,0.0773507753777,0.0776560739101,0.0774695025847,0.0769776327271,0.0771726845672,0.0769521911827,0.0766299316208,0.0764263992659,0.0765620875025,0.0764263992659,0.0767316977982,0.0766808147095,0.0766384121355,0.0767995419165,0.0761550227927,0.0758073216864,0.0757225165385,0.0755189841836,0.0752052051364,0.0748829455745,0.0745776470422,0.0745691665274,0.0747133352788,0.0747133352788,0.0747557378527,0.0748320624858,0.0751882441069,0.0750016727815,0.0749083871189,0.0750610363851,0.0749507896928,0.0747218157936,0.0745013224091,0.074704854764,0.0746963742492,0.0747642183675,0.0747133352788,0.0746454911605,0.0747811793971,0.0751119194738,0.0750440753555,0.0751712830773,0.0753154518287,0.0753154518287,0.0751967246217,0.0753493738878,0.0747811793971,0.0748575040302,0.0748659845449,0.0746454911605,0.0748659845449,0.0745182834386,0.0744080367464,0.0744843613795,0.0745861275569,0.0747387768231,0.075103438959,0.0749083871189,0.0747302963083,0.0746454911605,0.0747472573379,0.0746794132196,0.0745352444682,0.0744165172612,0.0744843613795,0.0744589198351,0.0741790628471,0.0745182834386,0.0747133352788,0.0746115691013,0.0742384264507,0.0742553874802,0.0745182834386,0.0744165172612,0.0742553874802,0.0739670499775,0.0739076863739,0.0739670499775,0.0739246474035,0.0740348940958,0.0740603356401,0.0738737643148,0.0739416084331,0.0738483227704,0.0737974396817,0.0739246474035,0.0736363099007,0.0740518551253,0.0739924915218,0.073704154019,0.073704154019,0.0739585694627,0.0736193488712,0.0735006216641,0.0733988554867,0.0729833102621,0.0726525701854,0.0725677650375,0.0723642326826,0.0728476220255,0.0726780117297,0.0730426738656,0.0729154661438,0.0725932065819,0.0728221804811,0.0729578687177,0.0730511543804,0.0728985051142,0.073025712836,0.0732462062205,0.073704154019,0.0738483227704,0.0736956735043,0.0732292451909,0.0732038036466,0.0736702319599,0.0736702319599,0.0736787124747,0.0738992058592,0.0741027382141,0.0742299459359,0.0739416084331,0.0741875433619,0.0740857771845,0.0741366602732,0.0741536213028,0.0743995562316,0.0739924915218,0.0740348940958,0.0743401926281,0.0742214654211,0.0746794132196,0.074984711752,0.075103438959,0.0749507896928,0.0748999066041,0.0751373610181,0.0750610363851,0.0753324128583,0.0755105036688,0.075383295947,0.0753239323435,0.0753493738878,0.0754935426392,0.074984711752,0.074823581971,0.0745522054978,0.0745776470422,0.0748659845449,0.0755613867575,0.075663152935,0.0752560882252,0.07526456874,0.0754511400653,0.0752052051364,0.0750186338111,0.0750271143259,0.0751119194738,0.075222166166,0.0753154518287,0.0753324128583,0.075502023154,0.075340893373,0.0755359452132,0.0755529062427,0.0753324128583,0.0754850621244,0.0752136856512,0.0750610363851,0.0748066209414,0.075103438959,0.0751458415329,0.0748744650597,0.0747981404266,0.0749253481485,0.0748999066041,0.0748490235154,0.0748575040302,0.074984711752,0.0752306466808,0.0754341790357,0.0756122698462,0.0755189841836,0.0752136856512,0.0752306466808,0.0748320624858,0.0749677507224,0.0747302963083,0.0748744650597,0.0746794132196,0.0747642183675,0.0747133352788,0.0744674003499,0.0746794132196,0.074543724983,0.0744758808647,0.0742469069654,0.0741536213028,0.0742214654211,0.0742214654211,0.0741621018176,0.0740094525514,0.0738992058592,0.0738228812261,0.0738313617409,0.0744504393203,0.0744334782908,0.0743741146873,0.0742723485098,0.0740433746105,0.0737380760782,0.0736617514451,0.0735684657824,0.0735006216641,0.0736871929895,0.0730850764395,0.0732886087944,0.0730172323212,0.07306811541,0.0731953231318,0.0731953231318,0.0733988554867,0.0729578687177,0.0733310113684,0.0731105179839,0.0732886087944,0.073347972398,0.0731698815874,0.073585426812,0.0733225308536,0.0733564529127,0.0732631672501,0.0733394918832,0.0734921411493,0.0735175826937,0.0733903749719,0.0734582190902,0.0738737643148,0.0740433746105,0.0744419588056,0.0744165172612,0.0743571536577,0.0741705823324,0.0742129849063,0.0743656341725,0.0744758808647,0.0748320624858,0.0752815297695,0.0732801282797,0.0711769606123,0.0690059488267,0.0671741576326,0.0648674576104,0.0628321340613,0.0607798494827,0.0588717336555,0.0567176828995,0.054461865966,0.0525707111683,0.0503403357792,0.0483982978928,0.0461933640481,0.044158040499,0.0423347298197,0.0400365103123,0.0381283944851)
s <- c(0.040603340355,0.0406205981768,0.0406205981768,0.0404480199583,0.0403444730272,0.0404695922356,0.0404480199583,0.0402624983735,0.0403660453045,0.0403617308491,0.0406335415432,0.0405990258995,0.0406810005533,0.0406378559987,0.0407802330289,0.0407672896625,0.0408622076827,0.0408880944155,0.0407759185735,0.0408018053062,0.0408449498609,0.0623913404392,0.0633750362846,0.0644450212392,0.0652173087669,0.0662570925333,0.0672839329333,0.0682805721451,0.0693721293771,0.0704550576981,0.0715638727519,0.0726899456275,0.0738721064242,0.0747263686057,0.0758783282141,0.0768879107922,0.0779535812914,0.0788380446612,0.0799770609032,0.080002947636,0.0800633500124,0.0797958537738,0.0792867480292,0.0793471504057,0.0791141698108,0.0787042965418,0.0785532906007,0.0784972026797,0.0783375678276,0.0782555931738,0.0781693040645,0.07817361852,0.0781002727771,0.0780959583217,0.0781822474309,0.0780269270343,0.0779535812914,0.0781908763418,0.0782426498074,0.0784109135704,0.0784842593133,0.0784238569368,0.0784368003032,0.0785489761452,0.0784022846595,0.0783548256494,0.0783203100057,0.0781822474309,0.0781951907973,0.0783203100057,0.0784152280259,0.0783634545603,0.0782685365402,0.0782253919855,0.0780743860444,0.0780916438662,0.077828462083,0.0775178212897,0.0779018078259,0.0777551163402,0.0779104367368,0.0782814799065,0.0781477317872,0.0783030521839,0.0782771654511,0.0785360327788,0.0783591401049,0.0781261595099,0.0779924113906,0.0779449523805,0.0780312414897,0.078341882283,0.0785576050561,0.0786395797099,0.0787344977301,0.0787172399082,0.0787949001065,0.0789717927805,0.0790753397116,0.0790710252561,0.0790408240679,0.0792220311973,0.079256546841,0.079368722683,0.0793083203066,0.0794032383267,0.0793298925839,0.0795110997133,0.0797527092192,0.0801064945671,0.0801927836763,0.0803826197166,0.0804387076377,0.0809521278377,0.0811247060561,0.0814180890276,0.0814353468494,0.0815130070477,0.0817805032864,0.0817632454646,0.0820609428915,0.0821515464562,0.0822896090309,0.0827426268545,0.082906576162,0.082803029231,0.0829324628948,0.0827598846763,0.0825312185368,0.0825010173486,0.0825527908141,0.0825743630915,0.0828116581419,0.0827857714091,0.0828850038847,0.0830705254696,0.0833035060646,0.0830316953705,0.0829626640831,0.0829324628948,0.0831266133906,0.0832215314108,0.0832646759654,0.0833423361637,0.0831309278461,0.0828548026965,0.0828332304192,0.0827339979436,0.0829669785385,0.0828418593301,0.0825614197251,0.0821774331889,0.0819660248713,0.0817891321973,0.0815302648696,0.081543208236,0.0812455108091,0.0811505927889,0.0811764795217,0.0808183797183,0.0808701531839,0.081029788036,0.0807450339755,0.080572455757,0.080395563083,0.0801496391217,0.0800806078343,0.0799123440713,0.0796448478326,0.0796448478326,0.0793902949603,0.0793083203066,0.0791184842662,0.07920045892,0.0793040058511,0.0794075527822,0.0794161816931,0.0792392890192,0.0793083203066,0.0792781191183,0.0792996913956,0.0792910624847,0.0791918300091,0.0791357420881,0.0787172399082,0.078518774957,0.0785317183234,0.0785791773334,0.0786611519872,0.0782728509956,0.0781693040645,0.0779449523805,0.0775652802998,0.0775523369334,0.0772718973284,0.0770691179217,0.0765988422763,0.0763184026712,0.076232113562,0.0764176351469,0.0764176351469,0.076512553167,0.0760681642544,0.0760034474225,0.0760595353435,0.0760293341553,0.0758567559368,0.0757402656393,0.0755374862326,0.0754166814796,0.0752095876174,0.0750758394981,0.0749420913788,0.0749334624679,0.0747738276158,0.0747565697939,0.074804028804,0.0747091107838,0.0747047963284,0.0747091107838,0.0747910854376,0.0749248335569,0.0750628961317,0.0751534996964,0.0753390212813,0.0756280897973,0.0757143789065,0.0757402656393,0.0761544533637,0.0760422775217,0.0762019123738,0.0762062268292,0.0763313460376,0.0764176351469,0.0764435218796,0.0764435218796,0.076568641088,0.0765168676225,0.0769181119805,0.0769871432679,0.0768231939603,0.0766765024746,0.0768231939603,0.076913797525,0.0770000866343,0.0771122624763,0.0770777468326,0.0769008541586,0.0767973072275,0.0767023892074,0.0766376723754,0.0764521507906,0.0763227171267,0.0763831195032,0.0762234846511,0.0763140882158,0.0763960628696,0.0762838870275,0.0762148557401,0.0759646173233,0.0759387305906,0.0758783282141,0.0757230078174,0.07560651752,0.0755159139553,0.0754253103906,0.0754900272225,0.0756755488074,0.0757359511838,0.0758136113822,0.0757532090057,0.0755676874208,0.0756410331637,0.0755115994998,0.0755720018763,0.0755331717771,0.0757488945502,0.0761371955418,0.0760854220763,0.0759818751452,0.0758092969267,0.075774781283,0.075943045046,0.0760163907889,0.0760983654427,0.0762105412847,0.0762536858393,0.0761156232645,0.0762925159385,0.0764780375233,0.0768145650494,0.0767282759401,0.0767282759401,0.0767196470292,0.0768231939603,0.0771812937637,0.0770950046544,0.0776127393099,0.0777076573301,0.0779751535687,0.0781391028763,0.078462687036,0.0785489761452,0.078510146046,0.0788596169385,0.0787172399082,0.0787388121855,0.0789157048595,0.0789976795133,0.0788898181267,0.0788596169385,0.0790623963452,0.0789717927805,0.0787776422847,0.0791875155536,0.0793600937721,0.0797829104074,0.0798001682292,0.0799425452595,0.0801625824881,0.0804128209049,0.0804947955587,0.0806242292225,0.080917612194,0.080852895362,0.080908983283,0.0809262411049,0.0811333349671,0.0809909579368,0.081431032394,0.0813965167503,0.0814482902158,0.0817761888309,0.0816338118007,0.0816726418999,0.0817503020982,0.0817632454646,0.0815647805133,0.0814569191267,0.0817157864545,0.0816942141772,0.0819056224948,0.0820436850696,0.0820652573469,0.0820221127923,0.0824751306158,0.0823327535856,0.0824104137839,0.0823284391301,0.0822680367536,0.0822076343772,0.0823154957637,0.0820954585351,0.0821429175452,0.0822637222982,0.082393155962,0.0824060993284,0.0826175076461,0.0829669785385,0.0828677460629,0.0830532676478,0.083139556757,0.0831525001234,0.0830618965587,0.0833941096293,0.0832689904209,0.0832129024999,0.0832776193318,0.0831654434898,0.0829497207167,0.0829497207167,0.0828936327957,0.0829971797268,0.0833207638864,0.0835623733923,0.0835580589368,0.0833423361637,0.0832948771536,0.0833595939856,0.0833293927973,0.0835278577486,0.0836314046797,0.0838945864629,0.0840326490377,0.0842526862663,0.0844338933957,0.0843303464646,0.0843648621083,0.0846841318125,0.0847963076545,0.0846755029016,0.084567641515,0.0845288114158,0.0844511512175,0.0843691765637,0.0847531630999,0.0847876787436,0.0847876787436,0.0851457785469,0.0853917025083,0.0856333120142,0.085715286668,0.0858706070646,0.0860949587486,0.08634088271,0.0867939005335,0.0871649437033,0.0873720375654,0.0874971567739,0.0874022387537,0.087535986873,0.0875748169722,0.0878077975671,0.0880364637066,0.0880364637066,0.0883082744007,0.0882521864797,0.0881529540041,0.0883255322226,0.0883298466781,0.0883773056881,0.0883557334108,0.0886232296495,0.0885757706394,0.0887785500461,0.0889813294529,0.0893178569789,0.0895508375739,0.0898744217335,0.0902713516361,0.0904698165873,0.0907761429251,0.0909961801537,0.0909357777772,0.0909875512428,0.0909875512428,0.0909357777772,0.0909142054999,0.0911342427285,0.0910048090646,0.0908149730243,0.0907631995588,0.0908926332226,0.0910867837184,0.0912550474814,0.0916562918394,0.0917037508495,0.0917598387705,0.0919669326327,0.0919626181772,0.0920661651083,0.092221485505,0.0924070070899,0.0927090189722,0.0928902261016,0.0930326031319,0.0933432439252,0.0937315449168,0.0938480352142,0.0942233928395,0.0942794807605,0.0943830276916,0.0943485120479,0.0943614554142,0.0943269397705,0.0941975061067,0.0943916566025,0.0940076700663,0.0940767013537,0.0944045999689,0.0943959710579,0.0943830276916,0.0943571409588,0.0947929009605,0.0949827370008,0.0951207995756,0.0952890633386,0.0953322078932,0.0950560827437,0.0951035417537,0.0951941453185,0.0947238696731,0.0948058443269,0.0950043092781,0.0951639441302,0.0952933777941,0.0955867607655,0.0955781318546,0.0956859932411,0.0956816787857,0.0955824463101,0.0955004716563,0.0956342197756,0.0956816787857,0.0955091005672,0.0952286609622,0.0952286609622,0.0952761199722,0.0954443837353,0.0955479306664,0.0954616415571,0.0953839813588,0.0950647116546,0.0955824463101,0.0955824463101,0.0956773643302,0.0956169619538,0.0958197413605,0.095983690668,0.0960095774008,0.0958240558159,0.0960915520546,0.0964625952243,0.096441022947,0.0966783179975,0.0966998902748,0.0966524312647,0.0969717009689,0.0972478261185,0.0973470585941,0.0973815742378,0.0976792716647,0.0975412090899,0.0974419766143,0.0975066934462,0.0976188692882,0.0977267306748,0.0978647932496,0.0977094728529,0.0978389065168,0.0982358364193,0.0987751433521,0.0988312312731,0.0990081239471,0.0989563504815,0.0992109033538,0.0994007393941,0.0994783995924,0.099875329495,0.099754524742,0.0999271029605,0.100129882367,0.10038443524,0.100380120784,0.100656245934,0.100565642369,0.100949628905,0.100940999994,0.100975515638,0.101143779401,0.101683086334,0.101726230888,0.101825463364,0.102092959603,0.102036871682,0.102213764355,0.102231022177,0.102200820989,0.10248557505,0.102826417031,0.10299899525,0.102929963962,0.103352780598,0.103577132282,0.103810112877,0.104081923571,0.104370992087,0.104427080008,0.105177795258,0.105445291497,0.105954397241,0.106472131897,0.106916520809,0.107330708534,0.107649978238,0.108003763586,0.108443838043,0.109004717253,0.109449106166,0.110122161218,0.110398286367,0.110989366766,0.111282749737,0.111947175878,0.112326847959,0.112887727169,0.112969701823,0.113224254695,0.113629813509,0.114156177075,0.11462645272,0.114941407969,0.115286564406,0.115821556883,0.116334977083,0.116826825006,0.117154723621,0.117694030554,0.117655200455,0.117909753327,0.117978784614,0.11780189194,0.117525766791,0.117650885999,0.117331616295,0.1170986357,0.116818196095,0.116330662628,0.116235744608,0.116015707379,0.115769783418,0.115325394505,0.114889634503,0.11424678064,0.11373336044,0.113094821031,0.112615916475,0.111994634888,0.111567503798,0.110950536666,0.110247280426,0.109513822998,0.108948629332,0.108780365569,0.108051222596,0.107404054277,0.106700798036,0.106252094668,0.105742988924,0.105039732683,0.104241558423,0.103637534658,0.103115485547,0.10239928594,0.101937639206,0.101264584154,0.101152408312,0.100846081974,0.100742535043,0.100375806329,0.0999659330597,0.0997674681084,0.0995388019689,0.0992195322647,0.0987147409756,0.0986198229555,0.0982919243403,0.0981883774092,0.0980157991907,0.0981236605773,0.0982444653302,0.0984256724597,0.0988139734513,0.0987924011739,0.0986457096882,0.0986241374109,0.0987794578076,0.098952036026,0.0989908661252,0.0990987275118,0.0991332431555,0.0991461865218,0.0994136827605,0.099417997216,0.0997502102866,0.0998149271185,0.100017706525,0.0999357318714,0.100052222169,0.100233429298,0.100332661774,0.100613101379,0.100440523161,0.10052681227,0.100561327913,0.100518183359,0.100457780982,0.100380120784,0.100319718408,0.100414636428,0.100604472468,0.100436208705,0.100466409893,0.100492296626,0.100531126725,0.100173026922,0.0999529896933,0.0996250910782,0.0988269168176,0.0988053445403,0.0988182879067,0.0986500241437,0.0984774459252,0.0984645025588,0.0984170435487,0.0978604787941,0.0979381389924,0.0976016114664,0.0972133104748,0.096906984137,0.0963978783924,0.0963417904714,0.0962339290848,0.0961433255201,0.0959966340344,0.0960527219554,0.0957291377958,0.0956083330428,0.0952157175958,0.0948576177924,0.0947152407621,0.0946030649201,0.0943183108596,0.0941155314529,0.0937315449168,0.0932742126378,0.0928384526361,0.0926874466949,0.0924717239218,0.0924544660999,0.0922732589705,0.0922042276831,0.0921783409504,0.0920877373857,0.0921955987722,0.0917296375823,0.0913197643134,0.0913758522344,0.0912162173823,0.0908667464898,0.0906898538159,0.0908192874798,0.0907459417369,0.0908883187672,0.0909012621335,0.09096166451,0.0909875512428,0.0907631995588,0.0905259045083,0.0904741310428,0.0899693397537,0.0897536169806,0.0898097049016,0.0896630134159,0.0898657928226,0.0900211132192,0.0898701072781,0.0897881326243,0.0899132518327,0.0900340565856,0.0902756660915,0.0901807480714,0.0901807480714,0.0903446973789,0.0902929239134,0.0898010759907,0.0892574546024,0.0889813294529,0.088675003115,0.0885110538075,0.0884031924209,0.0885239971739,0.0889252415318,0.0887052043033,0.0887354054915,0.0887354054915,0.0887052043033,0.0882780732125,0.0881227528159,0.0878423132108,0.0875748169722,0.0873288930108,0.0870915979604,0.0869923654848,0.0869319631083,0.0867119258797,0.0867939005335,0.0864055995419,0.0862157635016,0.0861337888478,0.085771374589,0.0854391615184,0.0852191242898,0.0849990870612,0.0848998545856,0.0847661064663,0.084735905278,0.0847661064663,0.0847272763671,0.0844511512175,0.0843260320091,0.0845762704259,0.0847229619116,0.0846453017133,0.0845503836932,0.0846064716142,0.0845072391385,0.0847229619116,0.0842311139889,0.0841016803251,0.0840240201268,0.0842138561671,0.084343289831,0.0845546981486,0.0846582450797,0.0847143330007,0.0848049365654,0.0850077159721,0.0852363821116,0.0852752122108,0.085370130231,0.0854003314192,0.0854564193402,0.0859612106293,0.0860431852831,0.0859482672629,0.0863236248881,0.0864185429083,0.0863063670663,0.0861769334024,0.0860302419167,0.0861165310259,0.0861035876596,0.0861726189469,0.0861035876596,0.0861898767688,0.0861035876596,0.0858317769654,0.085995726273,0.0860863298377,0.0861337888478,0.0861855623133,0.0861381033033,0.0858749215201,0.08582746251,0.0856289975587,0.0854564193402,0.0848308232982,0.084343289831,0.0844511512175,0.0840369634931,0.0838514419083,0.0834501975503,0.0831309278461,0.0828202870528,0.082859117152,0.0826477088343,0.0824406149721,0.0822852945755,0.0817244153654,0.0816294973452,0.0816165539788,0.0815345793251,0.0814957492259,0.081543208236,0.081543208236,0.0814828058595,0.0811247060561,0.0807666062528,0.0806803171435,0.0806803171435,0.080572455757,0.0805249967469,0.0805681413015,0.0804861666477,0.0804904811032,0.0805336256578,0.0802618149637,0.0802661294192,0.0801237523889,0.0799813753587,0.079994318725,0.0798087971402,0.0798778284276,0.0797613381301,0.0794981563469,0.0794593262477,0.0793773515939,0.0794636407032,0.0792824335738,0.0791012264444,0.079088283078,0.0787819567402,0.0788078434729,0.0787949001065,0.0786784098091,0.0783375678276,0.0780787004998,0.0777551163402,0.0775739092107,0.0775825381217,0.0774876201015,0.0775782236662,0.077604110399,0.0776127393099,0.0775566513889,0.0774574189133,0.0772934696057,0.0773538719822,0.0772460105956,0.0770950046544,0.0769914577233,0.0767671060393,0.0766980747519,0.0765470688107,0.0765470688107,0.0766117856427,0.0763615472259,0.076465094157,0.0765427543553,0.0764521507906,0.0763701761368,0.0763701761368,0.0762925159385,0.0765513832662,0.0768533951486,0.0769224264359,0.0764176351469,0.0764478363351,0.0763960628696,0.0764176351469,0.0763788050477,0.0763788050477,0.0763701761368,0.0766721880191,0.0766721880191,0.0765254965334,0.0766980747519,0.076344289404,0.0762191701956,0.0763227171267,0.0763356604931,0.0762450569284,0.075999132967,0.0757834101939,0.0757877246494,0.0757661523721,0.0756841777183,0.0757575234611,0.0757532090057,0.0758912715805,0.0756928066292,0.075886957125,0.0760811076208,0.0762623147502,0.0761673967301,0.0760811076208,0.0761544533637,0.076232113562,0.0763615472259,0.0762364280175,0.0760897365317,0.0762925159385,0.076577269999,0.0765729555435,0.0765945278208,0.0766074711872,0.0765556977217,0.0768318228712,0.0769094830696,0.0763658616813,0.0762450569284,0.0761587678191,0.0760854220763,0.0761415099973,0.0761156232645,0.075999132967,0.0759473595015,0.0759214727687,0.0761889690074,0.0764046917805,0.0762968303939,0.0764607797015,0.0764176351469,0.0763356604931,0.0763270315822,0.0764090062359,0.0763701761368,0.0761371955418,0.0760379630662,0.0757920391048,0.0760293341553,0.0762105412847,0.0759861896006,0.0758955860359,0.0759301016796,0.0759387305906,0.0758006680158,0.07560651752,0.0751621286074,0.0752872478158,0.0753692224695,0.0753347068258,0.0754770838561,0.0753994236578,0.0753649080141,0.0756280897973,0.0757316367284,0.0757661523721,0.0756108319754,0.0754511971233,0.075662605441,0.0756151464309,0.0754425682124,0.0754555115788,0.0755633729653,0.0753778513805,0.0752786189048,0.0752441032611,0.0750887828645,0.0750974117754,0.0752311598948,0.0751232985082,0.0755029705889,0.0756539765301,0.0758999004914,0.0756108319754,0.0755029705889,0.0756669198964,0.0759603028679,0.0759301016796,0.0759344161351,0.0762407424729,0.0766117856427,0.076913797525,0.0774789911906,0.0774574189133,0.0770475456444,0.0771769793082,0.0774487900023,0.077258953962,0.0773495575267,0.0774574189133,0.0775307646561,0.0776127393099,0.077539393567,0.0778672921822,0.0777076573301,0.0777378585183,0.077828462083,0.0779665246578,0.0777810030729,0.077828462083,0.0781304739654,0.0779233801032,0.0781347884208,0.0781132161435,0.0780312414897,0.077884550004,0.0777378585183,0.0775911670326,0.0774703622796,0.0777939464393,0.0778327765385,0.0777292296074,0.0776947139637,0.0777939464393,0.0777594307956,0.077371129804,0.0770993191099,0.0769224264359,0.0767671060393,0.0768231939603,0.0772675828729,0.0772416961402,0.0769526276242,0.0771726648528,0.0772158094074,0.0770691179217,0.0771079480208,0.0772114949519,0.0773409286158,0.0773366141603,0.0773927020813,0.077427217725,0.077491934557,0.0773625008931,0.0774962490124,0.0775048779233,0.0773366141603,0.0774789911906,0.0773970165368,0.0773107274275,0.077034602278,0.0771856082191,0.0772848406948,0.0774056454477,0.0775264502007,0.0775609658444,0.0776860850528,0.0777464874292,0.0778414054494,0.0777378585183,0.0778974933704,0.0780226125788,0.078052813767,0.0779190656477,0.0777810030729,0.0778241476275,0.0776817705973,0.0777335440628,0.07766019832,0.0776558838645,0.0776084248544,0.0776127393099,0.0775091923788,0.0773322997049,0.0773883876259,0.0773581864376,0.0773883876259,0.0772891551502,0.0773754442595,0.0774229032696,0.0773538719822,0.0773495575267,0.0773409286158,0.077202866041,0.0769957721788,0.0768749674259,0.077202866041,0.077025973367,0.0768749674259,0.0767153325738,0.0766808169301,0.076521182078,0.0763874339586,0.0763658616813,0.0761803400964,0.0763788050477,0.0761069943536,0.0761932834628,0.0761846545519,0.0762062268292,0.0763701761368,0.0764392074242,0.0766463012864,0.0764694086124,0.0767671060393,0.0766247290091,0.0766117856427,0.0766635591082,0.0766678735637,0.0768490806931,0.0766808169301,0.0766721880191,0.0764909808897,0.0765168676225,0.076456465246,0.0765039242561,0.0765513832662,0.0766463012864,0.0769181119805,0.0771295202981,0.0774401610914,0.077716286241,0.077604110399,0.07766019832,0.0776472549536,0.0778543488158,0.0776256826763,0.0776213682208,0.0777680597065,0.0768145650494,0.0758179258376,0.0746530228628,0.0735614656309,0.0723275313687,0.0714603258208,0.0703989697771,0.0694239028426,0.0683280311552,0.0672105871905,0.0660586275821,0.0648505800527,0.0638582552963,0.0628314148963,0.0617484865753,0.0606569293434,0.0595826299333,0.0585773618106,0.0392227146071,0.0393046892608,0.0393564627264,0.0393564627264,0.0394643241129,0.0395031542121,0.0395247264894,0.0394643241129,0.0394470662911,0.0394643241129,0.0392960603499,0.0395721854995,0.0396023866877,0.0398051660945,0.0396973047079,0.0398957696592,0.0400295177785,0.0400079455012,0.0400424611449,0.0399993165903,0.0401028635213)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("9-organelles-nucleus-merged/nrpe1_AGO4_ChIP-GSM867186.36mers.macs2.0.9_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"))
lines(x,s,col=c("black"))
abline(v=median(x[p==max(p)]),lty=2,col=c("red"))
abline(v=median(x[m==max(m)]),lty=2,col=c("blue"))
abline(v=median(x[s==max(s)]),lty=2,col=c("black"))
legend("topleft",c("forward tags","reverse tags","shifted tags"),lty=c(1,1,1),col=c("red","blue","black"))
legend("right",c("d=43"),bty="n")
dev.off()