# R script for Peak Model
#  -- generated by MACS
p <- c(0.0154030717785,0.0161081219448,0.017188440748,0.0179162344681,0.0188146048413,0.0197868917642,0.0206909480258,0.0215267736262,0.0223455415613,0.0230676493929,0.0239205326586,0.024887133693,0.0255637544172,0.0264166376829,0.027224033841,0.0279177122305,0.0286796212812,0.0295552481006,0.0295040751047,0.0296575940925,0.0295495622122,0.0296405364272,0.0296519082041,0.0296575940925,0.0299418885144,0.0298964014069,0.0297030812,0.0299646320681,0.0299305167375,0.0302261829363,0.0302830418207,0.030300099486,0.0300442345063,0.0300442345063,0.0299930615103,0.0300783498369,0.0302432406016,0.0303057853744,0.030118151056,0.0302261829363,0.0301067792791,0.0299873756219,0.0300726639485,0.029976003845,0.0300556062832,0.0301238369444,0.0301124651675,0.029976003845,0.0302148111594,0.0300214909525,0.030027176841,0.0302659841554,0.0303455865935,0.0303740160357,0.0303512724819,0.0303114712629,0.0304593043623,0.0303512724819,0.0303171571513,0.0304251890316,0.0302261829363,0.0301010933907,0.0299873756219,0.0297997413034,0.0298054271919,0.0296064210966,0.0297371965306,0.0296803376463,0.0297428824191,0.0296462223156,0.0295609339891,0.0295268186584,0.0292936972325,0.0292652677903,0.0292936972325,0.0290946911371,0.0291742935753,0.0290378322528,0.0289013709302,0.0289980310337,0.0289184285956,0.0288388261574,0.0288047108268,0.0286682495043,0.0287080507234,0.0290435181412,0.029197037129,0.0290264604759,0.0289127427071,0.0289013709302,0.0290207745874,0.0289980310337,0.0289639157031,0.0289298003724,0.0290662616949,0.0289468580378,0.0289184285956,0.0291686076868,0.0290605758065,0.0292993831209,0.0294358444434,0.0296860235347,0.02952113277,0.0296462223156,0.0299475744028,0.0301010933907,0.030300099486,0.0302830418207,0.0305673362426,0.0305843939079,0.0304251890316,0.0305332209119,0.0307322270073,0.030936918991,0.0308914318835,0.0309141754373,0.0310676944251,0.0311870980823,0.031312187628,0.0314713925042,0.0313292452933,0.0312212134129,0.0311188674211,0.0310961238673,0.0312041557476,0.0310563226482,0.0307322270073,0.030897117772,0.0308232012223,0.0309255472142,0.0306185092385,0.0309767202101,0.0309312331026,0.0310620085367,0.0313974759545,0.0313406170701,0.0315566808308,0.0314827642811,0.0317272574839,0.0317329433724,0.0317329433724,0.0317386292608,0.031442963062,0.0314713925042,0.0314486489505,0.0315680526077,0.0318409752527,0.0320001801289,0.0319944942405,0.0318409752527,0.0318807764717,0.0318921482486,0.0318068599221,0.0317898022567,0.0316874562649,0.0315794243845,0.0316931421533,0.0317272574839,0.0317898022567,0.0318750905833,0.0318523470296,0.0320058660174,0.0326028843034,0.0326881726299,0.0329383517212,0.032961095275,0.0329952106056,0.0328246339525,0.0329383517212,0.0327791468449,0.0325687689727,0.0325289677537,0.0323356475468,0.032455051204,0.0322389874433,0.0323185898815,0.032221929778,0.0323413334352,0.0326995444068,0.0327393456259,0.0325403395306,0.0326768008531,0.032312903993,0.0320513531249,0.0318466611411,0.0320172377943,0.0320968402324,0.0322162438896,0.0323413334352,0.0323981923196,0.0326540572993,0.0328018903987,0.0331544154819,0.03305206949,0.0333079344697,0.0335353700072,0.0337173184372,0.0339276963094,0.0337969208753,0.034012984636,0.0340584717435,0.0339276963094,0.0344792274879,0.0343655097191,0.034519028707,0.0346384323642,0.0350193868895,0.0352695659808,0.0352411365386,0.0349966433358,0.0351956494311,0.0352923095345,0.0353548543074,0.0354173990802,0.0352354506502,0.0352525083155,0.0354685720761,0.0352354506502,0.0357301229443,0.0359405008165,0.0362134234615,0.0362987117881,0.0366000638753,0.0367535828631,0.0369639607353,0.0371629668306,0.0370549349503,0.0372766845994,0.0367251534209,0.0370321913966,0.03676495464,0.0367080957556,0.0367706405284,0.03658300621,0.0364067436684,0.0362930258996,0.036349884784,0.0364238013337,0.0362873400112,0.036713781644,0.0365204614371,0.036713781644,0.0366284933175,0.0366910380903,0.0373733447028,0.0377486133397,0.0380613372038,0.038140939642,0.0381295678651,0.0381977985263,0.038322888072,0.0384081763985,0.0384593493945,0.0390449959036,0.0391132265649,0.0394202645405,0.0393577197677,0.0396761295202,0.0396363283012,0.0396363283012,0.0394202645405,0.0393520338793,0.0396818154087,0.0396818154087,0.0402049171449,0.0403470643559,0.0403470643559,0.0404550962362,0.040608615224,0.0407564483234,0.0411260310719,0.0412283770638,0.041438754936,0.041762850577,0.0417685364654,0.0415467868163,0.0417514788001,0.0418765683457,0.0420983179948,0.0422347793173,0.042075574441,0.0425020160739,0.0424053559704,0.0426441632848,0.0428659129339,0.0427919963842,0.0431160920252,0.0434345017777,0.0435539054349,0.0436278219846,0.044048577729,0.0442987568203,0.0449469481022,0.0451232106438,0.0454416203963,0.0457316007067,0.0460556963476,0.0464593944267,0.0463513625464,0.0466356569683,0.0471530728162,0.0472326752543,0.0479263536437,0.0486200320332,0.0487508074672,0.0491999926538,0.0494387999682,0.0496378060636,0.0498026968283,0.0500926771386,0.0504565739986,0.0507920414165,0.0511900536071,0.051201425384,0.0513663161487,0.0517415847856,0.0519292191041,0.0521168534225,0.052668384601,0.0527821023698,0.0532028581142,0.0537828187348,0.0542206321446,0.0546527596659,0.0554032969397,0.0559548281182,0.0558638539031,0.0561367765482,0.0560230587794,0.0564949875198,0.0568588843798,0.0572796401242,0.0577686265299,0.0582348693818,0.059133239755,0.0593265599619,0.0597018285988,0.0600714113472,0.0603215904385,0.0604523658726,0.0611744737042,0.0617771778786,0.0621183311849,0.0627722083553,0.0634602008563,0.0641481933573,0.065040877842,0.0659847353227,0.0669285928035,0.0677871619576,0.0683955520204,0.0690664868561,0.0700785749981,0.0708063687182,0.0716080789879,0.0724041033692,0.0733365890731,0.0740302674625,0.0741382993428,0.0747410035172,0.0751390157079,0.0752527334767,0.076412654718,0.0774816017443,0.0786415229857,0.079204425941,0.0802108281946,0.0807851029268,0.0814276083203,0.0822748056976,0.0832641502858,0.0848561990484,0.0854532173344,0.0864425619226,0.0877446303749,0.0890580706041,0.0902975942835,0.0915712332937,0.0928391864153,0.0936352107966,0.0948178755917,0.0958015342915,0.096807936545,0.0978257105754,0.0986615361758,0.099741854979,0.101038237543,0.102260703557,0.103079471492,0.104063130192,0.105024045338,0.106553549328,0.107338201932,0.108481065508,0.110061742494,0.111528701711,0.113473275557,0.115093753762,0.116247989114,0.117680833001,0.118840754242,0.120427117116,0.12205328121,0.123975111502,0.125709307475,0.126766882725,0.127682310763,0.128381675041,0.129888435477,0.131230305149,0.13220827796,0.133385256867,0.13486358786,0.136051938544,0.137643987307,0.139611304706,0.140521046856,0.14218132628,0.144091784795,0.145814608992,0.147924073602,0.149766301456,0.151216203008,0.152722963444,0.154724396174,0.156396047375,0.15845433899,0.159887182876,0.162059192259,0.164259631085,0.166693191336,0.168524047413,0.170451563594,0.172379079774,0.174340711285,0.176000990709,0.178207115423,0.179804850074,0.181595904932,0.183335786794,0.185035867437,0.18764569023,0.189948475048,0.192393407076,0.194542672905,0.196652137516,0.199017467106,0.201070072832,0.20300896079,0.204817073313,0.206738903605,0.208495843132,0.21090665983,0.21305592566,0.214937954732,0.216791554363,0.218264199469,0.220527183067,0.222795852554,0.224831400615,0.226656570803,0.229459713803,0.231853472835,0.234224488314,0.237027631314,0.239182583032,0.241303419419,0.243111531943,0.244436343949,0.246801673539,0.248831535711,0.251765454145,0.253829431648,0.256643946425,0.25844637306,0.260578581224,0.263330551228,0.265678823153,0.267816717206,0.269550913179,0.271580775352,0.273980220272,0.275890678788,0.278051316394,0.280399588319,0.283174301877,0.285914900104,0.288393947463,0.290565956846,0.29251621658,0.294312957327,0.296689658694,0.299191449606,0.301465804982,0.303825448683,0.305218491351,0.307777141148,0.309471535902,0.31133650731,0.31362792035,0.314509233058,0.31657889645,0.31741472205,0.32003591662,0.322600252306,0.324510710821,0.326699777869,0.327632263573,0.329838388287,0.331441808827,0.333164633023,0.334733938232,0.336792229847,0.338407022163,0.340232192352,0.342637323161,0.344218000147,0.346122772774,0.347754622755,0.34966508127,0.35090460495,0.352098641522,0.353264248652,0.354554945327,0.356164051755,0.357386517769,0.358307631696,0.359257175065,0.360519442298,0.361343896122,0.362174035834,0.36397077658,0.364311929887,0.364738371519,0.364692884412,0.364340359329,0.365267159144,0.36539224869,0.366574913485,0.366705688919,0.365841433876,0.365562825343,0.36510226838,0.364908948173,0.364021949576,0.363112207426,0.362418529037,0.361901113189,0.360525128187,0.359001310086,0.357437690765,0.356243654193,0.354964329295,0.353156216771,0.351484565571,0.349591164721,0.348010487735,0.346367265976,0.343751757295,0.341733266899,0.339879667269,0.337724715551,0.335950718358,0.333710478313,0.331379264054,0.3295370362,0.326995444068,0.32462442859,0.322224983669,0.319876711744,0.317949195563,0.315907961614,0.312541915659,0.309039408381,0.306025887509,0.303097654963,0.300317255517,0.297883695266,0.295558166895,0.292971087655,0.290162258767,0.287325000436,0.284186390019,0.28097954894,0.277789765526,0.275401692382,0.272524632832,0.269488368406,0.266207610778,0.263569358543,0.260806016762,0.256973727954,0.253408675904,0.250031258172,0.247574954366,0.244083818866,0.24031976072,0.237147034971,0.234099398768,0.230250052296,0.226542853034,0.222511558132,0.219719786909,0.216382170396,0.212873977229,0.209627334931,0.206517153956,0.202747409921,0.199785062045,0.197385617124,0.194434641025,0.190670582879,0.187816266883,0.184273958386,0.180890854766,0.1773826616,0.174482858496,0.17159442717,0.168870886608,0.166636332452,0.16380476001,0.160535374158,0.158067698576,0.155037120038,0.152836681213,0.149720814349,0.146968844345,0.145382481471,0.142675998574,0.140111662889,0.137416551769,0.134931818522,0.132998616453,0.131099529714,0.12885928967,0.127608394214,0.125817339356,0.123668073526,0.121257256828,0.11946620197,0.118186877072,0.116031925354,0.114024806735,0.113029776259,0.11175045136,0.110192517928,0.108316174743,0.10756563747,0.106240825464,0.104591917817,0.102965753723,0.101646627606,0.100020463512,0.0984852736342,0.0970069426404,0.0958185919568,0.0948917921414,0.0936693261273,0.0923217705675,0.0911504775492,0.0896721465554,0.0885008535371,0.087642284383,0.0862037546082,0.0854247878922,0.0845377892959,0.0832186631783,0.0830253429714,0.0822122609247,0.0810125384643,0.0800800527605,0.0792157977179,0.078061562365,0.0775327747403,0.0766344043671,0.0753437076917,0.0743884784341,0.0736493129371,0.0725860517992,0.071323784566,0.0706926509494,0.0698738830143,0.0690266856371,0.0677871619576,0.0673607203247,0.0666329266047,0.0659051328846,0.0652569416027,0.064495032552,0.0643073982335,0.0639719308157,0.0627778942437,0.0617885496555,0.0614473963492,0.0608844933939,0.0601168984548,0.0600884690126,0.0600202383513,0.0595767390531,0.0592298998584,0.0590308937631,0.0585475932459,0.0583656448159,0.057342184897,0.0569441727064,0.0566939936151,0.0562618660938,0.0556591619194,0.0555681877044,0.0549086246456,0.0547778492115,0.0548176504306,0.0541126002642,0.0540216260492,0.053993196607,0.0541410297064,0.0535212678667,0.0529583649113,0.0529469931345,0.0528332753657,0.0527991600351,0.0530550250148,0.0529356213576,0.0529469931345,0.0528446471426,0.0524409490635,0.052253314745,0.052253314745,0.0523158595178,0.0520258792075,0.0519349049925,0.0520543086497,0.0513776879256,0.0509114450737,0.0507579260858,0.0507124389783,0.0504338304449,0.0503940292258,0.0502177666842,0.0502120807958,0.0499334722623,0.0497003508364,0.0495582036254,0.0493591975301,0.0490635313313,0.0490407877776,0.0489611853394,0.0487451215788,0.048500628376,0.0483698529419,0.04790361009,0.0472952200271,0.047306591804,0.0474259954612,0.0471360151508,0.0467778041793,0.0460954975667,0.0457600301489,0.0455553381651,0.0452255566357,0.0450151787635,0.0447081407878,0.0446399101266,0.0444522758081,0.0441452378325,0.0440315200637,0.0439291740718,0.0437472256418,0.0439519176256,0.0438552575221,0.0432809827899,0.0429000282646,0.0431558932443,0.0431047202483,0.0429682589258,0.0426498491733,0.0425247596276,0.0424451571895,0.0420187155567,0.0418083376845,0.0416889340273,0.0414671843782,0.041296607725,0.0409611403072,0.0411089734066,0.0411601464025,0.0409725120841,0.0410578004106,0.041114659295,0.0410578004106,0.0413136653904,0.0414160113822,0.0415524727048,0.0413591524979,0.0410691721875,0.0410293709685,0.0410521145222,0.0409440826419,0.0407905636541,0.0405005833437,0.040426666794,0.0401935453681,0.0400684558224,0.0399490521652,0.0396818154087,0.039556725863,0.0397216166277,0.0396249565243,0.0391757713377,0.0387720732586,0.0388232462545,0.0390165664614,0.0389710793539,0.0388346180314,0.0390222523498,0.0392610596642,0.0391132265649,0.0391643995608,0.0387948168123,0.0386981567089,0.0388516756967,0.0383854328448,0.0386640413783,0.0384195481754,0.0380329077616,0.0376462673479,0.0373278575953,0.0372311974919,0.0368616147434,0.0367876981937,0.0367251534209,0.0366284933175,0.0366284933175,0.0367820123053,0.0364977178834,0.0364749743296,0.0365090896603,0.0365204614371,0.036440858999,0.0363043976765,0.0364294872221,0.0364977178834,0.0364977178834,0.0367478969747,0.0365659485446,0.0362930258996,0.0363441988956,0.0364749743296,0.0362645964574,0.035985987924,0.0359120713743,0.0354572002992,0.0354742579646,0.035155848212,0.035428770857,0.0355822898449,0.0354572002992,0.0355254309605,0.0352525083155,0.0352183929848,0.0353264248652,0.035246822427,0.0350819316623,0.0349454703398,0.0350705598855,0.0351842776542,0.0354173990802,0.0354401426339,0.035246822427,0.0352240788733,0.035388969638,0.0353548543074,0.0350364445548,0.0350591881086,0.0349113550092,0.0350421304433,0.0351103611045,0.0349227267861,0.0352127070964,0.0350307586664,0.035155848212,0.0354856297414,0.0352127070964,0.0350080151126,0.0350080151126,0.0354515144108,0.035479943853,0.0355083732952,0.0353775978611,0.0358097253824,0.0360030455893,0.0358722701552,0.0358495266015,0.0358267830477,0.0357756100518,0.0359575584818,0.0358779560436,0.0361224492465,0.0364238013337,0.0364067436684,0.0364010577799,0.0362134234615,0.0361053915812,0.0360371609199,0.0360655903621,0.0360428468083,0.0360599044737,0.0361736222424,0.0363669424493,0.0363953718915,0.0365375191025,0.036622807429,0.0364920319949,0.0364920319949,0.0361793081309,0.0359973597008,0.0359916738124,0.0360428468083,0.0361338210234,0.0360599044737,0.0358097253824,0.0355481745142,0.0355538604027,0.0355652321796,0.0359006995974,0.0355936616217,0.0352752518692,0.0353832837495,0.0352354506502,0.0351729058773,0.0351729058773,0.0352127070964,0.0352866236461,0.0354173990802,0.035155848212,0.035297995423,0.0352525083155,0.0353434825305,0.0354685720761,0.0357130652789,0.0356334628408,0.0355652321796,0.0354628861877,0.0352866236461,0.0351672199889,0.0351785917658,0.035207021208,0.0348999832323,0.0346839194717,0.0349170408976,0.0351444764351,0.0355254309605,0.0356732640599,0.0356675781714,0.0356675781714,0.0354856297414,0.0355197450721,0.0353150530883,0.0352183929848,0.0351672199889,0.0350080151126,0.0351046752161,0.0350193868895,0.0348544961248,0.0348317525711,0.0351274187698,0.0352695659808,0.0352752518692,0.0352013353195,0.0349511562283,0.034882925567,0.0347748936867,0.0346952912485,0.034791951352,0.0345929452567,0.0344109968266,0.0343484520538,0.0340925870741,0.0342802213926,0.0345531440376,0.034649804141,0.0343882532729,0.0344792274879,0.0344792274879,0.0345702017029,0.0343143367232,0.0340925870741,0.0338480938713,0.0336661454413,0.0337741773216,0.0337457478794,0.033870837425,0.0342176766198,0.0345076569301,0.034376881496,0.0344223686035,0.0342404201735,0.0343882532729,0.0346156888104,0.0345986311451,0.0347066630254,0.0344223686035,0.0343086508348,0.0342233625082,0.0342006189544,0.0341665036238,0.0342745355041,0.0343313943885,0.0341892471776,0.0340755294088,0.0341608177354,0.0338424079829,0.0339049527557,0.0339049527557,0.0336604595528,0.0335467417841,0.033506940565,0.0337230043257,0.0333022485812,0.0333193062466,0.0332226461431,0.03323401792,0.0331714731472,0.0330350118247,0.0329497234981,0.032636999634,0.0326426855224,0.0325971984149,0.0324607370924,0.0321536991168,0.0321878144474,0.0322333015549,0.0320570390133,0.0316305973805,0.0311586686401,0.0312268993014,0.0310392649829,0.0311359250864,0.0310961238673,0.0308857459951,0.0307663423379,0.0307492846726,0.0307435987842,0.0306071374616,0.0306298810154,0.0303626442588,0.0300840357253,0.0302659841554,0.0301977534941,0.0301977534941,0.0301920676057,0.0300214909525,0.0296803376463,0.0295893634312,0.0296234787619,0.0293619278937,0.029469959774,0.02933918434,0.0293732996706,0.0294074150012,0.0293050690093,0.0293107548978,0.0293107548978,0.0291856653521,0.0290662616949,0.0291344923562,0.0290321463643,0.0288388261574,0.0288956850418,0.0289752874799,0.0288956850418,0.0287592237193,0.028781967273,0.0286966789465,0.0284919869627,0.0284919869627,0.0285488458471,0.0284976728512,0.0283612115286,0.0284635575205,0.028509044628,0.0286057047315,0.0286625636159,0.028509044628,0.0287023648349,0.028651191839,0.028600018843,0.0286113906199,0.0288615697112,0.0286170765083,0.0287649096077,0.0288217684921,0.028509044628,0.0285317881818,0.0285147305165,0.0284806151858,0.0285261022933,0.0285374740702,0.028378269194,0.0283896409708,0.028145147768,0.028145147768,0.0280826029952,0.0281678913217,0.0281508336564,0.0282986667558,0.0283441538633,0.0281394618796,0.0279859428917,0.0276732190276,0.0278437956808,0.0277641932427,0.0277926226848,0.0278096803502,0.0279745711149,0.0277357638005,0.0275765589242,0.0275083282629,0.0275140141514,0.0275424435936,0.0273718669404,0.0272354056179,0.0273491233867,0.0272808927254,0.0271558031798,0.0273320657214,0.0270307136342,0.0271216878492,0.0272808927254,0.0272638350601,0.0269965983035,0.027002284192,0.0270989442954,0.0270534571879,0.0269681688613,0.0268430793157,0.0270477712995,0.0268885664232,0.0268146498735,0.0266440732204,0.0264791824557,0.0264734965672,0.02653604134,0.0267634768776,0.0266611308857,0.0266270155551,0.0266383873319,0.0267577909891,0.0267066179932,0.0266042720013,0.0263882082407,0.0263882082407,0.0265303554516,0.0265985861129,0.0264564389019,0.0266725026626,0.0266270155551,0.0266270155551,0.0264621247904,0.0263654646869,0.0264791824557,0.0263086058025,0.02635409291,0.0264791824557,0.026587214336,0.0265701566707,0.0267293615469,0.0266213296666,0.0265019260094,0.0265189836747,0.0267293615469,0.0268260216504,0.0266497591088,0.0267009321047,0.0268089639851,0.0270307136342,0.0272069761757,0.0271671749567,0.0271728608451,0.0270363995226,0.0271899185104,0.0274628411554,0.0273548092751,0.02653604134,0.0256717862975,0.024938306689,0.0242218847458,0.0234770333604,0.02264120776,0.021862241044,0.021225421539,0.0202531346161,0.0194741679001,0.0188998931678,0.0182289583322,0.0175409658312,0.0167221978961,0.0160569489489,0.0153860141132,0.0144990155168,0.0135949592552)
m <- c(0.0124261198521,0.0130927205044,0.0136624646516,0.0143974346016,0.0152178661737,0.0157933077625,0.0165624623613,0.0172176681306,0.0178272943682,0.01860784385,0.0193086291511,0.0202373121112,0.0208925178806,0.0214793543523,0.0222656012755,0.0229037147204,0.0235190383995,0.0239577413929,0.0238551874464,0.0240261106906,0.024248310908,0.0241913364933,0.0242084288177,0.0244876034499,0.0246300394867,0.0245901573964,0.0245844599549,0.024561670189,0.0244762085669,0.0245274855402,0.0243622597375,0.0243907469448,0.0242141262592,0.0244420239181,0.0244135367107,0.0245445778646,0.0244705111255,0.0245331829817,0.0245103932158,0.0246357369282,0.0245160906572,0.0247041062258,0.0245844599549,0.0247041062258,0.0249490962092,0.0249377013262,0.0249377013262,0.0248408448212,0.0249092141189,0.0250516501557,0.0249263064433,0.0251371117778,0.0253650094367,0.0256897636006,0.0261170717111,0.0260259126475,0.0259176612595,0.0262538103064,0.0262879949553,0.0263050872797,0.0263392719285,0.0262595077479,0.0263050872797,0.02634496937,0.0263848514603,0.0264076412262,0.0268064621293,0.0269830828149,0.0272907446545,0.027176795825,0.027188190708,0.0268064621293,0.0270286623467,0.0269545956076,0.0271654009421,0.0270229649052,0.0270628469956,0.0270058725808,0.0272109804738,0.0272337702397,0.0270172674638,0.0272508625642,0.0271426111762,0.0269432007246,0.0271141239688,0.0270913342029,0.0272166779153,0.0271141239688,0.0269830828149,0.0268862263099,0.0267836723634,0.0267779749219,0.0267096056242,0.0264703130824,0.0264076412262,0.0263620616944,0.0262481128649,0.0264247335506,0.0264304309921,0.0263050872797,0.0264076412262,0.0262709026308,0.0261797435673,0.0263563642529,0.026333574487,0.0262879949553,0.026441825875,0.0266868158583,0.0265956567948,0.0266241440021,0.0265443798215,0.0265443798215,0.0264019437847,0.0264760105239,0.026139861477,0.0258492919619,0.0260373075305,0.0259461484669,0.0260259126475,0.0262310205405,0.026031610089,0.0258492919619,0.0257695277812,0.0258720817277,0.0257125533665,0.0259860305572,0.0258720817277,0.0259005689351,0.0258378970789,0.0260145177646,0.0260543998549,0.0261968358917,0.0261797435673,0.0262310205405,0.0263506668115,0.026755185156,0.0268349493366,0.0268463442196,0.0267950672463,0.0265329849386,0.0266526312095,0.0266355388851,0.0267266979487,0.0267210005072,0.0268862263099,0.0269659904905,0.0269830828149,0.0270172674638,0.0271710983835,0.0271198214103,0.0275414320793,0.0279231606579,0.0279972273971,0.0278718836847,0.0282080327316,0.0280314120459,0.0279801350727,0.0281339659924,0.028116873668,0.028116873668,0.0285840638688,0.0284758124808,0.0285498792199,0.0287606845544,0.0289771873304,0.0289430026816,0.0290398591866,0.028948700123,0.0290170694207,0.029068346394,0.0291595054575,0.0289657924474,0.0290797412769,0.029381705675,0.0293931005579,0.0297463419292,0.0296608803071,0.0299172651734,0.0298147112269,0.029997029354,0.0300881884176,0.0302762039862,0.0302363218959,0.0303445732839,0.0305496811769,0.0304927067621,0.0304699169963,0.0304528246718,0.030321783518,0.0306522351234,0.0304756144377,0.0306921172137,0.0309541995214,0.0309428046385,0.0310624509094,0.0310054764947,0.0307889737187,0.0307775788358,0.0308003686017,0.0307092095381,0.0308003686017,0.0309428046385,0.0308345532505,0.0309655944044,0.0309826867288,0.030937107197,0.0308459481335,0.0308516455749,0.0307490916284,0.0307376967455,0.0307718813943,0.0304984042036,0.0304015476986,0.0303901528156,0.0304813118792,0.0303445732839,0.0300881884176,0.0299343574978,0.0301109781835,0.0300198191199,0.029900172849,0.0298944754075,0.0298147112269,0.0298830805246,0.029900172849,0.0296323930998,0.0295640238021,0.0295526289191,0.0294044954409,0.0297577368122,0.0296608803071,0.0298375009928,0.0297805265781,0.0300027267955,0.0300141216784,0.0299799370296,0.0299172651734,0.0299286600563,0.0302989937521,0.0300767935346,0.0300710960932,0.0301508602738,0.0300710960932,0.030008424237,0.0298830805246,0.0296893675145,0.0299286600563,0.0300027267955,0.0300369114443,0.0299400549393,0.0298830805246,0.0300141216784,0.0300141216784,0.0299913319125,0.0300027267955,0.03021353213,0.0303958502571,0.030418640023,0.0303445732839,0.0300198191199,0.0299514498222,0.029997029354,0.0301223730664,0.0301508602738,0.0302819014277,0.0300198191199,0.0301565577153,0.0300995833005,0.0303958502571,0.0301907423641,0.0301907423641,0.0300369114443,0.0300767935346,0.0301508602738,0.0300597012102,0.0301280705079,0.0302648091032,0.0301508602738,0.0304072451401,0.0305667735013,0.0306978146552,0.03094850208,0.0305781683842,0.0306465376819,0.0308687378993,0.0309257123141,0.0310567534679,0.0310795432338,0.0313017434513,0.0314726666955,0.0318259080668,0.0319455543377,0.031888579923,0.0323215854749,0.03261215499,0.0328742372978,0.0329540014784,0.0329596989198,0.0328742372978,0.0328457500904,0.032828657766,0.0331477144884,0.0334268891206,0.033443981445,0.0332331761105,0.033250268435,0.0332616633179,0.0335009558598,0.0336661816625,0.0334154942377,0.0331818991373,0.0333870070303,0.0334268891206,0.0335921149233,0.0335978123648,0.0334268891206,0.0333300326156,0.033022370776,0.0334382840036,0.0334724686524,0.0334724686524,0.0336092072477,0.0335351405086,0.0337459458431,0.0338029202578,0.0339852383849,0.0337630381675,0.0337231560772,0.033552232833,0.0334496788865,0.0336206021307,0.0337972228163,0.0337858279334,0.0339225665287,0.0342985976659,0.0342473206927,0.0342074386024,0.0340479102411,0.0338371049066,0.033563627716,0.0337402484016,0.0340422127997,0.0340991872144,0.0341960437194,0.0339453562946,0.0343498746392,0.0346119569469,0.0346632339202,0.0346461415958,0.0345264953249,0.0344296388198,0.0345948646225,0.0347999725155,0.0350278701745,0.0350506599403,0.0349082239035,0.0347429981008,0.0346347467128,0.0347828801911,0.0346176543884,0.034805669957,0.0346404441543,0.0346119569469,0.0345435876493,0.0346803262446,0.0347714853082,0.0345663774152,0.034697418569,0.0349708957597,0.0349993829671,0.034805669957,0.0349538034353,0.0354209936361,0.0354893629337,0.0357115631512,0.0360534096395,0.0360818968469,0.0361046866128,0.0363496765961,0.0365661793721,0.0368339591213,0.0368795386531,0.0369593028337,0.0369365130678,0.0369308156263,0.0371928979341,0.0374948623322,0.0378082216132,0.0379221704426,0.0378481037035,0.0377968267302,0.0380304218306,0.038264016931,0.0384463350581,0.0385033094728,0.0385090069143,0.0385374941217,0.038577376212,0.0385944685364,0.0389420124662,0.0391983973325,0.0392211870984,0.039192699891,0.0391015408275,0.0388223661953,0.0390274740883,0.0393465308108,0.0394775719647,0.0393294384864,0.0395801259112,0.0394262949914,0.0395630335868,0.039830813336,0.0396484952089,0.0395744284697,0.0391300280348,0.0392325819813,0.0392610691887,0.0391414229178,0.0393237410449,0.0394433873158,0.0395117566135,0.0395573361453,0.03961431056,0.0396997721821,0.0400644084364,0.0401555674999,0.0404005574833,0.0407253116472,0.0407936809449,0.0408221681522,0.0411469223162,0.0412494762627,0.0412152916139,0.0415343483363,0.041289358353,0.0413349378848,0.0417223639049,0.0419901436541,0.0421952515472,0.0424060568817,0.0425200057111,0.0425200057111,0.0427194161627,0.0429245240557,0.0428846419654,0.0432720679855,0.0434315963468,0.043374621932,0.0438190223669,0.0440070379355,0.0446850334708,0.0450667620494,0.0448844439223,0.0452262904107,0.0455111624843,0.0456365061967,0.0459612603607,0.0461606708122,0.0463771735882,0.0466734405447,0.0469867998257,0.0472203949261,0.0475052669998,0.0475508465316,0.0480294316153,0.0482345395083,0.0484681346087,0.0487302169164,0.049026483873,0.0492144994416,0.0494765817493,0.0498298231207,0.0497044794083,0.0497899410303,0.0498298231207,0.0500235361307,0.0501374849602,0.05048502889,0.0507869932881,0.0509408242078,0.0514535939404,0.0514820811477,0.051533358121,0.0518581122849,0.0520860099439,0.052581687352,0.0529349287233,0.053003298021,0.0533907240411,0.0538920988907,0.0541029042252,0.0547467151116,0.0550714692756,0.0557950443426,0.0560742189748,0.0562223524531,0.0566952400953,0.0576239230554,0.0577720565337,0.0581822723197,0.0583133134736,0.0589001499453,0.0595097761828,0.0598858073201,0.0605410130894,0.0612930753638,0.0619653734576,0.062307219946,0.0626661587588,0.0630991643107,0.0638113444948,0.0649451353478,0.0652470997459,0.0658852131909,0.0665746036091,0.0673551530908,0.067742579111,0.068779513459,0.069924699195,0.0708078026233,0.0718276446469,0.0723233220551,0.0731437536271,0.074118016119,0.0749327502496,0.0759468948317,0.0771604498654,0.0778213530763,0.0786303897654,0.079131764615,0.0800832373409,0.0808637868227,0.0817525876925,0.0824875576424,0.0836213484955,0.0843449235626,0.0854502272083,0.0864814641148,0.0877064140315,0.0892162360218,0.0904297910554,0.0913014996008,0.0921903004705,0.0939166252368,0.0956828320933,0.0973749722107,0.0989474660572,0.100320549452,0.101915833065,0.103294613901,0.104855712864,0.106553550423,0.108405218902,0.109886553685,0.111253939638,0.112815038602,0.114336255475,0.116284780459,0.117845879422,0.119765917199,0.121389688018,0.123662967166,0.125093024976,0.126796559976,0.128739387518,0.13040873787,0.133143509777,0.135935256098,0.138043309443,0.139957649778,0.142116980096,0.144828962237,0.147666288091,0.150173162339,0.152281215684,0.15416137137,0.156030132173,0.158981406856,0.162223251054,0.164399673696,0.16716293281,0.170438961657,0.173111061708,0.176079428715,0.179178836876,0.181457813466,0.184215375138,0.186688064738,0.189377257113,0.192431085742,0.195838155743,0.199005933202,0.202538346915,0.205506713922,0.208475080929,0.211677043037,0.215317708138,0.217847372152,0.221619078407,0.22538508722,0.22925364998,0.232746181603,0.235714548611,0.239007669782,0.242591360468,0.246049707442,0.249770136724,0.252909426975,0.256088599317,0.259148125388,0.262720421191,0.266446547915,0.270263833701,0.273010000491,0.275579546595,0.279208816813,0.281915101513,0.284604293888,0.287903112501,0.290706253705,0.294455170195,0.298528840848,0.30144023344,0.304630800665,0.307502311167,0.310345334462,0.313233937289,0.315450242022,0.317672244196,0.320372831454,0.323358290786,0.325990508746,0.329107009232,0.331630975804,0.333949834484,0.336394036875,0.337807002361,0.340803856575,0.342672617378,0.344541378181,0.346341769687,0.348529587212,0.35045532243,0.352386755089,0.354016223351,0.355395004187,0.356739600375,0.358380463519,0.359827613653,0.361086748218,0.36271621648,0.363234683654,0.364698926112,0.365188906079,0.365268670259,0.366334091815,0.366396763671,0.366265722517,0.367371026163,0.368105996113,0.36844214516,0.368464934926,0.368539001665,0.368259827033,0.368271221915,0.368539001665,0.367849611246,0.367091851531,0.366328394373,0.365832716965,0.364904034005,0.363981048486,0.363650596881,0.362163564657,0.360847455676,0.35981621877,0.358494412348,0.356961800592,0.355810917415,0.354762588184,0.35296789412,0.35203921116,0.350592061026,0.349406993199,0.348432730707,0.347150806376,0.345715051125,0.344205229135,0.342364955539,0.340741184719,0.339835291525,0.337470853314,0.335186179283,0.333260444065,0.330804846791,0.327864966991,0.325711334114,0.324064773528,0.321255934882,0.319683441036,0.317341792591,0.314612718125,0.312983249864,0.310578929562,0.308453783893,0.305929817321,0.3038388563,0.301588366918,0.29958286752,0.297155757453,0.295030611783,0.292409788706,0.289845940043,0.287766373906,0.284798006898,0.282023352901,0.279875417466,0.27749388693,0.274610981545,0.271494481059,0.268697037296,0.266167373282,0.263996648081,0.261569538014,0.258555591475,0.256379168832,0.254060310153,0.251467974283,0.249906875319,0.248003929867,0.245639491656,0.243537135753,0.241560123562,0.239024762106,0.236842642022,0.234563665433,0.232011211653,0.229965830165,0.227362099411,0.225276835832,0.222975069477,0.220849923808,0.218092362135,0.215784898339,0.213483131984,0.211483330027,0.209466435746,0.207814177718,0.205700426932,0.203472727316,0.20139885862,0.199473123402,0.197028921011,0.194875288134,0.193382558468,0.191547982314,0.189160754337,0.186802013567,0.184625590924,0.183030307312,0.181440721141,0.179526380806,0.177127757946,0.175258997143,0.1726153843,0.170427566774,0.168587293179,0.167299671406,0.165151735971,0.162451148712,0.160462741638,0.158542703862,0.157124040935,0.155500270116,0.153819524881,0.152269820801,0.150082003275,0.148412652924,0.147193400448,0.145786132405,0.143752145799,0.142065703123,0.140943307153,0.138801069159,0.137587514125,0.135741543088,0.134368459693,0.132562370746,0.130995574341,0.129252157251,0.128163945929,0.126551569993,0.125731138421,0.124460608972,0.122608940494,0.121224462216,0.120443912734,0.119019552366,0.117994012901,0.116939986228,0.115766313285,0.114752168703,0.112934684873,0.111709734956,0.110803841762,0.110433508066,0.109687143233,0.108570444705,0.107442351293,0.106188914169,0.104884200072,0.103226244603,0.102263376994,0.101232140088,0.0997906873952,0.0986056195688,0.0974946184817,0.0966172124949,0.0949592570263,0.094184404986,0.0931702604038,0.0926460957883,0.0916319512062,0.0909197710221,0.0904639757043,0.0895125029783,0.0877804807706,0.0870569057036,0.0859003250846,0.0850058267734,0.0839745898668,0.0829604452847,0.0816728235118,0.0808296021739,0.0796958113208,0.0788981695146,0.0780093686449,0.0770066189457,0.0764311773569,0.0753372685941,0.0744712574903,0.0735938515035,0.0725569171554,0.0724543632089,0.0718504344128,0.0709388437772,0.0702608482419,0.0699190017536,0.0691954266865,0.0683237181412,0.0679305946796,0.067320968442,0.0670019117195,0.0663979829234,0.0656858027393,0.0648824634916,0.0641304012172,0.0634068261502,0.0629282410665,0.0622673378557,0.0615551576716,0.0614810909324,0.061053782822,0.0603700898452,0.0596579096611,0.0594983812999,0.0595325659487,0.0591052578383,0.0586722522864,0.058319010915,0.0577663590922,0.0572137072693,0.0570313891422,0.0567123324197,0.0563932756973,0.0559260854965,0.0557722545767,0.0554531978543,0.0553905259981,0.0544675404795,0.054148483757,0.0541541811985,0.0537667551783,0.0536072268171,0.0535559498438,0.0536698986733,0.0532995649776,0.0525987796764,0.0520689176194,0.0516643992749,0.0516017274187,0.0515960299772,0.0514421990574,0.0511516295423,0.0507812958466,0.0506502546927,0.05048502889,0.0500463258966,0.050074813104,0.0500349310137,0.0498298231207,0.049436699659,0.0490321813145,0.048701729709,0.0484339499598,0.047978154642,0.0476590979195,0.0477103748928,0.0471064460967,0.0464398454444,0.046519609625,0.0462005529025,0.0458245217653,0.0457048754944,0.0455396496917,0.0455738343405,0.045363029006,0.0447420078855,0.0445255051095,0.044628059056,0.0443602793068,0.0443090023336,0.0442634228018,0.0444172537215,0.0443488844239,0.0442463304774,0.0441893560626,0.0441551714138,0.0439899456111,0.0437848377181,0.0436537965642,0.0434999656444,0.0434543861126,0.0432549756611,0.042651046865,0.0424231492061,0.0420926976007,0.0418477076173,0.0418249178514,0.0416767843731,0.041386214858,0.0414203995069,0.0416084150755,0.0411640146406,0.041181106965,0.0414659790387,0.0412038967309,0.041386214858,0.0410158811623,0.040759496296,0.0405942704933,0.0403663728344,0.0397396542724,0.0396371003259,0.0396940747406,0.0393237410449,0.0392211870984,0.0387027199244,0.0385602838876,0.0384748222655,0.0384349401752,0.0382070425162,0.038047514155,0.0379563550914,0.0378025241717,0.0380190269476,0.037734154874,0.0377854318473,0.037734154874,0.0378993806767,0.03814437066,0.0378481037035,0.0380076320647,0.0384121504093,0.0381671604259,0.0381671604259,0.0380646064794,0.0380873962453,0.0381158834527,0.0381785553089,0.0382583194895,0.0379278678841,0.0378367088205,0.0379905397403,0.0380361192721,0.0380646064794,0.0379221704426,0.0380532115965,0.0382070425162,0.0385260992387,0.0384520324996,0.0385545864461,0.0384406376166,0.0386229557438,0.0387539968976,0.0386229557438,0.0385090069143,0.0383836632019,0.0384862171484,0.0385830736534,0.0387369045732,0.0380019346232,0.0381386732186,0.0378879857938,0.0376942727837,0.037323939088,0.0375860213957,0.0377626420814,0.0376543906934,0.037420795593,0.0374549802418,0.037323939088,0.0373866109442,0.0370675542217,0.0370048823655,0.0369536053922,0.0369365130678,0.037118831195,0.0371587132853,0.0370333695729,0.0369763951581,0.0368339591213,0.0367598923822,0.0366516409942,0.0367314051748,0.0364237433353,0.0363895586864,0.0360192249907,0.0362471226496,0.0359565531345,0.0357229580341,0.0357799324489,0.0357229580341,0.0358312094221,0.0359109736027,0.0356716810609,0.0355691271144,0.0359736454589,0.0359109736027,0.036059107081,0.0362870047399,0.0363496765961,0.036167358469,0.0362414252081,0.036264214974,0.036167358469,0.0360477121981,0.0359394608101,0.0362927021814,0.0363325842717,0.0361160814957,0.0360932917299,0.0359850403419,0.0359109736027,0.0357457478,0.0354152961946,0.0355463373485,0.0355634296729,0.035757142683,0.0358483017465,0.0358995787198,0.0358767889539,0.0360249224322,0.0361217789372,0.0358824863954,0.0361274763787,0.0362585175326,0.0360932917299,0.0361217789372,0.0361730559105,0.0359451582516,0.035962250576,0.0359964352248,0.0358084196562,0.0360875942884,0.0361445687031,0.0358767889539,0.0357913273318,0.0358767889539,0.0355976143217,0.0357058657097,0.0355520347899,0.0353754141043,0.0355919168803,0.0353469268969,0.0354665731679,0.0352956499237,0.0355064552582,0.0356147066461,0.035637496412,0.0356602861779,0.0357457478,0.0357115631512,0.035648891295,0.0358027222147,0.0355691271144,0.0355235475826,0.0352671627163,0.0349310136694,0.0348683418132,0.0346689313617,0.0345207978834,0.0343270848733,0.0344353362613,0.0344467311442,0.0342985976659,0.034384059288,0.0345891671811,0.0345777722981,0.0346404441543,0.0343783618466,0.03408209489,0.0343327823148,0.0345834697396,0.0344752183516,0.0343099925489,0.0342074386024,0.034384059288,0.0343384797562,0.0342701104586,0.034287202783,0.0340991872144,0.0344011516125,0.0342644130171,0.0341618590706,0.0341561616291,0.0344353362613,0.0343384797562,0.0341561616291,0.0342245309268,0.033973843502,0.0339681460605,0.0340080281508,0.034287202783,0.0344125464954,0.0344125464954,0.0343897567295,0.0344752183516,0.0343327823148,0.0344011516125,0.0344011516125,0.0343213874318,0.0340479102411,0.0334382840036,0.033335730057,0.0333129402912,0.0332787556423,0.0332901505253,0.0331932940202,0.0332730582008,0.0332673607594,0.0333300326156,0.0332160837861,0.0332160837861,0.0333528223815,0.0330166733346,0.0328571449733,0.0329653963613,0.0328685398563,0.0327318012609,0.032709011495,0.0325437856923,0.0325836677826,0.0326862217292,0.0327887756757,0.0326805242877,0.032515298485,0.0325722728997,0.0323044931505,0.0321164775819,0.0321848468796,0.0321962417625,0.0319683441036,0.0317119592373,0.031996831311,0.0319626466621,0.0320652006086,0.0322133340869,0.0320708980501,0.0323671650067,0.0320595031672,0.0321677545551,0.0313074408927,0.0304699169963,0.0294557724141,0.028321981561,0.0273306267448,0.0265272874971,0.0256783687177,0.0246642241355,0.0237811207072,0.0230689405232,0.0221915345364,0.0212400618104,0.0202487069941,0.0194168805391,0.0184938950205,0.0177076480973,0.0165168828295,0.0155938973109)
s <- c(0.0133842998377,0.0133958604508,0.0135981711804,0.013687765932,0.0138438342091,0.0137860311435,0.0137918114501,0.0135981711804,0.0137108871583,0.0136733151656,0.013780250837,0.013707997005,0.0137282280779,0.0136993265452,0.0138033720632,0.0138149326763,0.0137051068517,0.0138236031362,0.0137686902239,0.0136675348591,0.0137542394575,0.0137426788443,0.0138062622165,0.0137542394575,0.013687765932,0.0136386333263,0.0135866105673,0.013583720414,0.0135490385746,0.0134276521369,0.0133958604508,0.0133727392246,0.013314936159,0.0134045309106,0.0134074210639,0.0133438376918,0.0133958604508,0.0133264967721,0.0132802543196,0.0133698490713,0.0133582884582,0.0133351672319,0.0134132013705,0.0135374779615,0.013491235509,0.0135056862754,0.0134652241295,0.0134652241295,0.0133929702975,0.0134305422902,0.0132600232467,0.0131126254294,0.0132080004876,0.0131617580352,0.0132022201811,0.0133062656991,0.0132051103343,0.0131126254294,0.0130721632835,0.0131241860425,0.0130432617507,0.0131819891081,0.0131241860425,0.0131386368089,0.0209362703572,0.0213842441155,0.0219536043116,0.0223957977634,0.0228437715217,0.023363999112,0.0238842267024,0.0245142801173,0.0249709243355,0.0253437541085,0.025751265721,0.0261096447276,0.0265142661868,0.0269391187189,0.027395762937,0.0277454714839,0.0282165664684,0.0287021122194,0.0286847712997,0.0287801463579,0.0288032675842,0.0288234986571,0.0290431503064,0.0292396807294,0.029421760386,0.0293350557876,0.0294073096196,0.0294506619188,0.0294073096196,0.0296356317287,0.0296558628016,0.0296645332615,0.0297714689328,0.0297165560205,0.0297281166336,0.0298784046042,0.0300720448739,0.0300864956403,0.0300402531878,0.0300489236477,0.0300229122682,0.0299882304288,0.0300778251805,0.0299304273632,0.0300286925747,0.0302165525379,0.0302165525379,0.0303263783625,0.0304044125011,0.0304362041871,0.0303870715814,0.0306009429241,0.0306876475225,0.0307974733471,0.030765681661,0.0308003635004,0.0309795530037,0.0308957385586,0.0308668370258,0.0309130794783,0.030745450588,0.0308494961061,0.0307020982889,0.0307165490553,0.0308523862594,0.030745450588,0.0308726173323,0.0308148142668,0.0307367801282,0.0306818672159,0.0306500755298,0.0305864921577,0.0305142383257,0.0305720413913,0.0305315792454,0.030496897406,0.0305460300118,0.0304535451068,0.0303379389756,0.0303899617347,0.0302974768297,0.0302512343772,0.0302512343772,0.0300431433411,0.0300142418083,0.0301789805453,0.0303032571363,0.0301471888592,0.029959328896,0.0298755144509,0.0300258024214,0.0299679993558,0.0298899652173,0.0298697341443,0.0298986356771,0.0298726242976,0.0298668439911,0.0298581735312,0.0297685787796,0.0298841849107,0.0298784046042,0.0301847608518,0.030051813801,0.0302049919248,0.0303292685158,0.0305200186322,0.0306269543036,0.0306009429241,0.030713658902,0.0307281096684,0.0308350453397,0.0307772422741,0.0308755074856,0.0310200151496,0.0309564317775,0.0309362007045,0.0309506514709,0.0309130794783,0.0310980492882,0.0312165455726,0.0311616326603,0.0310575871422,0.0309766628504,0.0310315757627,0.031086488675,0.0309997840766,0.0308408256463,0.0310315757627,0.031086488675,0.0311500720472,0.0309564317775,0.0309737726971,0.0309159696315,0.0310055643832,0.0312396667989,0.0312252160325,0.0314015153825,0.031230996339,0.0314246366087,0.0313986252292,0.0315489131998,0.031447757835,0.0312974698644,0.0312338864923,0.0312425569521,0.0313408221636,0.0314333070686,0.0315489131998,0.0316153867252,0.0314795495211,0.0316298374916,0.03171654209,0.0317396633162,0.0318581596007,0.0316182768785,0.0315980458055,0.031768564849,0.0318148073015,0.031913072513,0.0319679854253,0.0320691407901,0.032233879527,0.0327165351247,0.0328205806428,0.0329188458543,0.0331500581166,0.0333147968536,0.0333610393061,0.0334593045176,0.033381270379,0.0332309824085,0.0331963005691,0.0330893648978,0.0333119067003,0.0333436983864,0.0333928309921,0.033236762715,0.0333061263937,0.0334939863569,0.0336356038676,0.0336182629479,0.0335604598823,0.033256993788,0.0332280922552,0.0331442778101,0.0333147968536,0.0333581491528,0.0333321377733,0.0333465885397,0.0332194217954,0.0335604598823,0.0336529447873,0.0338321342906,0.0338494752103,0.0339419601152,0.0341645019178,0.0342858883555,0.0344853089318,0.0343061194285,0.0343957141801,0.034332130808,0.0342136345235,0.03458068399,0.0346124756761,0.0346847295081,0.0348147864057,0.0351991767919,0.0353003321566,0.0352656503173,0.0350604494344,0.0350546691279,0.0349650743762,0.035086460814,0.0352714306239,0.0352078472517,0.0352656503173,0.0352483093976,0.035335013996,0.0357194043822,0.035852351433,0.0359824083306,0.0359650674109,0.036069112929,0.0362309615127,0.0364419427021,0.036658704198,0.0366153518988,0.0366558140448,0.0362916547315,0.0363928100963,0.0363321168775,0.0362194008995,0.0363465676438,0.0361673781405,0.0360633326225,0.0359708477175,0.036069112929,0.0361529273741,0.0359795181773,0.0362627531987,0.0363032153447,0.0364159313226,0.0362743138119,0.0363812494832,0.0369650604457,0.0371904924015,0.0374621668098,0.0376760381525,0.0376847086123,0.0377309510648,0.0379188110279,0.0380719891518,0.0382338377354,0.0385546447494,0.0386297887347,0.0387742963987,0.0387396145593,0.0390344101938,0.0391673572447,0.0393263156751,0.0392742929161,0.0392020390841,0.0393436565948,0.0394621528792,0.0398465432654,0.0400112820023,0.0400401835351,0.0400979866007,0.0401904715057,0.0402858465639,0.0404823769869,0.040710699096,0.0409476916649,0.041123991015,0.0411124304019,0.0409534719715,0.0409158999788,0.0410835288691,0.0413580934306,0.0414939306348,0.0413378623577,0.0416817905979,0.0415546238536,0.0417453739701,0.0419939271521,0.0418638702545,0.0419910369988,0.0419274536267,0.0420401696046,0.0420921923636,0.0422453704874,0.0424650221367,0.0428551928294,0.0429794694205,0.0431644392304,0.0433407385804,0.0435488296165,0.0439390003093,0.0439303298494,0.0441991141044,0.0446268567898,0.0447020007751,0.0450690502416,0.0455863876786,0.0457048839631,0.0459158651525,0.0461991001739,0.0461759789477,0.046282914619,0.0466268428593,0.0469476498733,0.0472222144349,0.0475314608358,0.0475950442079,0.047678858653,0.0479707641343,0.0481701847106,0.0482453286958,0.048722203987,0.0488609313444,0.0490459011543,0.0495661287446,0.0498840456053,0.0504476254949,0.0510227659975,0.0512106259607,0.051337792705,0.0516210277264,0.0516268080329,0.0520314294921,0.0523175546667,0.0526412518341,0.0530400929866,0.0534360439859,0.0540111844886,0.0542539573641,0.0544678287067,0.0548984615454,0.0551296738078,0.0553146436177,0.055814640135,0.0562712843532,0.0565400686082,0.0570053832862,0.0575342813364,0.057820406511,0.0583175128751,0.0588175093925,0.0593955400484,0.0598897562592,0.0603753020102,0.060869518221,0.0614619996433,0.0620920530582,0.0625140154371,0.0629446482757,0.0635833721505,0.0640515769818,0.0643579332294,0.0648434789804,0.0650804715493,0.0653348050379,0.0661787297956,0.0668290142835,0.0677451928731,0.0681960567847,0.0690746633817,0.0695081863736,0.0699099176795,0.0705804332403,0.0715544148955,0.0724388017991,0.0729503589296,0.0735197191257,0.0744792500145,0.075456121823,0.0762769253544,0.0772566873161,0.0782826917304,0.0790283512765,0.0798029123554,0.0804849885294,0.0812161973091,0.0820948039061,0.0830947969409,0.0837971041878,0.0847797563029,0.0857508478048,0.0865629808763,0.0872595078167,0.0882739516179,0.0896323236592,0.0904791385702,0.0915773968164,0.0926323027634,0.0937941443818,0.0952767930142,0.0965137786179,0.0976149270174,0.0989588482924,0.0998836973419,0.101100451873,0.102181369199,0.103640896605,0.104918344355,0.105906776776,0.106744921228,0.107675550584,0.108808490669,0.110051256579,0.111071480687,0.112291125371,0.113808455843,0.115028100527,0.116279536897,0.117730393843,0.119068534812,0.120808407086,0.122637874112,0.124311272861,0.126080046668,0.127825699249,0.129262105429,0.130819898046,0.132698497678,0.134487502558,0.136285177898,0.137707133312,0.139603073863,0.141493234108,0.143718652133,0.145441183488,0.147394927105,0.149198382751,0.151348656791,0.152918010022,0.154903545325,0.156701220665,0.158458433859,0.160730094337,0.163010425274,0.165406362343,0.167547965923,0.169886099926,0.172354290827,0.174865834027,0.177339805234,0.179452507282,0.181391800132,0.183258839151,0.185732810358,0.188270364938,0.190599828481,0.193094030761,0.195712509633,0.19801018149,0.200264501048,0.202987025437,0.205296257908,0.207729766969,0.209911832695,0.21270083061,0.215466707298,0.218400212877,0.221431983667,0.224319246794,0.226903043826,0.229327882427,0.231625554284,0.234674665994,0.236989678771,0.240394279335,0.243353796293,0.246746836243,0.249434678793,0.252024256132,0.255093598915,0.258105138632,0.260946159306,0.263714926147,0.266339185325,0.269171535539,0.271694639352,0.274605023705,0.277688817254,0.281035614752,0.283821722513,0.286385288472,0.289330354664,0.291694500047,0.293971940831,0.296853423651,0.299547046508,0.302604828677,0.305870701883,0.308055657763,0.310974712575,0.313292615505,0.315682772267,0.318312811752,0.319885055136,0.322064230709,0.323859015895,0.326705816876,0.32934452682,0.331896532166,0.334289579081,0.335939856604,0.338301111833,0.339832893071,0.34222883014,0.343974482721,0.345968688484,0.347702780452,0.349740338514,0.35193974516,0.353722969733,0.35551775492,0.357046646005,0.35869981368,0.36016223124,0.361503262362,0.362734467659,0.364217116291,0.365298033618,0.366662185966,0.367378943979,0.367902061723,0.369084134414,0.369534998326,0.369890487179,0.371364465352,0.371910704321,0.372297984861,0.372286424248,0.372144806737,0.372474284211,0.37254364789,0.373280636976,0.372997401955,0.37217370827,0.37164481022,0.371159264469,0.370589904273,0.36967083553,0.369040782115,0.367933853409,0.367003224053,0.365780689215,0.364335612576,0.362763369192,0.36157262604,0.360390553349,0.358561086323,0.357240286274,0.355543766299,0.354139151805,0.352809681297,0.3508299263,0.34907560326,0.347367522671,0.345338635069,0.343613213561,0.342014958798,0.339630582342,0.337535221214,0.33526645089,0.332815600909,0.330104637132,0.327818525888,0.326003509629,0.323541099035,0.321032445988,0.31806425857,0.315148093911,0.312833081134,0.310200151496,0.307885138719,0.305422728125,0.303047022129,0.300477675864,0.298018155423,0.295191585515,0.292483511892,0.289532665394,0.287018232041,0.284500908534,0.281451796824,0.278376673735,0.275946054827,0.273333356262,0.269922975392,0.266529935442,0.263394119133,0.260862344861,0.257986642347,0.254842155579,0.251700558964,0.249047398254,0.245914472099,0.242715072418,0.239874051744,0.237489675289,0.234593741703,0.231744050569,0.229090889858,0.226223857805,0.223200757474,0.220538926304,0.218024492951,0.215486938371,0.212252856851,0.209744203805,0.206776016387,0.203978348012,0.200796289251,0.198151799,0.19551597921,0.193117151987,0.190958207488,0.188680766703,0.185946681701,0.183562305245,0.180969837753,0.178874476626,0.176050796872,0.173559484745,0.17199591182,0.169689569503,0.16717513615,0.164608680038,0.162241644502,0.160449749469,0.158678085508,0.156568273614,0.154715685362,0.152857316803,0.150423807742,0.148088563892,0.146244646099,0.14494118697,0.142756231091,0.140366074329,0.13885163401,0.137227367867,0.135715817702,0.133938373435,0.132704277985,0.131244750578,0.129296787268,0.127623388519,0.126334380156,0.124793928458,0.122981802352,0.121374877129,0.120201474897,0.11864368228,0.117406696676,0.115785320686,0.11449342217,0.112825803728,0.11143564,0.110114839952,0.108831611895,0.107617747518,0.106750701534,0.105435681792,0.104398116765,0.103282517599,0.102276744257,0.1010802208,0.100120689911,0.0989993104383,0.0981351546077,0.0971640631058,0.0955860394152,0.0944791107091,0.0936438564113,0.0929155377848,0.0918953136772,0.0910080366203,0.0900196041987,0.0889531376385,0.0876612391226,0.0866034430223,0.0857450674982,0.0848520101348,0.0837913238812,0.0828028914596,0.0821439365119,0.0815283338633,0.0800803670703,0.0791844195536,0.0784965630731,0.0779445437967,0.0770399258202,0.0766642058938,0.0763983117921,0.0756902242386,0.0746353182916,0.0741671134603,0.0733347493158,0.0727885103459,0.071745165012,0.0710284069987,0.0702480656132,0.0696006712786,0.0687191745283,0.0682683106167,0.0674821889246,0.066907048422,0.0666353740137,0.0657220855774,0.0652365398264,0.064777005455,0.0643261415433,0.0639590920768,0.0633666106545,0.0628984058232,0.0624966745174,0.0623059244009,0.062068931832,0.0615660451614,0.0613724048916,0.0610111357317,0.0606440862652,0.0602423549593,0.0598810857994,0.059505365873,0.0589764678229,0.0585631759039,0.0583810962473,0.0577019102266,0.0571036484977,0.0569880423665,0.0567481596443,0.0562597237401,0.0558782235072,0.0557077044637,0.0557221552301,0.0553637762234,0.0550256282897,0.0547741849544,0.0543926847215,0.0539620518828,0.0538580063648,0.0536556956352,0.0533840212269,0.053022752067,0.052878244403,0.0524794032504,0.0521383651634,0.0516759406387,0.0515747852739,0.0514302776099,0.0510516675303,0.0506239248449,0.0504273944219,0.0503811519694,0.050025663116,0.0495632385913,0.0491383860592,0.048898503337,0.0487713365927,0.0486123781623,0.0484765409582,0.0482771203819,0.0479967755138,0.0480343475064,0.0479014004556,0.0473869531718,0.0472077636685,0.0473175894931,0.0471875325955,0.0469187483405,0.046551698874,0.0463204866116,0.0461441872616,0.0456962135033,0.0454274292483,0.0453927474089,0.0449736751834,0.0445488226513,0.0444187657537,0.0443320611553,0.0441673224184,0.0440112541413,0.0439707919954,0.0440170344478,0.0438811972437,0.0436962274338,0.0436384243682,0.0437598108059,0.0435257083903,0.0433522991935,0.0433089468943,0.043398541646,0.0433089468943,0.0431788899967,0.0430025906467,0.0429476777344,0.0427453670048,0.0425777381146,0.0424505713703,0.0422367000276,0.0421499954292,0.0421326545095,0.0417771656562,0.0414332374159,0.0410604076428,0.0409621424313,0.0410488470297,0.0409505818182,0.0407338203222,0.0408465363001,0.0410632977961,0.040762721855,0.0407974036944,0.0407540513952,0.0405719717386,0.0407424907821,0.04031763825,0.0403291988631,0.040121107827,0.0398089712728,0.039294523989,0.0390806526463,0.0390604215734,0.038684701647,0.0385951068954,0.0383003112608,0.0381789248231,0.0381355725239,0.0381933755895,0.0379332617943,0.0378407768894,0.0378118753566,0.0377396215246,0.0378089852033,0.0375951138606,0.0376847086123,0.0376933790721,0.0377771935172,0.0380286368526,0.0377858639771,0.0377280609115,0.0379592731738,0.0379014701083,0.0377945344369,0.0376008941672,0.0375748827877,0.0373581212917,0.0373985834376,0.0372771969999,0.0372482954671,0.0372800871532,0.0372945379195,0.0373523409851,0.0372280643941,0.0371384696425,0.0372598560802,0.0372974280728,0.0373754622114,0.03726852654,0.0373841326712,0.0373841326712,0.0375951138606,0.0376731479992,0.0375084092622,0.0374390455835,0.0374592766565,0.0374939584958,0.0373812425179,0.0374708372696,0.0370228635113,0.0371587007154,0.0370662158105,0.0368725755407,0.0368321133948,0.0368725755407,0.0370257536645,0.0371384696425,0.0368812460006,0.0367945414022,0.0367280678768,0.0369852915186,0.0368378937014,0.0368205527817,0.0367280678768,0.0369390490662,0.0371297991826,0.0370835567301,0.0370084127449,0.036967950599,0.0368696853875,0.0369245982998,0.0368292232415,0.0369939619785,0.0369910718252,0.0369650604457,0.0367743103292,0.0367945414022,0.0365922306726,0.0364390525488,0.036482404848,0.0364419427021,0.0365055260742,0.0366037912857,0.0365806700595,0.0365430980669,0.0368205527817,0.0368321133948,0.0368407838547,0.0369563899858,0.0368292232415,0.0366442534316,0.036678935271,0.0367165072636,0.0367136171104,0.0366153518988,0.0364332722422,0.0364795146947,0.0365026359209,0.0363985904029,0.0365575488333,0.0363465676438,0.0361471470676,0.0361182455348,0.0358754726593,0.0359101544986,0.0359188249585,0.0360373212429,0.036121135688,0.036213620593,0.036069112929,0.0362165107463,0.0362425221258,0.0361673781405,0.0363552381037,0.0365459882201,0.0364217116291,0.0364014805562,0.0363754691766,0.0361702682938,0.0361182455348,0.036141366761,0.0360604424692,0.0360459917028,0.0359650674109,0.0359477264913,0.0360199803233,0.0362569728922,0.0361904993668,0.0362425221258,0.0361644879872,0.0359824083306,0.0361095750749,0.0358812529658,0.035892813579,0.0357800976011,0.0358061089806,0.0359101544986,0.0358783628126,0.0358061089806,0.0358379006666,0.0359708477175,0.0360113098634,0.0360922341552,0.0359361658782,0.0357858779076,0.0356211391707,0.0353957072149,0.0353234533829,0.0352714306239,0.0350951312738,0.0349043811573,0.0349275023836,0.0348032257926,0.0348234568655,0.0350055365221,0.0351587146459,0.0350199872885,0.0350980214271,0.0349650743762,0.0348610288582,0.0348581387049,0.0348725894713,0.0346933999679,0.0345171006179,0.0345199907712,0.0345951347564,0.0346355969023,0.034777214413,0.0349332826901,0.0347714341065,0.0349477334565,0.0347858848729,0.0348090060991,0.034921722077,0.0350546691279,0.0350604494344,0.0348234568655,0.0348003356393,0.0346298165958,0.0346153658294,0.0346182559827,0.0348147864057,0.0349072713106,0.0348350174786,0.0347656537999,0.0348523583983,0.0346182559827,0.0346847295081,0.0346847295081,0.0345199907712,0.0343234603482,0.0339939828743,0.0340517859399,0.0338263539841,0.0338176835242,0.033774331225,0.0337309789258,0.0337396493857,0.0336673955537,0.0336558349406,0.0334390734446,0.0334419635979,0.0334882060504,0.0332483233282,0.0330113307592,0.0330835845912,0.0330575732117,0.0328986147813,0.0326702926722,0.0323465955049,0.0324015084172,0.032358156118,0.0324593114828,0.0323841674976,0.0321934173811,0.032161625695,0.0320171180311,0.0319188528196,0.0318841709802,0.0319015118999,0.0316500685646,0.0313783941563,0.0316153867252,0.0315633639662,0.0316153867252,0.0316876405572,0.0315286821268,0.0315055609006,0.031303250171,0.031375504003,0.0308061438069,0.0304362041871,0.0298552833779,0.029297483795,0.028811938044,0.0283524036726,0.0279246609872,0.0274102137034,0.0268986565729,0.0264766941941,0.0260662924284,0.0255316140717,0.0249304621896,0.0245374013435,0.0241096586582,0.0236703553597,0.0229969496455,0.0225403054274,0.014586603602,0.0144825580839,0.0144825580839,0.0145114596167,0.0144854482372,0.0144160845585,0.0144681073175,0.0144912285438,0.0145403611495,0.0145692626823,0.0144912285438,0.0145894937553,0.0145634823757,0.0145374709962,0.0145432513028,0.0146704180471,0.0145461414561,0.0146212854413,0.0146501869741,0.0144912285438,0.0145027891569,0.014494118697,0.0144767777774,0.0144998990036,0.0145056793102,0.0144247550183,0.0144305353249,0.0143062587339,0.0143062587339,0.0142744670478,0.014317819347,0.0143091488871,0.0143842928724,0.0144074140986,0.0143033685806,0.014225334442,0.0140663760117,0.01415308061,0.0141126184641,0.0141270692305,0.0141357396904,0.0142195541355,0.0140981676977,0.0140172434059,0.0139825615666,0.0139854517198,0.0139999024862,0.0139131978878,0.0138438342091,0.0139016372747,0.0138669554354,0.0138033720632,0.0138929668149,0.0137397886911,0.0137860311435,0.0138669554354,0.0138582849755,0.0137224477714,0.0137253379247,0.0137744705304,0.0137513493042,0.013707997005,0.0136444136328,0.0137484591509)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("19-organelles-nucleus-merged/LEAFY-samp-rep2-GSM605657.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=128"),bty="n")
dev.off()