# R script for Peak Model
#  -- generated by MACS
p <- c(0.0416562165519,0.0438731252159,0.0460421524833,0.048235120449,0.0504227017576,0.0526132756535,0.0548457457714,0.0570632529529,0.0592364698425,0.0614360215003,0.0636236028089,0.0658087900476,0.0679682410357,0.0701516327221,0.0723290392339,0.0745100368505,0.0767245514447,0.078880411328,0.0789037535089,0.0788983668517,0.0788654483916,0.0788546750773,0.0788157714426,0.0788415076932,0.0788714335661,0.0788834039153,0.0788439017631,0.0788085892331,0.0788002099887,0.0787241982715,0.0786829005669,0.0786374132401,0.0786416028623,0.0786655435606,0.0786697331828,0.0786619524559,0.0786906812939,0.0786535732115,0.078667339113,0.0786876887066,0.0787122279223,0.0787110308874,0.0786829005669,0.0786715287352,0.0787433508302,0.0787331760334,0.0787194101318,0.078724796789,0.0787774663253,0.0787565182142,0.0787672915285,0.0788049981283,0.0787565182142,0.0787654959761,0.0787577152491,0.0787469419349,0.0787559196968,0.0787762692903,0.0788139758902,0.0787409567603,0.078724796789,0.0787397597254,0.0787565182142,0.0787690870808,0.078723599754,0.0787349715857,0.0787726781856,0.0788157714426,0.0788361210361,0.0788558721122,0.0788905861248,0.0788690394963,0.078859463217,0.0788935787121,0.0789330808643,0.0789145268231,0.0788941772295,0.0789151253406,0.0788600617344,0.0788187640298,0.0787295849286,0.0787517300746,0.0787840500173,0.0787672915285,0.0787218042017,0.0787583137666,0.0788139758902,0.07878105743,0.078824150687,0.0788708350487,0.0789139283057,0.0789414601087,0.0789659993245,0.0789959251974,0.0789677948769,0.0790360258671,0.0790408140067,0.0790330332798,0.0790420110416,0.0790874983684,0.0791389708698,0.0792030122378,0.0791754804348,0.0791874507839,0.079243711425,0.0792407188377,0.0792556817741,0.0792886002343,0.0793281023865,0.0793245112818,0.0792766298851,0.0792981765136,0.0793592252943,0.0793807719228,0.0794364340464,0.0794741406462,0.0795567360554,0.0796040189346,0.0796273611155,0.0796536958836,0.0796710528899,0.0796548929185,0.0795866619283,0.0796183833536,0.0796297551853,0.0796495062614,0.0795788812014,0.0795459627412,0.0795752900966,0.0796112011441,0.0796788336168,0.0797332987055,0.0797584364387,0.0797907563815,0.0798069163528,0.079811105975,0.0798518051622,0.0798338496384,0.0798547977495,0.0798547977495,0.0798583888542,0.0798547977495,0.0798386377781,0.079804522283,0.0797859682418,0.0797733993752,0.0797745964101,0.0797853697243,0.0797775889974,0.0797566408864,0.0798057193179,0.0798745488256,0.0799092628381,0.0798960954541,0.0799224302222,0.0799721071712,0.0800217841202,0.0801067735992,0.0801648297926,0.0801301157801,0.0801408890943,0.0801468742689,0.0801857779037,0.0802426370622,0.0801791942116,0.0801911645608,0.0801845808688,0.0801726105196,0.0802246815384,0.0802378489225,0.0802570014812,0.080265979243,0.0802899199413,0.0802917154937,0.08034438503,0.0803808945949,0.0803802960775,0.080394061979,0.0803910693917,0.0804233893345,0.0804527166899,0.0805107728833,0.0805604498323,0.0805802009084,0.0805748142513,0.0805604498323,0.0805472824482,0.0805454868959,0.0805353120991,0.0804916203247,0.0804700736962,0.0804413448582,0.0804413448582,0.0804377537534,0.0804503226201,0.0804958099469,0.0805538661403,0.0805819964608,0.0806322719273,0.0806334689622,0.0807034955048,0.0807011014349,0.0807435961744,0.0807465887617,0.0807418006221,0.0807813027743,0.0807974627456,0.0808585115263,0.0808076375424,0.0808615041136,0.0808860433294,0.080892028504,0.0809004077484,0.0809476906276,0.0810458474907,0.0811146769983,0.0812074472043,0.0812415626994,0.0813241581086,0.0814211179368,0.0814546349144,0.0815928924472,0.0816772834087,0.0817293544276,0.0817718491671,0.0819035230078,0.0820052709757,0.0821267700196,0.0822063728415,0.0822847786285,0.0823452288917,0.0824775012499,0.0825253826466,0.0825936136368,0.0826947630872,0.0828024962296,0.0828497791088,0.0829383596925,0.0829736722225,0.0830568661492,0.0831610081869,0.0832190643803,0.0833567233956,0.0834590698809,0.0836482013976,0.0837385775337,0.0838648647173,0.0839737948947,0.0840875132117,0.0842024285636,0.0842227781572,0.0843185409504,0.084402931912,0.0844639806927,0.0845268250258,0.0845753049399,0.0847081758155,0.0847811949454,0.0848404481737,0.084885336983,0.0849625457351,0.0850319737602,0.0850678848077,0.0851037958552,0.0851828001596,0.0852516296673,0.0853360206288,0.0853527791177,0.0854198130729,0.0855239551106,0.0856005653452,0.0856963281385,0.0858471545379,0.085930946982,0.0860099512864,0.086073394137,0.0860985318702,0.0861984842857,0.0862212279491,0.0862583360315,0.0862691093457,0.086300830771,0.0863325521962,0.0864019802213,0.0864684156592,0.0865354496145,0.0866497664489,0.0866790938043,0.0866766997345,0.0867503173818,0.0868083735753,0.0868311172387,0.0868233365117,0.0868335113085,0.0868915675019,0.0869478281429,0.0869945125047,0.0870591523901,0.0871525211135,0.0872063876848,0.0872554661163,0.0873081356526,0.0873823518174,0.087451181325,0.087458962052,0.0874870923725,0.0874984642042,0.0875391633913,0.0875529292929,0.0875996136546,0.0877115364192,0.0877983214506,0.0878934857264,0.0879730885483,0.0880616691321,0.0881137401509,0.0881855622459,0.0882424214044,0.0882891057661,0.0883292064358,0.08841060481,0.0884501069623,0.0884854194923,0.0885692119364,0.088666770282,0.0887709123197,0.0888361507226,0.0889211402016,0.0890198955822,0.0890887250898,0.0891390005563,0.0892359603845,0.0893173587587,0.089334715765,0.0893006002699,0.0893790060569,0.0894137200695,0.0894394563201,0.0894621999835,0.0895112784151,0.0896154204528,0.0896303833892,0.0896944247572,0.0896938262398,0.0897153728682,0.0897788157188,0.0898147267662,0.0898656007502,0.0898703888898,0.0899122851119,0.0899248539785,0.0899565754038,0.090002661248,0.0900900447969,0.0901618668918,0.0902103468059,0.0902678044819,0.0903180799483,0.0903982812877,0.0904659137604,0.090500627773,0.0905197803316,0.09057903356,0.0906376882708,0.0906981385341,0.0907789383909,0.090870511562,0.0909112107491,0.0909369469998,0.0910171483392,0.091139844418,0.0911811421226,0.0913008456142,0.0913738647441,0.0914618468104,0.091517508934,0.0915641932957,0.0916324242859,0.091708436003,0.09178684179,0.0918760208912,0.0919095378689,0.0919262963577,0.0919286904275,0.0919885421733,0.0919957243828,0.0920232561859,0.0920651524079,0.0921166249093,0.092156725579,0.0921812647948,0.0922016143883,0.09221298622,0.0922387224707,0.0922488972675,0.0922710424134,0.092305756426,0.0923470541306,0.0923847607304,0.0924380287842,0.0925050627395,0.0925373826822,0.0925840670439,0.0926421232373,0.0927115512624,0.0927630237638,0.0928121021954,0.0928653702491,0.0928911064998,0.092938389379,0.0929695122868,0.0930161966485,0.0930748513594,0.0931490675242,0.0932047296477,0.0932400421778,0.0932855295046,0.0933238346219,0.0933908685772,0.0934662817768,0.0935602490177,0.0936141155889,0.0936883317537,0.0937398042551,0.0937607523661,0.0937942693438,0.0938170130072,0.0938906306545,0.0938696825435,0.0939163669052,0.0939259431845,0.0939648468193,0.094011531181,0.0940432526063,0.0940618066475,0.0940624051649,0.0940504348158,0.0940498362983,0.0940372674317,0.0940504348158,0.0940366689142,0.0940097356286,0.0940229030127,0.0939869919652,0.0939558690574,0.0939666423716,0.0939343224289,0.0939427016733,0.0939193594925,0.0938870395497,0.0938619018165,0.0938960173116,0.0939014039687,0.0939014039687,0.0939145713528,0.0938996084164,0.0938822514101,0.0938732736482,0.093848135915,0.0938535225721,0.093883448445,0.0939127758004,0.0939588616447,0.0939528764701,0.0940175163556,0.0940390629841,0.0940659962697,0.0940444496412,0.0940199104254,0.0940133267334,0.0940318807746,0.0940588140602,0.0940719814442,0.094104301387,0.0941222569107,0.0940875428981,0.094110885079,0.094117468771,0.094054624438,0.0941048999044,0.094104301387,0.0940701858919,0.0941096880441,0.0941150747012,0.0940911340029,0.0940893384505,0.0940989147298,0.0940665947871,0.0940169178381,0.0940384644666,0.0940282896698,0.0940444496412,0.0940169178381,0.094003750454,0.0940390629841,0.0940438511237,0.0940157208032,0.0939899845525,0.0939600586796,0.0939301328067,0.093876864753,0.0938152174548,0.0937924737914,0.0937972619311,0.0938134219024,0.0937954663787,0.0937691316105,0.0937362131504,0.0937188561441,0.0937212502139,0.0937038932076,0.0937194546615,0.0937158635568,0.0937338190805,0.0937272353885,0.0937278339059,0.0937128709695,0.0937152650393,0.093699105068,0.0936631940205,0.093691324341,0.093691324341,0.0936619969856,0.0936518221888,0.0936536177412,0.0936308740778,0.0936111230017,0.0935758104716,0.0935351112845,0.0935267320401,0.0934680773292,0.0934070285485,0.0933310168314,0.0932789458125,0.0932196925842,0.0931927592986,0.0931885696764,0.0931634319432,0.0931730082225,0.0931364986575,0.0930904128133,0.0930413343817,0.0929988396422,0.0929294116171,0.0928707569062,0.0928294592017,0.0927785852177,0.0926528965516,0.0926121973644,0.0925505500663,0.0925511485837,0.0924751368666,0.0924416198889,0.0924158836382,0.0923638126194,0.0923608200321,0.092320120845,0.0922746335182,0.0922345328485,0.0921908410741,0.0921651048234,0.0920561746461,0.0919717836845,0.0919268948751,0.0919017571419,0.0918748238563,0.0918317305993,0.0918167676629,0.0918203587676,0.091772477371,0.0917078374856,0.0916575620191,0.0915623977433,0.0915396540799,0.0914564601532,0.091367281052,0.091275707881,0.0912356072113,0.0911697702909,0.0911248814816,0.0910512638343,0.0909315603427,0.0908316079272,0.0908411842065,0.0907597858323,0.0906861681849,0.0906424764105,0.0905951935313,0.090500627773,0.0904168353289,0.0903641657926,0.0902570311676,0.0901397217459,0.0900714907557,0.0899697427878,0.0898883444136,0.0897644512998,0.0897123802809,0.0896417552209,0.0895663420212,0.0894544192566,0.0893047898921,0.0891946626799,0.0890803458454,0.0889714156681,0.0889001920906,0.0888241803734,0.0887212353707,0.08866018659,0.088553051965,0.0884207796068,0.088319031639,0.0882525962011,0.0881173312557,0.0880383269512,0.0879395715707,0.0878617643011,0.0878096932823,0.087750440054,0.0876618594702,0.0875822566483,0.0875092375184,0.0874487872552,0.0873548200143,0.0873236971065,0.0872393061449,0.0871459374215,0.0870872827106,0.0870322191045,0.0869412444509,0.0869071289558,0.0868412920354,0.0868155557847,0.08677665215,0.0867024359852,0.0866360005474,0.0866108628141,0.0865893161857,0.0865145015034,0.0864546497576,0.0863594854818,0.0862936485615,0.0862547449267,0.0861757406223,0.0860931452131,0.086009352769,0.0859602743374,0.0859489025057,0.085859124887,0.0858944374171,0.0858106449729,0.085753187297,0.085724458459,0.0856406660149,0.0855616617105,0.0855185684535,0.0854437537713,0.0853850990604,0.0852743733307,0.0852211052769,0.0851247439662,0.0850529218713,0.0849775086716,0.0848829429132,0.084836857069,0.0848009460215,0.0847117669203,0.0846620899713,0.0846088219175,0.0845531597939,0.0845226354036,0.0844196904008,0.0843287157472,0.0842676669665,0.0842197855699,0.0841617293765,0.0841425768178,0.0840707547229,0.0840414273674,0.0839743934121,0.0839797800693,0.0839618245455,0.0839115490791,0.0838469091936,0.0837978307621,0.0837068561085,0.0836697480261,0.0836152829374,0.0835296949409,0.0834417128746,0.0833848537161,0.0833112360688,0.083280113161,0.0831999118216,0.0831592126345,0.0830646468761,0.0829862410892,0.0829377611751,0.0829054412323,0.0828773109118,0.0827995036423,0.0827007482617,0.0826612461095,0.0825696729385,0.0825032375006,0.0824272257835,0.0823571992409,0.0823170985712,0.0822674216222,0.0821908113876,0.0821513092354,0.0821177922578,0.0820627286516,0.0820112561502,0.0819226755665,0.0819382370204,0.0818789837921,0.0818317009129,0.0818287083256,0.0818059646622,0.0817856150686,0.0817012241071,0.0816575323326,0.0815976805868,0.0815761339584,0.0815551858473,0.0815324421839,0.0814701963683,0.081388797994,0.0814061550003,0.0813654558132,0.0813379240101,0.081367849883,0.0813594706386,0.0812577226708,0.0811781198489,0.0811302384522,0.0811517850807,0.081111684411,0.0811056992365,0.0810661970842,0.0810219067923,0.0809961705417,0.0809949735067,0.0809327276911,0.0809099840277,0.0808453441423,0.0807938716409,0.0807980612631,0.0807789087044,0.0807160643714,0.0806657889049,0.0805999519845,0.080529925442,0.0805017951214,0.0804233893345,0.08037969756,0.0804144115726,0.0804030397409,0.0804269804392,0.0804144115726,0.0804054338107,0.0803431879951,0.0803366043031,0.0803785005251,0.080288124389,0.0802342578178,0.0802246815384,0.0801696179323,0.0801067735992,0.0801726105196,0.0802282726432,0.0802246815384,0.0801899675259,0.0802001423227,0.0801863764211,0.0801977482528,0.0801833838338,0.0801516624086,0.0801690194149,0.0802133097067,0.0802007408401,0.0802258785734,0.0802635851732,0.0802210904337,0.0802001423227,0.0802474252018,0.0802779495922,0.0803030873254,0.0802953065985,0.0802935110461,0.0803222398841,0.080366530176,0.0803066784302,0.0803114665698,0.0802761540398,0.0802438340971,0.08027375997,0.080316853227,0.0802988977032,0.0802689718303,0.0802982991858,0.0803431879951,0.080366530176,0.0803623405538,0.0803785005251,0.0803497716871,0.0803258309888,0.0803066784302,0.080251614824,0.0802552059288,0.080230666713,0.0801899675259,0.080187573456,0.0802073245322,0.0801678223799,0.0801331083674,0.080110364704,0.0800726581041,0.0799936537997,0.0799739027236,0.0799798878982,0.0799655234792,0.0799206346698,0.0798703592034,0.0798709577208,0.0798182881845,0.0797775889974,0.0797374883277,0.0797207298389,0.0796524988487,0.079591450068,0.0795734945443,0.0795375834968,0.079519627973,0.0795100516937,0.0794974828271,0.0794891035827,0.0794466088432,0.0793610208467,0.0793340875611,0.0792724402629,0.0792514921519,0.0792089974124,0.0791934359585,0.0792089974124,0.0791766774697,0.0791611160158,0.0791425619746,0.0791676997078,0.0791198183112,0.0790874983684,0.079022858483,0.0790055014767,0.0790360258671,0.0790485947337,0.0790671487749,0.0790599665654,0.0790420110416,0.0790252525528,0.0790234570004,0.0790521858384,0.0790240555179,0.0790138807211,0.0789869474355,0.0790001148196,0.0790186688608,0.0790270481052,0.0790270481052,0.0790013118545,0.0789719844991,0.0789905385403,0.0790096910989,0.0789953266799,0.0789983192672,0.0790444051115,0.0790593680479,0.0791323871778,0.0791252049683,0.0791455545619,0.0791808670919,0.0791874507839,0.0791778745046,0.0791802685744,0.0791587219459,0.079107847962,0.0791150301715,0.0791060524096,0.0791629115681,0.0791365768,0.0791551308412,0.0791736848824,0.0791371753174,0.0791407664222,0.0791341827302,0.0791521382539,0.0791359782825,0.0791198183112,0.0791790715395,0.0792161796219,0.0792245588663,0.0792012166854,0.0792095959299,0.0792682506407,0.0792838120946,0.079279023955,0.0793304964563,0.0793275038691,0.0793053587231,0.0792610684312,0.0792101944473,0.0791730863649,0.0791994211331,0.0791551308412,0.0791736848824,0.079165305638,0.0791688967427,0.0791940344759,0.079200618168,0.0792185736917,0.0792772284026,0.0793292994214,0.0793257083167,0.0793478534626,0.0793580282594,0.0794130918655,0.0793723926784,0.0793885526498,0.0794220696274,0.0794118948306,0.079392742272,0.0793634149165,0.0794041141037,0.0794047126211,0.0793807719228,0.0794154859354,0.0794364340464,0.0794639658495,0.0794855124779,0.079498679862,0.0795070591064,0.0795555390205,0.0795447657063,0.0795274087,0.0795082561413,0.0795758886141,0.0796405284995,0.079690803966,0.0797153431818,0.0797428749848,0.0797704067879,0.0797913548989,0.0798152955972,0.0798087119052,0.0798368422257,0.0798721547557,0.0798428274003,0.0798524036796,0.0798512066447,0.0798206822544,0.0797739978926,0.0797620275435,0.0797955445211,0.079796741556,0.0798320540861,0.0798745488256,0.0799266198444,0.0799457724031,0.079960136822,0.0800211856028,0.0800068211838,0.0799589397871,0.0799553486824,0.0800056241488,0.0800152004282,0.0800193900504,0.0800134048758,0.0800433307487,0.0800618847899,0.0801067735992,0.080137896507,0.0801259261579,0.0801450787165,0.0801534579609,0.0801289187452,0.0801564505482,0.0801223350531,0.0801301157801,0.0801151528436,0.0801031824945,0.0800870225231,0.0800666729296,0.0800828329009,0.0800942047326,0.0801504653737,0.0801881719735,0.0802037334274,0.0802210904337,0.0801851793862,0.0801438816816,0.0800971973199,0.0800654758946,0.0800714610692,0.080073855139,0.0800523085106,0.0799912597299,0.0800499144407,0.0800834314184,0.0800786432787,0.0800648773772,0.0800451263011,0.0800301633646,0.0800301633646,0.0800301633646,0.0800289663297,0.0800594907201,0.0800810373485,0.0800582936851,0.0800409366789,0.0800451263011,0.0800487174058,0.0800146019107,0.0800128063583,0.0800163974631,0.0800098137711,0.0800493159233,0.0800912121453,0.080081635866,0.0800864240057,0.0800690669994,0.0800558996153,0.0800499144407,0.0801019854596,0.0801151528436,0.0801534579609,0.0802157037766,0.0802468266844,0.0802779495922,0.0803000947381,0.0803018902905,0.080315656192,0.0803491731697,0.0803581509315,0.0803479761348,0.0804030397409,0.0803677272109,0.0804144115726,0.0804443374455,0.0804664825914,0.0804365567185,0.0804233893345,0.0804102219504,0.0804180026773,0.0804569063121,0.0804958099469,0.0804958099469,0.0804916203247,0.080501196604,0.0805041891913,0.0804988025342,0.0804982040167,0.0804838395977,0.0804610959343,0.0804509211375,0.080479051458,0.0804628914867,0.0804652855565,0.080480248493,0.0805023936389,0.0804772559057,0.0804928173596,0.0804419433757,0.0804257834043,0.0804054338107,0.0803485746522,0.0803683257283,0.0803790990426,0.0803976530838,0.080373113868,0.080401842706,0.0803779020077,0.0804431404106,0.0804263819217,0.0804144115726,0.0804311700614,0.0804670811089,0.080472467766,0.0804593003819,0.0804610959343,0.080472467766,0.080479051458,0.0805089773309,0.0804784529406,0.0805239402674,0.0805125684357,0.0805119699182,0.0805089773309,0.0804999995691,0.0804766573882,0.0805395017213,0.0805239402674,0.0805688290767,0.0805802009084,0.0805586542799,0.0805550631752,0.0805885801528,0.0806185060257,0.0807088821619,0.0807483843141,0.0807759161172,0.0808178123392,0.0808866418469,0.0809345232435,0.0809530772847,0.0809937764718,0.0810464460081,0.0810955244397,0.0811242532776,0.0811374206617,0.0811637554299,0.0811859005758,0.0812236071757,0.0812415626994,0.0812804663342,0.0812726856072,0.0812858529913,0.0812786707818,0.0813079981372,0.0813858054067,0.0813660543306,0.0814061550003,0.0814199209018,0.0814707948858,0.0814785756127,0.0815126911078,0.0815378288411,0.0815527917775,0.0815647621267,0.0815647621267,0.0816371827391,0.0816180301804,0.0816353871867,0.0816198257328,0.0815833161679,0.0815617695394,0.081588702825,0.0816084539011,0.0815851117202,0.0815378288411,0.0815156836951,0.0815132896253,0.0814588245366,0.0814271031113,0.0813870024417,0.081403162413,0.0814235120066,0.0813780246798,0.0813193699689,0.0813026114801,0.0812900426135,0.0813056040674,0.0813486973244,0.0813463032545,0.0813145818293,0.0812840574389,0.0813205670038,0.0813241581086,0.0813397195625,0.0813648572957,0.081396578721,0.081417526832,0.0813798202322,0.0813828128195,0.0813624632259,0.0813798202322,0.081389995029,0.0814223149717,0.0814121401749,0.0814229134891,0.0814534378795,0.0814564304668,0.0814552334319,0.0814510438097,0.079178473022,0.0769460029041,0.0746913876402,0.0724176198177,0.0701630045538,0.0679095863248,0.065647190334,0.0633746195464,0.0610912754445,0.0588582068091,0.0566119707897,0.0543765080844,0.052108126919,0.0498379502012,0.0475420372328,0.0452880204863,0.043032806705,0.0407907603077)
m <- c(0.0424599352617,0.0447083045508,0.0469350837373,0.0491414722714,0.0513790465092,0.0535860347684,0.0557888249521,0.058018602764,0.0602255910232,0.0624427746086,0.0647079361996,0.0669365145614,0.0691578962223,0.0713720811823,0.073591663668,0.0758088472534,0.0780332275396,0.0802935913301,0.0803391704355,0.0803259764839,0.0803109833571,0.0803157811577,0.0803319737346,0.0803283753842,0.0803193795081,0.0803049861064,0.0803337729098,0.0803079847318,0.0802744001278,0.0802863946293,0.080352364387,0.08033497236,0.0803253767588,0.080283995729,0.0803187797831,0.0804039407431,0.0804531181988,0.0804219324952,0.0804297289211,0.0804609146248,0.0804675116005,0.0805334813583,0.0806120453425,0.0806432310462,0.0806774153752,0.0806852118011,0.0806870109763,0.0807397867825,0.0807595777098,0.0808165515915,0.0808609312467,0.0808843205245,0.0809322985301,0.0809119078777,0.0809275007296,0.0809269010045,0.0809257015543,0.0809275007296,0.0809077098022,0.0809035117267,0.0808993136512,0.0808855199746,0.0808765240986,0.0809292999048,0.0809298996298,0.0809460922067,0.0809304993549,0.0809454924817,0.0809322985301,0.0809844746112,0.0809251018293,0.0809197043036,0.0808519353707,0.0808663287724,0.080854334271,0.0808471375701,0.080854933996,0.0808387414191,0.080812353516,0.0807463837583,0.0807259931059,0.0807433851329,0.080684612076,0.0806900096017,0.0807175969549,0.0807301911814,0.0807487826586,0.0807715722112,0.0807787689121,0.0808063562653,0.0807901636884,0.0808417400445,0.0808609312467,0.0808585323465,0.0808507359205,0.0808837207994,0.0808585323465,0.0809035117267,0.0809502902822,0.0809460922067,0.0809430935814,0.0809562875329,0.0809634842338,0.080956887258,0.0809616850586,0.0809215034788,0.0809538886326,0.0809388955059,0.0810318528918,0.0810996218248,0.081135605329,0.0811757869087,0.0812015750867,0.081203973987,0.0811919794856,0.0812765407205,0.0812969313729,0.0813383124028,0.0813605022304,0.0813269176265,0.0812789396208,0.0812405572163,0.0812285627149,0.0812237649143,0.0812129698631,0.0811961775611,0.081178185809,0.0811673907577,0.0811775860839,0.0811787855341,0.0812645462191,0.0812675448445,0.0812987305481,0.0812909341222,0.0813017291735,0.0813125242248,0.0813353137774,0.0813161225752,0.0812843371465,0.081297531098,0.0813275173515,0.0813107250496,0.0813437099284,0.0813395118529,0.0812819382462,0.0812441555667,0.0812213660141,0.0811727882834,0.0811481995555,0.0811505984558,0.0811643921324,0.081118813027,0.0810960234743,0.0810654374958,0.0810630385955,0.0810744333718,0.081110416876,0.0811182133019,0.081110416876,0.0811002215498,0.0810816300727,0.0810612394203,0.0810906259487,0.0810840289729,0.0810540427194,0.0810942242991,0.0810216575656,0.0809988680129,0.0810000674631,0.0809934704873,0.0809592861583,0.0809304993549,0.0808915172253,0.0808939161256,0.0808993136512,0.0808585323465,0.0807973603893,0.0808081554405,0.0807499821087,0.08076077716,0.080752381009,0.0807235942056,0.0807721719363,0.0807661746856,0.0807241939307,0.0806828129008,0.0806660205988,0.0806594236231,0.0806882104264,0.0806744167498,0.0806780151002,0.0806774153752,0.0806792145504,0.0806492282969,0.0806186423183,0.080582059089,0.080548474485,0.0805460755848,0.0805298830079,0.0805028953797,0.080471709676,0.0803955445921,0.0803769531149,0.0803529641121,0.0803649586135,0.0803367715352,0.0802893932546,0.0802552089256,0.0802767990281,0.0802636050766,0.0802480122247,0.0802486119498,0.0802360177233,0.0802096298202,0.0802210245966,0.0801670493402,0.0801628512647,0.0801334647363,0.0800507026766,0.0800147191723,0.0799841331938,0.0799421524388,0.0799019708591,0.079875582956,0.0798150107239,0.0797970189718,0.0797472417909,0.0796926668095,0.0796165017256,0.0795721220704,0.0795391371915,0.0795505319678,0.0795421358168,0.0795307410405,0.0795193462642,0.0794569748568,0.0794491784309,0.0794551756816,0.079449778156,0.0794215910777,0.0793346309425,0.0793022457887,0.0792848537616,0.0792734589853,0.079236875756,0.0792332774056,0.0791721054484,0.0791457175453,0.0791073351408,0.0790857450382,0.0790641549357,0.0790827464129,0.0790719513616,0.0791097340411,0.0791301246935,0.0791751040737,0.0792008922518,0.0792578661335,0.079253668058,0.0792602650337,0.0793070435892,0.0792566666833,0.0793178386405,0.0793100422146,0.0793622182957,0.0794275883284,0.0794173930022,0.0793772114225,0.0793766116974,0.0793826089481,0.0793508235194,0.079390405374,0.0794023998754,0.0794131949267,0.0794077974011,0.0794341853042,0.079432985854,0.0794551756816,0.0794605732073,0.0794539762315,0.0794917589109,0.0794695690833,0.0794845622101,0.0794629721075,0.0795277424152,0.0795109501132,0.0795061523126,0.0795133490135,0.0794899597357,0.0794503778811,0.0794767657842,0.0794773655092,0.0795289418653,0.0795469336174,0.0795883146473,0.0795901138225,0.0795673242698,0.0795985099735,0.0795559294935,0.0795757204208,0.0795865154721,0.0795745209706,0.0796063063994,0.0796722761571,0.0796848703836,0.0796692775318,0.0796782734078,0.0796818717583,0.0797046613109,0.0797172555374,0.079722653063,0.0797286503138,0.0797130574619,0.0797034618608,0.0797058607611,0.0796932665346,0.0796386915532,0.0796488868794,0.0796560835802,0.0796554838552,0.0796512857797,0.0796590822056,0.0796812720332,0.0796584824805,0.0796896681842,0.0796932665346,0.0796171014507,0.0796105044749,0.079509750663,0.0794491784309,0.0793694149966,0.079364617196,0.0793832086732,0.0793826089481,0.0793946034495,0.0794047987757,0.0793736130721,0.0793550215949,0.0793424273684,0.0793106419397,0.0792902512873,0.0792974479881,0.0793256350664,0.079364617196,0.0793406281932,0.0793910050991,0.0794479789808,0.0794767657842,0.0795355388411,0.0795805182214,0.0796278965019,0.0796854701087,0.0797316489391,0.0797382459149,0.0797688318935,0.0798150107239,0.0797940203464,0.0798114123735,0.0797628346428,0.0798378002766,0.0798018167723,0.0798270052253,0.079867186805,0.0798719846056,0.0798905760828,0.0798935747081,0.0799553463904,0.079969140067,0.079994928245,0.0800039241211,0.0800303120242,0.0800453051509,0.0800399076253,0.0800405073504,0.0800818883802,0.0800854867307,0.0801010795825,0.0800704936039,0.0800243147735,0.0799751373177,0.0799685403419,0.0798995719588,0.0799073683847,0.0798701854304,0.0798821799318,0.0798779818563,0.0798479956028,0.0797964192467,0.0797964192467,0.0798282046754,0.0798845788321,0.0799109667352,0.079969140067,0.0800279131239,0.0801106751836,0.0801004798574,0.0801496573132,0.0801424606124,0.0801778443915,0.0802204248715,0.0803085844569,0.0803379709853,0.0803643588884,0.0803961443171,0.0803817509155,0.0804267302957,0.080420733045,0.080437525347,0.0804849036276,0.0805472750349,0.0805556711859,0.0805952530405,0.0806486285718,0.0807074016287,0.0807811678124,0.0808393411442,0.0808993136512,0.0809778776355,0.0809508900073,0.0810264553662,0.0810060647138,0.0810066644388,0.0810138611397,0.0810474457436,0.0810738336467,0.0810384498676,0.0810222572907,0.0810264553662,0.0810126616896,0.0809814759859,0.0809694814845,0.080991071587,0.0810624388704,0.0810702352963,0.0811086177008,0.0810864278732,0.0810858281481,0.0811631926822,0.0812075723374,0.0812453550169,0.0812795393459,0.0813023288986,0.081365899756,0.0813623014056,0.0813287168017,0.081331715427,0.0813269176265,0.0813419107532,0.0813563041549,0.0813946865594,0.0814630552174,0.0814942409211,0.0815416192017,0.0815608104039,0.0816315779622,0.0816603647656,0.0817185380975,0.0817593194022,0.0818456798124,0.0819008545189,0.0819392369234,0.0819542300501,0.0819500319746,0.0819746207025,0.0819866152039,0.0820387912851,0.0820843703904,0.0821371461966,0.0821173552693,0.0822301035825,0.0822390994586,0.0822888766394,0.0823680403487,0.0823812343003,0.082438807907,0.0824747914113,0.0824999798642,0.0825113746406,0.0825227694169,0.0825593526462,0.0826481119566,0.0826643045335,0.0827080844637,0.0827992426744,0.0828358259037,0.0829023953865,0.0828706099578,0.0828957984107,0.0829179882383,0.0829605687183,0.082991754422,0.0829989511228,0.0830571244547,0.0830931079589,0.0831434848648,0.0831812675442,0.0832460378519,0.0833887724186,0.0835081177076,0.0835776858158,0.0836772401775,0.0837558041617,0.0838037821674,0.083800783542,0.0838529596231,0.0838835456017,0.0839525139848,0.0840214823679,0.0840568661471,0.0840616639476,0.0841042444276,0.0841144397538,0.0841384287567,0.0841936034631,0.0842457795443,0.0842979556254,0.0843741207093,0.0844658786451,0.0845486407048,0.0845564371308,0.0846236063386,0.0846511936919,0.0847483491533,0.0848437054395,0.0849000795961,0.0849456587015,0.0849732460547,0.0850530094891,0.0851141814463,0.0851879476299,0.0852305281099,0.0852701099646,0.0853180879702,0.0853708637764,0.0853534717494,0.0853960522294,0.0854170426068,0.0854542255612,0.0855321898203,0.0856359422575,0.0857223026677,0.0857360963443,0.085767282048,0.0858038652773,0.0858140606035,0.0859220111161,0.0859957772998,0.0861379121415,0.0862800469832,0.0863766027195,0.086448569728,0.0865661158418,0.0866428806508,0.0867052520581,0.0867502314384,0.086831794048,0.08689116683,0.0869385451105,0.0870392989224,0.0870950733539,0.0871712384378,0.0872456043466,0.0873283664063,0.0873931367139,0.0874495108705,0.0875124820029,0.0875478657821,0.0876390239928,0.0877133899015,0.0877823582846,0.087845329417,0.0879190956007,0.0879958604097,0.0880618301674,0.0881325977258,0.0881811754565,0.0882651369663,0.0883598935274,0.0884642456897,0.088560801426,0.0886807464401,0.0887653076751,0.088790496128,0.0888120862306,0.0888522678103,0.0889566199725,0.0890471784582,0.0890861605877,0.0891497314452,0.0892276957044,0.0893746283466,0.0894561909562,0.0895425513663,0.0896091208492,0.0896343093021,0.089718270812,0.0897788430441,0.0898741993303,0.0899587605652,0.0900355253742,0.0901128899083,0.0901848569168,0.0903084002813,0.0903533796616,0.0904067551928,0.0904739244007,0.0906256548436,0.0906916246013,0.0908121693405,0.0909099245269,0.0909692973089,0.0910742491962,0.0911198283016,0.0912241804638,0.0912565656177,0.0913111405991,0.0913675147557,0.0913951021089,0.0914688682926,0.091523443274,0.0915954102824,0.0916181998351,0.0916703759163,0.0917057596954,0.0917723291782,0.0917861228548,0.0917933195557,0.0918209069089,0.0918353003106,0.0919030692436,0.0919444502734,0.0919528464244,0.0919804337777,0.092000224705,0.0920032233303,0.0920050225056,0.092008620856,0.0920494021608,0.0920799881394,0.0921339633957,0.0921603512988,0.0921801422261,0.092178942776,0.0922179249056,0.0921897378272,0.0922065301292,0.0922293196819,0.0921993334284,0.0922143265551,0.0922371161078,0.0922826952132,0.0923114820165,0.0923216773427,0.0923342715692,0.0923858479253,0.0924506182329,0.0924776058611,0.0924902000875,0.0925141890904,0.0925561698453,0.0925321808425,0.0925429758937,0.0925675646216,0.0925969511501,0.0926509264064,0.0927043019377,0.0927624752695,0.0928032565743,0.0928566321056,0.0928662277067,0.0929208026881,0.0929513886667,0.0930173584244,0.0930791301067,0.0931163130611,0.0931768852932,0.0932314602746,0.0932386569754,0.0932806377304,0.0933508055636,0.0934101783456,0.0934365662487,0.0934767478284,0.093533121985,0.0935990917428,0.0936032898183,0.0936488689236,0.0936788551771,0.0937148386814,0.0937760106385,0.0937892045901,0.0938047974419,0.0938089955174,0.0938527754476,0.093865369674,0.0939139474047,0.0939847149631,0.0940584811467,0.0940896668504,0.0941100575028,0.0941484399073,0.09412864898,0.0941316476053,0.0941556366081,0.0941784261608,0.094222206091,0.0942354000425,0.0942845774983,0.0942719832718,0.0942527920695,0.0942455953687,0.0942671854712,0.0942965719997,0.0943223601777,0.0943577439569,0.09434155138,0.0943013698002,0.0943295568786,0.094324759078,0.0943043684256,0.0942467948188,0.0942252047163,0.0942192074656,0.0941958181879,0.0941730286352,0.0941370451309,0.0940818704245,0.0940530836211,0.0940476860955,0.0940188992921,0.0939979089146,0.0939727204616,0.093950530634,0.093949930909,0.0938929570273,0.0939019529033,0.0938611715985,0.0938659693991,0.0938293861698,0.0937946021157,0.0937472238352,0.0937250340076,0.0936974466543,0.0936548661743,0.0936560656245,0.0936368744222,0.0936050889935,0.0935787010904,0.0935337217101,0.09353252226,0.0934959390307,0.0934845442543,0.093515729958,0.0934875428797,0.0934635538769,0.0934833448042,0.0935169294081,0.0935139307828,0.0934761481033,0.0934995373811,0.0935043351816,0.0935181288583,0.0935505140121,0.0935265250092,0.0935313228098,0.093516329683,0.0935229266588,0.0934971384808,0.0934623544267,0.0933945854938,0.0934017821946,0.0933274162859,0.093337011887,0.0933352127118,0.0933394107873,0.0933214190352,0.0933208193101,0.0932578481777,0.0932404561506,0.0932578481777,0.0931804836436,0.0931480984898,0.0931361039884,0.0930527422036,0.0929681809687,0.0929034106611,0.0928656279816,0.0927828659219,0.0927258920402,0.092681512385,0.0926491272312,0.092638931905,0.0925555701202,0.0925021945889,0.0924524174081,0.0923804503996,0.092340868545,0.0922778974126,0.0921561532233,0.0920673939129,0.0919762357022,0.0919120651196,0.091864087114,0.0917885217551,0.0917237514475,0.0916829701427,0.0916409893878,0.0916116028593,0.0915438339264,0.0914922575703,0.0914364831388,0.0914070966103,0.0913483235534,0.0913585188796,0.0913129397743,0.0912403730407,0.0912637623185,0.0912481694667,0.0912163840379,0.0912355752402,0.0912709590193,0.0912397733157,0.0911804005337,0.0911989920109,0.0912103867872,0.0911738035579,0.0911510140053,0.0910916412233,0.0910862436976,0.091071850296,0.091071850296,0.09102147339,0.09097889291,0.0909627003331,0.0909854898858,0.0909764940098,0.0909674981337,0.0909219190283,0.0908451542193,0.090816367416,0.0907869808875,0.0907108158036,0.0906676355985,0.0905902710644,0.0905404938836,0.0904229477697,0.090314397532,0.0902358335478,0.0901506725878,0.090033126474,0.089982749568,0.0899389696379,0.0898795968559,0.0897884386452,0.0896870851083,0.0895929282723,0.0895101662125,0.0894082129506,0.0893086585889,0.089182116599,0.0890405814824,0.0889296323444,0.0888234810069,0.0887071343432,0.0886051810813,0.0885242181967,0.0883718880289,0.0882849278936,0.0881559870035,0.0879838659083,0.0878531258429,0.0877439758801,0.0876174338903,0.0875508644074,0.0874651037224,0.0873547543094,0.0872498024221,0.0871970266159,0.0870824791274,0.0870159096446,0.0869283497843,0.0868611805764,0.0868191998215,0.0866734666294,0.0865979012705,0.0865349301381,0.0864605642294,0.0863442175657,0.0862422643037,0.0861187209392,0.0860623467826,0.0859310069922,0.085818858404,0.0857876727004,0.0857624842474,0.0857199037674,0.0856455378587,0.0855831664513,0.085511799168,0.0854578239116,0.0853870563533,0.0853342805471,0.0853036945685,0.0852149352581,0.0851417687995,0.0851183795217,0.0850991883195,0.0851255762226,0.0850644042654,0.0849906380817,0.0849642501786,0.084950456502,0.0849252680491,0.0848365087386,0.084754346404,0.0847183628998,0.0846200079882,0.0846272046891,0.0845612349313,0.0845180547262,0.0844610808446,0.0843555292322,0.0842661701967,0.0842319858676,0.084158219684,0.0841126405786,0.0840268798936,0.0839992925403,0.0839423186586,0.0838361673212,0.0837797931645,0.0837234190079,0.0836874355037,0.0836508522744,0.0835608935138,0.0835129155082,0.0834559416265,0.0833329979871,0.083298213933,0.0832838205313,0.0832940158575,0.0832430392265,0.0831698727679,0.0830193417752,0.0829671656941,0.0828622138068,0.0827512646687,0.0826834957358,0.0825677487972,0.0825779441234,0.0825485575949,0.0824681944355,0.08242141588,0.0823326565696,0.0822606895611,0.0822882769144,0.0822588903859,0.082276282413,0.0822588903859,0.0821569371239,0.0821293497707,0.0821209536197,0.0820909673662,0.0820423896355,0.0819836165786,0.0819542300501,0.0818654707397,0.081800100707,0.0817755119791,0.0816789562428,0.0816537677898,0.0815907966575,0.0815242271746,0.0815314238755,0.0814834458698,0.0814552587915,0.081382692058,0.0813467085538,0.0812921335724,0.0812933330225,0.0812909341222,0.0813323151521,0.0813173220253,0.0812729423701,0.0812765407205,0.08122916244,0.0811919794856,0.0811547965312,0.0811248102777,0.0810564416197,0.0810330523419,0.0809304993549,0.0808513356456,0.0808075557155,0.080743984858,0.080743984858,0.0806948074022,0.0806324359949,0.0805814593639,0.0805826588141,0.0805388788839,0.0804986973042,0.0804489201233,0.0803943451419,0.0803589613628,0.0803379709853,0.0803361718101,0.0802773987532,0.0802366174484,0.0801862405425,0.0800962817819,0.0800435059757,0.0799877315442,0.0800015252208,0.0799937287949,0.0799505485898,0.0799031703092,0.0798210079746,0.0798096131983,0.0797754288692,0.0797682321684,0.0797508401414,0.0797328483892,0.0797028621357,0.079696864885,0.0797100588366,0.0796920670845,0.0797076599363,0.079713657187,0.0796602816557,0.0796171014507,0.0795769198709,0.0795745209706,0.0795727217954,0.0795391371915,0.0794989556118,0.0795235443397,0.0795319404906,0.0795751206957,0.0795931124478,0.0795565292185,0.0795745209706,0.0795685237199,0.079577519596,0.0795709226202,0.0795679239949,0.0796159020005,0.0796362926529,0.0796662789064,0.0796578827554,0.0796848703836,0.0796962651599,0.0797208538878,0.0797922211712,0.0797760285943,0.0797694316185,0.0797628346428,0.0796896681842,0.0796584824805,0.079637492103,0.0796159020005,0.0796159020005,0.0795937121729,0.0795817176715,0.0795931124478,0.0796236984264,0.0796722761571,0.0796758745076,0.0796488868794,0.0796272967768,0.079687869009,0.0796656791814,0.0796872692839,0.0796770739577,0.0796758745076,0.0796758745076,0.0796866695588,0.0796854701087,0.0797160560873,0.0797112582867,0.0797676324433,0.079765233543,0.0797502404163,0.0797592362923,0.0797658332681,0.0797460423408,0.079722653063,0.0797256516884,0.0797112582867,0.0796872692839,0.0797040615859,0.0796908676343,0.0796608813808,0.0797010629605,0.079730449489,0.0797526393166,0.0797460423408,0.0797268511385,0.0797556379419,0.0797418442653,0.0797130574619,0.0796872692839,0.0796776736828,0.0796716764321,0.0796716764321,0.079645888254,0.079594911623,0.0795889143723,0.0795493325177,0.0795073517628,0.0794443806304,0.0794485787059,0.0794197919025,0.0794077974011,0.0793520229695,0.0793256350664,0.0792530683329,0.0792362760309,0.0792218826292,0.0791583117718,0.0791115332163,0.0791031370653,0.079074949987,0.0790281714315,0.0789891893019,0.0789783942506,0.0789400118461,0.0789693983746,0.0789927876523,0.0789753956253,0.0789502071723,0.0789262181695,0.0789274176197,0.0789490077222,0.0789400118461,0.0789328151453,0.0789586033233,0.078998784903,0.0789568041481,0.0789711975498,0.0790383667577,0.0790689527363,0.0790677532861,0.0791193296422,0.0791373213943,0.0791577120467,0.0791900972005,0.0791703062732,0.0791888977504,0.0791655084726,0.079160110947,0.0791840999498,0.0792128867532,0.0792650628343,0.0792344768557,0.0792974479881,0.079322036716,0.0793238358912,0.0793256350664,0.0793556213199,0.0793670160963,0.0793418276433,0.0793976020749,0.0793856075735,0.0793484246191,0.079407197676,0.0794023998754,0.079423989978,0.0794065979509,0.0793754122473,0.079373013347,0.0793892059239,0.0793868070236,0.0793616185706,0.0793802100478,0.079423989978,0.0794185924523,0.0794359844794,0.079449778156,0.0793802100478,0.0793640174709,0.0793790105977,0.0793586199453,0.0771588283869,0.0749476420522,0.0727706400466,0.0705822432645,0.0683836511563,0.0661898568487,0.0639378892092,0.0617758803303,0.0595311093916,0.0573265200327,0.0551171328732,0.0529197402152,0.0507151508563,0.0485135601227,0.0463167671897,0.0440761943265,0.0418734041428,0.0396832081856)
s <- c(0.044785717721,0.0447645685335,0.0447579594124,0.044755315764,0.044749367555,0.0447401147855,0.0447302011039,0.0447242528949,0.0447298706478,0.0447305315599,0.0447777867757,0.044779439056,0.0447966227708,0.0447923268421,0.0447982750511,0.0448042232601,0.0448167805902,0.0448062059964,0.0447886918255,0.0447959618587,0.0448124846615,0.0448032318919,0.0448214069749,0.0448190937826,0.0447873700013,0.0447665512699,0.0447539939398,0.0447272269994,0.0447136783011,0.0447150001253,0.0447226006146,0.0446974859544,0.0446849286244,0.0446680753656,0.0446667535414,0.0446730322064,0.0446928595697,0.0446971554984,0.0446928595697,0.0446872418167,0.0446769976791,0.0446657621732,0.0446819545199,0.0446783195033,0.0446617967005,0.0446839372562,0.0446439520736,0.0446313947435,0.0446320556556,0.044628420639,0.0446095846439,0.0445937227533,0.0445722431097,0.0445735649339,0.0445765390384,0.0445540680267,0.0445203615091,0.0445263097181,0.0444942554808,0.0445002036898,0.044495577305,0.0444797154144,0.0445064823548,0.0445031777943,0.0444800458705,0.0444572444027,0.0444479916332,0.0444443566166,0.0444602185072,0.0444526180179,0.0444546007543,0.0444542702982,0.0444552616664,0.0444387388636,0.0444218856049,0.0444017277855,0.0443832222465,0.0443819004222,0.0443729781088,0.0443581075863,0.0443409238715,0.0442989559525,0.0442887118148,0.0442754935726,0.0442821026937,0.0442665712592,0.0442404652308,0.0442216292357,0.0442335256537,0.0442262556205,0.0442176637631,0.0442179942191,0.044211054642,0.0441965145756,0.0442027932406,0.0441730521957,0.0441707390033,0.0441545466566,0.0441089437211,0.0440891163578,0.044072263099,0.0440491311752,0.0440269906195,0.0440124505531,0.0439790744916,0.04396916081,0.0439417329574,0.0439116614564,0.0438696935375,0.0438452397895,0.0438270647064,0.0438333433715,0.0438287169867,0.0438224383217,0.0438161596566,0.043781792227,0.0437774962982,0.0437808008588,0.0437778267543,0.0437622953197,0.0667137901407,0.0679199547402,0.0691079442567,0.070312456576,0.0715001156365,0.0727076020602,0.0739064966266,0.0751162962427,0.0762950329897,0.0774975625727,0.0786934830345,0.0799102222278,0.0810965594641,0.0823228818829,0.0835363165157,0.084765282583,0.0860021795956,0.0872238756297,0.0872344502235,0.0872351111356,0.0872427116248,0.0872090051073,0.0872212319813,0.0872311456629,0.0872764181424,0.0873190469735,0.0872916191209,0.087249981658,0.0872450248172,0.0872063614588,0.0871660458202,0.0871627412596,0.0871716635731,0.0871908300243,0.0871901691121,0.0872004132498,0.0872156142284,0.087207352827,0.0872179274207,0.08722552791,0.0872598953397,0.0872470075535,0.0872397375203,0.0872215624373,0.0872969064178,0.0872820358953,0.0872717917576,0.0872787313348,0.0872949236815,0.08726154762,0.0872820358953,0.0873031850828,0.0873048373631,0.0873197078856,0.0873382134246,0.0873332565838,0.0873256560946,0.0873540753153,0.0873514316668,0.087322021078,0.0873190469735,0.0873206992537,0.0873474661942,0.0873907559373,0.0873725808543,0.0873702676619,0.0873960432342,0.0874218188065,0.0874456116424,0.0874634562694,0.087485596825,0.0874770049676,0.0874631258133,0.0874766745115,0.0874998064354,0.0874826227205,0.0874413157137,0.0874584994285,0.0874320629442,0.0874089310203,0.0873573798758,0.0873739026785,0.0874039741795,0.0873821640799,0.0873742331346,0.0873963736903,0.0873851381844,0.0873633280848,0.0873316043035,0.0873240038143,0.0873038459949,0.087316403325,0.087340196161,0.0873563885076,0.0873474661942,0.0873907559373,0.0873762158709,0.0873616758045,0.0873596930682,0.0873672935574,0.0873844772723,0.0874238015428,0.0874241319988,0.0874522207635,0.0874700653904,0.0874961714188,0.0875358261453,0.087569863119,0.0876240579119,0.0876468593797,0.0876465289236,0.0876901491229,0.0877493007566,0.0877648321912,0.0878124178631,0.0878586817107,0.0878927186844,0.0879284079383,0.087914528784,0.0879703758572,0.0879601317195,0.0879650885603,0.0879495571258,0.0879697149451,0.0879862377478,0.0879987950779,0.0879938382371,0.0879832636433,0.0880136656004,0.0880384498045,0.0880903314051,0.0881286643074,0.0881395693572,0.0881577444402,0.0881894682215,0.0881937641502,0.0882248270193,0.0881980600789,0.0881841809246,0.0881570835281,0.0881554312478,0.0881154460652,0.0881108196804,0.0880714954099,0.0880678603933,0.0880586076238,0.0880427457332,0.0880202747215,0.0880159787928,0.0880219270017,0.0880800872674,0.0881326297801,0.0881838504685,0.0882089651287,0.0882691081306,0.0882909182302,0.0883454434793,0.0883884027664,0.0884399539109,0.0884442498396,0.0884987750886,0.0885182719959,0.0885542917058,0.0886031992019,0.0885602399148,0.08859163324,0.0885846936628,0.0885873373113,0.0886421930164,0.0886838304792,0.0886990314578,0.0887257983982,0.0887684272292,0.0888018032908,0.0888715295183,0.0889237415749,0.0889564567243,0.0890073469568,0.088990824154,0.0890503062439,0.0890552630847,0.089087647778,0.0891190411032,0.0891484516921,0.089160017654,0.0891325898015,0.0891163974548,0.089117719279,0.0891045010368,0.08906319403,0.0890446884909,0.0890407230183,0.0890800472888,0.0890823604812,0.0891104492458,0.089123337032,0.0891550608132,0.0892132210788,0.0892654331355,0.089286912779,0.0893444121325,0.0893556476384,0.0894141383601,0.089413807904,0.0893926587165,0.0894161210964,0.0894223997614,0.0894643676804,0.089444209861,0.0894951000935,0.0895463207819,0.0895668090573,0.0895975414704,0.0896342220925,0.0897274106999,0.0897812750368,0.0898645499626,0.0899058569694,0.0899990455768,0.0900829814147,0.0901226361413,0.0902072328913,0.0902515140026,0.0902938123776,0.0903238838786,0.0904253338873,0.0905066260768,0.0906027887887,0.0906358343942,0.0907412498756,0.0907795827779,0.0908800414186,0.0909500981022,0.0909950401256,0.0910826109801,0.0911619204332,0.0912019056158,0.0912570917769,0.0912828673492,0.0913489585601,0.0914553654097,0.0914963419605,0.0915964701451,0.0917032074507,0.0918277893834,0.0919143688697,0.0919665809263,0.0920406030826,0.092115616607,0.0922025265494,0.0922309457701,0.0922877842115,0.0923664327525,0.0924199666333,0.0924824228277,0.0925300084995,0.0926390589976,0.0927580231772,0.0928564990815,0.092919616188,0.0930171007241,0.0930987233696,0.0931449872173,0.0931631623003,0.0932355321762,0.0932903878813,0.0933749846313,0.0934222398471,0.0934787478325,0.0935388908344,0.0936046515893,0.093663142311,0.0937596354789,0.0938363012836,0.0939086711596,0.0939724491782,0.0940282962514,0.0941340421889,0.0941922024545,0.0942169866586,0.0942599459457,0.0942926610951,0.0943637091469,0.0944545845619,0.0945223280531,0.0945844537914,0.0946627718764,0.0947229148783,0.0947552995717,0.0948365917611,0.0948921083783,0.094926475808,0.0949486163636,0.0949833142494,0.0950057852611,0.0950603105101,0.0950976520443,0.0951538295736,0.0952483400052,0.0953352499476,0.095409933016,0.095446613638,0.0955047739037,0.0955629341693,0.0955728478509,0.0956478613753,0.0956947861351,0.0957955752318,0.095881493806,0.095960472803,0.0960619228118,0.0961746083265,0.0962694492142,0.0963477672991,0.0964214589993,0.0964951506995,0.0965675205755,0.096625019929,0.0967063121184,0.0967591850872,0.0968460950296,0.0969088816799,0.0969739815227,0.0970559346243,0.0971408618303,0.0972330590696,0.0972885756868,0.0973857297668,0.0974812315666,0.0975572364592,0.0976196926535,0.0977138726291,0.0978011130275,0.0978470464191,0.0978672042385,0.0979372609221,0.0980026912209,0.0980691128879,0.0981391695715,0.0982194703928,0.0983430609572,0.0983979166623,0.0984471546144,0.0984587205763,0.09849275755,0.0985852852453,0.0986550114728,0.098704579881,0.0987422518712,0.0988083430822,0.0988962443927,0.098958700587,0.0990317313751,0.0991166585812,0.099170192462,0.0992432232501,0.0993083230929,0.0993886239142,0.0994794993292,0.0995591392384,0.0996209345206,0.0996711638409,0.0997719529376,0.099829121835,0.0998919084854,0.0999735311309,0.100107696289,0.100166517467,0.100247148744,0.100345294192,0.100445752833,0.10052638411,0.100617589981,0.100715404974,0.100781826641,0.100842630555,0.100899468996,0.100952341965,0.101034955979,0.101108317223,0.101197209901,0.101228272771,0.101266275217,0.101287093948,0.101356820176,0.101368386138,0.101387552589,0.101425885491,0.101462235657,0.101521717747,0.101558067913,0.101573929804,0.101595409447,0.101620524107,0.101627794141,0.101641012383,0.10166216157,0.10170743405,0.10174510604,0.101804257674,0.101855808818,0.101884558495,0.101909673155,0.101963207036,0.101986008504,0.102023680494,0.102063335221,0.102076223007,0.102098694019,0.102137357377,0.102179655752,0.102221293215,0.102259295661,0.102307211789,0.102366363423,0.102421549584,0.102461534767,0.102489623531,0.102539852851,0.102604622238,0.102643285597,0.102678974851,0.1027335001,0.102778111667,0.102819418674,0.102867334802,0.102911946369,0.102975063475,0.102992908102,0.103023970972,0.103059329769,0.103097662672,0.10315978841,0.103211339555,0.103242071968,0.103275778485,0.103299240865,0.103302875882,0.103319068228,0.10336500162,0.10339011628,0.103389785824,0.103419196413,0.103430431919,0.10344959837,0.103457859771,0.103465129805,0.103486278992,0.103493218569,0.10350908046,0.103502471339,0.103529899191,0.103535186488,0.10355930978,0.10357351939,0.10359202493,0.103621435518,0.103657124772,0.103660429333,0.103674638943,0.103712310933,0.10371759823,0.103744695627,0.103754609308,0.103802855892,0.103838875602,0.103861016158,0.103876217137,0.103855728861,0.103841519251,0.103847797916,0.103874564856,0.103898027236,0.103930081473,0.103959492062,0.103931403298,0.103922150528,0.103941316979,0.103903975445,0.103920498248,0.103888444011,0.103857711598,0.103876217137,0.103866303455,0.103840527883,0.103819709151,0.103794594491,0.103760887973,0.103730486016,0.103726520544,0.103709336829,0.103704379988,0.103676952136,0.103669351646,0.103657455228,0.103665055718,0.103627053271,0.103615487309,0.103578806687,0.103543117433,0.103487600816,0.103441336969,0.10341357866,0.103392759929,0.103402343154,0.103381854879,0.103349800641,0.103317085492,0.103282718062,0.103283378974,0.10325363793,0.103255951122,0.1032711521,0.103265534348,0.103248681089,0.103259916595,0.103270160732,0.103269830276,0.103240089231,0.103233149654,0.103251324737,0.103258925226,0.103260577507,0.103241741512,0.103245376528,0.103224557797,0.103217287764,0.103183581246,0.103141943783,0.103099975864,0.103071556643,0.102996873575,0.102960192953,0.102930451908,0.102900049951,0.102875265747,0.102872622099,0.102824045059,0.10281974913,0.102809174536,0.102741100589,0.102696158565,0.102666087064,0.10258182077,0.102502841773,0.102444351052,0.102395443556,0.102280444849,0.102226580512,0.10216808979,0.102150575619,0.102102989947,0.102038551017,0.101994930817,0.101938753288,0.101897446281,0.10185316517,0.101793352624,0.101704129489,0.101631098701,0.10156665977,0.101471157971,0.101398127183,0.101331705516,0.101282137107,0.101244795573,0.101197870813,0.101173417065,0.101138058268,0.101083202563,0.101016780896,0.10097283024,0.100887903034,0.100880963457,0.100809915405,0.100720692271,0.10068302028,0.100652287867,0.10059842353,0.10058421392,0.100563064732,0.100479789807,0.100391888496,0.100407419931,0.100368756572,0.100307952658,0.100271272036,0.100212450858,0.100157264697,0.100103069904,0.100073989772,0.0999870798292,0.0998988480626,0.0998522537589,0.0998086335597,0.0997587346954,0.0996853734513,0.0996315091144,0.0995502169249,0.0994927175714,0.0994147299425,0.0992901480099,0.0992055512599,0.0990998053224,0.0990122344679,0.0989081408107,0.0988063603458,0.0987062321613,0.0986256008839,0.0985016798634,0.0984008907668,0.0983205899455,0.098251194174,0.0981262817853,0.0980268145129,0.0979204076633,0.0978318454406,0.0977469182346,0.0976593473801,0.0975407136565,0.0974187753723,0.0973173253635,0.0972254585803,0.0971094685051,0.097036107261,0.0969449013899,0.0968094144075,0.0967291135862,0.0966276635774,0.0964825933694,0.0963917179544,0.0962952247864,0.0962112889485,0.0961531286829,0.0960648969163,0.0959674123802,0.0958957034163,0.0958547268655,0.0957503027523,0.0956805765247,0.0955797874281,0.0955064261839,0.0954618146165,0.095337893596,0.0952506531976,0.0951696914642,0.095101617517,0.0950312303773,0.0949254844398,0.0948769073998,0.094799580683,0.0946954870258,0.0946178298529,0.0945543822904,0.0944968829369,0.0944496277211,0.0943673441635,0.0943005920404,0.0942001333998,0.094140981766,0.0940487845268,0.0939800496674,0.0939215589457,0.093820439393,0.0937546786381,0.0937219634887,0.0936621509428,0.0936492631567,0.0935861460502,0.0935147675424,0.0934833742172,0.0934189352866,0.093354826812,0.0932722127983,0.0932005038345,0.0931486222339,0.0930838528472,0.0930481635932,0.0929956210806,0.0929348171665,0.0929063979458,0.0928383239985,0.0927613277378,0.0927068024888,0.0926390589976,0.0925637150171,0.0924959715259,0.0924506990464,0.0923720505054,0.0922649827437,0.0922025265494,0.0921308175855,0.0920938065074,0.0920293675767,0.0919573281568,0.0918786796158,0.0918039965474,0.0917094861158,0.0916724750377,0.0916490126578,0.0916116711236,0.0915290571099,0.0914669313717,0.0913334271256,0.0912679968267,0.0911681990982,0.0910684013697,0.0910089192799,0.0909177134088,0.0908810327867,0.0908430303404,0.0907802436901,0.0907240661608,0.090646739444,0.0905581772213,0.0905819700573,0.0905330625612,0.0905165397584,0.0905053042526,0.0904365693932,0.0904101329088,0.0903589122204,0.0903182661256,0.0902584535797,0.0902141724684,0.0901864141598,0.0901249493337,0.090054562194,0.0899960714723,0.0899524512731,0.0899161011071,0.0898662022428,0.0898460444235,0.0898453835114,0.0897627694977,0.0897032874079,0.0896368657409,0.0896289347956,0.089576722739,0.0895740790905,0.0895509471667,0.0895492948864,0.0895268238747,0.0895017092145,0.0894693245212,0.0894306611628,0.0893744836335,0.0893255761374,0.0893113665271,0.0892631199431,0.0892155342712,0.0891312679773,0.089051297612,0.0889885109616,0.0889379511853,0.0888946614421,0.0888434407536,0.0888282397751,0.0887938723454,0.0888077514997,0.0887766886306,0.0887495912341,0.0886877959519,0.0886540894343,0.0886577244509,0.0885962596248,0.0885655272117,0.0885278552214,0.0884749822527,0.0884125260584,0.0883993078162,0.0884009600964,0.088368244947,0.0883566789851,0.0883580008093,0.0883266074841,0.0883067801209,0.0882535766961,0.0882297838601,0.0882205310906,0.088241019366,0.0882244965633,0.0882284620359,0.0882327579646,0.0882059910242,0.0882016950955,0.0882178874422,0.0882433325584,0.0882605162732,0.0882268097556,0.0882020255515,0.0881957468865,0.0882188788103,0.0881848418367,0.0881689799461,0.0881273424832,0.0881230465545,0.088144195742,0.0881917814138,0.0881917814138,0.0881551007918,0.0881812068201,0.0882026864636,0.0882205310906,0.0882145828816,0.0882218529148,0.0882324275086,0.0882304447722,0.0882363929812,0.0882013646394,0.0882182178982,0.088210947865,0.0882020255515,0.0882400279978,0.0882420107342,0.0882165656179,0.0881937641502,0.0881408911814,0.0881028887351,0.088047702574,0.0880249011062,0.0880282056668,0.0880080478474,0.0879766545223,0.0879551748787,0.0879723585935,0.0879700454012,0.0879495571258,0.0879125460476,0.0878913968601,0.0878871009314,0.0878411675398,0.0878431502762,0.08781770516,0.0878071305662,0.0878018432693,0.0878008519012,0.0877955646043,0.0877889554832,0.0877390566189,0.0877552489656,0.0877198901678,0.0877000628045,0.0876815572654,0.0876766004246,0.0876742872322,0.0876435548191,0.087636615242,0.087618440159,0.0876191010711,0.0876019173563,0.0875768026961,0.0875245906395,0.0875371479695,0.087570193575,0.0875893600262,0.0875959691473,0.0875814290809,0.0875873772899,0.0875705240311,0.0875536707723,0.0875553230526,0.0875345043211,0.0875255820076,0.0875107114852,0.087503771908,0.0874859272811,0.0874872491053,0.0874654390057,0.0874280974715,0.0873772072391,0.0873897645692,0.0873844772723,0.0873699372059,0.0873408570731,0.0873517621229,0.0873200383416,0.0873511012108,0.0873392047928,0.0873154119569,0.0873091332918,0.0873081419237,0.0872873231922,0.0872628694442,0.0872294933826,0.087195456409,0.0871782726942,0.0871895082,0.0872337893114,0.0872096660194,0.0872060310028,0.0872030568983,0.087183559991,0.0871974391453,0.0871888472879,0.0871947954969,0.0872000827938,0.087213301036,0.0872228842616,0.0872513034823,0.0872929409451,0.0872969064178,0.0873008718905,0.0873616758045,0.0873801813436,0.087388773201,0.0874350370487,0.0874224797186,0.0874204969822,0.0873831554481,0.0873520925789,0.0873448225457,0.0873752245028,0.0873795204315,0.0873729113104,0.0874029828113,0.0874185142459,0.0874333847684,0.0874380111531,0.0874644476375,0.0875031109959,0.0875179815184,0.0875467311951,0.0875523489481,0.0875374784256,0.087600265076,0.0875751504158,0.0875959691473,0.0876048914608,0.087582089993,0.087570193575,0.0875629235418,0.0875840727293,0.0875705240311,0.0875675499266,0.0876108396697,0.0876194315272,0.0876442157313,0.0876637126385,0.0876326497693,0.0876283538406,0.0876633821824,0.0876461984676,0.0864245024335,0.0851955363662,0.0840333224219,0.0828631775323,0.0816794839445,0.0804842243948,0.079258562888,0.0780824697894,0.0768571387387,0.0756556005239,0.0744345654019,0.0732393058522,0.0720440463025,0.0708147497791,0.0696095765477,0.0683743318154,0.0671437134678,0.0659111123839,0.0440385565814,0.0440570621205,0.0440577230326,0.0440772199398,0.0441006823197,0.0441294319965,0.0441400065902,0.0441479375355,0.0441816440531,0.0441737131078,0.0441472766234,0.0441452938871,0.0441730521957,0.0441783394926,0.0441806526849,0.0441773481244,0.0441938709271,0.0442041150648,0.0442288992689,0.0442460829838,0.0442394738627,0.0442500484564,0.0442546748412,0.0442411261429,0.0442563271215,0.0442374911263,0.0442417870551,0.0442335256537,0.0442269165326,0.0442179942191,0.0442067587133,0.0442156810267,0.0442219596918,0.0442530225609,0.0442738412924,0.0442824331498,0.0442920163754,0.0442721890121,0.0442493875443,0.0442236119721,0.0442060978012,0.0442094023617,0.0442107241859,0.0441988277679,0.0441651212504,0.0441975059437,0.0442160114828,0.0442133678344,0.0442057673451,0.0441948622953,0.0441866008939,0.0441866008939,0.0441866008939,0.0441859399818,0.0442027932406,0.0442146896586,0.0442021323285,0.0441925491029,0.0441948622953,0.0441968450316,0.0441780090365,0.0441770176683,0.0441790004047,0.0441753653881,0.0441971754877,0.0442203074115,0.0442150201146,0.0442176637631,0.0442080805375,0.0442008105043,0.0441975059437,0.0442262556205,0.0442335256537,0.0442546748412,0.0442890422709,0.0443062259857,0.0443234097006,0.0443356365746,0.0443366279427,0.044344228432,0.0443627339711,0.0443676908119,0.044362073059,0.044392475016,0.0443729781088,0.044398753681,0.0444152764838,0.0444275033578,0.044410980555,0.0444037105218,0.0443964404886,0.0444007364174,0.0444222160609,0.0444436957045,0.0444436957045,0.0444413825121,0.044446669809,0.0444483220892,0.0444453479847,0.0444450175287,0.0444370865834,0.0444245292533,0.0444189115004,0.0444344429349,0.0444255206215,0.0444268424457,0.044435103847,0.0444473307211,0.0444334515668,0.0444420434242,0.0444139546595,0.0444050323461,0.0443937968402,0.044362403515,0.0443733085648,0.0443792567738,0.0443895009115,0.0443759522133,0.0443918141039,0.0443785958617)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("12-organelles-nucleus-merged/PISTILLATA-GFP-AP1-GR-ap1-cal-ChIPseq-GSM940585.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=241"),bty="n")
dev.off()
