# R script for Peak Model
#  -- generated by MACS
p <- c(0.0417461777359,0.0440146999344,0.0461735992653,0.0482877545686,0.0504779747189,0.0527509713201,0.0549836982966,0.0571157512109,0.0594066454232,0.0616751676218,0.0637691881127,0.0659280874436,0.0680579031566,0.0702839185289,0.072337669395,0.074420503879,0.0767718025286,0.0790067667064,0.0789642598802,0.0788971438388,0.0788904322347,0.0789105670471,0.0791208639767,0.078939650665,0.078727116534,0.0785884100485,0.0784340431533,0.0783892991257,0.0782662530499,0.0782147974182,0.078078328134,0.0780917513423,0.0780335841065,0.0779933144816,0.078060430523,0.0779418588499,0.0779933144816,0.0778165755727,0.0778165755727,0.0778613196003,0.077718138712,0.0775324509975,0.0774563861506,0.0774832325672,0.0772371404155,0.077069350312,0.0771610755686,0.0770961967286,0.0771677871727,0.0771029083327,0.0770872479231,0.0772147684017,0.076986573861,0.0768657649865,0.0769328810279,0.0769820994582,0.0770402666941,0.0770425038955,0.0767315329038,0.0767471933134,0.0768254953617,0.0767852257369,0.0767650909245,0.0766084868279,0.0766420448486,0.0767315329038,0.0767829885355,0.0766756028693,0.0766487564527,0.0765078127658,0.0763914782941,0.0765726916058,0.0766756028693,0.0767136352927,0.0767427189107,0.0768075977507,0.0769284066251,0.076921695021,0.0768993230072,0.0769440670348,0.0769642018472,0.0768657649865,0.0767785141327,0.0768411557713,0.076809834952,0.0768165465562,0.0769172206182,0.0767516677162,0.0767650909245,0.0768165465562,0.0768433929727,0.0767807513341,0.0765659800017,0.0763758178845,0.0763914782941,0.0764384595231,0.0764988639603,0.0766532308555,0.0767695653272,0.0769060346113,0.07670916089,0.0766107240293,0.0766084868279,0.0767002120845,0.0767695653272,0.0768858997989,0.0769709134513,0.076921695021,0.0768120721534,0.0767583793203,0.0766040124251,0.0764943895576,0.0763691062803,0.0763981898983,0.0763087018431,0.0762460602045,0.0762975158362,0.076550319592,0.0765682172031,0.07651452437,0.0764295107176,0.0764071387038,0.0763444970652,0.0763355482596,0.0763601574748,0.0762796182252,0.07606037249,0.075948512421,0.0758769219769,0.0759395636155,0.0760111540597,0.0758321779493,0.0756643878459,0.0754429049093,0.0753623656597,0.0752594543962,0.0753444680487,0.0753601284583,0.0753086728266,0.0752527427921,0.0752012871604,0.0751543059314,0.0751833895494,0.0751833895494,0.0751117991052,0.0749171625852,0.0748589953494,0.0748813673632,0.0749753298211,0.0748970277728,0.0749551950087,0.0748589953494,0.0747806933011,0.0745569731632,0.0745211779411,0.0744473502956,0.0744518246984,0.074449587497,0.0744115550735,0.074384708657,0.0742974578032,0.0742952206018,0.0743958946639,0.0744809083163,0.0745256523439,0.0745905311839,0.0744876199204,0.0747247632666,0.0747202888639,0.0748679441549,0.0748008281135,0.0748030653149,0.0747538468846,0.0747359492735,0.0747247632666,0.074727000468,0.0746509356211,0.0746196148018,0.074485382719,0.0743175926156,0.0743690482473,0.0745547359618,0.0745390755521,0.0743757598515,0.0742974578032,0.0742750857894,0.0740379424432,0.074107295686,0.0740580772556,0.0740491284501,0.0740468912487,0.0740267564363,0.0739753008046,0.0739529287908,0.0738813383467,0.0739753008046,0.0739663519991,0.0738746267425,0.0738768639439,0.073753817868,0.0736665670143,0.0736262973894,0.0736844646253,0.0734517956819,0.073458507286,0.0732862427798,0.0733891540432,0.0734160004598,0.0735658929522,0.0736509066046,0.0735905021674,0.0735166745219,0.0735390465356,0.0734965397094,0.0734853537025,0.0734361352722,0.0733444100157,0.0732750567729,0.0733913912446,0.0734271864667,0.0735323349315,0.0736173485839,0.0738746267425,0.0737493434653,0.0737650038749,0.0738343571177,0.0739506915894,0.074143090908,0.0742795601922,0.074190072137,0.0743131182128,0.0742795601922,0.0742952206018,0.0744809083163,0.0743936574625,0.0745256523439,0.074773981697,0.0748164885232,0.0749350601963,0.0751968127576,0.0753153844307,0.0754361933052,0.0755502905755,0.075588322999,0.0755301557631,0.0755010721452,0.0755927974018,0.0758746847755,0.0759641728307,0.0759753588376,0.0761655209548,0.0762908042321,0.0765212359741,0.0767360073065,0.0768478673755,0.0770178946803,0.0770648759093,0.0771051455341,0.077217005603,0.0775346881989,0.0777718315451,0.0778948776209,0.0778814544127,0.0779619936623,0.0780559561202,0.0782528298416,0.0783109970775,0.0785235312085,0.0786376284788,0.0785951216526,0.0786913213119,0.0787472513464,0.0787360653395,0.0786555260899,0.0785839356457,0.078662237694,0.0787383025409,0.0789463622692,0.0788993810402,0.0790313759216,0.0791611336016,0.0793490585174,0.0794832906002,0.0793982769478,0.0795548810443,0.0797472803629,0.079700299134,0.0798278196126,0.0798166336057,0.0799195448691,0.0800493025491,0.080172348625,0.0802595994788,0.0804072547698,0.0805549100608,0.0804877940194,0.0804587104015,0.0805370124498,0.0807383605739,0.0808793042608,0.0809106250801,0.0809464203022,0.0811768520442,0.081246205287,0.0813782001684,0.0817048315697,0.0820493605821,0.08214332304,0.0824028384,0.0828413298704,0.0830650500083,0.0830605756055,0.0831567752648,0.0831388776538,0.0833447001807,0.0835997411379,0.0837317360193,0.0837742428455,0.0838883401158,0.0839330841434,0.0839174237337,0.084060604622,0.0843469663986,0.0843402547944,0.0844521148634,0.0844521148634,0.0845192309048,0.0844543520648,0.0843961848289,0.0844342172523,0.0843178827806,0.0843961848289,0.0846087189599,0.0846534629875,0.084579635342,0.084467775273,0.0846221421682,0.0848324390978,0.0848659971185,0.0848816575282,0.0848883691323,0.0847899322716,0.0845527889254,0.0846355653765,0.0845684493351,0.0843782872179,0.0843782872179,0.0844297428496,0.0845662121337,0.0846758350013,0.084727290633,0.084709393022,0.0846982070151,0.0847183418275,0.0846780722027,0.0849196899516,0.0850427360275,0.0849979919999,0.0850181268123,0.0852396097489,0.0852105261309,0.0853872650399,0.0854812274978,0.0855997991709,0.0857921984895,0.0858033844964,0.0859980210164,0.0862150295502,0.0862955687998,0.0863447872302,0.086496916924,0.0865573213612,0.0865685073681,0.0864655961047,0.0864521728964,0.086402954466,0.0866289118053,0.086709451055,0.0868302599295,0.0869421199984,0.0869891012274,0.0870562172688,0.0872307189763,0.0872911234136,0.0874029834825,0.0875081319474,0.0875126063501,0.0874052206839,0.0874454903087,0.0875484015722,0.0878347633487,0.0878593725639,0.0879220142025,0.0881860039653,0.0881591575487,0.0882016643749,0.0882866780273,0.0884231473115,0.0883985380963,0.088532770179,0.0885215841721,0.088579751408,0.0887229322963,0.088727406699,0.0886759510673,0.0887318811018,0.0888840107956,0.0891524749611,0.0891770841762,0.0893829067031,0.0896625568755,0.0898862770135,0.0899086490272,0.0899712906659,0.0900674903252,0.0901346063665,0.0901659271859,0.0903337172893,0.0903784613169,0.0904612377679,0.0904187309417,0.0905216422051,0.0905708606355,0.0907901063706,0.0909601336755,0.0910048777031,0.0908505108079,0.091098840161,0.0912218862368,0.0911726678065,0.0913919135417,0.0915843128603,0.0917095961375,0.0916738009154,0.0917856609844,0.0919534510878,0.0921771712258,0.0924053657664,0.0924456353913,0.0924076029678,0.092514988634,0.092727522765,0.0926894903416,0.092774503994,0.0928438572368,0.0928528060423,0.092987038125,0.0932398418809,0.0934613248174,0.0936514869346,0.0939266627043,0.0940452343774,0.0943181729456,0.0944188470077,0.0945843999098,0.0948304920615,0.0951280398449,0.0951839698794,0.0955352104959,0.0957253726132,0.0959423811469,0.0961012224449,0.0963406029924,0.0963786354159,0.0966873692062,0.0968797685248,0.0970900654545,0.0970878282531,0.0973630040227,0.0975128965151,0.09768292382,0.0978372907151,0.0979491507841,0.0981616849151,0.0983719818448,0.0988082361137,0.0990006354323,0.0991393419178,0.0994547873123,0.0995576985757,0.0999380228102,0.100266891413,0.100320584246,0.100363091072,0.10047271394,0.100553253189,0.100922391417,0.101166246367,0.101378780498,0.101694225893,0.10180384876,0.101944792447,0.102040992107,0.102430265147,0.102566734431,0.102636087674,0.102756896548,0.103119323171,0.103414633753,0.103524256621,0.103647302697,0.103900106453,0.103967222494,0.104291616694,0.10459363888,0.104953828302,0.105182022843,0.105410217384,0.105862132062,0.106065717388,0.106271539915,0.106434855615,0.106855449475,0.107240248112,0.107327498966,0.107408038215,0.107497526271,0.107739144019,0.107806260061,0.108050115011,0.108220142316,0.108399118426,0.108463997266,0.108544536516,0.108555722523,0.108667582592,0.108915911945,0.10913515768,0.109414807852,0.10947521229,0.109533379526,0.109757099663,0.110063596252,0.11022243755,0.11035219523,0.110540120146,0.110604998986,0.110687775437,0.11075712868,0.110683301034,0.110752654277,0.110833193527,0.110976374415,0.111036778852,0.110880174756,0.111039016054,0.111155350525,0.111217992164,0.111128504109,0.110976374415,0.111141927317,0.111349987045,0.111430526295,0.111349987045,0.111459609913,0.111347749844,0.111249312983,0.111311954622,0.111307480219,0.111311954622,0.111419340288,0.111417103087,0.111396968274,0.111256024588,0.110996509228,0.11090254677,0.11075712868,0.110564729361,0.110132949495,0.109797369288,0.109616155977,0.109466263484,0.1093297942,0.108951707167,0.108792865869,0.108734698633,0.108367797607,0.108038929004,0.107696637193,0.107441596236,0.107094830022,0.106754775413,0.106401297595,0.106009787353,0.105734611584,0.105354287349,0.104987386323,0.104640620109,0.104278193486,0.103812855599,0.10337660133,0.103128271977,0.102911263443,0.102521990403,0.101969401663,0.101707649101,0.101311664457,0.100884358994,0.100412309503,0.100070017692,0.0997724699081,0.0993854340695,0.0990945978902,0.0987881013013,0.0986561064199,0.0983361866227,0.0981370756999,0.0980162668255,0.0977813606806,0.0976113333758,0.0973540552172,0.0969267497538,0.0966694715952,0.0964457514573,0.0962533521387,0.0959848879731,0.0958193350711,0.0954278248297,0.0950721098104,0.0948908964987,0.0944456934243,0.0942667173139,0.0940183879608,0.093866258267,0.0936895193581,0.0936470125319,0.0935955569002,0.0933248555333,0.0931212702078,0.0928617548478,0.0927297599664,0.0924232633775,0.0921503248092,0.0920183299278,0.0918236934078,0.091765526172,0.0914903504023,0.0912487326534,0.0909802684879,0.0907945807734,0.0905395398162,0.0904142565389,0.0900384067072,0.0896178128479,0.0892956558493,0.0891412889542,0.0889981080659,0.0890003452673,0.0888750619901,0.0885998862204,0.0882933896315,0.0880070278549,0.0878079169322,0.0877408008908,0.0875931455998,0.0872575653929,0.087376137066,0.0872217701708,0.0871031984977,0.0868660551515,0.0866758930343,0.0865394237502,0.086320178015,0.0861658111198,0.0859420909819,0.0857407428578,0.0856020363723,0.0854901763033,0.085329097804,0.0851076148675,0.0850449732289,0.0848928435351,0.0848883691323,0.084921927153,0.0848950807365,0.0848480995075,0.0846937326123,0.0845908213489,0.0845304169116,0.084467775273,0.0843648640096,0.0841881251006,0.0840315210041,0.0837876660538,0.0836825175889,0.0835617087145,0.0835818435269,0.0836198759503,0.0835975039365,0.0834878810689,0.0835281506938,0.0834945926731,0.0833469373821,0.0832977189517,0.0832015192924,0.0830762360152,0.082874887891,0.0826287957393,0.0825997121214,0.0826019493228,0.0824520568304,0.0826041865242,0.0824453452262,0.0823916523931,0.0824229732124,0.0824028384,0.0822797923242,0.0820672581932,0.0819419749159,0.081783133618,0.0817070687711,0.0816310039242,0.0816332411256,0.0815370414663,0.0813513537518,0.0811969868566,0.0812036984608,0.0812171216691,0.0811746148429,0.0813401677449,0.0812998981201,0.0814050465849,0.0813625397587,0.0813043725228,0.0812148844677,0.081228307676,0.0811567172318,0.0811925124539,0.0811052616001,0.0811477684263,0.0810851267877,0.0809732667187,0.0810560431698,0.0810963127946,0.0810918383918,0.0810538059684,0.0812104100649,0.0811388196208,0.081116447607,0.0811455312249,0.0811142104056,0.0810180107463,0.0811298708153,0.0812506796897,0.0814453162097,0.081541515869,0.0815907342994,0.0814878230359,0.0814184697932,0.0814990090428,0.0815616506815,0.0816086319104,0.0815124322511,0.0815348042649,0.0814229441959,0.0812976609187,0.0812327820787,0.0810157735449,0.0809598435104,0.0809643179132,0.0809240482884,0.0808233742263,0.0807987650111,0.0807786301987,0.0807875790042,0.0806466353174,0.0806041284912,0.0806309749077,0.0804945056236,0.0805705704705,0.080514640436,0.0804542359987,0.080320003916,0.0803557991381,0.0805191148387,0.0803535619367,0.080255125076,0.080208143847,0.0800694373615,0.0799352052788,0.0796108110788,0.0794474953781,0.0793602445243,0.0793669561285,0.0793781421354,0.0791231011781,0.0790738827478,0.078968734283,0.0789485994705,0.078838976603,0.0788479254085,0.0787360653395,0.0787360653395,0.078903855443,0.0789642598802,0.0787964697768,0.0787517257492,0.0787808093671,0.0786063076595,0.0784765499795,0.0783266574871,0.078208085814,0.0781655789878,0.0781834765989,0.0781499185782,0.0779933144816,0.0778725056072,0.0777964407603,0.0776689202816,0.0775503486085,0.077328865672,0.0772953076513,0.077310968061,0.0772080567975,0.0771610755686,0.0770805363189,0.0771387035548,0.0770738247148,0.0769507786389,0.0768769509934,0.0768612905838,0.0769709134513,0.07703355509,0.0770536899024,0.076986573861,0.07690379741,0.0768232581603,0.0767069236886,0.0764809663493,0.07625500901,0.0761409117397,0.0761677581562,0.0759977308514,0.0758277035466,0.0758500755604,0.0757874339217,0.075782959519,0.0759037683935,0.0758277035466,0.0756688622486,0.0755010721452,0.0754272444997,0.0753041984238,0.0752147103687,0.0751319339176,0.0750312598556,0.0750536318694,0.0750849526887,0.0750290226542,0.0751386455218,0.0750849526887,0.0752549799935,0.0752214219728,0.0753310448404,0.0752348451811,0.0752997240211,0.0752415567852,0.0752549799935,0.0752706404031,0.0751073247025,0.075134171119,0.0751744407438,0.0751945755563,0.0753713144652,0.0754361933052,0.0753623656597,0.0752572171949,0.0750983758969,0.0752124731673,0.0751632547369,0.0751565431328,0.0751543059314,0.0752437939866,0.0751498315287,0.0752079987645,0.075246031188,0.0755122581521,0.0754496165135,0.0756912342624,0.0757919083245,0.0758500755604,0.075977596039,0.0759798332404,0.0759664100321,0.0759216660045,0.0758903451852,0.0759283776086,0.0758388895535,0.0758277035466,0.0756934714638,0.0758299407479,0.075818754741,0.0757315038873,0.0756464902349,0.0756174066169,0.0757315038873,0.0757113690748,0.0756934714638,0.0757113690748,0.0756867598597,0.0758209919424,0.0758433639562,0.0760156284624,0.0760916933093,0.0761140653231,0.0762348741976,0.0762393486003,0.0763288366555,0.0762125021838,0.0763087018431,0.0761588093507,0.0761588093507,0.0760268144693,0.0762169765865,0.0760939305107,0.0760648468928,0.0761543349479,0.0760156284624,0.0761118281217,0.0761856557672,0.0761230141286,0.0760939305107,0.0760961677121,0.0760581352886,0.0759910192472,0.0759462752197,0.0759619356293,0.0759194288031,0.0760469492817,0.0761498605452,0.0760961677121,0.0761699953576,0.0762818554265,0.0762438230031,0.0762438230031,0.0760984049134,0.0761297257328,0.0761990789755,0.0760380004762,0.0760491864831,0.0760693212955,0.076042474879,0.0760939305107,0.07606037249,0.0760827445038,0.0760558980872,0.0761453861424,0.0763579202734,0.0763713434817,0.0762617206141,0.0763310738569,0.0763467342665,0.07631988785,0.0765078127658,0.0764563571341,0.0764049015024,0.076532421981,0.0765928264183,0.0765189987727,0.0764406967245,0.0765055755645,0.0766375704458,0.0766353332445,0.0766845516748,0.0767158724941,0.076662179661,0.0767315329038,0.0767002120845,0.0765234731755,0.0767650909245,0.0768635277851,0.0769149834169,0.0769597274444,0.0769932854651,0.0771566011658,0.077263986832,0.0773333400748,0.0773892701092,0.0774183537272,0.0775302137961,0.0775011301782,0.0775458742058,0.0776801062885,0.0775436370044,0.0776912922954,0.0778926404196,0.0778456591906,0.0779798912734,0.0778904032182,0.0778434219892,0.0777047155037,0.0777270875175,0.0777628827396,0.0778255243782,0.0779575192596,0.0781991370085,0.0781499185782,0.0782349322306,0.0783467922995,0.0784944475906,0.078514582403,0.0786711864995,0.0786107820623,0.0787494885478,0.078921753054,0.0791029663657,0.0790805943519,0.0792662820664,0.0792685192678,0.0794721045933,0.079476578996,0.0795660670512,0.0795683042526,0.0796645039119,0.079830056814,0.0798233452098,0.0799866609105,0.080078386167,0.0801052325836,0.0803714595477,0.0804564732001,0.0803759339505,0.0805370124498,0.0805549100608,0.0808614066498,0.0809464203022,0.0811746148429,0.0811902752525,0.0813692513628,0.0813849117725,0.0815079578484,0.0815146694525,0.0816667991463,0.0817518127987,0.0818189288401,0.081523618258,0.0814363674042,0.081375962967,0.0815459902718,0.0814990090428,0.0816667991463,0.0815101950497,0.0817585244028,0.0818547240621,0.0820046165545,0.081977770138,0.0820560721863,0.0820471233807,0.082107527818,0.0820337001725,0.0819934305476,0.0821276626304,0.082237285498,0.0822641319145,0.0823312479559,0.0822216250883,0.0823133503449,0.0823983639973,0.0824162616083,0.0823692803793,0.0822887411297,0.0822909783311,0.0823446711642,0.0824945636566,0.0825482564897,0.0824699544414,0.0825370704828,0.082496800858,0.0825885261145,0.0826668281628,0.082579577309,0.0829285807241,0.08311650564,0.0832015192924,0.0831657240703,0.0833312769724,0.0832194169034,0.0832954817503,0.0833223281669,0.0832753469379,0.0830874220221,0.0831187428414,0.0831187428414,0.0831187428414,0.0830918964248,0.0831590124662,0.0831276916469,0.0830605756055,0.0830941336262,0.0830896592234,0.0832059936952,0.0832999561531,0.0831657240703,0.0831008452303,0.0830158315779,0.0831187428414,0.0832350773131,0.0832373145145,0.0832686353338,0.0831679612717,0.0830270175848,0.0832663981324,0.083228365709,0.0833066677572,0.0834118162221,0.08331114216,0.0833245653683,0.0833245653683,0.0833469373821,0.0834274766317,0.0834722206593,0.0834095790207,0.0836243503531,0.0835370994993,0.0834341882358,0.0835549971103,0.0835952667351,0.0835080158814,0.0835549971103,0.0836086899434,0.083653433971,0.0836892291931,0.0837384476234,0.083653433971,0.0835796063255,0.0836422479641,0.0834834066662,0.0834073418193,0.0834945926731,0.0836400107627,0.0836825175889,0.0836802803876,0.083671331582,0.0837541080331,0.0837496336303,0.0839644049627,0.0841389066703,0.0841590414827,0.0841612786841,0.0842328691282,0.0841657530868,0.0841590414827,0.0843693384123,0.0843245943848,0.0844633008703,0.0844521148634,0.0845237053075,0.0845863469461,0.0842485295379,0.0842865619613,0.0844230312454,0.0842865619613,0.084384998822,0.084496858891,0.0845416029185,0.0846937326123,0.084921927153,0.085098666062,0.0851120892702,0.0851210380758,0.085246321353,0.0853693674288,0.085458855484,0.0856109851778,0.0855170227199,0.0855505807406,0.0856736268164,0.0855975619695,0.0856781012192,0.0857541660661,0.085866026135,0.0856579664068,0.0856937616288,0.0856378315944,0.0856758640178,0.0855796643585,0.0856490176012,0.0856982360316,0.0856244083861,0.085700473233,0.0857541660661,0.0857228452468,0.0856646780109,0.0832753469379,0.0811276336139,0.0787808093671,0.0763109390445,0.0740245192349,0.0716620345785,0.0693129731303,0.0669348280643,0.0644783809499,0.0619704782038,0.0595117938881,0.0571649696413,0.0549702750883,0.0525429115919,0.0500551436582,0.0476926590018,0.0452227886791,0.0429676896889)
m <- c(0.0447727444576,0.0472033354717,0.0494924040886,0.0518713281958,0.0541918462343,0.0565707703415,0.0589721583212,0.0614094884972,0.0637030498885,0.0659808865691,0.0682452449261,0.0704848930232,0.0728391068706,0.0751349146492,0.0775093459819,0.0799601544814,0.0821728459314,0.0845045959062,0.0843855373814,0.0842956818911,0.084399015705,0.0843069138274,0.0842934355038,0.0843877837687,0.0845562628131,0.0845450308768,0.0844866248081,0.0845001031316,0.0844394506756,0.0843271313127,0.0842619860822,0.0842058264007,0.0841743769791,0.0841272028467,0.083965462964,0.0839677093513,0.0841159709104,0.0839137960571,0.0839766949003,0.0837722736597,0.0837992303069,0.0836487223605,0.0834465475072,0.0833005323354,0.0833095178844,0.0833679239531,0.0834510402817,0.0834038661493,0.0834420547327,0.0834128516983,0.0832893003991,0.0831140821929,0.0831477780018,0.0829837917319,0.0829456031485,0.082950095923,0.0828220518492,0.082819805462,0.0830332122516,0.0828759651434,0.0826962541627,0.0825479926036,0.0826827758392,0.0825592245399,0.0824042238191,0.0825390070546,0.0825098040202,0.0824581371133,0.0823031363924,0.0822514694855,0.0823548032994,0.082316614716,0.0822200200638,0.082134657348,0.0820470482449,0.0821795850932,0.0820874832156,0.0821009615391,0.0822694405835,0.0821548748333,0.0820605265684,0.08195269998,0.0816831335089,0.0816269738275,0.0815079153028,0.0814764658811,0.081431538136,0.0814517556213,0.0815236400136,0.0815461038862,0.08151016169,0.0813304507093,0.0812630590915,0.0811484933413,0.0808452310614,0.0806587809189,0.0805419687814,0.0803173300555,0.0802342137269,0.0802229817907,0.0802454456632,0.0799511689323,0.0799691400304,0.0799264586725,0.0798770381528,0.0798478351184,0.0797265302064,0.0796119644562,0.0796726169122,0.0797826898879,0.0797984145987,0.0796231963925,0.0796411674906,0.0797040663338,0.0796546458141,0.0796479066524,0.07974000853,0.0798478351184,0.0799668936431,0.0800387780354,0.0800589955207,0.0801421118493,0.0802611703741,0.0802095034671,0.0800837057806,0.0800567491335,0.0799062411871,0.080070227457,0.0800342852609,0.0801443582366,0.0802791414721,0.0804543596783,0.0806273314973,0.0808721877085,0.0808227671888,0.0808721877085,0.0808834196448,0.0809620431988,0.0808474774486,0.0810024781695,0.0810743625618,0.0811305222433,0.0811529861158,0.0811260294687,0.0810968264344,0.0810204492676,0.0809710287479,0.0810002317822,0.0809575504243,0.0808092888652,0.0806745056297,0.0807418972475,0.0806497953698,0.0805262440706,0.0804655916146,0.0805217512961,0.0804835627127,0.0804296494185,0.0803600114134,0.0802544312123,0.0801241407513,0.0801421118493,0.0800994304914,0.0799489225451,0.0799084875744,0.0797085591084,0.0795625439365,0.07943674625,0.0792210930732,0.0790863098376,0.0789964543473,0.0788976133079,0.0787471053615,0.0787897867195,0.078794279494,0.0786976848418,0.0786505107094,0.0786190612878,0.0784887708268,0.0785089883121,0.0786010901897,0.078482031665,0.0784663069542,0.0784955099885,0.0784887708268,0.0785561624445,0.0786460179349,0.0785831190916,0.0784955099885,0.0785404377337,0.0786347859986,0.0785741335426,0.0783921761746,0.0782776104244,0.0781338416399,0.0782057260321,0.0782169579684,0.0780889138947,0.0781068849927,0.0780215222769,0.078118116929,0.0781967404831,0.0782169579684,0.0781338416399,0.0782439146155,0.0782281899047,0.078291088748,0.0782798568117,0.0782169579684,0.0780462325368,0.07810913138,0.0779743481445,0.0778215938109,0.0777092744479,0.0777474630313,0.0778081154873,0.0775565201143,0.0774801429475,0.0774082585552,0.077293692805,0.0771094890498,0.0768960822602,0.0766310085636,0.0764805006173,0.0764310800976,0.0762918040875,0.0761143394941,0.0760626725871,0.0761233250431,0.0760379623273,0.0760379623273,0.0758290483122,0.075844773023,0.0757324536601,0.0757526711454,0.0757683958562,0.0756268734589,0.0754673799635,0.0752696978847,0.075341582277,0.0752404948504,0.0750136097372,0.0749304934086,0.0748878120507,0.0748810728889,0.0748720873399,0.074656434163,0.0745710714472,0.0746452022267,0.0745912889325,0.0746294775159,0.0745396220256,0.0745104189912,0.0745912889325,0.0745351292511,0.074595781707,0.0747844782368,0.0749012903743,0.075020348899,0.0751214363256,0.0751146971639,0.0751079580021,0.0750540447079,0.0750158561245,0.074959696443,0.0749709283793,0.0749349861831,0.0750315808353,0.0750068705754,0.075098972453,0.0750338272225,0.0750675230314,0.0749574500557,0.0750787549677,0.0750765085805,0.0750450591588,0.0750023778009,0.0751528857473,0.0750787549677,0.0750742621932,0.0750652766442,0.0749619428303,0.0748586090163,0.0749799139283,0.0750023778009,0.0750473055461,0.0749911458646,0.0749170150851,0.0749709283793,0.074899043987,0.0749709283793,0.0748833192762,0.0747934637858,0.0747328113298,0.0747934637858,0.074838391531,0.0749394789577,0.0748631017909,0.074959696443,0.0749260006341,0.0749394789577,0.0749282470214,0.0750967260658,0.0750585374824,0.075081001355,0.0750787549677,0.0751214363256,0.0750630302569,0.0751191899384,0.0750338272225,0.075089986904,0.0750360736098,0.0750136097372,0.0749327397959,0.0749754211538,0.0750315808353,0.0749978850264,0.0750832477422,0.0751461465855,0.0750225952862,0.0748631017909,0.074838391531,0.0746946227464,0.0747036082955,0.0747328113298,0.0748563626291,0.07484737708,0.0748631017909,0.074838391531,0.0748451306928,0.0747507824279,0.0745912889325,0.0746092600306,0.074638463065,0.0746092600306,0.0746519413885,0.0746047672561,0.0747552752024,0.0746159991924,0.0746654197121,0.0747260721681,0.0748204204329,0.0747867246241,0.0749394789577,0.0750675230314,0.0751483929727,0.0752247701395,0.0753393358898,0.0755010757724,0.0755594818411,0.0758245555377,0.075775135018,0.0759009327045,0.0759705707095,0.0761210786559,0.076217673308,0.0763928915142,0.0763704276416,0.0764737614555,0.0766984001814,0.0767882556718,0.0767882556718,0.0767073857304,0.0768264442552,0.0768938358729,0.0768758647749,0.0769589811034,0.0770600685301,0.0770465902065,0.0771678951185,0.0773790555209,0.0774734037857,0.0775520273398,0.077545288178,0.0777339847078,0.0777901443892,0.0777384774823,0.0778126082618,0.0779473914974,0.0779855800808,0.0779047101394,0.0779855800808,0.0780866675074,0.0780417397622,0.0781944940958,0.078239421841,0.0781226097036,0.0782012332576,0.0783180453951,0.0784258719835,0.0784281183708,0.0783719586893,0.0782888423607,0.0784146400472,0.0784955099885,0.078309059846,0.0782461610028,0.0783652195275,0.0785000027631,0.0785404377337,0.078621307675,0.0787515981361,0.0788189897538,0.0789627585384,0.0789290627295,0.0788863813716,0.0787965258812,0.0788347144646,0.0790481212542,0.079124498421,0.0790413820925,0.0790997881612,0.0791469622936,0.0791963828133,0.0792570352693,0.0792884846909,0.0793985576666,0.0793716010195,0.0794592101226,0.0796029789072,0.0795850078091,0.079679356074,0.0799174731234,0.0800859521679,0.0801196479767,0.0802184890161,0.0802971125702,0.0803779825115,0.0805891429139,0.0807486364092,0.0806722592424,0.080825013576,0.0809171154537,0.0809732751351,0.0809350865517,0.0810518986892,0.0811125511452,0.081179942763,0.0812450879935,0.0812787838023,0.0813753784545,0.0815416111116,0.0816943654452,0.0818471197789,0.0817999456464,0.0817415395777,0.081692119058,0.0816134955039,0.0816763943472,0.0817684962248,0.0818336414553,0.0818853083623,0.0820245843723,0.082082990441,0.082074004892,0.082074004892,0.0819482072055,0.0820852368283,0.0819706710781,0.0818808155877,0.0818471197789,0.0817640034503,0.081761757063,0.0818291486808,0.081831395068,0.0818044384209,0.08181342397,0.0817460323522,0.0818942939113,0.0820470482449,0.0822761797453,0.0822357447746,0.0821593676078,0.0821211790244,0.0820919759901,0.0820335699213,0.0819751638526,0.0818111775827,0.0816337129893,0.0815169008518,0.0813551609691,0.0813529145819,0.0816359593765,0.0817752353866,0.0818201631317,0.0817460323522,0.0817460323522,0.0817976992592,0.0816831335089,0.0816808871217,0.0817595106758,0.0817460323522,0.0819661783036,0.0819819030144,0.0820470482449,0.0820672657302,0.0821863242549,0.0822379911619,0.082125671799,0.0822447303237,0.0822447303237,0.0821661067696,0.0823907454955,0.0825187895693,0.0824334268534,0.0823974846573,0.0823929918828,0.0825053112457,0.0825816884125,0.0827569066187,0.0829658206338,0.0831163285801,0.0832893003991,0.0836127801644,0.0837250995273,0.0838216941794,0.0840845214887,0.0842822035675,0.0843698126706,0.084477639259,0.084729234632,0.0849291630981,0.0849403950344,0.0848954672892,0.0849740908433,0.0853177880939,0.0852167006672,0.0852683675742,0.0853986580352,0.0854390930059,0.0854997454619,0.0856143112121,0.0858097469036,0.0859198198793,0.0862500388063,0.0863646045565,0.0864364889488,0.0866768523855,0.0868835200134,0.0871216370628,0.0874383776663,0.0874900445733,0.0876068567107,0.0876809874903,0.087930336476,0.0881482360401,0.0881527288146,0.0884447591583,0.0886514267861,0.0886783834332,0.0889704137769,0.0890759939781,0.0892736760568,0.0894444014885,0.0895657064005,0.0897678812538,0.0899049108766,0.0899678097199,0.0902486081272,0.0905900589906,0.0909764375991,0.091192090776,0.0916391218405,0.09215579091,0.0921018776158,0.092337748278,0.0926949238522,0.0929487656124,0.0932542742797,0.0936114498538,0.0939529007172,0.0941865249921,0.0944920336593,0.0947548609686,0.0950109491161,0.0952063848077,0.0953434144305,0.0956399375486,0.0957612424606,0.0960173306081,0.0961274035838,0.0963138537263,0.0965834201974,0.0967518992418,0.0969900162912,0.0974190762577,0.0976571933071,0.0980795141118,0.0984254577497,0.0987309664169,0.0991195914127,0.0994722742124,0.099755319007,0.100112494581,0.100420249636,0.100768439661,0.101073948328,0.101197499627,0.101462573324,0.101631052368,0.102136489501,0.1023835921,0.102561056693,0.102871058135,0.102967652787,0.103264175905,0.103493307406,0.103774105813,0.104032440348,0.104421065344,0.104555848579,0.104814183114,0.105164619526,0.105461142645,0.105795854346,0.106204696827,0.10655513324,0.106806728613,0.107190860834,0.107428977883,0.107714269065,0.107806370943,0.108033256056,0.108316300851,0.108428620214,0.108700433072,0.108729636106,0.108754346366,0.108783549401,0.108938550121,0.10916094246,0.109163188847,0.109212609367,0.10951362526,0.109533842745,0.109581016878,0.109724785662,0.109974134648,0.11004601904,0.110232469183,0.110288628864,0.110320078286,0.110338049384,0.110452615134,0.110607615855,0.110517760364,0.110654789987,0.110675007473,0.110600876693,0.110688485796,0.110870443164,0.110737906316,0.110800805159,0.110794065997,0.110708703281,0.110630079727,0.110639065276,0.110710949669,0.110870443164,0.110805297934,0.110715442443,0.110625586953,0.11058739837,0.110591891144,0.110632326115,0.11051326759,0.110293121639,0.110203266148,0.110153845629,0.109947178001,0.109902250256,0.109879786383,0.109731524824,0.109506886098,0.10946420474,0.109403552284,0.109356378152,0.109244058789,0.109107029166,0.109005941739,0.108785795788,0.108590360096,0.10846456241,0.10827586588,0.108278112267,0.108093908512,0.107887240884,0.107725501002,0.107451441756,0.107233542192,0.107116730054,0.106952743785,0.106835931647,0.106685423701,0.106429335553,0.106126073273,0.106004768361,0.105773390474,0.105566722846,0.1052926636,0.105029836291,0.105115199007,0.105191576174,0.104953459124,0.104775994531,0.10454686303,0.104328963466,0.104034686735,0.103693235872,0.103495553793,0.10305526189,0.10257228863,0.102322939644,0.102174678085,0.101963517683,0.101779313927,0.101734386182,0.101873662192,0.101631052368,0.101458080549,0.101325543701,0.101215470725,0.100869527087,0.100548293709,0.100519090675,0.100505612351,0.100330394145,0.100047349351,0.0998227106248,0.0996677099039,0.0992993023934,0.0988904599123,0.0987174880934,0.0985018349165,0.0982120509601,0.0981671232149,0.0979649483616,0.0976414685963,0.0972281333407,0.0972528436005,0.0969585668696,0.0968911752519,0.096736174531,0.0965182749669,0.0964890719325,0.0964261730893,0.0964351586383,0.0963295784371,0.0961341427456,0.0958645762745,0.0957005900046,0.0954579801807,0.095217616744,0.0947997887138,0.0946492807675,0.0945347150172,0.0943752215219,0.0940584809184,0.0940427562075,0.0941034086635,0.0939192049083,0.0937013053442,0.0934092750005,0.0934609419075,0.0932542742797,0.0928634028966,0.0927645618572,0.0928207215387,0.0926297786217,0.092468038739,0.0923826760232,0.0922434000131,0.0920839065178,0.0919446305077,0.091764919527,0.0916076724189,0.0915604982864,0.0914234686636,0.0913538306586,0.0913425987223,0.0912460040702,0.0911494094181,0.0909899159227,0.0909023068196,0.0908663646234,0.0908236832655,0.0907338277751,0.0905945517651,0.0904777396276,0.0903272316813,0.0902845503234,0.0901722309604,0.0898442584206,0.089682518538,0.0895746919495,0.0893815026453,0.0892601977333,0.0890804867526,0.0890130951348,0.0887547606,0.0886649051097,0.0887996883452,0.0887547606,0.0886132382027,0.0885952671047,0.088494179678,0.0884222952857,0.0882403379177,0.0882852656629,0.0883099759228,0.0883661356042,0.0882605554031,0.0881931637853,0.0879797569957,0.0877461327208,0.0877506254953,0.0876360597451,0.0875214939949,0.0874518559899,0.0873327974651,0.0872204781022,0.0870991731902,0.0869082302732,0.0869037374987,0.0867375048415,0.0867487367778,0.0865308372137,0.0864275033998,0.0863309087477,0.0863443870712,0.0862680099044,0.0861781544141,0.086038878404,0.0858748921341,0.0858816312959,0.0857715583202,0.0856030792758,0.0852436573143,0.0851807584711,0.0852211934418,0.0851493090495,0.0851582945985,0.085153801824,0.0852301789908,0.0851964831819,0.0848617714803,0.0846438719162,0.0844798856463,0.0842597396949,0.0843158993764,0.0842822035675,0.0840058979347,0.0838711146991,0.0837475633999,0.0836958964929,0.0837632881107,0.0837587953362,0.0837161139783,0.0837408242381,0.0835453885466,0.0835790843555,0.0834555330562,0.0833881414385,0.0832825612373,0.0834263300219,0.0832084304578,0.0830062556045,0.0829253856631,0.0828310373983,0.0827928488149,0.0826400944813,0.0826445872558,0.082516543182,0.0825704564762,0.082507557633,0.0824266876917,0.0823188611032,0.0821750923187,0.0819863957889,0.0817774817738,0.0817280612541,0.0817213220924,0.0817168293178,0.0816584232491,0.0815393647244,0.0812990012877,0.0811911746992,0.0810900872726,0.0810047245568,0.0807374044729,0.0807059550513,0.0804184174822,0.0802207354034,0.0800792130061,0.0798500815057,0.0798433423439,0.079748994079,0.0795962397454,0.0795310945149,0.0794502245736,0.0792210930732,0.0791581942299,0.0790705851268,0.0790211646071,0.0787830475577,0.0787673228469,0.0785539160573,0.0785314521847,0.0785584088318,0.0784775388905,0.0783292773314,0.0781989868704,0.0780821747329,0.077987826468,0.0779002173649,0.0778620287815,0.0777564485804,0.0775587665016,0.0773251422266,0.0772914464178,0.0772420258981,0.0771768806676,0.0770578221428,0.0769095605837,0.0767770237355,0.0768938358729,0.0767837628972,0.076842168966,0.0766781826961,0.0766871682451,0.0768017339953,0.0767051393432,0.0766018055293,0.0765523850096,0.0765321675242,0.0764894861663,0.0764647759065,0.0765433994605,0.0764827470045,0.0764557903574,0.0765029644899,0.0763547029308,0.0762895577003,0.076096368396,0.0760424551018,0.0758784688319,0.0757661494689,0.0757324536601,0.0756066559736,0.0755280324195,0.0755078149342,0.0754943366106,0.0754067275075,0.075471872738,0.0754943366106,0.0754673799635,0.0755707137774,0.0756425981697,0.0757661494689,0.0759323821261,0.0758941935427,0.0757639030817,0.0756493373315,0.0755123077087,0.0756223806844,0.0755055685469,0.0754651335763,0.0752786834338,0.0751888279434,0.0752427412376,0.0751731032326,0.0751214363256,0.0750091169627,0.0749462181194,0.0749911458646,0.0749709283793,0.0750091169627,0.0751371610364,0.0751618712963,0.075271944272,0.0752629587229,0.0752629587229,0.075280929821,0.0751888279434,0.0752899153701,0.0754291913801,0.0754449160909,0.0753707853114,0.075271944272,0.0751865815561,0.0753011473064,0.0752067990415,0.0751775960071,0.0750495519334,0.0749147686978,0.074950710894,0.075271944272,0.0753775244732,0.0754898438361,0.0755864384882,0.0755707137774,0.0756066559736,0.0755729601647,0.0757257144983,0.0756852795276,0.0756133951353,0.0755774529392,0.0756291198462,0.0756605692678,0.0755774529392,0.0755482499048,0.0755415107431,0.0754202058311,0.0753550606006,0.0755302788068,0.0754673799635,0.0754449160909,0.0757212217238,0.0758380338612,0.0758335410867,0.0758268019249,0.0757683958562,0.0758492657975,0.0757728886307,0.0758694832829,0.0759975273566,0.0758604977338,0.0758043380523,0.075775135018,0.0758020916651,0.0758245555377,0.0756605692678,0.0755168004832,0.0755123077087,0.0753595533751,0.0753191184044,0.0752944081446,0.0753101328554,0.0752921617573,0.0753460750515,0.0753752780859,0.0754426697037,0.0755684673902,0.0755752065519,0.0755954240373,0.0756965114639,0.0756358590079,0.0756987578512,0.075853758572,0.0759278893516,0.0758223091504,0.0758470194103,0.0759413676751,0.0757706422435,0.0757391928218,0.0759099182535,0.0759525996114,0.0758874543809,0.075853758572,0.075966077935,0.0759615851605,0.0759413676751,0.0760379623273,0.0760806436852,0.0760739045234,0.0761255714304,0.076166006401,0.0763412246072,0.0762648474404,0.0762895577003,0.0763502101563,0.0764288337103,0.0763816595779,0.0763524565435,0.0764580367447,0.0765321675242,0.0766220230146,0.0765748488822,0.0766332549509,0.0767365887648,0.0766781826961,0.0768534009023,0.0771207209861,0.0770915179517,0.0770757932409,0.077111735437,0.0772375331235,0.0772083300892,0.0771094890498,0.0771813734421,0.077111735437,0.0770488365938,0.077042097432,0.0770465902065,0.0770735468536,0.0771319529224,0.0772015909274,0.077293692805,0.0772689825452,0.0774329688151,0.0775205779182,0.077554273727,0.0777542021931,0.0777160136097,0.0778463040707,0.077866521556,0.0780147831151,0.0779361595611,0.0780642036348,0.078169783836,0.0782034796449,0.0781360880271,0.0781630446742,0.0781428271889,0.0780978994437,0.0780327542132,0.078160798287,0.0780350006005,0.0779249276248,0.0780866675074,0.0781203633163,0.0781720302233,0.0781248560908,0.0783270309441,0.0784348575325,0.0784191328217,0.0784483358561,0.0783899297874,0.0784371039198,0.0786325396113,0.0786482643221,0.0785831190916,0.0785853654789,0.0786392787731,0.0787673228469,0.0787156559399,0.0786842065183,0.0786886992928,0.0785381913465,0.078560655219,0.0785336985719,0.0784955099885,0.078369712302,0.0785022491503,0.0786347859986,0.0787291342635,0.0788392072392,0.0788976133079,0.0791132664847,0.0793805865686,0.0793042094018,0.0793850793431,0.0793873257303,0.0793221804998,0.0794749348334,0.0796231963925,0.0797377621427,0.0798635598292,0.079870298991,0.0797737043389,0.0797894290497,0.0799129803489,0.0801286335258,0.0802297209524,0.0803510258644,0.0803600114134,0.0804453741293,0.080564432654,0.0806093603992,0.0806116067864,0.0807082014386,0.0807104478258,0.0807216797621,0.0808384918996,0.0809957390077,0.0810451595274,0.0811462469541,0.0812473343807,0.0813866103908,0.0814742194939,0.0813933495525,0.0813394362583,0.0812765374151,0.0790728315141,0.0766961537941,0.0743374471723,0.0722191039871,0.0699704703409,0.067775749989,0.0656596531911,0.0633526134761,0.0608793411041,0.0586127363598,0.0562180875418,0.0540525702242,0.0518780673576,0.0496653759075,0.0474032639378,0.0450872386738,0.0429015038709,0.0405720002834)
s <- c(0.0432305147308,0.0431452543543,0.0431253991981,0.0431277350989,0.0430611619282,0.0430599939778,0.0431709492623,0.0430891927369,0.0429957567079,0.0429186719839,0.0429887490057,0.0429245117357,0.0428439231607,0.0429140001825,0.0428988168277,0.0428719539694,0.0427913653944,0.042764502536,0.0428182282527,0.0427983730965,0.0427481512309,0.0427037691171,0.042658219053,0.0427271281244,0.0426792421595,0.0426862498617,0.0427738461389,0.0427142806704,0.0426652267552,0.0426091651378,0.0424690110942,0.0424398123351,0.0423779109659,0.0423615596608,0.0423382006536,0.0423487122068,0.0423860866184,0.0423977661221,0.0423790789163,0.0422856428872,0.0422506043764,0.0421910389078,0.0420333656089,0.0419364257287,0.0418756923099,0.0417588972736,0.0417156831102,0.0417098433584,0.041721522862,0.0415685213644,0.0415778649673,0.0415556739105,0.0633239327734,0.0644930510866,0.0655570538672,0.0666012014916,0.0677761595566,0.069020026693,0.0701938168077,0.0712157733752,0.0724210981497,0.0736381024278,0.0747056090594,0.0758291773085,0.0769889520188,0.0782071242473,0.0793412040496,0.080465940249,0.0817039676337,0.0829139642096,0.0829536745219,0.0828917731527,0.0828228640813,0.0828193602302,0.08285089489,0.0828415512871,0.0827119087968,0.0826967254421,0.0826862138888,0.0827539550099,0.0827796499179,0.0828800936491,0.0827831537689,0.0828158563791,0.0827913294215,0.0828111845777,0.08278665762,0.0828053448258,0.0828695820958,0.0828065127762,0.0828181922798,0.0828275358827,0.0827376037048,0.0826009535123,0.082535548292,0.0825647470511,0.0824140814543,0.0822494004531,0.0822272093962,0.0822283773466,0.0822178657933,0.0821197579628,0.0820800476505,0.0821758195803,0.0820368334871,0.0819457333588,0.0819445654084,0.0819153666493,0.0818779922377,0.081888503791,0.0817039676337,0.0816338906119,0.0816537457681,0.0815287750792,0.0814423467524,0.0812951850067,0.0812005810273,0.08117722202,0.0811573668638,0.0810499154305,0.0809576473518,0.0809062575358,0.0808478600177,0.0808922421315,0.0809214408906,0.0809249447416,0.0808723869753,0.0809167690891,0.0810277243736,0.0809623191533,0.0809424639971,0.0809810063591,0.0809880140612,0.0809716627562,0.0809728307065,0.0809728307065,0.0809109293373,0.0809377921956,0.0810394038772,0.0809214408906,0.0808338446133,0.0808011420032,0.0807404085843,0.0807450803858,0.0806387969027,0.0804729479512,0.0804904672067,0.0804706120505,0.0805523685759,0.0806738354136,0.0807450803858,0.0807731111945,0.0807275611303,0.0806679956618,0.0806995303216,0.0807415765347,0.0807450803858,0.0807170495771,0.080794134301,0.0806983623712,0.0805617121788,0.0804752838519,0.0804145504331,0.0803888555251,0.0801926398641,0.0801681129065,0.0800840204804,0.0799917524017,0.0799228433303,0.0799438664368,0.0798153918969,0.0797091084139,0.0796390313921,0.079554938966,0.0794299682772,0.0793984336174,0.0794428157312,0.0793563874043,0.0792419282688,0.0790749113669,0.0790457126078,0.0790200176998,0.0790679036647,0.0789826432882,0.0788214661381,0.0786229145764,0.0784780887315,0.0784617374264,0.0784535617738,0.0783437744397,0.078273697418,0.078222307602,0.0781919408926,0.0781627421335,0.0780658022534,0.0780214201396,0.0780225880899,0.0778929455997,0.0778824340464,0.0778473955355,0.077881266096,0.0778824340464,0.0778836019968,0.077864914791,0.0779221443587,0.0778660827413,0.0779092969047,0.0779233123091,0.0779221443587,0.0779174725573,0.0778695865924,0.0778357160319,0.0777609672087,0.0777656390101,0.0777995095706,0.07789411355,0.0779046251033,0.0779863816287,0.0778987853515,0.0780401073454,0.0779805418769,0.0781206959204,0.0780844894592,0.0780693061045,0.0780214201396,0.078090329211,0.0780459470972,0.0780447791468,0.078000397033,0.0779303200113,0.0778065172728,0.0777819903152,0.0778205326772,0.0779408315645,0.0779034571529,0.0777796544145,0.0777668069605,0.0777177530452,0.0776313247184,0.0776219811155,0.077549568193,0.0775133617317,0.0775437284412,0.0775565758952,0.0775822708031,0.0775308809872,0.0775437284412,0.077575263101,0.0775775990017,0.077523873285,0.0776126375126,0.0775285450865,0.0774946745259,0.077472483469,0.0775250412354,0.0773732076882,0.0774059102984,0.0772715960066,0.0773545204824,0.077340505078,0.0774070782487,0.0774094141494,0.0774000705465,0.0773907269436,0.0773848871918,0.0774070782487,0.0774339411071,0.0773440089291,0.0772131984885,0.0771641445732,0.0771501291689,0.0771734881761,0.0772435651979,0.0773521845817,0.0774818270719,0.0774245975042,0.0774199257027,0.077459636015,0.0774713155187,0.0774888347741,0.0775694233492,0.0775378886894,0.0775869426046,0.077591614406,0.077575263101,0.0777504556554,0.0776324926687,0.0777270966481,0.0778882737982,0.0779595187703,0.0780039008841,0.0782199717013,0.0783484462412,0.0784535617738,0.0785528375547,0.0786322581794,0.078685983896,0.0787011672508,0.0788868713585,0.0790083381962,0.079120461431,0.0791625076441,0.0793400360992,0.0794556631852,0.0796670622008,0.079767505932,0.0798796291669,0.0800851884307,0.0801564334029,0.0801774565094,0.0801938078145,0.0804215581352,0.0805803993846,0.0806352930517,0.0806714995129,0.0807661034923,0.0808081497054,0.0809739986569,0.0811141527004,0.0812741619001,0.0813746056313,0.0813489107234,0.0814972404194,0.0815556379376,0.0815229353274,0.0815194314763,0.0815521340865,0.0816128675054,0.0816105316046,0.0817611972014,0.0817892280102,0.0818347780743,0.08198193982,0.0821034066578,0.0821127502607,0.0821092464096,0.0822517363538,0.0824082417025,0.0823848826952,0.0824222571068,0.0823732031916,0.0824923341286,0.0826021214627,0.0825694188525,0.0825822663065,0.0827212523997,0.0828684141454,0.0828543987411,0.0828812615994,0.0829898809832,0.0831300350267,0.0832783647228,0.0832771967724,0.0832736929213,0.0833472737942,0.0834033354116,0.0835831997675,0.0837934308328,0.0839300810253,0.0840095016499,0.0841695108497,0.0844241240288,0.0845724537248,0.0845864691292,0.0846939205626,0.0846705615553,0.0848235630529,0.0850314582174,0.085091023686,0.0851622686581,0.0853456368651,0.0854565921495,0.0854659357524,0.0855920743916,0.0857824503008,0.0858209926627,0.085989177515,0.0860721019908,0.0860674301893,0.0861129802535,0.0861304995089,0.0861795534241,0.0860989648491,0.0862005765307,0.0863430664749,0.0864014639931,0.0863967921916,0.0863559139289,0.0864867243696,0.0866829400305,0.0867798799106,0.0868674761879,0.0868464530813,0.0867646965559,0.0866151989095,0.0866175348102,0.0866151989095,0.0865638090935,0.086597679654,0.0866514053707,0.0867950632654,0.0868826595426,0.0869048505995,0.0868955069966,0.0868242620244,0.0869060185498,0.0868254299748,0.0869048505995,0.086951568614,0.0868849954433,0.0868943390462,0.087045004643,0.0870309892387,0.087109241913,0.0871629676297,0.087189830488,0.0873673589432,0.0874526193196,0.0876733619382,0.0877656300169,0.0877679659176,0.0877738056694,0.0878380429394,0.0878392108898,0.0878146839321,0.087675697839,0.0875764220581,0.0874899937313,0.0875238642918,0.0875647425545,0.0877749736198,0.0879057840604,0.0879536700253,0.0879501661742,0.0880412663025,0.0880996638207,0.0880984958703,0.088152221587,0.0881954357504,0.0881323664308,0.0882678486729,0.0883297500422,0.0885131182491,0.0885364772564,0.0886310812358,0.0887957622369,0.0887233493144,0.0888074417406,0.0888518238544,0.0888821905638,0.0889861381461,0.0891227883385,0.0890725664729,0.0890842459766,0.0891566588991,0.0892173923179,0.0892302397719,0.0893505386593,0.0895385786677,0.0897569853856,0.0898597650175,0.0901354013031,0.0903397926166,0.0905068095185,0.0906551392146,0.0907906214567,0.0908863933864,0.0909774935148,0.0911246552605,0.09131619912,0.0913453978791,0.0913652530352,0.091383940241,0.0916163623632,0.0915894995049,0.0917308214988,0.0918873268474,0.0919317089612,0.091882655046,0.0920718630047,0.0922377119563,0.0922692466161,0.092555394455,0.0927154036547,0.0928181832866,0.0929244667696,0.0930903157212,0.0933017147368,0.0935831907743,0.0937291845696,0.093810941095,0.0938296283008,0.0940153324085,0.0942395788782,0.0942220596228,0.0944182752837,0.0945619331784,0.0945806203842,0.0948025309531,0.0949894030112,0.095207809729,0.0953958497374,0.0956025769517,0.0957695938536,0.09598332877,0.0960685891464,0.0963010112687,0.0966070142637,0.0969632391244,0.0971045611183,0.0975203514475,0.0978882558118,0.0979735161883,0.0981790754521,0.0984897502486,0.0986415837958,0.0989616021952,0.0992477500341,0.0995350658234,0.0996553647108,0.0999578638548,0.100172766722,0.10039467729,0.100576877547,0.100706520037,0.10097164477,0.101144501423,0.101505398086,0.101663071385,0.101832424187,0.102137259232,0.102278581226,0.102600935526,0.102995702749,0.103147536296,0.103389302021,0.103626395944,0.103827283407,0.10422205063,0.104532725426,0.104790842456,0.105141227565,0.105358466333,0.105613079512,0.105822142627,0.10608960326,0.106298666375,0.106422469113,0.106748327264,0.107066009763,0.10731244729,0.107530854008,0.107645313143,0.107931460982,0.10808563043,0.108400977028,0.108692964619,0.10908306004,0.109272267999,0.109525713227,0.109943839457,0.110204292388,0.110485768426,0.110783595768,0.111185370693,0.111517068596,0.111762338172,0.111928187124,0.112123234834,0.112297259438,0.112450260936,0.112724729271,0.112871891017,0.11310664904,0.113155702955,0.113210596622,0.113231619729,0.113370605822,0.113615875398,0.113731502484,0.113903191187,0.114091231196,0.114132109458,0.114273431452,0.114508189475,0.114720756441,0.114825871974,0.115020919685,0.115083989004,0.115143554473,0.115189104537,0.115210127643,0.11532692268,0.115322250878,0.115468244674,0.115510290887,0.115389991999,0.115518466539,0.115673803937,0.115637597476,0.115623582072,0.115540657596,0.115582703809,0.11565044493,0.115697162945,0.115692491143,0.115832645187,0.115740377108,0.115642269278,0.115628253873,0.115606062816,0.115610734618,0.115687819342,0.115624750022,0.115499779333,0.115379480446,0.115218303296,0.115061797947,0.114962522166,0.114850398932,0.114547899788,0.114255912197,0.114139117161,0.114029329826,0.113933557897,0.113677776767,0.113523607319,0.113440682844,0.113134679849,0.112861379464,0.112617277838,0.112386023666,0.11220615931,0.111932858925,0.111640871334,0.111352387595,0.111066239756,0.110754397009,0.110502119731,0.110235827048,0.10998588567,0.10966469932,0.109303802658,0.109016486869,0.108840126364,0.108516604114,0.108120668941,0.107841528804,0.107498151397,0.107319454992,0.107112727778,0.106810228634,0.106562623157,0.106241436807,0.105976312075,0.105663301377,0.105416863851,0.105147067317,0.104814201464,0.104500022816,0.104247745538,0.104081896586,0.10383779496,0.103518944511,0.103361271212,0.103316889098,0.103090306728,0.102860220506,0.102704883108,0.102443262227,0.102077693763,0.101816072882,0.101568467405,0.101468023674,0.101247281055,0.101020698685,0.10081163557,0.100708855938,0.10049044922,0.10013656026,0.0999403445993,0.0996927391224,0.0994731644542,0.0992897962472,0.0990421907703,0.0988050968466,0.0984885822983,0.0984710630428,0.0981744036507,0.0980132265006,0.097792483882,0.0975822528167,0.0974339231206,0.0973358152901,0.0971442714306,0.0968698030954,0.0966000065615,0.096379263943,0.0962192547433,0.0960942840544,0.0959039081453,0.0955430114832,0.0953047496091,0.0950956864942,0.0949088144361,0.0947090949241,0.0946238345476,0.094480176653,0.0944463060924,0.0942524263322,0.0940386914158,0.0939417515357,0.0937350243215,0.0934605559862,0.0932947070347,0.0932433172187,0.0930272464016,0.0928380384428,0.0927212434065,0.0925904329659,0.092423416064,0.0922353760555,0.0921092374164,0.0919480602663,0.0919211974079,0.0918674716912,0.0918172498256,0.0917868831162,0.0916560726756,0.0915521250933,0.0914376659577,0.0913594132834,0.0912870003609,0.0911725412253,0.0910440666854,0.0908443471734,0.0907287200875,0.0905873980936,0.0905757185899,0.090537176228,0.0903549759713,0.0902136539774,0.0901786154666,0.0900606524799,0.0899204984364,0.0898013674994,0.0897161071229,0.0895163876108,0.0893645540636,0.0893061565455,0.0892676141835,0.089195201261,0.0891076049838,0.0891344678422,0.0890141689548,0.0888915341667,0.088931244479,0.0889335803798,0.0888985418689,0.0887326929173,0.0886322491861,0.0884383694259,0.0882771922758,0.0882398178642,0.0881814203461,0.088071633012,0.0879384866706,0.0877959967263,0.0877411030593,0.0876850414419,0.0875635746041,0.0876476670302,0.0875402155969,0.0876009490157,0.0874654667736,0.0873813743475,0.0872844344674,0.0872984498718,0.0872213651478,0.0871933343391,0.0870753713524,0.0870123020329,0.0869831032738,0.0868674761879,0.0868230940741,0.0866572451225,0.0866222066117,0.086623374562,0.0866677566758,0.0866350540656,0.0866210386613,0.0866759323283,0.0866420617678,0.0864178152982,0.0863629216311,0.0863407305742,0.0863278831202,0.0864073037449,0.0864154793974,0.0862180957861,0.0861118123031,0.0860896212462,0.086095460998,0.0861550264665,0.0861024687002,0.0860919571469,0.0860464070828,0.0858793901809,0.0858630388758,0.0856855104206,0.0856212731507,0.0855687153844,0.0856224411011,0.0854565921495,0.0853386291629,0.0852860713965,0.0852416892828,0.0851482532537,0.0850466415722,0.0850629928772,0.0849251747344,0.0849929158555,0.0849310144862,0.0848574336134,0.0847312949742,0.0846752333568,0.0846623859028,0.0844673381922,0.0843902534682,0.0843622226595,0.0842874738363,0.0841870301051,0.0839557759333,0.0837455448679,0.0836439331864,0.0835948792711,0.0835563369092,0.0832842044746,0.0832421582615,0.083037766948,0.0829244757629,0.0827936653222,0.0826792061867,0.0826173048174,0.0825682509022,0.0825764265547,0.082574090654,0.0824444481637,0.0823019582194,0.082284438964,0.0821477887716,0.0820543527425,0.0818522973297,0.081782220308,0.0816490739666,0.0816467380659,0.0816432342148,0.0815194314763,0.0813792774328,0.0812718259994,0.0811445194099,0.0810335641254,0.0808723869753,0.0808350125637,0.0807882945492,0.0806317892006,0.0804857954052,0.0804262299367,0.0804309017382,0.0803631606171,0.0802370219779,0.080121394892,0.080044310168,0.0801622731547,0.0801377461971,0.0801786244598,0.0800583255724,0.0800197832104,0.0800373024659,0.0799263471814,0.0797546584781,0.0796110005834,0.0795409235617,0.0795327479091,0.0794311362275,0.0793832502627,0.0793633951065,0.079316677092,0.0793388681489,0.0793248527445,0.0792512718717,0.0790679036647,0.0789522765788,0.0788284738403,0.0787058390522,0.0786416017823,0.0785329823985,0.0784395463695,0.0784407143198,0.0784500579227,0.0783753090995,0.0784664092278,0.0784500579227,0.078524806746,0.0785610132072,0.0786556171866,0.078669632591,0.0787899314783,0.0787397096127,0.0786789761939,0.0786275863779,0.0784710810293,0.0785423260014,0.0785026156891,0.0784921041358,0.0784874323344,0.0784745848804,0.0784640733271,0.0783729731988,0.0782631858647,0.0782643538151,0.0782059562969,0.0782258114531,0.0782141319494,0.0782807051201,0.0782982243756,0.078341438539,0.0784185232629,0.0785528375547,0.0785201349445,0.0786556171866,0.0786602889881,0.0787432134638,0.078882199557,0.0788915431599,0.0788459930958,0.0787712442725,0.0787105108537,0.0787899314783,0.0786941595486,0.0786731364421,0.0785364862496,0.0785376542,0.078550501654,0.0786719684917,0.078682480045,0.0787256942084,0.0788354815425,0.0788167943367,0.0788261379396,0.078817962287,0.0788845354577,0.078933589373,0.078907894465,0.0789791394371,0.0790457126078,0.0790737434165,0.0790935985727,0.0790807511187,0.0791239652821,0.0790001625437,0.0790165138487,0.0790293613027,0.0789966586926,0.0789160701175,0.079159003793,0.0791554999419,0.0791379806865,0.0791811948499,0.079078415218,0.0791706832966,0.0791695153463,0.0791870346017,0.0792384244177,0.0791683473959,0.0791192934807,0.0790690716151,0.0790597280122,0.0790795831683,0.0789721317349,0.0789639560824,0.0790153458984,0.078907894465,0.0789254137204,0.0789709637846,0.078959284281,0.078949940678,0.0789020547132,0.078933589373,0.0790048343451,0.0789861471393,0.0789954907422,0.0790165138487,0.0790550562107,0.0790503844093,0.079065567764,0.0791578358426,0.0791823628003,0.0791741871477,0.0792979898862,0.0793540515036,0.0792080577082,0.0792279128644,0.0793248527445,0.0793330283971,0.079397265667,0.0793528835532,0.079384418213,0.079448655483,0.0794696785895,0.0794813580931,0.0794626708873,0.0794930375968,0.0795888095265,0.0796086646827,0.079725459719,0.0797021007117,0.079686917357,0.0797546584781,0.0797791854357,0.0796623903994,0.0797733456839,0.0798796291669,0.0799450343872,0.080015111409,0.0800081037068,0.0801237307927,0.0802335181268,0.0802393578786,0.080359656766,0.0805138262139,0.0805570403773,0.0805336813701,0.0805757275831,0.0807112098252,0.0806247814984,0.0806504764064,0.0807929663506,0.0807322329318,0.0807696073434,0.0807193854778,0.0806971944209,0.0806387969027,0.0806808431158,0.0807357367829,0.0808163253579,0.0808723869753,0.081083785991,0.0811036411472,0.0811655425164,0.0813278876168,0.0813851171846,0.0814633698589,0.0815556379376,0.0816011880017,0.0816327226615,0.0817892280102,0.0819387256566,0.0819445654084,0.0820064667776,0.0820216501324,0.0821174220621,0.0820963989556,0.0821092464096,0.0821769875306,0.0821618041759,0.082191002935,0.08227159151,0.0823743711419,0.0824491199652,0.0824386084119,0.0826827100377,0.0827831537689,0.0827329319033,0.0828322076842,0.0828111845777,0.082995720735,0.0831417145303,0.0832690211199,0.0832433262119,0.0833379301913,0.0833741366526,0.0835049470932,0.0834815880859,0.0835446574055,0.08359137542,0.0835481612566,0.0834056713123,0.0833461058438,0.0832947160279,0.0833180750351,0.0833624571489,0.0835189624975,0.0834862598874,0.0836731319454,0.0837537205205,0.0839440964296,0.0840690671185,0.0840702350688,0.0841076094804,0.0841403120906,0.0840678991681,0.0841262966862,0.084273458432,0.0843902534682,0.0844696740929,0.0845082164549,0.0844007650215,0.0844568266389,0.0845654460227,0.0846869128604,0.0847149436691,0.0847359667756,0.0847418065275,0.08481421945,0.0849543734935,0.0850057633095,0.0849660529971,0.0850513133736,0.0850314582174,0.0850851839341,0.0851867956157,0.085223002077,0.0854308972415,0.0855815628384,0.0856785027185,0.0857322284352,0.0858642068262,0.085763763095,0.0857754425986,0.0857567553928,0.0845864691292,0.0832526698148,0.0820426732389,0.0809412960467,0.0797721777335,0.0786170748246,0.0775519040937,0.076336067766,0.0750151159056,0.0738541732449,0.0726068022574,0.0715416315264,0.0704601094904,0.0692396013613,0.0680296047853,0.0667810658474,0.0656983758611,0.0645479447537,0.0434547612005,0.0434711125055,0.0434185547392,0.0433449738664,0.0434699445552,0.043450089399,0.0434909676617,0.0435458613288,0.0434933035624,0.0435003112646,0.0435003112646,0.0435119907682,0.0435540369813,0.0435773959886,0.0435446933784,0.0436568166132,0.0436112665491,0.0435575408324,0.043620610152,0.0436416332585,0.0435960831944,0.043620610152,0.0436486409607,0.043671999968,0.0436906871738,0.0437163820817,0.043671999968,0.043633457606,0.0436661602161,0.0435832357404,0.043543525428,0.0435890754922,0.0436649922658,0.0436871833227,0.0436860153723,0.0436813435709,0.0437245577343,0.0437222218336,0.0438343450684,0.0439254451967,0.04393595675,0.0439371247003,0.0439744991119,0.043939460601,0.04393595675,0.0440457440841,0.0440223850768,0.0440947979993,0.0440889582475,0.0441263326591,0.0441590352693,0.0439826747645)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("2-organelles-nucleus-merged/AGAMOUS-GFP-AP1-GR-ap1-cal-Rep2-GSM1120015.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=105"),bty="n")
dev.off()