# R script for Peak Model
#  -- generated by MACS
p <- c(0.0308320108819,0.0317388347314,0.0329047511092,0.0343297600155,0.0375684166208,0.0395116105839,0.0415843508113,0.0430093597176,0.0448230074165,0.0474139327007,0.0498753117207,0.0518185056838,0.0532435145901,0.0550571622891,0.0572594487806,0.0607571979143,0.0633481231985,0.0652913171616,0.0669754185964,0.0674936036532,0.0691777050879,0.0715095378437,0.0726754542216,0.0744891019205,0.0746186481847,0.0755254720342,0.0757845645626,0.0768209346763,0.0774686659973,0.0779868510542,0.0773391197331,0.0782459435826,0.0781163973184,0.0783754898468,0.0775982122616,0.0781163973184,0.0800595912815,0.0805777763384,0.080966415131,0.0816141464521,0.0791527674321,0.0790232211679,0.0790232211679,0.0791527674321,0.0800595912815,0.0800595912815,0.0800595912815,0.0801891375457,0.08031868381,0.0800595912815,0.0786345823752,0.0768209346763,0.0755254720342,0.0752663795058,0.0735822780711,0.0738413705995,0.0728050004858,0.0715095378437,0.07047316773,0.0684004275027,0.0685299737669,0.0686595200311,0.0685299737669,0.0681413349743,0.0689186125595,0.0684004275027,0.0690481588237,0.0691777050879,0.0691777050879,0.06801178871,0.0677526961816,0.0672345111248,0.0652913171616,0.0660685947469,0.0668458723322,0.0664572335395,0.0672345111248,0.0665867798037,0.0658095022185,0.0645140395764,0.0628299381417,0.0616640217638,0.0608867441785,0.0601094665933,0.0594617352722,0.0594617352722,0.0598503740648,0.058684457687,0.0581662726301,0.0582958188943,0.0588140039512,0.0588140039512,0.0594617352722,0.0589435502154,0.0582958188943,0.0580367263659,0.0579071801017,0.0563526249312,0.0549276160249,0.054409430968,0.0527253295333,0.0525957832691,0.0520775982123,0.0518185056838,0.0519480519481,0.0525957832691,0.0533730608544,0.0527253295333,0.0523366907407,0.0529844220617,0.0514298668912,0.0511707743628,0.051300320627,0.0514298668912,0.0524662370049,0.0532435145901,0.0533730608544,0.0532435145901,0.0541503384396,0.0545389772322,0.0551867085533,0.0551867085533,0.0557048936101,0.0566117174596,0.0582958188943,0.0577776338375,0.0579071801017,0.0594617352722,0.0576480875733,0.0590730964796,0.0604981053859,0.0604981053859,0.0608867441785,0.0610162904427,0.0620526605564,0.0611458367069,0.0625708456132,0.0630890306701,0.0632185769343,0.0625708456132,0.0634776694627,0.0639958545195,0.0637367619911,0.0647731321048,0.0663276872753,0.0655504096901,0.0674936036532,0.0682708812385,0.06801178871,0.0686595200311,0.0689186125595,0.0706027139942,0.0717686303721,0.0720277229005,0.0717686303721,0.0717686303721,0.0720277229005,0.0733231855426,0.0737118243353,0.0746186481847,0.0733231855426,0.0747481944489,0.0730640930142,0.0708618065227,0.072286815429,0.0712504453153,0.0703436214658,0.0699549826732,0.0686595200311,0.0681413349743,0.067364057389,0.0665867798037,0.0661981410111,0.0663276872753,0.0669754185964,0.0668458723322,0.0669754185964,0.0661981410111,0.0660685947469,0.0661981410111,0.0647731321048,0.0643844933122,0.0634776694627,0.062441299349,0.0620526605564,0.0610162904427,0.0594617352722,0.0580367263659,0.0573889950449,0.0580367263659,0.0571299025164,0.0577776338375,0.0573889950449,0.0564821711954,0.0558344398743,0.0563526249312,0.0571299025164,0.056870809988,0.0585549114227,0.0588140039512,0.0584253651585,0.0579071801017,0.0579071801017,0.0594617352722,0.0601094665933,0.0610162904427,0.0630890306701,0.0650322246332,0.0645140395764,0.0650322246332,0.0647731321048,0.0656799559543,0.064902678369,0.0665867798037,0.0665867798037,0.0660685947469,0.067364057389,0.0693072513521,0.0691777050879,0.0694367976163,0.0699549826732,0.0708618065227,0.072286815429,0.0717686303721,0.0718981766363,0.0712504453153,0.0708618065227,0.0702140752016,0.0709913527869,0.0702140752016,0.07047316773,0.0687890662953,0.069825436409,0.0689186125595,0.0678822424458,0.0681413349743,0.06801178871,0.0689186125595,0.0686595200311,0.0681413349743,0.0681413349743,0.0674936036532,0.0664572335395,0.0643844933122,0.0639958545195,0.0632185769343,0.0637367619911,0.0636072157269,0.0633481231985,0.061793568028,0.0611458367069,0.0610162904427,0.0594617352722,0.056870809988,0.056870809988,0.0563526249312,0.0559639861385,0.0567412637238,0.0560935324028,0.0572594487806,0.056870809988,0.0560935324028,0.0557048936101,0.0555753473459,0.0550571622891,0.0564821711954,0.0570003562522,0.0570003562522,0.056223078667,0.056870809988,0.0572594487806,0.056870809988,0.0567412637238,0.0560935324028,0.0576480875733,0.0573889950449,0.0576480875733,0.0592026427438,0.0595912815364,0.0604981053859,0.0620526605564,0.0619231142922,0.0615344754996,0.0623117530848,0.061793568028,0.0623117530848,0.0625708456132,0.0636072157269,0.0643844933122,0.0658095022185,0.0667163260679,0.0677526961816,0.0691777050879,0.069825436409,0.0712504453153,0.0726754542216,0.0735822780711,0.0746186481847,0.0774686659973,0.078505036111,0.08031868381,0.0788936749036,0.078505036111,0.0796709524889,0.0795414062247,0.0799300450173,0.0807073226026,0.0825209703015,0.0849823493215,0.0855005343783,0.0851118955857,0.0860187194352,0.0873141820773,0.086536904492,0.0861482656994,0.0874437283415,0.0871846358131,0.0874437283415,0.0888687372478,0.0887391909836,0.0906823849467,0.0904232924183,0.0906823849467,0.0904232924183,0.0901641998899,0.0900346536257,0.0913301162678,0.0913301162678,0.0906823849467,0.0897755610973,0.088350552191,0.0874437283415,0.0870550895489,0.0874437283415,0.0864073582278,0.0861482656994,0.0848528030573,0.0861482656994,0.0869255432846,0.0866664507562,0.0871846358131,0.0866664507562,0.0870550895489,0.0851118955857,0.0831687016226,0.0835573404152,0.083427794151,0.0843346180005,0.0843346180005,0.0838164329436,0.0842050717362,0.0835573404152,0.0832982478868,0.0844641642647,0.0839459792078,0.0836868866794,0.0842050717362,0.0844641642647,0.0847232567931,0.084075525472,0.0844641642647,0.084075525472,0.0820027852447,0.0826505165657,0.0826505165657,0.083427794151,0.083427794151,0.0838164329436,0.0845937105289,0.0844641642647,0.0842050717362,0.0827800628299,0.0829096090941,0.0822618777731,0.0810959613952,0.0801891375457,0.0798004987531,0.0807073226026,0.0791527674321,0.0791527674321,0.0794118599605,0.0792823136963,0.0787641286394,0.0779868510542,0.0764322958837,0.0763027496195,0.0756550182984,0.0756550182984,0.076043657091,0.0746186481847,0.0746186481847,0.0737118243353,0.0717686303721,0.0709913527869,0.07047316773,0.0709913527869,0.0707322602584,0.069825436409,0.069825436409,0.0694367976163,0.069825436409,0.0690481588237,0.0689186125595,0.0681413349743,0.0671049648606,0.0660685947469,0.0660685947469,0.0665867798037,0.0665867798037,0.0664572335395,0.0665867798037,0.0674936036532,0.0672345111248,0.0661981410111,0.0668458723322,0.0681413349743,0.0667163260679,0.0659390484827,0.0661981410111,0.0667163260679,0.0671049648606,0.06801178871,0.0681413349743,0.0681413349743,0.0685299737669,0.0699549826732,0.0690481588237,0.069825436409,0.0702140752016,0.0703436214658,0.0709913527869,0.0699549826732,0.0708618065227,0.0720277229005,0.0724163616932,0.0726754542216,0.0728050004858,0.0721572691648,0.0725459079574,0.0737118243353,0.0737118243353,0.0746186481847,0.0751368332416,0.0757845645626,0.0750072869774,0.0752663795058,0.07539592577,0.0763027496195,0.0770800272047,0.0781163973184,0.078505036111,0.0775982122616,0.0782459435826,0.0799300450173,0.0805777763384,0.0794118599605,0.0794118599605,0.0795414062247,0.0796709524889,0.0799300450173,0.0787641286394,0.0792823136963,0.0801891375457,0.0804482300742,0.0808368688668,0.0821323315089,0.0826505165657,0.0842050717362,0.0829096090941,0.0830391553584,0.0829096090941,0.0827800628299,0.0825209703015,0.0825209703015,0.0826505165657,0.0813550539236,0.0817436927163,0.0818732389805,0.0817436927163,0.0820027852447,0.0826505165657,0.083427794151,0.0836868866794,0.0827800628299,0.0823914240373,0.0814846001878,0.0814846001878,0.0817436927163,0.0825209703015,0.0814846001878,0.0810959613952,0.08031868381,0.0792823136963,0.0791527674321,0.0790232211679,0.0786345823752,0.0783754898468,0.0779868510542,0.0775982122616,0.0774686659973,0.07785730479,0.0777277585258,0.0782459435826,0.0770800272047,0.0773391197331,0.0770800272047,0.0773391197331,0.0781163973184,0.078505036111,0.0783754898468,0.0779868510542,0.0786345823752,0.0794118599605,0.0787641286394,0.0772095734689,0.0764322958837,0.0765618421479,0.0765618421479,0.07785730479,0.0783754898468,0.0777277585258,0.0790232211679,0.078505036111,0.0787641286394,0.0786345823752,0.07785730479,0.0779868510542,0.0796709524889,0.0804482300742,0.08031868381,0.080966415131,0.0808368688668,0.0812255076594,0.0812255076594,0.0816141464521,0.0807073226026,0.0792823136963,0.0781163973184,0.0774686659973,0.0774686659973,0.0779868510542,0.0774686659973,0.0775982122616,0.0769504809405,0.076043657091,0.0782459435826,0.0791527674321,0.0808368688668,0.0813550539236,0.0849823493215,0.0905528386825,0.0954755967225,0.10247109499,0.107782491822,0.11477799009,0.128509894096,0.141334974253,0.155973702108,0.178126113288,0.199630793147,0.226965054895,0.25235612268,0.282281309713,0.310392849046,0.337856657059,0.368170482884,0.398613854973,0.425170839136,0.4499141756,0.472973410629,0.492405350261,0.510800919778,0.526087378955,0.538264727791,0.550312530362,0.557178482366,0.565339897011,0.572983126599,0.57946043981,0.584771836642,0.589565048418,0.591896881174,0.591249149853,0.588528678304,0.587751400719,0.585678660492,0.580755902452,0.575962690676,0.568837646144,0.562619425462,0.553680733232,0.538264727791,0.52531010137,0.508469087023,0.486446222107,0.464941542248,0.437736826764,0.412345758979,0.38190238689,0.35236583865,0.324772484373,0.294976843605,0.263885740195,0.236551478447,0.211937688247,0.187453444311,0.167373773359,0.149755481426,0.13446902225,0.121384849564,0.108689315672,0.10156427114,0.0936619490235,0.0861482656994,0.0795414062247,0.0737118243353,0.0687890662953,0.0638663082553,0.0641254007838,0.0643844933122,0.0638663082553,0.0629594844059,0.0628299381417,0.0634776694627,0.0633481231985,0.0639958545195,0.0645140395764,0.064254947048,0.064902678369,0.0656799559543,0.0654208634259,0.0652913171616,0.0645140395764,0.0651617708974,0.0652913171616,0.0652913171616,0.0658095022185,0.0658095022185,0.0654208634259,0.0654208634259,0.0658095022185,0.0663276872753,0.0656799559543,0.0659390484827,0.0663276872753,0.0682708812385,0.0684004275027,0.0689186125595,0.0681413349743,0.0684004275027,0.0678822424458,0.06801178871,0.0690481588237,0.0715095378437,0.0709913527869,0.0718981766363,0.0709913527869,0.0709913527869,0.0716390841079,0.0716390841079,0.0720277229005,0.0707322602584,0.0708618065227,0.0716390841079,0.0716390841079,0.0718981766363,0.0724163616932,0.0720277229005,0.07293454675,0.0734527318068,0.0744891019205,0.0756550182984,0.0765618421479,0.0757845645626,0.0764322958837,0.0773391197331,0.0759141108268,0.0757845645626,0.0765618421479,0.0764322958837,0.0759141108268,0.0750072869774,0.0747481944489,0.0748777407132,0.0748777407132,0.0752663795058,0.0748777407132,0.0748777407132,0.0742300093921,0.0720277229005,0.072286815429,0.0725459079574,0.0734527318068,0.0735822780711,0.0721572691648,0.0715095378437,0.0711208990511,0.0715095378437,0.0707322602584,0.07047316773,0.069825436409,0.0695663438806,0.0686595200311,0.0684004275027,0.0678822424458,0.0672345111248,0.0663276872753,0.0652913171616,0.0632185769343,0.0623117530848,0.0614049292354,0.0610162904427,0.061793568028,0.061793568028,0.0620526605564,0.0611458367069,0.0619231142922,0.0620526605564,0.0615344754996,0.061793568028,0.0629594844059,0.0614049292354,0.061793568028,0.0629594844059,0.0636072157269,0.0637367619911,0.0634776694627,0.0627003918774,0.0621822068206,0.0614049292354,0.0627003918774,0.0636072157269,0.0643844933122,0.0641254007838,0.0651617708974,0.0654208634259,0.0659390484827,0.0660685947469,0.067364057389,0.0676231499174,0.0676231499174,0.0681413349743,0.0684004275027,0.0694367976163,0.0711208990511,0.0708618065227,0.0716390841079,0.0715095378437,0.0712504453153,0.0706027139942,0.0690481588237,0.069825436409,0.0696958901448,0.069825436409,0.0694367976163,0.0690481588237,0.0674936036532,0.06801178871,0.0676231499174,0.0665867798037,0.0647731321048,0.0654208634259,0.0651617708974,0.0646435858406,0.0651617708974,0.0664572335395,0.0654208634259,0.0645140395764,0.0639958545195,0.0650322246332,0.0650322246332,0.0665867798037,0.0674936036532,0.0677526961816,0.0690481588237,0.0696958901448,0.07047316773,0.0708618065227,0.0711208990511,0.0703436214658,0.0699549826732,0.0707322602584,0.0715095378437,0.0724163616932,0.0724163616932,0.0726754542216,0.0744891019205,0.0737118243353,0.0728050004858,0.0726754542216,0.0737118243353,0.0733231855426,0.0733231855426,0.0737118243353,0.0738413705995,0.0752663795058,0.0768209346763,0.076043657091,0.0765618421479,0.0773391197331,0.0770800272047,0.0770800272047,0.078505036111,0.0791527674321,0.0791527674321,0.0794118599605,0.0798004987531,0.0786345823752,0.0773391197331,0.0769504809405,0.07539592577,0.0764322958837,0.0770800272047,0.0766913884121,0.0764322958837,0.0766913884121,0.0772095734689,0.0791527674321,0.0788936749036,0.0794118599605,0.0805777763384,0.0820027852447,0.0816141464521,0.0823914240373,0.0836868866794,0.0853709881141,0.0857596269068,0.0864073582278,0.0875732746057,0.0882210059267,0.0884800984552,0.0873141820773,0.0873141820773,0.0886096447194,0.0882210059267,0.0884800984552,0.0891278297762,0.0884800984552,0.0879619133983,0.0886096447194,0.0878323671341,0.0878323671341,0.0867959970204,0.0862778119636,0.0866664507562,0.0871846358131,0.0873141820773,0.0852414418499,0.0838164329436,0.0831687016226,0.0823914240373,0.0814846001878,0.08031868381,0.0791527674321,0.0773391197331,0.0755254720342,0.0733231855426,0.0728050004858,0.0726754542216,0.0716390841079,0.0716390841079,0.0690481588237,0.0691777050879,0.0684004275027,0.0674936036532,0.0656799559543,0.0660685947469,0.0650322246332,0.0639958545195,0.0625708456132,0.0623117530848,0.0603685591217,0.0592026427438,0.0580367263659,0.0580367263659,0.0559639861385,0.0554458010817,0.0546685234965,0.0542798847038,0.054409430968,0.0535026071186,0.0532435145901,0.0518185056838,0.0525957832691,0.0522071444765,0.051300320627,0.0505230430417,0.0507821355702,0.050652589306,0.0497457654565,0.0498753117207,0.0505230430417,0.0524662370049,0.0516889594196,0.051300320627,0.0523366907407,0.0509116818344,0.051300320627,0.0505230430417,0.0503934967775,0.051300320627,0.0520775982123,0.051300320627,0.0510412280986,0.0511707743628,0.0538912459112,0.0550571622891,0.0558344398743,0.0567412637238,0.0581662726301,0.0585549114227,0.0598503740648,0.059979920329,0.0598503740648,0.0603685591217,0.0598503740648,0.0610162904427,0.0602390128575,0.0608867441785,0.0603685591217,0.0610162904427,0.0621822068206,0.0629594844059,0.0627003918774,0.0628299381417,0.062441299349,0.0628299381417,0.0621822068206,0.0610162904427,0.0608867441785,0.0621822068206,0.061793568028,0.0629594844059,0.0633481231985,0.0628299381417,0.0633481231985,0.0629594844059,0.0629594844059,0.0629594844059,0.0630890306701,0.0627003918774,0.0603685591217,0.0589435502154,0.0597208278006,0.0594617352722,0.0589435502154,0.0582958188943,0.0573889950449,0.0576480875733,0.0572594487806,0.0572594487806,0.0589435502154,0.0590730964796,0.0601094665933,0.0604981053859,0.0615344754996,0.0615344754996,0.061793568028,0.061793568028,0.0619231142922,0.0619231142922,0.0625708456132,0.0630890306701,0.0637367619911,0.062441299349,0.0621822068206,0.0612753829711,0.0614049292354,0.0607571979143,0.0614049292354,0.0623117530848,0.0627003918774,0.0629594844059,0.0637367619911,0.0641254007838,0.0651617708974,0.0659390484827,0.0659390484827,0.0669754185964,0.0651617708974,0.0646435858406,0.0633481231985,0.0636072157269,0.0647731321048,0.0647731321048,0.0647731321048,0.0646435858406,0.0633481231985,0.0623117530848,0.0623117530848,0.0614049292354,0.0594617352722,0.0589435502154,0.0576480875733,0.0575185413091,0.0575185413091,0.0575185413091,0.0572594487806,0.0564821711954,0.0559639861385,0.056870809988,0.0571299025164,0.056223078667,0.0553162548175,0.0550571622891,0.0541503384396,0.0533730608544,0.0516889594196,0.0509116818344,0.050652589306,0.0510412280986,0.0503934967775,0.0494866729281,0.0489684878712,0.048191210286,0.0493571266639,0.0496162191923,0.0514298668912,0.0509116818344,0.0497457654565,0.0500048579849,0.0494866729281,0.0498753117207,0.0498753117207,0.0500048579849,0.0490980341354,0.0501344042491,0.0515594131554,0.0529844220617,0.0533730608544,0.0547980697607,0.0555753473459,0.0560935324028,0.0572594487806,0.0576480875733,0.0581662726301,0.0573889950449,0.0573889950449,0.0580367263659,0.0580367263659,0.059332189008,0.059332189008,0.0595912815364,0.0604981053859,0.0611458367069,0.0607571979143,0.0606276516501,0.0606276516501,0.0610162904427,0.0608867441785,0.0607571979143,0.0607571979143,0.0601094665933,0.058684457687,0.0594617352722,0.059979920329,0.0601094665933,0.0614049292354,0.0608867441785,0.0610162904427,0.0602390128575,0.0594617352722,0.0581662726301,0.0580367263659,0.056223078667,0.0558344398743,0.0546685234965,0.0541503384396,0.0533730608544,0.0528548757975,0.0529844220617,0.0528548757975,0.0545389772322,0.0541503384396,0.0546685234965,0.0555753473459,0.0554458010817,0.0567412637238,0.0566117174596,0.056223078667,0.0563526249312,0.0566117174596,0.0555753473459,0.0553162548175,0.0558344398743,0.056870809988,0.0571299025164,0.056870809988,0.0579071801017,0.0589435502154,0.0594617352722,0.0603685591217,0.0608867441785,0.0595912815364,0.0595912815364,0.0603685591217,0.0608867441785,0.0616640217638,0.0621822068206,0.061793568028,0.0620526605564,0.0625708456132,0.0646435858406,0.0646435858406,0.0646435858406,0.0650322246332,0.0651617708974,0.0654208634259,0.0663276872753,0.0678822424458,0.0676231499174,0.067364057389,0.0664572335395,0.0658095022185,0.0665867798037,0.0686595200311,0.0690481588237,0.0696958901448,0.0712504453153,0.0712504453153,0.0706027139942,0.0700845289374,0.0699549826732,0.0700845289374,0.0702140752016,0.0699549826732,0.0691777050879,0.0686595200311,0.0682708812385,0.0686595200311,0.0689186125595,0.0681413349743,0.0684004275027,0.0686595200311,0.0689186125595,0.0691777050879,0.0702140752016,0.0715095378437,0.0695663438806,0.0693072513521,0.0691777050879,0.0684004275027,0.0684004275027,0.0678822424458,0.0667163260679,0.0656799559543,0.0659390484827,0.0668458723322,0.0669754185964,0.0663276872753,0.0655504096901,0.0638663082553,0.0637367619911,0.062441299349,0.0615344754996,0.0614049292354,0.0620526605564,0.0619231142922,0.0620526605564,0.0623117530848,0.0616640217638,0.062441299349,0.0611458367069,0.0604981053859,0.0601094665933,0.0603685591217,0.0602390128575,0.0598503740648,0.0607571979143,0.0604981053859,0.0603685591217,0.059979920329,0.058684457687,0.0575185413091,0.0572594487806,0.0576480875733,0.0584253651585,0.0588140039512,0.0581662726301,0.0585549114227,0.0581662726301,0.0581662726301,0.0582958188943,0.0557048936101,0.0542798847038,0.0528548757975,0.0514298668912,0.0500048579849,0.0475434789649,0.0465071088512,0.0448230074165,0.0435275447744,0.0417138970755,0.0402888881692,0.0387343329987,0.0369206852997,0.0353661301292,0.0329047511092,0.0322570197882,0.0307024646177,0.0291479094472)
m <- c(0.0422731309653,0.043436611634,0.0447293679327,0.0467977780105,0.0489954637181,0.0517102519453,0.0539079376529,0.0552006939516,0.0573983796593,0.0592082384773,0.0608888216656,0.0626986804836,0.0641207124121,0.0656720199705,0.0669647762691,0.0683868081976,0.0691624619768,0.0716186989442,0.0713601476845,0.0711015964248,0.0707137695352,0.0700673913858,0.0685160838275,0.0681282569379,0.0681282569379,0.0669647762691,0.0659305712302,0.0646378149316,0.0634743342628,0.061405924185,0.0615351998149,0.0610180972954,0.0611473729253,0.0611473729253,0.0601131678864,0.0590789628475,0.058561860328,0.0583033090683,0.058561860328,0.0575276552891,0.0577862065488,0.0564934502502,0.0563641746203,0.0570105527697,0.0562348989905,0.0575276552891,0.0584325846982,0.0588204115878,0.0594667897371,0.0597253409968,0.0602424435162,0.0608888216656,0.0625694048538,0.0625694048538,0.0646378149316,0.0663183981198,0.0676111544184,0.0683868081976,0.0691624619768,0.0694210132365,0.069938115756,0.0709723207949,0.0718772502039,0.0721358014637,0.0720065258338,0.0723943527234,0.0722650770935,0.0721358014637,0.0729114552428,0.0720065258338,0.0735578333922,0.0739456602817,0.0751091409505,0.0758847947297,0.0758847947297,0.076531172879,0.0751091409505,0.0757555190998,0.07562624347,0.07562624347,0.0754969678401,0.0744627628012,0.0739456602817,0.0738163846519,0.0735578333922,0.0729114552428,0.0725236283532,0.0721358014637,0.0720065258338,0.0711015964248,0.0690331863469,0.0676111544184,0.0665769493795,0.0659305712302,0.0665769493795,0.0664476737497,0.0664476737497,0.0655427443406,0.0654134687108,0.0658012956004,0.0669647762691,0.0669647762691,0.067094051899,0.0669647762691,0.0667062250094,0.0669647762691,0.06618912249,0.0658012956004,0.0650256418212,0.0652841930809,0.0652841930809,0.0654134687108,0.0669647762691,0.067094051899,0.0664476737497,0.0659305712302,0.0660598468601,0.0655427443406,0.0652841930809,0.0647670905615,0.0634743342628,0.0638621611524,0.0634743342628,0.0637328855226,0.0628279561135,0.063345058633,0.064249988042,0.0638621611524,0.0636036098927,0.0636036098927,0.0628279561135,0.0630865073732,0.0630865073732,0.063345058633,0.0630865073732,0.0628279561135,0.0624401292239,0.0624401292239,0.0629572317434,0.0637328855226,0.0630865073732,0.0634743342628,0.0638621611524,0.0638621611524,0.0641207124121,0.0639914367823,0.0634743342628,0.0626986804836,0.0620523023343,0.0616644754447,0.0625694048538,0.0628279561135,0.063345058633,0.0632157830031,0.0625694048538,0.0626986804836,0.0638621611524,0.0637328855226,0.0645085393017,0.0637328855226,0.0636036098927,0.0632157830031,0.0624401292239,0.0646378149316,0.0647670905615,0.0647670905615,0.0643792636719,0.063345058633,0.063345058633,0.0643792636719,0.0638621611524,0.0632157830031,0.0624401292239,0.0634743342628,0.0632157830031,0.0626986804836,0.0626986804836,0.0643792636719,0.0639914367823,0.0655427443406,0.06618912249,0.0668355006393,0.0677404300483,0.0677404300483,0.0677404300483,0.0674818787886,0.0667062250094,0.0668355006393,0.0668355006393,0.0674818787886,0.0682575325678,0.0682575325678,0.0677404300483,0.067998981308,0.0682575325678,0.0692917376067,0.0700673913858,0.069938115756,0.069938115756,0.0687746350872,0.0687746350872,0.0676111544184,0.0678697056782,0.0677404300483,0.0667062250094,0.065154917451,0.0645085393017,0.0645085393017,0.0648963661913,0.0650256418212,0.0643792636719,0.064249988042,0.0647670905615,0.0628279561135,0.0628279561135,0.0612766485552,0.0607595460357,0.0598546166267,0.0594667897371,0.0599838922565,0.0592082384773,0.0588204115878,0.0589496872176,0.0583033090683,0.0579154821787,0.0570105527697,0.0580447578086,0.0594667897371,0.0606302704058,0.0617937510746,0.0608888216656,0.0603717191461,0.060500994776,0.0619230267045,0.0620523023343,0.0608888216656,0.0610180972954,0.0615351998149,0.0617937510746,0.0632157830031,0.0648963661913,0.06618912249,0.0681282569379,0.0691624619768,0.0695502888664,0.0691624619768,0.069938115756,0.0703259426456,0.0689039107171,0.0689039107171,0.067998981308,0.0678697056782,0.0686453594574,0.069938115756,0.0707137695352,0.0703259426456,0.0714894233143,0.0712308720546,0.0712308720546,0.0720065258338,0.0711015964248,0.0713601476845,0.0695502888664,0.0689039107171,0.0678697056782,0.0669647762691,0.0678697056782,0.0685160838275,0.0678697056782,0.0672233275289,0.0667062250094,0.0665769493795,0.0663183981198,0.0674818787886,0.0672233275289,0.0673526031587,0.067094051899,0.0663183981198,0.0648963661913,0.0645085393017,0.0638621611524,0.0639914367823,0.0636036098927,0.0641207124121,0.0652841930809,0.0655427443406,0.0659305712302,0.0652841930809,0.0638621611524,0.0641207124121,0.0629572317434,0.0630865073732,0.0624401292239,0.0630865073732,0.0632157830031,0.0629572317434,0.0636036098927,0.0637328855226,0.0637328855226,0.0632157830031,0.0629572317434,0.0630865073732,0.0634743342628,0.0630865073732,0.0636036098927,0.0634743342628,0.0634743342628,0.0637328855226,0.0634743342628,0.0628279561135,0.0643792636719,0.0636036098927,0.0624401292239,0.0626986804836,0.063345058633,0.0630865073732,0.0632157830031,0.0628279561135,0.0634743342628,0.0638621611524,0.0634743342628,0.0628279561135,0.0639914367823,0.06618912249,0.06618912249,0.0650256418212,0.0665769493795,0.0659305712302,0.0664476737497,0.067998981308,0.0691624619768,0.0690331863469,0.0691624619768,0.0696795644963,0.0707137695352,0.0704552182754,0.0714894233143,0.0716186989442,0.0707137695352,0.0703259426456,0.0707137695352,0.0712308720546,0.0725236283532,0.0735578333922,0.0739456602817,0.073687109022,0.0729114552428,0.0734285577623,0.0740749359116,0.0742042115415,0.0739456602817,0.0744627628012,0.0752384165804,0.0757555190998,0.07562624347,0.0752384165804,0.0758847947297,0.0767897241387,0.0760140703596,0.0748505896908,0.07562624347,0.0757555190998,0.07562624347,0.0778239291776,0.0773068266582,0.0761433459894,0.0745920384311,0.0749798653206,0.0751091409505,0.0752384165804,0.0743334871713,0.0740749359116,0.0749798653206,0.0751091409505,0.0758847947297,0.07562624347,0.07562624347,0.0748505896908,0.0735578333922,0.0732992821324,0.0744627628012,0.0743334871713,0.0744627628012,0.0743334871713,0.0752384165804,0.0752384165804,0.0754969678401,0.0745920384311,0.0751091409505,0.0747213140609,0.0747213140609,0.0744627628012,0.07562624347,0.0762726216193,0.0770482753985,0.0771775510283,0.0776946535478,0.0785995829568,0.0778239291776,0.0761433459894,0.0758847947297,0.0767897241387,0.0771775510283,0.0773068266582,0.0776946535478,0.0779532048075,0.0776946535478,0.0782117560672,0.0762726216193,0.0751091409505,0.0745920384311,0.0752384165804,0.0745920384311,0.0751091409505,0.0749798653206,0.0749798653206,0.0738163846519,0.0742042115415,0.073687109022,0.072782179613,0.0713601476845,0.0704552182754,0.0701966670157,0.0701966670157,0.0689039107171,0.0696795644963,0.067998981308,0.0668355006393,0.0647670905615,0.0636036098927,0.0626986804836,0.0620523023343,0.0615351998149,0.0603717191461,0.0607595460357,0.0606302704058,0.0611473729253,0.061405924185,0.0610180972954,0.0603717191461,0.0598546166267,0.0579154821787,0.0601131678864,0.0599838922565,0.0607595460357,0.0616644754447,0.0626986804836,0.0628279561135,0.0626986804836,0.061405924185,0.0624401292239,0.0620523023343,0.0632157830031,0.0626986804836,0.0619230267045,0.0615351998149,0.0620523023343,0.0619230267045,0.0620523023343,0.0621815779642,0.0625694048538,0.0615351998149,0.0623108535941,0.063345058633,0.0645085393017,0.0645085393017,0.0647670905615,0.0647670905615,0.0637328855226,0.0625694048538,0.0615351998149,0.0625694048538,0.0620523023343,0.0602424435162,0.0599838922565,0.0603717191461,0.0608888216656,0.0617937510746,0.0602424435162,0.0598546166267,0.0586911359579,0.0584325846982,0.0572691040294,0.0577862065488,0.058561860328,0.0594667897371,0.0590789628475,0.0590789628475,0.058561860328,0.0594667897371,0.0619230267045,0.0641207124121,0.0648963661913,0.0654134687108,0.0654134687108,0.0665769493795,0.0668355006393,0.067094051899,0.0682575325678,0.0676111544184,0.0681282569379,0.0686453594574,0.0685160838275,0.0681282569379,0.067998981308,0.0686453594574,0.0691624619768,0.0694210132365,0.0695502888664,0.0695502888664,0.0713601476845,0.0730407308727,0.0726529039831,0.0723943527234,0.0725236283532,0.0721358014637,0.0726529039831,0.0722650770935,0.0723943527234,0.0720065258338,0.0712308720546,0.0713601476845,0.0722650770935,0.0725236283532,0.072782179613,0.0725236283532,0.0703259426456,0.0689039107171,0.0685160838275,0.0695502888664,0.0687746350872,0.0674818787886,0.0672233275289,0.0673526031587,0.0667062250094,0.0665769493795,0.067094051899,0.0668355006393,0.0660598468601,0.0664476737497,0.0668355006393,0.0673526031587,0.0678697056782,0.067998981308,0.0673526031587,0.0676111544184,0.0667062250094,0.0645085393017,0.0647670905615,0.0655427443406,0.0658012956004,0.0664476737497,0.0674818787886,0.067998981308,0.0695502888664,0.0686453594574,0.067998981308,0.0674818787886,0.0665769493795,0.0656720199705,0.065154917451,0.0652841930809,0.0648963661913,0.0639914367823,0.063345058633,0.0632157830031,0.0643792636719,0.065154917451,0.064249988042,0.0641207124121,0.064249988042,0.0647670905615,0.0630865073732,0.0625694048538,0.063345058633,0.0630865073732,0.0643792636719,0.0643792636719,0.063345058633,0.0629572317434,0.0641207124121,0.0652841930809,0.0654134687108,0.0685160838275,0.0707137695352,0.0735578333922,0.0782117560672,0.0835120568916,0.0889416333459,0.095405414839,0.10393760641,0.117640823176,0.135222308837,0.152933070128,0.172065863348,0.193137791016,0.218475814469,0.243167459773,0.27367650842,0.305349037737,0.333401849417,0.363005968656,0.390283126557,0.417560284458,0.44367396169,0.465650818767,0.484395785097,0.504304232096,0.520851512719,0.535718210153,0.549421426919,0.559763477308,0.565451605022,0.573208142813,0.580576853716,0.586523532689,0.590918904105,0.593375141072,0.594021519221,0.592470211663,0.591306730994,0.588204115878,0.583679468832,0.578766994897,0.572949591554,0.567520015099,0.558082894119,0.544638228614,0.52925442866,0.511802218628,0.492798701038,0.473795183449,0.447810781846,0.423894790321,0.394678497972,0.363781622435,0.336375188904,0.306512518406,0.279235360504,0.251311824454,0.22687873041,0.205160424593,0.186415458263,0.166248460004,0.149701179382,0.134446655058,0.120872713922,0.111047766052,0.10406688204,0.0966981711377,0.0897172871251,0.0829949543722,0.0778239291776,0.0747213140609,0.0748505896908,0.0732992821324,0.0739456602817,0.0748505896908,0.0753676922102,0.0760140703596,0.0764018972491,0.0754969678401,0.0740749359116,0.0745920384311,0.0729114552428,0.0730407308727,0.0731700065026,0.0722650770935,0.0726529039831,0.072782179613,0.0732992821324,0.0734285577623,0.0732992821324,0.0740749359116,0.0731700065026,0.0739456602817,0.0732992821324,0.072782179613,0.0726529039831,0.0742042115415,0.0749798653206,0.0769189997686,0.0766604485089,0.0778239291776,0.0788581342165,0.0785995829568,0.078470307327,0.0787288585867,0.0804094417749,0.0817021980735,0.0809265442944,0.082219300593,0.0798923392554,0.0782117560672,0.0779532048075,0.0776946535478,0.0791166854763,0.079375236736,0.0805387174048,0.0811850955541,0.0817021980735,0.0820900249631,0.0828656787423,0.083124230002,0.0845462619305,0.0845462619305,0.0851926400798,0.0858390182292,0.0866146720083,0.08506336445,0.0851926400798,0.0863561207486,0.0873903257875,0.0871317745278,0.0873903257875,0.0870024988979,0.0862268451187,0.0848048131903,0.0870024988979,0.0871317745278,0.0867439476382,0.0880367039368,0.0892001846056,0.0901051140146,0.0913978703133,0.0904929409042,0.0906222165341,0.0899758383848,0.0901051140146,0.0906222165341,0.0898465627549,0.0897172871251,0.0871317745278,0.0863561207486,0.0855804669694,0.08506336445,0.0841584350409,0.0835120568916,0.0826071274826,0.083124230002,0.0814436468138,0.080280166145,0.0785995829568,0.0779532048075,0.0769189997686,0.0770482753985,0.0771775510283,0.0764018972491,0.0749798653206,0.0749798653206,0.0738163846519,0.0738163846519,0.0745920384311,0.07562624347,0.0734285577623,0.0726529039831,0.0729114552428,0.0721358014637,0.0725236283532,0.0722650770935,0.0698088401261,0.0690331863469,0.0687746350872,0.0690331863469,0.0701966670157,0.070843045165,0.0705844939053,0.0711015964248,0.0722650770935,0.072782179613,0.0744627628012,0.0748505896908,0.0760140703596,0.0757555190998,0.0761433459894,0.0747213140609,0.0758847947297,0.0778239291776,0.0797630636256,0.0807972686645,0.0811850955541,0.0817021980735,0.0823485762229,0.0811850955541,0.0806679930346,0.0805387174048,0.0814436468138,0.0809265442944,0.0814436468138,0.0820900249631,0.0818314737034,0.0815729224437,0.0809265442944,0.0801508905152,0.078470307327,0.0779532048075,0.0792459611061,0.0805387174048,0.0805387174048,0.0811850955541,0.0809265442944,0.0819607493333,0.0841584350409,0.0838998837812,0.0837706081513,0.0849340888201,0.0838998837812,0.0840291594111,0.0846755375604,0.0855804669694,0.0866146720083,0.0876488770472,0.0872610501577,0.0854511913396,0.0835120568916,0.0826071274826,0.0824778518527,0.0829949543722,0.0828656787423,0.0846755375604,0.0845462619305,0.0846755375604,0.0844169863007,0.0842877106708,0.0828656787423,0.0811850955541,0.0813143711839,0.0806679930346,0.0824778518527,0.0824778518527,0.0829949543722,0.0840291594111,0.0835120568916,0.0845462619305,0.0849340888201,0.0844169863007,0.0829949543722,0.0826071274826,0.0813143711839,0.082219300593,0.0826071274826,0.0814436468138,0.0811850955541,0.0810558199242,0.0797630636256,0.0798923392554,0.0787288585867,0.0789874098464,0.0796337879957,0.0797630636256,0.080280166145,0.0807972686645,0.0814436468138,0.0807972686645,0.0806679930346,0.079375236736,0.0806679930346,0.0823485762229,0.0835120568916,0.0841584350409,0.0844169863007,0.0863561207486,0.0871317745278,0.0871317745278,0.0863561207486,0.0867439476382,0.0866146720083,0.0866146720083,0.0866146720083,0.0844169863007,0.0844169863007,0.0844169863007,0.0858390182292,0.0854511913396,0.0848048131903,0.083124230002,0.0828656787423,0.0833827812618,0.0835120568916,0.0824778518527,0.0828656787423,0.0829949543722,0.0836413325215,0.0833827812618,0.0815729224437,0.0807972686645,0.0798923392554,0.0796337879957,0.0787288585867,0.0785995829568,0.0780824804374,0.0779532048075,0.0767897241387,0.0762726216193,0.0747213140609,0.0735578333922,0.0732992821324,0.0713601476845,0.0704552182754,0.0703259426456,0.0689039107171,0.0685160838275,0.067094051899,0.0656720199705,0.0634743342628,0.0632157830031,0.0615351998149,0.0595960653669,0.0594667897371,0.0586911359579,0.057656930919,0.0568812771398,0.0559763477308,0.0542957645425,0.0541664889127,0.0536493863932,0.0530030082439,0.0527444569842,0.0520980788349,0.0520980788349,0.051968803205,0.0520980788349,0.051968803205,0.0506760469064,0.0497711174973,0.0489954637181,0.0492540149779,0.0499003931272,0.0500296687571,0.0484783611987,0.0484783611987,0.048219809939,0.0480905343091,0.0479612586792,0.0475734317897,0.0479612586792,0.0484783611987,0.0486076368286,0.0501589443869,0.0504174956466,0.0527444569842,0.0533908351335,0.0554592452113,0.0573983796593,0.0561056233606,0.0567520015099,0.0581740334384,0.0584325846982,0.0589496872176,0.0598546166267,0.0595960653669,0.0601131678864,0.0606302704058,0.0594667897371,0.0592082384773,0.0588204115878,0.0593375141072,0.0601131678864,0.0595960653669,0.0599838922565,0.0599838922565,0.0598546166267,0.0597253409968,0.0590789628475,0.0588204115878,0.0595960653669,0.0590789628475,0.0592082384773,0.0595960653669,0.0593375141072,0.0606302704058,0.0612766485552,0.060500994776,0.0606302704058,0.0599838922565,0.0599838922565,0.0589496872176,0.0580447578086,0.0562348989905,0.0558470721009,0.0580447578086,0.0571398283995,0.0559763477308,0.0567520015099,0.0564934502502,0.0559763477308,0.0563641746203,0.0566227258801,0.0571398283995,0.0579154821787,0.0577862065488,0.0570105527697,0.0570105527697,0.0570105527697,0.0586911359579,0.0586911359579,0.0592082384773,0.0601131678864,0.061405924185,0.0611473729253,0.0608888216656,0.0607595460357,0.0610180972954,0.0621815779642,0.0615351998149,0.0626986804836,0.0632157830031,0.0626986804836,0.0630865073732,0.0634743342628,0.0641207124121,0.0647670905615,0.0648963661913,0.0655427443406,0.06618912249,0.0655427443406,0.063345058633,0.0641207124121,0.065154917451,0.0638621611524,0.0645085393017,0.0643792636719,0.064249988042,0.0638621611524,0.0625694048538,0.0620523023343,0.0619230267045,0.0617937510746,0.0608888216656,0.0599838922565,0.0592082384773,0.0602424435162,0.0606302704058,0.0602424435162,0.0581740334384,0.0588204115878,0.0599838922565,0.0590789628475,0.0599838922565,0.0588204115878,0.0589496872176,0.0580447578086,0.0562348989905,0.0559763477308,0.0555885208412,0.0549421426919,0.0541664889127,0.0537786620231,0.0527444569842,0.0515809763154,0.0526151813543,0.0526151813543,0.0540372132828,0.0539079376529,0.0535201107634,0.0540372132828,0.0532615595036,0.0537786620231,0.0536493863932,0.0542957645425,0.0552006939516,0.055717796471,0.0561056233606,0.0563641746203,0.0581740334384,0.0589496872176,0.0599838922565,0.0594667897371,0.0589496872176,0.0599838922565,0.0598546166267,0.0594667897371,0.0581740334384,0.0588204115878,0.0583033090683,0.0573983796593,0.0575276552891,0.0570105527697,0.0572691040294,0.0571398283995,0.0570105527697,0.057656930919,0.0580447578086,0.0568812771398,0.0567520015099,0.0575276552891,0.0570105527697,0.0570105527697,0.0562348989905,0.0553299695814,0.0552006939516,0.0558470721009,0.0554592452113,0.0561056233606,0.0553299695814,0.0549421426919,0.0533908351335,0.0522273544647,0.0524859057245,0.0522273544647,0.0508053225362,0.0501589443869,0.0489954637181,0.0488661880883,0.0493832906077,0.0484783611987,0.0487369124584,0.0493832906077,0.0502882200168,0.0502882200168,0.0504174956466,0.0520980788349,0.0524859057245,0.0536493863932,0.0536493863932,0.0544250401724,0.0549421426919,0.054812867062,0.0553299695814,0.0563641746203,0.057656930919,0.0577862065488,0.0570105527697,0.0572691040294,0.0572691040294,0.0583033090683,0.0580447578086,0.0572691040294,0.0581740334384,0.0570105527697,0.0583033090683,0.0593375141072,0.0599838922565,0.0611473729253,0.060500994776,0.0612766485552,0.0620523023343,0.0629572317434,0.0641207124121,0.0646378149316,0.0648963661913,0.065154917451,0.0654134687108,0.0648963661913,0.065154917451,0.0663183981198,0.0668355006393,0.0659305712302,0.0654134687108,0.065154917451,0.06618912249,0.0669647762691,0.0668355006393,0.0668355006393,0.0674818787886,0.0689039107171,0.0691624619768,0.0685160838275,0.0689039107171,0.0681282569379,0.0674818787886,0.0673526031587,0.0676111544184,0.0674818787886,0.0669647762691,0.0677404300483,0.0678697056782,0.0669647762691,0.0681282569379,0.067998981308,0.0683868081976,0.0696795644963,0.0691624619768,0.0691624619768,0.0690331863469,0.0681282569379,0.0668355006393,0.0660598468601,0.0663183981198,0.0658012956004,0.0656720199705,0.0641207124121,0.0652841930809,0.0639914367823,0.0625694048538,0.0608888216656,0.0583033090683,0.0553299695814,0.0539079376529,0.0517102519453,0.049124739348,0.0460221242313,0.0438244385236,0.0427902334847,0.0411096502965,0.0403339965173,0.0395583427381,0.0376192082902,0.0361971763617,0.0351629713228,0.0337409393943)
s <- c(0.0359343485985,0.0357383430607,0.0354116671643,0.0346276450131,0.0344316394753,0.0344316394753,0.0338436228618,0.0333209414277,0.032667589635,0.0320795730215,0.0310342101532,0.0310995453325,0.0308382046154,0.0309035397947,0.0309035397947,0.0303808583605,0.0298581769264,0.0295968362093,0.0294661658507,0.0451466088755,0.0450812736963,0.0457999606682,0.0458652958475,0.04743334015,0.0487400437354,0.0493933955281,0.0507654342927,0.0521374730574,0.0536401821806,0.0552082264831,0.0563189245307,0.0572989522197,0.0585403206259,0.060500376004,0.0622644258442,0.064616492298,0.0664458773175,0.0679485864407,0.0686019382334,0.0698433066396,0.071150010225,0.0719993675555,0.0734367414994,0.0739594229336,0.074547439547,0.0746127747263,0.0753314616982,0.0755928024153,0.0757888079531,0.0758541431324,0.0758541431324,0.0765728301044,0.0768995060007,0.0770955115385,0.0777488633312,0.0787288910203,0.0793169076337,0.0787942261995,0.0794475779922,0.0781408744068,0.0780755392276,0.0780102040483,0.0775528577934,0.0777488633312,0.0776835281519,0.0775528577934,0.0772915170763,0.0771608467178,0.0768341708214,0.0760501486702,0.0746781099055,0.0729793952445,0.072130037914,0.0707579991493,0.0705619936115,0.0703659880737,0.0696473011017,0.0691246196676,0.0676219105444,0.0676219105444,0.0678832512615,0.0684059326956,0.0682099271578,0.0686672734127,0.0683405975163,0.0685366030542,0.068732608592,0.0683405975163,0.0675565753651,0.0670338939309,0.0669032235724,0.0659231958834,0.0663805421383,0.0675565753651,0.0674259050066,0.0674912401858,0.0669032235724,0.0665765476761,0.0656618551663,0.0646818274772,0.0638324701467,0.0627871072784,0.0625911017406,0.0620684203064,0.062199090665,0.0619377499479,0.0616110740515,0.0618070795894,0.0616764092308,0.0618070795894,0.0618070795894,0.0617417444101,0.0616110740515,0.0612843981552,0.0612843981552,0.0610883926174,0.0601737001076,0.0592590075978,0.0589976668807,0.0584096502673,0.0587363261637,0.0581483095502,0.0582136447295,0.0584749854466,0.0588016613429,0.0593243427771,0.0589323317015,0.0584749854466,0.0584096502673,0.0572989522197,0.0569722763234,0.0574949577575,0.0576909632953,0.0584749854466,0.0588016613429,0.0585403206259,0.0585403206259,0.0595856834942,0.0597163538527,0.0604350408247,0.0600430297491,0.0602390352869,0.060500376004,0.0609577222588,0.0618070795894,0.0619377499479,0.0627217720991,0.0616110740515,0.0618070795894,0.0625257665613,0.0630484479955,0.0629831128162,0.0627217720991,0.0628524424577,0.0629177776369,0.0635057942504,0.0635057942504,0.0635711294296,0.0640938108638,0.0643551515809,0.0654005144492,0.065596519987,0.0664458773175,0.0676872457236,0.067295234648,0.0682752623371,0.0685366030542,0.06801392162,0.0684059326956,0.0685366030542,0.069712636281,0.0706926639701,0.0708233343286,0.070431323253,0.0705619936115,0.0708233343286,0.0719993675555,0.0725873841689,0.0729793952445,0.0723260434518,0.0724567138104,0.0716073564798,0.0699086418188,0.0707579991493,0.0701699825359,0.0691899548469,0.0682099271578,0.0672298994688,0.0669685587517,0.0667725532139,0.0664458773175,0.0659231958834,0.0659231958834,0.0665112124968,0.0654658496285,0.0655311848077,0.0643551515809,0.0640284756845,0.0636364646089,0.0627217720991,0.0627871072784,0.0619377499479,0.0612190629759,0.0610883926174,0.0602390352869,0.0592590075978,0.058082974371,0.0582789799088,0.0593243427771,0.0594550131356,0.0603697056454,0.0597163538527,0.0589976668807,0.0587363261637,0.0597163538527,0.0601737001076,0.0594550131356,0.0603697056454,0.060761716721,0.0606963815418,0.0611537277967,0.0620030851272,0.0634404590711,0.0647471626565,0.0657271903456,0.0669685587517,0.0677525809029,0.0678832512615,0.0683405975163,0.0674912401858,0.0679485864407,0.0670992291102,0.0678832512615,0.0682752623371,0.0686672734127,0.069712636281,0.0704966584323,0.0710193398664,0.0710193398664,0.0712806805835,0.072130037914,0.0723913786311,0.0722607082725,0.071411350942,0.0707579991493,0.0700393121774,0.0692552900261,0.0701046473566,0.0700393121774,0.0698433066396,0.0686672734127,0.0689286141298,0.0684059326956,0.0677525809029,0.0684712678749,0.0682752623371,0.0687979437712,0.0685366030542,0.0678832512615,0.0671645642895,0.0666418828553,0.0657925255248,0.0648124978358,0.0644204867602,0.0642898164016,0.0651391737321,0.0652045089114,0.0652698440907,0.0641591460431,0.0631137831748,0.063179118354,0.0618070795894,0.0605657111832,0.0602390352869,0.0603043704661,0.0601737001076,0.0604350408247,0.0604350408247,0.0610883926174,0.0608923870796,0.0602390352869,0.0599123593905,0.0599123593905,0.0598470242113,0.0603697056454,0.0608923870796,0.0608270519003,0.0604350408247,0.0608923870796,0.0609577222588,0.0604350408247,0.0611537277967,0.0604350408247,0.0606310463625,0.0606310463625,0.0610883926174,0.0617417444101,0.0620030851272,0.0622644258442,0.0633751238918,0.0635057942504,0.0631137831748,0.063179118354,0.0635057942504,0.064877833015,0.0650085033736,0.0649431681943,0.0661192014212,0.0665112124968,0.0672298994688,0.0685366030542,0.0698433066396,0.0701046473566,0.0708886695079,0.0718686971969,0.072848724886,0.0732407359616,0.0752007913397,0.0757888079531,0.076246154208,0.0753314616982,0.0753314616982,0.0761808190287,0.0767688356422,0.0774875226141,0.0780755392276,0.0788595613788,0.0797089187093,0.0802316001435,0.080362270502,0.0808849519362,0.0814076333703,0.0812769630118,0.0814729685496,0.0823876610594,0.0821916555216,0.0821263203423,0.0831716832106,0.0835636942862,0.0841517108997,0.0834330239277,0.0839557053619,0.0838903701826,0.0836943646448,0.0847397275131,0.0851317385887,0.0845437219753,0.0834330239277,0.0831716832106,0.0825183314179,0.0821263203423,0.0814729685496,0.0815383037289,0.0814729685496,0.0814076333703,0.0811462926533,0.0816689740874,0.082060985163,0.0815383037289,0.0811462926533,0.0807542815776,0.0815383037289,0.0804929408606,0.0795782483508,0.0797089187093,0.0801009297849,0.0805582760398,0.0806889463984,0.0799702594264,0.0804276056813,0.0799049242471,0.0797742538886,0.0802316001435,0.0805582760398,0.0807542815776,0.0814076333703,0.0816036389081,0.0819956499838,0.0821263203423,0.0819303148045,0.0808849519362,0.0797089187093,0.0804929408606,0.0806889463984,0.0811462926533,0.0813422981911,0.0816689740874,0.0819303148045,0.0821263203423,0.0810156222947,0.0797089187093,0.0795129131715,0.0795129131715,0.0785982206617,0.0784022151239,0.0781408744068,0.0785982206617,0.0772261818971,0.0774221874349,0.0772915170763,0.0767688356422,0.0757888079531,0.0749394506226,0.0740247581128,0.0739594229336,0.0729793952445,0.0733714063201,0.0727180545274,0.071411350942,0.0703659880737,0.0693206252054,0.0678832512615,0.0671645642895,0.0666418828553,0.066315206959,0.0663805421383,0.0658578607041,0.0661192014212,0.0660538662419,0.0660538662419,0.0653351792699,0.0650085033736,0.0636364646089,0.0642244812223,0.0636364646089,0.0640284756845,0.0647471626565,0.0652698440907,0.0652698440907,0.0652698440907,0.0650738385529,0.0654658496285,0.0647471626565,0.0656618551663,0.0660538662419,0.0649431681943,0.0643551515809,0.0647471626565,0.0649431681943,0.0652045089114,0.0657271903456,0.0659885310626,0.0654658496285,0.0660538662419,0.067295234648,0.0674259050066,0.0678179160822,0.0681445919785,0.0682099271578,0.06801392162,0.0669032235724,0.0668378883931,0.0679485864407,0.0678832512615,0.0670992291102,0.0670338939309,0.0669032235724,0.0673605698273,0.0684059326956,0.0676219105444,0.0678832512615,0.0675565753651,0.0677525809029,0.0667725532139,0.0671645642895,0.0676219105444,0.0685366030542,0.068732608592,0.0692552900261,0.0691899548469,0.0691899548469,0.0707579991493,0.0727180545274,0.0734367414994,0.0731100656031,0.0731100656031,0.0737634173958,0.0739594229336,0.0742207636506,0.0742207636506,0.0741554284714,0.0748741154433,0.075266126519,0.0753967968775,0.0758541431324,0.0760501486702,0.0771608467178,0.0767688356422,0.07696484118,0.07696484118,0.0768995060007,0.0776835281519,0.0785328854825,0.0784022151239,0.0776181929727,0.0778795336898,0.0777488633312,0.077944868869,0.0778795336898,0.0782715447654,0.0784675503032,0.0782062095861,0.0778141985105,0.0780755392276,0.0777488633312,0.0778795336898,0.0778795336898,0.0771608467178,0.0759194783117,0.075527467236,0.0756581375946,0.0747434450848,0.0740247581128,0.073828752575,0.0736980822165,0.0732407359616,0.0729793952445,0.0730447304238,0.072848724886,0.0726527193482,0.0727833897067,0.0732407359616,0.0729140600652,0.0733060711409,0.0732407359616,0.0730447304238,0.0735674118579,0.0733060711409,0.072130037914,0.0720647027347,0.0727833897067,0.0733060711409,0.0733060711409,0.0730447304238,0.0729140600652,0.0737634173958,0.0733060711409,0.0736327470372,0.0736327470372,0.072848724886,0.0730447304238,0.0725220489896,0.0727180545274,0.0724567138104,0.0716073564798,0.0713460157628,0.072130037914,0.0731100656031,0.0734367414994,0.0733060711409,0.0731754007823,0.0734367414994,0.0736980822165,0.0730447304238,0.0723260434518,0.0719993675555,0.0712806805835,0.0716073564798,0.0716073564798,0.0713460157628,0.0708886695079,0.0715420213006,0.0718033620177,0.071411350942,0.0740900932921,0.0756581375946,0.077944868869,0.0805582760398,0.0850664034095,0.0906198936474,0.0963693894231,0.104209610936,0.113813882288,0.12622756635,0.142104014912,0.158241804192,0.17627431367,0.200252324462,0.223576983462,0.252781808595,0.281594622653,0.310864782966,0.340004272921,0.367641053752,0.396715208527,0.425266681868,0.449767374094,0.471719994329,0.493411273847,0.511574453684,0.528365594756,0.543000674912,0.554368996105,0.563319915665,0.570702790923,0.578543012435,0.585403206259,0.590891361317,0.594811472073,0.597555549603,0.597947560678,0.597032868169,0.594092785101,0.591414042751,0.587885943071,0.582463123191,0.577301644029,0.568938741083,0.559007793834,0.546724780131,0.530129644596,0.513991855317,0.495894010659,0.47165465915,0.448722011226,0.420235873064,0.391815070082,0.362610244948,0.332621397663,0.304919281653,0.275779791698,0.247750999792,0.222988966848,0.201101681793,0.178561044945,0.160071189211,0.143476053677,0.1289063087,0.117341981969,0.10741103472,0.100093494642,0.0925799490255,0.0853930793058,0.0794475779922,0.0749394506226,0.0725220489896,0.0692552900261,0.069712636281,0.0703006528944,0.0703006528944,0.0701699825359,0.0703006528944,0.0701699825359,0.0693859603847,0.0699739769981,0.0693859603847,0.0693206252054,0.069712636281,0.0696473011017,0.069712636281,0.069712636281,0.0695819659225,0.0699739769981,0.0699739769981,0.0703659880737,0.0701699825359,0.0705619936115,0.0700393121774,0.0697779714603,0.0699086418188,0.0709540046871,0.0710193398664,0.072130037914,0.0721953730933,0.0737634173958,0.0743514340092,0.0744821043677,0.0740247581128,0.0742860988299,0.0748741154433,0.0755928024153,0.0757234727739,0.0776181929727,0.0761808190287,0.0757888079531,0.0752007913397,0.0750701209812,0.0761154838495,0.076246154208,0.0770301763592,0.0767035004629,0.0770301763592,0.0776181929727,0.0780102040483,0.0782715447654,0.0792515724544,0.0790555669166,0.0798395890679,0.0804276056813,0.0813422981911,0.0811462926533,0.0816689740874,0.0818649796252,0.0827143369557,0.0830410128521,0.0824529962387,0.0821916555216,0.0821916555216,0.0814076333703,0.0822569907008,0.0818649796252,0.0815383037289,0.0822569907008,0.0828450073143,0.083498359107,0.0839557053619,0.083498359107,0.0832370183899,0.081799644446,0.0819956499838,0.0823876610594,0.0824529962387,0.0824529962387,0.0804276056813,0.0797089187093,0.0791209020959,0.0790555669166,0.0782062095861,0.0777488633312,0.07696484118,0.0770955115385,0.0757888079531,0.0750701209812,0.0739594229336,0.0733060711409,0.0723260434518,0.0718686971969,0.0708886695079,0.0700393121774,0.0688632789505,0.0686672734127,0.0684712678749,0.0684712678749,0.068993949309,0.0690592844883,0.0683405975163,0.06801392162,0.0678832512615,0.0676219105444,0.0684059326956,0.0674912401858,0.0664458773175,0.0666418828553,0.0668378883931,0.0670338939309,0.0674912401858,0.0674259050066,0.0670338939309,0.0669032235724,0.0681445919785,0.0688632789505,0.0701046473566,0.0701699825359,0.0712806805835,0.0712806805835,0.0717380268384,0.0710846750457,0.0723260434518,0.0734367414994,0.0744167691885,0.0752007913397,0.075527467236,0.0763114893873,0.0774875226141,0.0767688356422,0.0768995060007,0.0767688356422,0.0770955115385,0.0765074949251,0.0759848134909,0.0767035004629,0.0765074949251,0.0764421597458,0.0759194783117,0.0753314616982,0.0736980822165,0.0736980822165,0.0741554284714,0.0742860988299,0.0733714063201,0.0740247581128,0.0737634173958,0.0740247581128,0.0753967968775,0.0759194783117,0.0753314616982,0.0754621320568,0.0746781099055,0.075266126519,0.0755928024153,0.0768341708214,0.0778141985105,0.0784675503032,0.0789248965581,0.0783368799446,0.0777488633312,0.0774875226141,0.0775528577934,0.0774221874349,0.0771608467178,0.0784675503032,0.0787942261995,0.0793169076337,0.0791862372752,0.0792515724544,0.0794475779922,0.0782062095861,0.0778141985105,0.0774221874349,0.0788595613788,0.078663555841,0.0789248965581,0.07964358353,0.0794475779922,0.0806889463984,0.0816689740874,0.0810156222947,0.0805582760398,0.0807542815776,0.0799702594264,0.0804276056813,0.0813422981911,0.081080957474,0.0809502871154,0.0810156222947,0.0805582760398,0.0800355946057,0.0787942261995,0.0787288910203,0.0782715447654,0.0788595613788,0.0794475779922,0.0795129131715,0.0797089187093,0.0795129131715,0.0797089187093,0.0800355946057,0.0805582760398,0.0816689740874,0.0828450073143,0.0838903701826,0.0838250350033,0.085197073768,0.0862424366363,0.0870917939668,0.086895788429,0.0874184698632,0.0879411512973,0.0882678271937,0.0883984975522,0.0866997828912,0.0866997828912,0.0873531346839,0.0878758161181,0.0878104809388,0.0878104809388,0.0866344477119,0.0862424366363,0.0868304532497,0.0865037773534,0.0859810959192,0.0856544200229,0.0854584144851,0.0859810959192,0.0861117662778,0.0852624089473,0.0838250350033,0.0826490017765,0.0821916555216,0.0813422981911,0.0808196167569,0.0799702594264,0.0793169076337,0.0778141985105,0.0766381652836,0.0747434450848,0.0738940877543,0.0736980822165,0.0721953730933,0.0717380268384,0.0703659880737,0.069712636281,0.0691246196676,0.0679485864407,0.066315206959,0.0654005144492,0.0647471626565,0.0633751238918,0.0616764092308,0.061480403693,0.0601083649283,0.0589976668807,0.0580176391917,0.0575602929368,0.055665572738,0.0553388968416,0.0546855450489,0.0541628636148,0.0540975284355,0.0533135062843,0.0531828359257,0.0523988137745,0.0528561600294,0.0525948193123,0.0514841212647,0.0506347639342,0.0503734232171,0.0504387583964,0.0503080880378,0.0504387583964,0.0499814121415,0.0509614398305,0.0504387583964,0.0501774176793,0.0506347639342,0.0497200714244,0.0501120825,0.0499814121415,0.0499814121415,0.0512227805476,0.0517454619818,0.052529484133,0.0527254896708,0.0538361877184,0.0561882541721,0.0561229189929,0.0568416059648,0.0580176391917,0.0588669965222,0.0593243427771,0.0604350408247,0.0603697056454,0.0605657111832,0.0610883926174,0.0602390352869,0.0606963815418,0.0601083649283,0.0606963815418,0.0608270519003,0.0608923870796,0.0616764092308,0.0620684203064,0.0618724147686,0.0618724147686,0.0613497333345,0.0614150685137,0.061480403693,0.0606310463625,0.0606310463625,0.061480403693,0.0611537277967,0.0623950962028,0.0629177776369,0.0622644258442,0.0625911017406,0.0620684203064,0.0620684203064,0.0615457388723,0.0611537277967,0.0600430297491,0.0586709909844,0.05906300206,0.0589976668807,0.0582789799088,0.0584096502673,0.0579523040124,0.0572336170405,0.0575602929368,0.0574949577575,0.0577562984746,0.0589976668807,0.0589976668807,0.0591283372393,0.0593243427771,0.0598470242113,0.0606963815418,0.0608270519003,0.0610883926174,0.0616110740515,0.0622644258442,0.0624604313821,0.0625911017406,0.0628524424577,0.0623297610235,0.0627871072784,0.0620030851272,0.0626564369199,0.0625911017406,0.0626564369199,0.0633097887126,0.0637017997882,0.0641591460431,0.064877833015,0.0651391737321,0.0659885310626,0.0667072180346,0.0663805421383,0.0657925255248,0.0652698440907,0.0655311848077,0.0642244812223,0.0646818274772,0.0652045089114,0.0651391737321,0.0649431681943,0.0642244812223,0.0633097887126,0.0627217720991,0.0626564369199,0.0617417444101,0.0603043704661,0.0596510186734,0.0595203483149,0.0596510186734,0.0594550131356,0.0584096502673,0.0586056558051,0.0588016613429,0.058082974371,0.0589976668807,0.0585403206259,0.0581483095502,0.0572336170405,0.0561882541721,0.0556002375587,0.0550122209453,0.0538361877184,0.0530521655672,0.0527254896708,0.0523988137745,0.0514841212647,0.051549456444,0.0512881157269,0.0516147916232,0.0521374730574,0.0520721378781,0.053248171105,0.0525948193123,0.0522681434159,0.0523334785952,0.0523988137745,0.0530521655672,0.0533135062843,0.0535748470013,0.053248171105,0.0546855450489,0.0557962430965,0.0570376115027,0.0569722763234,0.0574296225783,0.058344315088,0.0585403206259,0.0589323317015,0.0584749854466,0.05906300206,0.0584096502673,0.0579523040124,0.058344315088,0.058082974371,0.0588669965222,0.0588016613429,0.0588669965222,0.0596510186734,0.0601737001076,0.0593896779564,0.0592590075978,0.0596510186734,0.0595856834942,0.0595203483149,0.05906300206,0.0586056558051,0.0582136447295,0.0578216336539,0.0580176391917,0.0586056558051,0.0582789799088,0.0587363261637,0.0576909632953,0.0571682818612,0.0569069411441,0.05638425971,0.0550122209453,0.0546202098697,0.0531175007465,0.0528561600294,0.052529484133,0.0518107971611,0.051549456444,0.0516147916232,0.0521374730574,0.0520721378781,0.0529868303879,0.0536401821806,0.0540975284355,0.0551428913038,0.0550775561246,0.0561229189929,0.0563189245307,0.0560575838136,0.05638425971,0.0570376115027,0.0571682818612,0.0571029466819,0.0569722763234,0.0576256281161,0.0577562984746,0.0581483095502,0.0585403206259,0.0586709909844,0.0593896779564,0.0592590075978,0.0601737001076,0.0600430297491,0.0603697056454,0.0613497333345,0.0612843981552,0.0620684203064,0.0627217720991,0.0629831128162,0.0637017997882,0.0642244812223,0.0654005144492,0.0655311848077,0.0656618551663,0.065596519987,0.0657925255248,0.0665112124968,0.0672298994688,0.0675565753651,0.0671645642895,0.0669032235724,0.0669685587517,0.0670338939309,0.0673605698273,0.0684059326956,0.0689286141298,0.0699739769981,0.0708886695079,0.0705619936115,0.070431323253,0.0697779714603,0.0693859603847,0.0693859603847,0.0695819659225,0.0693859603847,0.068732608592,0.0688632789505,0.068732608592,0.0684712678749,0.0691899548469,0.068732608592,0.0690592844883,0.0698433066396,0.069712636281,0.0698433066396,0.0703006528944,0.0704966584323,0.0688632789505,0.0683405975163,0.0684059326956,0.0677525809029,0.0676872457236,0.0666418828553,0.0666418828553,0.0654658496285,0.064877833015,0.0644858219394,0.0632444535333,0.0614150685137,0.0603043704661,0.058344315088,0.0569722763234,0.0547508802282,0.0531828359257,0.0525948193123,0.0520721378781,0.0516147916232,0.0512881157269,0.0504387583964,0.0493933955281,0.0492627251695,0.0478906864049,0.0305115287191,0.0303155231812,0.0304461935398,0.0303808583605,0.0301848528227,0.0306421990776,0.0305115287191,0.0304461935398,0.030250188002,0.0295968362093,0.0290088195958,0.0288781492373,0.0290741547751,0.0294661658507,0.0296621713885,0.0293354954922,0.02953150103,0.0293354954922,0.0293354954922)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("ChIPseq_LANA_LEC_rep1-GSM1359491.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=38"),bty="n")
dev.off()