# R script for Peak Model
#  -- generated by MACS
p <- c(0.0346070440881,0.0365426132656,0.0386491965872,0.0404914853224,0.0424970148315,0.0446424650041,0.0467101814748,0.0487234843541,0.0505424529787,0.052594622709,0.0546312456989,0.0565434947658,0.0586423047172,0.060632287486,0.0626611371057,0.064674439985,0.0664234482779,0.0684600712678,0.0687476859649,0.0687321392245,0.0687787794456,0.0687321392245,0.0690897142532,0.0694161958012,0.0692218615465,0.0689886604408,0.0693851023205,0.0692451816571,0.069649396907,0.0695561164647,0.0695250229839,0.0695716632051,0.0698748246425,0.0695872099454,0.0698515045319,0.0700225186761,0.0703256801135,0.0702323996712,0.0698670512723,0.0699603317146,0.0697970909406,0.0695949833156,0.0695638898349,0.0691907680657,0.0691363544744,0.0690819408831,0.0688409664071,0.0690197539215,0.0687088191139,0.0687476859649,0.0685533517101,0.0682968304938,0.0683745641957,0.068102496239,0.0683123772342,0.0682346435323,0.0679548022054,0.0678615217631,0.0675350402151,0.0670530912633,0.0673873461815,0.0673717994411,0.0673018391094,0.0676283206574,0.0673407059604,0.0673096124796,0.067123051595,0.0670841847441,0.0668276635278,0.0670219977826,0.0669131705999,0.0667188363451,0.0666177825327,0.0665478222009,0.0667110629749,0.0665478222009,0.0663301678356,0.066345714576,0.0660347797684,0.0662213406529,0.0662446607635,0.0663379412058,0.0663690346866,0.0659959129174,0.0661047401001,0.0657082982204,0.065980366177,0.0661591536914,0.0661980205424,0.0664856352394,0.0663690346866,0.0663923547971,0.0664545417587,0.0667188363451,0.0668276635278,0.066998677672,0.0668820771191,0.0672318787777,0.0673717994411,0.0669909043018,0.0669675841912,0.0671385983354,0.06732515922,0.0672474255181,0.0671852385566,0.0669131705999,0.0667654765663,0.0664778618692,0.0662913009847,0.0665789156817,0.0664623151289,0.0663379412058,0.0665322754606,0.0663612613164,0.0663923547971,0.0662835276145,0.0660036862876,0.0658482188838,0.0657782585521,0.0657549384415,0.0658248987732,0.0661669270616,0.065980366177,0.0659181792155,0.0658093520328,0.0654206835233,0.0654750971147,0.0658793123646,0.0660580998789,0.0657782585521,0.0657393917011,0.06569275148,0.0656461112588,0.0654440036339,0.065327403081,0.0655683775569,0.0657471650713,0.0657316183309,0.0657938052925,0.0658404455136,0.0661047401001,0.0662135672828,0.0661591536914,0.0665322754606,0.0666799694942,0.0665167287202,0.0665478222009,0.0667732499365,0.0670297711528,0.0669520374509,0.0671075048547,0.0668198901576,0.0671075048547,0.0672551988883,0.0676050005469,0.0677682413209,0.0674728532536,0.0672163320373,0.067200785297,0.0670453178931,0.0669909043018,0.0672396521479,0.0673096124796,0.0669520374509,0.0667110629749,0.0665944624221,0.0663223944654,0.0663146210952,0.0665478222009,0.0665245020904,0.0664389950183,0.0664001281673,0.0663845814269,0.0662135672828,0.0662057939126,0.0660969667299,0.0660425531386,0.0660814199895,0.0662213406529,0.0659959129174,0.0658793123646,0.0660036862876,0.0662913009847,0.0663845814269,0.0660891933597,0.0662368873933,0.0662368873933,0.0664623151289,0.0666955162346,0.0662913009847,0.066019233028,0.0658948591049,0.0660036862876,0.0662679808741,0.0660969667299,0.066306847725,0.0663923547971,0.0661669270616,0.0659959129174,0.0661202868405,0.0660969667299,0.0664312216481,0.0667266097153,0.066796570047,0.0667032896048,0.0665245020904,0.0665789156817,0.0665400488308,0.0664934086096,0.0665866890519,0.0663223944654,0.0663146210952,0.0660891933597,0.0662990743549,0.0660347797684,0.0661669270616,0.0662524341337,0.0660658732491,0.0656072444079,0.0655916976675,0.06569275148,0.0654284568935,0.0655528308166,0.0658015786627,0.0655916976675,0.0658248987732,0.0659104058453,0.0663845814269,0.0664467683885,0.0662990743549,0.0663768080568,0.0663923547971,0.0664156749077,0.0664623151289,0.0665711423115,0.0665555955711,0.066633329273,0.0662368873933,0.0663768080568,0.0664156749077,0.0664312216481,0.066672196124,0.0666255559029,0.0664312216481,0.0665400488308,0.0666488760134,0.0666799694942,0.0669753575614,0.0670219977826,0.0670608646335,0.0672318787777,0.0670375445229,0.0670841847441,0.0670375445229,0.0672551988883,0.0669753575614,0.0668043434172,0.066998677672,0.0667110629749,0.0668898504893,0.0670841847441,0.0670686380037,0.0667266097153,0.0664856352394,0.0663690346866,0.0665866890519,0.0665322754606,0.0664312216481,0.06650895535,0.0667188363451,0.0668121167874,0.0669831309316,0.0671541450758,0.0675583603257,0.067690507619,0.0678459750228,0.0677915614314,0.06814136309,0.0681569098304,0.0682501902727,0.0684756180082,0.0689187001091,0.0691519012148,0.0691285811042,0.0694783827628,0.0693928756907,0.0695483430945,0.0698048643108,0.0700613855271,0.0703179067433,0.0702323996712,0.0705666545894,0.071079697022,0.0714839122719,0.0717015666373,0.0718259405603,0.0720435949256,0.0722379291804,0.0727898384639,0.0727976118341,0.0732484673052,0.0733495211176,0.074018030954,0.074507753276,0.0748808750452,0.0751140761509,0.074997475598,0.075036342449,0.0753006370355,0.0754016908479,0.0754094642181,0.0754561044393,0.0755571582517,0.0754561044393,0.0759846936122,0.0765599230063,0.076793124112,0.0767387105207,0.076995231737,0.0769874583668,0.07711960566,0.0773139399148,0.0773605801359,0.0774383138379,0.0773528067658,0.0775471410205,0.0779591296406,0.0781612372656,0.0782389709675,0.0782156508569,0.0784410785924,0.0784099851117,0.0783244780396,0.0785188122943,0.0787286932895,0.0791095884288,0.0790629482077,0.0792961493134,0.0790474014673,0.0790707215779,0.0788142003616,0.0788841606933,0.079482710198,0.0797780982652,0.0798247384863,0.0802211803661,0.0804077412506,0.0807653162794,0.0812006250101,0.0813405456735,0.0813094521927,0.0813327723033,0.0812472652312,0.0811462114187,0.0812628119716,0.0814260527456,0.0814726929667,0.0815115598177,0.0818224946253,0.0821334294329,0.0824288175002,0.0824599109809,0.0825998316443,0.0828641262308,0.0829729534135,0.0832061545192,0.0833849420336,0.0836570099903,0.0839135312065,0.0841467323123,0.0842477861247,0.0844265736391,0.0848929758505,0.0850173497736,0.0855537123167,0.0859190607157,0.0869606923212,0.0872871738692,0.087116159725,0.0875048282346,0.0876836157489,0.0879867771864,0.088297711994,0.0883987658065,0.0886475136526,0.0892849300082,0.0893704370803,0.0895103577437,0.0898679327725,0.0901400007291,0.0904353887964,0.0909251111184,0.0914537002913,0.0917102215076,0.0919822894643,0.0925031052671,0.0928295868151,0.093684657536,0.0941821532282,0.0945630483675,0.0951382777616,0.0957368272663,0.0962887365498,0.0965374843959,0.0968639659439,0.0972992746746,0.0977112632947,0.0981854388763,0.0988150818618,0.0995924188808,0.0995069118087,0.0996856993231,0.0994291781068,0.099926673799,0.100665143967,0.100641823857,0.101271466842,0.101395840765,0.101753415794,0.102056577231,0.102258684856,0.102056577231,0.102592939774,0.103137075688,0.103891092596,0.10444300188,0.104404135029,0.104629562764,0.104645109505,0.105018231274,0.105391353043,0.105539047077,0.106254197134,0.106207556913,0.106666185754,0.10689161349,0.106977120562,0.106992667302,0.107420202663,0.107808871172,0.108438514158,0.10895932996,0.109713346869,0.110125335489,0.110451817037,0.110552870849,0.111353527979,0.111757743229,0.112496213397,0.112877108536,0.113296870527,0.114183034728,0.115030332079,0.116204110978,0.11668605993,0.117548904021,0.118147453526,0.11915021828,0.120013062371,0.121078014087,0.121614376631,0.121847577736,0.122741515308,0.123837560505,0.124684857856,0.12567984924,0.126394999298,0.127086829245,0.127545458086,0.128346115215,0.129185639196,0.129776415331,0.130406058316,0.131331089369,0.132030692686,0.133080097662,0.133958488493,0.134821332584,0.135373241868,0.136445966954,0.137324357786,0.138171655136,0.138653604088,0.139718555804,0.141024481996,0.142143847304,0.142967824544,0.143752934933,0.144398124659,0.144755699688,0.145556356817,0.14606939925,0.147554112956,0.148199302682,0.148634611413,0.149031053292,0.149621829427,0.150811155066,0.152047120926,0.152731177503,0.153578474854,0.154542372758,0.155273069555,0.156058179945,0.156874383815,0.157768321387,0.158429057853,0.159424049237,0.160737748799,0.16156172604,0.162370156539,0.16321745389,0.163660535991,0.164088071351,0.164725487707,0.164818768149,0.165362904063,0.165875946495,0.166917578101,0.167508354235,0.167772648822,0.168091357,0.16850334562,0.169047481533,0.168969747831,0.1693428696,0.170019152807,0.170586608831,0.170337860985,0.170710982754,0.171076331153,0.171418359441,0.171597146955,0.172048002427,0.172156829609,0.172296750273,0.172662098672,0.172724285633,0.172623231821,0.172879753037,0.172700965523,0.172366710604,0.172086869277,0.171698200768,0.171542733364,0.171402812701,0.171200705076,0.170765396345,0.170695436013,0.170594382201,0.17054774198,0.170337860985,0.169521657115,0.1693428696,0.168961974461,0.168604399432,0.168036943408,0.1672829265,0.167314019981,0.166738790586,0.166800977548,0.166443402519,0.16564274539,0.165425091024,0.164608887154,0.16401033765,0.16320190715,0.162486757092,0.161841567366,0.160900989573,0.159820491117,0.158996513877,0.157884921939,0.157154225142,0.156314701161,0.155653964695,0.155187562483,0.154037103695,0.153283086787,0.152715630763,0.151557398604,0.150476900148,0.149575189206,0.148727891855,0.147009977043,0.145424209524,0.144126056702,0.143333172943,0.142555835924,0.141444243987,0.140200504756,0.138521456795,0.137060063199,0.136072845185,0.134160596118,0.132660335671,0.131183395335,0.129659814778,0.128291701624,0.126705934105,0.125718716091,0.124855872,0.123837560505,0.122671554976,0.121497776078,0.120051929222,0.119329005795,0.118085266564,0.116919261035,0.11546564081,0.114455102685,0.11300925583,0.111571182344,0.110809392066,0.109425732172,0.108353007086,0.106868293379,0.105811115033,0.104652882875,0.103416917015,0.103059341986,0.102693993587,0.101574628279,0.100680690707,0.0998567134673,0.0985896541262,0.0978200904774,0.0970893936795,0.096786232242,0.0962576430691,0.095845654449,0.0955269462712,0.0950605440597,0.0943531673724,0.0939878189734,0.0933193091371,0.0929617341083,0.0923398644931,0.0919356492431,0.0912982328875,0.0908940176376,0.0906763632723,0.0900855871378,0.089968986585,0.089564771335,0.0892616098976,0.0890439555323,0.0888107544266,0.0886630603929,0.0884143125468,0.0883054853642,0.0880800576287,0.0884998196189,0.0883598989555,0.0881577913306,0.0882821652536,0.0880567375181,0.0876758423788,0.087605882047,0.0871394798356,0.0867274912155,0.0868596385087,0.0866497575136,0.0864087830377,0.0857635933119,0.0855148454658,0.0852272307687,0.0849085225909,0.0844110268987,0.0844110268987,0.084177825793,0.0840301317594,0.0835093159566,0.0833072083317,0.0830040468943,0.0827786191587,0.0826464718655,0.0825531914232,0.0822733500963,0.0817369875532,0.0817758544042,0.0813172255629,0.0812628119716,0.0810917978274,0.0806564890967,0.0804699282121,0.0801667667747,0.079933565669,0.0795604438999,0.0794282966066,0.07915622865,0.0789463476548,0.0786120927366,0.0784721720732,0.0784099851117,0.0783167046694,0.0785188122943,0.0783866650011,0.0783400247799,0.0785965459962,0.0786975998087,0.0787597867702,0.0787053731789,0.0784099851117,0.0784022117415,0.0782001041165,0.0784177584819,0.0780679568233,0.078262291078,0.0782001041165,0.0786043193664,0.0784799454434,0.0784333052222,0.0784099851117,0.078503265554,0.0785654525155,0.0782234242271,0.0786043193664,0.0786043193664,0.0783555715203,0.0786587329578,0.0785188122943,0.078790880251,0.078666506328,0.0784099851117,0.0784099851117,0.078503265554,0.0779513562704,0.0780835035637,0.0782234242271,0.0783244780396,0.0785343590347,0.0782156508569,0.0780524100829,0.0777492486455,0.0776326480926,0.0775782345013,0.0771118322898,0.0771740192514,0.0771429257706,0.0769719116264,0.0772362062129,0.0768164442226,0.0772517529533,0.077484954059,0.0774383138379,0.0771662458812,0.0772439795831,0.0773761268763,0.0774771806888,0.0773061665446,0.0772439795831,0.0773761268763,0.077158472511,0.0770263252178,0.0773294866552,0.0773683535061,0.0775782345013,0.0773061665446,0.0774072203571,0.0776248747224,0.0775626877609,0.0771273790302,0.0773916736167,0.0773605801359,0.0770418719581,0.0767620306313,0.0763578153814,0.0764821893044,0.0764277757131,0.0762023479776,0.0760857474247,0.0758292262084,0.076179027867,0.0759069599103,0.0757126256556,0.0756815321748,0.0752229033336,0.0751451696317,0.074507753276,0.0740802179156,0.0738159233291,0.0736760026656,0.0734350281897,0.0731396401225,0.0726499178005,0.0727976118341,0.0724400368054,0.0722845694015,0.0719269943728,0.0716626997863,0.0711729774643,0.0707143486231,0.0705277877385,0.0707454421038,0.0703567735943,0.0700536121569,0.06977377083,0.0696882637579,0.0696338501666,0.0694939295032,0.0693695555801,0.0693851023205,0.0693073686186,0.0690275272917,0.0688098729264,0.0692451816571,0.0695949833156,0.0695483430945,0.069284048508,0.0694706093926,0.0696183034262,0.0696416235368,0.0701313458588,0.0702013061905,0.0704966942577,0.0702557197818,0.0702868132626,0.0702557197818,0.070263493152,0.0702090795607,0.0701468925992,0.0699914251953,0.0700847056376,0.0699991985655,0.0702557197818,0.0701080257482,0.0700302920463,0.0699603317146,0.0700458387867,0.069610530056,0.0697426773492,0.06977377083,0.0698981447531,0.0700536121569,0.0697582240896,0.0698825980127,0.0697970909406,0.0699836518252,0.0701468925992,0.0703412268539,0.0704111871856,0.0699836518252,0.0696804903877,0.0694939295032,0.0692995952484,0.0690119805513,0.0688020995562,0.0688409664071,0.0683667908255,0.0683745641957,0.0682890571236,0.0683279239746,0.0680480826477,0.0678770685035,0.067853748393,0.0675816804363,0.067690507619,0.067488399994,0.0677216010997,0.0678848418737,0.067776014691,0.0680636293881,0.0681335897198,0.0683590174553,0.0684600712678,0.0682735103832,0.0684056576765,0.0681724565708,0.068102496239,0.0679858956862,0.0682501902727,0.0680714027583,0.0682346435323,0.0677837880612,0.0674806266238,0.067123051595,0.0673484793306,0.0673717994411,0.067123051595,0.0674573065132,0.0672551988883,0.0672940657392,0.067488399994,0.067123051595,0.0674573065132,0.0673484793306,0.0676438673978,0.0676438673978,0.0677682413209,0.0676438673978,0.0679003886141,0.0677837880612,0.0675739070661,0.0674184396623,0.0672474255181,0.0669909043018,0.0669364907105,0.0669675841912,0.0669753575614,0.066672196124,0.0666177825327,0.0668432102682,0.0665011819798,0.0666022357923,0.0666022357923,0.0667110629749,0.0665789156817,0.0664778618692,0.0663379412058,0.0666177825327,0.0668665303788,0.0669520374509,0.0669287173403,0.0670997314845,0.0672396521479,0.0671075048547,0.0672396521479,0.0672163320373,0.0674573065132,0.067449533143,0.0673484793306,0.0674184396623,0.0671308249652,0.0671852385566,0.0672396521479,0.067612773917,0.0674262130325,0.0679858956862,0.0681258163496,0.0684212044169,0.0683279239746,0.068467844638,0.0683201506044,0.0680480826477,0.0680247625371,0.0679625755756,0.067814881542,0.0677837880612,0.0679314820949,0.0678615217631,0.0678615217631,0.0679003886141,0.0677604679507,0.0679470288352,0.06814136309,0.0680247625371,0.0677293744699,0.0677682413209,0.0674262130325,0.067527266845,0.0675194934748,0.0674573065132,0.0677915614314,0.0679314820949,0.0677915614314,0.0680480826477,0.0680480826477,0.0682501902727,0.0683667908255,0.0684911647486,0.0682346435323,0.0681569098304,0.0679548022054,0.067527266845,0.0676827342488,0.0675972271767,0.0678226549122,0.0677604679507,0.0677993348016,0.067612773917,0.0673717994411,0.067690507619,0.0675739070661,0.067690507619,0.0675739070661,0.0675039467344,0.0673407059604,0.0673018391094,0.0674650798834,0.0675894538065,0.0673329325902,0.0673173858498,0.0675739070661,0.0677604679507,0.0677993348016,0.0677526945805,0.0675739070661,0.0677837880612,0.0676283206574,0.067488399994,0.0673407059604,0.0675972271767,0.0675505869555,0.0672163320373,0.0672318787777,0.0674262130325,0.067814881542,0.0672241054075,0.0675583603257,0.0676982809891,0.0675894538065,0.0676360940276,0.0673795728113,0.0673096124796,0.0676671875084,0.0679625755756,0.0682268701621,0.0682268701621,0.0681646832006,0.068180229941,0.068631085412,0.0689808870706,0.069284048508,0.0694239691714,0.0693306887291,0.0690741675129,0.0694706093926,0.0695949833156,0.0697349039791,0.0696960371281,0.0696882637579,0.06977377083,0.0700536121569,0.0698981447531,0.0695949833156,0.0695483430945,0.0696338501666,0.0696882637579,0.0694395159118,0.0695716632051,0.0696416235368,0.0692685017676,0.0692218615465,0.0697115838685,0.0696727170175,0.0695561164647,0.0697038104983,0.0696338501666,0.0698592779021,0.0700458387867,0.0698981447531,0.0697349039791,0.0697349039791,0.0695794365752,0.06977377083,0.069975878455,0.0699214648636,0.0697426773492,0.0694239691714,0.0690741675129,0.0693151419888,0.0693695555801,0.0689497935898,0.0688098729264,0.0686854990033,0.0688098729264,0.0686777256331,0.0685222582293,0.0683123772342,0.0683667908255,0.0688953799985,0.0692140881763,0.0690586207725,0.0687865528158,0.0689264734792,0.0689731137004,0.0688176462966,0.0690275272917,0.0689187001091,0.0690430740321,0.0691752213253,0.0691285811042,0.0691130343638,0.0692685017676,0.069322915359,0.0695872099454,0.0696027566858,0.0700924790078,0.0700458387867,0.0702168529309,0.0701313458588,0.0695172496137,0.0692918218782,0.0691907680657,0.0691130343638,0.0696882637579,0.0695949833156,0.0695405697243,0.0698359577915,0.0697582240896,0.0697349039791,0.0695172496137,0.0698515045319,0.0697504507194,0.0697815442002,0.06977377083,0.0692918218782,0.0691829946955,0.0695638898349,0.0694317425416,0.0696338501666,0.0694628360224,0.0694939295032,0.0692762751378,0.068996433811,0.0688254196668,0.0686388587822,0.0689187001091,0.0688953799985,0.0688487397773,0.0687165924841,0.0683512440851,0.0681335897198,0.067776014691,0.067939255465,0.067690507619,0.067527266845,0.067776014691,0.0679237087247,0.0682190967919,0.0682890571236,0.0678770685035,0.0678692951333,0.0681180429794,0.0681335897198,0.0679237087247,0.067651640768,0.0678459750228,0.068016989167,0.0677837880612,0.067651640768,0.0676205472872,0.0678459750228,0.0676594141382,0.0673562527008,0.0674339864027,0.0673329325902,0.0674806266238,0.0675117201046,0.0675894538065,0.0678382016526,0.0678226549122,0.0677138277295,0.067853748393,0.0678615217631,0.0677293744699,0.0676360940276,0.0679625755756,0.0682890571236,0.0684989381188,0.0685144848591,0.0686544055226,0.0688876066283,0.0689731137004,0.0687165924841,0.068833193037,0.0689264734792,0.0690508474023,0.0688642865177,0.0686621788928,0.068467844638,0.0687632327052,0.068996433811,0.0688409664071,0.0687165924841,0.068996433811,0.0690897142532,0.0690741675129,0.0688953799985,0.0686233120418,0.0687088191139,0.0688098729264,0.0687321392245,0.0687787794456,0.0687476859649,0.0686544055226,0.0685533517101,0.0686466321524,0.0687321392245,0.0686077653014,0.0687399125947,0.0688642865177,0.0670997314845,0.0649698280523,0.0628554713605,0.0608343951109,0.0588599590825,0.056963256756,0.055004367468,0.0532009455838,0.0514208438102,0.0492598468973,0.0474253315323,0.0455053090952,0.0437485274322,0.0418673718461,0.0400095363705,0.0380972873037,0.0362161317176,0.0342883359103)
m <- c(0.0345136698176,0.0364061047469,0.0383916102465,0.0401909746055,0.0421687242243,0.0441542297239,0.0460311528915,0.0478305172506,0.049660905133,0.0515300724198,0.053756010226,0.0556406892744,0.0575021006803,0.0594178032522,0.0612094117304,0.0631018466597,0.0650253051125,0.0667471106629,0.0668867165184,0.0667393547821,0.0667393547821,0.0666773077352,0.0662041990029,0.0665144342372,0.0663438048583,0.0667160871395,0.0666695518543,0.0666928194969,0.0666385283309,0.0669720312078,0.0671504164675,0.0669797870887,0.0666540400926,0.0666540400926,0.0665609695223,0.0667238430204,0.0667626224246,0.0667703783055,0.0669099841609,0.0669022282801,0.0667936459481,0.0669022282801,0.0667858900672,0.0668556929949,0.0672667546804,0.0673830928933,0.0670495900164,0.0672202193953,0.0671581723484,0.0672667546804,0.0674063605358,0.0675149428679,0.0676933281276,0.0681664368599,0.0684456485708,0.0687171044008,0.0689342690648,0.0689885602309,0.069197969014,0.0690816308011,0.0694073777972,0.0692057248949,0.0695004483675,0.0698649747678,0.0699813129807,0.0699502894572,0.0698106836018,0.0703691070236,0.0707491451856,0.0709197745645,0.0711602068711,0.0710283568965,0.0709507980879,0.0708732392793,0.0704854452364,0.0705474922833,0.0706017834493,0.0702062335255,0.0701674541213,0.070020092385,0.0697176130315,0.0696012748186,0.0695469836526,0.0694926924866,0.0694384013206,0.069469424844,0.0695547395335,0.0696865895081,0.0696167865803,0.0691514337289,0.0691747013714,0.0690506072777,0.0689187573031,0.0688567102563,0.068926513184,0.0687946632094,0.0683758456431,0.068600766188,0.068546475022,0.0684766720942,0.0685154514985,0.0684068691665,0.0682207280259,0.0678019104596,0.0677708869362,0.0673908487741,0.0674994311061,0.0677553751744,0.0681974603833,0.0681741927408,0.068546475022,0.0684844279751,0.0682905309536,0.0683913574048,0.068546475022,0.0688411984946,0.0686860808774,0.0687946632094,0.0688411984946,0.0689652925883,0.0690506072777,0.0688334426137,0.0687481279243,0.0684999397368,0.0684068691665,0.0682905309536,0.0681354133365,0.0681586809791,0.0681043898131,0.0683060427154,0.0684611603325,0.0685232073794,0.0687171044008,0.0688877337797,0.0686473014731,0.0685309632602,0.0683137985962,0.0683913574048,0.068600766188,0.0684844279751,0.0685232073794,0.0686628132348,0.0684921838559,0.0684223809282,0.0681354133365,0.0682284839068,0.0679182486725,0.0682827750728,0.0682905309536,0.0684766720942,0.0683525780005,0.0683215544771,0.0682672633111,0.0682362397876,0.0682284839068,0.0680423427662,0.0677863986979,0.0677863986979,0.0673753370124,0.0674761634636,0.0673753370124,0.0675459663913,0.0675226987487,0.0676312810807,0.0676933281276,0.0674761634636,0.067615769319,0.0679337604342,0.0678794692682,0.0676467928424,0.0674684075827,0.0676002575573,0.0674606517018,0.067507186987,0.0675459663913,0.0678639575065,0.0676545487233,0.067561478153,0.0675692340339,0.0674296281784,0.0672124635144,0.067181439991,0.067235731157,0.0667936459481,0.0668867165184,0.0668169135906,0.0669487635652,0.0669487635652,0.0670883694207,0.0671193929441,0.0670340782547,0.0668867165184,0.0672279752761,0.0670418341355,0.067452895821,0.067398604655,0.067344313489,0.0673365576081,0.0672047076335,0.0672745105613,0.0673753370124,0.0673908487741,0.0669797870887,0.0664523871903,0.066467898952,0.0663903401435,0.0665919930458,0.0666773077352,0.0668401812332,0.0668867165184,0.0667936459481,0.0665377018798,0.0663980960243,0.0663205372157,0.0659637666963,0.0661266401943,0.0663438048583,0.0664989224755,0.0665764812841,0.0668091577098,0.0668479371141,0.0667393547821,0.0665842371649,0.0664058519052,0.0664756548329,0.0665066783563,0.0665299459989,0.0666617959735,0.0664291195478,0.0665687254032,0.0664446313095,0.0663360489775,0.0664058519052,0.0666307724501,0.0665609695223,0.0664601430712,0.0664291195478,0.0663205372157,0.066522190118,0.0665299459989,0.0665687254032,0.0669099841609,0.0669177400418,0.0666462842118,0.0666695518543,0.0665687254032,0.066522190118,0.0662740019306,0.0664446313095,0.0665687254032,0.0668789606375,0.0667393547821,0.0667393547821,0.066467898952,0.0663903401435,0.0661188843134,0.0662274666454,0.0663282930966,0.0664368754286,0.0663825842626,0.0664058519052,0.0662740019306,0.0664756548329,0.0663748283817,0.0664601430712,0.0665997489266,0.0666462842118,0.0668712047567,0.0667160871395,0.0666850636161,0.0667858900672,0.0665532136415,0.0664834107138,0.0667160871395,0.0664911665946,0.0666152606883,0.0667781341864,0.0665609695223,0.0664601430712,0.0666462842118,0.0668169135906,0.0669254959227,0.0670108106121,0.0674296281784,0.0675226987487,0.0676778163659,0.0673675811316,0.0675304546296,0.0675459663913,0.0674839193444,0.0673520693698,0.067344313489,0.0674218722976,0.0673365576081,0.0673365576081,0.0676545487233,0.067615769319,0.0677398634127,0.067724351651,0.0679647839576,0.0682517515494,0.068050098647,0.0680656104088,0.0678174222213,0.0680268310045,0.0678174222213,0.0677941545787,0.0681741927408,0.0682439956685,0.0683293103579,0.0683603338814,0.0682750191919,0.0681121456939,0.0678174222213,0.067724351651,0.0675459663913,0.067181439991,0.0670108106121,0.0669952988504,0.0670806135398,0.0670883694207,0.0672589987995,0.0673210458464,0.0669797870887,0.0667160871395,0.0669952988504,0.0671426605867,0.0673520693698,0.067235731157,0.0674218722976,0.0672745105613,0.0671504164675,0.0670263223738,0.0670573458972,0.0669952988504,0.0665299459989,0.0663515607392,0.0666540400926,0.0665454577606,0.0667160871395,0.0667936459481,0.0670651017781,0.0670495900164,0.0666850636161,0.0666230165692,0.0664213636669,0.0667238430204,0.0667858900672,0.0669332518035,0.0674218722976,0.0675226987487,0.0676623046042,0.0677321075319,0.0678562016256,0.0678174222213,0.0676933281276,0.0676623046042,0.0674063605358,0.0676855722467,0.0678949810299,0.0683836015239,0.0682129721451,0.0684378926899,0.0685774985454,0.0687171044008,0.0684068691665,0.0683448221196,0.0682284839068,0.0681819486216,0.067778642817,0.0676312810807,0.0679027369107,0.0680423427662,0.0680113192428,0.0680268310045,0.0682439956685,0.0683758456431,0.0682595074302,0.0685852544262,0.0685852544262,0.0686317897114,0.0685542309028,0.0683836015239,0.0686240338305,0.0682129721451,0.0681819486216,0.0683836015239,0.0685852544262,0.0684844279751,0.0686240338305,0.0687791514477,0.0687869073285,0.0687481279243,0.0690195837543,0.0688954896606,0.0690195837543,0.0690816308011,0.0691126543246,0.0691669454906,0.0692367484183,0.0692212366566,0.0692445042992,0.0697098571506,0.0697331247932,0.0699347776955,0.0701364305978,0.0702993040958,0.0704932011173,0.0705164687599,0.0704932011173,0.0707181216622,0.0704466658321,0.0702682805724,0.0703768629044,0.0702605246915,0.0705785158067,0.070563004045,0.0706560746153,0.0706793422579,0.0707336334239,0.0711446951093,0.070780168709,0.070617295211,0.0705552481641,0.0708034363516,0.070725877543,0.0709042628027,0.0708732392793,0.0710050892539,0.0706870981387,0.0706328069727,0.0703846187853,0.0704311540704,0.0705940275684,0.0705242246407,0.0702450129298,0.0700821394318,0.0703613511427,0.0703303276193,0.0706017834493,0.0710438686582,0.0713385921308,0.0716720950077,0.0716488273651,0.0720133537654,0.0717496538163,0.0718272126248,0.0720521331697,0.0720288655271,0.0722227625486,0.072253786072,0.0723778801657,0.0724089036892,0.0727579183278,0.0728509888981,0.0730836653238,0.0730603976812,0.0734481917241,0.0736033093413,0.0735955534604,0.0737739387202,0.0737351593159,0.0738437416479,0.0739368122182,0.0740298827885,0.0743866533079,0.0747434238274,0.0751699972746,0.0752165325597,0.0752785796066,0.0752320443214,0.0754104295812,0.0757051530538,0.0756431060069,0.0755655471983,0.0755810589601,0.0754026737003,0.0755733030792,0.0753949178195,0.0755888148409,0.075526767794,0.0759688530029,0.0760464118115,0.076240308833,0.0765272764247,0.0765350323056,0.0764729852587,0.076403182331,0.0765815675907,0.0764962529013,0.0769771175145,0.0769538498719,0.0771632586551,0.0774269586042,0.0775898321022,0.0775898321022,0.077551052698,0.0778147526471,0.0776906585534,0.0781870349283,0.0783421525455,0.0784895142818,0.0783964437115,0.0782258143326,0.0779155790983,0.0782258143326,0.0784041995923,0.0788152612778,0.0790014024184,0.0795520699593,0.0796606522913,0.0796684081722,0.0798002581467,0.0797692346233,0.0798467934319,0.080001911049,0.0799708875256,0.0802966345216,0.0804672639005,0.0805370668282,0.0805603344708,0.0806456491602,0.0812350961054,0.0813436784375,0.0816228901483,0.0815220636972,0.0815065519355,0.0814289931269,0.0815841107441,0.0815685989823,0.0819874165487,0.0825923752556,0.0828017840387,0.0830809957496,0.0836549309331,0.0836316632905,0.0841047720229,0.0842288661166,0.0847019748489,0.0853689806027,0.0858498452159,0.0859661834288,0.0863850009951,0.0865478744931,0.0869046450126,0.0867883067997,0.0868658656083,0.0873855096257,0.0875561390046,0.0879051536432,0.0881533418307,0.0883782623756,0.0886497182056,0.088735032895,0.0889677093208,0.0892081416273,0.0896502268362,0.0902241620197,0.0902319179006,0.0906895148712,0.0911781353653,0.092008014617,0.0925199027537,0.0933885614097,0.0941486377338,0.094683793513,0.0950483199133,0.0956377668585,0.0963590637783,0.0971346518641,0.0974448870984,0.0979722869968,0.0984764192525,0.0992442514574,0.0997251160706,0.100275783612,0.100787671748,0.101819203902,0.102470697894,0.102982586031,0.103471206525,0.104471715156,0.105604073761,0.106472732417,0.107256076384,0.108163514444,0.109691422973,0.110940119791,0.112165548967,0.113561607521,0.115066248408,0.116586401056,0.117935924325,0.118866630028,0.120619459102,0.121852644158,0.122985002763,0.124202676058,0.125117869999,0.126366566817,0.127452390138,0.128654551671,0.130228995485,0.131392377613,0.132586783265,0.133641583062,0.134835988714,0.136069173771,0.137077438282,0.138046923389,0.139466249586,0.140373687647,0.14157584918,0.142351437266,0.14384056639,0.145027216162,0.146252645337,0.147129059874,0.14836224493,0.148835353663,0.149828106413,0.150960465018,0.151456841393,0.151960973648,0.1527908529,0.153612976271,0.153977502672,0.154745334876,0.155458875915,0.156211196359,0.156754108019,0.157359066726,0.157863198981,0.158739613518,0.159949530932,0.160407127903,0.160880236635,0.161857477623,0.162253027547,0.162477948092,0.163199245012,0.164044636025,0.164921050562,0.16526230932,0.165704394529,0.16634813264,0.166573053185,0.167092697202,0.167922576454,0.168597338089,0.168504267518,0.16906269094,0.169054935059,0.169830523145,0.170024420166,0.17096288175,0.171544572815,0.1715911081,0.171730713955,0.171878075692,0.171885831572,0.171513549291,0.171746225717,0.170916346465,0.170854299418,0.17077674061,0.170559575946,0.171001661155,0.171024928797,0.170807764133,0.170070955452,0.169884814311,0.169628870243,0.168806746872,0.168411196948,0.168442220471,0.167806238241,0.166945335466,0.166138723857,0.165417426937,0.165595812197,0.16517699463,0.164626327089,0.164153218357,0.163385386152,0.162788183326,0.162508971615,0.16191952467,0.161547242389,0.160414883784,0.159972798575,0.159065360514,0.158196701858,0.157483160819,0.156661037448,0.156025055218,0.15522619949,0.154714311353,0.154078329123,0.153597464509,0.152565932355,0.151922194244,0.150898417971,0.149874641698,0.148936180114,0.147920159722,0.147268665729,0.146330204146,0.145632174868,0.144693713285,0.143910369318,0.142902104806,0.142397972551,0.141901596176,0.141141519852,0.140916599307,0.139621367204,0.138667393858,0.138171017483,0.137310114708,0.136612085431,0.135642600323,0.134580044646,0.13371138599,0.132710877359,0.132074895129,0.131175212949,0.130306554293,0.129631792659,0.128747622241,0.128158175296,0.127739357729,0.127126643142,0.126762116741,0.126087355107,0.125994284536,0.125187672927,0.124621493624,0.124350037794,0.123938976109,0.123504646781,0.122891932193,0.122473114627,0.122186147035,0.121790597111,0.121627723613,0.121038276668,0.12023942094,0.119471588735,0.119006235883,0.118308206606,0.117951436087,0.117299942095,0.116780298077,0.116252898179,0.11590388354,0.115244633667,0.114709477888,0.114577627913,0.114220857394,0.114042472134,0.113662433972,0.113321175215,0.11310401055,0.112677437103,0.112413737154,0.111963896064,0.111165040336,0.110978899195,0.110459255178,0.109893075875,0.109319140692,0.109613864164,0.109334652454,0.108977881934,0.108078199755,0.107736940997,0.107504264571,0.107023399958,0.106558047106,0.106286591276,0.106038403089,0.105697144331,0.105604073761,0.105340373812,0.104843997437,0.104999115054,0.104448447513,0.104215771087,0.103835732925,0.103385891836,0.102920538984,0.102819712533,0.102749909605,0.102051880328,0.101462433383,0.100772159986,0.0998879895687,0.0993916131937,0.0987090956783,0.0983213016354,0.0979490193542,0.0975612253113,0.097142407745,0.0966615431318,0.0962504814463,0.0957075697863,0.0952189492922,0.094466628849,0.0939935201167,0.0934661202183,0.0930705702946,0.0928689173923,0.0921786439959,0.0917986058339,0.0913410088633,0.0905499090158,0.09004577676,0.0896812503597,0.0893399916019,0.0886884976099,0.088192121235,0.0875871625281,0.0875251154812,0.0873544861023,0.0872691714129,0.0870054714637,0.0869666920594,0.0866487009442,0.0862609069014,0.0861600804502,0.0859584275479,0.0860127187139,0.0861057892842,0.0860437422373,0.086059253999,0.0858033099307,0.0857567746456,0.0857257511222,0.0858886246202,0.0858033099307,0.085462051173,0.0856637040753,0.0856947275987,0.0856404364327,0.0853922482453,0.0851595718195,0.0852293747473,0.0848726042278,0.0849036277512,0.0847562660149,0.0847407542532,0.0846089042786,0.0846321719212,0.0846244160403,0.0844460307806,0.0845080778275,0.0848338248235,0.0844692984232,0.0841823308314,0.0836704426948,0.0832438692476,0.0831430427965,0.0827009575876,0.082677689945,0.0824760370427,0.0823752105916,0.0822666282595,0.0821580459275,0.0825613517321,0.0821735576893,0.0820494635955,0.0820572194764,0.0816384019101,0.0815375754589,0.0813747019609,0.0812428519863,0.0809791520371,0.0805680903517,0.0796606522913,0.079567581721,0.0797149434573,0.0797071875764,0.0796684081722,0.0796684081722,0.0792806141293,0.0790944729887,0.0786368760181,0.0785748289712,0.0779233349791,0.0776208556257,0.0776673909108,0.0772640851062,0.0766668822802,0.0768064881356,0.0763256235224,0.0765350323056,0.0765505440673,0.0761162147392,0.0761084588584,0.0756896412921,0.0755965707218,0.0751622413937,0.0751234619894,0.0747899591125,0.0741151974779,0.0739057886947,0.0735955534604,0.0731379564898,0.0732853182261,0.0729983506344,0.0726570918766,0.0723391007615,0.0725174860212,0.0723235889997,0.0727734300895,0.0725640213063,0.0722692978337,0.0718970155526,0.0716643391268,0.0712687892031,0.0715402450331,0.0713385921308,0.0713696156542,0.0712144980371,0.0713230803691,0.0714239068202,0.0712532774414,0.0715635126757,0.0712687892031,0.0707413893047,0.070780168709,0.070508712879,0.0703070599767,0.0704389099513,0.0704311540704,0.0703148158575,0.0701364305978,0.070345839381,0.070508712879,0.0704466658321,0.0705164687599,0.070671586377,0.0706095393301,0.0707569010664,0.0704699334747,0.0704932011173,0.0706948540196,0.0707569010664,0.0705397364024,0.0704621775938,0.0700976511935,0.0701441864787,0.0698572188869,0.0699270218147,0.0698572188869,0.0699192659338,0.0698572188869,0.0698572188869,0.0698804865295,0.0697408806741,0.0694926924866,0.0689652925883,0.0687869073285,0.0687481279243,0.0689963161117,0.0691281660863,0.0689187573031,0.0690816308011,0.0690661190394,0.0689342690648,0.0688567102563,0.06870934852,0.0685387191411,0.0686395455922,0.0683836015239,0.0686705691157,0.0687248602817,0.0686860808774,0.068817930852,0.0689497808266,0.0688954896606,0.0688024190903,0.0684844279751,0.0680035633619,0.0680423427662,0.0680423427662,0.0682129721451,0.0682750191919,0.0682284839068,0.0683060427154,0.0679880516002,0.0680656104088,0.0679570280768,0.067941516315,0.0676312810807,0.067670060485,0.0679880516002,0.0682207280259,0.0679337604342,0.0675304546296,0.0677708869362,0.0678406898639,0.0680656104088,0.0678794692682,0.0679260045533,0.0681199015748,0.0681819486216,0.0682982868345,0.0683293103579,0.0679104927916,0.067887225149,0.0677165957702,0.0677165957702,0.0676855722467,0.0678484457447,0.0675382105104,0.0675692340339,0.0675537222721,0.0677863986979,0.0679880516002,0.0677863986979,0.0676933281276,0.0674218722976,0.0670573458972,0.0670883694207,0.0668401812332,0.0671891958718,0.0670495900164,0.067235731157,0.067127148825,0.0674296281784,0.067290022323,0.0669487635652,0.0668401812332,0.0667548665438,0.0669177400418,0.06635931662,0.0663205372157,0.066413607786,0.0663438048583,0.0662197107646,0.0658551843643,0.0654441226788,0.06554494913,0.0656225079385,0.0657233343897,0.0655371932491,0.0653820756319,0.0651571550871,0.0646918022356,0.0643195199544,0.0642264493841,0.0643350317161,0.0645366846184,0.0643660552396,0.0643350317161,0.0644125905247,0.0646995581164,0.0650175492316,0.0651959344913,0.0652734932999,0.0654673903214,0.0653743197511,0.0653122727042,0.0652347138956,0.0653743197511,0.0652967609425,0.0654829020831,0.0656767991045,0.0657931373174,0.0660258137431,0.0662119548837,0.0660801049091,0.0659482549346,0.0658241608408,0.0661343960752,0.0663205372157,0.0664213636669,0.0667315989012,0.0665532136415,0.0664756548329,0.0663205372157,0.0662662460497,0.0666152606883,0.0667393547821,0.0672667546804,0.0672434870378,0.0673753370124,0.067181439991,0.0670340782547,0.0669797870887,0.067072857659,0.0670883694207,0.0670806135398,0.0669565194461,0.0668479371141,0.0669254959227,0.0669332518035,0.0670108106121,0.0669487635652,0.0669952988504,0.0670806135398,0.067290022323,0.0672667546804,0.067235731157,0.0673598252507,0.0673132899655,0.0672745105613,0.0674684075827,0.0676623046042,0.067670060485,0.0672822664421,0.0671193929441,0.067127148825,0.067290022323,0.0675226987487,0.0676390369616,0.0677941545787,0.0680966339322,0.0677165957702,0.067887225149,0.067615769319,0.0678096663405,0.0679260045533,0.067995807481,0.0682129721451,0.0683060427154,0.0682284839068,0.0680811221705,0.0679027369107,0.0681121456939,0.0682052162642,0.0680656104088,0.0680656104088,0.0681897045025,0.0684378926899,0.0683758456431,0.0682362397876,0.0678717133873,0.0678562016256,0.0678562016256,0.0679027369107,0.0679647839576,0.0677708869362,0.0680190751236,0.0681741927408,0.0681043898131,0.0683448221196,0.068546475022,0.0684223809282,0.0681199015748,0.0677476192936,0.0676855722467,0.0677321075319,0.0675537222721,0.0676467928424,0.0674451399401,0.0674373840593,0.0674916752253,0.0676623046042,0.0677631310553,0.067452895821,0.0673598252507,0.067235731157,0.0674994311061,0.0675925016764,0.0675847457956,0.0676312810807,0.0675847457956,0.0674141164167,0.0672745105613,0.0670961253015,0.0669720312078,0.0670108106121,0.0672047076335,0.067398604655,0.0672977782038,0.0671349047058,0.0672589987995,0.067561478153,0.0673520693698,0.0674063605358,0.0655371932491,0.0635284201069,0.0615274028456,0.059813353176,0.0580450123404,0.0563852538368,0.0545471100735,0.0526391633824,0.0508087755,0.0490326787835,0.0472255585436,0.0454649735889,0.0435260033744,0.0414164037811,0.0394929453283,0.0376858250884,0.0358942166103,0.034218946345)
s <- c(0.0360216165224,0.0361750202463,0.036364756431,0.0364253105325,0.0364091627721,0.0363364978503,0.0366271575376,0.0368249676025,0.0369137802848,0.0370389254279,0.0369702974462,0.0369299280452,0.0368895586442,0.0366877116391,0.0367200071599,0.0367482657406,0.0365423817955,0.036522197095,0.036445495233,0.0362880545691,0.0362275004676,0.0361992418869,0.0361709833062,0.0361427247255,0.0361588724859,0.036203278827,0.0362719068087,0.0362355743478,0.0359933579417,0.036005468762,0.0359408777204,0.0358722497387,0.0358399542179,0.0358762866788,0.0358076586971,0.0355896639316,0.0357067351945,0.0356784766138,0.0356421441529,0.0356623288534,0.035605811692,0.0355089251296,0.0352909303641,0.0352747826037,0.0350769725388,0.0351334897002,0.0352667087235,0.0354968143093,0.035484703489,0.0356784766138,0.035646181093,0.0355452575905,0.0355977378118,0.0356784766138,0.0358318803377,0.0357511415356,0.0358076586971,0.0358318803377,0.0358964713793,0.0359408777204,0.0358278433976,0.0537558943867,0.0546319103886,0.0556774778748,0.0565736785773,0.0575344703214,0.0586607766096,0.0597063440958,0.0608568720246,0.0618822548103,0.0629803025178,0.0641389043268,0.0652208042739,0.0661856329581,0.0671585355225,0.068099142566,0.0691850794532,0.0702023883587,0.0711995125637,0.071369064048,0.0714336550896,0.071369064048,0.0713085099464,0.0713448424073,0.0715628371728,0.0713004360662,0.071369064048,0.0715789849332,0.0716032065738,0.0717485364175,0.0716839453758,0.0716395390347,0.0716476129149,0.0718010166388,0.0715547632926,0.0715588002327,0.0716476129149,0.0715910957535,0.0715951326936,0.0713529162875,0.071490172251,0.0713932856886,0.0713448424073,0.0713609901677,0.0710541827201,0.0710985890612,0.0712358450246,0.0710824413008,0.0710541827201,0.0707998554937,0.0708886681759,0.0707150797516,0.0706060823688,0.0706666364704,0.070690858111,0.070690858111,0.0706020454287,0.0704607525252,0.0703396443222,0.0700570585151,0.0697906204684,0.0699924674735,0.0697542880075,0.0697663988278,0.0698996178511,0.0698188790491,0.0698027312887,0.0697785096481,0.069774472708,0.0695968473436,0.0696210689842,0.0697421771872,0.0695443671222,0.0697058447263,0.0696412536847,0.0696977708461,0.0696089581639,0.0694272958593,0.0694717022004,0.0693627048177,0.0694676652603,0.0692658182553,0.0690397496096,0.0690639712502,0.0688298287243,0.0689913063284,0.0688298287243,0.06905589737,0.0691729686329,0.0691447100522,0.0691608578126,0.0690276387893,0.0689993802086,0.0688459764847,0.0690680081903,0.0692375596746,0.0694071111588,0.0693869264583,0.0696896969659,0.0697825465882,0.0695282193618,0.0694353697395,0.0694313327994,0.0695645518227,0.0695403301821,0.0695201454816,0.0694474805598,0.0692496704949,0.0691729686329,0.0690114910289,0.0691043406512,0.0690801190106,0.0691325992319,0.0691971902735,0.06905589737,0.06905589737,0.0689428630472,0.0689024936462,0.0688257917842,0.0688096440238,0.068975158568,0.069015527969,0.0690518604299,0.0689670846878,0.0688823089457,0.0688015701436,0.0684705410553,0.0685876123183,0.0688621242451,0.0691164514715,0.0688984567061,0.0688782720056,0.0687127574614,0.0686481664198,0.0684019130736,0.0683978761335,0.068575501498,0.0687248682817,0.0686885358208,0.0687329421619,0.0686885358208,0.0689307522269,0.068934789167,0.0689509369274,0.069217374974,0.0693182984766,0.0693505939974,0.0692860029558,0.0693869264583,0.0695726257029,0.0694111480989,0.06945555444,0.0694272958593,0.0694595913801,0.0696008842837,0.0698673223303,0.0698390637496,0.0696331798045,0.0695968473436,0.0696775861456,0.069653364505,0.0696695122654,0.0700166891141,0.0701014648562,0.0699965044136,0.0697098816664,0.069734103307,0.0696008842837,0.0695645518227,0.0696170320441,0.0696008842837,0.0695968473436,0.0695322563019,0.0695241824217,0.0696008842837,0.069576662643,0.0695847365233,0.0695484040623,0.069693733906,0.0699157656115,0.069693733906,0.0696412536847,0.069576662643,0.0698350268095,0.069774472708,0.0696089581639,0.0698834700907,0.0699198025516,0.0700812801557,0.0702185361191,0.0699642088928,0.0697381402471,0.0695201454816,0.0695282193618,0.0695726257029,0.069294076836,0.0693142615365,0.0693505939974,0.0692779290756,0.0691931533334,0.0693465570573,0.0693667417578,0.0693627048177,0.0693788525781,0.0695605148826,0.0695887734634,0.0696049212238,0.0695726257029,0.0696493275649,0.0695484040623,0.0695322563019,0.0693304092969,0.0693425201172,0.0691931533334,0.0690599343101,0.0688298287243,0.06905589737,0.0690437865497,0.0690357126695,0.0688379026045,0.0689711216279,0.069015527969,0.0686885358208,0.0687208313416,0.0687450529822,0.0687934962634,0.0689468999873,0.0690680081903,0.0695685887628,0.069653364505,0.0696493275649,0.0697260294268,0.0697986943486,0.0697906204684,0.0697502510674,0.0697906204684,0.0696493275649,0.0698350268095,0.0697381402471,0.0700651323953,0.0699965044136,0.0701216495567,0.0703194596217,0.0703679029029,0.0701055017963,0.0701297234369,0.0701256864968,0.0701176126166,0.0700610954552,0.0700086152339,0.0701700928379,0.070331570442,0.070214499179,0.0702467946998,0.0703356073821,0.0705172696866,0.0703113857415,0.0703921245435,0.070493048046,0.0703679029029,0.0704203831242,0.0704324939445,0.0705495652074,0.0701579820176,0.0700166891141,0.0700610954552,0.0702790902206,0.0701983514186,0.0702185361191,0.0703396443222,0.070452678645,0.0704809372257,0.0707110428115,0.0707352644521,0.071009776379,0.0711106998815,0.0712075864439,0.0712075864439,0.0714255812094,0.0714255812094,0.0714861353109,0.0718454229799,0.072087639386,0.0723137080316,0.0724065576539,0.0726729957006,0.072729512862,0.0728223624844,0.0729434706874,0.0731937609737,0.0731856870935,0.07304843113,0.0732785367158,0.0734844206609,0.0738598560904,0.073964816533,0.0740778508558,0.0742029959989,0.0743321780822,0.0748327586547,0.0746470594101,0.0747964261938,0.0748166108943,0.0752929698263,0.0755069276516,0.0757935503988,0.0758985108414,0.0759065847216,0.075761254878,0.0758702522607,0.0757935503988,0.0758218089795,0.0759308063622,0.0759469541226,0.0757491440577,0.0759388802424,0.0763829436536,0.0764879040962,0.076600938419,0.0769642630281,0.0771136298119,0.0773558462179,0.0774446589002,0.0776586167255,0.0775617301631,0.077557693223,0.0777756879885,0.0779775349935,0.0781834189387,0.0782399361001,0.0782924163214,0.0784256353447,0.0785911498889,0.078595186829,0.0788172185345,0.078914105097,0.079313762167,0.0793702793284,0.0794873505913,0.0794510181304,0.0794429442502,0.0793662423883,0.0794510181304,0.0798103057994,0.0801494087679,0.0803593296532,0.0807872453039,0.0809083535069,0.0811263482724,0.0813281952775,0.0814937098216,0.081630965785,0.0816107810845,0.0815260053424,0.0814815990013,0.0814493034805,0.0816228919048,0.0815542639231,0.0816753721261,0.0818045542094,0.0821961373992,0.082389910524,0.082506981787,0.0827290134925,0.0828703063961,0.0828945280367,0.0829793037788,0.0831650030235,0.0832618895859,0.0836453988955,0.0837543962782,0.0839158738823,0.084145979468,0.0844729716162,0.0845375626579,0.0847959268243,0.0851229189725,0.0855992779045,0.0860271935552,0.086019119675,0.0862976685419,0.0863420748831,0.0864107028648,0.0864107028648,0.0866246606901,0.0868466923957,0.0873916793094,0.0875329722129,0.0878922598819,0.088134476288,0.0882798061316,0.0885018378372,0.0887400173031,0.089054898631,0.0892688564564,0.0893940015995,0.0898340280705,0.090092392237,0.090572788109,0.0908432630958,0.0910854795019,0.0916910205171,0.0920583820663,0.0924903346571,0.092567036519,0.0927285141231,0.0929142133677,0.0932089099951,0.0934470894611,0.0939920763747,0.0947106517127,0.0947752427543,0.0950134222203,0.0951789367644,0.0954251901106,0.0960549527664,0.0961074329877,0.0966806784821,0.0970924463724,0.0975284359033,0.0977464306688,0.0980693858769,0.0980492011763,0.098513449288,0.0987354809935,0.0991674335844,0.0997245313183,0.0997931593,0.100091892868,0.100229148831,0.100539993219,0.100875059247,0.10099616745,0.101488674143,0.101589597645,0.102057882697,0.102473687527,0.102522130808,0.102768384155,0.103244743087,0.103878542682,0.104471972877,0.105194585155,0.105981788475,0.106474295167,0.106833582836,0.107192870505,0.107984110765,0.108597725661,0.109142712574,0.109615034566,0.110095430438,0.11095529868,0.111645615437,0.112541816139,0.113058544472,0.114043557857,0.114693505213,0.115480708533,0.116183136111,0.117256962178,0.118124904299,0.118698149794,0.119570128855,0.120611659402,0.121846963073,0.123013638762,0.124022873787,0.125108810674,0.12613015652,0.12733720161,0.128475618719,0.129266858978,0.130506199589,0.131628468938,0.132581186801,0.133759973311,0.134692506474,0.135790554182,0.136642348543,0.137825171993,0.139100845065,0.140146412551,0.141018391613,0.14212047626,0.143420370973,0.144643563824,0.145596281688,0.14650863015,0.147582456217,0.148240477454,0.149282008,0.149952140057,0.151498288115,0.152451005979,0.153314911161,0.153976969337,0.154925650261,0.155789555443,0.156948157252,0.157892801236,0.158591191873,0.159354173552,0.160165598513,0.161001245113,0.161614860009,0.16247876519,0.163193303588,0.164101615111,0.165066443795,0.165809240774,0.166491483651,0.167387684353,0.168247552595,0.168707763767,0.169285046201,0.169842143935,0.170330613687,0.170714122997,0.1716305084,0.172377342318,0.172970772513,0.173313912422,0.173757975833,0.174375627668,0.17445232953,0.174916577642,0.175699744022,0.176345654438,0.176168029073,0.176652461886,0.17683816113,0.177419480505,0.17761325363,0.178335865908,0.178695153577,0.178792040139,0.179054441246,0.179163438628,0.179114995347,0.179054441246,0.179082699826,0.178477158811,0.178299533447,0.178057317041,0.177863543916,0.17802098458,0.177928134957,0.177589031989,0.177169190218,0.177019823435,0.176862382771,0.176325469737,0.175695707082,0.17561900522,0.175090166066,0.174456366471,0.173741828073,0.172974809453,0.173083806836,0.172567078503,0.172312751277,0.171880798686,0.171065336786,0.170641458075,0.170072249521,0.169454597685,0.16884098279,0.167880191046,0.167315019432,0.166354227688,0.165340955722,0.164541641582,0.163536443497,0.162825942039,0.161974147678,0.161364569723,0.160791324228,0.159943566807,0.159015070584,0.158385307928,0.157250927759,0.156156916992,0.155200162188,0.154231296564,0.153000029833,0.1516880243,0.150650530694,0.149750293052,0.148938868091,0.147836783444,0.146928471921,0.145798128693,0.144643563824,0.144013801168,0.142346544906,0.141070871834,0.140045489048,0.138806148437,0.13773232237,0.136404169077,0.135338416891,0.134438179248,0.133388574822,0.132452004718,0.131374141711,0.130171133561,0.129444484343,0.128338362755,0.127426014292,0.126453111728,0.125609391247,0.124668784203,0.123570736496,0.123126673085,0.121988255976,0.121136461615,0.120224113152,0.119461131473,0.118633558752,0.117672767008,0.117269072998,0.116929970029,0.11614276671,0.115593742856,0.114859019757,0.113785193691,0.112985879551,0.112364190775,0.111843425502,0.11138321433,0.110830153537,0.110394164006,0.109877435673,0.109328411819,0.108795535726,0.10816981001,0.107915482784,0.107406828331,0.107104057823,0.10657521867,0.10618767242,0.105961603775,0.105432764621,0.105234954556,0.104790891145,0.104217645651,0.104007724766,0.103616141576,0.103244743087,0.102816827436,0.102913713998,0.102651312892,0.102683608412,0.102142658439,0.101860072632,0.10180355547,0.101436193921,0.10099616745,0.100818542086,0.100447143596,0.100055560407,0.100075745107,0.0998294917609,0.0994459824513,0.099191655225,0.0987758503946,0.0985053754078,0.0981420507987,0.0976495441063,0.0974073277003,0.0972337392759,0.0971207049531,0.0964869053572,0.0960751374669,0.0955584091339,0.0949811266995,0.0946541345513,0.0942504405412,0.0939032636925,0.0934309417007,0.0932492793961,0.0927931051647,0.0925145562977,0.0922117857901,0.0917031313374,0.0913519175486,0.0908028936948,0.0904355321456,0.0899672470939,0.089692735167,0.0894464818208,0.0889781967691,0.0886067982798,0.088295953892,0.0878518904809,0.0875410460931,0.087456270351,0.0872100170048,0.0868466923957,0.0867215472526,0.086459146146,0.086459146146,0.0863420748831,0.0861442648181,0.0860029719146,0.0858778267714,0.0858253465501,0.0854418372405,0.0854902805217,0.0853530245583,0.0855912040242,0.0855750562638,0.0855185391024,0.0855145021623,0.0854297264202,0.0854378003004,0.0852440271756,0.0855266129826,0.0854822066415,0.0851753991938,0.0854378003004,0.085381283139,0.0854943174618,0.085300544337,0.0850462171106,0.0850825495715,0.0849452936081,0.0846748186213,0.0846667447411,0.0847313357827,0.0847151880223,0.0848362962253,0.0846667447411,0.0844891193766,0.0843639742335,0.0844729716162,0.0842549768508,0.083863393661,0.0836292511351,0.0833910716691,0.0832497787656,0.0831569291433,0.0829268235575,0.0830479317605,0.0831165597423,0.0830358209402,0.0828380108753,0.0830883011615,0.0829550821382,0.0829429713179,0.0828581955758,0.0826079052895,0.0826240530499,0.082426242985,0.0822889870215,0.082309171722,0.0821153985972,0.0817520739881,0.0815623378033,0.0816915198866,0.0818005172693,0.081748037048,0.0815219684023,0.0814573773607,0.0813443430379,0.0809406490277,0.0807630236633,0.0802139998095,0.0801211501872,0.0801171132471,0.0797901210989,0.0794187226096,0.0793581685081,0.0792895405264,0.0792572450056,0.0791643953832,0.0789221789772,0.0786799625711,0.0784215984046,0.0780421260351,0.0775940256839,0.07743658502,0.0771903316738,0.0767139727419,0.0764515716353,0.0760357668049,0.0758742892008,0.0757652918181,0.0755351862323,0.0751718616232,0.0748690911156,0.0747076135116,0.0743685105431,0.0745057665065,0.0745098034466,0.0741545527177,0.0738033389289,0.0735369008823,0.073286610596,0.0733996449188,0.0732220195544,0.0731735762732,0.0731009113513,0.0731170591117,0.0730242094894,0.0728223624844,0.0732099087341,0.0732381673148,0.0729394337473,0.0728223624844,0.0727779561432,0.0727496975625,0.0728304363646,0.0730807266508,0.0730565050102,0.0731170591117,0.0731009113513,0.0732018348539,0.0731533915727,0.0731937609737,0.073246241195,0.0731816501534,0.0731776132133,0.0730766897107,0.0730443941899,0.0732825736559,0.0732381673148,0.0730847635909,0.073008061729,0.0728627318854,0.0726608848803,0.0725801460783,0.0726326262996,0.0726608848803,0.0727739192031,0.0725882199585,0.0726528110001,0.0726205154793,0.0726447371199,0.0726003307788,0.0724267423544,0.072370225193,0.072128008787,0.0720997502063,0.0720714916255,0.0718615707403,0.0717969796987,0.0716799084357,0.0716314651545,0.0713448424073,0.0712721774855,0.0711389584622,0.071211623384,0.070933074517,0.0709936286185,0.071009776379,0.0708482987749,0.070973443918,0.0709371114571,0.0710299610795,0.0710662935404,0.0708442618348,0.0707433383323,0.0707998554937,0.0709169267566,0.0710582196602,0.0709936286185,0.0710380349597,0.0709572961576,0.0707554491526,0.0707352644521,0.0708160032541,0.0707150797516,0.0706383778896,0.0704244200643,0.0704324939445,0.0703679029029,0.0703356073821,0.0701377973171,0.070133760377,0.0703436812623,0.0703557920826,0.0702790902206,0.0704042353638,0.0703154226816,0.0705213066267,0.0705253435668,0.0706948950511,0.0704769002856,0.0705293805069,0.0703759767831,0.0705091958064,0.0704324939445,0.0704082723039,0.0701660558978,0.070093390976,0.0699520980725,0.0700449476948,0.0701660558978,0.0700651323953,0.0698592484501,0.0696896969659,0.0696170320441,0.06945555444,0.0693788525781,0.0695605148826,0.0695443671222,0.0695726257029,0.0694636283202,0.0695484040623,0.0696210689842,0.0695726257029,0.0695605148826,0.0695039977212,0.0696775861456,0.0694595913801,0.0693707786979,0.0694878499608,0.0694394066796,0.0694999607811,0.0693061876563,0.0690397496096,0.0691285622918,0.0690195649091,0.0691003037111,0.0690316757294,0.0691447100522,0.0689307522269,0.0689791955081,0.068858087305,0.0689630477477,0.0689711216279,0.0691487469923,0.0689832324482,0.0688257917842,0.0688540503649,0.0689711216279,0.0690599343101,0.069136636172,0.069253707435,0.0693182984766,0.0692698551954,0.0692577443751,0.0691447100522,0.0693142615365,0.069374815638,0.0694111480989,0.0693586678776,0.0694394066796,0.0693828895182,0.0695322563019,0.0694595913801,0.0693586678776,0.0694676652603,0.0697018077862,0.0697260294268,0.0699117286714,0.0700732062755,0.0700853170958,0.0701055017963,0.0700893540359,0.0699278764318,0.0700691693354,0.0700287999344,0.0700812801557,0.0701499081374,0.070174129778,0.0701902775384,0.0700812801557,0.0700732062755,0.0700247629943,0.0699076917313,0.0700691693354,0.0699440241923,0.0699480611324,0.0699278764318,0.069895580911,0.0698511745699,0.0697986943486,0.0699076917313,0.0700166891141,0.0699924674735,0.069972282773,0.0700893540359,0.0702508316399,0.0702467946998,0.0702023883587,0.0702104622389,0.0704203831242,0.0703436812623,0.0700691693354,0.0699076917313,0.0700449476948,0.0701055017963,0.070053021575,0.0701216495567,0.0703033118613,0.0706625995303,0.0701579820176,0.0704203831242,0.0703517551425,0.0703961614836,0.0704809372257,0.0703840506633,0.0704607525252,0.0706948950511,0.0708079293739,0.0708684834754,0.0707756338531,0.070852335715,0.0709088528764,0.0710703304805,0.071251992785,0.0714740244906,0.0716758714956,0.0715951326936,0.0713892487485,0.0714053965089,0.0714619136703,0.0715345785921,0.0715386155322,0.0715668741129,0.0715103569515,0.0717848688784,0.0717848688784,0.0715910957535,0.071692019256,0.0718413860398,0.0718050535789,0.0715184308317,0.0713932856886,0.0713973226287,0.0712277711444,0.0711106998815,0.0714134703891,0.0712883252459,0.0712237342043,0.0713286946469,0.0713811748683,0.0715507263525,0.0714861353109,0.0713609901677,0.071211623384,0.0713488793474,0.0713165838266,0.0714134703891,0.0715426524723,0.071490172251,0.0713085099464,0.0710703304805,0.0707958185536,0.0708563726551,0.0709048159363,0.0707877446734,0.0708160032541,0.0706989319912,0.0706787472907,0.0706747103506,0.0707514122125,0.070533417447,0.0705899346084,0.0698915439709,0.0690114910289,0.0678892216808,0.0668557650149,0.0660080075936,0.0651683240526,0.0641308304466,0.0632467405645,0.0622375055392,0.0613776372976,0.0605056582358,0.0595650511922,0.0585477422867,0.0575304333813,0.0565575308169,0.0557541797368,0.0548297204536,0.0542120686181,0.0363768672513,0.0364656799335,0.0364212735924,0.0361023553244,0.0359852840615,0.0359328038402,0.0358924344392,0.0361911680067,0.0361427247255,0.0361144661447,0.0362678698686,0.0362275004676,0.0362153896473,0.0361023553244,0.0362759437488,0.0362234635275,0.0362396112879,0.0362355743478,0.0359852840615,0.0359287669001,0.0361265769651,0.0360579489833,0.036162909426,0.0360740967437,0.0360902445041,0.0359772101813,0.0358318803377,0.0357430676554,0.035646181093,0.0357915109367,0.0357794001164,0.0357551784757,0.035686550494,0.0354968143093,0.0353837799864,0.0351980807418,0.0352828564839,0.0351536744007,0.0350688986586,0.0351980807418,0.0352747826037,0.0354281863276,0.0354645187885,0.0352505609631,0.035246524023,0.0353757061062,0.0353837799864,0.0352747826037,0.0351334897002,0.0352344132027,0.0353232258849,0.0352021176819,0.0351334897002,0.0351173419398,0.0352344132027,0.0351375266403,0.0349800859763,0.0350204553773,0.034967975156,0.0350446770179,0.0350608247784)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("11-organelles-nucleus-merged/PIF4-ChIP-Seq-GSM865709.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=122"),bty="n")
dev.off()