# R script for Peak Model
#  -- generated by MACS
p <- c(0.0390314381303,0.0414077813954,0.0437841246606,0.046279285089,0.0481506554103,0.0502596600582,0.0521013260887,0.0545964865171,0.0570619426547,0.0593194687566,0.0613987691136,0.0634780694706,0.0652603269195,0.0679337130928,0.0698941962865,0.0714388194089,0.0730428511129,0.0733993026027,0.0739042755465,0.074141909873,0.0740230927098,0.0730725554037,0.0734884154751,0.0735181197659,0.0734884154751,0.0737260498016,0.0736072326384,0.0742013184547,0.0744389527812,0.0743795441995,0.0746171785261,0.0750924471791,0.0750033343066,0.0747954042709,0.0756865329954,0.0758350544495,0.0752112643423,0.0753597857964,0.0754786029597,0.0752409686332,0.0760132801943,0.0759241673219,0.0752112643423,0.0748845171434,0.0751815600515,0.0752409686332,0.0758944630311,0.0759241673219,0.0758944630311,0.0773202689902,0.077825241934,0.0781816934238,0.0786866663676,0.0787757792401,0.0786569620768,0.0793401607656,0.0794589779288,0.0794589779288,0.0796074993829,0.0797857251278,0.0797857251278,0.0799936551635,0.0798748380002,0.080558036689,0.0804986281073,0.0807362624338,0.0802015851992,0.0805283323981,0.0800827680359,0.0801124723267,0.0808550795971,0.0806471495614,0.081033305342,0.081033305342,0.0808550795971,0.0806768538522,0.0812709396685,0.0816273911583,0.0811224182144,0.0811521225052,0.0813303482501,0.0813303482501,0.0819541383572,0.0812709396685,0.0812412353777,0.0810630096328,0.0801421766176,0.0801124723267,0.0804392195257,0.0801718809084,0.0808253753063,0.0807659667247,0.0804986281073,0.0801421766176,0.0799342465819,0.0799342465819,0.0800530637451,0.0792510478931,0.079102526439,0.0784787363319,0.0785975534952,0.0783005105871,0.0784490320411,0.0783302148779,0.0779143548065,0.0780925805514,0.0778549462248,0.0783896234595,0.0788945964033,0.0788054835309,0.078954004985,0.0790728221482,0.0794589779288,0.0791619350207,0.0790431178574,0.0783005105871,0.0779737633881,0.0776173118983,0.0772905646994,0.0765776617198,0.0770529303728,0.0773796775718,0.0771717475361,0.0773796775718,0.0771420432453,0.0768450003371,0.0763103231025,0.076547957429,0.0765776617198,0.0768450003371,0.0767261831739,0.0770826346637,0.0769935217912,0.0777955376432,0.0775579033167,0.0782113977146,0.0784490320411,0.0784193277503,0.0782411020054,0.0779737633881,0.078151989133,0.0778549462248,0.0770529303728,0.0773202689902,0.0772014518269,0.0769935217912,0.0772905646994,0.0780034676789,0.0777064247708,0.07767672048,0.0782411020054,0.0787460749493,0.0791322307299,0.0794589779288,0.079429273638,0.0788945964033,0.0787163706585,0.0784787363319,0.0779143548065,0.0787757792401,0.0793995693472,0.0793104564747,0.0792213436023,0.0782411020054,0.0783599191687,0.078627257786,0.0778846505157,0.076874704628,0.0775579033167,0.0766964788831,0.0763400273933,0.0757756458678,0.0758944630311,0.0758053501586,0.0759538716127,0.0759835759035,0.0763400273933,0.0764588445566,0.076072688776,0.0758647587403,0.0758350544495,0.0756271244137,0.0758647587403,0.0755677158321,0.0750330385975,0.0746765871077,0.0748548128526,0.0756271244137,0.0755380115413,0.0756568287046,0.0755083072505,0.0755083072505,0.0756568287046,0.0753597857964,0.0753300815056,0.0763994359749,0.0765776617198,0.0772311561177,0.0771420432453,0.0765776617198,0.077349973281,0.0783896234595,0.0779440590973,0.0789243006942,0.0791322307299,0.0796372036737,0.0798154294186,0.0797857251278,0.0794886822196,0.0794589779288,0.0792807521839,0.0792213436023,0.0793104564747,0.0794886822196,0.0791916393115,0.078954004985,0.0785084406228,0.0789837092758,0.0788351878217,0.0785678492044,0.0783005105871,0.07767672048,0.077825241934,0.0780034676789,0.078151989133,0.0779440590973,0.0782411020054,0.0776470161891,0.077349973281,0.0761618016484,0.0760429844852,0.0761320973576,0.0762509145209,0.0763994359749,0.0766073660106,0.0758647587403,0.0759835759035,0.0750033343066,0.0745577699444,0.0745280656536,0.0744983613628,0.0743498399087,0.0746468828169,0.0745577699444,0.0751815600515,0.0747656999801,0.0748251085618,0.0750627428883,0.0753003772148,0.0749736300158,0.075270672924,0.0756865329954,0.0757162372862,0.0760429844852,0.076547957429,0.0756271244137,0.0752409686332,0.0752112643423,0.0750627428883,0.0756271244137,0.0753597857964,0.0757756458678,0.0761023930668,0.0754786029597,0.0760132801943,0.0760429844852,0.0759241673219,0.0765182531382,0.0758350544495,0.075745941577,0.0760132801943,0.077023226082,0.0771420432453,0.0777955376432,0.07767672048,0.0774984947351,0.0772608604085,0.077349973281,0.0769044089188,0.0769341132096,0.0777658333524,0.0781222848422,0.0780034676789,0.0791322307299,0.0793995693472,0.079756020837,0.0803204023624,0.0813006439593,0.0812115310869,0.0819838426481,0.0828155627909,0.0828452670817,0.0837363958061,0.0832908314439,0.0838255086786,0.0840334387143,0.0846572288214,0.0853404275101,0.0846572288214,0.0846869331122,0.0847463416938,0.0845384116581,0.0847463416938,0.085518653255,0.0856671747091,0.0853701318009,0.0859642176172,0.0853404275101,0.0860830347805,0.0868256420508,0.0875682493212,0.0881623351375,0.0884890823364,0.0892910981884,0.0888455338262,0.0883405608824,0.0886673080813,0.088399969464,0.0883702651732,0.0888455338262,0.0887861252446,0.0889643509895,0.0895287325149,0.0897366625506,0.089677253969,0.090004001168,0.0903901569486,0.0911030599281,0.0910139470557,0.0915486242903,0.0918159629077,0.0923209358515,0.0928259087954,0.0924694573056,0.0922318229791,0.092558570178,0.093687333229,0.0938952632647,0.0942814190453,0.0945190533718,0.094489349081,0.0946972791167,0.0942220104636,0.0944002362085,0.0943111233361,0.0941923061728,0.0942220104636,0.0937467418106,0.0943408276269,0.0949943220248,0.095439886387,0.0953804778054,0.0963013108206,0.0951428434789,0.095439886387,0.0947863919891,0.0952616606421,0.0957072250044,0.0956775207135,0.0959448593309,0.0954695906778,0.0961824936574,0.0961824936574,0.0953210692238,0.0944002362085,0.095439886387,0.0955289992595,0.0961824936574,0.0968953966369,0.0967765794737,0.0963310151115,0.0953804778054,0.095291364933,0.0951428434789,0.0950537306064,0.0945784619534,0.0951725477697,0.0949349134432,0.0949052091524,0.0949943220248,0.094637870535,0.0954695906778,0.0954101820962,0.0952022520605,0.0947863919891,0.0949943220248,0.0937467418106,0.093835854683,0.0938061503922,0.0941031933004,0.0929150216678,0.09336058603,0.0933011774484,0.092885317377,0.0930635431219,0.0922021186882,0.092083301525,0.0930635431219,0.0942517147544,0.0942517147544,0.0944002362085,0.0946675748259,0.0946972791167,0.0946972791167,0.0952319563513,0.0957963378768,0.0957369292952,0.0957072250044,0.0956181121319,0.0959448593309,0.0958854507492,0.0959151550401,0.0960933807849,0.0969251009278,0.0977568210706,0.097845933943,0.0968953966369,0.0972815524175,0.0969251009278,0.0972815524175,0.0979944553971,0.0993014441929,0.0993014441929,0.0988261755399,0.0989449927031,0.0987964712491,0.099449965647,0.100073755754,0.100073755754,0.100073755754,0.100400502953,0.100162868627,0.0997470085551,0.0985291326317,0.0989152884123,0.0985885412134,0.0984994283409,0.0988558798307,0.0980835682695,0.097845933943,0.0982914983052,0.0982023854328,0.0984697240501,0.0995984871011,0.0998955300092,0.0995093742286,0.0992717399021,0.0982023854328,0.0976380039073,0.0972221438359,0.0977865253614,0.0978162296522,0.0981132725603,0.0982914983052,0.0979053425246,0.0968359880553,0.0967171708921,0.0974597781624,0.0978756382338,0.0975488910349,0.0967171708921,0.0960339722033,0.0955884078411,0.0953210692238,0.0948755048616,0.0945784619534,0.0945487576626,0.0948755048616,0.0944596447901,0.0950240263156,0.094964617734,0.094489349081,0.094637870535,0.0948755048616,0.0947863919891,0.0948755048616,0.0947269834075,0.0946972791167,0.094489349081,0.0950240263156,0.0954992949687,0.0959151550401,0.0963607194023,0.0967765794737,0.0969845095094,0.0963904236931,0.0965092408564,0.0962716065298,0.0974894824532,0.0982023854328,0.0979350468154,0.09737066529,0.0971924395451,0.0971033266726,0.0971033266726,0.0974300738716,0.0979350468154,0.098321202596,0.0988261755399,0.0992420356113,0.0988261755399,0.0989152884123,0.0991826270297,0.0982320897236,0.0989449927031,0.0992717399021,0.0994796699378,0.100103460045,0.0998658257184,0.100311390081,0.100816363024,0.100073755754,0.100133164336,0.0998955300092,0.099449965647,0.0987073583766,0.0982914983052,0.0982320897236,0.0976677081981,0.0976380039073,0.0972815524175,0.0971033266726,0.0960042679125,0.0959151550401,0.0964498322747,0.096568649438,0.0968656923461,0.0975488910349,0.0973112567083,0.097043918091,0.0966577623104,0.0968656923461,0.0972815524175,0.0968953966369,0.0969845095094,0.0972221438359,0.0966874666012,0.0974597781624,0.0967765794737,0.0972221438359,0.0976974124889,0.0972518481267,0.0974300738716,0.0972815524175,0.0968656923461,0.0968953966369,0.0964795365655,0.0966577623104,0.0968359880553,0.0984400197593,0.0988261755399,0.0989152884123,0.0996281913919,0.100578728698,0.10173719604,0.102182760402,0.103133297708,0.103875904978,0.104826442284,0.1057472753,0.106965151223,0.107796871366,0.109490015942,0.110648483284,0.110678187575,0.111658429172,0.112430740733,0.113559503784,0.114391223927,0.114688266835,0.115519986978,0.116084368503,0.117124018682,0.117599287335,0.11780721737,0.118371598896,0.118638937513,0.119292431911,0.119886517727,0.120183560636,0.120747942161,0.121371732268,0.121698479467,0.120807350743,0.120064743472,0.11926272762,0.119381544784,0.118431007477,0.117450765881,0.116886384355,0.115638804141,0.114599153962,0.11269807935,0.111658429172,0.110113806049,0.107915688529,0.106608699733,0.10503437232,0.104796737994,0.10319270629,0.101261927387,0.10063813728,0.0989152884123,0.0981429768511,0.0972221438359,0.0953210692238,0.094162601882,0.0927665002137,0.0913406942546,0.0897960711323,0.0888158295354,0.0874791364487,0.0865285991427,0.0860533304896,0.0854295403825,0.0849839760203,0.0841522558775,0.0836769872245,0.0838255086786,0.0836472829337,0.0826076327552,0.082637337046,0.0826967456276,0.0816867997399,0.0824294070103,0.0821026598113,0.0822214769746,0.0814788697042,0.0814491654134,0.0818650254848,0.0815679825767,0.0820729555205,0.0823997027195,0.0823997027195,0.0828749713725,0.0825185198827,0.0834096486072,0.0836472829337,0.0834987614796,0.0836175786429,0.0828452670817,0.0826076327552,0.0828749713725,0.0829937885357,0.082637337046,0.0826967456276,0.082310589847,0.0821323641021,0.0821323641021,0.0817759126124,0.0816867997399,0.0817165040307,0.0811818267961,0.0810630096328,0.0815976868675,0.0812412353777,0.0813303482501,0.0812115310869,0.0805283323981,0.0793995693472,0.079429273638,0.079429273638,0.0791916393115,0.0793401607656,0.0791916393115,0.0790134135666,0.0787163706585,0.079102526439,0.078627257786,0.0777658333524,0.0771420432453,0.0765182531382,0.0765776617198,0.0766964788831,0.0769044089188,0.0768450003371,0.0764588445566,0.0766667745923,0.077023226082,0.0770529303728,0.0777658333524,0.0774984947351,0.077023226082,0.0767261831739,0.0767261831739,0.0771420432453,0.077349973281,0.0772014518269,0.0763697316841,0.0766964788831,0.0760429844852,0.0769935217912,0.0765182531382,0.0774984947351,0.0777658333524,0.0781222848422,0.0774390861534,0.077023226082,0.0777955376432,0.077825241934,0.0776173118983,0.0773202689902,0.0779143548065,0.0782113977146,0.0784787363319,0.0785975534952,0.0782411020054,0.0782708062962,0.0794589779288,0.079429273638,0.0789243006942,0.0784193277503,0.0782411020054,0.0781816934238,0.0773202689902,0.0775281990259,0.0775876076075,0.0777955376432,0.0777064247708,0.0772311561177,0.0777361290616,0.0779143548065,0.0782113977146,0.0783302148779,0.0786569620768,0.0785975534952,0.079102526439,0.0788648921125,0.079102526439,0.0792213436023,0.078954004985,0.0788945964033,0.0780331719697,0.0779737633881,0.07767672048,0.0772311561177,0.0767855917555,0.0764291402657,0.0763400273933,0.0758350544495,0.0763697316841,0.0760132801943,0.0756271244137,0.0760429844852,0.0766370703014,0.0772608604085,0.077023226082,0.0771123389545,0.0772608604085,0.0771123389545,0.0768152960463,0.0769044089188,0.0767855917555,0.076874704628,0.0766073660106,0.0766964788831,0.0769935217912,0.0765776617198,0.0768152960463,0.0763103231025,0.0766370703014,0.0771420432453,0.0768450003371,0.0768152960463,0.0773796775718,0.0779440590973,0.0779737633881,0.0776173118983,0.0780925805514,0.0783005105871,0.078151989133,0.0785381449136,0.0788648921125,0.0791916393115,0.0795480908013,0.0799936551635,0.0790134135666,0.0786569620768,0.0782708062962,0.0783896234595,0.0783599191687,0.0780925805514,0.078627257786,0.0788648921125,0.0788351878217,0.0785084406228,0.0788648921125,0.0791322307299,0.0789837092758,0.0790134135666,0.0786866663676,0.0783896234595,0.0782708062962,0.0785084406228,0.0780925805514,0.0777064247708,0.0779440590973,0.0781816934238,0.0785678492044,0.0779737633881,0.0787460749493,0.0788351878217,0.0785975534952,0.0785975534952,0.0789243006942,0.0788945964033,0.0787757792401,0.0787163706585,0.0781222848422,0.0779143548065,0.0782113977146,0.0785381449136,0.0795183865104,0.078954004985,0.0789243006942,0.0787460749493,0.0785084406228,0.0788054835309,0.0798451337094,0.0798154294186,0.0794589779288,0.0792213436023,0.0791322307299,0.079102526439,0.0791916393115,0.0795777950921,0.0799639508727,0.08023128949,0.0803798109441,0.0800233594543,0.0794886822196,0.0790134135666,0.079429273638,0.0796372036737,0.079102526439,0.0791322307299,0.0788945964033,0.078954004985,0.0788648921125,0.0788945964033,0.0790134135666,0.0793401607656,0.0789837092758,0.0793401607656,0.0796669079645,0.0790431178574,0.0788945964033,0.0792213436023,0.0801718809084,0.0798748380002,0.0795480908013,0.0793698650564,0.0787757792401,0.0784193277503,0.0785084406228,0.0778846505157,0.0782411020054,0.0779737633881,0.078151989133,0.0784490320411,0.0778549462248,0.0778846505157,0.0776173118983,0.0778846505157,0.0784787363319,0.0787757792401,0.0777955376432,0.0784193277503,0.0783005105871,0.0783896234595,0.0788351878217,0.0790431178574,0.0784490320411,0.0781816934238,0.0785975534952,0.0785084406228,0.079102526439,0.0784787363319,0.0788648921125,0.078954004985,0.0785381449136,0.078627257786,0.0777955376432,0.0777361290616,0.0776173118983,0.07767672048,0.0780331719697,0.0778549462248,0.0780628762605,0.0785084406228,0.0780925805514,0.0784787363319,0.0779440590973,0.0779737633881,0.0779143548065,0.0776173118983,0.0779737633881,0.078151989133,0.0775876076075,0.0772014518269,0.0777064247708,0.0766370703014,0.0763400273933,0.0763994359749,0.0758350544495,0.075270672924,0.0753300815056,0.0762509145209,0.0761915059392,0.0758350544495,0.075419194378,0.0755677158321,0.0746171785261,0.0754488986689,0.0750924471791,0.075270672924,0.0753894900872,0.0759241673219,0.0766667745923,0.0759835759035,0.0758647587403,0.0765776617198,0.076547957429,0.0769044089188,0.0771123389545,0.077023226082,0.0775579033167,0.0774687904442,0.0777361290616,0.0780925805514,0.0779440590973,0.0782411020054,0.0790728221482,0.079756020837,0.0796966122553,0.080558036689,0.0812115310869,0.0806768538522,0.0806174452706,0.0807362624338,0.0813897568318,0.0810630096328,0.0808253753063,0.0814194611226,0.0815679825767,0.0819244340664,0.0820729555205,0.0813303482501,0.0816570954491,0.0817165040307,0.0817759126124,0.0818650254848,0.0815976868675,0.0826670413368,0.0824294070103,0.0825482241735,0.082310589847,0.0823699984286,0.0827264499184,0.0826967456276,0.0834987614796,0.0837066915153,0.0833502400255,0.0833799443163,0.0832017185714,0.0832017185714,0.0828749713725,0.0825185198827,0.0821026598113,0.0815976868675,0.0814788697042,0.0821917726838,0.0828452670817,0.082637337046,0.0823402941378,0.0822214769746,0.0819244340664,0.0811818267961,0.0812412353777,0.0813600525409,0.081835321194,0.0821026598113,0.0829046756633,0.0818056169032,0.0822214769746,0.0814788697042,0.0819541383572,0.0813006439593,0.0816570954491,0.0819244340664,0.0820729555205,0.0817759126124,0.0813303482501,0.0810927139236,0.0799639508727,0.0797263165462,0.0798451337094,0.0789243006942,0.0788945964033,0.0783302148779,0.0777361290616,0.0774687904442,0.0777658333524,0.077825241934,0.0770826346637,0.0769638175004,0.0769044089188,0.0776173118983,0.077349973281,0.0772014518269,0.077023226082,0.0773796775718,0.0774687904442,0.0772014518269,0.0767855917555,0.0767261831739,0.0769341132096,0.0780034676789,0.077825241934,0.0786569620768,0.078954004985,0.0790431178574,0.0787460749493,0.0780628762605,0.0780628762605,0.078151989133,0.0783599191687,0.0791619350207,0.0800827680359,0.0801421766176,0.0798154294186,0.0801718809084,0.0804689238165,0.0800530637451,0.0801124723267,0.0800530637451,0.0803501066533,0.0806471495614,0.080558036689,0.0804689238165,0.0804392195257,0.0803204023624,0.0804986281073,0.0800530637451,0.0804095152349,0.0803501066533,0.0801718809084,0.079756020837,0.0795183865104,0.0790134135666,0.0782411020054,0.0775281990259,0.0773202689902,0.0772014518269,0.0766964788831,0.0771717475361,0.0768450003371,0.0773202689902,0.0768450003371,0.0763697316841,0.0763400273933,0.0757162372862,0.0750627428883,0.0748548128526,0.0755380115413,0.0758944630311,0.0759538716127,0.0773202689902,0.0776173118983,0.078627257786,0.0782113977146,0.0785381449136,0.0792213436023,0.0786866663676,0.0786866663676,0.0785975534952,0.078954004985,0.0787460749493,0.0790728221482,0.079102526439,0.0788648921125,0.0794589779288,0.0801421766176,0.0809738967604,0.0811818267961,0.0817462083215,0.0816570954491,0.0823402941378,0.0824591113011,0.0818650254848,0.0824591113011,0.0821620683929,0.0823699984286,0.0825779284643,0.0823997027195,0.0823402941378,0.082310589847,0.0821323641021,0.0820135469389,0.0817759126124,0.0813303482501,0.0803501066533,0.0805283323981,0.0791619350207,0.0789243006942,0.078954004985,0.078954004985,0.0793995693472,0.0790728221482,0.0793995693472,0.0790134135666,0.0797857251278,0.0793698650564,0.0794589779288,0.0795777950921,0.0793995693472,0.0795777950921,0.0790134135666,0.0782113977146,0.0778846505157,0.0776173118983,0.0771123389545,0.0768152960463,0.0765776617198,0.0767855917555,0.0764291402657,0.0766370703014,0.0774093818626,0.0777064247708,0.0775876076075,0.0780925805514,0.0783302148779,0.0779440590973,0.0780925805514,0.0785975534952,0.0785084406228,0.0783302148779,0.0785678492044,0.0788054835309,0.0786569620768,0.0786866663676,0.0792213436023,0.079429273638,0.0797263165462,0.0800827680359,0.0795777950921,0.079756020837,0.0799639508727,0.080558036689,0.0805283323981,0.0804392195257,0.081508573995,0.0819244340664,0.0816570954491,0.0818650254848,0.0822214769746,0.082310589847,0.0832908314439,0.0829640842449,0.0833799443163,0.0836175786429,0.0832017185714,0.0826670413368,0.0829343799541,0.083439352898,0.0836175786429,0.0838552129694,0.0831423099898,0.0827264499184,0.0825779284643,0.083112605699,0.0840928472959,0.0846869331122,0.0844492987857,0.0839740301326,0.083587874352,0.0837661000969,0.0833205357347,0.0828452670817,0.0836472829337,0.0837363958061,0.0839740301326,0.0841225515867,0.0845978202397,0.0819838426481,0.0788648921125,0.076547957429,0.0747954042709,0.0726566953323,0.0698941962865,0.0674287401489,0.0643394939042,0.0619037420574,0.0596165116647,0.0570619426547,0.0545073736446,0.0524280732876,0.0500220257316,0.046754553742,0.0441702804412,0.041793937176)
m <- c(0.0437410872335,0.0459400277601,0.0479012449866,0.0498327468006,0.0520911181523,0.0545277819792,0.0564295683807,0.0588068013825,0.0609165956716,0.0625212279478,0.0648093147121,0.067364840189,0.0695043498907,0.0718221520674,0.074466823782,0.0764280410085,0.0789835664854,0.0791618589605,0.0792807206106,0.0799344596861,0.0803504754615,0.0805881987616,0.0809447837119,0.0808556374743,0.0799047442736,0.0791915743731,0.079072712723,0.0794292976733,0.079072712723,0.0795184439108,0.079132143548,0.0792212897856,0.0790132818979,0.0789835664854,0.0785675507101,0.0788349894228,0.0789241356604,0.0793104360232,0.0793698668482,0.0786269815351,0.079696736386,0.0792510051981,0.0798453134486,0.0808853528869,0.0804693371115,0.0801721829863,0.0797858826235,0.079696736386,0.0791618589605,0.0796075901484,0.0795184439108,0.0792807206106,0.0788944202478,0.0782109657598,0.0784189736475,0.077824665397,0.0769034876088,0.0763388947709,0.0769926338464,0.0777949499845,0.0769332030213,0.0763388947709,0.0767251951337,0.0769034876088,0.0777058037469,0.0780326732847,0.0787458431852,0.0778840962221,0.0780623886972,0.0781515349348,0.078389258235,0.07844868906,0.0789241356604,0.0793698668482,0.0793104360232,0.0794590130858,0.079132143548,0.0788944202478,0.0793995822607,0.079132143548,0.0796670209734,0.079696736386,0.0794292976733,0.0791024281355,0.0790132818979,0.0788944202478,0.0784784044725,0.0785675507101,0.0783001119974,0.0784189736475,0.0791024281355,0.0791915743731,0.0796670209734,0.0796373055609,0.080380190874,0.081063645362,0.0802910446364,0.0801424675738,0.0799047442736,0.0802613292239,0.0791618589605,0.0795184439108,0.0792807206106,0.0793104360232,0.0796373055609,0.0793995822607,0.0791618589605,0.0789241356604,0.0783001119974,0.0785972661226,0.0783595428224,0.078508119885,0.0785675507101,0.0794887284983,0.079815598036,0.079756167211,0.0802018983988,0.0798750288611,0.0799938905112,0.0806773449992,0.0809150682994,0.0809150682994,0.0811527915996,0.0818362460876,0.0818659615001,0.0818065306751,0.0809744991244,0.0807962066493,0.0805584833491,0.0802910446364,0.080439621699,0.0803504754615,0.0799047442736,0.0795778747359,0.0801721829863,0.0799344596861,0.0804693371115,0.079696736386,0.0793104360232,0.0794590130858,0.0794887284983,0.079696736386,0.0795184439108,0.0796670209734,0.0797264517985,0.0793995822607,0.0789241356604,0.0785378352976,0.0780029578722,0.0780623886972,0.078508119885,0.0793995822607,0.0789835664854,0.0785675507101,0.0787755585978,0.0788052740103,0.0787458431852,0.0776463729219,0.0771114954965,0.0772303571466,0.0769034876088,0.0768143413713,0.077081780084,0.0766657643086,0.0773195033841,0.0771709263215,0.0777355191595,0.0766657643086,0.076457756421,0.0763686101834,0.0759228789956,0.076457756421,0.0764280410085,0.0760417406457,0.0759228789956,0.0766063334836,0.0767251951337,0.0765766180711,0.0767549105462,0.0766954797212,0.0766657643086,0.0765469026585,0.0769332030213,0.0766657643086,0.0761606022958,0.075833732758,0.0761903177083,0.0762794639458,0.076457756421,0.077141210909,0.0769034876088,0.0773195033841,0.0781812503473,0.0780623886972,0.0787755585978,0.0783001119974,0.0783298274099,0.0783595428224,0.0780326732847,0.0780921041097,0.0774977958593,0.0779732424596,0.077765234572,0.0785972661226,0.0782406811723,0.0782703965849,0.0780921041097,0.0782109657598,0.0781218195223,0.0769926338464,0.076517187246,0.0772897879716,0.0774977958593,0.0777949499845,0.077200641734,0.077141210909,0.0767846259587,0.077824665397,0.0780029578722,0.077824665397,0.0776760883344,0.0779732424596,0.077765234572,0.077081780084,0.0771114954965,0.0770223492589,0.076517187246,0.0763686101834,0.0754771478077,0.075774301933,0.0752394245075,0.0753582861576,0.0754771478077,0.0755365786328,0.0755960094578,0.075833732758,0.0757148711079,0.0748531241448,0.0757445865204,0.0754771478077,0.0755068632203,0.075893163583,0.0761308868832,0.0767549105462,0.0773195033841,0.0768737721963,0.0769034876088,0.0768737721963,0.0777058037469,0.0776760883344,0.0777949499845,0.0766954797212,0.0763983255959,0.0757148711079,0.0759228789956,0.0761903177083,0.075774301933,0.0756554402829,0.0757445865204,0.0756257248703,0.0755365786328,0.0751799936825,0.0755662940453,0.0760714560582,0.0766954797212,0.0761308868832,0.0756851556954,0.0758634481705,0.0761606022958,0.0760714560582,0.0761606022958,0.0765766180711,0.0764874718335,0.0772303571466,0.0773195033841,0.0779138116346,0.0773789342092,0.0766063334836,0.0769034876088,0.0762497485333,0.0755662940453,0.07515027827,0.0756257248703,0.0761903177083,0.0757445865204,0.0760714560582,0.0760417406457,0.0780623886972,0.0769332030213,0.0762794639458,0.0766360488961,0.0765469026585,0.0760417406457,0.0760417406457,0.0759525944081,0.0762200331208,0.0770223492589,0.0766063334836,0.0762497485333,0.0768143413713,0.0774086496217,0.0771114954965,0.0763686101834,0.0767846259587,0.0772897879716,0.0776760883344,0.077765234572,0.0776760883344,0.0779732424596,0.077141210909,0.0766657643086,0.0776166575094,0.0770520646714,0.0773195033841,0.0776463729219,0.0785972661226,0.0786864123602,0.0788944202478,0.0791915743731,0.0790429973105,0.079132143548,0.0782109657598,0.0787161277727,0.0789241356604,0.0789835664854,0.0795778747359,0.0798453134486,0.0802613292239,0.081004214537,0.0815093765498,0.0808556374743,0.0816579536125,0.0821631156253,0.0824602697506,0.0820739693878,0.0819253923252,0.0822819772754,0.0813905148998,0.0812122224246,0.081063645362,0.0808853528869,0.081123076187,0.0806773449992,0.0804693371115,0.081004214537,0.0809447837119,0.0807070604117,0.0805881987616,0.0813310840747,0.081123076187,0.0803504754615,0.0793995822607,0.0794292976733,0.0798453134486,0.0801127521613,0.0794590130858,0.0802910446364,0.0801424675738,0.0798453134486,0.0793698668482,0.0794590130858,0.079756167211,0.0793698668482,0.0793698668482,0.079756167211,0.0789835664854,0.0784189736475,0.0783298274099,0.0779732424596,0.0781218195223,0.07844868906,0.0791618589605,0.0793104360232,0.0788944202478,0.0784784044725,0.0776166575094,0.0780326732847,0.0784189736475,0.0787161277727,0.0786864123602,0.0791618589605,0.079072712723,0.0783001119974,0.0778543808095,0.0779138116346,0.0786269815351,0.0789538510729,0.0788052740103,0.0791915743731,0.0799641750987,0.0793401514357,0.0796670209734,0.0804099062865,0.0799047442736,0.0796373055609,0.0796075901484,0.0795778747359,0.0792510051981,0.0791915743731,0.0794887284983,0.0799641750987,0.0797264517985,0.079815598036,0.0798453134486,0.0799344596861,0.0802316138114,0.0796373055609,0.0799938905112,0.0804990525241,0.0805881987616,0.0802316138114,0.0796075901484,0.0793995822607,0.079132143548,0.079132143548,0.079072712723,0.079072712723,0.0795778747359,0.0799344596861,0.0794590130858,0.0792510051981,0.0792212897856,0.0782703965849,0.0787458431852,0.0789241356604,0.0784189736475,0.0781218195223,0.0784784044725,0.0794292976733,0.079132143548,0.0789241356604,0.0796075901484,0.0794590130858,0.0795778747359,0.0791618589605,0.0789241356604,0.0789538510729,0.0795778747359,0.0796075901484,0.0787161277727,0.0786864123602,0.0791915743731,0.0785972661226,0.0788052740103,0.0792807206106,0.0797858826235,0.0800830367488,0.0801424675738,0.0804990525241,0.0806179141742,0.0809150682994,0.0801127521613,0.0798750288611,0.0795778747359,0.0800533213362,0.0795778747359,0.0799344596861,0.0788052740103,0.0795184439108,0.0801424675738,0.0806773449992,0.0811527915996,0.0801424675738,0.080439621699,0.0802910446364,0.0801721829863,0.0801424675738,0.079756167211,0.0798453134486,0.0804990525241,0.0815093765498,0.0813905148998,0.0821036848003,0.0825197005756,0.0829060009384,0.083054578001,0.0834111629513,0.0834408783638,0.0831140088261,0.0833814475388,0.0832923013012,0.0837083170765,0.0835003091889,0.083738032489,0.0837083170765,0.0841540482644,0.0840946174393,0.0841540482644,0.0837083170765,0.0842729099145,0.0853129493528,0.0859072576032,0.0851643722901,0.0851049414651,0.0845700640397,0.0843917715645,0.0844512023896,0.084302625327,0.0847186411023,0.083619170839,0.0835597400139,0.0834111629513,0.0833517321263,0.0830842934135,0.082311692688,0.0815093765498,0.0811825070121,0.0814202303123,0.0815688073749,0.0804099062865,0.081123076187,0.0808259220618,0.0809447837119,0.0807070604117,0.0813013686622,0.0808853528869,0.0804990525241,0.0807070604117,0.081004214537,0.0806179141742,0.0809744991244,0.081004214537,0.0813905148998,0.0810933607745,0.0802316138114,0.080380190874,0.0807962066493,0.0807070604117,0.0809744991244,0.0808259220618,0.0815985227874,0.0815390919624,0.0821334002128,0.0830248625885,0.0826385622257,0.0823414081005,0.0825197005756,0.0830248625885,0.0833814475388,0.083738032489,0.0838866095517,0.083738032489,0.0834408783638,0.083619170839,0.0831437242386,0.0830842934135,0.0832328704762,0.0834705937763,0.0827871392883,0.0832031550636,0.0835894554264,0.0837677479016,0.0833220167137,0.0838866095517,0.0839757557892,0.0845403486272,0.0848077873399,0.0854318110028,0.0854318110028,0.0851940877027,0.0859072576032,0.0855506726529,0.0852535185277,0.0853426647653,0.0850157952275,0.0854912418279,0.0852238031152,0.0847483565148,0.0854318110028,0.0860558346658,0.0855506726529,0.0853723801778,0.0852535185277,0.0859072576032,0.0851940877027,0.0852832339402,0.0862044117284,0.0868878662165,0.0867987199789,0.0872741665793,0.0879279056548,0.0881656289549,0.0884924984927,0.0883736368426,0.0884924984927,0.0891462375682,0.0900376999439,0.0909885931446,0.0929795257836,0.0939007035718,0.0944652964098,0.0945544426473,0.0958322053858,0.0974962684871,0.0974071222495,0.0987740312255,0.100140940202,0.101567280003,0.102666750266,0.103350204754,0.104568536667,0.106797192607,0.107718370395,0.108639548183,0.110333326697,0.111254504485,0.112383690161,0.113364298774,0.11473120775,0.116187262964,0.116692424977,0.117494741115,0.119039942566,0.120198843654,0.120050266592,0.121060590618,0.12156575263,0.122308637944,0.123289246557,0.122249207119,0.122368068769,0.121714329693,0.120704005667,0.119545104579,0.119426242929,0.118980511741,0.118326772666,0.11719758699,0.117019294515,0.115800962601,0.114909500225,0.11449348445,0.113720883724,0.113572306662,0.113007713824,0.111403081548,0.110630480822,0.109441864321,0.109531010559,0.108461255708,0.106975485082,0.105668006931,0.105281706568,0.10436052878,0.103795935942,0.103647358879,0.102637034854,0.101329556703,0.100378663502,0.0996060627762,0.0989820391132,0.0985065925128,0.0982094383876,0.0985363079254,0.0978231380248,0.0977339917873,0.0967236677615,0.0966345215239,0.0956836283232,0.0959213516234,0.0958322053858,0.0959510670359,0.0957133437357,0.0966048061114,0.0963076519862,0.095445905023,0.0950001738352,0.0942275731096,0.0937521265092,0.0939304189843,0.0944058655847,0.0951784663103,0.0951190354853,0.0952676125479,0.0962779365736,0.0963967982237,0.0963373673987,0.0969613910617,0.0969019602366,0.0967236677615,0.0970505372992,0.0975556993121,0.0984471616878,0.098060861325,0.0990117545257,0.0991900470009,0.099308908651,0.0989523237007,0.099368339476,0.0998140706638,0.100289517264,0.101210695052,0.101596995415,0.101805003303,0.102102157428,0.101923864953,0.101567280003,0.101121548815,0.10129984129,0.102042726603,0.102131872841,0.102369596141,0.102963904391,0.102369596141,0.102518173203,0.103082766041,0.101834718715,0.102013011191,0.10165642624,0.101121548815,0.100675817627,0.100051793964,0.0995763473637,0.0991009007633,0.0988037466381,0.0984471616878,0.0984768771003,0.0986551695755,0.0975259838996,0.0978528534373,0.0974071222495,0.0977042763747,0.0977339917873,0.0973179760119,0.097436837662,0.0973476914245,0.0981797229751,0.0981500075626,0.0977637071998,0.0977042763747,0.0979717150874,0.0979122842624,0.0980905767375,0.0972288297744,0.0976448455497,0.0971396835368,0.0960996440985,0.0964265136363,0.0953270433729,0.0954161896105,0.0954756204355,0.0952081817228,0.095445905023,0.0964859444613,0.096129359511,0.0960996440985,0.0964859444613,0.0962185057486,0.0960996440985,0.0963076519862,0.0965156598738,0.0967830985865,0.0972585451869,0.0974665530745,0.0977339917873,0.0985660233379,0.0982094383876,0.098684884988,0.0985065925128,0.0984471616878,0.0975556993121,0.0977934226123,0.097436837662,0.0973179760119,0.0974071222495,0.0979419996749,0.097436837662,0.0977934226123,0.0977042763747,0.0984768771003,0.0996060627762,0.0994872011261,0.099308908651,0.0978825688499,0.0985660233379,0.0988037466381,0.0984768771003,0.0977934226123,0.0984174462753,0.0990117545257,0.0986551695755,0.0990414699383,0.0984174462753,0.0988037466381,0.0986254541629,0.0985957387504,0.0991009007633,0.0988928928756,0.0983877308628,0.0979122842624,0.0981797229751,0.097436837662,0.0975854147246,0.0965750906989,0.0966642369364,0.0958619207983,0.0965156598738,0.0966345215239,0.0962185057486,0.0958024899733,0.0963076519862,0.0962185057486,0.0962185057486,0.095505335848,0.0946138734724,0.0947921659475,0.0960104978609,0.0960104978609,0.0958619207983,0.0958322053858,0.0956836283232,0.0961590749235,0.0962185057486,0.094762450535,0.095386474198,0.0958322053858,0.0963373673987,0.0960104978609,0.0964562290488,0.0968722448241,0.0962482211611,0.0961590749235,0.0960104978609,0.096069928686,0.0960996440985,0.0960996440985,0.0955647666731,0.0955350512606,0.0950001738352,0.095445905023,0.0952973279604,0.0946138734724,0.09482188136,0.0943761501722,0.0939601343969,0.0941087114595,0.0939898498094,0.0944652964098,0.0944950118223,0.0945247272348,0.0940195652219,0.094078996047,0.0938412727468,0.0940195652219,0.094078996047,0.0939007035718,0.0932469644963,0.0944058655847,0.0941087114595,0.0933063953214,0.0931578182588,0.0929795257836,0.0921177788205,0.0909885931446,0.0906022927818,0.0896513995811,0.0896216841685,0.0887599372054,0.0884924984927,0.0890570913306,0.0883142060175,0.0884924984927,0.0887896526179,0.0884924984927,0.0886410755553,0.0891165221557,0.0894136762809,0.0893542454558,0.088967945093,0.0884330676676,0.0880170518923,0.087601036117,0.0869472970415,0.0869472970415,0.0861746963159,0.0858478267782,0.0857586805406,0.085610103478,0.0854020955903,0.0851346568776,0.0848672181649,0.0840351866143,0.0835300246014,0.0832625858887,0.0833814475388,0.0832625858887,0.082995147176,0.0826979930508,0.0828168547008,0.0826682776382,0.0821631156253,0.0820739693878,0.0821928310379,0.0813607994872,0.081687669025,0.0818362460876,0.0814796611373,0.081063645362,0.0802018983988,0.0793698668482,0.0785972661226,0.0781218195223,0.078389258235,0.077765234572,0.0773492187967,0.0768737721963,0.0767549105462,0.0761903177083,0.0762497485333,0.0766954797212,0.0766063334836,0.0765469026585,0.0766657643086,0.0766063334836,0.077200641734,0.0771114954965,0.0770223492589,0.0774680804468,0.0763983255959,0.0754177169827,0.07515027827,0.0752691399201,0.0747045470821,0.0749719857948,0.0753285707451,0.0751799936825,0.0740508080066,0.0742588158943,0.0737833692939,0.0742291004818,0.074466823782,0.0752394245075,0.0750314166199,0.0754474323952,0.0752691399201,0.0760120252331,0.075833732758,0.0766063334836,0.0772897879716,0.0767251951337,0.0767549105462,0.0763686101834,0.0769926338464,0.0766657643086,0.0766360488961,0.0763983255959,0.0765469026585,0.0768737721963,0.0761903177083,0.0762497485333,0.0760417406457,0.0753880015702,0.0759525944081,0.0765469026585,0.0763686101834,0.0765469026585,0.077141210909,0.077081780084,0.0761606022958,0.0770520646714,0.0782109657598,0.0782703965849,0.0786566969477,0.0779732424596,0.0784784044725,0.0782109657598,0.0782703965849,0.0782703965849,0.0785378352976,0.0784784044725,0.0786269815351,0.0779138116346,0.0772303571466,0.0777058037469,0.0777058037469,0.0775275112718,0.077081780084,0.0775572266843,0.0768440567838,0.0767549105462,0.0766657643086,0.0759228789956,0.0762497485333,0.0760714560582,0.0766063334836,0.0764874718335,0.0771709263215,0.0769332030213,0.0774086496217,0.0772600725591,0.0767251951337,0.0763091793584,0.0773195033841,0.0767846259587,0.0761606022958,0.0762497485333,0.076517187246,0.0767251951337,0.0761011714707,0.0754474323952,0.0760120252331,0.0761903177083,0.0766657643086,0.0764874718335,0.075893163583,0.0773492187967,0.0778840962221,0.078508119885,0.0785378352976,0.079132143548,0.0792212897856,0.0787458431852,0.079132143548,0.0791024281355,0.07844868906,0.0790132818979,0.0789241356604,0.0795184439108,0.0792807206106,0.079815598036,0.0792212897856,0.0791618589605,0.079696736386,0.079696736386,0.0797264517985,0.0806179141742,0.0805881987616,0.079756167211,0.0798750288611,0.0800236059237,0.0797264517985,0.0802316138114,0.0802018983988,0.0803504754615,0.0791618589605,0.0792212897856,0.0790429973105,0.0792510051981,0.0800830367488,0.0789538510729,0.0786269815351,0.0783595428224,0.0781218195223,0.077824665397,0.0775275112718,0.077765234572,0.0779732424596,0.077765234572,0.0781218195223,0.0774680804468,0.0780623886972,0.0773789342092,0.0772600725591,0.0772897879716,0.0775869420968,0.0780921041097,0.0776760883344,0.0781812503473,0.0787755585978,0.0779435270471,0.0783595428224,0.0793698668482,0.0793401514357,0.0789835664854,0.079696736386,0.0791024281355,0.0791915743731,0.0796075901484,0.0804990525241,0.0801127521613,0.0803207600489,0.0801721829863,0.0795778747359,0.0796670209734,0.0802613292239,0.0804693371115,0.0808259220618,0.0807367758243,0.0807962066493,0.0810339299495,0.080380190874,0.0802613292239,0.0800830367488,0.0805287679366,0.0800533213362,0.080380190874,0.0806476295867,0.0805584833491,0.0802316138114,0.079815598036,0.0795184439108,0.0793995822607,0.0793698668482,0.0794292976733,0.0787458431852,0.0781812503473,0.0779138116346,0.0774086496217,0.0765469026585,0.0766954797212,0.0759823098206,0.0759823098206,0.0760417406457,0.0766657643086,0.0767846259587,0.0766657643086,0.0770520646714,0.0773195033841,0.0769629184339,0.0768440567838,0.077081780084,0.0780921041097,0.0781812503473,0.0780029578722,0.0779138116346,0.0780326732847,0.0784189736475,0.0781515349348,0.0775275112718,0.077141210909,0.0769629184339,0.0767549105462,0.076517187246,0.0766954797212,0.0773789342092,0.0772897879716,0.0768440567838,0.0777058037469,0.0778840962221,0.0777949499845,0.0773195033841,0.0773789342092,0.0776760883344,0.0779138116346,0.078508119885,0.0778840962221,0.0774680804468,0.076517187246,0.0757148711079,0.0756257248703,0.0755068632203,0.0752394245075,0.0750017012074,0.0753880015702,0.0754771478077,0.0744965391945,0.074466823782,0.0743479621319,0.075209709095,0.0749422703823,0.0753880015702,0.0755960094578,0.0755365786328,0.0759228789956,0.0759228789956,0.0758040173455,0.0761606022958,0.0761308868832,0.0757148711079,0.0750908474449,0.0755068632203,0.074466823782,0.07515027827,0.0753582861576,0.0756257248703,0.0757148711079,0.0754474323952,0.0746154008446,0.0741696696567,0.0744073929569,0.0743479621319,0.0750908474449,0.0750611320324,0.07515027827,0.0755365786328,0.0760417406457,0.0764280410085,0.0756851556954,0.075209709095,0.0751205628575,0.0752988553326,0.0755960094578,0.0756257248703,0.0760714560582,0.0731890610435,0.0708118280417,0.0690883341153,0.066621954876,0.0643932989368,0.0623726508852,0.0600548487084,0.0579450544193,0.055538106005,0.0537254658411,0.0511996557767,0.0494167310253,0.0464154743605,0.0443353954839,0.0424336090825,0.0402940993808,0.0384220283919)
s <- c(0.0400848211643,0.0404153556717,0.0406256958127,0.040745890179,0.0409261817285,0.0408811088411,0.0404003313759,0.0400397482769,0.0399796510938,0.0401599426432,0.0399796510938,0.0402050155306,0.0400096996854,0.0400547725727,0.0399496025022,0.0399345782064,0.0397242380654,0.0398594567275,0.0596464542812,0.0610437137896,0.0622757060442,0.0631621394958,0.0646495447789,0.065490905343,0.0667228975977,0.0685107887966,0.069547465206,0.070539068728,0.071395453588,0.0724020814058,0.073033101829,0.0746106528868,0.0755571835215,0.0762182525362,0.0768342486635,0.0766689814098,0.0770295645088,0.0768492729593,0.0763234226067,0.0755571835215,0.0760980581699,0.076518738452,0.0760680095783,0.0758877180288,0.0760229366909,0.0764135683814,0.076939418734,0.0770746373961,0.0775554148614,0.0773600990161,0.0774051719035,0.0773450747203,0.0779159979603,0.0780211680308,0.0779460465519,0.0782465324677,0.0782765810592,0.0782315081719,0.0784568726087,0.078291605355,0.0781864352845,0.0778859493687,0.0783066296508,0.0783517025382,0.0785470183834,0.0783967754255,0.0783366782424,0.0789977472571,0.0790428201445,0.0792681845813,0.0793883789476,0.0794935490181,0.0797790106381,0.0801696423286,0.0804701282444,0.0804551039486,0.0809058328223,0.0813415374001,0.0809509057096,0.0809809543012,0.0808006627517,0.0813265131043,0.0807405655686,0.0810410514844,0.0806504197938,0.0808307113433,0.0807706141602,0.0806654440896,0.080920857118,0.0806954926812,0.0805752983149,0.0807255412728,0.0805152011318,0.080500176836,0.0808307113433,0.0814767560622,0.0813866102875,0.0813715859917,0.0816870962033,0.0815218289496,0.0818974363443,0.0818974363443,0.0820026064148,0.0819124606401,0.081566901837,0.0818974363443,0.0820777278938,0.0819124606401,0.0818223148654,0.0817021204991,0.0814467074707,0.0811311972591,0.0811011486675,0.0810560757801,0.0808908085265,0.0803198852865,0.0805452497233,0.0801095451455,0.0804400796528,0.0798992050044,0.0797790106381,0.0797940349339,0.0795987190886,0.0797940349339,0.0795836947928,0.079929253596,0.080214715216,0.0800043750749,0.0798391078213,0.0797038891592,0.0796287676802,0.0795085733139,0.0796738405676,0.0797489620465,0.0793733546518,0.0789827229613,0.0789226257781,0.078577066975,0.078787407116,0.0783967754255,0.0780211680308,0.0781864352845,0.0779009736645,0.0777056578193,0.0775704391572,0.0774802933824,0.0778258521856,0.0778859493687,0.0781113138056,0.0777507307066,0.0776004877487,0.0779610708477,0.0776155120445,0.0782164838761,0.0783216539466,0.0781113138056,0.0779610708477,0.0781714109887,0.0783216539466,0.0780962895098,0.0777807792982,0.0778859493687,0.0778108278898,0.0776455606361,0.0779911194392,0.0782164838761,0.0778108278898,0.0776305363403,0.0780962895098,0.0783967754255,0.0786822370455,0.0791930631023,0.0790578444402,0.0789977472571,0.0793433060602,0.0791630145108,0.0792381359897,0.079433451835,0.0797639863423,0.0797339377507,0.0795235976097,0.0790578444402,0.0788174557076,0.0791930631023,0.0787122856371,0.0786221398624,0.078787407116,0.078366726834,0.0780962895098,0.0778709250729,0.0778859493687,0.0772699532414,0.0771046859877,0.077510341974,0.077795803594,0.078006143735,0.077510341974,0.0773751233119,0.0771798074667,0.0776004877487,0.0778108278898,0.0775704391572,0.077224880354,0.0771948317624,0.0771798074667,0.077224880354,0.0771948317624,0.0772098560582,0.0768793215509,0.0768042000719,0.0764285926772,0.0764285926772,0.0761431310572,0.0767441028888,0.0768943458467,0.0772549289456,0.0772399046498,0.0770746373961,0.0774051719035,0.0774953176782,0.077720682115,0.078081265214,0.0782014595803,0.0786521884539,0.078862528595,0.0791630145108,0.0792982331729,0.0790578444402,0.0789827229613,0.0789376500739,0.0794034032434,0.0794785247223,0.0793883789476,0.0787122856371,0.0783366782424,0.0782315081719,0.0782615567634,0.0782615567634,0.0779159979603,0.0775403905656,0.0776605849319,0.0776906335235,0.077720682115,0.0774352204951,0.0777807792982,0.0777357064108,0.0779009736645,0.077014540213,0.076729078593,0.0768642972551,0.0770746373961,0.0771046859877,0.0772549289456,0.0770896616919,0.0771046859877,0.0769844916214,0.0768042000719,0.0770896616919,0.0768042000719,0.0763384469025,0.0766389328183,0.0762633254235,0.076233276832,0.0758125965499,0.0760830338741,0.0764886898604,0.0763835197899,0.0763835197899,0.076518738452,0.0777507307066,0.0771948317624,0.0770295645088,0.0774652690866,0.0769544430298,0.0765037141562,0.0764886898604,0.0763684954941,0.0767891757761,0.0770596131003,0.0770596131003,0.0770445888046,0.077014540213,0.0775854634529,0.0774502447909,0.077014540213,0.0775253662698,0.0774352204951,0.0775854634529,0.0777657550024,0.0782315081719,0.0784418483129,0.0783517025382,0.0780512166224,0.0784418483129,0.0780361923266,0.0782164838761,0.0781563866929,0.0786521884539,0.0791179416234,0.0794034032434,0.0794935490181,0.0799893507791,0.0801696423286,0.0798841807086,0.080425055357,0.0810260271886,0.0810110028928,0.0817021204991,0.0822580194432,0.0824833838801,0.0833097201485,0.08333976874,0.0832796715569,0.0837904976137,0.0843614208537,0.0848572226147,0.0843163479663,0.0842562507831,0.0844665909242,0.08391069198,0.0839257162758,0.0842412264874,0.0842262021916,0.0841961536,0.0842712750789,0.0838505947968,0.0844966395158,0.0848421983189,0.0850976113473,0.0853380000799,0.0858788747283,0.0861793606441,0.0855633645168,0.0848271740231,0.0850074655726,0.0850825870515,0.0852027814178,0.0851126356431,0.0855032673336,0.0855182916294,0.0856535102915,0.0855182916294,0.0855333159252,0.0858488261367,0.0858488261367,0.0862094092357,0.0863596521936,0.0862394578273,0.0860892148694,0.0862995550104,0.0863746764894,0.0862695064188,0.0863145793062,0.0868404296588,0.0874864743777,0.0873813043072,0.0873662800114,0.0870507697998,0.0872460856451,0.0875465715609,0.0874564257861,0.0875315472651,0.0877268631103,0.0876216930398,0.0872460856451,0.0867803324756,0.087110866983,0.0878019845893,0.0881926162798,0.0880874462093,0.088748515224,0.0885531993787,0.088387932125,0.0882226648714,0.0888386609987,0.0888086124071,0.0886583694492,0.0887785638155,0.0885231507871,0.0887184666324,0.0886884180408,0.0884029564208,0.088177591984,0.0885832479703,0.088673393745,0.0890189525482,0.0894246085345,0.0895147543092,0.0889889039566,0.0886884180408,0.0888987581819,0.0888687095903,0.0886433451534,0.0880874462093,0.0882827620545,0.0880273490261,0.0880123247303,0.0880273490261,0.0878470574766,0.0885231507871,0.088673393745,0.0883278349419,0.0880123247303,0.0881024705051,0.0869906726167,0.0872761342367,0.0873512557156,0.0872460856451,0.0864948708557,0.086900526842,0.0873512557156,0.0869906726167,0.0869756483209,0.0868855025462,0.0867502838841,0.0873061828283,0.0876968145188,0.0875766201524,0.0876667659272,0.0881174948008,0.0881475433924,0.0876968145188,0.0879522275472,0.0884931021956,0.0881625676882,0.0882527134629,0.0884480293082,0.0888687095903,0.0889889039566,0.089033976844,0.0893044141682,0.0897851916334,0.0903561148734,0.0899955317744,0.0893945599429,0.0894396328302,0.0894997300134,0.0894396328302,0.0899805074786,0.0900706532534,0.0904312363523,0.0905063578312,0.0908368923386,0.0910021595923,0.0908218680428,0.0912876212123,0.0912124997333,0.0911524025502,0.0913026455081,0.0909871352965,0.0908218680428,0.0905364064228,0.0912425483249,0.0910171838881,0.0913326940996,0.0917233257901,0.0915280099449,0.0914829370575,0.0918885930438,0.0918585444522,0.0918284958607,0.0925346377627,0.0926398078332,0.092654832129,0.0924294676922,0.0920087874101,0.0917083014943,0.0917233257901,0.0919787388185,0.0920238117059,0.091948690227,0.0923242976217,0.092654832129,0.0924144433964,0.0919787388185,0.0923242976217,0.0922642004385,0.0920087874101,0.0916181557196,0.0911974754375,0.0911824511417,0.0904913335355,0.0902359205071,0.0900105560702,0.0899654831829,0.0899955317744,0.0893945599429,0.0892743655766,0.0890790497313,0.088958855365,0.0891090983229,0.0886433451534,0.088958855365,0.0888536852945,0.0888386609987,0.0887034423366,0.0888987581819,0.088958855365,0.0890039282524,0.0893194384639,0.0896950458587,0.0897100701544,0.0899955317744,0.0897100701544,0.0899654831829,0.0896950458587,0.0898753374081,0.090311041986,0.0903861634649,0.0900556289576,0.090100701845,0.0899805074786,0.0903711391692,0.0905063578312,0.0910622567754,0.0917083014943,0.0917683986775,0.0918284958607,0.0917083014943,0.0920087874101,0.0923242976217,0.0920238117059,0.0924595162838,0.0925496620585,0.0925045891711,0.0929102451574,0.0925496620585,0.0927449779038,0.0930755124111,0.0928200993827,0.0925045891711,0.0925947349459,0.0925646863543,0.0922792247343,0.0918435201564,0.0920989331849,0.0918585444522,0.0921289817764,0.0920839088891,0.0923092733259,0.0917533743817,0.091588107128,0.0922191275512,0.0920989331849,0.0920989331849,0.0924895648754,0.0922041032554,0.0923092733259,0.0919787388185,0.0918435201564,0.0923994191006,0.0925196134669,0.0923092733259,0.0923393219175,0.0920087874101,0.092729953608,0.0920238117059,0.0922942490301,0.0930003909322,0.0931205852985,0.0931656581859,0.0933309254395,0.0934511198058,0.0935863384679,0.0935412655806,0.0935713141721,0.09372155713,0.09486340361,0.0955094483289,0.0960352986815,0.0974025095983,0.098349040233,0.0992204493887,0.0994908867129,0.100617708897,0.101834676856,0.102270381434,0.10342725221,0.104734365943,0.105876212423,0.107288496227,0.108220002566,0.108851022989,0.110473646934,0.111330031794,0.112366708204,0.113643773346,0.114259769473,0.115251372995,0.116032636376,0.117249604335,0.118226183561,0.11858676666,0.119277884267,0.12019436631,0.121110848353,0.12133621279,0.121997281804,0.122538156453,0.123229274059,0.123890343074,0.122913763848,0.122598253636,0.121862063142,0.121411334269,0.120344609268,0.119788710323,0.119277884267,0.118316329336,0.117219555744,0.116167855038,0.115026008558,0.113794016304,0.112471878274,0.111420177569,0.110548768413,0.110143112427,0.108520488482,0.107153277565,0.106236795522,0.105410459254,0.104478952915,0.103261984956,0.101639361011,0.10085809763,0.0996862025582,0.0986795747403,0.0978231898804,0.0968165620625,0.0954793997373,0.0945178448068,0.0938868243837,0.0932558039606,0.0927900507911,0.0922191275512,0.0921440060722,0.0918585444522,0.0917233257901,0.0906866493807,0.0906566007891,0.0902058719155,0.089815240225,0.0901457747323,0.0900406046618,0.0899805074786,0.0900556289576,0.0898903617039,0.0896649972671,0.0892893898724,0.0891541712103,0.0890790497313,0.0891691955061,0.0896499729713,0.0898603131123,0.0902809933944,0.0904763092397,0.0909120138175,0.0910322081839,0.0906115279018,0.090806843747,0.0909120138175,0.090881965226,0.0908669409302,0.0911524025502,0.0914078155786,0.0911223539586,0.0916031314238,0.0915129856491,0.0915280099449,0.0913627426912,0.0913026455081,0.0914679127617,0.0919787388185,0.0922642004385,0.0925045891711,0.0925496620585,0.0923543462133,0.0916932771986,0.0915280099449,0.0913026455081,0.0912725969165,0.0917233257901,0.0916932771986,0.0917233257901,0.091873568748,0.0917683986775,0.0916031314238,0.0914528884659,0.0905063578312,0.0902809933944,0.0901307504365,0.0899204102955,0.0898002159292,0.089454657126,0.0890189525482,0.0888837338861,0.0889137824776,0.088748515224,0.0891241226187,0.0890790497313,0.0882677377587,0.0882827620545,0.0880573976177,0.0884179807166,0.0885381750829,0.0882527134629,0.087892130364,0.0880123247303,0.0881024705051,0.0885682236745,0.0881325190966,0.0885982722661,0.0888687095903,0.0890189525482,0.0887635395198,0.0881174948008,0.0887184666324,0.0884780778998,0.0878470574766,0.0878620817724,0.087606668744,0.0878019845893,0.087967251843,0.087892130364,0.0878320331809,0.0883729078293,0.0887935881113,0.0887635395198,0.0887034423366,0.0883128106461,0.0881625676882,0.0882376891672,0.0879071546598,0.0881475433924,0.0884179807166,0.0886283208577,0.0887184666324,0.0888987581819,0.0889738796608,0.0893044141682,0.0893645113513,0.0893945599429,0.0891090983229,0.0891992440976,0.0892743655766,0.0890940740271,0.0892593412808,0.0895898757881,0.0891992440976,0.0893494870555,0.0888687095903,0.0892292926892,0.0896499729713,0.0893645113513,0.0890490011397,0.0881475433924,0.0884480293082,0.0883128106461,0.0884179807166,0.087892130364,0.0880123247303,0.0885231507871,0.0886433451534,0.0891541712103,0.0887184666324,0.088958855365,0.0889438310692,0.0888536852945,0.088958855365,0.0888987581819,0.0885832479703,0.088387932125,0.088387932125,0.0880573976177,0.0882827620545,0.0875615958567,0.0877268631103,0.0870657940956,0.0875615958567,0.0878771060682,0.0875165229693,0.0872911585325,0.0878320331809,0.0880724219135,0.0880874462093,0.0875465715609,0.0873362314198,0.0875315472651,0.0880724219135,0.0882677377587,0.0883578835335,0.0885081264913,0.0886132965619,0.0890790497313,0.0886132965619,0.0876968145188,0.0878170088851,0.0881024705051,0.0883428592377,0.0880423733219,0.0885381750829,0.0888687095903,0.0885381750829,0.0883278349419,0.0884330050124,0.0885982722661,0.0885381750829,0.0885531993787,0.0881174948008,0.0879522275472,0.0876216930398,0.087967251843,0.087681790223,0.0871409155746,0.0873662800114,0.0872611099409,0.0872460856451,0.0870207212083,0.0873512557156,0.0876367173356,0.0875315472651,0.0875465715609,0.0874564257861,0.0874714500819,0.0872911585325,0.0873512557156,0.0870808183914,0.0868855025462,0.0867052109967,0.0874564257861,0.0878019845893,0.087110866983,0.0870207212083,0.0868404296588,0.0862845307146,0.0858638504325,0.0861943849399,0.0856985831789,0.0855032673336,0.0849473683894,0.08476707684,0.0850375141642,0.0847069796568,0.0849924412768,0.0853380000799,0.0853229757841,0.085473218742,0.0855333159252,0.0854131215589,0.0851426842347,0.0851577085305,0.0849924412768,0.0845116638115,0.0843163479663,0.0838656190926,0.0838956676842,0.0834599631063,0.0833097201485,0.0833247444442,0.083414890219,0.083129428599,0.0831745014864,0.0832045500779,0.0824683595843,0.0821378250769,0.0821678736685,0.0827087483169,0.0824984081759,0.0821979222601,0.0819575335275,0.0817171447948,0.0814617317664,0.0812513916254,0.0808908085265,0.0811311972591,0.0805752983149,0.0808307113433,0.0810560757801,0.0805752983149,0.0803799824697,0.0798090592297,0.0795235976097,0.079433451835,0.0793433060602,0.0789827229613,0.0789827229613,0.0787122856371,0.0785169697919,0.0786822370455,0.0785019454961,0.0782315081719,0.0783216539466,0.0784869212003,0.0784117997213,0.0787723828203,0.0784268240171,0.0789226257781,0.0789226257781,0.0786672127497,0.0789376500739,0.0779760951435,0.0774502447909,0.0772549289456,0.0773450747203,0.0772399046498,0.0772849775372,0.0775704391572,0.077720682115,0.076939418734,0.0772399046498,0.076729078593,0.0769694673256,0.0770596131003,0.077300001833,0.0773751233119,0.0776756092277,0.077300001833,0.0774802933824,0.0776455606361,0.0774953176782,0.0776906335235,0.0774352204951,0.0771647831709,0.0766840057056,0.0770295645088,0.0773300504245,0.0772849775372,0.0769844916214,0.0768492729593,0.0770896616919,0.0762633254235,0.0767140542972,0.0764285926772,0.0761882039446,0.0765337627477,0.0771046859877,0.0773901476077,0.0771347345793,0.0773751233119,0.0777056578193,0.077224880354,0.0778559007771,0.0785470183834,0.0785319940876,0.0789977472571,0.0786071155666,0.0789977472571,0.0790428201445,0.0789977472571,0.079147990215,0.0797038891592,0.0800193993707,0.0800644722581,0.080139593737,0.0801245694412,0.0800945208497,0.0800644722581,0.0800344236665,0.080139593737,0.080214715216,0.0797339377507,0.0799893507791,0.0800193993707,0.0798240835255,0.0800644722581,0.0795987190886,0.0800344236665,0.0800043750749,0.0803799824697,0.0803048609907,0.0804100310612,0.0808757842307,0.0804851525402,0.0803349095823,0.0807255412728,0.0804851525402,0.0803499338781,0.0803799824697,0.080920857118,0.0811311972591,0.0806353954981,0.0803198852865,0.0805152011318,0.0806053469065,0.0806804683854,0.0804100310612,0.0798992050044,0.0803799824697,0.0805903226107,0.0812664159212,0.0816119747243,0.0818072905696,0.0817021204991,0.0814016345833,0.0814467074707,0.0810560757801,0.0807555898644,0.0811011486675,0.0812964645128,0.0817321690906,0.0820176307106,0.0817321690906,0.0816420233159,0.0812363673296,0.0817471933864,0.0814166588791,0.0816119747243,0.0821979222601,0.0822580194432,0.0816870962033,0.0815218289496,0.0814767560622,0.0807555898644,0.0808908085265,0.0809358814138,0.0805452497233,0.079929253596,0.0796738405676,0.0792832088771,0.0792531602855,0.0798240835255,0.0792832088771,0.0787423342287,0.0785470183834,0.0783967754255,0.0786071155666,0.0783216539466,0.078366726834,0.0783817511298,0.0784568726087,0.0786822370455,0.0782164838761,0.0783066296508,0.0779310222561,0.0779760951435,0.0785319940876,0.0785920912708,0.0792681845813,0.0792080873981,0.0795085733139,0.0796588162718,0.0788925771866,0.0791029173276,0.0796588162718,0.0797489620465,0.0799743264834,0.0808006627517,0.0805302254275,0.0804100310612,0.0808006627517,0.0814016345833,0.080995978597,0.0811311972591,0.0810260271886,0.0808757842307,0.0810711000759,0.0813265131043,0.0813866102875,0.0815518775412,0.0814467074707,0.081566901837,0.0814617317664,0.0813114888086,0.0812213430338,0.0810410514844,0.0810560757801,0.0806954926812,0.0806053469065,0.0803499338781,0.0799442778918,0.0796738405676,0.0794034032434,0.0789977472571,0.0791780388066,0.0789977472571,0.0792681845813,0.0786822370455,0.0781563866929,0.078006143735,0.0774352204951,0.0766689814098,0.0766389328183,0.0766239085225,0.0768042000719,0.0768642972551,0.0778709250729,0.078081265214,0.0785319940876,0.0785169697919,0.0788174557076,0.0789827229613,0.0786521884539,0.0787723828203,0.0792381359897,0.0794635004265,0.0792681845813,0.0793883789476,0.0794635004265,0.0795386219055,0.0797038891592,0.0797339377507,0.0799593021876,0.0799743264834,0.0801546180328,0.0799893507791,0.080425055357,0.0808307113433,0.0804851525402,0.0805602740191,0.0808457356391,0.0810410514844,0.0811011486675,0.0807706141602,0.0807706141602,0.0809058328223,0.0809358814138,0.0811762701465,0.0807405655686,0.0803048609907,0.0793282817644,0.0790127715529,0.0782765810592,0.0780962895098,0.0779760951435,0.0778559007771,0.0782765810592,0.0781563866929,0.0778258521856,0.0776155120445,0.0779460465519,0.0781714109887,0.078081265214,0.078366726834,0.0783817511298,0.0784418483129,0.0783517025382,0.0779460465519,0.077720682115,0.0777657550024,0.0774953176782,0.0771347345793,0.0766990300014,0.077014540213,0.0763083983109,0.0767591271846,0.0772549289456,0.0775403905656,0.0775253662698,0.0776455606361,0.0773450747203,0.0769243944382,0.0771197102835,0.0773450747203,0.0776756092277,0.0775704391572,0.0777357064108,0.0780512166224,0.0782315081719,0.0784418483129,0.0783366782424,0.0782014595803,0.0783066296508,0.078577066975,0.0784718969045,0.078577066975,0.0789076014824,0.0777507307066,0.0765337627477,0.0756172807046,0.0749111388026,0.0739946567594,0.0728377859837,0.0717710609827,0.0708846275312,0.0697127324597,0.0692920521776,0.0678497197819,0.0671586021756,0.0657613426672,0.064499301821,0.0632673095663,0.0623207789316,0.0616296613253,0.0422933926452,0.0424135870116,0.0420530039126,0.0418426637716,0.0417675422926,0.0420379796168,0.0425337813779,0.0428342672936,0.0427140729273,0.0424736841947,0.0422783683495,0.0423685141242,0.0421431496874,0.0419027609547,0.042308416941,0.0423534898284,0.0424736841947,0.0425488056737)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("24-organelles-nucleus-merged/SEPALLATA3-ChIPSeq_sep3_3-GSM364941.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=37"),bty="n")
dev.off()