# R script for Peak Model
#  -- generated by MACS
p <- c(0.04011722646,0.0422921144001,0.0444197221675,0.0467128105391,0.0488404183066,0.0505897846932,0.0528828730648,0.0550814010912,0.0571853687723,0.0596912179207,0.0618424657745,0.0643246748365,0.0661922416546,0.0685562502852,0.0705420175348,0.0728587459927,0.0754827955726,0.0777995240305,0.0776576835127,0.077917724462,0.0775867632538,0.0775394830811,0.0767830003194,0.0763338386796,0.076286558507,0.0763811188522,0.0766175197152,0.0766884399742,0.0765465994563,0.0766647998879,0.0772321619592,0.0769012007509,0.0774922029085,0.0777049636853,0.0775158429948,0.0773503623907,0.0779413645483,0.0779413645483,0.0780832050662,0.0781304852388,0.0777522438579,0.0784850865334,0.0788869680005,0.0790288085184,0.079076088691,0.0786505671375,0.079076088691,0.0786505671375,0.0789342481732,0.0785087266197,0.0786742072238,0.0780832050662,0.0775394830811,0.0777286037716,0.0777049636853,0.0777522438579,0.0781068451525,0.0780595649799,0.0783905261881,0.0778468042031,0.0777758839442,0.0772321619592,0.0770194011824,0.0775158429948,0.0775867632538,0.0770194011824,0.076830280492,0.077066681355,0.0766647998879,0.0764756791974,0.0765702395426,0.0768539205783,0.0768775606646,0.0769721210098,0.0769721210098,0.0767120800605,0.0771612417003,0.0769957610961,0.0763811188522,0.0762392783344,0.0765465994563,0.0766884399742,0.0758610369535,0.0756955563493,0.0759319572124,0.0759319572124,0.0757901166946,0.0766411598015,0.0766647998879,0.0764047589385,0.0763101985933,0.0763574787659,0.0760501576439,0.0758137567809,0.0762392783344,0.0763811188522,0.0764756791974,0.0765938796289,0.0772085218729,0.0769012007509,0.0766411598015,0.0771139615277,0.0772321619592,0.0773503623907,0.0775631231675,0.0771612417003,0.0773976425633,0.0772794421318,0.0773030822181,0.0770194011824,0.0768539205783,0.0767593602331,0.0769012007509,0.0765938796289,0.0764520391111,0.0764756791974,0.0760501576439,0.076286558507,0.0765938796289,0.07652295937,0.076286558507,0.0766884399742,0.077137601614,0.0769957610961,0.0769012007509,0.0764283990248,0.0768539205783,0.0760265175576,0.0763338386796,0.0766647998879,0.0760501576439,0.0763574787659,0.0764756791974,0.0765938796289,0.0761210779028,0.0758373968672,0.0762629184207,0.0764756791974,0.0768066404057,0.0761683580754,0.0760265175576,0.0766411598015,0.0762156382481,0.0760737977302,0.0754591554863,0.0752227546232,0.074820873156,0.0754827955726,0.0756955563493,0.0758137567809,0.0759083171261,0.075671916263,0.0758137567809,0.0755300757452,0.0756246360904,0.0760737977302,0.0759319572124,0.0754118753137,0.0747263128108,0.0741116705669,0.0739225498764,0.0743007912573,0.0743480714299,0.0747735929834,0.0743953516025,0.074040750308,0.073733429186,0.0735443084956,0.0732369873736,0.0737570692723,0.0737097890997,0.0743480714299,0.074040750308,0.0731424270284,0.072575064957,0.0728114658201,0.0729769464242,0.072575064957,0.073189707201,0.0733315477188,0.0739225498764,0.0741353106532,0.0741116705669,0.0735679485819,0.0728351059064,0.0725987050434,0.0729533063379,0.0732842675462,0.0732606274599,0.0729533063379,0.0727878257338,0.0730715067695,0.0733315477188,0.073426108064,0.0742535110847,0.0745371921204,0.0747735929834,0.0749390735876,0.0747735929834,0.0744426317752,0.0749863537602,0.0745371921204,0.0750336339328,0.0749154335013,0.0744189916889,0.0738752697038,0.0742535110847,0.0738752697038,0.0734024679777,0.074040750308,0.0745135520341,0.0747263128108,0.0744899119478,0.074584472293,0.0740643903943,0.0746553925519,0.0742535110847,0.0745608322067,0.074277151171,0.0746553925519,0.0751045541917,0.0755300757452,0.0749627136739,0.0747735929834,0.0745371921204,0.0744662718615,0.074040750308,0.0735443084956,0.0733551878051,0.0735679485819,0.0735206684093,0.073497028323,0.0738752697038,0.0731187869421,0.0729060261653,0.0734024679777,0.0730715067695,0.0743717115162,0.0747026727245,0.0750572740191,0.0753645951411,0.0756009960041,0.0755064356589,0.0757428365219,0.0761210779028,0.0762156382481,0.0760028774713,0.0759319572124,0.0764520391111,0.0766884399742,0.0769484809235,0.0766411598015,0.0767120800605,0.0766175197152,0.0772085218729,0.0766647998879,0.0759083171261,0.0757901166946,0.0760737977302,0.0763338386796,0.0757428365219,0.0758846770398,0.0761447179891,0.075979237385,0.0757664766083,0.0758610369535,0.0750336339328,0.0753409550548,0.0747735929834,0.0753409550548,0.0760737977302,0.0760974378165,0.0758846770398,0.0754118753137,0.0751518343643,0.0758373968672,0.0763101985933,0.0764047589385,0.0763101985933,0.0764756791974,0.0764756791974,0.0767357201468,0.0771612417003,0.077374002477,0.0776340434264,0.0774685628222,0.0771848817866,0.0771848817866,0.0777522438579,0.0773976425633,0.0776340434264,0.0779413645483,0.0790997287773,0.0792652093814,0.0794543300719,0.0794070498993,0.0799744119706,0.0805890542145,0.0811564162858,0.0816528580983,0.0823384206011,0.0823620606874,0.0830949033629,0.0830003430177,0.0830712632766,0.0832367438807,0.0827639421546,0.0827875822409,0.083804105952,0.0835440650027,0.0839459464699,0.0834022244848,0.0835913451753,0.0837095456068,0.084111427074,0.0843478279371,0.0849151900084,0.084655149059,0.0840877869877,0.0843478279371,0.0837804658657,0.0843951081097,0.0856007525112,0.0855771124249,0.0854116318208,0.0864045154456,0.0861444744962,0.0864517956182,0.0865699960497,0.0867354766539,0.08720827838,0.0871137180348,0.0885084831268,0.0885557632994,0.0885557632994,0.0892886059748,0.0890758451981,0.0891940456296,0.0888630844213,0.0886503236446,0.0895013667516,0.0898796081325,0.0906597309805,0.0909906921888,0.0905178904627,0.0907070111532,0.0910379723614,0.0911325327067,0.0907779314121,0.0903760499449,0.0905888107216,0.0903287697723,0.0902578495134,0.0901396490818,0.0909906921888,0.0911088926203,0.0920072158999,0.0919835758136,0.0911798128793,0.091085252534,0.0905651706353,0.0903996900312,0.0901632891681,0.0899032482188,0.0897141275283,0.0897614077009,0.0893358861475,0.0897141275283,0.0891231253707,0.0890522051118,0.0897377676146,0.0892413258022,0.0892413258022,0.0895013667516,0.0897614077009,0.0898796081325,0.0894304464927,0.0897614077009,0.0895250068379,0.0891231253707,0.0891704055433,0.0897377676146,0.0889340046803,0.0896195671831,0.0895250068379,0.0900687288229,0.0900687288229,0.090848851671,0.0905888107216,0.0905651706353,0.0905651706353,0.0904469702038,0.0902814895997,0.0903287697723,0.089997808564,0.0901396490818,0.090541530549,0.090305129686,0.0909197719299,0.0913452934834,0.091085252534,0.0912270930519,0.0910143322751,0.0911325327067,0.091156172793,0.091156172793,0.0907306512395,0.0904233301175,0.0903287697723,0.0900687288229,0.0907306512395,0.0912980133108,0.0919599357273,0.091392573656,0.091156172793,0.0916762546917,0.0915107740875,0.0917235348643,0.0922672568493,0.0922199766767,0.0932128603015,0.0934256210783,0.0929764594385,0.0929528193522,0.0930000995248,0.0932837805604,0.09309465987,0.0934965413372,0.0936147417687,0.0935201814235,0.0945367051346,0.0950567870333,0.0953641081553,0.0958605499677,0.0964515521253,0.0966879529884,0.0976099163543,0.0977044766995,0.0982718387708,0.0985082396339,0.098366399116,0.0986264400654,0.0987446404969,0.0991938021367,0.0999502848985,0.100494006884,0.0995956836039,0.100163045675,0.0996902439491,0.10006848533,0.100352166366,0.100281246107,0.101368690077,0.101628731026,0.101699651285,0.101628731026,0.101321409904,0.100919528437,0.101983332321,0.102314293529,0.103378097413,0.103519937931,0.10333081724,0.103354457326,0.103259896981,0.104040019829,0.103472657758,0.103661778448,0.103614498276,0.103638138362,0.103685418535,0.103472657758,0.10333081724,0.10359085819,0.104134580175,0.104181860347,0.104205500433,0.104158220261,0.104347340951,0.105080183627,0.105387504749,0.105434784921,0.106073067252,0.106214907769,0.106096707338,0.106711349582,0.10768059312,0.108342515537,0.108011554329,0.10794063407,0.108697116831,0.108555276314,0.108815317263,0.109831840974,0.109760920715,0.109169918558,0.109453599593,0.109926401319,0.110281002614,0.110588323736,0.111108405635,0.110872004772,0.111037485376,0.111604847447,0.113306933661,0.113496054351,0.114347097458,0.114536218149,0.114843539271,0.114678058667,0.114536218149,0.114867179357,0.116025543586,0.116782026348,0.117302108247,0.117112987556,0.117042067297,0.117633069455,0.118933274202,0.119027834547,0.120304399207,0.120517159984,0.120091638431,0.120706280674,0.121557323781,0.122124685853,0.122148325939,0.122644767752,0.123732211722,0.124110453102,0.124110453102,0.124937856123,0.124465054397,0.124772375519,0.125292457418,0.125032416468,0.125056056555,0.125174256986,0.126119860438,0.126143500525,0.125410657849,0.126308981129,0.126143500525,0.126734502682,0.126521741906,0.127207304408,0.127585545789,0.127727386307,0.126781782855,0.126852703114,0.126569022078,0.126852703114,0.126970903545,0.126639942337,0.126119860438,0.125859819489,0.12578889923,0.12578889923,0.125197897072,0.12425229362,0.123023009132,0.122833888442,0.122881168615,0.122621127665,0.121982845335,0.121368203091,0.12125000266,0.120446239725,0.11990251774,0.120233478948,0.120162558689,0.120280759121,0.120138918603,0.120067998344,0.119429716014,0.118885994029,0.118389552217,0.116687466003,0.116403784967,0.11574186255,0.115269060824,0.114110696595,0.113448774179,0.112834131935,0.112361330209,0.111155685807,0.110541043563,0.109240838816,0.108437075882,0.107751513379,0.106664069409,0.106569509064,0.105836666389,0.105269304317,0.104796502591,0.104040019829,0.104110940088,0.103425377585,0.102621614651,0.102030612493,0.101014088782,0.100328526279,0.100092125416,0.0991701620504,0.0996902439491,0.0981536383393,0.0970189141967,0.096191511176,0.0951513473785,0.0938984228044,0.09309465987,0.0920544960726,0.091699894778,0.0916289745191,0.0904469702038,0.0898323279599,0.0888867245077,0.0889576447666,0.0882011620048,0.0874210391567,0.0875628796746,0.0875628796746,0.0870191576895,0.0875865197609,0.0876810801061,0.0873737589841,0.0873737589841,0.0864045154456,0.0856716727701,0.0848206296632,0.0846787891453,0.0853170714756,0.0847969895768,0.084111427074,0.0840641469014,0.0834258645711,0.083260383967,0.0831421835355,0.0820547395654,0.0831658236218,0.0826457417231,0.0833549443122,0.0840405068151,0.0838750262109,0.0840405068151,0.0844896684549,0.0850097503536,0.0851043106988,0.0846315089727,0.0845605887138,0.085198871044,0.085269791303,0.0862153947552,0.0861681145826,0.086593636136,0.0862153947552,0.0862390348415,0.0862626749278,0.0862153947552,0.0857189529428,0.0852225111303,0.085506192166,0.0850097503536,0.0847024292316,0.0849861102673,0.0847969895768,0.0848442697495,0.0842532675918,0.0843241878507,0.084418748196,0.0838750262109,0.0839695865562,0.0839223063836,0.0834967848301,0.0839932266425,0.0829057826724,0.08240934086,0.081865618875,0.0817001382709,0.0813455369763,0.0807308947324,0.0801871727473,0.0796670908486,0.0799034917117,0.080470853783,0.080707254646,0.0800689723158,0.0800453322295,0.0793597697266,0.0789578882595,0.0784378063607,0.0792415692951,0.0788633279142,0.078532366706,0.0786978473101,0.078768767569,0.0786505671375,0.0786505671375,0.0783668861018,0.0788396878279,0.078461446447,0.0784141662744,0.078768767569,0.078461446447,0.0783668861018,0.0781068451525,0.078225045584,0.0786742072238,0.0786505671375,0.0783432460155,0.0783668861018,0.0778231641168,0.0774685628222,0.0777758839442,0.0774449227359,0.0778231641168,0.0780122848072,0.0789815283458,0.0789342481732,0.0788869680005,0.0782014054977,0.0779886447209,0.0781068451525,0.0780122848072,0.078225045584,0.0783196059292,0.0784378063607,0.0780359248936,0.0784850865334,0.0783432460155,0.0787451274827,0.0786032869649,0.0786505671375,0.0780832050662,0.0781068451525,0.0782014054977,0.0779650046346,0.0781304852388,0.0778468042031,0.0778940843757,0.0778231641168,0.077917724462,0.0776104033401,0.0778231641168,0.0773030822181,0.0776340434264,0.0771848817866,0.0772321619592,0.077917724462,0.0775158429948,0.076830280492,0.0767357201468,0.0766175197152,0.0762392783344,0.0764520391111,0.076830280492,0.0775158429948,0.0777758839442,0.077681323599,0.0775158429948,0.0773976425633,0.077066681355,0.0774449227359,0.0772794421318,0.0769012007509,0.0769012007509,0.0768539205783,0.0762629184207,0.0760265175576,0.0757901166946,0.0758373968672,0.0751991145369,0.0755537158315,0.0758373968672,0.0759319572124,0.0760265175576,0.0758846770398,0.0754827955726,0.0753645951411,0.0751754744506,0.0755773559178,0.0748681533287,0.0752463947095,0.0760028774713,0.075979237385,0.0761919981617,0.07652295937,0.0767830003194,0.0771612417003,0.0772558020455,0.0775394830811,0.0768066404057,0.0765702395426,0.0763101985933,0.0762392783344,0.0759083171261,0.0762629184207,0.0769957610961,0.0766175197152,0.0767120800605,0.0764283990248,0.0764283990248,0.0761447179891,0.0760737977302,0.0760501576439,0.0761919981617,0.0766411598015,0.0771848817866,0.0772794421318,0.0767830003194,0.077137601614,0.0774922029085,0.0782014054977,0.0783668861018,0.078768767569,0.0782723257566,0.078461446447,0.0793361296403,0.0794070498993,0.0795252503308,0.0792415692951,0.0795725305034,0.0795725305034,0.0793597697266,0.0792888494677,0.0787214873964,0.077917724462,0.0781777654114,0.0775394830811,0.0774685628222,0.0771848817866,0.0780359248936,0.0777995240305,0.0775867632538,0.0781068451525,0.0782723257566,0.0791942891225,0.0791706490362,0.0792415692951,0.0796907309349,0.0799980520569,0.0799744119706,0.0793361296403,0.0788160477416,0.0788633279142,0.0786742072238,0.0781304852388,0.0778231641168,0.0773267223044,0.078225045584,0.0780595649799,0.0778940843757,0.0774685628222,0.0772558020455,0.0771139615277,0.0769248408372,0.0770194011824,0.0760501576439,0.0764993192837,0.0766647998879,0.0763811188522,0.0764283990248,0.0766175197152,0.0766647998879,0.0774212826496,0.0780122848072,0.0777758839442,0.0768066404057,0.077066681355,0.0768066404057,0.0764047589385,0.0764520391111,0.0755300757452,0.0755300757452,0.0750572740191,0.0754591554863,0.075128194278,0.075671916263,0.0763101985933,0.0764520391111,0.0756009960041,0.0759319572124,0.0761447179891,0.0755300757452,0.0755537158315,0.0750809141054,0.0751991145369,0.0754827955726,0.0753645951411,0.0753645951411,0.0752463947095,0.0750099938465,0.0749154335013,0.0751991145369,0.0756246360904,0.0755537158315,0.0752463947095,0.0755300757452,0.0758373968672,0.0752227546232,0.0751045541917,0.0747972330697,0.0752227546232,0.0752936748821,0.0754118753137,0.0753882352274,0.0752463947095,0.0753645951411,0.0754827955726,0.0755064356589,0.0760028774713,0.0760501576439,0.0767120800605,0.0761683580754,0.0759555972987,0.0760028774713,0.0767830003194,0.0767357201468,0.0769012007509,0.0774922029085,0.0770903214413,0.0767830003194,0.0765465994563,0.0771139615277,0.0779413645483,0.0781068451525,0.0783668861018,0.0787214873964,0.0782014054977,0.0783196059292,0.0780359248936,0.0779886447209,0.0786269270512,0.0782486856703,0.0777995240305,0.078225045584,0.0780122848072,0.0775394830811,0.0779886447209,0.0788869680005,0.0786742072238,0.0791470089499,0.079076088691,0.0785087266197,0.0788160477416,0.0794543300719,0.0795488904171,0.0789815283458,0.0785796468786,0.0783668861018,0.0784141662744,0.0783905261881,0.0778231641168,0.0779650046346,0.0774922029085,0.0775394830811,0.0776104033401,0.0771848817866,0.0769484809235,0.0760737977302,0.0749627136739,0.0748445132423,0.074820873156,0.0745608322067,0.0752936748821,0.0747026727245,0.0742062309121,0.074040750308,0.0735679485819,0.0735206684093,0.0740880304806,0.0743244313436,0.0740171102217,0.0740171102217,0.0733551878051,0.0732842675462,0.0729769464242,0.072031342972,0.0717713020227,0.0717003817638,0.0718658623679,0.0717713020227,0.0713221403829,0.0715349011596,0.0719840627994,0.0723859442666,0.072031342972,0.0722677438351,0.0727641856475,0.0729296662516,0.0731660671147,0.0730005865105,0.0730005865105,0.073733429186,0.0743007912573,0.0746081123793,0.0753173149685,0.0755537158315,0.0752700347958,0.0756009960041,0.0755300757452,0.0765702395426,0.0768066404057,0.0766647998879,0.0769012007509,0.07652295937,0.0759319572124,0.0757901166946,0.075979237385,0.0756482761767,0.0759555972987,0.0759083171261,0.0755773559178,0.0755300757452,0.0757428365219,0.0758137567809,0.0751991145369,0.0745608322067,0.0747972330697,0.0749154335013,0.0748445132423,0.0751045541917,0.0754355154,0.0752936748821,0.074820873156,0.074820873156,0.0748445132423,0.0756009960041,0.0762392783344,0.0755773559178,0.0756246360904,0.0760265175576,0.0759319572124,0.0756955563493,0.0756482761767,0.0754827955726,0.0756955563493,0.0759083171261,0.0747735929834,0.075128194278,0.0753173149685,0.0756955563493,0.0760737977302,0.0758137567809,0.0757901166946,0.0761919981617,0.0761683580754,0.0757901166946,0.0764756791974,0.0770194011824,0.0771612417003,0.077681323599,0.0778940843757,0.0781304852388,0.0785796468786,0.0784378063607,0.0785560067923,0.0781777654114,0.0785560067923,0.0782959658429,0.0786269270512,0.0781777654114,0.0780359248936,0.0774212826496,0.0769248408372,0.0772085218729,0.077137601614,0.0763574787659,0.0763811188522,0.0767357201468,0.0769484809235,0.0772794421318,0.0770430412687,0.0758610369535,0.0760974378165,0.0763101985933,0.0762156382481,0.0764047589385,0.0765702395426,0.0765465994563,0.0770194011824,0.0771139615277,0.0769012007509,0.0770430412687,0.0764283990248,0.0765702395426,0.077066681355,0.0775158429948,0.0775867632538,0.0782486856703,0.0778940843757,0.0781068451525,0.0779886447209,0.0782014054977,0.0780832050662,0.0782959658429,0.0782959658429,0.0786269270512,0.078461446447,0.0784850865334,0.0793361296403,0.0794306899856,0.0798089313664,0.0803999335241,0.080163532661,0.0797852912801,0.079927131798,0.0796907309349,0.0794070498993,0.0801398925747,0.0816055779256,0.0811564162858,0.0811800563721,0.0814637374078,0.0811091361132,0.0813928171489,0.0808490951639,0.0809436555091,0.0814637374078,0.0820783796517,0.0819601792202,0.0819128990476,0.0816528580983,0.0809909356817,0.0808490951639,0.0799980520569,0.0797143710212,0.079312489554,0.079312489554,0.079383409813,0.0795252503308,0.0793597697266,0.0792415692951,0.0790051684321,0.0794779701582,0.0791942891225,0.078532366706,0.0786032869649,0.0778704442894,0.0777995240305,0.0779413645483,0.0778231641168,0.077681323599,0.0773267223044,0.0773503623907,0.0771848817866,0.0768066404057,0.0772085218729,0.0772558020455,0.0772085218729,0.0773030822181,0.0773503623907,0.077681323599,0.0774685628222,0.0775631231675,0.0766647998879,0.0768539205783,0.0765702395426,0.0761210779028,0.0761210779028,0.076286558507,0.077137601614,0.0772794421318,0.0775394830811,0.0777522438579,0.0774449227359,0.0775394830811,0.0784378063607,0.0785087266197,0.0788396878279,0.0782486856703,0.0790051684321,0.0790288085184,0.0792415692951,0.0794070498993,0.0793597697266,0.0795725305034,0.079312489554,0.0793361296403,0.0796907309349,0.0796907309349,0.079619810676,0.0793361296403,0.0769721210098,0.0747972330697,0.0725987050434,0.0704947373622,0.068390769681,0.0660740412231,0.0640882739735,0.0615587847388,0.0596439377481,0.0577054506711,0.0558142437666,0.0539466769485,0.0518190691811,0.0496205411547,0.0469019312296,0.0447506833758,0.0425285152631,0.0398808255969)
m <- c(0.0408083287476,0.0433896491399,0.0453373727086,0.0478013603558,0.050241881454,0.052400803964,0.0549117247092,0.0569533144741,0.0592295697291,0.0610130274547,0.0633127492588,0.0652839393765,0.0672081963962,0.0695079182003,0.0715025748671,0.0734972315339,0.0761254850242,0.0785425395734,0.078120141691,0.0778854762008,0.0771345466321,0.0771110800831,0.0773457455733,0.07694681424,0.0765244163576,0.0768294814949,0.0765009498086,0.0767356152988,0.0771345466321,0.0772518793772,0.0771814797302,0.077017213887,0.077017213887,0.0775100114165,0.0779793423969,0.0779793423969,0.0778150765537,0.0772284128282,0.0770406804361,0.07694681424,0.0770876135341,0.0772049462792,0.0767590818478,0.0770876135341,0.0767590818478,0.0770641469851,0.07694681424,0.0767825483968,0.0770876135341,0.0765948160047,0.0766886822007,0.0767825483968,0.0764774832596,0.0767121487498,0.076993747338,0.0773692121223,0.0775334779655,0.0776742772596,0.0773926786714,0.0781905413381,0.0786598723185,0.0786598723185,0.0788945378087,0.0787772050636,0.0784956064754,0.079176136397,0.0797628001225,0.0800209321617,0.0799270659656,0.0799505325147,0.0796924004754,0.0797393335735,0.0790588036519,0.0798331997696,0.0802086645539,0.0798331997696,0.0795516011813,0.0797393335735,0.0801147983578,0.0798801328676,0.080372930397,0.0805371962402,0.0806075958873,0.0807014620833,0.0802555976519,0.0808891944755,0.0807014620833,0.0808891944755,0.0807483951814,0.0798097332205,0.0796454673774,0.0797862666715,0.0797393335735,0.0801382649068,0.0807953282794,0.0815227912991,0.081452391652,0.0816166574952,0.0816166574952,0.0816870571422,0.0816166574952,0.0808891944755,0.080325997299,0.0799270659656,0.0808422613775,0.0802555976519,0.0809126610245,0.0809595941226,0.0811238599657,0.0802555976519,0.0804433300441,0.0805606627892,0.0802086645539,0.0799270659656,0.0801147983578,0.0800913318088,0.0804667965931,0.08030253075,0.0801617314559,0.0802086645539,0.080372930397,0.0797862666715,0.0795750677303,0.0792934691421,0.0787302719656,0.0791057367499,0.0790353371028,0.0785425395734,0.0788241381617,0.078049742044,0.0770406804361,0.0756561540438,0.0754684216516,0.0752572227105,0.0751164234163,0.074694025534,0.0751868230634,0.0746470924359,0.0744124269457,0.0748582913771,0.0748113582791,0.0748582913771,0.0746001593379,0.0741542949065,0.0748817579261,0.0753041558085,0.0755857543968,0.0754684216516,0.0754918882007,0.0755622878477,0.0754684216516,0.0752806892595,0.0746236258869,0.0743654938477,0.0744358934947,0.0748348248281,0.0748113582791,0.0750225572202,0.0754214885536,0.0755622878477,0.0766182825537,0.0768294814949,0.077017213887,0.0776977438086,0.0773926786714,0.0774396117694,0.0774161452204,0.0775804110635,0.0773926786714,0.0774630783184,0.076923347691,0.0772284128282,0.0773222790243,0.078096675142,0.0785190730244,0.078073208593,0.0768060149458,0.0774161452204,0.0776977438086,0.078120141691,0.0772753459263,0.0770406804361,0.0764305501615,0.0762897508674,0.0763366839654,0.075914286083,0.0754449551026,0.0751164234163,0.0750460237693,0.0751633565144,0.0752806892595,0.0753041558085,0.0754918882007,0.075867352985,0.0763132174164,0.0764774832596,0.0760081522791,0.0755153547497,0.0759377526321,0.0748348248281,0.0745766927888,0.0744828265928,0.0751868230634,0.0756561540438,0.0762897508674,0.0760081522791,0.0768294814949,0.0763601505144,0.0757030871419,0.0754214885536,0.0751164234163,0.0749286910242,0.0755153547497,0.0752806892595,0.074764425181,0.0746705589849,0.0748582913771,0.0749756241222,0.0750460237693,0.0754449551026,0.0754449551026,0.0751633565144,0.0752806892595,0.0757734867889,0.0753510889065,0.0754918882007,0.0754449551026,0.0749286910242,0.0750225572202,0.0745532262398,0.0739196294163,0.0739430959653,0.0735206980829,0.0740134956123,0.0729809674554,0.0737084304751,0.0738257632202,0.0741777614555,0.0739430959653,0.0738492297692,0.0735206980829,0.0733094991417,0.0734268318868,0.0738022966712,0.0745766927888,0.0743889603967,0.0744124269457,0.0748113582791,0.0755388212987,0.0752806892595,0.0752337561614,0.0750929568673,0.0754918882007,0.0757030871419,0.0752806892595,0.0752337561614,0.0756326874948,0.0765244163576,0.0763132174164,0.0761489515733,0.0766417491027,0.0767825483968,0.0763601505144,0.0762897508674,0.0756796205928,0.0757030871419,0.075867352985,0.0756326874948,0.0761724181223,0.0763601505144,0.0772988124753,0.0774630783184,0.0773222790243,0.0772753459263,0.0772518793772,0.0770641469851,0.0768764145929,0.0772753459263,0.0770876135341,0.0772049462792,0.0767356152988,0.0770641469851,0.0768529480439,0.0765244163576,0.0756561540438,0.0761958846713,0.0767825483968,0.076970280789,0.077017213887,0.0772753459263,0.0784486733773,0.078120141691,0.0774396117694,0.0771345466321,0.0777916100047,0.0780028089459,0.078049742044,0.0774630783184,0.0777212103577,0.0775569445145,0.0777681434557,0.07814360824,0.0776508107106,0.0775569445145,0.0771814797302,0.0770641469851,0.0764774832596,0.0764774832596,0.0765244163576,0.0762193512203,0.0763836170635,0.0765244163576,0.0766886822007,0.0764774832596,0.0761724181223,0.0760550853772,0.0765009498086,0.0764305501615,0.076970280789,0.0768529480439,0.0767121487498,0.0763601505144,0.0757030871419,0.0759846857301,0.0755622878477,0.0744828265928,0.073661497377,0.0740134956123,0.0749756241222,0.0752102896124,0.0746236258869,0.074764425181,0.0749990906712,0.0753510889065,0.0761020184752,0.0766886822007,0.0776508107106,0.0780028089459,0.0783078740832,0.0787068054165,0.0789180043577,0.0782844075342,0.0786833388675,0.0783313406322,0.0789414709068,0.0794812015342,0.0798097332205,0.0795046680833,0.0799739990637,0.0804667965931,0.0807249286324,0.0809595941226,0.0809830606716,0.0806310624363,0.0801147983578,0.0813350589069,0.0818982560834,0.0815931909461,0.0817339902403,0.0818278564363,0.0816870571422,0.0820625219266,0.0823675870638,0.0822267877697,0.0816166574952,0.0818747895344,0.0818278564363,0.0817105236912,0.0816401240442,0.0816870571422,0.0813819920049,0.0816401240442,0.0812411927108,0.080325997299,0.0802555976519,0.0798801328676,0.079199602946,0.0798801328676,0.0795750677303,0.0794108018872,0.079223069495,0.0791526698479,0.0783782737303,0.078049742044,0.0776273441616,0.0772518793772,0.076993747338,0.0775569445145,0.0772284128282,0.0783548071812,0.0787068054165,0.07814360824,0.0772988124753,0.0776273441616,0.0776977438086,0.0776038776126,0.0783782737303,0.0785894726714,0.0783078740832,0.0782140078871,0.0788006716126,0.0786364057695,0.0790353371028,0.0787302719656,0.0783313406322,0.0784486733773,0.07814360824,0.078049742044,0.0780262754949,0.0786129392205,0.0788476047107,0.0795281346323,0.0804433300441,0.0800443987107,0.080349463848,0.0805137296912,0.0806310624363,0.0801851980049,0.0804433300441,0.0810299937696,0.0812646592598,0.0813585254559,0.0818747895344,0.0811473265147,0.0811003934167,0.080349463848,0.0805371962402,0.0800913318088,0.0806779955343,0.0806310624363,0.0808422613775,0.0807483951814,0.0806075958873,0.0804433300441,0.0805371962402,0.0805841293382,0.0807014620833,0.0807483951814,0.0805137296912,0.0806310624363,0.0810534603187,0.0809595941226,0.0811238599657,0.0811238599657,0.0806075958873,0.0800913318088,0.0797862666715,0.0796454673774,0.0795750677303,0.0798801328676,0.0798331997696,0.0801617314559,0.0797393335735,0.0796220008284,0.0799035994166,0.0791526698479,0.0792700025931,0.0795985342793,0.0788241381617,0.0788241381617,0.0790822702009,0.0793638687891,0.0789649374558,0.0795516011813,0.0795985342793,0.0794342684362,0.0796689339264,0.0794577349852,0.0794577349852,0.0796454673774,0.0801617314559,0.0805371962402,0.0798097332205,0.0797862666715,0.0799270659656,0.0800443987107,0.0801851980049,0.0801851980049,0.0800209321617,0.0796220008284,0.0803963969461,0.0810065272206,0.081405458554,0.0812177261618,0.0810769268677,0.0812177261618,0.0815462578481,0.0812881258089,0.081475858201,0.0821563881226,0.0822267877697,0.0824614532599,0.0823675870638,0.0822267877697,0.0826491856521,0.0827899849462,0.082531852907,0.0822267877697,0.0826491856521,0.0822267877697,0.0822737208677,0.0820859884756,0.081405458554,0.0818747895344,0.0818747895344,0.0824614532599,0.0819686557305,0.0813115923579,0.0818747895344,0.0820390553775,0.0820859884756,0.082508386358,0.0826491856521,0.0831185166325,0.0834001152208,0.08365824726,0.0834001152208,0.0831889162796,0.0831889162796,0.0831889162796,0.0834705148678,0.0836113141619,0.0835409145149,0.0833297155737,0.0831185166325,0.0824379867109,0.0823441205148,0.0831654497305,0.0832123828286,0.0828838511423,0.0835174479659,0.0834939814168,0.0840102454953,0.0839163792992,0.083681713809,0.0837990465541,0.0838929127502,0.0840337120443,0.0844326433777,0.0842683775345,0.0843387771816,0.0838459796522,0.0846673088679,0.084737708515,0.0844795764757,0.0843387771816,0.0846438423189,0.0845030430247,0.0842683775345,0.0848785078091,0.0851601063973,0.0850897067503,0.084784641613,0.0851131732993,0.084808108162,0.0845499761228,0.0842683775345,0.0840806451424,0.0839633123973,0.0845734426718,0.0846673088679,0.0853478387895,0.0862630342013,0.0860049021621,0.0860518352601,0.0871547630641,0.0868496979268,0.0869200975739,0.0867558317308,0.0877648933387,0.0882342243191,0.0887504883976,0.0895718176133,0.0902758140839,0.0909328774565,0.0912614091428,0.091472608084,0.0924112700448,0.0916838070252,0.0924816696919,0.0935845974959,0.0937723298881,0.0935611309469,0.0940069953783,0.094828324594,0.0942416608685,0.0945467260057,0.0949456573391,0.0961659178882,0.095907785849,0.0967760481627,0.0980432418099,0.0986299055354,0.09924003581,0.0996859002414,0.0998032329865,0.100812294594,0.101680556908,0.101469357967,0.102408019928,0.103229349144,0.103769079771,0.104355743497,0.105341338555,0.105904535732,0.105974935379,0.106444266359,0.106749331497,0.10738292832,0.108204257536,0.108908254007,0.109518384281,0.110433579693,0.110785577928,0.11193543883,0.112569035654,0.112991433536,0.113531164164,0.114282093732,0.114892224007,0.114681025066,0.115572753929,0.115314621889,0.116347150046,0.116206350752,0.117238878909,0.117520477497,0.117379678203,0.118130607772,0.118130607772,0.118740738046,0.120031398243,0.121134326047,0.121486324282,0.121087392949,0.121674056674,0.122072988007,0.121908722164,0.122096454556,0.122894317223,0.123715646439,0.124208443968,0.124865507341,0.125686836557,0.125569503812,0.12561643691,0.125968435145,0.125592970361,0.12608576789,0.125944968596,0.126695898165,0.126930563655,0.126226567184,0.12655509887,0.126531632321,0.12608576789,0.126578565419,0.127235628792,0.127634560125,0.127399894635,0.126907097106,0.126930563655,0.127141762596,0.126883630557,0.126860164008,0.127634560125,0.127141762596,0.126203100635,0.125053239733,0.125053239733,0.125405237968,0.125170572478,0.124536975655,0.124724708047,0.124513509106,0.123598313694,0.123410581302,0.122565785537,0.121932188713,0.121791389419,0.121603657027,0.120711928164,0.119585533811,0.119749799654,0.118294873615,0.117731676439,0.117074613066,0.116722614831,0.116816481027,0.115924752164,0.115713553223,0.115995151811,0.114986090203,0.113695430007,0.113789296203,0.113108766281,0.113718896556,0.113460764517,0.113507697615,0.113460764517,0.112991433536,0.112052771575,0.111841572634,0.111278375458,0.111395708203,0.110433579693,0.110433579693,0.109659183575,0.109964248713,0.109095986399,0.109166386046,0.108908254007,0.107734926556,0.107687993458,0.107077863183,0.10595146883,0.105153606163,0.10498934032,0.105247472359,0.104449609693,0.104872007575,0.104825074477,0.103651747026,0.103158949496,0.102642685418,0.103464014634,0.103487481183,0.1030650833,0.103182416045,0.103370148438,0.103393614987,0.104285343849,0.103816012869,0.10332321534,0.10259575232,0.102478419575,0.101915222398,0.101610157261,0.101727490006,0.101985622045,0.10116429283,0.100812294594,0.101140826281,0.100530696006,0.0995920340453,0.0995920340453,0.0991931027119,0.0991227030648,0.099310435457,0.0990288368688,0.0990757699668,0.0987472382805,0.0989584372217,0.0986768386334,0.0983248403981,0.0988411044766,0.0986299055354,0.0984891062413,0.0987003051825,0.0988176379276,0.0991227030648,0.098137108006,0.0978085763197,0.0975269777314,0.0973861784373,0.0972688456922,0.0965883157706,0.0961424513392,0.095907785849,0.0953445886725,0.0953445886725,0.0947109918489,0.094875257692,0.0953211221234,0.0954384548685,0.0956261872607,0.0957435200058,0.0958373862019,0.0949456573391,0.094875257692,0.0949691238881,0.0945232594567,0.0943589936136,0.0937957964371,0.0935376643978,0.0932325992606,0.0927867348292,0.0926694020841,0.0923174038487,0.0922704707507,0.0918011397703,0.0911675429467,0.0911440763977,0.091519541182,0.0915664742801,0.0910971432997,0.0907686116134,0.0908390112604,0.0908155447114,0.0906747454173,0.090393146829,0.0902992806329,0.0898534162015,0.089266752476,0.089290219025,0.0896656838094,0.0894779514172,0.0898534162015,0.0899472823976,0.0895248845152,0.0891024866329,0.088093425025,0.0884454232603,0.0886800887505,0.088163824672,0.0878822260838,0.0873659620053,0.0872486292602,0.0872955623582,0.0871078299661,0.088093425025,0.0884923563583,0.0889382207897,0.0890320869858,0.0887974214956,0.0885392894564,0.0888208880446,0.0890086204368,0.0887270218485,0.088116891574,0.088163824672,0.0883750236132,0.0877414267896,0.0874598282014,0.0873424954563,0.0872016961622,0.0868262313778,0.0863803669464,0.0861926345543,0.0862630342013,0.085934502515,0.0857467701229,0.0856763704758,0.0851835729464,0.0847142419659,0.0846438423189,0.0849723740052,0.0855121046326,0.0846673088679,0.0843857102796,0.084808108162,0.0852539725934,0.0853009056915,0.0855355711817,0.0850662402012,0.0854417049856,0.0842918440836,0.0839867789463,0.0834470483188,0.0833062490247,0.0833062490247,0.0837755800051,0.0832123828286,0.0830481169854,0.0828603845933,0.0822502543187,0.0817105236912,0.0810769268677,0.0813819920049,0.0817809233383,0.0812881258089,0.0809830606716,0.0812646592598,0.0810769268677,0.081452391652,0.0805371962402,0.0800209321617,0.0798566663186,0.0799270659656,0.0803963969461,0.0804902631421,0.0800913318088,0.0791057367499,0.0793169356911,0.0798097332205,0.0795750677303,0.0796689339264,0.0789884040048,0.079223069495,0.079199602946,0.0795750677303,0.0792934691421,0.079176136397,0.0787302719656,0.0786598723185,0.0787772050636,0.0784956064754,0.0785425395734,0.0786598723185,0.0784486733773,0.0783313406322,0.0787537385146,0.0783548071812,0.0784252068283,0.0782140078871,0.0771345466321,0.0770876135341,0.0775334779655,0.0778385431028,0.0776742772596,0.0771345466321,0.0776273441616,0.0777681434557,0.07814360824,0.078049742044,0.0776038776126,0.077017213887,0.0768764145929,0.0770876135341,0.0765478829066,0.0761020184752,0.0756561540438,0.0749521575732,0.0753276223575,0.0750225572202,0.0739665625143,0.0730279005535,0.0730044340044,0.0726524357691,0.0727697685142,0.0723943037299,0.0718780396514,0.0716199076122,0.0712209762788,0.0711740431808,0.0715964410632,0.071385242122,0.0709393776906,0.0713148424749,0.07143217522,0.0712913759259,0.07143217522,0.0716199076122,0.0712444428279,0.0711036435337,0.071361775573,0.0718545731024,0.0718311065534,0.0723239040828,0.0717372403573,0.0714791083181,0.0716903072593,0.0717607069063,0.0722769709848,0.0723943037299,0.0723473706318,0.0721831047887,0.0724412368279,0.0731452332986,0.0732625660437,0.0730279005535,0.0732625660437,0.0738961628672,0.073614564279,0.0737318970241,0.0734502984358,0.0738257632202,0.0742012280045,0.0743654938477,0.0740369621614,0.0740369621614,0.0735676311809,0.073661497377,0.0743654938477,0.0742481611026,0.0745062931418,0.0744124269457,0.0746236258869,0.074717492083,0.0745297596908,0.0741777614555,0.0739665625143,0.0738961628672,0.073661497377,0.0733094991417,0.0737788301221,0.0741073618084,0.0738492297692,0.0735676311809,0.0733094991417,0.0734972315339,0.0737788301221,0.0739196294163,0.0737318970241,0.0737084304751,0.0742012280045,0.0742481611026,0.0749052244751,0.0744828265928,0.0749756241222,0.0753510889065,0.0752337561614,0.0753510889065,0.0759612191811,0.075914286083,0.0764070836125,0.0760081522791,0.0764540167105,0.0767590818478,0.0765948160047,0.0770406804361,0.0771580131812,0.0773222790243,0.0770406804361,0.076993747338,0.0775569445145,0.0778620096518,0.0778620096518,0.0772753459263,0.0772753459263,0.0771110800831,0.0767356152988,0.0763836170635,0.0762193512203,0.0763601505144,0.0765713494556,0.0759846857301,0.0756092209458,0.0757030871419,0.0755857543968,0.0756796205928,0.0751633565144,0.0752337561614,0.074740958632,0.0752806892595,0.0751164234163,0.0744124269457,0.0744124269457,0.0744828265928,0.07359109773,0.0730748336515,0.0726993688672,0.0734033653378,0.0733564322398,0.0730983002005,0.0726289692201,0.0721831047887,0.0721127051416,0.0716668407102,0.0721831047887,0.0722769709848,0.0720188389456,0.0718076400044,0.0719015062004,0.0721127051416,0.0723004375338,0.0723943037299,0.0726993688672,0.0722769709848,0.0724177702789,0.0730044340044,0.0726993688672,0.0728167016123,0.0733329656907,0.0733329656907,0.0734737649849,0.0737084304751,0.0735441646319,0.0735676311809,0.0735206980829,0.0734737649849,0.0739430959653,0.0744593600437,0.0751633565144,0.0750929568673,0.0753276223575,0.0756796205928,0.0761489515733,0.075914286083,0.0755622878477,0.0756561540438,0.075820419887,0.0761489515733,0.0757969533379,0.0756796205928,0.0757030871419,0.0750225572202,0.0751633565144,0.0755153547497,0.0757969533379,0.0762662843184,0.0756561540438,0.0757265536909,0.0753041558085,0.0762428177693,0.0768294814949,0.0772518793772,0.077017213887,0.0771110800831,0.0762428177693,0.0761724181223,0.0762662843184,0.0760316188282,0.0760316188282,0.0765478829066,0.0764305501615,0.0762662843184,0.0757734867889,0.0762428177693,0.075914286083,0.0759846857301,0.0766886822007,0.0768060149458,0.0766182825537,0.0761724181223,0.0761724181223,0.0763366839654,0.0763366839654,0.0759612191811,0.0763836170635,0.0763132174164,0.0763132174164,0.0766886822007,0.0763366839654,0.0766417491027,0.0760316188282,0.0756092209458,0.0760785519262,0.0763836170635,0.0763601505144,0.0760316188282,0.0755622878477,0.0755153547497,0.075843886436,0.0760785519262,0.0765244163576,0.077017213887,0.0776273441616,0.0771110800831,0.0771814797302,0.0764540167105,0.0767590818478,0.076923347691,0.0766652156517,0.0766886822007,0.0770641469851,0.0768764145929,0.0761724181223,0.0762662843184,0.0762193512203,0.0772753459263,0.0773692121223,0.0767356152988,0.0766652156517,0.0771345466321,0.0764774832596,0.0771814797302,0.0768529480439,0.0774630783184,0.0778854762008,0.0774630783184,0.0779089427498,0.078120141691,0.0778620096518,0.0772988124753,0.0777446769067,0.0775100114165,0.0772753459263,0.0763132174164,0.0757030871419,0.075843886436,0.0756561540438,0.0752572227105,0.0749286910242,0.0748817579261,0.0749286910242,0.0751868230634,0.0753276223575,0.0753980220046,0.0756092209458,0.0752806892595,0.0749756241222,0.0754449551026,0.0732625660437,0.0712913759259,0.069132453416,0.0663164675334,0.0642044781215,0.062421020396,0.0604263637292,0.0580797088271,0.0562962511015,0.0540903954935,0.0521896050228,0.0495848180814,0.0472146966303,0.0449384413753,0.0426856526693,0.0405032636103,0.0387902055318,0.0370536809042)
s <- c(0.0409793120887,0.0412252863509,0.0412252863509,0.0413482734821,0.0412867799165,0.0411391953592,0.0414958580394,0.0418033258672,0.0419386117114,0.041889416859,0.0419017155721,0.0417664297279,0.0417910271541,0.0414343644738,0.0418402220065,0.0420370014163,0.0418402220065,0.0416926374492,0.0417910271541,0.0419878065639,0.0418648194328,0.0421230924081,0.0422091833999,0.0422460795392,0.0422952743917,0.0420615988425,0.0423936640966,0.0422952743917,0.0423936640966,0.0423198718179,0.0418279232934,0.0417418323016,0.0418156245803,0.0417910271541,0.042000105277,0.0423444692441,0.0427257293506,0.0426888332112,0.042774924203,0.042774924203,0.0428118203424,0.042774924203,0.0423936640966,0.0420984949819,0.041889416859,0.0423690666703,0.0420615988425,0.0424059628097,0.0424305602359,0.0425166512277,0.0420615988425,0.0421599885474,0.042221482113,0.0420370014163,0.041889416859,0.0419878065639,0.0419755078508,0.0421722872606,0.0420861962688,0.0628833201409,0.0640393991734,0.0652323743453,0.0661178816893,0.0671140774514,0.0678765976643,0.0687744037215,0.0701149634507,0.0711726527783,0.0722180433928,0.0734848108433,0.0743703181874,0.0748130718594,0.075317319097,0.0762520212935,0.0773466067605,0.0786379716372,0.0796218686861,0.0798063493828,0.0796587648255,0.0793635957108,0.0795726738337,0.0791545175879,0.078945439465,0.0787855561945,0.0786010754979,0.0791053227355,0.0793635957108,0.0794373879895,0.0794373879895,0.0797448558173,0.079609569973,0.0798678429484,0.0798801416615,0.0794373879895,0.0792160111535,0.0795603751206,0.0797694532435,0.079830946809,0.0799662326533,0.0799785313664,0.0804335837515,0.0811961039645,0.0813805846611,0.0815035717923,0.0816388576365,0.0817003512021,0.0815035717923,0.0816388576365,0.0815035717923,0.0814912730792,0.0812207013907,0.0806549605875,0.0809132335629,0.0809501297022,0.0813805846611,0.0817864421938,0.0815281692185,0.081036220694,0.0810731168333,0.0811838052514,0.0811223116858,0.0805688695958,0.08070415544,0.0804212850384,0.0800523236451,0.0799785313664,0.0798801416615,0.0794250892764,0.0791545175879,0.079166816301,0.0793758944239,0.0794496867026,0.0795111802681,0.079609569973,0.0796710635386,0.0801384146368,0.0801384146368,0.0795726738337,0.0792406085797,0.0796218686861,0.0791176214486,0.0785518806454,0.0784165948012,0.0789085433257,0.0791545175879,0.0794127905632,0.0797079596779,0.08015071335,0.0797694532435,0.0793758944239,0.0792529072928,0.0789331407519,0.0787117639159,0.0792406085797,0.0791914137272,0.0789700368912,0.0789823356043,0.0794004918501,0.0793021021452,0.0792037124403,0.0796587648255,0.079720258391,0.0796341673993,0.0798063493828,0.0798555442353,0.0797571545304,0.0797694532435,0.0797571545304,0.0793389982846,0.0793021021452,0.0790069330306,0.0787486600552,0.0786010754979,0.0783059063832,0.0785764780716,0.0778139578587,0.0783182050963,0.0785395819323,0.0786871664896,0.0784411922274,0.0786010754979,0.0786625690634,0.0784780883667,0.0784903870799,0.0784411922274,0.0790684265961,0.0785395819323,0.0787117639159,0.0790930240223,0.0791545175879,0.0791791150141,0.0792160111535,0.0792037124403,0.079166816301,0.0791299201617,0.0791299201617,0.0792160111535,0.0795972712599,0.0797325571042,0.0795480764075,0.0797817519566,0.0798186480959,0.0798186480959,0.079277504719,0.0791176214486,0.0785887767848,0.078945439465,0.0791422188748,0.0790807253092,0.0794127905632,0.079388193137,0.0799539339402,0.0798924403746,0.0798678429484,0.0800769210713,0.0799908300795,0.0796218686861,0.079166816301,0.079056127883,0.0788593484732,0.0791176214486,0.0788962446125,0.0792898034321,0.0789823356043,0.0786256729241,0.0780107372685,0.0781952179652,0.0783428025225,0.0787117639159,0.0787117639159,0.0791791150141,0.0796341673993,0.0789946343174,0.0783428025225,0.0783059063832,0.0787363613421,0.0786379716372,0.0789823356043,0.0787486600552,0.0791914137272,0.0792160111535,0.0793144008584,0.0792283098666,0.0785887767848,0.0784165948012,0.0784042960881,0.0785149845061,0.0781952179652,0.0780353346947,0.0779738411292,0.077961542416,0.0781829192521,0.0783059063832,0.0788224523339,0.0788593484732,0.0788224523339,0.0788470497601,0.0789946343174,0.0787855561945,0.0793512969977,0.079056127883,0.0792406085797,0.0789946343174,0.078391997375,0.0782567115307,0.0782321141045,0.0774695938916,0.0767931646704,0.0773097106211,0.0780599321209,0.0782936076701,0.0778631527112,0.0779861398423,0.0778385552849,0.0783305038094,0.0785149845061,0.0789823356043,0.0793389982846,0.079720258391,0.0801138172106,0.0805442721695,0.0803597914729,0.0799293365139,0.0800154275057,0.0797940506697,0.0798924403746,0.0799170378008,0.0799908300795,0.0799416352271,0.0801630120631,0.0804089863253,0.0807410515793,0.0804704798909,0.080372090186,0.0804458824646,0.0800031287926,0.0813190910956,0.0817864421938,0.0818110396201,0.0820447151692,0.0822168971527,0.0820939100216,0.0824136765625,0.0827703392428,0.0827457418166,0.0823152868576,0.0824136765625,0.0826596508248,0.0827211443903,0.0828195340952,0.082684248251,0.0825612611199,0.0826473521117,0.0827457418166,0.0819832216036,0.0815527666447,0.0812944936694,0.0810854155465,0.0815773640709,0.0811100129727,0.0810977142596,0.0811346103989,0.0810116232678,0.0804950773171,0.080372090186,0.079720258391,0.0796833622517,0.0792529072928,0.0798432455222,0.0800523236451,0.0806549605875,0.0807287528662,0.0801876094893,0.079609569973,0.0801384146368,0.0804212850384,0.0804212850384,0.0807779477187,0.0809747271285,0.0808271425711,0.0809132335629,0.0814420782267,0.0814666756529,0.0818110396201,0.0815650653578,0.0812084026776,0.0812698962431,0.0814051820874,0.0811715065382,0.0812821949562,0.0817495460545,0.0824751701281,0.0829179238001,0.0834959633164,0.0832622877673,0.0837173401524,0.0841231976851,0.0844798603653,0.0845044577916,0.084996406316,0.0853161728569,0.0858204200945,0.0858204200945,0.0861278879223,0.0858327188076,0.0855621471192,0.0851808870127,0.0858081213814,0.0854391599881,0.0859557059388,0.085648238111,0.0858573162339,0.085869614947,0.0860049007912,0.0860417969305,0.0863861608977,0.0862754724797,0.0860417969305,0.086201680201,0.0857835239552,0.0861647840617,0.0870133952664,0.0869519017008,0.0869519017008,0.0874684476515,0.0870625901188,0.0869519017008,0.0868535119959,0.086865810709,0.0870748888319,0.0871855772499,0.0878866038973,0.0880833833071,0.0878620064711,0.088181773012,0.0882186691513,0.0878866038973,0.0877759154793,0.0878374090449,0.0878743051842,0.088071084594,0.0886122279709,0.0889319945118,0.0884769421267,0.0888827996594,0.0890795790692,0.0890426829298,0.0889811893643,0.0886614228234,0.0887721112414,0.088735215102,0.0889688906512,0.0891041764954,0.0891656700609,0.0892148649134,0.0897560082903,0.0898052031428,0.0894608391756,0.0894116443232,0.0890549816429,0.0887598125283,0.0890426829298,0.0892271636265,0.0893378520445,0.0892640597658,0.0889688906512,0.0892394623396,0.0891041764954,0.0889319945118,0.089387046897,0.0894854366019,0.0895223327412,0.0897806057165,0.0898666967083,0.0898543979952,0.0898420992821,0.0900880735443,0.089829800569,0.0894608391756,0.0897068134379,0.0897806057165,0.089387046897,0.0896453198723,0.0892394623396,0.0897683070034,0.0897683070034,0.0904816323639,0.0900880735443,0.0897314108641,0.0900265799788,0.090051177405,0.0899896838394,0.0902356581017,0.0901372683968,0.0904570349377,0.0908136976179,0.090825996331,0.0910104770277,0.0911211654457,0.0909858796015,0.0910596718802,0.0910965680195,0.0912318538637,0.0912072564375,0.0910965680195,0.0907645027655,0.0902479568148,0.0901495671099,0.0904447362246,0.0908136976179,0.0909366847491,0.0916131139702,0.0913056461424,0.0914532306998,0.0916746075358,0.0914655294129,0.0916377113964,0.0919697766505,0.0920189715029,0.0927445955765,0.0927691930027,0.0925724135929,0.0923018419045,0.0927568942896,0.0929413749863,0.0927076994372,0.0928429852814,0.0930643621174,0.0929413749863,0.093347232519,0.0939375707483,0.0942450385761,0.0944664154122,0.0946139999695,0.0949091690842,0.0952289356251,0.0951428446333,0.0952904291907,0.0953150266169,0.0951797407726,0.0956347931578,0.0957454815758,0.0963358198052,0.0972090284361,0.0973566129934,0.0969138593214,0.0977870679524,0.0973812104197,0.0976148859688,0.0976763795344,0.0981683280588,0.0989800431242,0.0993859006569,0.0998532517551,0.100185317009,0.100369797706,0.100332901567,0.100997032075,0.101661162583,0.101833344566,0.102325293091,0.102804942902,0.10291563132,0.10275574805,0.103395281131,0.103530566976,0.103321488853,0.103456774697,0.103678151533,0.104342282041,0.104096307779,0.104477567885,0.105276984237,0.105867322467,0.106211686434,0.106457660696,0.106494556836,0.107121791204,0.107958103696,0.108007298548,0.108523844499,0.109286364712,0.109643027392,0.109889001654,0.110725314146,0.111524730498,0.111905990605,0.111979782883,0.112102770015,0.112828394088,0.113185056768,0.113689304006,0.114537915211,0.114980668883,0.114857681752,0.115607903251,0.116185942768,0.1165918003,0.117034553972,0.11769868448,0.11789546389,0.117870866464,0.118633386677,0.119383608177,0.120023141259,0.120392102652,0.121031635734,0.121339103562,0.121179220291,0.121498986832,0.121671168816,0.122593572299,0.12366356034,0.124512171544,0.124598262536,0.124352288274,0.12496722393,0.125852731274,0.125815835134,0.126578355347,0.127107200011,0.127316278134,0.12789431765,0.128681435289,0.129407059363,0.12935786451,0.129640734912,0.130390956412,0.130390956412,0.130649229387,0.131005892067,0.131153476625,0.131436347026,0.131337957321,0.131374853461,0.131374853461,0.131202671477,0.131952892977,0.132309555657,0.132137373674,0.132481737641,0.132137373674,0.132457140215,0.132457140215,0.132678517051,0.132862997747,0.133342647559,0.132592426059,0.132137373674,0.131387152174,0.131534736731,0.131780710994,0.131485541879,0.130882904936,0.130846008797,0.13069842424,0.130218774428,0.129812916896,0.128878214699,0.127906616363,0.12773443438,0.127660642101,0.127058005159,0.126135601675,0.125901926126,0.125077912348,0.124364586987,0.123737352618,0.123725053905,0.123737352618,0.123331495086,0.123147014389,0.123257702807,0.122396792889,0.121437493266,0.121228415144,0.119986245119,0.120158427103,0.119678777291,0.119457400455,0.118830166087,0.118239827857,0.117428112792,0.117071450112,0.116149046628,0.115890773653,0.114710097194,0.114291940948,0.113529420736,0.113123563203,0.112619315965,0.112274951998,0.111844497039,0.110983587121,0.110565430876,0.110282560474,0.109335559564,0.108499247073,0.108105688253,0.107712129434,0.106937310508,0.107035700212,0.106531452975,0.106187089008,0.10512939968,0.104268489762,0.104268489762,0.103739645098,0.102866436468,0.102509773787,0.102067020115,0.101894838132,0.102325293091,0.101464383173,0.100886343657,0.100013135026,0.0999885375994,0.0992998096651,0.098734068862,0.0988693547062,0.0990046405504,0.0982913151899,0.098402003608,0.098623380444,0.0981437306326,0.0976517821081,0.0971475348705,0.0965571966412,0.0960775468298,0.096102144256,0.0962866249527,0.0960406506905,0.0955118060267,0.0955978970184,0.0951182472071,0.0948476755186,0.0950567536415,0.0943803244204,0.094884571658,0.0947246883875,0.0951551433464,0.0956716892971,0.0950690523546,0.0949829613629,0.0950690523546,0.0952658317644,0.0952535330513,0.0946508961088,0.0943803244204,0.0945894025433,0.0943311295679,0.0948230780924,0.0944664154122,0.09477388324,0.0948107793793,0.094884571658,0.094995260076,0.0950321562153,0.0948230780924,0.0940974540188,0.0942081424368,0.0939990643139,0.0936055054943,0.0936669990599,0.0932734402403,0.0931627518223,0.092695400724,0.0924986213143,0.0924863226011,0.0920189715029,0.0920435689291,0.0917729972407,0.0912195551506,0.0914655294129,0.0910965680195,0.0908628924704,0.0903340478066,0.0900757748312,0.0899281902739,0.0895961250199,0.0892394623396,0.0888213060938,0.0888950983725,0.088956591938,0.0887721112414,0.0884523447005,0.0886368253971,0.088181773012,0.0881694742989,0.0879480974629,0.0881448768727,0.0877267206269,0.0870256939795,0.0872962656679,0.0874561489384,0.0871240836844,0.086976499127,0.0865583428812,0.0867428235779,0.0865706415943,0.0864476544632,0.0871486811106,0.0871978759631,0.0873823566597,0.0872962656679,0.0872347721024,0.0873331618073,0.0874684476515,0.087406954086,0.0872716682417,0.0866690312992,0.0865091480288,0.0867797197172,0.0862754724797,0.0863246673321,0.0863615634714,0.0867920184304,0.0865706415943,0.086312368619,0.0858573162339,0.0857835239552,0.0856728355372,0.0855252509798,0.0855990432585,0.0853899651356,0.0852054844389,0.0849595101767,0.0853653677094,0.0855744458323,0.0853407702832,0.0851193934471,0.0853653677094,0.0853038741438,0.0853407702832,0.0855129522667,0.0851439908734,0.0854268612749,0.0846766397751,0.0845413539309,0.08422158739,0.0841969899638,0.0840371066933,0.0843937693735,0.0838280285704,0.0839141195622,0.0835820543082,0.0832868851935,0.0833606774722,0.0828195340952,0.0826227546854,0.0827826379559,0.082462871415,0.0821062087347,0.0823644817101,0.082462871415,0.083016313505,0.0826719495379,0.082352182997,0.0821800010134,0.0821554035872,0.0822291958659,0.0824751701281,0.0821800010134,0.0814666756529,0.0815773640709,0.0818110396201,0.0813805846611,0.0813067923825,0.0808271425711,0.0809747271285,0.0806303631613,0.0810116232678,0.0810116232678,0.0809993245547,0.080814843858,0.08070415544,0.0805565708826,0.0803474927597,0.0802737004811,0.0805442721695,0.0800646223582,0.0801999082024,0.080814843858,0.080593467022,0.0807410515793,0.0808025451449,0.080372090186,0.0805442721695,0.0808271425711,0.0811346103989,0.0806672593007,0.080261401768,0.0803843888991,0.0804212850384,0.0804458824646,0.0805811683089,0.0807287528662,0.0802245056286,0.0801999082024,0.0801630120631,0.0798801416615,0.079498881555,0.0792283098666,0.0788470497601,0.0791176214486,0.0791914137272,0.0789208420388,0.0784780883667,0.0782075166783,0.0782075166783,0.0784534909405,0.0786256729241,0.0784411922274,0.0785149845061,0.0780476334078,0.0781214256865,0.0787978549077,0.078724062629,0.0785518806454,0.0786010754979,0.078834751047,0.0787609587683,0.078724062629,0.0787855561945,0.0782936076701,0.0778016591456,0.0780722308341,0.0779984385554,0.0779492437029,0.0780599321209,0.0781952179652,0.0779369449898,0.0779369449898,0.0782444128176,0.0786010754979,0.0791422188748,0.0791053227355,0.079056127883,0.0794250892764,0.0799539339402,0.0800031287926,0.0795480764075,0.0794004918501,0.0797571545304,0.0795111802681,0.0792898034321,0.0789823356043,0.0789208420388,0.0795849725468,0.0795849725468,0.0793266995715,0.0791053227355,0.0787486600552,0.078724062629,0.0789946343174,0.0789823356043,0.078613374211,0.0787978549077,0.0789946343174,0.0788962446125,0.0788224523339,0.0787363613421,0.0786502703503,0.0790069330306,0.0791914137272,0.0788839458994,0.0786256729241,0.0789331407519,0.0786625690634,0.0783059063832,0.0781952179652,0.0778139578587,0.077961542416,0.0777893604325,0.0779000488505,0.0777155681538,0.0782567115307,0.078613374211,0.0790315304568,0.0783673999487,0.0787978549077,0.0791053227355,0.078724062629,0.0787978549077,0.0788716471863,0.0789085433257,0.0793144008584,0.0790438291699,0.079277504719,0.0793758944239,0.079166816301,0.0793512969977,0.0795603751206,0.0798678429484,0.0796833622517,0.079498881555,0.0799416352271,0.080261401768,0.0799416352271,0.0795726738337,0.0794127905632,0.0795480764075,0.079388193137,0.0792652060059,0.079166816301,0.079166816301,0.0793389982846,0.0790930240223,0.0789085433257,0.0792160111535,0.0791791150141,0.0795726738337,0.0790192317437,0.078945439465,0.0787117639159,0.0794004918501,0.0792898034321,0.0790069330306,0.0793144008584,0.0791422188748,0.0785149845061,0.0781214256865,0.0782198153914,0.0790192317437,0.0790807253092,0.0790807253092,0.0790192317437,0.0785149845061,0.0785395819323,0.0781583218258,0.0784042960881,0.0787855561945,0.0784534909405,0.0781091269734,0.0783796986619,0.0783796986619,0.0782321141045,0.0785149845061,0.0791422188748,0.0788101536208,0.0791299201617,0.0794004918501,0.078945439465,0.079166816301,0.0797694532435,0.0798186480959,0.0795972712599,0.0795111802681,0.0793144008584,0.0793512969977,0.0793144008584,0.0789946343174,0.0793144008584,0.0793389982846,0.0797325571042,0.0797325571042,0.0796341673993,0.0796956609648,0.0794865828419,0.0787855561945,0.0785395819323,0.0785764780716,0.0785272832192,0.0790807253092,0.0785887767848,0.0782690102438,0.0781952179652,0.0775925810227,0.0776417758751,0.0781214256865,0.078391997375,0.0784780883667,0.0781583218258,0.077850853998,0.0775925810227,0.0779246462767,0.07774016558,0.0778262565718,0.0776663733014,0.0778016591456,0.077297411908,0.0770268402195,0.07718672349,0.077297411908,0.0775064900309,0.0775925810227,0.0776540745883,0.0778262565718,0.0776540745883,0.0780230359816,0.0777647630063,0.0778016591456,0.0785518806454,0.0789085433257,0.0789700368912,0.0791053227355,0.0792283098666,0.079166816301,0.0793389982846,0.0791053227355,0.0798678429484,0.0799539339402,0.0798801416615,0.0801999082024,0.0798186480959,0.0796710635386,0.079277504719,0.0791545175879,0.0792283098666,0.0795480764075,0.0795111802681,0.079166816301,0.0788962446125,0.0789823356043,0.0791914137272,0.0789946343174,0.0788962446125,0.079277504719,0.0796587648255,0.0793512969977,0.0795234789813,0.0793144008584,0.0794004918501,0.0792406085797,0.0791053227355,0.0791299201617,0.079720258391,0.0799539339402,0.0792406085797,0.0793144008584,0.079498881555,0.0800031287926,0.0799293365139,0.0795726738337,0.0794496867026,0.0798063493828,0.0795726738337,0.0793512969977,0.0793635957108,0.0797817519566,0.0801999082024,0.0801753107762,0.0802737004811,0.080372090186,0.0804458824646,0.0801384146368,0.0801753107762,0.0804089863253,0.0805688695958,0.0801384146368,0.0800892197844,0.0802737004811,0.0802982979073,0.0803228953335,0.0800769210713,0.0801138172106,0.0799416352271,0.0802737004811,0.0802122069155,0.0804212850384,0.0802982979073,0.0800523236451,0.0795726738337,0.0795603751206,0.0785641793585,0.0774941913178,0.0759568521788,0.0744933053185,0.0735709018351,0.0727468880566,0.0718736794257,0.0705208209834,0.0689711831313,0.0679380912299,0.0670525838858,0.065638231878,0.0644944515586,0.0633875673785,0.0621945922066,0.0612967861495,0.0604481749448,0.0594273817565,0.0400815060315,0.0397617394906,0.0398355317693,0.0400938047446,0.0403274802938,0.0403643764331,0.0407087404002,0.0405242597036,0.0406349481216,0.040573454556,0.040684142974,0.0406226494085,0.0407333378265,0.0407333378265,0.04090551981,0.0408194288182,0.0408317275314,0.0412744812034,0.0413236760558,0.0415204554656,0.0418279232934,0.0417049361623,0.0415081567525,0.0415819490312,0.0414589619001,0.0413113773427,0.0416926374492,0.0424551576621,0.042221482113,0.0422337808261,0.0423813653835,0.0421968846868,0.0423444692441,0.0420615988425,0.042110793695,0.0423813653835,0.0427011319244,0.0426396383588,0.0426150409326,0.0424797550883,0.0421353911212,0.0420615988425,0.0416188451705,0.0414712606132,0.0412621824903,0.0412621824903,0.0412990786296,0.0413728709083,0.0412867799165,0.0412252863509,0.0411022992198,0.0413482734821,0.0412006889247,0.0408563249576,0.0408932210969,0.0405119609904,0.0404750648511,0.0405488571298,0.0404873635642)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("5-organelles-nucleus-merged/gSOC1-GFP-replicate-1-GSM1116506.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=119"),bty="n")
dev.off()