# R script for Peak Model
#  -- generated by MACS
p <- c(0.0314274978052,0.0329807864577,0.0339170152346,0.0354277480336,0.0365980340047,0.037661930342,0.0390449955806,0.0401088919179,0.0413217337425,0.0424069080066,0.0438750849521,0.044981537143,0.0461305451873,0.0474072207921,0.0485349509097,0.0497903485878,0.0511308579728,0.0524713673579,0.0537480429627,0.0548544951535,0.0567269527073,0.0578334048981,0.0590675246494,0.0604718678147,0.0616847096393,0.0612591511043,0.0614293745183,0.0616847096393,0.0621528240277,0.0622804915882,0.061961322687,0.0616421537858,0.0621953798812,0.0621741019545,0.0622379357347,0.0618974889068,0.0620038785405,0.0620677123207,0.0624932708557,0.0626209384161,0.0629188293906,0.0631954424383,0.0631103307313,0.0631954424383,0.0628975514639,0.0628549956104,0.0624081591487,0.0623017695149,0.0622592136615,0.0623443253684,0.0622379357347,0.0617272654928,0.061961322687,0.0614719303718,0.0614719303718,0.0615995979323,0.0616847096393,0.0620889902475,0.0618549330533,0.061961322687,0.0615783200055,0.0619400447602,0.0620677123207,0.0620038785405,0.0621528240277,0.0620889902475,0.061705987566,0.0615995979323,0.0612804290311,0.0613229848846,0.0605782574484,0.0607484808624,0.0610889276904,0.0607697587892,0.0611527614706,0.0615783200055,0.061961322687,0.06187621098,0.0613017069578,0.0612165952509,0.0613229848846,0.061620875859,0.0614506524451,0.0620251564672,0.0619826006137,0.062131546101,0.0618123771998,0.0617272654928,0.0615144862253,0.0615783200055,0.0614932082986,0.0612591511043,0.0616421537858,0.0618123771998,0.0621528240277,0.0621102681742,0.0621953798812,0.0624507150022,0.0620677123207,0.0626209384161,0.0627273280499,0.0630039410976,0.0630677748778,0.0633231099988,0.0634507775593,0.0635784451198,0.0636210009733,0.0634294996325,0.0634507775593,0.0632167203651,0.063472055486,0.0636210009733,0.0635146113395,0.063386943779,0.063557167193,0.0636210009733,0.063897614021,0.0638550581675,0.0644508401164,0.0644933959699,0.0645997856036,0.0645359518234,0.0643231725559,0.0645572297501,0.0640678374349,0.0637699464605,0.0638763360942,0.0635784451198,0.0638763360942,0.0639614478012,0.0637699464605,0.063897614021,0.0645359518234,0.0641955049954,0.0641742270687,0.0641529491419,0.0647061752373,0.0648763986513,0.0650891779188,0.0651104558455,0.0652168454793,0.0655998481607,0.0653019571863,0.065153011699,0.0649827882851,0.0651104558455,0.0655998481607,0.0653445130398,0.0657487936479,0.0652168454793,0.0651104558455,0.0653445130398,0.0654296247467,0.065493458527,0.0657700715747,0.0657913495014,0.0656424040142,0.0657275157212,0.0660679625491,0.0666211886446,0.0666850224248,0.0663658535236,0.0664084093771,0.0665573548643,0.0663020197434,0.0665786327911,0.0668765237655,0.0669829133993,0.06717441474,0.067344638154,0.0673233602272,0.0673659160807,0.067089303033,0.0668765237655,0.0670254692528,0.0670467471795,0.0669403575458,0.0673659160807,0.0675999732749,0.0678765863226,0.0680042538831,0.0679404201029,0.0672169705935,0.0674723057144,0.0677489187622,0.0677701966889,0.0674510277877,0.0675999732749,0.0678978642494,0.0679616980296,0.0684085344913,0.0683872565646,0.0683021448576,0.0682383110773,0.0683447007111,0.0683872565646,0.0681744772971,0.0685362020518,0.0687064254658,0.0694298749752,0.0698554335101,0.0700682127776,0.070195880338,0.0700043789973,0.0700043789973,0.0702171582648,0.0706639947265,0.0708129402137,0.0708129402137,0.0704937713125,0.0707703843602,0.0712384987486,0.0715576676498,0.0720896158185,0.0721747275255,0.0720257820383,0.0723236730127,0.0728768991082,0.0726641198407,0.0729832887419,0.0732811797163,0.0736003486176,0.0741961305665,0.0747068008084,0.0748131904421,0.0750259697096,0.0752813048306,0.0749621359294,0.0750259697096,0.0748770242224,0.0751749151968,0.075494084098,0.0760685881202,0.0764090349481,0.0765792583621,0.0769197051901,0.0774942092122,0.0772175961645,0.0771537623843,0.0774090975052,0.0768133155563,0.0769622610436,0.0773665416518,0.0776218767727,0.077430375432,0.0775367650657,0.0781325470146,0.0781751028681,0.0777495443332,0.0773027078715,0.077430375432,0.077515487139,0.0775793209192,0.0783878821356,0.0783666042089,0.0787070510368,0.0784304379891,0.0787921627438,0.0793879446927,0.0797922253009,0.0795794460334,0.0794730563997,0.0797283915207,0.0795368901799,0.0802390617626,0.0803880072498,0.0803667293231,0.0802390617626,0.0803667293231,0.0804092851766,0.0804731189568,0.0806858982243,0.0810689009057,0.0814306256604,0.0816008490744,0.0821966310233,0.08221790895,0.0825370778513,0.082898802606,0.0830690260199,0.0836435300421,0.0838563093096,0.0839201430898,0.0837924755293,0.0838988651631,0.0843031457712,0.0845372029655,0.0851755407679,0.0855372655226,0.0860266578377,0.0868777749076,0.0871331100286,0.0876437802705,0.0878778374647,0.0889630117288,0.0893034585568,0.0893460144103,0.0895587936777,0.0906865237953,0.0917716980594,0.0919419214734,0.0921547007409,0.0927079268363,0.0933462646387,0.0937718231736,0.0938569348806,0.0942399375621,0.0950059429249,0.0951336104854,0.0958357820681,0.0964528419437,0.0962826185298,0.0970060680391,0.0978359071823,0.097942296816,0.0982189098637,0.0984316891312,0.0990061931534,0.0992189724208,0.0996019751023,0.100133923271,0.100410536319,0.100240312905,0.100176479124,0.100878650707,0.101027596194,0.101410598876,0.102325549726,0.102474495213,0.102963887528,0.103240500576,0.103453279843,0.103729892891,0.103666059111,0.104070339719,0.104410786547,0.10438950862,0.104793789229,0.105517238738,0.105261903617,0.105687462152,0.106198132394,0.106368355808,0.106304522028,0.106113020687,0.106453467515,0.106708802636,0.107815254827,0.107964200314,0.107772698973,0.108411036775,0.108453592629,0.108304647142,0.108070589948,0.108602538116,0.109283431772,0.110091992988,0.109411099333,0.109645156527,0.109602600673,0.109538766893,0.109943047501,0.10956004482,0.109900491648,0.110219660549,0.110815442498,0.111304834813,0.1114537803,0.112007006396,0.112347453224,0.112496398711,0.113049624806,0.113560295048,0.114177354924,0.114560357605,0.115475308455,0.115922144917,0.115688087723,0.116156202111,0.116283869672,0.116411537232,0.117007319181,0.11753926735,0.118369106493,0.119284057343,0.119816005512,0.120028784779,0.1202841199,0.120454343314,0.121092681117,0.121411850018,0.121539517578,0.122156577454,0.122624691842,0.12290130489,0.123709866107,0.123965201227,0.1236247544,0.123858811594,0.124092868788,0.124007757081,0.124688650737,0.125178043052,0.125837658781,0.125752547074,0.12558232366,0.125731269147,0.12643344073,0.126837721338,0.126965388899,0.127795228042,0.128582511332,0.129454906328,0.12983790901,0.130114522057,0.129667685596,0.130263467545,0.130178355838,0.130859249493,0.131263530102,0.131689088637,0.131774200344,0.131901867904,0.131816756197,0.131944423758,0.131923145831,0.132987042168,0.133901993018,0.134136050213,0.133987104725,0.134540330821,0.134859499722,0.135178668623,0.135412725817,0.13532761411,0.135795728499,0.13624256496,0.136412788374,0.136561733862,0.136668123495,0.136519178008,0.136689401422,0.136774513129,0.13781713154,0.138093744587,0.138178856294,0.138604414829,0.13885974995,0.139157640925,0.139519365679,0.13964703324,0.139157640925,0.139498087753,0.139519365679,0.140604539944,0.141221599819,0.141264155673,0.141668436281,0.141987605182,0.142732332618,0.142689776765,0.142860000179,0.143264280787,0.142796166398,0.143094057373,0.143881340663,0.144051564077,0.14507290456,0.14500907078,0.144987792853,0.145434629315,0.145519741022,0.146158078825,0.146860250407,0.14683897248,0.146541081506,0.145987855411,0.145817631997,0.14586018785,0.146158078825,0.146094245044,0.14592402163,0.14592402163,0.145987855411,0.146349580165,0.146158078825,0.146498525652,0.146370858092,0.146115522971,0.146413413945,0.146753860773,0.147136863455,0.147370920649,0.147285808942,0.147477310283,0.147094307601,0.147073029675,0.147392198576,0.147136863455,0.147307086869,0.147349642722,0.147775201257,0.147711367477,0.147307086869,0.14683897248,0.146732582847,0.146604915286,0.146541081506,0.146796416627,0.146455969799,0.146817694554,0.147009195894,0.146264468458,0.146860250407,0.146307024312,0.146583637359,0.146349580165,0.146030411264,0.14579635407,0.146285746385,0.145668686509,0.145604852729,0.145392073462,0.145094182487,0.145030348707,0.144647346025,0.143902618589,0.143370670421,0.142987667739,0.143370670421,0.142966389812,0.142604665058,0.142434441644,0.142625942985,0.141796103841,0.141838659695,0.142008883109,0.141668436281,0.141221599819,0.141072654332,0.140604539944,0.139859812507,0.13958319946,0.139051251291,0.139306586412,0.139455531899,0.139434253972,0.139327864339,0.13971086702,0.139604477386,0.139966202141,0.140391760676,0.140455594456,0.140519428237,0.140200259335,0.139604477386,0.139306586412,0.139008695438,0.138029910807,0.137987354954,0.137136237884,0.137349017151,0.137327739225,0.136412788374,0.136646845569,0.136391510448,0.135923396059,0.134987167282,0.134391385333,0.133689213751,0.133114709729,0.133242377289,0.132497649853,0.132306148512,0.132135925098,0.131859312051,0.131518865223,0.131157140468,0.130603914373,0.129986854497,0.129923020717,0.129327238768,0.128667623039,0.128327176211,0.127901617676,0.126646219998,0.125326988539,0.125220598906,0.124880152078,0.124412037689,0.123794977814,0.123943923301,0.12283747111,0.12205018782,0.120752234289,0.12009261856,0.119050000149,0.117879714178,0.116815817841,0.115922144917,0.114773136873,0.113262404074,0.112602788345,0.111836782982,0.111049499692,0.11041116189,0.110496273597,0.110049437135,0.109347265552,0.108325925069,0.108049312021,0.106900303976,0.10602790898,0.105772573859,0.105134236056,0.103793726671,0.10353839155,0.103453279843,0.103304334356,0.103027721309,0.103197944722,0.102048936678,0.10177232363,0.101048874121,0.100453092172,0.100453092172,0.100687149366,0.100580759733,0.100516925952,0.100453092172,0.100197757051,0.09987858815,0.0994104737616,0.0987083021789,0.0986019125452,0.0988998035196,0.0990700269336,0.0986019125452,0.0987934138859,0.0990061931534,0.0989210814464,0.0983891332777,0.0984104112044,0.098367855351,0.0983891332777,0.0978997409625,0.0980486864497,0.0978784630358,0.0975805720613,0.0971550135264,0.0971337355996,0.0970060680391,0.0969209563322,0.0966230653577,0.0961975068228,0.096601787431,0.096176228896,0.0957293924343,0.0952187221924,0.0953676676796,0.0951974442657,0.0949846649982,0.0947293298772,0.094410160976,0.0937505452469,0.0945165506098,0.0937505452469,0.0934526542724,0.0934526542724,0.0932185970782,0.0926228151293,0.0926015372025,0.0927717606165,0.0923674800083,0.0922823683013,0.0919206435466,0.0917716980594,0.091388695378,0.0912823057442,0.0910056926965,0.0904524666011,0.0904311886744,0.0902184094069,0.0898566846522,0.0899205184324,0.089452404044,0.08928218063,0.0891545130695,0.0887076766079,0.0879203933182,0.0874522789298,0.0870479983216,0.0868564969809,0.0867501073471,0.0865586060064,0.086260715032,0.0858564344238,0.0858138785703,0.0853670421086,0.0855159875958,0.0859628240575,0.086175603325,0.08575004479,0.0854521538156,0.0853457641818,0.0848776497934,0.0844308133317,0.0840265327235,0.0846861484527,0.0844520912585,0.0839626989433,0.084154200284,0.0839201430898,0.0833881949211,0.0836009741886,0.082813690899,0.0831541377269,0.0829413584594,0.0825370778513,0.0820476855361,0.0820264076093,0.0819625738291,0.0814093477337,0.0811752905395,0.0806433423708,0.0802603396893,0.0796007239602,0.0794092226195,0.079111331645,0.0786857731101,0.0786006614031,0.0783453262821,0.0781538249414,0.0783027704286,0.0778772118937,0.0776431546995,0.077345263725,0.0770048168971,0.0768558714098,0.0766643700691,0.0766643700691,0.0766856479959,0.0766643700691,0.0765579804354,0.0760260322667,0.0763452011679,0.0763877570214,0.0763239232412,0.07600475434,0.07600475434,0.0750472476363,0.0749195800759,0.0749195800759,0.0752387489771,0.0751323593433,0.0750259697096,0.0748344683689,0.0747706345886,0.0745791332479,0.0743237981269,0.0745365773944,0.0736854603245,0.0741110188595,0.0746004111747,0.0744727436142,0.0747919125154,0.0745578553212,0.0745152994677,0.0743450760537,0.0744089098339,0.0744514656874,0.0742812422735,0.0741748526397,0.074153574713,0.0745365773944,0.0743876319072,0.0744727436142,0.0746004111747,0.0745365773944,0.0746429670282,0.0745365773944,0.0745365773944,0.0744089098339,0.0742174084932,0.074153574713,0.0742812422735,0.07423868642,0.0746004111747,0.0743237981269,0.073898239592,0.0739620733722,0.0734088472768,0.0731109563024,0.0729620108151,0.0734939589838,0.0730896783756,0.0731109563024,0.0728981770349,0.0731322342291,0.0726428419139,0.0728556211814,0.072557730207,0.0724300626465,0.0719193924045,0.0715789455766,0.0711746649684,0.0711533870417,0.0712172208219,0.0709406077742,0.0707703843602,0.0706852726532,0.070451215459,0.0701107686311,0.0698979893636,0.0694724308287,0.069110706074,0.0686213137588,0.068770259246,0.0684085344913,0.0674297498609,0.0672808043737,0.067089303033,0.0668978016923,0.0671105809597,0.0670467471795,0.066919079619,0.0666850224248,0.0665786327911,0.0661956301096,0.0658977391352,0.0655147364537,0.0657700715747,0.0658551832817,0.0657487936479,0.06540834682,0.0650891779188,0.0649402324316,0.0643444504826,0.0640678374349,0.0641742270687,0.0640252815814,0.0639827257279,0.0641316712152,0.0637061126802,0.0636210009733,0.0636210009733,0.0632592762186,0.0629188293906,0.0628337176836,0.0628762735371,0.0625783825627,0.0624081591487,0.0622804915882,0.0620889902475,0.0621953798812,0.0624294370754,0.0623443253684,0.0623656032952,0.0625358267092,0.0625571046359,0.0621741019545,0.0624294370754,0.0624081591487,0.0623868812219,0.0625783825627,0.0624294370754,0.0625358267092,0.0623656032952,0.0628549956104,0.0634933334128,0.0633656658523,0.063301832072,0.0631103307313,0.0628124397569,0.0626847721964,0.0623443253684,0.0623230474417,0.0620889902475,0.0625571046359,0.0622804915882,0.0623017695149,0.0619826006137,0.0620677123207,0.0619187668335,0.0620038785405,0.0620038785405,0.0620251564672,0.0620251564672,0.0622379357347,0.0623017695149,0.0624719929289,0.0627486059766,0.0628762735371,0.0628337176836,0.0625145487824,0.0624719929289,0.0624932708557,0.0626847721964,0.0627273280499,0.0626422163429,0.0627273280499,0.0629188293906,0.0629613852441,0.0631103307313,0.0634294996325,0.0631103307313,0.0627911618301,0.0626209384161,0.0625358267092,0.0623656032952,0.0627060501231,0.0627911618301,0.0625996604894,0.0622804915882,0.0623230474417,0.0625571046359,0.0625996604894,0.0622804915882,0.0618336551265,0.0618549330533,0.061620875859,0.0615995979323,0.0620038785405,0.0620889902475,0.0618549330533,0.0625783825627,0.0627911618301,0.0625571046359,0.0622592136615,0.0624932708557,0.0628337176836,0.0628124397569,0.0628549956104,0.0628975514639,0.0629613852441,0.0627273280499,0.0627698839034,0.0628762735371,0.0626847721964,0.0626422163429,0.0625358267092,0.0625145487824,0.062216657808,0.0623443253684,0.061961322687,0.0620251564672,0.0620677123207,0.0621953798812,0.0620251564672,0.0617485434195,0.0617485434195,0.0619400447602,0.0618123771998,0.0619826006137,0.061705987566,0.061705987566,0.0616634317125,0.0614719303718,0.0614719303718,0.0618549330533,0.0616634317125,0.0610889276904,0.0608974263496,0.0608335925694,0.0608335925694,0.0607484808624,0.060535701595,0.0604931457415,0.0603867561077,0.0601739768403,0.0605144236682,0.060450589888,0.060535701595,0.0603016444007,0.0602590885472,0.0603442002542,0.0601739768403,0.060025031353,0.0598973637925,0.06011014306,0.0597058624518,0.0599611975728,0.0598760858658,0.0595143611111,0.0594292494041,0.0593654156239,0.0588760233087,0.0588121895285,0.0592590259901,0.0588760233087,0.0587270778215,0.058684521968,0.0587270778215,0.0589185791622,0.0591739142831,0.0589824129424,0.0590888025762,0.0587483557482,0.0591100805029,0.0592590259901,0.0590462467227,0.0587483557482,0.0587057998947,0.0585781323342,0.0590675246494,0.0591100805029,0.0592164701366,0.0590675246494,0.0588973012354,0.0589824129424,0.0589611350157,0.0594292494041,0.0596633065983,0.0597271403786,0.0596207507448,0.0590888025762,0.0592377480634,0.0595143611111,0.0595781948913,0.060195254767,0.0598122520856,0.0596207507448,0.0595781948913,0.060025031353,0.0600463092798,0.0596207507448,0.0595994728181,0.0599611975728,0.0599186417193,0.0595994728181,0.0597484183053,0.0595356390378,0.0595994728181,0.06011014306,0.06011014306,0.0604718678147,0.0606846470822,0.0612804290311,0.0613868186648,0.0615783200055,0.0616421537858,0.061791099273,0.0618974889068,0.0618336551265,0.0620038785405,0.0622804915882,0.062131546101,0.062216657808,0.0619400447602,0.0620889902475,0.0621528240277,0.0622379357347,0.0621528240277,0.061961322687,0.061791099273,0.0618974889068,0.0619826006137,0.0625996604894,0.0627911618301,0.062216657808,0.0620889902475,0.0619187668335,0.0618123771998,0.0617698213463,0.0618123771998,0.0620251564672,0.0617698213463,0.0615783200055,0.0612591511043,0.060535701595,0.0608335925694,0.0611740393974,0.0607059250089,0.0600888651333,0.060195254767,0.060195254767,0.0602590885472,0.0600675872065,0.060025031353,0.0601739768403,0.0601314209868,0.060025031353,0.059854807939,0.0596633065983,0.0593866935506,0.0590462467227,0.0587909116017,0.0586206881877,0.0582164075795,0.0582164075795,0.0580674620923,0.0582376855063,0.0580887400191,0.0578121269713,0.0577057373376,0.0572163450224,0.0569610099015,0.0568120644142,0.0566418410003,0.0565567292933,0.0569610099015,0.0565992851468,0.056833342341,0.0571312333154,0.056918454048,0.0567056747805,0.0564503396595,0.0559396694176,0.0559822252711,0.0559183914909,0.0561098928316,0.0562801162456,0.0563652279526,0.0562375603921,0.056492895513,0.0566418410003,0.0565354513665,0.0564077838061,0.057003565755,0.057003565755,0.0568758981945,0.05657800722,0.0567907864875,0.0572589008759,0.0571099553887,0.0568971761212,0.056492895513,0.0569822878282,0.0572376229492,0.0572163450224,0.0573227346562,0.0571312333154,0.0569822878282,0.0566205630735,0.0568758981945,0.0569822878282,0.0572163450224,0.0567695085607,0.0567269527073,0.056748230634,0.056833342341,0.0563652279526,0.0561098928316,0.0560247811246,0.0558758356374,0.0561737266118,0.05657800722,0.0568971761212,0.056918454048,0.0568546202677,0.0566205630735,0.056833342341,0.05657800722,0.0563226720991,0.0562801162456,0.056492895513,0.056492895513,0.0564503396595,0.0560673369781,0.0560673369781,0.0559822252711,0.0557056122234,0.0557694460036,0.0555992225897,0.0550247185675,0.0548757730803,0.0549608847873,0.0549183289338,0.0544289366186,0.0545566041791,0.0544076586918,0.0545778821058,0.0543438249116,0.0540459339371,0.0542799911314,0.0543651028383,0.053471429915,0.0519606971159,0.0506840215111,0.0494711796866,0.048258337862,0.0473433870119,0.0463433244548,0.0454070956779,0.0442368097068,0.0430878016625,0.0419600715449,0.0408748972808,0.0397471671632,0.0386832708259,0.0375129848548,0.0364916443709,0.0355341376673,0.0345766309637,0.0335340125531,0.0323211707286,0.0309168275633,0.0296827078119,0.0287890348886,0.0277038606245,0.0264484629464)
m <- c(0.0291799912757,0.0302418541315,0.0315585640726,0.032556715157,0.0339796113837,0.0352538468106,0.036443133209,0.0376111823503,0.0392889256624,0.0407755336604,0.0420710063444,0.0434089535427,0.0445132909126,0.0458512381109,0.0470617617664,0.0479749638223,0.0493766227919,0.0503747738763,0.0516277720461,0.0526896349018,0.0537090232433,0.054940784156,0.0562787313542,0.0570645098675,0.0582962707801,0.058275033523,0.0585723551226,0.0585935923797,0.0586785414082,0.0588909139793,0.0590608120363,0.0589971002649,0.0591457610647,0.0590395747791,0.0589121512365,0.0588909139793,0.0590395747791,0.0592731846074,0.0592094728361,0.0593581336359,0.0592519473503,0.059379370893,0.0598678278066,0.0598890650637,0.060122674892,0.059761641521,0.0600164886064,0.0597404042639,0.0599527768351,0.0602288611776,0.0607173180912,0.0610358769479,0.0608022671197,0.0611208259764,0.0608872161481,0.060674843577,0.0608235043768,0.0606323690628,0.0601863866633,0.0600377258635,0.059931539578,0.0596342179784,0.0598465905495,0.0596766924926,0.0596342179784,0.0603562847203,0.0598253532924,0.0597404042639,0.059379370893,0.059379370893,0.0595917434641,0.059570506207,0.0595917434641,0.0598890650637,0.0598465905495,0.0598890650637,0.0596129807212,0.0597404042639,0.0596129807212,0.0591457610647,0.0589333884936,0.0592944218645,0.0591669983218,0.0594006081501,0.0592944218645,0.0595492689499,0.0592094728361,0.0591245238076,0.0590820492934,0.0586997786653,0.0585511178655,0.0579352374092,0.057722864838,0.057722864838,0.0572131706673,0.057170696153,0.0567034764965,0.0568309000392,0.0567671882679,0.0566397647252,0.0564911039254,0.0561937823258,0.0562787313542,0.0559814097546,0.0560663587831,0.0562574940971,0.0561937823258,0.0564061548969,0.0562150195829,0.0562150195829,0.0559601724975,0.0557265626692,0.0555991391265,0.0555354273552,0.0552805802698,0.0548133606133,0.0548983096418,0.0550044959273,0.0554080038125,0.0556416136408,0.0558327489548,0.056045121526,0.0557690371835,0.0563849176398,0.0563849176398,0.0565335784396,0.0567671882679,0.0567459510107,0.056979560839,0.0571494588959,0.0571494588959,0.0572556451815,0.0571282216388,0.0571069843817,0.0572981196957,0.0573618314671,0.0577441020951,0.0579989491805,0.0582325590088,0.0585511178655,0.0585511178655,0.0589546257507,0.0590395747791,0.0591882355789,0.0595492689499,0.0595917434641,0.059570506207,0.0594218454072,0.0592307100932,0.0593581336359,0.0592519473503,0.0595492689499,0.0595067944357,0.0595067944357,0.0592307100932,0.0588909139793,0.0589333884936,0.0588696767222,0.0592307100932,0.0588909139793,0.0590395747791,0.0595492689499,0.0595492689499,0.0594855571786,0.0596979297497,0.0601863866633,0.0603775219774,0.0606323690628,0.0605474200343,0.0603562847203,0.0600377258635,0.0596766924926,0.0595917434641,0.0590608120363,0.0593156591216,0.0589971002649,0.0589333884936,0.0589121512365,0.0583812198086,0.0585935923797,0.0587847276938,0.0586997786653,0.0590608120363,0.0596554552355,0.0594855571786,0.0593368963788,0.0594855571786,0.0592307100932,0.0593156591216,0.0593156591216,0.0592731846074,0.0592094728361,0.0594643199214,0.0596766924926,0.0596554552355,0.0599740140922,0.0602288611776,0.0598465905495,0.0598678278066,0.059931539578,0.059931539578,0.0597191670068,0.0600164886064,0.0601863866633,0.060674843577,0.0612057750049,0.0609934024337,0.061227012262,0.061057114205,0.0612482495191,0.0611845377477,0.0612482495191,0.0612907240333,0.0616517574043,0.0619915535181,0.0612907240333,0.0613756730618,0.0608022671197,0.0606536063199,0.0609509279195,0.0609084534052,0.0608872161481,0.0610995887193,0.0610995887193,0.0610146396908,0.0609509279195,0.0611420632335,0.0608872161481,0.0610146396908,0.0607810298626,0.0606960808341,0.0604199964916,0.0605898945485,0.0601651494062,0.0602713356918,0.060313810206,0.0600589631207,0.0602076239205,0.0601014376349,0.0602713356918,0.060313810206,0.0604624710058,0.0602076239205,0.0598890650637,0.0602500984347,0.0603350474631,0.0603562847203,0.0608872161481,0.0610146396908,0.0605898945485,0.0605686572914,0.0606536063199,0.0606960808341,0.0605898945485,0.0604624710058,0.0601014376349,0.0602076239205,0.0599103023208,0.0598253532924,0.0600377258635,0.0602713356918,0.0601863866633,0.0601439121491,0.0599740140922,0.0599103023208,0.0601651494062,0.0600589631207,0.0607385553483,0.0606536063199,0.0602288611776,0.0602713356918,0.0603775219774,0.0601863866633,0.0601651494062,0.0598890650637,0.0602500984347,0.0602076239205,0.0603350474631,0.0607597926054,0.0608447416339,0.0607173180912,0.0607385553483,0.0605898945485,0.0608022671197,0.0609296906624,0.060865978891,0.060674843577,0.0607597926054,0.060674843577,0.0605049455201,0.0607597926054,0.0606536063199,0.0605474200343,0.0608022671197,0.0611420632335,0.0609296906624,0.0607597926054,0.0605261827772,0.0604412337487,0.0607173180912,0.0608022671197,0.0609084534052,0.0606111318056,0.060865978891,0.0610358769479,0.0611633004906,0.0610995887193,0.061057114205,0.0610783514622,0.0608447416339,0.0610783514622,0.0610783514622,0.0613119612904,0.0613119612904,0.061227012262,0.0615030966045,0.0614818593473,0.0612057750049,0.0615668083758,0.0620340280323,0.0619490790039,0.0619066044896,0.0620977398037,0.0621189770608,0.0622251633464,0.061970316261,0.0618428927183,0.0620340280323,0.0622676378606,0.0620765025466,0.0622464006035,0.0622464006035,0.0621189770608,0.0618004182041,0.0619490790039,0.0621402143179,0.0626286712315,0.0626286712315,0.0626286712315,0.0630321791167,0.063074653631,0.063265788945,0.0637117713444,0.0636480595731,0.0629684673454,0.0631596026594,0.0637330086015,0.0642214655152,0.0647311596859,0.0648798204857,0.0644975498576,0.0644975498576,0.0646249734003,0.0644975498576,0.0643064145436,0.064200228258,0.0645187871148,0.064752396943,0.064752396943,0.0649860067713,0.0649860067713,0.0653470401422,0.0656868362561,0.0656443617418,0.0656443617418,0.0655381754563,0.0657293107703,0.0660053951128,0.0661965304268,0.0663451912266,0.0665150892836,0.0669398344258,0.0673008677968,0.0674707658537,0.0675981893964,0.0677256129391,0.0680654090529,0.0684052051668,0.0685963404808,0.0693821189941,0.0692122209371,0.0694033562512,0.0698493386506,0.0699979994504,0.0699767621933,0.0700617112217,0.0697219151079,0.0698281013935,0.0701891347644,0.0698068641363,0.0694883052796,0.0694670680225,0.0694670680225,0.0696582033365,0.0698918131648,0.0699767621933,0.0702528465358,0.0701891347644,0.0698493386506,0.070104185736,0.0707413034494,0.0709749132777,0.0709324387634,0.0712509976202,0.0713571839057,0.0716332682482,0.0714633701913,0.0714421329342,0.07139965842,0.0713571839057,0.0710810995632,0.0709536760205,0.0704227445927,0.0703802700784,0.0705926426496,0.0710810995632,0.071229760363,0.0711872858488,0.0711448113346,0.0709536760205,0.0714421329342,0.0712509976202,0.0715270819626,0.0715695564769,0.0716757427624,0.0719730643621,0.0719730643621,0.0715695564769,0.0714633701913,0.0709961505348,0.0714633701913,0.0711023368203,0.0709112015063,0.0712509976202,0.0711660485917,0.0709536760205,0.0716332682482,0.0716545055053,0.0716757427624,0.0722916232188,0.0726101820755,0.0726314193326,0.0728225546466,0.0725889448184,0.0723765722472,0.0725889448184,0.0722491487045,0.072334097733,0.0727800801324,0.0726314193326,0.073077401732,0.0731198762463,0.0732897743032,0.0731411135034,0.0733534860745,0.0737994684739,0.0739481292737,0.0743941116731,0.0748825685868,0.0749675176152,0.0755621608145,0.0759019569283,0.0759444314425,0.0758807196712,0.0760930922423,0.0760506177281,0.0761355667566,0.0767939217271,0.0770700060696,0.0772611413836,0.0770912433267,0.0772186668694,0.0767939217271,0.0769425825269,0.077324853155,0.0773036158979,0.0778345473257,0.0781743434396,0.0779832081255,0.0783442414965,0.0783654787536,0.0791937317811,0.0793848670951,0.0794698161236,0.0800219848086,0.0802768318939,0.080106933837,0.0802768318939,0.0803193064082,0.0801494083513,0.0806378652649,0.0808927123503,0.0809988986358,0.0818271516633,0.0827828282335,0.0826554046908,0.0831226243473,0.083058912576,0.0831438616044,0.0833137596614,0.0831226243473,0.0835473694896,0.083993351889,0.08435438526,0.08435438526,0.0841844872031,0.0846941813738,0.0850552147448,0.0852038755446,0.0855224344013,0.0858622305151,0.0860321285721,0.0865205854857,0.0870727541707,0.0872214149705,0.0874337875416,0.087497499313,0.0875399738272,0.0879222444553,0.0887080229685,0.0889203955397,0.0894513269675,0.0896424622816,0.0899610211383,0.0900459701668,0.0904070035377,0.0901309191952,0.0907680369087,0.0911503075367,0.0912989683365,0.0916812389646,0.0917237134788,0.0921059841069,0.0920210350784,0.0928492881059,0.0933802195338,0.093613829362,0.0936987783905,0.0941022862757,0.0946756922178,0.0951429118743,0.0952490981599,0.0955251825024,0.0955039452453,0.0955888942737,0.0961835374729,0.0963321982727,0.0966507571295,0.0968843669577,0.0975214846712,0.0974577728998,0.0975214846712,0.0976913827281,0.097861280785,0.0985196357556,0.0990930416977,0.0993266515259,0.0994328378115,0.0994328378115,0.0996027358684,0.0998363456967,0.0996664476398,0.100048718268,0.100154904553,0.100133667296,0.100176141811,0.100346039867,0.100537175181,0.100749547753,0.10077078501,0.101344190952,0.101960071408,0.102108732208,0.102342342036,0.102745849921,0.10348915392,0.103998848091,0.104232457919,0.104444830491,0.105081948204,0.105740303175,0.106653505231,0.106568556202,0.107502995515,0.107141962144,0.107566707286,0.107970215172,0.108458672085,0.109244450599,0.109499297684,0.109987754598,0.110752295854,0.11151683711,0.111962819509,0.112684886251,0.113364478479,0.113937884421,0.114426341335,0.115275831619,0.116252745446,0.117080998474,0.117909251501,0.118036675044,0.119013588871,0.119523283042,0.120075451727,0.120436485098,0.120924942012,0.122220414696,0.122687634352,0.122708871609,0.123898158008,0.124216716864,0.124896309092,0.125618375834,0.126213019033,0.127253644632,0.12778457606,0.128315507488,0.128400456516,0.129441082115,0.129674691943,0.130863978341,0.131479858798,0.132159451025,0.132371823597,0.132350586339,0.132923992282,0.133773482566,0.134644210108,0.134559261079,0.134665447365,0.135578649421,0.135769784735,0.13632195342,0.136682986791,0.136895359362,0.137617426104,0.137744849647,0.13853062816,0.138297018332,0.138360730103,0.138509390903,0.138955373302,0.138849187017,0.138509390903,0.138976610559,0.139167745873,0.138955373302,0.138297018332,0.138509390903,0.138636814445,0.138658051703,0.138573102674,0.13823330656,0.138339492846,0.138212069303,0.138509390903,0.137766086904,0.138297018332,0.138700526217,0.138636814445,0.139125271359,0.139507541987,0.139911049872,0.140144659701,0.140165896958,0.139932287129,0.139995998901,0.140399506786,0.140484455814,0.140569404843,0.1408879637,0.141227759813,0.141227759813,0.141333946099,0.142162199126,0.141673742213,0.141758691241,0.14139765787,0.141949826555,0.142140961869,0.142077250098,0.142395808955,0.143139112954,0.143393960039,0.143478909068,0.143436434553,0.143818705181,0.143542620839,0.143733756153,0.144222213067,0.14405231501,0.143988603238,0.143924891467,0.144477060152,0.14390365421,0.144434585638,0.144880568037,0.145177889637,0.144944279809,0.145517685751,0.146345938778,0.146027379921,0.146388413292,0.146345938778,0.147046768263,0.147195429063,0.147641411462,0.147577699691,0.148066156604,0.147768835005,0.14817234289,0.148002444833,0.147917495805,0.147896258547,0.148044919347,0.148597088032,0.148342240947,0.148363478204,0.147407801634,0.147768835005,0.147174191806,0.146940581977,0.146367176035,0.146282227007,0.145899956379,0.146367176035,0.146558311349,0.146388413292,0.145878719122,0.14581500735,0.145347787694,0.145029228837,0.144498297409,0.14360633261,0.143393960039,0.143011689411,0.141886114784,0.141418895127,0.141079099014,0.140399506786,0.140144659701,0.139571253758,0.139677440044,0.138997847816,0.138743000731,0.137999696732,0.137383816276,0.136767935819,0.136513088734,0.135706072964,0.135196378793,0.135599886678,0.135196378793,0.135260090564,0.134856582679,0.133879668852,0.133879668852,0.133837194337,0.133391211938,0.133518635481,0.132796568739,0.132626670682,0.132350586339,0.13190460394,0.131118825427,0.130163148857,0.129441082115,0.12903757423,0.129441082115,0.128527880059,0.12859159183,0.127996948631,0.127805813317,0.12748725446,0.126998797547,0.126446628862,0.125788273891,0.125958171948,0.12623425629,0.12572456212,0.125851985662,0.125490952291,0.124981258121,0.125151156178,0.124747648292,0.124492801207,0.124365377664,0.123940632522,0.124195479607,0.124259191379,0.124068056065,0.124641462007,0.123983107036,0.123919395265,0.123898158008,0.123898158008,0.12336722658,0.123239803037,0.123876920751,0.123239803037,0.122793820638,0.122305363724,0.122156702924,0.121753195039,0.121498347954,0.121434636182,0.120755043955,0.120606383155,0.119735655613,0.119183486928,0.119034826128,0.119013588871,0.118525131958,0.118312759387,0.11814286133,0.118036675044,0.118121624073,0.117909251501,0.11703852396,0.116656253332,0.116189033675,0.115912949333,0.115955423847,0.115764288533,0.115721814019,0.115509441447,0.115105933562,0.114638713906,0.11357685105,0.113088394136,0.113024682365,0.112918496079,0.112514988194,0.112090243052,0.111962819509,0.111601786138,0.111729209681,0.111856633224,0.111474362596,0.110837244882,0.110285076197,0.109117027056,0.109117027056,0.108883417228,0.108373723057,0.108076401457,0.107970215172,0.107970215172,0.107311860201,0.107035775859,0.107587944544,0.106674742488,0.106441132659,0.105952675746,0.105485456089,0.105464218832,0.105655354146,0.105273083518,0.104763389347,0.104508542262,0.104041322605,0.103574102949,0.103828950034,0.103276781349,0.102958222493,0.102724612664,0.102809561693,0.102214918494,0.101641512551,0.101195530152,0.10062212421,0.100728310495,0.100728310495,0.100176141811,0.100027481011,0.0998575829538,0.0995814986113,0.0989231436407,0.0987107710696,0.0982647886702,0.0975851964425,0.096756943415,0.0965233335868,0.0964171473012,0.0964808590725,0.0961835374729,0.0958012668449,0.0951004373601,0.0943996078753,0.0941022862757,0.0940385745043,0.0939536254759,0.0935288803336,0.0935076430765,0.0931253724484,0.0924670174778,0.0922334076496,0.0916175271932,0.0909591722227,0.0907043251373,0.0894513269675,0.08972741131,0.0894725642247,0.0894088524533,0.0888566837683,0.0882832778262,0.0879859562266,0.0873488385132,0.0875399738272,0.0873276012561,0.0870727541707,0.0863719246859,0.0856923324582,0.0855011971442,0.0853312990873,0.0855224344013,0.0846517068596,0.0846941813738,0.0849915029734,0.0848853166879,0.0850339774877,0.0843756225171,0.0836960302894,0.0837597420608,0.0831863361187,0.0828465400048,0.0825916929195,0.0826766419479,0.0830164380618,0.0829527262904,0.0830376753189,0.0829739635475,0.0829952008046,0.0828465400048,0.082315608577,0.0821032360058,0.0819333379489,0.0819121006918,0.0814873555495,0.0814873555495,0.0810413731501,0.0808927123503,0.0803617809224,0.0798945612659,0.0796184769234,0.0793848670951,0.0795972396663,0.0793848670951,0.0793848670951,0.0790025964671,0.0792786808095,0.0788964101815,0.0786628003532,0.0782380552109,0.0783230042394,0.0782380552109,0.0784079532678,0.0781743434396,0.0777920728115,0.0773673276692,0.0771549550981,0.0772399041265,0.0766240236702,0.0766452609273,0.0764753628704,0.0760081432139,0.0759656686996,0.0754559745289,0.0754559745289,0.0753922627575,0.0749887548724,0.0749462803581,0.075116178415,0.0747976195583,0.074733907787,0.0743091626447,0.073990603788,0.073629570417,0.0731623507605,0.0732472997889,0.0729499781893,0.0729924527036,0.0727588428753,0.0723765722472,0.0722916232188,0.0723128604759,0.0718668780765,0.0718244035623,0.0718881153336,0.0715058447055,0.0716757427624,0.0713784211628,0.0715483192198,0.0712509976202,0.0714633701913,0.0715483192198,0.0715058447055,0.0716969800196,0.0713571839057,0.071229760363,0.0712085231059,0.07139965842,0.0712085231059,0.0714633701913,0.0714208956771,0.0715695564769,0.0707837779636,0.0709112015063,0.0713147093915,0.0715483192198,0.0711023368203,0.0712722348773,0.0714846074484,0.0713571839057,0.0712934721344,0.070847489735,0.0712722348773,0.0716120309911,0.0711660485917,0.0713359466486,0.0713784211628,0.0714633701913,0.0711235740775,0.0709324387634,0.0706563544209,0.0711023368203,0.0711235740775,0.0710598623061,0.0712722348773,0.0709961505348,0.0708262524779,0.0706351171638,0.0702103720215,0.0704227445927,0.0705926426496,0.0707837779636,0.0711660485917,0.0709112015063,0.0711660485917,0.0712722348773,0.0711235740775,0.0714846074484,0.0718668780765,0.0720792506476,0.0719518271049,0.0718668780765,0.0713784211628,0.0711660485917,0.0712085231059,0.0713784211628,0.0711235740775,0.0707837779636,0.0706775916781,0.0701678975073,0.0700192367075,0.0697219151079,0.0697643896221,0.0695944915652,0.0692971699656,0.0688724248233,0.0691272719087,0.0688724248233,0.0688724248233,0.0687025267664,0.0687025267664,0.0689148993375,0.0681715953385,0.0681291208243,0.0680654090529,0.0678105619676,0.0678317992247,0.0678530364818,0.0672796305397,0.0674282913395,0.0676619011678,0.0673221050539,0.0673221050539,0.0672796305397,0.066791173626,0.0666637500834,0.0666212755691,0.0668973599116,0.0669185971687,0.066600038312,0.0661540559126,0.0656868362561,0.0653682773994,0.0654744636849,0.065304565628,0.0654744636849,0.0654532264278,0.0652408538567,0.0644338380863,0.0642851772865,0.0641365164867,0.0642214655152,0.0643064145436,0.0644975498576,0.0646037361432,0.0644338380863,0.064200228258,0.064370126315,0.0642214655152,0.0640728047154,0.0640940419725,0.0641789910009,0.0639666184298,0.0636905340873,0.0637967203729,0.064009092944,0.0636055850588,0.0635418732875,0.0632233144308,0.0632020771736,0.0629897046025,0.0630321791167,0.0634993987733,0.0632445516879,0.0632445516879,0.0632445516879,0.0630109418596,0.0625861967173,0.0629259928312,0.0628198065456,0.062904755574,0.0628835183169,0.0626499084887,0.0623738241462,0.0623101123748,0.0621189770608,0.0620127907752,0.0617154691756,0.0613331985475,0.0613331985475,0.0615880456329,0.0616305201471,0.0618004182041,0.0618004182041,0.0615455711187,0.0613331985475,0.0611633004906,0.0612907240333,0.0615880456329,0.0616729946614,0.0617579436898,0.0618428927183,0.0614606220902,0.0611420632335,0.0612694867762,0.0613969103189,0.0620765025466,0.0617579436898,0.0616942319185,0.0613969103189,0.0612482495191,0.0612482495191,0.0614393848331,0.0619490790039,0.0616517574043,0.0616305201471,0.061779180947,0.0613544358047,0.0618641299754,0.0618641299754,0.0621826888321,0.0622464006035,0.0621189770608,0.0621826888321,0.0622251633464,0.0624375359175,0.0622464006035,0.0628198065456,0.0632020771736,0.0629259928312,0.0614606220902,0.0601651494062,0.0591032865505,0.0579989491805,0.0569583235819,0.056045121526,0.0548345978704,0.0535815997006,0.0526683976447,0.0514578739892,0.0501199267909,0.0488669286212,0.0474227951373,0.0460423734249,0.0450017478263,0.0437275123994,0.0425382260009,0.0410516180029,0.0398410943474,0.0384181981207,0.0372501489794,0.035890964524,0.0348715761825,0.0337672388125,0.0322169190432)
s <- c(0.0298779305374,0.0298779305374,0.0297424809089,0.0296183187495,0.0295505939353,0.0295167315282,0.0293812818998,0.029132957581,0.0291781074572,0.0292345448023,0.029449006714,0.0295731688734,0.0296747560947,0.0297876307851,0.0296408936876,0.0299682302897,0.0299682302897,0.0300472425729,0.0301714047323,0.0301601172633,0.0302842794227,0.0303745791749,0.0303745791749,0.0304310165201,0.0303632917059,0.0303520042369,0.0304535914582,0.0304874538653,0.0306906283079,0.0308260779364,0.0309502400958,0.0311195521313,0.0311195521313,0.031334014043,0.0313791639191,0.0314581762024,0.031650063176,0.031672638114,0.031661350645,0.0315823383618,0.0314807511404,0.0315484759546,0.0314920386095,0.031650063176,0.0316274882379,0.0316274882379,0.0314807511404,0.0313001516359,0.0313227265739,0.0312888641668,0.0314807511404,0.0313001516359,0.0313791639191,0.031650063176,0.031650063176,0.0316162007689,0.0317290754592,0.031988687247,0.0320902744684,0.0322257240968,0.0321805742206,0.0320789869993,0.0319096749638,0.0317177879902,0.031672638114,0.0313904513881,0.0315259010166,0.031356588981,0.0313227265739,0.0313114391049,0.031029252379,0.0311421270694,0.0312437142907,0.0311985644145,0.0313904513881,0.0317065005211,0.0316162007689,0.0315371884856,0.0316162007689,0.0314807511404,0.0315259010166,0.0315259010166,0.0315033260785,0.0314694636714,0.0316049132998,0.0317177879902,0.0317065005211,0.0318758125567,0.0320112621851,0.0318080877425,0.0318193752115,0.0318532376186,0.0318532376186,0.0317403629282,0.0318983874947,0.031988687247,0.0322482990349,0.0325304857607,0.0324176110704,0.0325417732298,0.0324514734775,0.0325530606988,0.0325191982917,0.0325530606988,0.0325756356369,0.0327675226105,0.0329481221151,0.0325756356369,0.0492923772787,0.0498116008543,0.0502292372086,0.0511886720767,0.0517869079356,0.0523399939183,0.053186554096,0.0537509275478,0.0543491634067,0.0548909619204,0.0557713845051,0.0562228832666,0.0569001314087,0.0574532173915,0.0580063033742,0.0585255269498,0.0593269372514,0.0598122984199,0.0605459839072,0.0611555072352,0.0620133548819,0.062679315555,0.0632775514139,0.0641128241225,0.0647787847956,0.0646320476981,0.064586897822,0.0645530354149,0.0649932467073,0.0651061213976,0.0649480968311,0.0650609715215,0.0654221705306,0.0651851336809,0.065207708619,0.0650722589905,0.0651512712738,0.0651286963357,0.0652867209022,0.0651625587428,0.0653770206545,0.0653657331855,0.0652754334332,0.0654334579997,0.0653995955926,0.0653318707783,0.0650722589905,0.0649255218931,0.0648690845479,0.0650496840525,0.0649368093621,0.0650271091144,0.0651061213976,0.0646207602291,0.0646433351672,0.0647674973266,0.0647110599814,0.064914234424,0.0646433351672,0.064891659486,0.0646659101052,0.0649255218931,0.065218996088,0.065230283557,0.0652415710261,0.065218996088,0.0649368093621,0.0649932467073,0.064891659486,0.0648803720169,0.0643837233794,0.0645191730078,0.0646546226362,0.0643950108484,0.0647336349195,0.064902946955,0.0650496840525,0.0651399838047,0.0650158216453,0.0648577970788,0.0648239346717,0.0648577970788,0.0647223474504,0.0651738462118,0.0651964211499,0.0653318707783,0.0650045341763,0.0650948339286,0.0650722589905,0.0651738462118,0.0650948339286,0.0649480968311,0.0651625587428,0.0651286963357,0.0654334579997,0.0654108830616,0.0655801950971,0.0657156447256,0.0654673204068,0.0659075316992,0.0659526815753,0.0659526815753,0.066178430956,0.0665622049032,0.0665847798413,0.0666299297174,0.0667540918768,0.0666637921246,0.0667315169388,0.0664719051509,0.0665396299652,0.0667202294697,0.0667879542839,0.0666186422484,0.066799241753,0.0668331041601,0.0669121164433,0.0667202294697,0.067115290886,0.0672394530454,0.0675555021784,0.0675216397713,0.0674087650809,0.067747389152,0.0675103523022,0.067453914957,0.067747389152,0.0675555021784,0.0673523277357,0.0674990648332,0.0677022392758,0.0680295758779,0.0686390992058,0.0685375119845,0.0683230500728,0.0683117626038,0.0686729616129,0.068695536551,0.06870682402,0.0686616741439,0.0688874235246,0.0692147601266,0.0690567355601,0.0691018854363,0.069011585684,0.0692711974718,0.0697114087642,0.0695533841977,0.0697678461094,0.0694292220383,0.0694743719144,0.0697452711713,0.0698920082687,0.0700048829591,0.0702419198089,0.0704789566586,0.070591831349,0.0707272809774,0.0709756052962,0.0713368043053,0.071551266217,0.071562553686,0.0716867158454,0.072183364483,0.0719576151023,0.0722059394211,0.0726010008373,0.0727364504657,0.072826750218,0.0729621998464,0.0727703128728,0.0728493251561,0.0728944750322,0.0725784258992,0.0724881261469,0.0724881261469,0.0724316888018,0.0727590254038,0.0730073497226,0.0731992366962,0.0734136986079,0.0733459737937,0.0727816003419,0.0730524995987,0.0735378607673,0.0736733103957,0.0734814234221,0.0737297477409,0.0739442096525,0.0741248091571,0.0742715462546,0.0742489713165,0.0741812465023,0.0741248091571,0.0740345094048,0.0739893595287,0.0735942981124,0.073763610148,0.0739667845906,0.0746101703257,0.0749149319896,0.0750052317419,0.075050381618,0.0748472071754,0.0751068189632,0.0751181064323,0.0755018803795,0.0756034676008,0.075659904946,0.0756486174769,0.0757953545744,0.0758292169815,0.0759420916719,0.075975954079,0.0762694282739,0.075998529017,0.0760549663622,0.0765290400617,0.0763710154952,0.0764274528404,0.076946676416,0.0771272759206,0.0774546125226,0.0780528483815,0.0782785977622,0.0784027599216,0.0786397967714,0.0783463225765,0.0782673102932,0.0783011727003,0.0782785977622,0.0784930596739,0.0790348581876,0.0791364454089,0.079463782011,0.0796669564536,0.0800620178699,0.0798362684892,0.0799152807724,0.0802877672506,0.0800507304008,0.0803667795338,0.0808408532333,0.0810214527379,0.0812359146496,0.0814729514993,0.0818115755704,0.0818002881014,0.081687413411,0.0814278016232,0.0815406763135,0.0819357377298,0.0821163372344,0.082646848279,0.0825452610577,0.0827935853765,0.0824210988983,0.0826919981552,0.0832112217308,0.0834143961735,0.083583708209,0.0837078703684,0.0837417327755,0.0838320325278,0.084215806475,0.0847350300506,0.0848253298029,0.0848027548648,0.085163953874,0.0853219784405,0.0852655410953,0.0854687155379,0.0856944649187,0.08579605214,0.0861459636801,0.0865974624415,0.0866651872557,0.0872747105837,0.0879745336639,0.0879971086019,0.0885501945847,0.0886292068679,0.0887082191512,0.0887307940892,0.0886856442131,0.0891258555055,0.0894870545146,0.0900175655593,0.0902094525329,0.0903787645685,0.0911011625867,0.0914284991888,0.0917784107289,0.0920718849238,0.0928281453492,0.093099044606,0.0933812313319,0.0937875802172,0.0944648283594,0.0951533639705,0.0952775261299,0.0954129757584,0.0959096243959,0.0966658848213,0.0970045088924,0.0973318454944,0.0976366071584,0.0982122680792,0.0983251427696,0.0988895162213,0.0990701157259,0.0993184400447,0.0999053884345,0.10042461201,0.100684223798,0.100853535834,0.101169584967,0.101429196754,0.101982282737,0.102467643906,0.102873992791,0.103065879765,0.103190041924,0.103460941181,0.104081751978,0.104217201606,0.104567113146,0.105041186846,0.105165349005,0.105741009926,0.105966759307,0.106248946033,0.106519845289,0.106824606953,0.107005206458,0.10721966837,0.107298680653,0.107603442317,0.108337127804,0.10850643984,0.10885635138,0.109183687982,0.109273987734,0.109330425079,0.109353000017,0.10944329977,0.109781923841,0.110425309576,0.11049303439,0.110414022107,0.11084294593,0.110967108089,0.111000970497,0.110888095806,0.111475044196,0.112163579807,0.112671515914,0.112434479064,0.112773103135,0.113145589613,0.113382626463,0.113721250534,0.113630950782,0.114150174358,0.114669397933,0.115470808235,0.115685270146,0.116260931067,0.116362518289,0.116768867174,0.117062341369,0.117615427351,0.118303962963,0.118766749193,0.119229535424,0.120121245477,0.120764631212,0.120877505903,0.121509604169,0.121938527992,0.12231101447,0.122886675391,0.123620360878,0.124579795746,0.125505368207,0.126227766226,0.12640836573,0.127063038934,0.127424237943,0.128056336209,0.128417535219,0.128744871821,0.129760744034,0.130257392671,0.130415417238,0.131476439327,0.131781200991,0.131961800496,0.132469736602,0.132909947895,0.133417884001,0.134061269736,0.13460306825,0.134998129666,0.135506065773,0.13553992818,0.136251038729,0.13695086181,0.13752652273,0.137707122235,0.138136046058,0.138858444077,0.139772729068,0.140438689742,0.140540276963,0.140359677458,0.14116108776,0.141217525105,0.141872198309,0.142278547194,0.142617171265,0.143046095089,0.143181544717,0.143554031195,0.14349759385,0.143520168788,0.144163554523,0.144885952542,0.144953677356,0.144694065568,0.145235864082,0.145506763339,0.145563200684,0.145337451303,0.145405176117,0.14572122525,0.145969549569,0.146014699445,0.145913112224,0.146025986914,0.145879249817,0.146127574136,0.145777662595,0.146612935304,0.146974134313,0.146985421782,0.147470782951,0.147809407022,0.1481818935,0.148497942633,0.148576954916,0.148193180969,0.148407642881,0.148633392261,0.149254203058,0.149626689537,0.14981857651,0.150213637926,0.150382949962,0.150834448723,0.151252085078,0.151082773042,0.15134238483,0.150902173538,0.151353672299,0.151872895875,0.15192933322,0.152640443769,0.153001642778,0.153125804938,0.153407991664,0.153430566602,0.153972365115,0.154198114496,0.154288414248,0.15439000147,0.154006227522,0.153882065363,0.153870777894,0.154322276655,0.153983652584,0.154175539558,0.154412576408,0.154604463381,0.154672188196,0.154875362638,0.155496173435,0.155259136585,0.155315573931,0.155451023559,0.156004109542,0.156286296268,0.156647495277,0.156568482994,0.156929682003,0.156568482994,0.156771657436,0.156850669719,0.156670070215,0.156749082498,0.156850669719,0.157369893295,0.15720058126,0.156997406817,0.156241146391,0.15637659602,0.155992822073,0.155834797506,0.155665485471,0.15543973609,0.155428448621,0.155778360161,0.155484885966,0.155710635347,0.155146261895,0.155259136585,0.154886650107,0.154548026036,0.154141677151,0.153927215239,0.153487003947,0.153249967097,0.152538856548,0.152132507662,0.151918045751,0.151353672299,0.150823161254,0.150236212865,0.150089475767,0.149931451201,0.14958153966,0.148994591271,0.148576954916,0.148351205536,0.147775544615,0.147369195729,0.147188596225,0.147222458632,0.146770959871,0.146725809994,0.146263023764,0.145348738772,0.145202001675,0.144897240011,0.144795652789,0.144942389887,0.144547328471,0.144400591373,0.144457028718,0.144163554523,0.143937805143,0.143655618417,0.143305706877,0.143125107372,0.143170257248,0.142368846947,0.142244684787,0.141770611088,0.141149800291,0.140957913317,0.140246802768,0.140066203263,0.139705004254,0.139309942838,0.139580842095,0.13917449321,0.138993893705,0.138305358094,0.137718409704,0.137436222978,0.136916999402,0.136849274588,0.136386488358,0.136059151756,0.136104301632,0.135991426942,0.135709240216,0.135822114906,0.135178729171,0.134817530162,0.134772380286,0.134456331153,0.133824232887,0.133575908568,0.133688783258,0.132684198514,0.131747338584,0.131431289451,0.131171677663,0.130708891433,0.130246105202,0.130291255079,0.12934310768,0.128846459042,0.1276951372,0.127051751465,0.126419653199,0.125787554933,0.124963569694,0.124376621304,0.123676798224,0.122818950577,0.122514188913,0.121994965337,0.121114542753,0.120572744239,0.120369569796,0.119985795849,0.119635884309,0.118992498574,0.118823186538,0.11810078852,0.117423540378,0.117039766431,0.116136768908,0.115166046571,0.114996734535,0.114895147314,0.114601673119,0.114229186641,0.114251761579,0.113450351277,0.113371338994,0.113055289861,0.112536066285,0.112197442214,0.112028130179,0.111350882037,0.11131701963,0.111158995063,0.110752646178,0.110425309576,0.110120547912,0.109748061434,0.109341712548,0.109353000017,0.109736773965,0.109003088477,0.108980513539,0.108833776442,0.108540302247,0.108246828052,0.108359702742,0.108133953362,0.107874341574,0.107479280157,0.107309968122,0.106971344051,0.106948769113,0.106429545537,0.106248946033,0.106057059059,0.106057059059,0.105582985359,0.105052474315,0.105029899377,0.104499388332,0.104318788827,0.104047889571,0.103833427659,0.103664115623,0.103460941181,0.103178754455,0.102659530879,0.102196744649,0.102366056684,0.10159850879,0.101000272931,0.100876110772,0.100695511267,0.100413324541,0.100244012506,0.100131137815,0.0995441894254,0.0991265530711,0.098776641531,0.0986637668406,0.0984154425218,0.0981332557959,0.0979752312294,0.0974785825919,0.0971173835827,0.096880346733,0.0963611231573,0.0960450740244,0.0956613000771,0.0949050396517,0.094984051935,0.0946115654568,0.0941600666954,0.0936182681817,0.093099044606,0.0928394328182,0.092444371402,0.092444371402,0.0921734721451,0.091823560605,0.0914284991888,0.0908302633299,0.0908076883918,0.0909544254893,0.0911688874009,0.0904803517898,0.0903449021613,0.0904464893827,0.0901417277187,0.0899837031522,0.0894193297004,0.0894080422314,0.0893177424791,0.0887533690273,0.0886743567441,0.0884147449563,0.0881777081065,0.0884711823014,0.08801968354,0.0882454329207,0.0880986958233,0.0878955213806,0.0875568973095,0.0872634231146,0.0871166860172,0.0867329120699,0.0865974624415,0.0860895263349,0.0858863518923,0.0852994035024,0.0851188039978,0.0846785927055,0.084204519006,0.0840126320323,0.0837530202445,0.0837643077136,0.0837304453065,0.0835046959257,0.0831773593237,0.0831660718547,0.0827822979075,0.0825791234648,0.0822517868628,0.0822969367389,0.0822630743318,0.0823420866151,0.0821614871105,0.081676125942,0.0816196885968,0.0815293888445,0.0815406763135,0.081044027676,0.081055315145,0.0804570792861,0.0801410301531,0.080118455215,0.0800168679937,0.0799604306485,0.0798701308963,0.0795540817633,0.0794976444181,0.0794863569491,0.0791815952851,0.0792606075683,0.0785833594262,0.0786397967714,0.0787075215856,0.0783914724526,0.0786059343643,0.0783237476384,0.0783237476384,0.0781092857267,0.0779399736912,0.0779173987531,0.0778383864698,0.0775449122749,0.0775110498678,0.0777480867176,0.0774658999917,0.0776013496201,0.0775110498678,0.077567487213,0.0774658999917,0.0775223373368,0.077567487213,0.0774771874607,0.0774771874607,0.077262725549,0.077262725549,0.0772288631419,0.0775223373368,0.0772740130181,0.0771837132658,0.0771950007348,0.0769805388231,0.0764048779023,0.0763935904333,0.0768902390709,0.0767999393186,0.0765741899379,0.0765516149998,0.0767886518495,0.0764613152475,0.0765403275307,0.0761452661145,0.076303290681,0.0762129909287,0.0757953545744,0.075671192415,0.075682479884,0.0757614921673,0.0754341555653,0.0752422685916,0.075050381618,0.0751632563084,0.0749939442729,0.0748472071754,0.074734332485,0.074395708414,0.0740457968739,0.0740232219358,0.0736055855815,0.0731992366962,0.0732105241652,0.0732105241652,0.0733121113866,0.0732895364485,0.0733911236698,0.0733798362008,0.0731766617581,0.0733121113866,0.0733121113866,0.0732669615104,0.0729960622536,0.0730863620058,0.0728719000942,0.0727025880586,0.0725445634921,0.0724655512089,0.0722510892972,0.0717544406596,0.071551266217,0.0713368043053,0.0711787797388,0.0709981802342,0.0710997674556,0.0707837183226,0.0705805438799,0.0703547944992,0.070298357154,0.069982308021,0.0699371581449,0.0698694333307,0.0697114087642,0.0697339837022,0.0692711974718,0.0691470353124,0.0691696102505,0.0691583227814,0.0691244603743,0.0691470353124,0.0689325734007,0.069022873153,0.0689438608698,0.0688987109936,0.0688874235246,0.0688535611175,0.068695536551,0.0685487994535,0.0685826618606,0.0686390992058,0.0689099984626,0.0690793104982,0.0687745488342,0.0684923621083,0.0682214628515,0.0681198756302,0.0679618510637,0.0678715513114,0.0678489763733,0.0676119395235,0.067431340019,0.0672055906383,0.067137865824,0.0670137036647,0.0671040034169,0.067126578355,0.0672281655763,0.067137865824,0.0670249911337,0.067115290886,0.0671491532931,0.0671040034169,0.0672055906383,0.0673974776119,0.0673523277357,0.0671830157002,0.0670701410098,0.0671604407621,0.0669572663195,0.0670249911337,0.0668782540362,0.0668218166911,0.0667540918768,0.0668782540362,0.0671491532931,0.0670927159479,0.0672620279834,0.0670927159479,0.066799241753,0.06648319262,0.0666186422484,0.0664719051509,0.0666976545317,0.0667315169388,0.0665057675581,0.0661897184251,0.066178430956,0.0662010058941,0.066167143487,0.0658398068849,0.0653995955926,0.0654108830616,0.0654221705306,0.0654334579997,0.0657382196636,0.0657833695398,0.065523757752,0.0657946570088,0.0658172319469,0.0657607946017,0.0657607946017,0.0659301066372,0.0661558560179,0.0661897184251,0.0660091189205,0.065862381823,0.0659639690443,0.0659075316992,0.0662913056464,0.066178430956,0.0660429813276,0.065862381823,0.0657269321946,0.0657156447256,0.0656592073804,0.0659978314514,0.0656366324423,0.0656592073804,0.0657607946017,0.0656027700352,0.0657833695398,0.0656366324423,0.0658059444778,0.0659413941063,0.0658059444778,0.0659301066372,0.0658059444778,0.0659188191682,0.0657946570088,0.0659978314514,0.0662010058941,0.0662574432393,0.0653770206545,0.0643837233794,0.0637177627062,0.0630969519093,0.0625438659265,0.0620133548819,0.0612570944565,0.0605685588453,0.0600267603316,0.0592704999062,0.0587399888615,0.0580401657813,0.057317767763,0.0564599201163,0.0558842591955,0.0552521609295,0.0545297629112,0.0536606277955,0.0529495172462,0.0523061315112,0.0514708588026,0.0508839104127,0.0502969620229,0.0495181266594,0.0486489915437,0.0314920386095,0.0312324268216,0.0311985644145,0.0314356012643,0.0312324268216,0.0311534145384,0.0311308396003,0.0311534145384,0.0312550017597,0.0313904513881,0.0312888641668,0.031345301512,0.0311647020074,0.031356588981,0.0314356012643,0.0313227265739,0.0311647020074,0.0311421270694,0.0310744022551,0.031334014043,0.031356588981,0.0314130263262,0.031334014043,0.0312437142907,0.0312888641668,0.0312775766978,0.0315259010166,0.031650063176,0.0316839255831,0.0316274882379,0.031345301512,0.0314243137953,0.0315710508927,0.0316049132998,0.0319322499019,0.0317290754592,0.0316274882379,0.0316049132998,0.0318419501496,0.0318532376186,0.0316274882379,0.0316162007689,0.0318080877425,0.0317855128044,0.0316162007689,0.0316952130521,0.0315823383618,0.0316162007689,0.0318871000257,0.0318871000257,0.0320789869993,0.0321918616897,0.0325079108227,0.0325643481679,0.0326659353892,0.0326997977963,0.0327788100795,0.0328352474247,0.0328013850176,0.0328916847699,0.0330384218673,0.0329594095841,0.0330045594602,0.0328578223628,0.032936834646,0.0329706970531,0.0330158469293,0.0329706970531,0.0328691098318,0.0327788100795,0.0328352474247,0.0328803973009,0.0332077339029,0.0333093211242,0.0330045594602,0.032936834646,0.0328465348937,0.0327900975486,0.0327675226105,0.0327900975486,0.0329029722389,0.0327675226105,0.0326659353892,0.0324966233536,0.0321128494064,0.0322708739729,0.0324514734775,0.0322031491587,0.0318758125567,0.0319322499019,0.0319322499019,0.031966112309,0.0318645250876,0.0318419501496,0.0319209624328,0.0318983874947,0.0318419501496,0.0317516503973,0.031650063176,0.0315033260785,0.0313227265739,0.0311872769455,0.0310969771932,0.0308825152815,0.0308825152815,0.0308035029983,0.0308938027506,0.0308147904673)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("17650-25-FLP-CD25+-PU1ETSHA-aH3K27Ac.50mers.unique.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=217"),bty="n")
dev.off()