# R script for Peak Model
#  -- generated by MACS
p <- c(0.0202845734952,0.0221338793409,0.0235208587252,0.024445511648,0.0252545829555,0.0263526083014,0.0280285417241,0.0296466843391,0.0305135464543,0.0320161074539,0.0326518063384,0.0336920408766,0.0343277397611,0.0361770456068,0.0375640249911,0.0384308871062,0.0390665859907,0.0392399584137,0.0389510043753,0.0392399584137,0.0392399584137,0.0397600756828,0.0398756572982,0.0403957745673,0.0406847286057,0.0407425194134,0.0405113561827,0.0398756572982,0.0398178664905,0.0397022848752,0.0397022848752,0.0400490297212,0.0398178664905,0.0397600756828,0.0398178664905,0.0386620503369,0.0385464687216,0.0387198411446,0.0391243767984,0.0391821676061,0.0387198411446,0.0378529790294,0.0380841422602,0.0375640249911,0.0379685606448,0.0383153054909,0.0391243767984,0.0383730962986,0.0384886779139,0.0386620503369,0.039008795183,0.0389510043753,0.0388932135677,0.0394133308368,0.0391243767984,0.0384886779139,0.0382575146832,0.0384308871062,0.0382575146832,0.0380263514525,0.0377951882218,0.0376796066064,0.0374484433757,0.0375062341834,0.037390652568,0.037217280145,0.0375062341834,0.0384886779139,0.0379685606448,0.0383730962986,0.0379107698371,0.0380841422602,0.037390652568,0.0378529790294,0.0380263514525,0.0385464687216,0.0383730962986,0.0383730962986,0.0386620503369,0.0387776319523,0.0379685606448,0.0381997238755,0.0381419330678,0.0387198411446,0.0384308871062,0.0376796066064,0.0382575146832,0.0378529790294,0.0382575146832,0.0381997238755,0.0383730962986,0.0376218157987,0.0379107698371,0.0386042595293,0.0384886779139,0.0385464687216,0.0394133308368,0.0400490297212,0.040453565375,0.0403379837596,0.0398756572982,0.0393555400291,0.0400490297212,0.0398756572982,0.0402224021443,0.0399912389136,0.0410892642594,0.0407425194134,0.040453565375,0.0402801929519,0.0403957745673,0.0405691469903,0.0406847286057,0.0406847286057,0.0408003102211,0.0406847286057,0.0409158918364,0.0406847286057,0.0413782182978,0.0417249631439,0.0423028712207,0.0420139171823,0.0421294987977,0.0424762436437,0.0427651976821,0.0432853149512,0.0428807792975,0.0435164781819,0.0443255494894,0.0450768299893,0.0443833402971,0.043863223028,0.0442677586818,0.0439788046434,0.0444411311048,0.0437476414127,0.043689850605,0.0440365954511,0.0440365954511,0.0446145035278,0.0440943862587,0.0439788046434,0.043689850605,0.0440943862587,0.0449612483739,0.0451346207969,0.0453657840277,0.0457125288737,0.0465793909889,0.0474462531041,0.0472150898734,0.0475040439118,0.0477352071425,0.0475618347194,0.0472150898734,0.0481397427962,0.0480241611809,0.048717650873,0.0486598600653,0.04854427845,0.0486598600653,0.0477352071425,0.046926135835,0.047099508258,0.0477352071425,0.0479085795655,0.0474462531041,0.0487754416807,0.0498734670266,0.0507403291418,0.0510870739878,0.0517227728723,0.0518383544877,0.0518961452953,0.0531097522566,0.0538610327564,0.0544967316409,0.0549012672946,0.0547856856793,0.0548434764869,0.0545545224486,0.0538032419487,0.0539188235641,0.0527630074105,0.0531097522566,0.0530519614489,0.0536876603334,0.0537454511411,0.0540921959871,0.0542655684102,0.0542077776025,0.0540344051794,0.0543811500255,0.0544389408332,0.0546701040639,0.055363593756,0.0562882466789,0.0563460374866,0.0564038282943,0.0564616191019,0.0575596444478,0.0570395271787,0.0561148742559,0.056634991525,0.0565772007173,0.0565194099096,0.0570973179864,0.0576752260632,0.0570395271787,0.0573862720248,0.0581375525246,0.0585420881784,0.0594667411012,0.0596401135243,0.0601602307934,0.0612004653316,0.0613160469469,0.063454306831,0.063454306831,0.0635698884464,0.0627608171389,0.0636854700618,0.0640322149078,0.0640322149078,0.0641477965232,0.0640900057155,0.0640322149078,0.0651880310614,0.0658815207535,0.0664594288303,0.0669217552918,0.0674996633685,0.0671529185225,0.0685398979068,0.068308734676,0.0688866427528,0.0700424589064,0.0705047853678,0.0710826934446,0.0709093210216,0.0714294382907,0.0718339739444,0.0727008360596,0.0725274636366,0.0733365349441,0.0744923510976,0.0741456062516,0.0743189786746,0.0748390959437,0.0749546775591,0.0758215396743,0.0754170040205,0.0754170040205,0.0763416569434,0.0769195650201,0.0776130547123,0.077844217943,0.0777864271353,0.0794045697503,0.079288988135,0.0791734065196,0.079288988135,0.0804448042885,0.08090713075,0.0813116664037,0.08090713075,0.0829875998264,0.0817739928651,0.0821207377112,0.0826408549803,0.0829875998264,0.082698645788,0.0818895744805,0.0832765538648,0.0832765538648,0.0832765538648,0.0833921354801,0.0834499262878,0.0832187630571,0.0823519009419,0.082525273365,0.0834499262878,0.082872018211,0.0832187630571,0.0826408549803,0.0831609722494,0.0850102780951,0.0859927218257,0.0865706299025,0.0876108644407,0.0873219104023,0.0897491243248,0.0896913335171,0.0915984301705,0.0944301797467,0.0952970418619,0.0965684396309,0.0967418120539,0.0971463477076,0.098880071938,0.0996313524378,0.10107612263,0.102694265245,0.103792290591,0.10356112736,0.105410433206,0.107086366628,0.10604613209,0.106566249359,0.106450667744,0.10754869309,0.108242182782,0.109051254089,0.109686952974,0.110611605897,0.111709631243,0.112749865781,0.11425242678,0.116332895857,0.116564059088,0.116737431511,0.116101732626,0.117430921203,0.11748871201,0.119164645433,0.119338017856,0.120551624817,0.120840578856,0.120667206433,0.120667206433,0.121071742087,0.120956160471,0.120840578856,0.119800344318,0.119626971895,0.120667206433,0.120320461587,0.120840578856,0.122169767432,0.121360696125,0.121938604202,0.124076864086,0.12471256297,0.125752797509,0.126157333162,0.127313149316,0.12771768497,0.128989082739,0.129104664354,0.127833266585,0.129220245969,0.129740363238,0.129971526469,0.130722806969,0.130144898892,0.129855944854,0.130722806969,0.130318271315,0.130144898892,0.129220245969,0.129104664354,0.129913735661,0.129624781623,0.129798154046,0.129913735661,0.1302026897,0.130780597777,0.132109786353,0.132803276045,0.134305837045,0.134305837045,0.133150020891,0.134363627853,0.135230489968,0.136501887737,0.137484331467,0.137542122275,0.138235611967,0.139102474082,0.13916026489,0.139622591351,0.140373871851,0.141818642043,0.144823764042,0.145921789388,0.146095161811,0.146788651504,0.147077605542,0.148464584926,0.151238543695,0.150776217233,0.152278778233,0.153723548425,0.155283900232,0.155515063463,0.155977389924,0.156497507194,0.158635767078,0.158866930308,0.160138328077,0.162218797154,0.16354798573,0.16354798573,0.162912286846,0.164472638653,0.16655310773,0.16678427096,0.169327066498,0.16903811246,0.169327066498,0.171696489613,0.173661377074,0.174354866766,0.175626264535,0.17724440715,0.177359988765,0.179382667034,0.179209294611,0.179960575111,0.180538483188,0.180769646419,0.182445579841,0.183543605187,0.183774768418,0.186548727186,0.187126635263,0.188918150301,0.19018954807,0.191460945839,0.193368042492,0.194350486223,0.195448511569,0.196488746107,0.198106888722,0.198280261145,0.199782822145,0.200765265875,0.201285383144,0.202903525759,0.203943760298,0.205215158067,0.204174923528,0.205561902913,0.206313183412,0.206313183412,0.206313183412,0.206948882297,0.207064463912,0.207237836335,0.208278070873,0.206486555835,0.208046907643,0.206255392605,0.209029351373,0.21110982045,0.211225402065,0.211976682565,0.212150054988,0.211572146911,0.213074707911,0.213479243565,0.213248080334,0.214288314872,0.213132498718,0.213421452757,0.213305871142,0.213074707911,0.213479243565,0.214461687295,0.214461687295,0.215675294256,0.215501921833,0.214924013757,0.21532854941,0.21434610568,0.215444131026,0.215212967795,0.216484365564,0.216946692025,0.217351227679,0.219142742717,0.221223211793,0.221454375024,0.22104983937,0.222667981985,0.223130308447,0.227753573061,0.225962058023,0.224632869447,0.224864032677,0.223823798139,0.224575078639,0.223823798139,0.224228333793,0.22405496137,0.224864032677,0.225499731562,0.22752240983,0.227695782253,0.228389271946,0.229140552445,0.229429506484,0.228215899523,0.228851598407,0.228620435176,0.229082761638,0.22902497083,0.227117874177,0.227984736292,0.227926945484,0.227406828215,0.227060083369,0.226482175292,0.225441940754,0.222205655524,0.220703094524,0.220356349678,0.220414140486,0.218795997871,0.218391462217,0.21683111041,0.216773319602,0.217177855256,0.216888901218,0.218507043833,0.217640181717,0.216599947179,0.215444131026,0.214692850526,0.213652615988,0.212496799834,0.209838422681,0.210705284796,0.208393652489,0.207468999566,0.206602137451,0.206602137451,0.204059341913,0.201805500413,0.201285383144,0.201054219914,0.200996429106,0.199204914068,0.199089332453,0.198973750837,0.197297817415,0.195795256415,0.194061532185,0.194350486223,0.193368042492,0.192732343608,0.191345364224,0.192096644723,0.191345364224,0.18920710434,0.18845582384,0.187588961725,0.187068844455,0.184641630533,0.184352676495,0.185681865071,0.185913028302,0.184179304072,0.185739655879,0.184988375379,0.185739655879,0.184526048918,0.18446825811,0.184583839725,0.184757212148,0.18446825811,0.185103956994,0.186433145571,0.186259773148,0.184121513264,0.183543605187,0.183485814379,0.182850115495,0.182156625803,0.181405345303,0.181636508534,0.182561161457,0.181752090149,0.180596273995,0.17972941188,0.179151503804,0.177128825535,0.175452892112,0.173488004651,0.17152311719,0.169095903267,0.166379735307,0.165455082384,0.164183684615,0.161929843115,0.158924721116,0.157248787693,0.154243665694,0.15210540581,0.149331447041,0.149389237849,0.148233421695,0.144650391619,0.142685504158,0.141182943159,0.138813520044,0.136501887737,0.134941535929,0.134248046237,0.133381184122,0.130607225354,0.12771768497,0.125983960739,0.124770353778,0.123094420355,0.121823022586,0.120031507548,0.119222436241,0.117546502818,0.117084176357,0.115928360203,0.114888125665,0.114656962434,0.114079054357,0.113443355473,0.113443355473,0.112692074973,0.110958350743,0.110553815089,0.110264861051,0.109860325397,0.108473346013,0.108415555205,0.107837647128,0.104716943514,0.103272173322,0.103734499783,0.103387754937,0.101538449091,0.100787168591,0.100035888092,0.0992846075917,0.0987644903226,0.0977242557844,0.0985333270919,0.0973197201307,0.0967996028616,0.0957015775157,0.0948925062082,0.0940834349007,0.0937944808623,0.09385227167,0.0936788992469,0.0934477360162,0.0922919198626,0.090962731286,0.0896913335171,0.0898069151325,0.0888244714019,0.0874374920176,0.0866284207101,0.0869751655562,0.085761558595,0.0847791148644,0.0839122527493,0.0834499262878,0.0825830641726,0.0820629469035,0.0824674825573,0.0821207377112,0.0811382939807,0.0790000340966,0.0798668962118,0.0785377076351,0.0779020087507,0.0775552639046,0.0769195650201,0.0767461925971,0.076226075328,0.0770351466355,0.0769773558278,0.0762838661357,0.0766884017894,0.0758215396743,0.0758793304819,0.0743767694823,0.0732209533287,0.0717183923291,0.0722385095982,0.071545019906,0.0718339739444,0.0714294382907,0.0718339739444,0.0730475809057,0.072816417675,0.0717761831368,0.07119827506,0.0706781577909,0.0703314129448,0.0692911784066,0.0685398979068,0.0684243162914,0.0674418725609,0.0676730357916,0.0674996633685,0.0676730357916,0.0664594288303,0.0662282655996,0.0654191942921,0.0645523321769,0.0642055873309,0.0637432608694,0.0640322149078,0.0629341895619,0.0621829090621,0.0624718631005,0.0627030263312,0.0620095366391,0.06148941937,0.0609115112932,0.0607381388702,0.0597556951396,0.0585420881784,0.0589466238321,0.0586576697937,0.0573862720248,0.056808363948,0.0555369661791,0.055190221333,0.0545545224486,0.0544389408332,0.0542655684102,0.0547856856793,0.0541499867948,0.0545545224486,0.0545545224486,0.0539766143718,0.0531675430643,0.053398706295,0.0527630074105,0.0527630074105,0.0534564971027,0.0538032419487,0.0538610327564,0.0533409154873,0.0531097522566,0.0513760280262,0.0512604464109,0.0512604464109,0.0506825383341,0.0496423037959,0.0502202118727,0.0490643957191,0.0491221865268,0.0484286968346,0.0492377681421,0.0491799773344,0.048717650873,0.048717650873,0.0483709060269,0.0491799773344,0.0493533497575,0.0489488141037,0.0497000946036,0.0497578854112,0.0491221865268,0.0481397427962,0.0484286968346,0.0478507887578,0.0475618347194,0.0481397427962,0.0479663703732,0.0473884622964,0.0476774163348,0.0479085795655,0.0476774163348,0.0475040439118,0.046926135835,0.0466949726043,0.0462326461428,0.0457703196814,0.0461170645275,0.0460014829121,0.0457703196814,0.0454235748353,0.0447878759509,0.0452502024123,0.0451924116046,0.04530799322,0.0446145035278,0.0450768299893,0.0451924116046,0.0447878759509,0.0447300851432,0.0438054322203,0.0430541517205,0.0428807792975,0.0424184528361,0.0420139171823,0.0418405447593,0.0423028712207,0.0423028712207,0.0423606620284,0.0423606620284,0.0416093815286,0.0412048458748,0.0417249631439,0.0413782182978,0.0410892642594,0.0412048458748,0.0414937999132,0.0417249631439,0.0423606620284,0.0423606620284,0.0431697333359,0.0432853149512,0.0425340344514,0.043863223028,0.0435742689896,0.0440943862587,0.0441521770664,0.0443833402971,0.0445567127202,0.0450190391816,0.0449034575662,0.0443833402971,0.0441521770664,0.0448456667586,0.0443255494894,0.0446145035278,0.0447300851432,0.0440943862587,0.0444411311048,0.0449612483739,0.0446145035278,0.0440943862587,0.043863223028,0.0436320597973,0.0439788046434,0.0442099678741,0.0432275241436,0.0429963609128,0.0431697333359,0.0425918252591,0.0421294987977,0.0428229884898,0.042245080413,0.0421294987977,0.0419561263746,0.0412048458748,0.04207170799,0.0408003102211,0.0414360091055,0.0409158918364,0.0407425194134,0.0412626366825,0.0410314734518,0.0409158918364,0.0409158918364,0.0410314734518,0.0409736826441,0.0405113561827,0.0408581010287,0.0409736826441,0.0421294987977,0.0425340344514,0.0424184528361,0.0420139171823,0.0417827539516,0.0425340344514,0.0428807792975,0.0425918252591,0.0425340344514,0.0423028712207,0.0429963609128,0.0431697333359,0.0424762436437,0.0423606620284,0.0423606620284,0.0412048458748,0.0413204274902,0.0412048458748,0.0414360091055,0.0414937999132,0.0405113561827,0.0405691469903,0.0402224021443,0.0401646113366,0.0401068205289,0.0389510043753,0.0391243767984,0.03883542276,0.0392977492214,0.0394711216444,0.0394133308368,0.039008795183,0.0391243767984,0.0387198411446,0.037217280145,0.0366393720682,0.0365237904528,0.0368127444912,0.0369861169143,0.0367549536836,0.0361192547991,0.0361770456068,0.0358303007607,0.0357147191453,0.0356569283377,0.0359458823761,0.0362926272221,0.0368127444912,0.0366393720682,0.0367549536836,0.0369861169143,0.0371016985296,0.0368127444912,0.0369861169143,0.0369283261066,0.0366393720682,0.0367549536836,0.0368127444912,0.0363504180298,0.0366971628759,0.0368127444912,0.037217280145,0.0365815812605,0.0368705352989,0.0368705352989,0.0369861169143,0.0371594893373,0.0374484433757,0.0373328617603,0.0380263514525,0.0376218157987,0.0374484433757,0.0378529790294,0.0383153054909,0.0391243767984,0.0395289124521,0.0398178664905,0.0398178664905,0.0402224021443,0.0400490297212,0.0403379837596,0.0402801929519,0.0408581010287,0.0411470550671,0.0409736826441,0.0418405447593,0.0416671723362,0.0423028712207,0.0429963609128,0.0434008965666,0.0433431057589,0.0433431057589,0.0447300851432,0.0452502024123,0.0451346207969,0.0452502024123,0.04530799322,0.0448456667586,0.0447878759509,0.0445567127202,0.0440365954511,0.0434008965666,0.0439210138357,0.0435164781819,0.0439210138357,0.043689850605,0.0432853149512,0.0430541517205,0.0424762436437,0.0418983355669,0.0419561263746,0.0417249631439,0.0410314734518,0.0412048458748,0.0406847286057,0.0408003102211,0.0399912389136,0.0397600756828,0.0398178664905,0.0392977492214,0.0397600756828,0.0392977492214,0.0394133308368,0.0391821676061,0.0388932135677,0.0388932135677,0.0384308871062,0.0375640249911,0.0375062341834,0.0368127444912,0.0366971628759,0.0365237904528,0.0366971628759,0.0369283261066,0.0369861169143,0.0379107698371,0.0380841422602,0.0380841422602,0.0375062341834,0.0379107698371,0.0383153054909,0.0377373974141,0.0381419330678,0.0382575146832,0.0376218157987,0.0377373974141,0.0375640249911,0.0373328617603,0.0378529790294,0.0377373974141,0.0384308871062,0.0384886779139,0.0383730962986,0.0386620503369,0.0384886779139,0.0385464687216,0.0385464687216,0.0383730962986,0.0383730962986,0.0383153054909,0.0381419330678,0.03883542276,0.0387776319523,0.0395867032598,0.0397600756828,0.0403957745673,0.0402801929519,0.0406847286057,0.0409736826441,0.0410314734518,0.0412626366825,0.0416671723362,0.0416093815286,0.0418983355669,0.0415515907209,0.0419561263746,0.0414360091055,0.0417827539516,0.0418405447593,0.0428807792975,0.0434586873743,0.0440365954511,0.0435742689896,0.0429385701052,0.0430541517205,0.0430541517205,0.0428229884898,0.0432853149512,0.0430541517205,0.0428229884898,0.04207170799,0.0427074068744,0.0428229884898,0.0429385701052,0.0430541517205,0.0426496160668,0.0428229884898,0.04207170799,0.0419561263746,0.0413782182978,0.0417249631439,0.0413782182978,0.0413782182978,0.0410892642594,0.0409736826441,0.0410892642594,0.0416671723362,0.0414937999132,0.0415515907209,0.04207170799,0.0426496160668,0.0428807792975,0.0431697333359,0.0431119425282,0.0425918252591,0.0426496160668,0.0432853149512,0.0442677586818,0.0437476414127,0.0440365954511,0.0445567127202,0.0429385701052,0.0434008965666,0.0432275241436,0.0434586873743,0.0431119425282,0.0428807792975,0.0430541517205,0.0427074068744,0.0427651976821,0.0427651976821,0.0433431057589,0.0430541517205,0.0427074068744,0.0421872896053,0.0428229884898,0.0431119425282,0.0431697333359,0.0425340344514,0.0424762436437,0.0423606620284,0.042245080413,0.0424184528361,0.04207170799,0.0416671723362,0.0413782182978,0.0415515907209,0.0413782182978,0.0414360091055,0.0413782182978,0.0410892642594,0.040626937798,0.0407425194134,0.0405113561827,0.0405691469903,0.0412626366825,0.0412626366825,0.0408581010287,0.0402224021443,0.0399912389136,0.0399334481059,0.0394133308368,0.0401646113366,0.0400490297212,0.0405691469903,0.0398756572982,0.0405113561827,0.0407425194134,0.0412626366825,0.0416093815286,0.0413204274902,0.0413782182978,0.0413782182978,0.0406847286057,0.0405691469903,0.0406847286057,0.0408003102211,0.0407425194134,0.0405691469903,0.040626937798,0.0407425194134,0.0395867032598,0.0391821676061,0.0397600756828,0.0395289124521,0.0398756572982,0.0398756572982,0.0400490297212,0.0396444940675,0.0401646113366,0.0395289124521,0.0405113561827,0.0415515907209,0.0423606620284,0.0430541517205,0.0431119425282,0.0423028712207,0.0432275241436,0.0427651976821,0.0429963609128,0.0430541517205,0.0435164781819,0.0433431057589,0.0425918252591,0.0428807792975,0.0423606620284,0.0427651976821,0.0432275241436,0.043689850605,0.0437476414127,0.0439210138357,0.0443833402971,0.0445567127202,0.0439210138357,0.043689850605,0.0443833402971,0.045481365643,0.0446722943355,0.0449612483739,0.0444989219125,0.0433431057589,0.0421294987977,0.0410892642594,0.0395289124521,0.0387776319523,0.0369861169143,0.03559913753,0.0337498316843,0.0321316890693,0.0312648269541,0.0302823832236,0.0284908681855,0.0273928428396,0.0262948174937,0.0247922564941,0.0234630679175,0.0222494609562)
m <- c(0.0227951178255,0.0233693021536,0.0249770182723,0.0260679684957,0.027158918719,0.0283072873752,0.0293408191658,0.0306614431204,0.0318672302094,0.032900762,0.0339917122234,0.0347955702827,0.0357142652077,0.0369200522967,0.0378387472217,0.0388722790122,0.0396761370716,0.0401929029669,0.0399632292356,0.0405374135637,0.0404225766981,0.0400780661012,0.0406522504293,0.041054179459,0.0408819241606,0.0413986900559,0.0409967610262,0.040767087295,0.0399632292356,0.0400780661012,0.0391593711763,0.0385851868482,0.0376664919232,0.0378387472217,0.0376090734904,0.038642605281,0.0373219813264,0.037436818192,0.0378387472217,0.037723910356,0.038355513117,0.0380110025201,0.0380110025201,0.0376090734904,0.0377813287889,0.0380110025201,0.0379535840873,0.0377813287889,0.0379535840873,0.037723910356,0.0374942366248,0.0372645628936,0.0375516550576,0.0373793997592,0.0376090734904,0.0378387472217,0.0373793997592,0.0369774707295,0.0371497260279,0.0373219813264,0.0366329601327,0.0371497260279,0.0376090734904,0.0375516550576,0.0381832578185,0.0376664919232,0.038355513117,0.0379535840873,0.0380684209529,0.0380110025201,0.0389296974451,0.0388148605794,0.0384703499826,0.0384703499826,0.0378387472217,0.0380110025201,0.0377813287889,0.0381832578185,0.038355513117,0.0387000237138,0.0401354845341,0.0400780661012,0.0401354845341,0.0414561084887,0.0418580375184,0.0417432006527,0.0411690163246,0.040767087295,0.041054179459,0.0412264347574,0.0413986900559,0.0415135269215,0.040767087295,0.0408819241606,0.0411115978918,0.0408819241606,0.0408819241606,0.041054179459,0.0403651582653,0.040767087295,0.0404225766981,0.0404799951309,0.0401354845341,0.0401929029669,0.0400780661012,0.0401929029669,0.0400780661012,0.0399058108028,0.0394464633403,0.0393890449075,0.0396187186388,0.0393890449075,0.0387000237138,0.0387000237138,0.0376664919232,0.0378961656545,0.037436818192,0.0362884495358,0.0363458679686,0.0364607048342,0.0363458679686,0.0368626338639,0.0368626338639,0.0367477969983,0.0369774707295,0.0377813287889,0.0380110025201,0.0370923075951,0.0372645628936,0.0370923075951,0.0372071444608,0.0366903785655,0.0368626338639,0.0373219813264,0.0370923075951,0.0376090734904,0.0376664919232,0.0374942366248,0.0373793997592,0.0372645628936,0.037436818192,0.0376664919232,0.0381258393857,0.037723910356,0.0382406762513,0.0382980946841,0.0388722790122,0.0391019527435,0.0390445343107,0.0384129315498,0.0389871158779,0.0392742080419,0.0402503213997,0.0397909739372,0.0405948319965,0.0399632292356,0.0400206476684,0.0397909739372,0.0397909739372,0.0391019527435,0.0402503213997,0.0408819241606,0.0407096688622,0.041054179459,0.0409393425934,0.0411115978918,0.0408245057278,0.0405374135637,0.0409967610262,0.0405948319965,0.0400206476684,0.0401929029669,0.0401354845341,0.0405374135637,0.0404225766981,0.0406522504293,0.0408819241606,0.0405948319965,0.0401354845341,0.0405948319965,0.040767087295,0.0401929029669,0.0401354845341,0.0411115978918,0.0411690163246,0.0411115978918,0.0399058108028,0.0408819241606,0.0411690163246,0.0411115978918,0.0404225766981,0.0403077398325,0.0399632292356,0.0396761370716,0.0387000237138,0.0385277684154,0.0388722790122,0.0384129315498,0.038355513117,0.0389296974451,0.0390445343107,0.0390445343107,0.0384129315498,0.0382980946841,0.038355513117,0.0378387472217,0.0381258393857,0.0381258393857,0.037723910356,0.037723910356,0.0380684209529,0.0387574421466,0.0385277684154,0.0382980946841,0.0376090734904,0.0378387472217,0.037723910356,0.0369774707295,0.0371497260279,0.0378387472217,0.0385851868482,0.0379535840873,0.0376664919232,0.0372645628936,0.0380684209529,0.0378387472217,0.0376664919232,0.037723910356,0.0376664919232,0.037436818192,0.037436818192,0.0381258393857,0.0378961656545,0.0373219813264,0.0378961656545,0.0376090734904,0.0377813287889,0.0373793997592,0.0379535840873,0.037723910356,0.0379535840873,0.0372071444608,0.0372645628936,0.0373219813264,0.0367477969983,0.0366329601327,0.0367477969983,0.0372645628936,0.0381832578185,0.0379535840873,0.0376090734904,0.0384703499826,0.0379535840873,0.0373219813264,0.0371497260279,0.0374942366248,0.037436818192,0.0378961656545,0.0373219813264,0.0376664919232,0.0376090734904,0.0373793997592,0.0373219813264,0.038355513117,0.0380110025201,0.0371497260279,0.0378961656545,0.0385277684154,0.0389871158779,0.0396187186388,0.0404799951309,0.0411690163246,0.0409967610262,0.0412838531903,0.0405374135637,0.040767087295,0.0404225766981,0.0397909739372,0.0400206476684,0.03984839237,0.0397909739372,0.03984839237,0.0390445343107,0.0390445343107,0.0396761370716,0.0393316264747,0.0393890449075,0.0397909739372,0.0391019527435,0.038642605281,0.038642605281,0.0393890449075,0.0392742080419,0.0391019527435,0.0404799951309,0.041054179459,0.0417432006527,0.041054179459,0.0412264347574,0.0417432006527,0.0411690163246,0.040767087295,0.0399058108028,0.0394464633403,0.0391593711763,0.0387000237138,0.0388722790122,0.0384703499826,0.0388722790122,0.0393890449075,0.0401354845341,0.0401929029669,0.0396187186388,0.0396187186388,0.0393316264747,0.0396761370716,0.0393316264747,0.0393316264747,0.0393316264747,0.0393890449075,0.0397909739372,0.0393890449075,0.03984839237,0.0399632292356,0.0400780661012,0.0394464633403,0.0401929029669,0.0401929029669,0.0396187186388,0.0391593711763,0.038642605281,0.038355513117,0.0381832578185,0.0382980946841,0.0388722790122,0.0391593711763,0.0396761370716,0.0395038817732,0.0393316264747,0.0394464633403,0.0393316264747,0.0407096688622,0.0412838531903,0.0404225766981,0.0400780661012,0.0411690163246,0.0418006190855,0.0420302928168,0.0424322218465,0.0417432006527,0.0421451296824,0.041972874384,0.0417432006527,0.0416857822199,0.042259966548,0.0416283637871,0.0417432006527,0.0417432006527,0.0418006190855,0.0418580375184,0.041054179459,0.0412264347574,0.0400206476684,0.03984839237,0.0400780661012,0.0408819241606,0.0413412716231,0.0417432006527,0.0412838531903,0.041054179459,0.041054179459,0.0415709453543,0.0420877112496,0.041972874384,0.0421451296824,0.0412838531903,0.0405374135637,0.0415709453543,0.0420877112496,0.0417432006527,0.0415709453543,0.0425470587121,0.0428915693089,0.0429489877417,0.0436954273683,0.0447863775917,0.0454179803526,0.0453605619198,0.0440973563979,0.0451883066213,0.0457624909494,0.0462218384119,0.0453031434869,0.0452457250541,0.0454753987854,0.0457050725166,0.0467386043072,0.0475424623665,0.0475424623665,0.0473127886353,0.0473702070681,0.0471405333369,0.047083114904,0.0468534411728,0.0466811858744,0.0464515121431,0.0460495831135,0.0463940937103,0.0466237674416,0.0473127886353,0.0482314835602,0.0473702070681,0.047083114904,0.0467386043072,0.0469108596056,0.0459921646807,0.0454179803526,0.0457050725166,0.0457050725166,0.0448437960245,0.0439251010995,0.0449586328901,0.0455328172182,0.0447863775917,0.0441547748307,0.044384448562,0.0452457250541,0.045877327815,0.0465089305759,0.0462792568447,0.047083114904,0.0468534411728,0.0467386043072,0.04679602274,0.0470256964712,0.0466811858744,0.0470256964712,0.0474276255009,0.0474850439337,0.047714717665,0.0485185757243,0.0488056678883,0.0487482494555,0.0482314835602,0.0485185757243,0.0488056678883,0.0493224337836,0.0493224337836,0.0492650153508,0.0496669443805,0.050413384007,0.0502985471414,0.0505282208726,0.0505282208726,0.0513894973648,0.050126291843,0.0494946890821,0.0502411287086,0.0500688734102,0.0499540365445,0.0499540365445,0.0497817812461,0.0493224337836,0.0497243628133,0.0487482494555,0.0487482494555,0.0493798522164,0.0505856393054,0.0509301499023,0.0515043342304,0.051332078932,0.051619171096,0.052537866021,0.0523081922897,0.0516765895288,0.0519062632601,0.0527101213194,0.0527675397522,0.0528823766178,0.0533991425131,0.0532268872147,0.0541455821397,0.0542604190053,0.0542030005725,0.0543752558709,0.0545475111693,0.0542604190053,0.055236532363,0.0550068586318,0.0568442484817,0.058279709302,0.0588538936301,0.0602893544503,0.060978375644,0.0620693258674,0.0625286733299,0.0635047866877,0.0636196235533,0.0641363894486,0.0644809000454,0.0647679922095,0.0637918788517,0.0644234816126,0.0639067157173,0.0655718502688,0.0664905451938,0.0659163608657,0.0668350557906,0.0671221479547,0.0678685875812,0.0672944032531,0.0680982613124,0.0679834244468,0.0683279350437,0.0682705166109,0.0682705166109,0.0701079064608,0.0704524170576,0.0710266013857,0.071543367281,0.0720027147435,0.0722898069076,0.0726343175044,0.0725768990716,0.0723472253404,0.0721175516091,0.0714859488482,0.0713136935498,0.0717730410123,0.0717156225795,0.071543367281,0.0728065728028,0.0733807571309,0.0747013810856,0.0748162179512,0.0753904022793,0.0753329838465,0.0761942603386,0.075792331309,0.0765961893683,0.077285210562,0.0776297211589,0.0786058345166,0.0789503451135,0.080615479665,0.0807303165306,0.0822231957836,0.0836586566039,0.0858405570507,0.0862424860803,0.0858979754835,0.0867018335428,0.0871037625725,0.0876205284678,0.0883095496615,0.0882521312287,0.0889411524224,0.089055989288,0.0907785422723,0.0925010952566,0.0938217192112,0.0941088113753,0.0945107404049,0.0968074777173,0.0988171228657,0.10053967585,0.101113860178,0.102147391969,0.103180923759,0.104731221445,0.105879590101,0.107544724653,0.108807930175,0.108004072115,0.110128554129,0.111104667487,0.112367873009,0.113229149501,0.11299947577,0.115123957784,0.115181376216,0.115640723679,0.115985234276,0.117880042559,0.118396808454,0.120349035169,0.121841914422,0.122875446213,0.125631530988,0.129134055389,0.132406906059,0.134473969641,0.136828125386,0.137976494042,0.139354536429,0.141536436876,0.143201571428,0.144464776949,0.146302166799,0.147393117023,0.149345343738,0.149689854335,0.152790449707,0.154857513288,0.156350392541,0.158704548286,0.160656775002,0.16347027821,0.165135412761,0.166054107686,0.167661823805,0.16961405052,0.172599809026,0.173116574922,0.175355893801,0.176619099323,0.178226815442,0.179030673501,0.180466134321,0.18023646059,0.181040318649,0.18310738223,0.182533197902,0.18207385044,0.181327410813,0.180695808052,0.180293879023,0.180064205292,0.181040318649,0.182303524171,0.184370587752,0.184255750887,0.184715098349,0.185117027379,0.184772516782,0.185863467005,0.184829935215,0.184657679916,0.185920885438,0.185059608946,0.184600261484,0.184198332454,0.184428006185,0.185691211707,0.185404119543,0.186035722304,0.18494477208,0.185231864244,0.185404119543,0.186954417229,0.187298927826,0.187758275288,0.189940175735,0.193040771107,0.193270444838,0.193270444838,0.194074302897,0.19453365036,0.197289735135,0.198954869686,0.19924196185,0.201136770133,0.20291674155,0.202974159983,0.201768372894,0.201998046625,0.202342557222,0.203203833714,0.204581876101,0.204696712967,0.205156060429,0.20578766319,0.205328315728,0.205672826325,0.208314074234,0.209577279756,0.20946244289,0.210725648412,0.211644343337,0.212161109232,0.213481733187,0.215146867738,0.216984257588,0.217271349752,0.218706810573,0.219625505498,0.219051321169,0.218993902737,0.221003547885,0.222151916541,0.2229557746,0.223817051093,0.223300285197,0.224448653854,0.225826696241,0.225826696241,0.223989306391,0.223644795794,0.225022838182,0.226975064897,0.228008596688,0.227606667658,0.228353107285,0.22886987318,0.230305334,0.229329220642,0.231453702656,0.231396284224,0.230190497135,0.229501475941,0.229960823403,0.229673731239,0.230764681463,0.230936936761,0.229731149672,0.230305334,0.230305334,0.228295688852,0.227606667658,0.227319575494,0.227147320196,0.226400880569,0.225539604077,0.224908001316,0.223013193033,0.22192224281,0.220142271393,0.220257108258,0.218879065871,0.218362299976,0.218706810573,0.219338413333,0.219051321169,0.218075207812,0.216524910126,0.215146867738,0.21537654147,0.215433959902,0.214515264977,0.21537654147,0.212792711993,0.212390782963,0.210495974681,0.211127577442,0.209749535054,0.208716003264,0.205959918489,0.205615407892,0.206878613414,0.205041223564,0.201596117595,0.202629649386,0.202055465058,0.200964514834,0.200849677969,0.199184543417,0.198265848492,0.197978756328,0.199873564611,0.200160656775,0.200390330506,0.197576827299,0.196887806105,0.19556718215,0.194935579389,0.194303976628,0.193959466032,0.192581423644,0.191145962824,0.192064657749,0.190112431033,0.189251154541,0.188734388646,0.187298927826,0.187126672527,0.187471183124,0.187011835662,0.184715098349,0.184140914021,0.183681566559,0.183337055962,0.181729339843,0.179088091934,0.178054560143,0.178341652307,0.177824886412,0.177250702084,0.176102333428,0.1755281491,0.175298475368,0.17472429104,0.173173993354,0.171795950967,0.170819837609,0.169786305819,0.169958561117,0.169384376789,0.168236008133,0.166800547313,0.165422504925,0.163642533508,0.162436746419,0.162436746419,0.16123095933,0.160254845972,0.158647129854,0.158187782391,0.157039413735,0.155603952915,0.155202023885,0.155144605452,0.155144605452,0.155259442318,0.153594307766,0.153249797169,0.151929173215,0.152388520677,0.152503357543,0.151986591648,0.150838222991,0.149115670007,0.148885996276,0.147393117023,0.146589258963,0.145555727173,0.144809287546,0.143603500457,0.143431245159,0.144005429487,0.143603500457,0.142971897696,0.143431245159,0.143546082025,0.142512550234,0.140962252548,0.140502905086,0.139584210161,0.13814874934,0.137057799117,0.136598451655,0.135622338297,0.135392664566,0.134301714342,0.132923671955,0.132464324492,0.131660466433,0.13056951621,0.130799189941,0.129995331881,0.129880495016,0.129191473822,0.12833019733,0.127239247107,0.126148296883,0.125688949421,0.125746367853,0.125401857257,0.124138651735,0.124023814869,0.12362188584,0.122645772482,0.122588354049,0.121325148527,0.120750964199,0.11954517711,0.119200666513,0.11810971629,0.118856155916,0.118856155916,0.118167134723,0.118052297857,0.117363276663,0.117592950394,0.117018766066,0.115698142112,0.115468468381,0.115296213082,0.113688496963,0.112769802038,0.112540128307,0.110645320025,0.111104667487,0.111391759651,0.110702738457,0.110415646293,0.10932469607,0.108750511742,0.108578256443,0.108406001145,0.107602143086,0.107372469354,0.108004072115,0.106568611295,0.105707334803,0.105707334803,0.103697689655,0.102549320998,0.100826768014,0.101113860178,0.100310002119,0.099620980925,0.0985874491344,0.098128101672,0.0979558463735,0.0965203855533,0.0953145984643,0.0942810666737,0.0941088113753,0.0935346270472,0.0931901164503,0.0931326980175,0.0944533219721,0.0943959035393,0.093879137644,0.0947404141362,0.0930178611519,0.0925010952566,0.0918694924957,0.0909507975707,0.0909507975707,0.0903766132426,0.0894579183177,0.0885392233927,0.0881372943631,0.0876779469006,0.0879076206318,0.0885392233927,0.0883669680943,0.0885966418255,0.0880224574974,0.0873334363037,0.0887114786912,0.0882521312287,0.0869889257069,0.0871611810053,0.0860702307819,0.085725720185,0.0849218621257,0.0847496068273,0.0852089542898,0.0850941174241,0.0841754224992,0.0828547985446,0.0817638483212,0.0814193377243,0.07969678474,0.0795819478744,0.0791800188447,0.078490997651,0.0774574658604,0.076366515637,0.0761942603386,0.0767684446667,0.0759071681746,0.0759645866074,0.0758497497418,0.0757349128761,0.0747587995184,0.0737826861606,0.0729788281013,0.0722323884747,0.0720027147435,0.0705098354904,0.0698208142967,0.0695337221327,0.0686724456405,0.0685001903421,0.0687872825062,0.0682130981781,0.068844700939,0.0681556797452,0.0680982613124,0.0678111691484,0.0682130981781,0.0681556797452,0.0684427719093,0.0686724456405,0.0683853534765,0.067926006014,0.0676963322828,0.0667776373578,0.0663757083281,0.0662608714625,0.0673518216859,0.067007311089,0.0664905451938,0.065514431836,0.0653995949704,0.0652273396719,0.0649402475079,0.0650550843735,0.0651125028063,0.0651125028063,0.0641938078814,0.063102857658,0.0631602760908,0.0632751129564,0.0632751129564,0.0635047866877,0.0621267443002,0.0614377231065,0.0611506309424,0.0616673968377,0.0612080493753,0.0614377231065,0.0618396521362,0.0611506309424,0.0604616097487,0.0612654678081,0.0611506309424,0.0620693258674,0.0627583470611,0.0628731839267,0.0632751129564,0.0636770419861,0.064308644747,0.0639641341501,0.0624138364643,0.0626435101955,0.0621267443002,0.0618396521362,0.0619544890018,0.0613803046737,0.0607487019128,0.0600596807191,0.0596003332566,0.0593706595253,0.0589113120629,0.0595429148238,0.058279709302,0.0576481065411,0.0576481065411,0.0569590853473,0.0575332696754,0.0569016669145,0.0570165037801,0.0562700641536,0.0556384613927,0.054949440199,0.054030745274,0.0538584899756,0.0539733268412,0.0527101213194,0.0519062632601,0.0512746604992,0.0501837102758,0.0500688734102,0.0496095259477,0.049207596918,0.0482314835602,0.0478869729634,0.0490927600524,0.0486908310227,0.0488056678883,0.0488630863211,0.0482889019931,0.0483463204259,0.0487482494555,0.0485759941571,0.0481740651274,0.0478869729634,0.047714717665,0.0471979517697,0.0473702070681,0.0465089305759,0.0460495831135,0.0456476540838,0.0453605619198,0.0461644199791,0.0454753987854,0.0451883066213,0.0449012144573,0.0448437960245,0.0449586328901,0.0451883066213,0.0444418669948,0.0443270301292,0.0443270301292,0.0444992854276,0.0438676826667,0.0436954273683,0.0440399379651,0.0433509167714,0.0438102642339,0.0436380089355,0.0428341508761,0.043465753637,0.0437528458011,0.0431212430402,0.043178661473,0.0431212430402,0.0428341508761,0.0429489877417,0.0432934983386,0.0427193140105,0.0426044771449,0.0427193140105,0.0424896402793,0.0431212430402,0.043465753637,0.0436380089355,0.0433509167714,0.0426618955777,0.043178661473,0.0439825195323,0.0442121932636,0.0440973563979,0.0436380089355,0.0442121932636,0.0441547748307,0.0445567038604,0.044671540726,0.0445567038604,0.0454753987854,0.0454179803526,0.0454753987854,0.0457624909494,0.0450734697557,0.0450734697557,0.0450734697557,0.0444418669948,0.0447289591588,0.0450160513229,0.0448437960245,0.0451308881885,0.0449012144573,0.0443270301292,0.0448437960245,0.045590235651,0.0460495831135,0.0461644199791,0.0463366752775,0.0474276255009,0.0478869729634,0.0487482494555,0.0486908310227,0.0491501784852,0.0486908310227,0.0474276255009,0.0473127886353,0.0472553702025,0.0471979517697,0.0459347462478,0.0457624909494,0.0452457250541,0.0449586328901,0.0446141222932,0.044384448562,0.0438676826667,0.0432934983386,0.043178661473,0.0432934983386,0.0438102642339,0.0437528458011,0.0436380089355,0.0431212430402,0.0433509167714,0.0428915693089,0.0416283637871,0.0415709453543,0.0420877112496,0.0416283637871,0.0412838531903,0.0413986900559,0.041054179459,0.0412838531903,0.040767087295,0.0407096688622,0.0399632292356,0.0404799951309,0.0396761370716,0.0399058108028,0.0403077398325,0.0405374135637,0.0407096688622,0.0412838531903,0.0416283637871,0.0424322218465,0.0429489877417,0.0433509167714,0.0434083352042,0.0436380089355,0.0437528458011,0.0439251010995,0.0427193140105,0.0415709453543,0.0399058108028,0.0385851868482,0.0373793997592,0.0362884495358,0.0346233149843,0.0337620384922,0.0334175278953,0.0324988329704,0.0311782090157,0.0298575850611,0.0284795426737,0.026871826555,0.0256086210332,0.0243454155114,0.0227376993927)
s <- c(0.0210061337911,0.0209461162659,0.0210061337911,0.0209461162659,0.0208560899783,0.0206160198778,0.0205860111152,0.0207060461655,0.0205860111152,0.0202259059645,0.0202259059645,0.0196857482385,0.0198057832887,0.0195657131883,0.0189655379371,0.0189955466996,0.0190555642248,0.0189955466996,0.0192656255627,0.0192656255627,0.0192056080375,0.0193256430878,0.0197457657636,0.0198658008138,0.0193856606129,0.0194756869006,0.0193856606129,0.019445678138,0.019175599275,0.0192656255627,0.0195056956631,0.0193856606129,0.0196557394759,0.0196857482385,0.0195957219508,0.0195357044257,0.0194756869006,0.0195657131883,0.0196857482385,0.019925818339,0.019715757001,0.0199858358641,0.0200158446266,0.0203159322522,0.0204359673025,0.0204059585399,0.0200758621517,0.0203759497773,0.0205259935901,0.0210361425536,0.0207960724532,0.021216195129,0.0208860987408,0.0209161075034,0.0207960724532,0.0207960724532,0.0204359673025,0.0210361425536,0.0213662389418,0.0212762126541,0.0214562652294,0.0213962477043,0.021486273992,0.0213362301792,0.0211861863664,0.0214262564669,0.021216195129,0.0209161075034,0.0210061337911,0.0209761250285,0.0211861863664,0.0211261688413,0.0212462038915,0.0213662389418,0.021216195129,0.0209761250285,0.021216195129,0.0213062214167,0.0210061337911,0.0209761250285,0.021486273992,0.0215162827546,0.021486273992,0.0208560899783,0.0213662389418,0.0215162827546,0.021486273992,0.0211261688413,0.0210661513162,0.0208860987408,0.020736054928,0.0202259059645,0.0201358796769,0.0203159322522,0.0200758621517,0.0200458533892,0.0203459410148,0.0204059585399,0.0204059585399,0.0200758621517,0.0200158446266,0.0200458533892,0.0197757745262,0.030458893997,0.0314191743989,0.0319293233624,0.0324094635634,0.0330096388145,0.0339399104539,0.0346901295178,0.0354103398192,0.0355003661069,0.0364006289837,0.0366707078467,0.0368207516595,0.0372408743353,0.0385612598879,0.0396715841026,0.0397916191528,0.0399716717281,0.0398516366779,0.0401217155409,0.0401517243035,0.0400616980158,0.0403617856414,0.040391794404,0.0405418382168,0.0406918820296,0.0410819959428,0.0408419258423,0.0402117418286,0.0404818206916,0.0402717593537,0.0403617856414,0.0403317768788,0.0405118294542,0.0403617856414,0.0405118294542,0.0395215402898,0.0394915315272,0.0396115665774,0.0395215402898,0.0394915315272,0.0393114789519,0.0391314263765,0.0397316016277,0.0393414877144,0.039371496477,0.0400016804907,0.0401517243035,0.0394315140021,0.0394015052395,0.0396715841026,0.0398216279154,0.0400316892533,0.0397015928651,0.0401517243035,0.0399716717281,0.0395215402898,0.039371496477,0.0400016804907,0.0397316016277,0.0391614351391,0.0394315140021,0.0397015928651,0.0398216279154,0.0401817330661,0.0405718469793,0.0408419258423,0.0409019433675,0.0415621361438,0.0409019433675,0.0412320397556,0.0408119170798,0.0405718469793,0.0403317768788,0.0404818206916,0.0405418382168,0.0408419258423,0.0403317768788,0.0403317768788,0.0408119170798,0.0406918820296,0.0403017681163,0.0406318645044,0.0402417505912,0.0403017681163,0.0401517243035,0.0401517243035,0.040391794404,0.0400917067784,0.0410219784177,0.0412920572807,0.0417421887191,0.0409919696551,0.0412320397556,0.0418622237693,0.0415021186186,0.0413220660433,0.0413220660433,0.041412092331,0.0414721098561,0.0411720222305,0.0410219784177,0.0405418382168,0.0411120047054,0.0412920572807,0.0418622237693,0.0417721974817,0.0420422763447,0.0418622237693,0.0415621361438,0.0416521624314,0.0415321273812,0.0416221536689,0.041682171194,0.0417121799565,0.0419822588196,0.0417121799565,0.0420722851073,0.0420122675821,0.042432390258,0.0422823464452,0.042972547984,0.0428225041712,0.0425824340707,0.0425224165456,0.0424023814954,0.0425224165456,0.04222232892,0.0426124428333,0.0433326531347,0.0438728108608,0.0437827845731,0.0434226794224,0.0435427144726,0.043452688185,0.0436327407603,0.043992845911,0.044262924774,0.043992845911,0.0438127933357,0.0446830474499,0.044743064975,0.0448030825001,0.0448631000252,0.0447130562124,0.0453732489887,0.0453732489887,0.0453732489887,0.0455232928015,0.0462735118655,0.0463935469157,0.0463335293906,0.0464835732034,0.0466336170162,0.0465735994911,0.0459734242399,0.0465435907285,0.0458533891896,0.0461234680527,0.0462134943403,0.0465735994911,0.0468736871166,0.0466036082536,0.0459434154773,0.0459134067148,0.0462435031029,0.0466036082536,0.0466336170162,0.0472638010299,0.0479239938062,0.0479239938062,0.0477139324683,0.0485841865825,0.0489142829706,0.0487642391578,0.0493043968839,0.0502046597607,0.0507148087241,0.0509548788246,0.0512849752128,0.0518851504639,0.0520652030393,0.0516450803635,0.0510449051123,0.0510148963497,0.0514950365507,0.0517050978886,0.0515550540758,0.0515550540758,0.0518551417014,0.0520652030393,0.0525753520028,0.0529054483909,0.0530855009663,0.0529954746786,0.0531455184914,0.0533855885919,0.0538357200302,0.0537456937426,0.0536856762175,0.0535956499298,0.0539557550805,0.0538657287928,0.0535056236421,0.0541358076558,0.0545859390942,0.0541057988933,0.0542558427061,0.0543758777563,0.0541358076558,0.0538357200302,0.0539257463179,0.0542858514686,0.0547659916696,0.0544058865189,0.054195825181,0.0552761406331,0.0556362457838,0.0563564560852,0.056026359697,0.0562064122724,0.0562364210349,0.057046657624,0.0575568065875,0.0574367715373,0.0579169117382,0.0577668679254,0.0576768416378,0.0583070256515,0.0587871658524,0.0589072009027,0.0593273235785,0.059837472542,0.0596874287292,0.0605276740808,0.0608277617064,0.0612778931448,0.0618480596334,0.0618180508709,0.0622681823092,0.0623281998344,0.0628683575604,0.0630784188983,0.0634985415741,0.0636185766244,0.0644288132135,0.0649689709395,0.0649089534144,0.0649989797021,0.0657191900035,0.0651190147523,0.0652390498025,0.0654191023779,0.0653290760902,0.065749198766,0.0660492863916,0.0663193652547,0.0661993302044,0.0663793827798,0.0667094791679,0.0666494616428,0.0669195405058,0.0676097420447,0.0683899698712,0.0689301275973,0.0690501626475,0.0689901451224,0.0705506007754,0.0698003817115,0.0696503378987,0.0700404518119,0.0706406270631,0.0705205920129,0.0701604868622,0.0711507760266,0.0710607497389,0.0715408899399,0.0716609249901,0.0716609249901,0.0716309162275,0.0712708110768,0.0712107935517,0.0722010827162,0.0717809600403,0.0729212930176,0.0733714244559,0.0739415909446,0.0756520904104,0.0765223445246,0.0773925986388,0.0781728264653,0.078532931616,0.0798533171686,0.0800933872691,0.0812637290089,0.082884202187,0.0828241846619,0.0838144738264,0.083634421251,0.0847147367031,0.0860951397808,0.0861851660685,0.0874155253334,0.0884058144978,0.0893660948997,0.0889459722239,0.0903263753016,0.0911366118907,0.09077650674,0.0910165768404,0.0909565593153,0.0924870062058,0.0930271639319,0.0937473742333,0.0943475494844,0.0950677597859,0.0957879700873,0.0965081803887,0.0972583994526,0.0982186798545,0.0982186798545,0.097978609754,0.0975584870782,0.0984887587175,0.0984887587175,0.0992689865441,0.100019205608,0.100949477247,0.101789722599,0.101759713836,0.102059801462,0.102239854037,0.102629967951,0.102359889088,0.102239854037,0.1025099329,0.103230143202,0.10356023959,0.104010371028,0.105570826681,0.105210721531,0.106291036983,0.108151580261,0.109622009627,0.110372228691,0.110402237453,0.11142253538,0.111842658056,0.112772929695,0.113193052371,0.112502850832,0.113583166285,0.113913262673,0.1149335606,0.11622393739,0.116614051303,0.116614051303,0.117274244079,0.118264533244,0.119224813646,0.119644936321,0.119885006422,0.120845286824,0.121235400737,0.122135663614,0.12279585639,0.123816154317,0.124776434719,0.125046513582,0.126516942947,0.127807319737,0.128467512514,0.128317468701,0.128827617664,0.130388073317,0.131078274856,0.13182849392,0.132038555258,0.133388949573,0.134109159875,0.135159466564,0.136179764491,0.137110036131,0.139300675797,0.142691665966,0.144972331921,0.146142673661,0.147733138076,0.14848335714,0.149923777743,0.152504531323,0.153134715337,0.15457513594,0.156285635406,0.157666038483,0.15880637146,0.159226494136,0.161117046177,0.163307685844,0.164207948721,0.166098500762,0.168199114141,0.170359745046,0.17122999916,0.171380042973,0.173030524913,0.175131138292,0.176811628996,0.178402093411,0.179422391338,0.180232627927,0.182303232544,0.183743653147,0.184853977361,0.185394135087,0.186654503115,0.187794836092,0.188545055156,0.188214958768,0.188214958768,0.188184950005,0.188094923718,0.188845142782,0.189925458234,0.19070568606,0.193226422115,0.193466492216,0.194636833956,0.19550708807,0.195987228271,0.197547683924,0.197517675161,0.197997815362,0.199198165864,0.199588279778,0.199438235965,0.200008402454,0.200638586467,0.201568858107,0.202259059645,0.20312931376,0.203219340047,0.202829226134,0.203639462723,0.204839813225,0.205019865801,0.205259935901,0.206730365267,0.20841085597,0.208620917308,0.209161075034,0.20865092607,0.20970123276,0.210211381723,0.21252205644,0.213752415705,0.214802722395,0.216123107948,0.216243142998,0.215312871358,0.216213134235,0.216603248148,0.216933344537,0.218193712564,0.217653554838,0.218043668751,0.218313747614,0.217953642464,0.218343756377,0.220234308418,0.220894501194,0.221464667683,0.222034834172,0.222214886747,0.222695026948,0.222875079523,0.224315500126,0.225155745478,0.225965982067,0.226956271231,0.22764647277,0.228276656784,0.229326963473,0.230497305213,0.230887419126,0.232147787154,0.232837988693,0.234968610834,0.234638514446,0.234668523209,0.234788558259,0.233288120131,0.233498181469,0.233828277857,0.235058637122,0.23550876856,0.235718829898,0.2364390402,0.237759425752,0.238599671104,0.238449627291,0.239950065419,0.240070100469,0.238809732442,0.238779723679,0.23889975873,0.238989785017,0.239529942743,0.238629679867,0.238449627291,0.238719706154,0.238449627291,0.237219268026,0.23655907525,0.235868873711,0.23409835672,0.23292801498,0.232297830967,0.231997743341,0.230167208825,0.229386980998,0.22764647277,0.227676481533,0.227166332569,0.226746209893,0.22776650782,0.22764647277,0.226956271231,0.225845947017,0.224645596514,0.223385228487,0.222905088286,0.221554693971,0.221524685208,0.220774466144,0.218943931628,0.218283738852,0.217293449687,0.216303160523,0.214412608482,0.213602371893,0.21204191624,0.211831854902,0.211561776039,0.210541478112,0.208680934833,0.208350838445,0.207270522993,0.205800093627,0.205890119915,0.204509716837,0.203699480248,0.202829226134,0.204209629212,0.203969559111,0.202979269947,0.201118726668,0.200308490079,0.199348209677,0.197757745262,0.197277605061,0.197787754024,0.197187578773,0.195537096832,0.196827473622,0.195417061782,0.195357044257,0.19445678138,0.193676553554,0.193646544791,0.193916623654,0.193526509741,0.192656255627,0.19304636954,0.192716273152,0.191425896362,0.190285563385,0.188875151544,0.18800489743,0.187794836092,0.187134643316,0.18695459074,0.18683455569,0.186114345389,0.185394135087,0.184643916023,0.183533591809,0.181763074818,0.18038267174,0.178822216087,0.177891944448,0.176331488795,0.174320901703,0.173090542438,0.171710139361,0.169609525982,0.167418886315,0.166548632201,0.164357992534,0.162737519356,0.160456853401,0.160246792063,0.159046441561,0.156435679218,0.155205319953,0.154395083364,0.153164724099,0.152024391122,0.150343900419,0.149803742693,0.148663409716,0.147463059213,0.14602263861,0.144852296871,0.143621937606,0.141851420615,0.141071192788,0.139360693322,0.138520447971,0.137110036131,0.136479852117,0.135249492852,0.134619308838,0.134799361414,0.13428921245,0.133629019674,0.133869089774,0.133538993386,0.132098572783,0.131078274856,0.130688160943,0.129997959404,0.128527530039,0.127927354788,0.127387197062,0.12525657492,0.124386320806,0.124056224418,0.123155961541,0.121955611038,0.121145374449,0.120185094047,0.119915015184,0.119224813646,0.118624638394,0.11868465592,0.117604340467,0.116764095116,0.115623762139,0.114963569362,0.114573455449,0.114243359061,0.113613175047,0.113463131234,0.113133034846,0.112022710632,0.11130250033,0.109982114778,0.109742044677,0.1086017117,0.107701448823,0.106711159659,0.107281326147,0.106651142134,0.105780888019,0.105270739056,0.104670563805,0.104340467416,0.103770300928,0.103290160727,0.102990073101,0.10238989785,0.100439328284,0.100409319521,0.0995990829322,0.0982786973796,0.0983387149048,0.0981586623294,0.097708530891,0.0972884082152,0.0971383644024,0.0968082680143,0.0963581365759,0.0964781716261,0.0956079175119,0.0955178912242,0.0950677597859,0.0937173654707,0.0924870062058,0.0927570850688,0.0913466732286,0.0908965417902,0.0897862175755,0.0901463227262,0.0903563840641,0.0898762438632,0.0887959284111,0.088255770685,0.0878956655343,0.086965393895,0.0857950521552,0.0848647805159,0.0847147367031,0.083904500114,0.0838444825889,0.0837244475387,0.0845046753652,0.0838444825889,0.0834543686757,0.0834843774382,0.0821339831231,0.0816838516847,0.0811136851961,0.0807835888079,0.0802134223193,0.0795232207805,0.0791931243923,0.0788330192416,0.078262852753,0.0777527037895,0.0775726512142,0.0778127213146,0.0772125460635,0.0767023971,0.0766123708123,0.0761022218488,0.0761622393739,0.0756220816478,0.0743016960953,0.0742116698076,0.0733114069308,0.0730713368304,0.0725611878669,0.0727412404422,0.0726512141545,0.0728012579673,0.0723211177664,0.071330828602,0.0703405394375,0.0702805219124,0.0690501626475,0.0689901451224,0.0691401889352,0.0689601363598,0.0684499873963,0.0676097420447,0.0673996807068,0.0667995054556,0.0662893564921,0.0663193652547,0.065959260104,0.0653590848528,0.0651490235149,0.0640386993002,0.0636485853869,0.062898366323,0.0631984539486,0.0623882173595,0.0617880421083,0.0616379982955,0.0610078142818,0.0613379106699,0.0615779807704,0.0610678318069,0.0617880421083,0.0614579457202,0.0610978405694,0.0604376477932,0.0607977529439,0.0604676565557,0.0604676565557,0.0608877792315,0.0606477091311,0.060107551405,0.0601375601676,0.0597774550169,0.0594473586287,0.0592973148159,0.059567393679,0.0592673060534,0.0587571570899,0.0580069380259,0.0581269730761,0.0579769292633,0.0577068504003,0.0575868153501,0.0572867277245,0.057526797825,0.0570166488615,0.056506499898,0.0561764035098,0.0564764911354,0.0565365086605,0.0564464823729,0.0556962633089,0.0548560179572,0.0543158602312,0.0544959128065,0.0540157726056,0.0539257463179,0.0540457813682,0.0539257463179,0.0535656411672,0.0540157726056,0.0539557550805,0.0540457813682,0.054195825181,0.0545259215691,0.0545559303317,0.0546159478568,0.05500606177,0.0549760530075,0.0542858514686,0.054735982907,0.054465904044,0.054735982907,0.0548560179572,0.0541658164184,0.0545259215691,0.0540157726056,0.0540457813682,0.0539557550805,0.0538357200302,0.0542558427061,0.0538357200302,0.053445606117,0.053175527254,0.052695387053,0.0533555798293,0.0527554045781,0.052965465916,0.0526353695279,0.0519751767516,0.0517951241763,0.0515850628383,0.0513149839753,0.0511049226374,0.0503246948109,0.0497845370848,0.049634493272,0.0491843618337,0.048614195345,0.0482540901943,0.0481340551441,0.047323818555,0.0469036958792,0.0478939850436,0.0473838360801,0.0473838360801,0.047323818555,0.0466336170162,0.0471137572171,0.0466636257787,0.0469036958792,0.0464235556783,0.0461834855778,0.0463635381531,0.0459734242399,0.0460034330024,0.0455533015641,0.0453732489887,0.0451331788882,0.044743064975,0.0453432402261,0.0450431526006,0.0454932840389,0.0455533015641,0.0454632752764,0.0453132314636,0.0453132314636,0.0453132314636,0.0454332665138,0.045283222701,0.0453432402261,0.0448931087878,0.0451631876508,0.0454332665138,0.0447130562124,0.0448931087878,0.0448030825001,0.0437827845731,0.0441728984864,0.044262924774,0.0440528634361,0.0441128809612,0.0435727232352,0.043452688185,0.0433326531347,0.0434826969475,0.0431526005594,0.0424924077831,0.0426424515959,0.0423723727328,0.0429425392215,0.0432126180845,0.0432726356096,0.0429125304589,0.0426124428333,0.0426724603584,0.0423123552077,0.0421323026324,0.0420122675821,0.0419222412945,0.0423123552077,0.0421623113949,0.0420422763447,0.0421323026324,0.0418922325319,0.0423123552077,0.0422523376826,0.042432390258,0.0427624866461,0.0426724603584,0.0425824340707,0.0426424515959,0.042432390258,0.0426424515959,0.0426424515959,0.0426424515959,0.0427624866461,0.0424924077831,0.0422523376826,0.0425524253082,0.042702469121,0.0431225917968,0.043242626847,0.0435427144726,0.0437827845731,0.0441728984864,0.0446230299247,0.0446530386873,0.0449831350754,0.0448931087878,0.0441728984864,0.0444729861119,0.0442329160115,0.0441128809612,0.0436627495229,0.0438127933357,0.0439628371484,0.0440228546736,0.043992845911,0.0438728108608,0.0438127933357,0.0434226794224,0.0435127057101,0.0435427144726,0.0441128809612,0.0442329160115,0.0440828721987,0.044262924774,0.0442929335366,0.0443829598243,0.0440828721987,0.044262924774,0.0445029948745,0.044262924774,0.0448030825001,0.0451331788882,0.0448931087878,0.0450731613631,0.0448330912626,0.0445630123996,0.0441428897238,0.0442929335366,0.0436027319977,0.0433926706598,0.0438728108608,0.0437827845731,0.0440828721987,0.044262924774,0.0442329160115,0.0445330036371,0.0445029948745,0.0444129685868,0.0444729861119,0.0444729861119,0.0441728984864,0.0443529510617,0.043452688185,0.0429125304589,0.0416221536689,0.0408119170798,0.0402117418286,0.039371496477,0.0387413124632,0.0380511109244,0.0379310758742,0.037330900623,0.0364906552713,0.0358004537325,0.0348401733306,0.0335497965406,0.0328595950017,0.0318392970747,0.030939034198,0.0189655379371,0.0190555642248,0.019175599275,0.0192056080375,0.0196857482385,0.0197757745262,0.0197757745262,0.0194756869006,0.0196857482385,0.0198958095764,0.0195957219508,0.0198057832887,0.0198658008138,0.0195357044257,0.0195957219508,0.0195056956631,0.0193856606129,0.0196557394759,0.0195957219508,0.0199558271015,0.0199858358641,0.019925818339,0.0200758621517,0.0199858358641,0.0200158446266,0.0200158446266,0.019925818339,0.019925818339,0.0198958095764,0.0198057832887,0.0201658884394,0.0201358796769,0.0205560023527,0.0206460286404,0.0209761250285,0.0209161075034,0.0211261688413,0.0212762126541,0.0213062214167,0.0214262564669,0.0216363178048,0.0216063090422,0.021756352855,0.0215763002797,0.0217863616176,0.0215162827546,0.0216963353299,0.0217263440925,0.0222665018185,0.0225665894441,0.0228666770697,0.0226266069692,0.0222965105811,0.0223565281062,0.0223565281062,0.022236493056,0.0224765631564,0.0223565281062,0.022236493056,0.0218463791427,0.0221764755309,0.022236493056,0.0222965105811,0.0223565281062,0.0221464667683,0.022236493056,0.0218463791427,0.0217863616176,0.021486273992,0.0216663265674,0.021486273992,0.021486273992,0.0213362301792,0.0212762126541,0.0213362301792,0.0216363178048,0.0215462915171,0.0215763002797,0.0218463791427,0.0221464667683,0.0222665018185,0.0224165456313,0.0223865368688,0.0221164580057,0.0221464667683,0.0224765631564,0.0229867121199,0.0227166332569,0.0228666770697,0.0231367559327,0.0222965105811,0.0225365806816,0.0224465543939,0.0225665894441,0.0223865368688,0.0222665018185,0.0223565281062,0.0221764755309,0.0222064842934,0.0222064842934,0.022506571919,0.0223565281062,0.0221764755309)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("24-organelles-nucleus-merged/SEPALLATA3-ChIPSeq_ag_3-GSM364943.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=206"),bty="n")
dev.off()