# R script for Peak Model
#  -- generated by MACS
p <- c(0.0414979650207,0.043826982796,0.0458007266733,0.0482876439587,0.0502219129585,0.0524917184174,0.0544851997335,0.0565576308047,0.058531374682,0.0606334119114,0.0627354491407,0.0650348607578,0.0671665041453,0.0694264408848,0.0717751960989,0.0741436887516,0.0762950695779,0.0785352688787,0.0786734309501,0.0785254001593,0.0783971068073,0.0781010452257,0.0775878718176,0.0781207826644,0.0780813077869,0.0781898637002,0.0783576319297,0.0786339560726,0.0789201489348,0.0791866043582,0.0788017243021,0.0789102802154,0.0788017243021,0.0788510678991,0.0790681797256,0.0791767356388,0.0793741100265,0.0790977858837,0.0796997777663,0.0791668669194,0.0796603028888,0.0795813531337,0.0795912218531,0.0793445038684,0.0799267583122,0.0799761019091,0.0801833450163,0.0800353142255,0.0799859706285,0.0799859706285,0.0797589900826,0.0797293839245,0.0796701716081,0.0797392526439,0.0797491213632,0.0795024033786,0.0791668669194,0.0790188361286,0.0788708053378,0.0785155314399,0.0783971068073,0.0786635622307,0.077854327241,0.0776076092563,0.0776470841339,0.0775385282206,0.0777655087665,0.0774299723074,0.0777951149247,0.0776174779757,0.0776076092563,0.0779332769961,0.0779332769961,0.078416844246,0.0782688134552,0.0783872380879,0.0784464504042,0.0786734309501,0.0787030371083,0.0793148977102,0.0788313304603,0.0790977858837,0.0786438247919,0.0789300176542,0.0790681797256,0.0793741100265,0.0800353142255,0.0794333223429,0.0797589900826,0.0798182023989,0.0798182023989,0.0803017696489,0.0805188814754,0.080943236409,0.08124916671,0.0816241780467,0.0817031278018,0.0817228652406,0.0823643320007,0.0823248571231,0.0822656448068,0.081989320664,0.0822853822456,0.0823544632813,0.0818511585926,0.0819794519446,0.0816932590824,0.0818412898732,0.0816044406079,0.0811800856743,0.0807952056182,0.080943236409,0.080686649705,0.0802622947713,0.079897152154,0.0793839787459,0.0793741100265,0.0792162105164,0.0796603028888,0.079206341797,0.0793839787459,0.0787030371083,0.0783576319297,0.0784859252818,0.0784859252818,0.0784365816848,0.0784760565624,0.0783477632103,0.0786438247919,0.078416844246,0.0781997324195,0.0776174779757,0.0776076092563,0.0776076092563,0.0772523353584,0.0774102348686,0.0775286595013,0.0776076092563,0.0770746984095,0.0769562737768,0.0769365363381,0.0770845671289,0.0774398410268,0.0775582656594,0.0780122267512,0.0781503888226,0.0780023580318,0.078160257542,0.0782392072971,0.0784957940011,0.0792162105164,0.0795024033786,0.0795320095367,0.0794925346592,0.0795714844143,0.0797885962408,0.07964056545,0.0797392526439,0.0799958393479,0.0803609819652,0.0804991440366,0.0801043952612,0.0797491213632,0.0795024033786,0.0791668669194,0.079462928501,0.0798280711183,0.0803017696489,0.0804300630009,0.0801241326999,0.0804004568428,0.0801734762969,0.0799958393479,0.0798872834347,0.0800057080673,0.0801241326999,0.0803313758071,0.0803708506846,0.0801043952612,0.0798576772765,0.079946495751,0.0800550516642,0.0801043952612,0.0800155767867,0.0798182023989,0.0794826659398,0.0795024033786,0.0796997777663,0.0796208280112,0.0794530597816,0.0793642413072,0.0791175233225,0.0790583110062,0.079206341797,0.078722774547,0.0788806740572,0.0781701262614,0.0783280257716,0.0788115930215,0.0789596238123,0.0788806740572,0.0787523807052,0.0781306513838,0.0783280257716,0.0781997324195,0.0782589447359,0.0781799949808,0.0783477632103,0.0781207826644,0.0783477632103,0.0786635622307,0.0788313304603,0.0786931683889,0.0783477632103,0.0781898637002,0.0780023580318,0.07754839694,0.0778938021186,0.0780418329094,0.0782984196134,0.0784365816848,0.0787622494246,0.0786832996695,0.0783181570522,0.078466187843,0.0791372607613,0.0790188361286,0.0796504341694,0.0798675459959,0.0802622947713,0.0802622947713,0.0804399317203,0.0808445492152,0.0810517923223,0.081071529761,0.0809827112866,0.0811011359192,0.0810123174447,0.0812985103069,0.0813478539039,0.0814366723784,0.0817426026793,0.0815452282916,0.0813577226233,0.0815945718885,0.0813971975008,0.0812985103069,0.0810813984804,0.0810616610417,0.0813083790263,0.0819202396283,0.081989320664,0.0821274827354,0.081811683715,0.0817228652406,0.0814860159753,0.0816340467661,0.0816143093273,0.0814761472559,0.081683390363,0.0818511585926,0.0814169349396,0.0812985103069,0.0808642866539,0.0807853368988,0.0806669122662,0.0807458620213,0.0804399317203,0.0805386189142,0.0806076999499,0.081071529761,0.0816735216436,0.0815748344498,0.0814564098171,0.0816636529242,0.0812590354294,0.0808248117764,0.0807853368988,0.0811899543937,0.0814070662202,0.0817722088375,0.0821472201742,0.0826406561435,0.0827689494955,0.082907111567,0.083035404919,0.0831340921129,0.0832229105873,0.0831933044292,0.0831439608322,0.0834301536944,0.0835781844852,0.0835781844852,0.0839630645413,0.0843084697199,0.0843282071586,0.0846144000208,0.0846834810565,0.0852756042197,0.0857493027503,0.0857196965921,0.0858677273829,0.0861144453676,0.0868940741992,0.0872296106583,0.0874565912042,0.0872690855358,0.0868348618828,0.0875750158368,0.0877822589439,0.0878809461378,0.088216482597,0.0887395247244,0.0886309688112,0.088473069301,0.0885026754592,0.0886211000918,0.0886704436887,0.0885520190561,0.0888086057602,0.0891934858162,0.0892823042907,0.0889862427091,0.089647446908,0.0898546900151,0.0901014079998,0.0900125895253,0.0899632459284,0.0899139023315,0.0894599412397,0.0891540109387,0.089035586306,0.0889665052703,0.0891342734999,0.0890454550254,0.0888776867959,0.0890059801479,0.0888974242346,0.0894303350815,0.0891540109387,0.0891046673418,0.0889961114285,0.0889763739897,0.0888678180765,0.0880980579643,0.0882362200357,0.0882559574745,0.0879500271735,0.0880487143674,0.0880980579643,0.0883349072296,0.0882855636327,0.0883842508265,0.0886309688112,0.0885914939336,0.0884039882653,0.0880487143674,0.0879895020511,0.0879697646123,0.0877033091889,0.0873480352909,0.0870914485869,0.0869138116379,0.086864468041,0.0864894567043,0.0868743367604,0.0869532865155,0.087604621995,0.0873776414491,0.0877625215052,0.0877131779082,0.0872296106583,0.0870914485869,0.0872394793777,0.0866374874951,0.0860749704901,0.0860453643319,0.0860947079288,0.0858677273829,0.0861736576839,0.0865289315818,0.0862624761584,0.0858479899442,0.0859368084186,0.085996020735,0.085946677138,0.0862723448778,0.0862131325615,0.0860947079288,0.0863512946329,0.0865486690206,0.0868545993216,0.0870026301124,0.0871309234644,0.087121054745,0.0868151244441,0.0868348618828,0.08704210499,0.0872493480971,0.0868052557247,0.0875158035205,0.0875158035205,0.0873875101685,0.0874171163266,0.0876440968725,0.086864468041,0.0872000045001,0.0875059348011,0.0875750158368,0.0875651471174,0.0875355409593,0.0882066138776,0.0876342281531,0.0873184291328,0.087426985046,0.0870618424287,0.0869730239542,0.0870519737093,0.087476328643,0.0874664599236,0.0875750158368,0.0877526527858,0.0869631552349,0.0873579040103,0.0871407921838,0.0867855182859,0.0861341828064,0.0858085150666,0.0856999591534,0.085512453485,0.0857789089085,0.0863907695104,0.0868447306022,0.0871506609032,0.0879697646123,0.0887592621632,0.0886803124081,0.0889862427091,0.0894994161172,0.0888974242346,0.0889368991122,0.0891638796581,0.088778999602,0.0888382119183,0.0888184744795,0.0890454550254,0.0889961114285,0.0884335944235,0.0889368991122,0.0891145360611,0.0889961114285,0.0892823042907,0.0892823042907,0.0893316478876,0.0890947986224,0.0893612540458,0.0892526981326,0.0893316478876,0.0898448212957,0.0894105976427,0.0891540109387,0.0895684971529,0.0897461341019,0.0899632459284,0.0901112767192,0.0902790449488,0.0900520644029,0.0895684971529,0.0892033545356,0.088956636551,0.0883645133878,0.0881572702806,0.0882066138776,0.0878316025409,0.0875355409593,0.0875158035205,0.0874072476073,0.0871802670614,0.0869828926736,0.0872296106583,0.0876342281531,0.0872888229746,0.0875454096787,0.0876934404695,0.0878316025409,0.0876243594338,0.0876835717501,0.0880289769286,0.087910552296,0.0877921276633,0.0881572702806,0.0882855636327,0.0882756949133,0.0882855636327,0.0881967451582,0.0888875555152,0.0895586284335,0.0893809914846,0.0894895473978,0.0900125895253,0.0903678634232,0.090131014158,0.0906639250048,0.0907231373212,0.0910290676221,0.0910488050609,0.091433685117,0.0915027661527,0.0913942102394,0.091433685117,0.0916507969435,0.0919665959639,0.0923514760199,0.0927067499179,0.0928449119893,0.0925685878465,0.0921343641934,0.0919863334026,0.0923317385812,0.0925093755301,0.0923712134587,0.093170579729,0.0935850659433,0.0939896834381,0.0947100999534,0.0953219605553,0.0951640610451,0.0952035359227,0.0956772344532,0.0961904078613,0.0965160756011,0.0966246315144,0.0966937125501,0.0972266233969,0.0977200593663,0.0979865147897,0.0979075650346,0.0984898194784,0.0983911322846,0.098963518009,0.0992299734324,0.0998714401926,0.099703671963,0.100187239213,0.100325401284,0.101026080361,0.10151951633,0.102111639493,0.102299145162,0.102782712412,0.103512997646,0.104480132146,0.104924224518,0.105733459508,0.105624903595,0.106088733406,0.106266370355,0.106315713952,0.10635518883,0.105842015421,0.105980177493,0.105980177493,0.106572300656,0.106522957059,0.106710462727,0.106444007304,0.106641381692,0.106315713952,0.106256501636,0.106108470845,0.105980177493,0.105555822559,0.105772934386,0.105743328228,0.105684115911,0.105358448172,0.105605166156,0.105309104575,0.105644641034,0.105210417381,0.105427529207,0.105072255309,0.104766325008,0.104351838794,0.103848534105,0.10377945307,0.103503128927,0.102832056009,0.102506388269,0.101716890718,0.101006342922,0.100384613601,0.100157633055,0.0995161662946,0.0991016800804,0.0987069313049,0.0980358583866,0.0976312408918,0.0968220059021,0.0966443689531,0.0960423770705,0.0955588098206,0.0947594435503,0.094394300933,0.0942265327034,0.0936146721014,0.0932692669229,0.0927659622342,0.0923909508975,0.0916211907853,0.0916211907853,0.0916606656629,0.0908612993926,0.0903579947039,0.0899731146478,0.0895882345917,0.0891737483775,0.0888283431989,0.0884138569847,0.0879204210154,0.0879006835766,0.0874565912042,0.0871111860257,0.0871111860257,0.0874368537654,0.0876638343113,0.0882362200357,0.0877427840664,0.0873677727297,0.0868940741992,0.0864203756686,0.0865782751788,0.0863710320717,0.0863611633523,0.0862920823166,0.0862822135972,0.0861933951227,0.0865486690206,0.0868743367604,0.0868545993216,0.0866769623726,0.0862032638421,0.086301951036,0.08655853774,0.0867657808471,0.0870815798675,0.086430244388,0.0861835264033,0.0864993254237,0.0870519737093,0.0869434177961,0.0872690855358,0.0869236803573,0.0871309234644,0.0874072476073,0.0873480352909,0.0875256722399,0.0873085604134,0.0873579040103,0.0871407921838,0.0865684064594,0.0864795879849,0.0857196965921,0.0862032638421,0.086252607439,0.0868940741992,0.0873085604134,0.0868842054798,0.0867263059696,0.0868348618828,0.0868151244441,0.0870124988318,0.0867460434084,0.0864697192655,0.0865091941431,0.0864499818268,0.0862723448778,0.0863710320717,0.0861835264033,0.0856407468371,0.085255866781,0.0855223222044,0.0859368084186,0.0856703529952,0.0857196965921,0.0853150790973,0.0851571795871,0.0848611180055,0.0856802217146,0.0855025847656,0.0854631098881,0.0858282525054,0.0852163919034,0.0850880985514,0.0850880985514,0.0851670483065,0.0854927160463,0.0856111406789,0.0858677273829,0.0856012719595,0.0859762832962,0.0854927160463,0.0854828473269,0.0860058894544,0.0858381212248,0.0854038975718,0.085561797082,0.0853249478167,0.085384160133,0.0849598051994,0.0847229559341,0.0848019056892,0.0849104616024,0.0846538748984,0.0848117744086,0.0855321909238,0.0861341828064,0.0861045766482,0.0861341828064,0.0862920823166,0.0860354956125,0.0858973335411,0.0857394340309,0.0857986463472,0.0852163919034,0.0846736123372,0.084081489174,0.0834794972914,0.0839433271026,0.0840025394189,0.0834005475363,0.083163698271,0.0832722541843,0.0831340921129,0.0834597598526,0.0834794972914,0.0834202849751,0.0837854275924,0.0835288408883,0.0830255361996,0.0831044859547,0.0829268490057,0.0826702623017,0.0826998684598,0.0826702623017,0.0830650110771,0.0829268490057,0.0829959300414,0.0827393433374,0.0830156674802,0.0826406561435,0.0823445945619,0.0815847031692,0.0810813984804,0.080637306108,0.0804399317203,0.080637306108,0.0804201942815,0.0810123174447,0.0810221861641,0.0808938928121,0.0811899543937,0.081426803659,0.0818807647508,0.0817129965212,0.0819103709089,0.0823149884038,0.083035404919,0.0827492120568,0.0826702623017,0.0823149884038,0.0823939381589,0.0822853822456,0.0821472201742,0.0822755135262,0.0827985556537,0.0833117290618,0.0835485783271,0.0835781844852,0.0833512039394,0.0835189721689,0.0832525167455,0.0834794972914,0.0835880532046,0.0840518830158,0.0841407014903,0.0846341374596,0.0849696739188,0.0851473108677,0.0853446852555,0.0856111406789,0.0857196965921,0.0855914032401,0.085561797082,0.0851374421483,0.0850190175157,0.0854433724493,0.085384160133,0.0857887776279,0.0856210093983,0.0855815345207,0.0856999591534,0.0857887776279,0.0850288862351,0.0850190175157,0.0847821682504,0.0847624308116,0.0847624308116,0.0848907241637,0.0847920369698,0.084821643128,0.0845453189851,0.0844170256331,0.0848512492861,0.0851473108677,0.0853348165361,0.0854532411687,0.0853742914136,0.0854729786075,0.0854927160463,0.0849598051994,0.0849301990412,0.0848315118473,0.0846834810565,0.0847130872147,0.0844466317913,0.0842887322811,0.0844268943525,0.0841604389291,0.0841209640515,0.0833808100975,0.0832327793067,0.0830946172353,0.0828084243731,0.0820287955415,0.0820978765773,0.0822459073681,0.0816636529242,0.0816735216436,0.0819597145058,0.0815748344498,0.081861027312,0.0818215524344,0.0817919462763,0.0814564098171,0.0815254908528,0.0813873287814,0.080943236409,0.0805879625111,0.0801438701387,0.0796504341694,0.0795024033786,0.0794037161847,0.07964056545,0.0793148977102,0.0789596238123,0.0790583110062,0.079206341797,0.0788017243021,0.0786240873532,0.0783872380879,0.0788214617409,0.078466187843,0.0780714390675,0.0781701262614,0.0778345898022,0.0784464504042,0.078288550894,0.0780220954706,0.0782984196134,0.0787425119858,0.0786635622307,0.0783773693685,0.0783576319297,0.0778148523635,0.0774497097462,0.0780220954706,0.078160257542,0.0781701262614,0.0777753774859,0.0780220954706,0.0778345898022,0.0776668215727,0.0778740646798,0.0780023580318,0.0780615703481,0.078337894491,0.078466187843,0.0780813077869,0.0777951149247,0.0775286595013,0.0777852462053,0.07754839694,0.0770648296901,0.0770450922513,0.0771339107258,0.0772227292003,0.0767194245116,0.0772819415166,0.0774793159043,0.0774694471849,0.0773608912717,0.0770845671289,0.0771635168839,0.0769464050574,0.0769661424962,0.0766306060371,0.076857586583,0.0770253548125,0.0773312851135,0.0776766902921,0.0774891846237,0.0773214163941,0.0767983742666,0.0768871927411,0.077114173287,0.0769957486544,0.077597740537,0.0774990533431,0.0778345898022,0.0777556400471,0.0778641959604,0.0781010452257,0.0778049836441,0.0779036708379,0.0781405201032,0.0781405201032,0.0776569528533,0.0776470841339,0.0777556400471,0.0780813077869,0.0777556400471,0.0777457713278,0.0782096011389,0.0777951149247,0.0778148523635,0.0776964277308,0.0780418329094,0.0784563191236,0.0789793612511,0.0792852915521,0.0793741100265,0.0796010905724,0.0792754228327,0.0789201489348,0.0785254001593,0.0784464504042,0.0785846124756,0.0784267129654,0.0784563191236,0.078416844246,0.0783181570522,0.0782194698583,0.0780615703481,0.07803196419,0.0777951149247,0.0780023580318,0.0777655087665,0.0772523353584,0.0770056173738,0.0769266676187,0.0768970614605,0.0770944358482,0.0772128604809,0.0774497097462,0.0777655087665,0.0777753774859,0.0777359026084,0.0775089220625,0.0769266676187,0.0769957486544,0.0771832543227,0.077291810236,0.0771635168839,0.0770450922513,0.0765319188432,0.0763641506136,0.0764529690881,0.0767687681085,0.0767786368279,0.0768279804248,0.0773016789554,0.0775187907819,0.0779036708379,0.0778641959604,0.0776076092563,0.0776174779757,0.0780023580318,0.0780615703481,0.0779628831543,0.078160257542,0.0781503888226,0.0781405201032,0.077854327241,0.0779036708379,0.0783773693685,0.0784563191236,0.0783872380879,0.0786043499144,0.0787326432664,0.0788115930215,0.0786438247919,0.0783181570522,0.0787030371083,0.0791175233225,0.0792852915521,0.0796010905724,0.0797392526439,0.0797984649602,0.0800057080673,0.0799563644704,0.0804794065979,0.0806274373887,0.080814943057,0.0803609819652,0.080252426052,0.0802622947713,0.0801932137356,0.0801537388581,0.0799070208734,0.0802721634907,0.0810813984804,0.0809728425672,0.0808741553733,0.0809333676896,0.080637306108,0.0810123174447,0.0812590354294,0.081377460062,0.0817524713987,0.0817820775569,0.0815254908528,0.0817426026793,0.0816932590824,0.0818215524344,0.0819202396283,0.081861027312,0.0822755135262,0.0826307874241,0.0824728879139,0.0822853822456,0.0825814438272,0.0827196058986,0.0825913125466,0.0824432817558,0.0827886869343,0.0827689494955,0.0829564551639,0.083035404919,0.0825913125466,0.0822360386487,0.0826406561435,0.0826998684598,0.0825123627915,0.0822755135262,0.0823643320007,0.0822459073681,0.0819695832252,0.0820189268222,0.0817129965212,0.0815057534141,0.0819301083477,0.0815748344498,0.0815945718885,0.0815649657304,0.0815156221334,0.0817623401181,0.0822459073681,0.0822853822456,0.0822656448068,0.0821373514548,0.0820090581028,0.0819005021895,0.0813281164651,0.0807853368988,0.0810813984804,0.0812096918325,0.0810517923223,0.0804695378785,0.0802228198938,0.07964056545,0.0794727972204,0.0794037161847,0.0790977858837,0.0784859252818,0.0786339560726,0.0790879171643,0.0788708053378,0.0791471294807,0.0794037161847,0.0795024033786,0.0791471294807,0.0792655541133,0.0789793612511,0.0793148977102,0.0796208280112,0.0798379398377,0.0795813531337,0.0795221408173,0.0795221408173,0.0791866043582,0.0793938474653,0.0795320095367,0.0791767356388,0.0791175233225,0.0791866043582,0.0787918555827,0.0786931683889,0.0786438247919,0.0787523807052,0.0792260792358,0.0787425119858,0.0785056627205,0.0787523807052,0.0792556853939,0.0791767356388,0.0796800403275,0.0796603028888,0.0796997777663,0.0795221408173,0.079946495751,0.0800945265418,0.079946495751,0.079897152154,0.0795912218531,0.0793938474653,0.079462928501,0.0797787275214,0.0793445038684,0.0793543725878,0.0793445038684,0.0793642413072,0.079078048445,0.0793247664296,0.0795912218531,0.0792951602715,0.0796306967306,0.0790089674092,0.0792754228327,0.0794727972204,0.0789201489348,0.0788313304603,0.0789892299705,0.0788510678991,0.0790879171643,0.0791273920419,0.0788510678991,0.0788411991797,0.0789102802154,0.0787425119858,0.0785352688787,0.0783872380879,0.0779431457155,0.0780615703481,0.078160257542,0.0783675006491,0.0788017243021,0.0788708053378,0.0788708053378,0.0789102802154,0.0794135849041,0.0794727972204,0.0799563644704,0.0801043952612,0.0804991440366,0.0807952056182,0.0805386189142,0.0808938928121,0.0811998231131,0.0810517923223,0.0807557307407,0.0810221861641,0.0810123174447,0.0817129965212,0.0817820775569,0.0816735216436,0.0823742007201,0.0824432817558,0.0826702623017,0.0832031731486,0.0834005475363,0.0835781844852,0.0841308327709,0.0820090581028,0.0798182023989,0.0776174779757,0.075377278675,0.073462747114,0.0718245396958,0.0693869660073,0.0671270292678,0.0646993242987,0.0620347700643,0.0595083779013,0.0574655529883,0.0552944347232,0.0526792240858,0.0505475806982,0.0477744705506,0.0453763717397,0.042909191893)
m <- c(0.0435994791524,0.0460336204773,0.0484873131381,0.0506477357598,0.0527788313775,0.0548219459836,0.0572658629764,0.0594360612661,0.0617822215792,0.0637275795055,0.0659075534631,0.0680777517528,0.0706683037652,0.073121996426,0.0756147917587,0.0780587087516,0.0802582340451,0.0824479836707,0.0821156109597,0.0821938163035,0.0819885272761,0.0815583978853,0.0816268275611,0.0817734625807,0.0817148085729,0.0817636869127,0.0820862839558,0.0820374056159,0.0820374056159,0.0818809949284,0.0826239456942,0.082711926706,0.0824577593387,0.0828878887294,0.0828976643974,0.0830736264209,0.0829465427373,0.0828781130615,0.0826728240341,0.0829660940732,0.0832886911163,0.0836406151632,0.0835819611554,0.0834939801437,0.0831518317647,0.083386447796,0.0830834020889,0.0830834020889,0.0825750673544,0.0826728240341,0.0821742649675,0.0824088809988,0.0825652916864,0.0823306756551,0.08201785428,0.0817930139166,0.0813628845259,0.0814117628658,0.0810696144868,0.0808545497914,0.0808643254594,0.0805710554202,0.0802777853811,0.079603264291,0.0794761806074,0.0791438078964,0.0787527811775,0.0780489330836,0.0778436440562,0.0778143170523,0.0775210470131,0.0773255336537,0.0773059823178,0.0771300202943,0.0773255336537,0.0774526173373,0.0770518149505,0.0767780962473,0.0765141532121,0.0764652748722,0.0764261722003,0.0765825828879,0.0767096665715,0.0764359478683,0.0765923585559,0.0759471644697,0.0761035751573,0.0760644724854,0.0759471644697,0.0761817805011,0.076533704548,0.0765825828879,0.0768171989192,0.0763479668566,0.0766901152356,0.0768269745872,0.0767780962473,0.0767194422395,0.0768269745872,0.0771300202943,0.0768660772591,0.0771495716302,0.077237552642,0.0773744119936,0.0771691229662,0.0775405983491,0.0781564654313,0.078586594822,0.0782737734469,0.0783519787907,0.0781271384274,0.0778631953921,0.0781369140953,0.0780000547437,0.0781662410993,0.078244446443,0.0785572678181,0.0786843515017,0.0789189675331,0.0788603135252,0.0787821081815,0.079280667248,0.0796423669629,0.0793197699199,0.0793881995957,0.0793686482597,0.0788603135252,0.0789971728768,0.0796423669629,0.0796521426309,0.0795152832793,0.0799356370021,0.0804341960686,0.0804048690647,0.080297336717,0.0804048690647,0.0807372417757,0.0808643254594,0.0808447741234,0.0812846791821,0.0815779492213,0.0813922115298,0.080971857807,0.080316888053,0.0806883634359,0.0806199337601,0.0804830744085,0.0808545497914,0.0808349984554,0.0810109604789,0.0811771468344,0.0811869225024,0.0809620821391,0.0807470174437,0.0805906067562,0.0807274661078,0.0807274661078,0.0804928500764,0.0798672073263,0.0799258613341,0.0795641616192,0.079632591295,0.080307112385,0.0804928500764,0.0800040666779,0.0802386827092,0.0805319527483,0.0801507016974,0.0796521426309,0.0797498993106,0.0799258613341,0.0800529450177,0.0798476559903,0.079622815627,0.0793784239277,0.078948294537,0.0788016595174,0.07859637049,0.0785377164822,0.0786941271697,0.0784692868064,0.0784790624743,0.0784888381423,0.0779805034078,0.0777556630445,0.0776676820327,0.0775112713452,0.0776285793608,0.0775894766889,0.0775992523569,0.0775112713452,0.0773059823178,0.0771788986341,0.0770909176224,0.0776285793608,0.0771691229662,0.0773059823178,0.0770518149505,0.0766901152356,0.0764457235363,0.0765825828879,0.0766119098918,0.0761720048331,0.0762208831729,0.0758200807861,0.0758005294502,0.0757418754423,0.0756343430947,0.0758103051181,0.0761035751573,0.0762990885167,0.076553255884,0.0767878719153,0.0769833852747,0.0770811419544,0.0770420392825,0.0773548606576,0.0772864309818,0.0776188036929,0.0774819443413,0.0780293817477,0.0780978114235,0.0784790624743,0.0787332298416,0.0789091918651,0.0788309865213,0.0788016595174,0.0791731349003,0.079603264291,0.0800627206857,0.0797205723067,0.079613039959,0.0797792263145,0.0793588725918,0.0795446102832,0.0796912453028,0.0799258613341,0.079955188338,0.079974739674,0.079964964006,0.0804439717366,0.0807372417757,0.0805124014124,0.0806785877679,0.0809327551352,0.0804146447327,0.0803559907248,0.080316888053,0.0802582340451,0.0803755420608,0.0805319527483,0.0807372417757,0.080981633475,0.081001184811,0.080639485096,0.0808447741234,0.0803266637209,0.0800920476896,0.0794566292715,0.0788309865213,0.0788994161971,0.0787332298416,0.0792611159121,0.0793588725918,0.0790264998807,0.0786256974939,0.0789091918651,0.0795739372871,0.0798378803224,0.0801604773654,0.080307112385,0.0801898043693,0.0797890019825,0.0797792263145,0.0800236180138,0.0801995800373,0.0803755420608,0.0800822720216,0.0803657663928,0.0803853177288,0.0801213746935,0.0805906067562,0.0809425308031,0.0810402874828,0.0811087171586,0.0811673711665,0.0807176904398,0.0808447741234,0.0807176904398,0.0807079147718,0.0809229794672,0.0808056714515,0.0808936524633,0.0812944548501,0.0811966981704,0.0812064738384,0.0813628845259,0.0817539112448,0.0814801925416,0.0813531088579,0.0817245842408,0.0817441355768,0.0815388465494,0.0811966981704,0.0810891658227,0.0812064738384,0.0812064738384,0.0808741011273,0.081323781854,0.0813726601939,0.0811673711665,0.0807567931117,0.0805319527483,0.0805808310882,0.0805124014124,0.0802484583772,0.0804439717366,0.0802680097131,0.07994541267,0.0798183289864,0.0797401236426,0.0797890019825,0.0797596749786,0.0794566292715,0.0790851538886,0.0789873972089,0.0791731349003,0.0794664049394,0.0794859562754,0.0792415645761,0.0797792263145,0.0798476559903,0.0799063099982,0.079632591295,0.0795543859512,0.0792415645761,0.0790949295565,0.0792611159121,0.0794077509316,0.0798183289864,0.079632591295,0.0802777853811,0.0806688120999,0.08134333319,0.0809523064711,0.0808349984554,0.0811575954985,0.0812064738384,0.0817539112448,0.0817734625807,0.0816366032291,0.0819200976003,0.0824284323348,0.0828292347216,0.083386447796,0.0836210638273,0.0839534365383,0.0839436608703,0.0841489498977,0.0841489498977,0.0843053605853,0.0843444632572,0.0842467065775,0.0845595279525,0.0847843683159,0.0850385356831,0.0852144977066,0.0858596917927,0.0856935054372,0.0863680265273,0.0869154639337,0.087805049719,0.0876486390315,0.0876095363596,0.0874335743361,0.0869545666055,0.0869154639337,0.087130528629,0.0870425476173,0.0865439885507,0.0865635398867,0.0865244372148,0.0867003992383,0.086798155918,0.0865537642187,0.0867395019102,0.0870620989532,0.0873846959963,0.0870327719493,0.0866417452305,0.0862409428436,0.0858694674607,0.0857326081091,0.0856641784333,0.0858205891209,0.0863191481874,0.0858596917927,0.0860063268123,0.0856446270974,0.0851558436988,0.0851656193668,0.0847843683159,0.0846670603002,0.0843249119212,0.0847061629721,0.0841489498977,0.0842173795735,0.084393341597,0.0844422199369,0.0842662579134,0.0850287600152,0.0854882164098,0.0856837297693,0.0853318057223,0.0848723493276,0.0849310033355,0.0850678626871,0.0853024787184,0.0848625736597,0.0853024787184,0.085097189691,0.0849798816753,0.0852144977066,0.0844226686009,0.0845497522846,0.0847941439839,0.0848527979917,0.0854100110661,0.0855664217536,0.0854979920778,0.0853318057223,0.0846475089643,0.0852731517145,0.0856055244255,0.0863093725194,0.0863680265273,0.0861529618319,0.0864169048671,0.0863386995233,0.0863778021952,0.0860356538162,0.0862311671757,0.0860356538162,0.0855957487575,0.085781486449,0.0859965511443,0.0852829273824,0.0854100110661,0.08543933807,0.0855370947497,0.0854002353981,0.0861725131678,0.0859574484725,0.0854100110661,0.0857032811052,0.0856739541013,0.0858303647888,0.0858596917927,0.0855761974216,0.0859769998084,0.085781486449,0.085761935113,0.085771710781,0.0856641784333,0.0849798816753,0.0845008739447,0.0847159386401,0.0853024787184,0.0853415813903,0.0851851707027,0.0851167410269,0.0852829273824,0.0853024787184,0.0857228324411,0.0855664217536,0.0856153000935,0.0855273190817,0.0855468704177,0.0854100110661,0.0856739541013,0.0858596917927,0.0854491137379,0.0857326081091,0.0852829273824,0.0856250757614,0.0856153000935,0.0859672241404,0.0852829273824,0.0851656193668,0.0858401404568,0.0859672241404,0.0859378971365,0.0860258781483,0.0858792431287,0.0853122543863,0.0851656193668,0.085419786734,0.0855175434137,0.0856739541013,0.0856250757614,0.0862116158397,0.0862018401717,0.0861920645038,0.0861334104959,0.0865048858789,0.0861822888358,0.0856935054372,0.0855566460856,0.08543933807,0.0850385356831,0.0851949463707,0.0852927030504,0.0852536003785,0.085077638355,0.0851167410269,0.0845204252807,0.0842955849173,0.0846866116362,0.0850580870191,0.0852633760465,0.0851362923629,0.0846866116362,0.0845106496127,0.0846963873041,0.0850287600152,0.0847648169799,0.085087414023,0.0852438247105,0.0852144977066,0.0856935054372,0.0863778021952,0.0863582508593,0.0860258781483,0.0859574484725,0.0858694674607,0.0860161024803,0.0859085701326,0.0865635398867,0.0866808479023,0.0866417452305,0.0863093725194,0.0867297262422,0.0870718746212,0.0873944716642,0.087805049719,0.0880983197582,0.0883133844536,0.0883622627934,0.0884306924692,0.0883329357895,0.0881080954262,0.0884013654653,0.0886653085005,0.0886653085005,0.0878930307308,0.0875020040119,0.0875215553479,0.0879810117425,0.0884600194731,0.0884209168012,0.0880494414183,0.088176525102,0.0875606580198,0.0876681903674,0.0879419090706,0.0876975173714,0.0878930307308,0.0886848598365,0.089183418903,0.0895939969578,0.08953534295,0.0893691565945,0.0895646699539,0.0895842212898,0.0897406319774,0.0894766889422,0.0893105025866,0.089515791614,0.089173643235,0.0893202782546,0.0890563352194,0.0888999245318,0.0885577761528,0.0890856622233,0.0894278106023,0.0902685180478,0.0910407958176,0.0915491305521,0.0914904765443,0.0917446439115,0.0926537810329,0.0934651614745,0.0937877585175,0.0938170855215,0.0936020208261,0.0941005798926,0.0950194926819,0.0956451354321,0.09637831053,0.0965249455495,0.0966813562371,0.097033280284,0.0973656529951,0.097394979999,0.09772735271,0.0977957823858,0.0981770334367,0.0986951438392,0.099105721894,0.0996140566285,0.100200596707,0.10105107982,0.101901562934,0.102321916657,0.103563426489,0.103651407501,0.104091312559,0.104795160653,0.105059103689,0.104707179642,0.104834263325,0.104511666282,0.104286825919,0.104130415231,0.104022882884,0.10457032029,0.104198844907,0.103954453208,0.103573202157,0.103465669809,0.103729612844,0.104003331548,0.10374916418,0.102840027059,0.102752046047,0.103045316086,0.102439224672,0.10196999261,0.101784254918,0.101608292895,0.1011488365,0.101080406824,0.101031528484,0.100757809781,0.100444988406,0.0997997943199,0.0993989919331,0.0991937029057,0.0987049195071,0.0979521930734,0.0974438583388,0.0969648506082,0.0968377669246,0.0966129265613,0.096700907573,0.0967791129168,0.0964271888698,0.0967693372488,0.0965249455495,0.0965151698816,0.0967888885848,0.0962218998424,0.095674462436,0.0959677324752,0.0961241431627,0.0958406487915,0.0958797514634,0.0954593977406,0.0954007437328,0.0956353597641,0.0960948161588,0.0952247817093,0.0957428921118,0.0959872838111,0.0957037894399,0.095332314057,0.0956158084282,0.0954007437328,0.0956549111001,0.0955473787524,0.0955962570922,0.0960850404908,0.0958113217876,0.0951759033695,0.0952247817093,0.0951563520335,0.094657792967,0.0948728576624,0.094999941346,0.0948142036545,0.0949706143421,0.0947262226428,0.0948924089983,0.094325420256,0.0945991389592,0.0947066713069,0.094657792967,0.0943742985958,0.094657792967,0.09430586892,0.0942667662481,0.094325420256,0.0936020208261,0.0931327887635,0.0929861537439,0.0929861537439,0.0923018569859,0.0925755756891,0.0919792599428,0.0922236516421,0.0921063436265,0.0921454462983,0.0915198035482,0.0913536171927,0.0912656361809,0.0908159554542,0.0906008907589,0.0900827803564,0.0903369477236,0.0902685180478,0.0901121073603,0.0900436776845,0.0900045750126,0.089525567282,0.0888803731959,0.0882938331176,0.0876486390315,0.0872673879806,0.0868959125977,0.0867786045821,0.0863973535312,0.08611385916,0.0860845321561,0.0862995968515,0.0860845321561,0.0856739541013,0.0849701060073,0.0852144977066,0.0852731517145,0.0852927030504,0.0848430223237,0.0852144977066,0.0852340490426,0.0851167410269,0.0855859730895,0.0854588894059,0.0853806840621,0.08543933807,0.0855859730895,0.0851460680308,0.0848821249956,0.0851265166949,0.0851265166949,0.0853709083942,0.0848136953198,0.0849310033355,0.0848039196518,0.0849212276675,0.084755041312,0.0853122543863,0.0861334104959,0.0865439885507,0.0870132206134,0.0876584146995,0.088176525102,0.0883818141294,0.0879028063988,0.0873553689924,0.0869350152696,0.0870034449454,0.0875215553479,0.0878637037269,0.0882449547778,0.0884209168012,0.0883915897973,0.0882547304457,0.0883427114575,0.0879223577347,0.0878832550628,0.0876779660354,0.0873749203283,0.0868372585899,0.087130528629,0.0869056882657,0.0870425476173,0.0879907874105,0.0880201144144,0.0881178710941,0.0882254034418,0.0878539280589,0.0877854983831,0.0877268443753,0.0873749203283,0.0874042473322,0.0875411066838,0.0870034449454,0.0867688289141,0.0863680265273,0.0862116158397,0.0859867754764,0.0856739541013,0.0854100110661,0.0859183458006,0.0862702698475,0.0865146615468,0.0863289238554,0.0861627374999,0.0861529618319,0.0859183458006,0.0852047220387,0.0852047220387,0.0856055244255,0.0857912621169,0.0858303647888,0.0860356538162,0.0860063268123,0.0858792431287,0.0861725131678,0.0860552051522,0.0861627374999,0.0859281214685,0.0852340490426,0.0853318057223,0.0853904597301,0.0852047220387,0.0855957487575,0.0857423837771,0.0861627374999,0.0866906235703,0.0865439885507,0.0866124182265,0.0867688289141,0.0870718746212,0.0876681903674,0.0871012016251,0.0870718746212,0.0872380609767,0.0873455933244,0.087482452676,0.0875215553479,0.0873162663205,0.0873944716642,0.0872673879806,0.0872185096408,0.0876486390315,0.0882547304457,0.0882645061137,0.0881276467621,0.0881960764379,0.0880103387464,0.0876290876956,0.0879028063988,0.0883329357895,0.088489346477,0.0882156277738,0.0882254034418,0.0884502438052,0.0889683542076,0.089202970239,0.089515791614,0.0899068183329,0.0894669132742,0.0892127459069,0.0889097001998,0.0883427114575,0.088518673481,0.0883818141294,0.0884795708091,0.0878441523909,0.0878637037269,0.0880787684222,0.0883524871254,0.0884795708091,0.0886848598365,0.0887630651802,0.0890563352194,0.0892420729108,0.0890563352194,0.0893789322624,0.0896330996297,0.0895548942859,0.0896037726258,0.0899459210048,0.0897797346493,0.0897601833133,0.0899850236767,0.0898286129891,0.0896135482938,0.089515791614,0.0892713999148,0.0896135482938,0.0897406319774,0.0893202782546,0.0890856622233,0.0884697951411,0.0878930307308,0.0870620989532,0.0866710722344,0.0869056882657,0.087130528629,0.0871109772931,0.0870425476173,0.0869154639337,0.0865928668906,0.0861822888358,0.0857032811052,0.0855175434137,0.0846084062924,0.084051193218,0.0834157747999,0.0825261890145,0.082008078612,0.0813726601939,0.0815095195455,0.0812064738384,0.0804928500764,0.079964964006,0.0794957319434,0.0794370779355,0.0791340322284,0.0791438078964,0.0787723325135,0.0783813057946,0.0782151194391,0.0778436440562,0.0779902790758,0.0778338683882,0.0773548606576,0.0773841876615,0.0772473283099,0.0774623930053,0.0771788986341,0.0771397959623,0.0773059823178,0.0771397959623,0.0767976475833,0.0773450849897,0.0767976475833,0.0765239288801,0.0766119098918,0.0770713662865,0.0768660772591,0.0769833852747,0.0775894766889,0.0781173627594,0.0783031004509,0.0787527811775,0.0787625568455,0.0794077509316,0.0789873972089,0.078586594822,0.0790851538886,0.0794077509316,0.0794664049394,0.0793099942519,0.0796912453028,0.0793588725918,0.0794077509316,0.079622815627,0.0793490969238,0.0794175265996,0.0792122375722,0.0787723325135,0.0786256974939,0.0784106327985,0.0782053437711,0.0777556630445,0.0780293817477,0.0783226517868,0.0784008571306,0.0784399598025,0.0782346707751,0.0775894766889,0.0779511764039,0.0783617544587,0.078254222111,0.0778436440562,0.0776676820327,0.0774330660014,0.0767683205793,0.076201331837,0.0761329021612,0.0763381911886,0.0763577425245,0.0761231264932,0.0762208831729,0.0763772938605,0.0763479668566,0.0760937994893,0.0756147917587,0.0755365864149,0.0753606243915,0.0754877080751,0.0755659134189,0.0755854647548,0.0755659134189,0.0752433163758,0.0752726433797,0.0753997270634,0.0755854647548,0.0756147917587,0.0755659134189,0.0757027727705,0.0758200807861,0.0757516511103,0.0756343430947,0.0758982861299,0.0760644724854,0.0761524534971,0.0760351454815,0.0762795371808,0.0763088641847,0.0762502101769,0.0763577425245,0.0768367502551,0.0770518149505,0.0773353093217,0.0772766553139,0.0772864309818,0.0775210470131,0.0775112713452,0.0774526173373,0.0775210470131,0.0771788986341,0.0771788986341,0.0774721686733,0.0773255336537,0.0776774577007,0.0777165603726,0.0775308226811,0.0773841876615,0.0776285793608,0.0774330660014,0.077237552642,0.0776285793608,0.0777556630445,0.0779805034078,0.0781075870914,0.0780684844195,0.0783031004509,0.0785670434861,0.078948294537,0.078606146158,0.0787918838494,0.0787527811775,0.0788016595174,0.0784790624743,0.0780978114235,0.0785377164822,0.0791926862363,0.0788896405291,0.0788896405291,0.0783715301267,0.0786354731619,0.0783617544587,0.0780098304117,0.0774917200092,0.0777458873765,0.0774721686733,0.0773646363256,0.0774330660014,0.0776872333687,0.0781662410993,0.0781173627594,0.0779707277398,0.0783422031227,0.0782053437711,0.0785572678181,0.0787332298416,0.0786648001658,0.0785377164822,0.0783519787907,0.078586594822,0.0787039028377,0.0790069485448,0.0787918838494,0.0786159218259,0.0785377164822,0.0789580702049,0.0790558268847,0.0792024619042,0.0794175265996,0.079280667248,0.0794957319434,0.0793784239277,0.0788212108533,0.0791340322284,0.0791829105683,0.0792220132402,0.0793588725918,0.0791047052245,0.0793784239277,0.0798574316583,0.0798281046544,0.0798867586622,0.0797987776505,0.080287561049,0.080659036432,0.0806199337601,0.0808349984554,0.0810793901547,0.0811966981704,0.0816072762252,0.0815388465494,0.0819005462643,0.0820374056159,0.0820765082878,0.0819396489362,0.0818516679245,0.081656154565,0.0813922115298,0.0811869225024,0.0810402874828,0.0811478198305,0.0809425308031,0.0806785877679,0.0809523064711,0.0804439717366,0.0807274661078,0.0807372417757,0.0811184928266,0.0812064738384,0.0813042305181,0.0814997438775,0.0818712192604,0.0816463788971,0.0818907705964,0.0819787516081,0.0818809949284,0.0821449379636,0.0825457403504,0.0826630483661,0.0825359646825,0.0822720216472,0.0819494246042,0.0812651278462,0.0810891658227,0.0807176904398,0.0807176904398,0.0801898043693,0.079964964006,0.0797498993106,0.0798476559903,0.0800529450177,0.0800431693498,0.0803755420608,0.0800040666779,0.0800920476896,0.0800333936818,0.0799160856661,0.0798574316583,0.079955188338,0.0795641616192,0.0800138423458,0.0796423669629,0.0796619182989,0.0793490969238,0.0794566292715,0.0791535835644,0.0793979752636,0.0797596749786,0.0799942910099,0.0803559907248,0.0800822720216,0.0801507016974,0.0797987776505,0.0795934886231,0.079622815627,0.0791535835644,0.0784986138103,0.0782737734469,0.0781662410993,0.0783226517868,0.0780782600875,0.0780000547437,0.0784399598025,0.0784692868064,0.0788016595174,0.078928743201,0.0790264998807,0.0789091918651,0.0790264998807,0.0793099942519,0.0771593472982,0.0751064570242,0.0728287263869,0.0706096497574,0.0683221434521,0.0662594775101,0.0640012982087,0.0620461646144,0.0600714796842,0.057764422043,0.0555355697455,0.0533946984597,0.0508823517911,0.0482429214388,0.045789228778,0.0432573307734,0.0410871324838,0.0388973828582)
s <- c(0.0420004401238,0.0420004401238,0.0419203630215,0.0423007292572,0.0423457726272,0.042215647336,0.0424358593672,0.0424408641861,0.0425309509261,0.0424658882805,0.0424308545483,0.0423257533516,0.0424758979183,0.0426410569417,0.0428212304217,0.0427912015084,0.0427461581384,0.0425709894772,0.0426911051306,0.042535955745,0.042535955745,0.0422757051627,0.0423257533516,0.0420705075882,0.0421906232416,0.0422707003438,0.0421505846905,0.0630356939179,0.0641017203414,0.0648824720883,0.0661687105429,0.0669744863842,0.0680154887133,0.069031466948,0.0699323343481,0.0707831535594,0.0715038474795,0.0725048112575,0.0735007702166,0.0743816183412,0.0751673749069,0.076253420606,0.0774395626829,0.0783804686342,0.0794164661444,0.0794765239711,0.0793113649477,0.07934639868,0.0792613167588,0.0787958686021,0.0789259938932,0.0787708445076,0.078800873421,0.0788659360665,0.0790861480977,0.0792963504911,0.0792913456722,0.0791762348377,0.0789009697988,0.0789259938932,0.0789309987121,0.078981046901,0.0791562155622,0.07943648542,0.0793213745855,0.0797467841912,0.0792362926644,0.07966170227,0.0796917311834,0.0796717119078,0.0795165625222,0.0798668998445,0.0800470733246,0.0800170444112,0.0800871118757,0.0801071311512,0.0801771986157,0.0799569865845,0.0801321552457,0.0804174299224,0.0806726756858,0.0805175263002,0.0804324443791,0.0801471697023,0.079936967309,0.0800020299545,0.07975178901,0.0797768131045,0.0799519817656,0.0797017408211,0.0796416829945,0.0797818179234,0.0796967360023,0.0797718082856,0.0798568902067,0.0802272468046,0.0799720010412,0.0800020299545,0.0801571793401,0.0798969287579,0.0802122323479,0.0804674781113,0.0805325407569,0.0804925022057,0.0808228202525,0.0810930804725,0.081388364787,0.0810880756536,0.0812782587715,0.0812182009448,0.0814284033382,0.0814884611648,0.0818688274005,0.0823542948328,0.0819539093216,0.0819038611327,0.0815985671804,0.0817887502982,0.0819989526916,0.0820389912427,0.0824443815728,0.0825895213206,0.0828697911784,0.0829949116507,0.0830099261074,0.0832201285007,0.0830900032096,0.082979897194,0.0829098297296,0.0830599742963,0.0829748923751,0.0823993382028,0.0824944297617,0.082164111715,0.0822742177305,0.0824994345806,0.0823793189272,0.081933890046,0.0821290779827,0.0821490972583,0.0817387021093,0.081298278047,0.0810880756536,0.0811731575748,0.0811581431181,0.0812782587715,0.0809329262681,0.0808978925358,0.0803323480013,0.0800821070568,0.0800420685057,0.0800120395923,0.0800670926001,0.0799720010412,0.0799119432145,0.0800670926001,0.0796917311834,0.0794665143333,0.0791261866488,0.0790411047277,0.0791011625544,0.0789009697988,0.0789860517199,0.0790010661766,0.078936003531,0.0786006806654,0.0784955794687,0.0787608348699,0.0786006806654,0.0788509216099,0.0787808541454,0.0788258975154,0.0787708445076,0.0787658396887,0.0788609312477,0.0786757529487,0.0788309023343,0.0789910565388,0.0791261866488,0.0791111721921,0.0790360999088,0.0791662251999,0.0794264757822,0.0794514998767,0.0796316733567,0.0798819143012,0.0801671889779,0.0802873046313,0.0800670926001,0.0800470733246,0.0798869191201,0.0798869191201,0.0799669962223,0.0804324443791,0.080707709418,0.0809679600003,0.0809429359058,0.0811731575748,0.0810180081892,0.0809129069925,0.0810480371025,0.0813283069604,0.0816235912749,0.0815535238104,0.0815184900782,0.0814684418893,0.0811281142048,0.0812682491337,0.0813983744248,0.0815435141726,0.0815134852593,0.0814233985193,0.0812482298581,0.0815034756215,0.081753716566,0.0815985671804,0.0815985671804,0.0816836491015,0.0812932732281,0.0812332154014,0.0812882684092,0.0810130033703,0.0811531382992,0.0808728684414,0.0810580467403,0.0814284033382,0.0815134852593,0.0812882684092,0.0813283069604,0.0807477479691,0.0807277286936,0.0803373528202,0.0800470733246,0.0800420685057,0.0800420685057,0.0801972178912,0.0803623769146,0.0803523672768,0.0802322516235,0.0803073239068,0.0804724829302,0.080527535938,0.0805976034024,0.0804424540169,0.0805575648513,0.0804274395602,0.0805525600324,0.0807477479691,0.0810029937325,0.0810530419214,0.0807177190558,0.0809379310869,0.0812882684092,0.0810930804725,0.0816536201882,0.0819438996838,0.0821941406283,0.0822291743605,0.0823492900139,0.0823242659194,0.0824944297617,0.0824393767539,0.082389328565,0.0825594924073,0.0824543912106,0.0826445743284,0.0828747959973,0.0828697911784,0.0830299453829,0.0830099261074,0.083115027304,0.0830950080285,0.0829298490051,0.083069983934,0.0829698875562,0.0828547767218,0.0828047285329,0.0830599742963,0.0831550658552,0.0832251333196,0.0828948152729,0.0830799935718,0.0829849020129,0.0829548730996,0.0827346610684,0.0825494827695,0.0826796080606,0.0827296562495,0.0823743141083,0.0824143526595,0.0821040538883,0.0818988563138,0.0817737358416,0.0817737358416,0.0816436105504,0.0816786442826,0.0815585286293,0.0816035719993,0.0818588177627,0.0819038611327,0.0819939478727,0.0821090587072,0.0817787406604,0.0818337936682,0.0818488081249,0.0820840346127,0.0820540056994,0.0821991454472,0.0822291743605,0.0824043430217,0.0825544875884,0.0826996273362,0.0829748923751,0.0829298490051,0.0833052104219,0.0834903887208,0.0838106971297,0.0837556441219,0.0837706585786,0.083935817602,0.0841560296331,0.0846114681521,0.0846314874277,0.084706559711,0.0848867331911,0.0854472729067,0.0858927017879,0.086162962008,0.0863581499447,0.0866534342592,0.0870438101326,0.0873190751715,0.087434186006,0.0874191715493,0.0872189787937,0.0875442920216,0.0878095474227,0.0879747064461,0.0882749955795,0.0886303377207,0.0889056027596,0.0887404437363,0.0891007906963,0.0894411183808,0.0899215809943,0.0897814460653,0.0898915520809,0.0899966532776,0.089796460522,0.0896262966798,0.090071725561,0.0901317833876,0.0900016580965,0.0899666243643,0.0899215809943,0.0899866436398,0.0898064701598,0.089526200302,0.0895612340342,0.0896913593253,0.0899416002698,0.0897163834198,0.0894311087431,0.0892909738141,0.0890457376885,0.0892459304441,0.089070761783,0.0891258147908,0.0893260075464,0.0890807714208,0.0891007906963,0.088525236524,0.088345063044,0.0883600775006,0.0880097401783,0.0879997305406,0.0878495859739,0.0881648895639,0.0878545907927,0.0879396727139,0.0881548799261,0.088159884745,0.0879747064461,0.0881849088395,0.088390106414,0.088480193154,0.0881648895639,0.0877494895961,0.0876493932183,0.0876293739427,0.0877244655016,0.0873090655337,0.0877294703205,0.0876644076749,0.087934667895,0.0879396727139,0.0877294703205,0.0877695088716,0.0876493932183,0.0876093546671,0.0879697016272,0.0877444847772,0.0874241763682,0.0873240799904,0.0869987667626,0.0872039643371,0.0875292775649,0.088069798005,0.0879646968083,0.0876443883994,0.0878245618794,0.0878145522416,0.0878095474227,0.087799537785,0.0878696052494,0.0877094510449,0.087614359486,0.0878095474227,0.0880748028239,0.0877845233283,0.0879146486194,0.0879246582572,0.0878195570605,0.0877594992338,0.0882599811228,0.0882549763039,0.0877494895961,0.0882599811228,0.0882449666662,0.0882599811228,0.0882900100362,0.0882599811228,0.088069798005,0.0881398654695,0.0882850052173,0.0883250437684,0.0882649859417,0.0878996341628,0.0879947257217,0.0878145522416,0.0879546871705,0.0880297594539,0.0877645040527,0.0876844269505,0.0878095474227,0.0880347642728,0.0882449666662,0.0882199425717,0.0883350534062,0.087889624525,0.0880998269183,0.0879196534383,0.0878746100683,0.0876393835805,0.0872640221637,0.0873541089038,0.0870287956759,0.0873390944471,0.0876443883994,0.0880547835483,0.0878595956116,0.0882149377528,0.0889606557674,0.0889856798619,0.0891258147908,0.0894311087431,0.0890507425074,0.0887804822874,0.0888205208385,0.0887554581929,0.0888355352952,0.0889056027596,0.0889956894996,0.0892709545386,0.088980675043,0.0892309159875,0.0892909738141,0.0894210991053,0.0894010798297,0.0891508388852,0.0891057955152,0.0889256220352,0.0888555545707,0.0888805786652,0.0889706654052,0.0892108967119,0.0889005979407,0.0887904919252,0.0886954003662,0.0886703762718,0.088980675043,0.0892459304441,0.0894361135619,0.0892559400819,0.0887804822874,0.0885052172484,0.0884751883351,0.088345063044,0.0881048317372,0.0882950148551,0.0881849088395,0.0880197498161,0.0882549763039,0.0885502606184,0.0884251401462,0.0881548799261,0.0882449666662,0.0884051208706,0.0883050244928,0.0883800967762,0.0887904919252,0.0889206172163,0.088795496744,0.0886553618151,0.0890457376885,0.089160848523,0.0892659497197,0.089661330412,0.0898765376243,0.0899816388209,0.0900116677343,0.0900016580965,0.0903019472299,0.0905271640799,0.0905872219066,0.0907774050244,0.0910426604256,0.0908274532133,0.0905071448044,0.0907874146622,0.0910526700634,0.0914530555746,0.0914430459368,0.0914480507557,0.0915481471335,0.0911777905356,0.091252862819,0.0915031037635,0.0915381374957,0.0918334218102,0.0924189856203,0.0927442988481,0.0928143663126,0.0925641253681,0.0924039711636,0.0926792362026,0.0927793325804,0.0927893422182,0.0930596024382,0.0931847229105,0.0934950216816,0.0936852047994,0.094070575854,0.0938553686417,0.093795310815,0.0938603734606,0.0943908842629,0.0947312119474,0.0952166793797,0.0956470938043,0.0961776046066,0.0963978166377,0.0966630720389,0.0970884816446,0.0977991659269,0.0979142767614,0.0982195707137,0.0982445948081,0.0988251537993,0.0992105248539,0.0997760693884,0.10022149827,0.100651912694,0.100982230741,0.101462693354,0.101727948755,0.101988199338,0.102528719778,0.103054225761,0.103474630548,0.104150281098,0.104305430484,0.104800907554,0.105191283427,0.105651726765,0.106107165284,0.106062121914,0.106767801378,0.106812844748,0.107338350731,0.107673673597,0.107903895266,0.107588591675,0.107753750699,0.107423432652,0.107278292904,0.107123143519,0.107003027865,0.107068090511,0.106988013409,0.10684787848,0.10662266163,0.106402449599,0.106662700181,0.106652690543,0.106692729094,0.106007068906,0.106072131552,0.106042102639,0.105576654482,0.105126220782,0.104775883459,0.104650762987,0.10427540157,0.103900040154,0.103709857036,0.103169336596,0.102648835431,0.102003213794,0.101682905385,0.101252490961,0.100792047623,0.100206483813,0.0996059055462,0.0991554718461,0.0986800140515,0.098474816477,0.0982145658948,0.0980093683203,0.0974238045102,0.0974137948724,0.097203592479,0.096888288889,0.0968532551567,0.0963077298977,0.0958372769221,0.0955970456154,0.0956771227176,0.0955520022454,0.0951666311908,0.0946961782152,0.0944709613652,0.0943958890818,0.0944209131763,0.0938003156339,0.0938553686417,0.0937302481694,0.0935750987839,0.093159698816,0.0931296699027,0.0930195638871,0.0933148482016,0.0933749060283,0.0936902096183,0.0936902096183,0.0933598915716,0.092794347037,0.0925791398248,0.0926241831948,0.0922638362347,0.0923689374314,0.0923989663447,0.0922988699669,0.0923339036992,0.092388956707,0.0926391976515,0.0923389085181,0.092388956707,0.092203778408,0.0922288025025,0.0922137880458,0.0924640289903,0.0924440097148,0.0920936723925,0.0919985808336,0.0917883784402,0.0918284169913,0.0916982917002,0.0918634507235,0.0913379447401,0.0915831808657,0.0914180218423,0.0915131134012,0.0915431423146,0.0914530555746,0.0911577712601,0.0909625833234,0.0906272604577,0.0903519954188,0.0898565183487,0.0898364990731,0.0899916484587,0.0902819279543,0.0904120532455,0.090161812301,0.0900617159232,0.0898715328054,0.0895312051209,0.0893310123653,0.0888655642085,0.0885302413429,0.0883600775006,0.0882699907606,0.0879847160839,0.087889624525,0.0877795185094,0.087614359486,0.0873090655337,0.0872339932504,0.0870838486837,0.0870738390459,0.0871288920537,0.086933704117,0.0866234053458,0.086663443897,0.0870888535026,0.0869387089359,0.0871589209671,0.0872790366204,0.0869286992981,0.0868936655659,0.0869687378492,0.0867835595503,0.0868135884637,0.0869987667626,0.0871288920537,0.0871188824159,0.087023790857,0.0868386125581,0.0867685450936,0.0870938583215,0.0869236944792,0.0869887571248,0.0874892390138,0.0875793257538,0.0878495859739,0.0879646968083,0.0881098365561,0.0882549763039,0.0880647931861,0.0876543980372,0.0875192679271,0.0879196534383,0.0884902027918,0.0886503569962,0.0888605593896,0.0890307232319,0.0888855834841,0.0887454485551,0.0887104148229,0.088525236524,0.0882099329339,0.0878295666983,0.0873741281793,0.0867935691881,0.0871789402426,0.0870938583215,0.0868586318337,0.0872239836126,0.0872940510771,0.0872740318015,0.0874942438327,0.0873140703526,0.0872490077071,0.0874041570927,0.0870938583215,0.0868536270148,0.0869637330303,0.0865983812514,0.0863481403069,0.0861579571891,0.0860628656302,0.0861479475513,0.0859177258824,0.0858176295046,0.0859477547957,0.0862680632047,0.0862030005591,0.0859577644335,0.0854873114578,0.0852270608756,0.0848817283722,0.0844162802154,0.0845163765932,0.0846114681521,0.0850068488444,0.0850318729389,0.08507191149,0.0852070416,0.0852620946078,0.0856424608434,0.0854973210956,0.0856524704812,0.0857375524023,0.0857475620401,0.0856524704812,0.0856424608434,0.0853671958045,0.0856074271112,0.0856274463868,0.0857725861346,0.0861079090002,0.086298092118,0.0865933764325,0.0867935691881,0.0869637330303,0.0871539161482,0.0869487185737,0.086798574007,0.0869987667626,0.0871088727782,0.0874141667304,0.087479229376,0.0876243691238,0.0878345715172,0.0878595956116,0.087934667895,0.0882900100362,0.0886553618151,0.0885953039884,0.0885102220673,0.0883300485873,0.0881748992017,0.0881949184773,0.0883050244928,0.0887304340985,0.0887254292796,0.0885652750751,0.0886303377207,0.0887904919252,0.0886703762718,0.0887854871063,0.0888255256574,0.0890157087752,0.0887904919252,0.0887254292796,0.0885202317051,0.0882449666662,0.0881949184773,0.0880597883672,0.0883300485873,0.0881548799261,0.0882599811228,0.0884301449651,0.0885302413429,0.0886453521773,0.0887604630118,0.0885302413429,0.0886653714529,0.0887104148229,0.0885402509807,0.0887204244607,0.0887154196418,0.0885953039884,0.0886903955474,0.0887304340985,0.0886253329018,0.0882399618473,0.0882800003984,0.0881298558317,0.0878746100683,0.0874291811871,0.0873390944471,0.0875893353916,0.0873591137226,0.0871489113293,0.0871739354237,0.086663443897,0.0865132993303,0.0860678704491,0.0858526632368,0.0858026150479,0.0859527596146,0.0858726825124,0.0856124319301,0.0853671958045,0.0849768199311,0.0845163765932,0.0841960681843,0.0840509284364,0.083705595933,0.083255162233,0.0827496755251,0.082344285195,0.0821541020772,0.0816235912749,0.0816035719993,0.0813283069604,0.0811831672126,0.0807327335125,0.0802923094502,0.0803123287257,0.0799870154979,0.0803023190879,0.0800320588679,0.0796967360023,0.07975178901,0.0797868227423,0.0798218564745,0.0795966396245,0.0793413938611,0.0790811432788,0.0788258975154,0.0792262830266,0.0791512107433,0.0791361962866,0.0790210854521,0.0790611240032,0.0787908637832,0.0789860517199,0.0788108830588,0.0787358107754,0.0788108830588,0.0791862444755,0.0791462059244,0.0790110758143,0.0791762348377,0.0793113649477,0.0795365817978,0.0796466878134,0.0794064565066,0.0797267649156,0.0795566010733,0.0793964468689,0.0793964468689,0.079846880569,0.0799770058601,0.079891923939,0.0800320588679,0.0797217600967,0.0797868227423,0.0797868227423,0.0796566974511,0.0795215673411,0.0795315769789,0.07939144205,0.0794715191522,0.0795365817978,0.0793363890422,0.0790210854521,0.0788959649799,0.0790911529166,0.0792463023022,0.0792062637511,0.0794064565066,0.079026090271,0.0793814324122,0.0795515962545,0.0795515962545,0.0794615095144,0.0792212782077,0.0791512107433,0.0789309987121,0.0786407192165,0.0783604493587,0.0784605457365,0.078525608382,0.078570651752,0.0784555409176,0.0785306132009,0.0787508252321,0.0784104975476,0.0781752710597,0.0780751746819,0.0781602566031,0.078435521642,0.0787408155943,0.0789059746177,0.0789410083499,0.078890960161,0.0787408155943,0.0786257047598,0.0785206035631,0.0784955794687,0.0785406228387,0.0785306132009,0.0786056854843,0.0785506324765,0.0784405264609,0.078525608382,0.0785306132009,0.0785606421143,0.0783804686342,0.0786106903032,0.0785055891065,0.0782153096109,0.0781452421464,0.0783504397209,0.0784455312798,0.0786907674054,0.0787207963187,0.078845916791,0.0791261866488,0.0791261866488,0.0790761384599,0.0789960613577,0.078525608382,0.0785606421143,0.0788058782399,0.0787858589643,0.0789009697988,0.0788609312477,0.0785055891065,0.078345434902,0.0785155987443,0.0785756565709,0.078480565012,0.0787057818621,0.0790110758143,0.0792362926644,0.0794965432467,0.0794565046955,0.0794464950578,0.0795866299867,0.0799770058601,0.0798318661123,0.0798769094823,0.0799569865845,0.0799770058601,0.0798068420178,0.0794665143333,0.0797167552778,0.0802923094502,0.0801771986157,0.0801421648835,0.0799870154979,0.0801872082535,0.0800871118757,0.0798218564745,0.07939144205,0.0797167552778,0.0797868227423,0.0798168516556,0.0800120395923,0.0802122323479,0.0804874973869,0.0805675744891,0.0804674781113,0.0809229166303,0.0809279214492,0.0812031864881,0.0810630515592,0.0809729648192,0.0809129069925,0.0807827817014,0.0808828780792,0.0808178154336,0.0811581431181,0.0814584322515,0.0813132925037,0.0812232057637,0.0814684418893,0.0813683455115,0.0816336009126,0.0818688274005,0.0818588177627,0.0821591068961,0.0821140635261,0.0816986635582,0.0819689237783,0.0819689237783,0.0820540056994,0.0821741213527,0.0820139671483,0.0823643044706,0.0827897140762,0.0826946225173,0.0826295598717,0.0827346610684,0.0830549694774,0.0831800899496,0.0830849983907,0.0833702730674,0.0834853839019,0.0836405332875,0.083890774232,0.0836305236497,0.0836355284686,0.0839107935075,0.0839608416964,0.0837956826731,0.0836305236497,0.0835754706419,0.0833802827052,0.0831350465796,0.0830849983907,0.0829849020129,0.0827746996195,0.0828547767218,0.0828147381706,0.0825644972262,0.0826946225173,0.0826746032417,0.0829949116507,0.0832851911463,0.0833552586108,0.0834453453508,0.083570465823,0.083390292343,0.0834603598074,0.0832151236818,0.082889810454,0.0831750851307,0.0834453453508,0.0834253260752,0.0830649791151,0.0828047285329,0.082344285195,0.0819088659516,0.0817837454793,0.0814384129759,0.0811281142048,0.0809329262681,0.0810480371025,0.0808278250714,0.0810180081892,0.081253234677,0.081298278047,0.0812882684092,0.0811581431181,0.0810580467403,0.0811981816692,0.0812932732281,0.0813733503304,0.0812932732281,0.0810630515592,0.0812932732281,0.0809329262681,0.0810480371025,0.0809579503625,0.0808328298903,0.0806476515913,0.0808078057958,0.0807927913391,0.0808628588036,0.0810230130081,0.0809379310869,0.0812131961259,0.0807877865203,0.0805625696702,0.0807027045991,0.0807177190558,0.0803423576391,0.080482492568,0.0804174299224,0.0805175263002,0.0803023190879,0.0804774877491,0.0807777768825,0.0807177190558,0.0808628588036,0.0807727720636,0.0807227238747,0.0806976997802,0.0809179118114,0.080842839528,0.0797467841912,0.0786907674054,0.0775346542418,0.076253420606,0.075207413458,0.0742865267823,0.0729802690521,0.0721494691163,0.0708231921105,0.0697771849625,0.0687361826334,0.0673598574387,0.066028575614,0.064757351616,0.0634310746102,0.0622549421711,0.0611638916531,0.0599026772928,0.0399834981112,0.0400185318434,0.0399334499223,0.0398283487256,0.0397532764422,0.0395280595922,0.0395881174189,0.0396381656078,0.0397432668044,0.0399634788356,0.0399985125678,0.0399985125678,0.0400185318434,0.0402737776068,0.0403038065201,0.0405490426457,0.0406241149291,0.0408243076847,0.0409744522514,0.0408443269602,0.0410245004402,0.0411796498258,0.0411045775425,0.0409544329758,0.0410895630858,0.0410845582669,0.0414399004081)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("9-organelles-nucleus-merged/WT_AGO4-ChIP-GSM867182.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=55"),bty="n")
dev.off()