# R script for Peak Model
#  -- generated by MACS
p <- c(0.0397436364276,0.0416680542186,0.0439451954861,0.0458903617169,0.0479963283561,0.0500763594456,0.0523275651633,0.0544179704727,0.0566432406407,0.0586714006307,0.0606891864008,0.0627069721708,0.0647040095011,0.0673598097949,0.0692582920362,0.0717117950419,0.0739578136498,0.0762972002367,0.0761830838178,0.0762401420272,0.0764735619749,0.0763542584461,0.0761104642785,0.0761675224879,0.0764476264252,0.0764320650953,0.0768418467813,0.0772256929175,0.0768937178808,0.0770597053991,0.0769196534305,0.0775006097448,0.077682158593,0.0772671897971,0.0771582604882,0.0772308800274,0.0773501835563,0.0774591128652,0.0775213581846,0.0779207656506,0.0779674496402,0.0778273976715,0.0777444039124,0.0778637074412,0.0778740816611,0.0780504433993,0.0781075016088,0.0783772313261,0.0783979797659,0.0776510359333,0.0780763789491,0.0779259527606,0.077583603504,0.0772256929175,0.0777599652422,0.0776510359333,0.0775576679542,0.0774902355249,0.0776147261636,0.0777910879019,0.0783357344465,0.078589902834,0.0783461086664,0.078491347745,0.0786469610435,0.0789011294309,0.07899968452,0.078185308258,0.0780193207397,0.0783357344465,0.0784654121952,0.0784291024256,0.0783253602266,0.0784135410958,0.078392792656,0.0777184683626,0.077272376907,0.0773346222264,0.0771790089279,0.076872969441,0.076867782331,0.0766084268336,0.0766291752734,0.0759755994198,0.0761934580377,0.0764476264252,0.0761156513884,0.0754050173255,0.0753790817757,0.0755761919538,0.0752234684773,0.0750937907285,0.0746269508331,0.0751560360479,0.0741808593776,0.0738436972309,0.073423541325,0.0730552565187,0.073423541325,0.0736362128329,0.0735480319638,0.0737970132413,0.0737710776916,0.0737451421419,0.0738436972309,0.073122688948,0.0731538116077,0.0731953084873,0.0730085725291,0.0729411400998,0.0724379904348,0.0728322107909,0.0730500694087,0.0733561088957,0.0735065350842,0.0738955683304,0.0738851941105,0.0737192065921,0.0737814519115,0.0742223562571,0.0740771171786,0.0738385101209,0.0738540714508,0.0744246535451,0.0749070547704,0.0746580734928,0.0747514414719,0.0749952356395,0.0753220235663,0.0749537387599,0.0757940505716,0.0763335100063,0.0765046846346,0.0765773041739,0.0762401420272,0.0757058697025,0.0762349549173,0.0756903083726,0.0761363998282,0.0765721170639,0.0762297678073,0.0767329174724,0.0768625952211,0.0767536659121,0.0766188010535,0.0764424393152,0.0764839361948,0.0770026471897,0.0768003499017,0.0764787490849,0.0762038322576,0.0762868260168,0.0767951627917,0.0768833436609,0.0769300276504,0.0771530733782,0.0773968675458,0.0779155785407,0.0778896429909,0.0779259527606,0.0776251003835,0.077785900792,0.0775939777239,0.0774383644254,0.0773709319961,0.0774539257552,0.0768107241216,0.0766239881634,0.0769767116399,0.0771841960379,0.0769144663206,0.076769227242,0.0764320650953,0.0766499237132,0.0760534060691,0.076058593179,0.076260890467,0.0762401420272,0.0759704123099,0.0756228759433,0.076162335378,0.0763853811058,0.0769818987499,0.0769559632002,0.077479861305,0.0776977199228,0.0782579277973,0.0782423664675,0.0779103914307,0.0783357344465,0.0785069090748,0.0782631149072,0.0781282500486,0.0778170234517,0.0783046117868,0.0783824184361,0.0785691543942,0.0785380317345,0.0787403290225,0.0784757864151,0.0784291024256,0.0787195805827,0.079305724007,0.0791189880488,0.0789218778707,0.078688457923,0.0790723040593,0.0791449235985,0.0792486657975,0.0794146533159,0.0793109111169,0.0796843830332,0.0795391439546,0.079508021295,0.0796376990437,0.0803846428763,0.0801045389391,0.080114913159,0.080213468248,0.0799281772008,0.0796376990437,0.0799644869704,0.0795391439546,0.0793627822164,0.0793109111169,0.0793160982268,0.0789374392006,0.0789581876404,0.0790515556195,0.0792797884572,0.0791241751587,0.0790411813996,0.0791086138289,0.0796791959233,0.0793264724467,0.0797881252322,0.0800526678396,0.0799489256406,0.0800474807296,0.0801356615988,0.0799333643108,0.0806388112638,0.0804365139758,0.0806388112638,0.0809967218503,0.0807269921329,0.0808618569916,0.0807892374523,0.0813131355571,0.0814531875257,0.0812042062482,0.0814480004158,0.0816866074734,0.0818629692117,0.0816191750441,0.0813338839969,0.0814531875257,0.0812457031278,0.0815154328451,0.081323509777,0.0812405160178,0.0807529276827,0.081525807065,0.0815724910546,0.081432439086,0.0811108382691,0.0813494453268,0.0813909422064,0.0815517426148,0.0807269921329,0.0811730835885,0.0813546324367,0.0814013164263,0.0811678964786,0.0812457031278,0.0815984266043,0.081831846552,0.0812716386775,0.081629549264,0.0819511500808,0.0817799754525,0.0820963891594,0.0820548922798,0.0820808278296,0.082236441128,0.0824283641961,0.0826825325836,0.0825269192851,0.0825684161647,0.0828692685418,0.0830196947303,0.0834035408665,0.083652522144,0.0837770127828,0.0838703807619,0.084166046029,0.0843268464374,0.0846225117045,0.0845395179453,0.0849907965108,0.0852916488878,0.0856703079141,0.085478384846,0.0858518567623,0.0859141020817,0.0867181041238,0.0869463369615,0.086894465862,0.0869359627416,0.0876777194643,0.0875221061658,0.0874287381867,0.0875428546056,0.0881964304592,0.0881808691293,0.088009694501,0.0880252558309,0.0879578234015,0.0879007651921,0.087610287035,0.0874391124066,0.0872420022286,0.0868062849929,0.0868529689824,0.0872679377783,0.0870863889301,0.0870708276003,0.0870656404903,0.087200505349,0.0871330729197,0.0873561186475,0.0876569710245,0.0877451518936,0.0881964304592,0.0875999128151,0.0874909835061,0.0875272932758,0.0879889460612,0.088009694501,0.0874183639668,0.0875272932758,0.0875999128151,0.0872523764485,0.0870656404903,0.0872212537888,0.0868892787521,0.0872523764485,0.0877399647837,0.0876517839145,0.0880356300508,0.0882690499984,0.0884765343964,0.0886528961347,0.0887358898938,0.0893116590982,0.0897733118836,0.0900689771507,0.0904735717267,0.0910908378106,0.0913346319782,0.0909559729519,0.0911738315698,0.0915161808264,0.0920971371407,0.0922320019993,0.0925017317167,0.0927144032246,0.0928855778529,0.0934302243975,0.0935132181567,0.093990432272,0.0937933220939,0.0941771682301,0.0938918771829,0.0939541225023,0.0946647565653,0.0948203698638,0.0949033636229,0.0952923968691,0.0955932492461,0.0957177398849,0.0959355985028,0.0955828750262,0.0953442679686,0.0953494550785,0.0947010663349,0.0944676463872,0.0947218147747,0.0942653490992,0.0950174800418,0.0953390808586,0.0949759831622,0.0944417108375,0.0943016588689,0.0941408584605,0.093886690073,0.0941823553401,0.0941149229107,0.093476908387,0.0930826880309,0.093476908387,0.093378353298,0.0930463782613,0.0926054739156,0.0921126984705,0.0922527504391,0.0926780934549,0.0929478231723,0.0924498606172,0.0922112535595,0.0919985820516,0.0916147359154,0.0915265550463,0.0921386340202,0.0919155882924,0.0923253699784,0.0925172930465,0.0920763887009,0.092465421947,0.0929167005126,0.0932019915597,0.0938451931934,0.0938607545232,0.0937725736541,0.0940319291515,0.0935339665965,0.0931656817901,0.0937103283347,0.094395026848,0.0946180725758,0.0948670538533,0.0948099956439,0.0950537898115,0.0953131453089,0.095712552775,0.0959200371729,0.0953442679686,0.0953650164084,0.0953961390681,0.0956606816755,0.0954531972775,0.095100473801,0.0949811702722,0.0953857648482,0.095805920754,0.0961897668902,0.0963765028484,0.0968277814139,0.0970715755815,0.0965269290369,0.0970508271417,0.0968070329741,0.0970767626915,0.0975072928172,0.0976888416654,0.0980260038121,0.0979533842728,0.0982179268802,0.0983320432991,0.0982179268802,0.0983891015085,0.0984513468279,0.0985550890269,0.0983164819692,0.0983683530687,0.0985706503567,0.0986795796657,0.0983839143986,0.0982283011001,0.0982231139902,0.0980986233514,0.0977147772152,0.0976006607963,0.097834080744,0.097735525655,0.098337230409,0.099146419561,0.0993694652888,0.0991204840113,0.098850754294,0.0987055152154,0.0988144445243,0.0990789871317,0.099151606671,0.0985291534771,0.0986692054458,0.0985084050373,0.0987625734248,0.0983735401787,0.0985187792572,0.0985758374667,0.0983631659588,0.0985913987965,0.0978703905136,0.0985343405871,0.0992812844197,0.0996703176659,0.0999815442628,0.100183841551,0.100666242776,0.100868540064,0.100718113876,0.100967095153,0.101771097195,0.101656980776,0.101755535865,0.102398737499,0.103124932892,0.103700702096,0.10428684552,0.105204963981,0.105064912013,0.104473581478,0.105230899531,0.105547313238,0.105817042955,0.106117895332,0.105977843364,0.106014153133,0.10634612817,0.107259059521,0.106999704024,0.10734205328,0.107767396296,0.108031938903,0.108493591689,0.1083950366,0.108203113532,0.108535088568,0.108535088568,0.10836910105,0.108244610411,0.108063061563,0.108099371333,0.108104558443,0.107720712306,0.10736280172,0.10739911149,0.107502853689,0.107642905657,0.108254984631,0.108483217469,0.10837947527,0.108208300642,0.107741460746,0.10739392438,0.106812968065,0.107160504432,0.1074042986,0.107186439982,0.107508040798,0.107170878652,0.107497666579,0.10734205328,0.107611782997,0.107772583406,0.107580660338,0.108021564683,0.108026751793,0.108068248673,0.108146055322,0.108063061563,0.107933383814,0.107710338086,0.107409485709,0.107513227908,0.107523602128,0.107632531437,0.107658466987,0.107497666579,0.107565099008,0.108146055322,0.107782957626,0.108037126013,0.107814080285,0.10731093062,0.107010078243,0.10634612817,0.106538051238,0.106662541877,0.107243498191,0.107419859929,0.107663654097,0.10739392438,0.107865951385,0.107528789238,0.106844090725,0.10731093062,0.10633575395,0.10637206372,0.106050462903,0.105038976463,0.104779620965,0.104260909971,0.103897812274,0.103041939133,0.102922635604,0.102450608598,0.102460982818,0.101968207373,0.101594735457,0.101433935048,0.100972282263,0.100329080629,0.100048976692,0.0997844340847,0.0994939559276,0.0988818769537,0.0991827293307,0.098850754294,0.0984824694876,0.0983631659588,0.0978703905136,0.0981919913305,0.0971805048905,0.0969730204925,0.0965061805971,0.0959044758431,0.0954428230576,0.0946128854658,0.0934094759577,0.0932331142194,0.0931241849105,0.0927559001041,0.0929426360623,0.0928233325335,0.0923253699784,0.0923461184182,0.0924291121774,0.0923253699784,0.0915421163761,0.0918533429731,0.0918014718736,0.0917962847636,0.0913605675279,0.0915006194965,0.0912775737687,0.0914072515175,0.0912153284494,0.0909404116221,0.0906136236953,0.090240151779,0.090234964669,0.0901208482502,0.0902194033392,0.0899548607318,0.0904735717267,0.0903646424178,0.0906239979152,0.0898926154124,0.090841856533,0.0904580103968,0.0907381143341,0.0908159209833,0.0906603076848,0.0907744241037,0.0909352245121,0.0909715342818,0.0911893928996,0.0912983222085,0.0911271475802,0.0909300374022,0.0910078440514,0.0916458585751,0.0918222203134,0.0913761288578,0.0918948398526,0.0915680519259,0.0914746839468,0.0919467109521,0.0919207754024,0.0919726465019,0.0924342992873,0.0923201828684,0.092263124659,0.0925121059366,0.0929374489524,0.0931345591304,0.092667719235,0.0926884676748,0.0923253699784,0.0921126984705,0.0915888003657,0.0916717941249,0.091355380418,0.0918844656328,0.090945598732,0.0909404116221,0.090639559245,0.0903957650775,0.0906291850251,0.0902920228785,0.0901156611402,0.0897266278941,0.0895035821663,0.0893946528573,0.0895191434961,0.0894413368469,0.0898666798627,0.0889693098415,0.08810824959,0.0887099543441,0.0884350375168,0.088217178899,0.0884246632969,0.0876829065742,0.0879733847314,0.0881756820194,0.0877555261135,0.087506544836,0.0873976155271,0.0869255885217,0.0868322205426,0.0867284783437,0.0869152143018,0.0864276259666,0.0866039877049,0.0866662330243,0.0863186966577,0.0864535615164,0.0868010978829,0.0866610459143,0.0863965033069,0.0864276259666,0.0860800896001,0.0855925012649,0.0850789773799,0.0851360355894,0.0851204742595,0.0853279586575,0.0854317008565,0.0849596738511,0.0848611187621,0.0855146946156,0.0854887590659,0.0857688630031,0.0854265137465,0.0849026156417,0.0854576364062,0.0854109524167,0.0846276988144,0.084363156207,0.0842334784583,0.08405711672,0.0841141749295,0.0838133225524,0.0842542268981,0.0844254015264,0.0841712331389,0.0844772726259,0.0845032081756,0.0845395179453,0.0841556718091,0.0840259940603,0.0843424077672,0.0837407030132,0.0832219920183,0.0832842373377,0.0839689358509,0.0839481874111,0.0841245491494,0.0842905366677,0.0847521894532,0.0849337383014,0.0849856094009,0.0848351832124,0.084363156207,0.0840415553902,0.0837510772331,0.08304563028,0.0827966490025,0.0825165450652,0.0832894244476,0.08304563028,0.0824957966255,0.0822779380076,0.0820860149395,0.0819148403112,0.0813598195467,0.0812975742273,0.0810641542796,0.0811834578084,0.0810278445099,0.0804831979653,0.0803742686564,0.0796999443631,0.0794405888656,0.0794198404258,0.078890755211,0.0787870130121,0.0785017219649,0.0788855681011,0.0789063165409,0.0784135410958,0.077879268771,0.0772308800274,0.0771115764986,0.0768833436609,0.0763542584461,0.0760378447392,0.0761260256083,0.0756851212627,0.0755813790637,0.0756643728229,0.0758096119015,0.0756643728229,0.075653998603,0.0759704123099,0.0753842688857,0.0753842688857,0.075150848938,0.0753583333359,0.0755191337443,0.075856295891,0.076157148268,0.0756384372732,0.075550256404,0.0756851212627,0.0751404747181,0.0756954954826,0.0755346950742,0.0751871587076,0.0752960880165,0.0754309528752,0.0753842688857,0.0752130942574,0.0750263582992,0.0747566285819,0.0741964207074,0.0742067949273,0.0741860464875,0.0745595184038,0.0743572211158,0.074543957074,0.0749278032102,0.0752597782469,0.0753064622364,0.0755243208543,0.075752553692,0.0759859736397,0.0761882709277,0.0765409944042,0.0764787490849,0.0758044247915,0.0759185412104,0.0762557033571,0.0763750068859,0.0761519611581,0.076359445556,0.0762868260168,0.0761934580377,0.0768210983415,0.0767899756818,0.0769092792106,0.0766499237132,0.0766810463729,0.0767536659121,0.0771997573677,0.0773242480065,0.0768885307708,0.077682158593,0.0779778238601,0.0783616699963,0.0781178758287,0.078797387232,0.0790723040593,0.0789737489702,0.0788544454414,0.0791345493786,0.079404279096,0.0794302146457,0.0793472208865,0.0788388841116,0.0788492583315,0.0786365868236,0.0784705993052,0.0780763789491,0.0777495910223,0.0777288425825,0.0784342895356,0.0783201731167,0.0779259527606,0.0781956824779,0.0784602250853,0.0781749340381,0.0784239153157,0.0784757864151,0.0783512957764,0.0782683020172,0.0779155785407,0.0785172832947,0.0782631149072,0.0780660047292,0.0780763789491,0.0780711918391,0.0785328446246,0.0782112438078,0.0782475535774,0.0779103914307,0.0782786762371,0.0779674496402,0.0778637074412,0.0786106512738,0.0791708591483,0.0788648196613,0.0784654121952,0.0781489984884,0.0777340296925,0.0780037594098,0.0780141336297,0.0777080941427,0.0776510359333,0.0778481461113,0.0780245078496,0.0781697469282,0.0776925328129,0.0777236554726,0.0781801211481,0.0769300276504,0.0766551108231,0.0768107241216,0.0760326576293,0.0757318052522,0.0752805266867,0.0753220235663,0.0747670028018,0.0745543312939,0.0747306930321,0.0749537387599,0.0750678551788,0.0746528863829,0.0743675953357,0.0740615558487,0.073631025723,0.0734391026549,0.0731693729375,0.0735739675135,0.0733820444454,0.0728010881312,0.0720333958588,0.0717377305917,0.0719815247593,0.0719659634294,0.0723238740159,0.0719452149896,0.0715924915131,0.0721267638378,0.0721578864975,0.0721838220473,0.07190890522,0.0712864520261,0.0711308387277,0.0713538844555,0.071198271157,0.0727855268013,0.0727907139113,0.0724379904348,0.0728373979008,0.072619539283,0.0725832295133,0.0727647783615,0.0733197991261,0.0733716702255,0.073226431147,0.0729878240893,0.0729878240893,0.0730396951888,0.0732419924768,0.073631025723,0.0739526265398,0.074232730477,0.0744090922153,0.0736725226026,0.0735791546235,0.0738073874612,0.0743624082258,0.0746788219326,0.0745647055138,0.0746269508331,0.0745854539536,0.074844809451,0.0747358801421,0.0746995703724,0.0747514414719,0.0748344352311,0.0751404747181,0.075254591137,0.0754828239747,0.0750211711893,0.0746891961525,0.0739993105293,0.0737710776916,0.0739733749796,0.0739889363094,0.074741067252,0.0748188739013,0.0745647055138,0.0747670028018,0.0748603707808,0.0747773770217,0.0750678551788,0.0748966805505,0.0749589258699,0.0747047574824,0.0744920859745,0.0743105371263,0.0743053500163,0.0740823042885,0.0744920859745,0.0749174289903,0.0748240610112,0.0743209113462,0.0743312855661,0.074341659786,0.0737814519115,0.0737088323722,0.0740096847492,0.0745180215242,0.0745543312939,0.0742223562571,0.0737814519115,0.0732316182569,0.0735739675135,0.0739266909901,0.0741808593776,0.0743935308855,0.0745076473043,0.0744972730844,0.0744298406551,0.0744765246446,0.0742119820372,0.0740823042885,0.074030433189,0.0736725226026,0.0736880839324,0.0738229487911,0.073532470634,0.0736932710424,0.0733197991261,0.0732938635763,0.0732886764664,0.0734857866444,0.0735687804036,0.0737503292518,0.0734909737544,0.0731953084873,0.0731175018381,0.0729307658799,0.0727440299217,0.0726247263929,0.0727959010212,0.0727907139113,0.0727077201521,0.0727699654715,0.0728270236809,0.073527283524,0.0738022003513,0.074035620299,0.0739837491995,0.0737088323722,0.0734650382046,0.0732523666967,0.0729515143197,0.073221244037,0.0734391026549,0.0730500694087,0.073018946749,0.0731434373878,0.0734183542151,0.0732990506863,0.0733197991261,0.0730345080789,0.0730552565187,0.0728270236809,0.0727544041416,0.0728114623511,0.0728633334506,0.0728892690003,0.0730448822988,0.0725365455238,0.072515797084,0.0727959010212,0.0729981983092,0.0738022003513,0.0742897886865,0.0746528863829,0.0747877512416,0.0749122418803,0.07494855165,0.0746165766133,0.0746580734928,0.0743987179954,0.074440214875,0.0751249133882,0.0755606306239,0.0758926056607,0.076468374865,0.0768366596713,0.0774694870851,0.0773242480065,0.077277564017,0.0778533332213,0.0780193207397,0.07798819808,0.0780089465198,0.0783357344465,0.0781697469282,0.078491347745,0.0791501107085,0.0795702666143,0.080114913159,0.0797881252322,0.0800007967401,0.0800993518291,0.0797725639023,0.0802601522375,0.080820360112,0.0802757135674,0.0798814932113,0.0793887177661,0.0791604849284,0.0789426263105,0.0792849755672,0.0795443310646,0.0796221377138,0.0795183955149,0.0792123560279,0.0791656720383,0.079404279096,0.0792227302478,0.0786365868236,0.0785691543942,0.0780037594098,0.078185308258,0.077780713682,0.078283863347,0.078185308258,0.0779570754203,0.0776977199228,0.0779726367501,0.0782734891271,0.0784187282057,0.0781749340381,0.0781230629386,0.0774331773154,0.0769870858598,0.076670672153,0.0769767116399,0.0763905682157,0.0765721170639,0.0764165037655,0.0761778967078,0.075752553692,0.076266077577,0.0763957553257,0.0763075744566,0.0763335100063,0.0768574081111,0.0765358072943,0.0762557033571,0.0761830838178,0.0766188010535,0.0761052771686,0.0761727095979,0.0757473665821,0.0755295079642,0.0756799341528,0.0754153915454,0.075856295891,0.0757992376816,0.075757740802,0.0753738946658,0.0755295079642,0.0755087595244,0.0754776368647,0.0752390298071,0.0749226161002,0.0750834165086,0.0754620755349,0.0757369923622,0.076162335378,0.0763490713361,0.0766551108231,0.0746062023934,0.0728477721207,0.0703683335652,0.0686047161826,0.0667321694911,0.0646988223912,0.0624009326839,0.0603209015944,0.0583653611437,0.0562542073946,0.0536035942107,0.0516584279799,0.0494902160213,0.0473479396125,0.0450604241251,0.04354578802,0.0413308920719,0.0393286676317)
m <- c(0.0399059449489,0.0422390195529,0.0443387866965,0.0462622770922,0.0483101981335,0.0503581191748,0.052696378389,0.0547702224815,0.0567559282,0.0589645721584,0.0610021239793,0.0630085681387,0.0650979660619,0.0673014254101,0.0689345776329,0.0708010373161,0.0729785736131,0.0751924021818,0.0755864325594,0.0760323090393,0.0758871399528,0.0757782631379,0.0758093707993,0.0760997089723,0.0756330940515,0.0755138480162,0.0751872175716,0.0753946019808,0.0751820329614,0.0749435408907,0.0746272796666,0.0745339566825,0.0744821105802,0.0743784183755,0.0742488031198,0.0746065412257,0.0745391412927,0.0741606647458,0.0740466033208,0.0741140032538,0.0743265722732,0.0749383562805,0.0744095260369,0.0744924798006,0.0742436185095,0.0738444035217,0.0738858804036,0.0741295570845,0.0742280646788,0.0737666343683,0.0742125108481,0.0744976644109,0.0747517103122,0.0746532027178,0.0746013566155,0.0746065412257,0.0737407113171,0.073559249959,0.0736422037227,0.0734711115851,0.0735074038567,0.0736422037227,0.073849588132,0.073782188199,0.0737977420297,0.0740932648128,0.0745028490211,0.0749176178396,0.074948725501,0.0749383562805,0.0752753559455,0.0751146330284,0.0753272020478,0.0752649867251,0.0756486478822,0.0755034787957,0.075218325233,0.0744250798676,0.0746946795996,0.0744198952574,0.074995386993,0.0754308942525,0.0754775557445,0.0753583097092,0.0751664791307,0.0756279094412,0.0756382786617,0.0757523400868,0.075555324898,0.0751768483511,0.0750938945874,0.0750887099772,0.0753427558785,0.0754568173036,0.0757990015789,0.0760167552086,0.0759389860551,0.0759545398858,0.0761256320234,0.0760997089723,0.0763433856531,0.0761204474132,0.0758560322914,0.0753375712683,0.0751405560795,0.0753220174376,0.0747828179736,0.0755656941185,0.0759286168346,0.0763226472122,0.0763226472122,0.0767685236921,0.0769188773888,0.0768825851172,0.0767840775228,0.0770899695264,0.0769655388809,0.0770640464753,0.0769603542706,0.0767737083023,0.0768255544046,0.076452262468,0.0763537548736,0.0763382010429,0.0761100781927,0.0762085857871,0.0761100781927,0.0758975091733,0.0758871399528,0.0761204474132,0.0756693863231,0.0757367862561,0.0759545398858,0.0759182476142,0.0762293242281,0.076250062669,0.0763019087713,0.0764833701294,0.076452262468,0.0765352162317,0.0763070933815,0.076161924295,0.0766907545386,0.0762811703304,0.0761774781257,0.0758664015119,0.0757419708663,0.0758715861221,0.0759545398858,0.0763485702634,0.0763382010429,0.0763122779917,0.076094524362,0.0758145554096,0.0758145554096,0.0759752783267,0.0756382786617,0.0761774781257,0.0762293242281,0.0760323090393,0.0757004939845,0.0760893397518,0.075980462937,0.0761722935155,0.0759389860551,0.0761100781927,0.0760582320904,0.0760686013109,0.0758093707993,0.0761411858541,0.0758093707993,0.0759960167677,0.0760374936495,0.0758197400198,0.0762085857871,0.076027124429,0.076317462602,0.0764418932475,0.075980462937,0.0760374936495,0.076250062669,0.0766907545386,0.0764004163657,0.0756642017129,0.0754153404218,0.0754049712013,0.0757471554766,0.0755812479492,0.0754516326934,0.0755086634059,0.0760997089723,0.0764056009759,0.0767996313535,0.0766026161647,0.076384862535,0.0764989239601,0.0774114153607,0.0773595692584,0.0773129077664,0.0772506924436,0.0778158149588,0.0775151075654,0.0780335685885,0.078178737675,0.0785416603911,0.0780387531987,0.0780594916396,0.0777795226872,0.0775721382779,0.0779609840452,0.0775151075654,0.0780128301476,0.0775980613291,0.0776965689235,0.0781476300136,0.0777121227541,0.0773232769868,0.0773440154277,0.0774425230221,0.0779246917736,0.0783446452023,0.0781683684545,0.0784172297456,0.0786194295446,0.078920136938,0.0789927214812,0.078157999234,0.0777069381439,0.078023199368,0.0784431527967,0.0786712756469,0.0785209219502,0.0779506148248,0.0778469226202,0.0779195071634,0.0778780302815,0.0776706458723,0.0779817224862,0.0777069381439,0.0776706458723,0.0775254767858,0.0775928767188,0.0775151075654,0.0776602766518,0.0778365533997,0.0780491224192,0.0784068605251,0.0777276765848,0.0781891068954,0.0781891068954,0.0778417380099,0.0783861220842,0.0782150299466,0.0779246917736,0.0780854146908,0.0775565844472,0.0777898919076,0.0777380458053,0.0776343536007,0.0771210771878,0.0770744156957,0.0767270468102,0.0771055233571,0.0772973539357,0.0767529698614,0.0763019087713,0.0763019087713,0.0766181699954,0.0768877697274,0.0770225695934,0.0770070157627,0.0769448004399,0.0768462928456,0.0763952317554,0.0765507700624,0.0760789705313,0.0759441706653,0.0763070933815,0.0760893397518,0.0762604318894,0.0760997089723,0.0756590171026,0.075980462937,0.0768048159637,0.0763900471452,0.0766389084363,0.0771003387469,0.0768462928456,0.0772766154947,0.0773699384789,0.0774995537347,0.0781009685215,0.077686199703,0.0780076455373,0.0778728456713,0.0782668760489,0.0783187221512,0.0788890292766,0.079122336737,0.0790497521938,0.0797600437954,0.0797963360671,0.08008667424,0.0801385203423,0.0801851818344,0.0801592587832,0.0800400127479,0.0800348281377,0.0801644433935,0.0806517967552,0.0801022280707,0.0800711204093,0.0802992432595,0.080154074173,0.0808747349951,0.0808539965542,0.0810458271328,0.0811391501169,0.0804392277357,0.0800140896968,0.0805843968222,0.0807917812314,0.0806725351961,0.0810976732351,0.0808747349951,0.080579212212,0.0803873816334,0.0805429199403,0.0804133046846,0.0799466897638,0.0794282287406,0.0793504595872,0.0792312135519,0.078920136938,0.0785883218832,0.0791793674496,0.0789305061585,0.0790290137529,0.0791689982291,0.0794334133509,0.0794904440634,0.0794645210123,0.0801955510549,0.080511812279,0.0805429199403,0.0798015206773,0.0800555665786,0.0803407201413,0.0802733202083,0.0803303509209,0.0802370279367,0.0800814896298,0.0796770900317,0.0797911514568,0.0799933512558,0.0800140896968,0.0799622435945,0.0798896590512,0.0802422125469,0.0795526593862,0.0794023056895,0.0801022280707,0.0801074126809,0.0797755976261,0.0800555665786,0.0802681355981,0.0805429199403,0.0806206890938,0.0805999506529,0.0805377353301,0.0805325507199,0.0799985358661,0.0799726128149,0.0805221814994,0.0799881666456,0.079661536201,0.0791171521268,0.0791586290086,0.0783705682535,0.0783757528637,0.078360199033,0.078852737005,0.0788631062255,0.0790704906347,0.0793660134179,0.0795733978271,0.0791327059575,0.0788008909027,0.0796356131499,0.079526736335,0.0795993208783,0.079614874709,0.0792675058235,0.0792934288746,0.0790186445324,0.0796407977601,0.0801022280707,0.0797652284057,0.0796719054215,0.0798637360001,0.0798741052205,0.0803199817004,0.0806310583143,0.0808591811644,0.0808902888258,0.0812635807625,0.0818338878879,0.082082749179,0.0818857339902,0.0812013654397,0.0815383651047,0.0818338878879,0.0824145642338,0.0822486567064,0.0828345176625,0.0827411946783,0.0830626405127,0.083181886548,0.0834151940084,0.083114486615,0.0828967329853,0.0825752871509,0.0827256408476,0.0829330252569,0.0824923333872,0.0825856563714,0.0825960255919,0.0825597333202,0.082824148442,0.0826634255249,0.0825027026077,0.0824353026747,0.0828034100011,0.0829278406466,0.0828656253239,0.0832285480401,0.0835344400437,0.0832700249219,0.0830056098001,0.0831404096661,0.0836173938074,0.0837677475041,0.0836225784176,0.0834048247879,0.0835499938744,0.0838040397757,0.0831870711582,0.0832803941424,0.0837159014018,0.0841047471691,0.0842551008658,0.0845558082592,0.0845609928695,0.0844417468341,0.0843225007988,0.0845661774797,0.0851053769437,0.0854994073213,0.0855979149157,0.0860178683444,0.0858415915965,0.0861267451592,0.0864844832652,0.0866400215721,0.0864637448243,0.0864844832652,0.086525960147,0.0865881754698,0.0861578528206,0.0863185757378,0.0870029442883,0.0867903752688,0.0866659446233,0.0871792210362,0.0875265899216,0.0876043590751,0.0872932824612,0.0875836206342,0.0877339743309,0.0881280047085,0.0883561275586,0.088117635488,0.0888434809203,0.0886309119009,0.0879672817913,0.0881746662005,0.0883250198972,0.0880865278266,0.0878532203662,0.0881642969801,0.0881954046415,0.0886309119009,0.0887397887157,0.088522035086,0.0886983118339,0.0885375889167,0.0889990192273,0.0894293418765,0.0894760033685,0.0895900647936,0.0901966641907,0.0905388484659,0.0909536172844,0.0906166176194,0.0906995713831,0.0907306790445,0.0908706635207,0.0910365710481,0.0910158326072,0.0908136328082,0.0909276942333,0.0908602943003,0.0909639865049,0.0907669713161,0.0906373560603,0.0905751407375,0.0906269868399,0.0909484326742,0.0914098629848,0.0911298940323,0.0920320162125,0.0920683084841,0.0922549544524,0.0922601390627,0.0922601390627,0.0925297387947,0.0927215693732,0.092379385098,0.0918764779056,0.0920631238739,0.0924156773696,0.0927889693062,0.0926075079481,0.0919075855669,0.0921875545194,0.0922394006217,0.0917002011577,0.0914306014257,0.0915083705791,0.0914461552564,0.0914461552564,0.0913061707801,0.0908032635877,0.0906373560603,0.0906062483989,0.0904973715841,0.0900877873758,0.0901240796474,0.0909691711151,0.091124709422,0.0912854323392,0.0914409706461,0.0915654012917,0.0916950165475,0.0908136328082,0.0910054633867,0.0902692487339,0.0903988639897,0.0902329564623,0.0906373560603,0.0904766331431,0.0901655565293,0.09018111036,0.0897974492029,0.090092971986,0.0901707411395,0.089890772187,0.0901085258167,0.0905544022966,0.0910676787095,0.0906062483989,0.0906580945012,0.0912439554574,0.0912646938983,0.0913787553234,0.0919179547874,0.0927008309323,0.0928926615108,0.0936651684353,0.0937947836911,0.0938207067422,0.0938932912855,0.0943287985449,0.0948213365168,0.0949716902135,0.0947280135327,0.0952620283865,0.0954434897446,0.0953553513706,0.0958634431733,0.0969003652195,0.0975691799393,0.0981135640136,0.0981291178443,0.0986631326981,0.0993941627407,0.1002859157,0.100244438819,0.101068791845,0.101898329482,0.102598251863,0.102935251529,0.103168558989,0.103246328142,0.103111528276,0.103298174245,0.103904773642,0.104604696023,0.104806895822,0.105729756443,0.105786787156,0.106004540785,0.106071940718,0.106808155371,0.106600770962,0.106605955572,0.107305877953,0.1076843545,0.107969508063,0.107964323453,0.107762123654,0.107933215791,0.107508077752,0.107922846571,0.108140600201,0.10767398528,0.107476970091,0.107632508398,0.107388831717,0.107528816193,0.107331801004,0.106891109135,0.106823709202,0.107093308934,0.106802970761,0.107295508733,0.106834078422,0.106911847576,0.106860001473,0.107114047375,0.107425123989,0.107165893477,0.106834078422,0.106232663636,0.105957879293,0.10566235651,0.105454972101,0.10566235651,0.105289064573,0.104687649787,0.104744680499,0.104915772637,0.104692834397,0.104672095956,0.104941695688,0.104775788161,0.105040203282,0.105123157046,0.105563848916,0.105807525597,0.106357094281,0.107046647442,0.107181447308,0.1072281088,0.107746569823,0.107611769957,0.107953954232,0.108099123319,0.108150969421,0.108482784476,0.108840522582,0.107969508063,0.107876185079,0.107559923855,0.10790210813,0.10813023098,0.107772492874,0.107985061894,0.107876185079,0.108197630913,0.108249477015,0.108140600201,0.108783491869,0.108544999799,0.108368723051,0.108332430779,0.108415384543,0.10856573824,0.108373907661,0.108280584677,0.10789692352,0.108280584677,0.107497708532,0.107414754768,0.107093308934,0.106160079092,0.105470525932,0.104895034196,0.105159449318,0.104936511078,0.10453729609,0.104863926534,0.1045424807,0.104112158051,0.10365072774,0.103007836072,0.102396052064,0.101872406431,0.102022760128,0.101452453002,0.101032499574,0.100654023027,0.10095991503,0.100617730755,0.10072142296,0.100348131023,0.100384423295,0.1002859157,0.0990727169063,0.0986942403595,0.0984090867968,0.0983209484228,0.0982587331001,0.0982276254387,0.0981654101159,0.0980669025215,0.0980617179113,0.0977558259076,0.098009871809,0.0974551185142,0.0971855187822,0.0975484414984,0.0976573183132,0.0978854411634,0.0972581033254,0.0970766419674,0.0969729497627,0.0964804117908,0.0962678427713,0.0964337502987,0.0966152116568,0.0970818265776,0.0970196112548,0.0978854411634,0.0974862261756,0.098077271742,0.0978958103839,0.0972062572231,0.0968485191172,0.0968588883376,0.0965581809442,0.0965633655545,0.0961693351769,0.0958997354449,0.0959878738188,0.0962004428383,0.0962989504327,0.0961330429053,0.0959152892756,0.0954901512366,0.0951116746898,0.0950857516386,0.094510259903,0.0941421525765,0.0941058603049,0.0944687830211,0.0944117523086,0.0941110449152,0.0937066453171,0.0929963537155,0.0929756152745,0.0922808775036,0.0920164623818,0.0915187397996,0.0911610016937,0.0906010637887,0.0905492176864,0.09018111036,0.090113710427,0.0899426182893,0.0899426182893,0.0897404184903,0.0898648491359,0.090113710427,0.0900566797144,0.0907099406035,0.0906062483989,0.0904040485999,0.0904092332101,0.0907047559933,0.0908447404696,0.0906943867729,0.090652909891,0.0904092332101,0.0903418332771,0.0904455254818,0.0905129254148,0.0909121404026,0.0914980013587,0.091549847461,0.0911195248118,0.0915291090201,0.0913787553234,0.0910676787095,0.091010647997,0.0912646938983,0.0908343712491,0.0909950941663,0.0905232946352,0.0910002787765,0.0911195248118,0.0913009861699,0.090922509623,0.0906166176194,0.0902848025646,0.0899426182893,0.0897922645926,0.0898752183563,0.0897507877108,0.089890772187,0.0896989416085,0.0888382963101,0.0887968194283,0.089081972991,0.088859034751,0.0884650043735,0.0883146506768,0.0878946972481,0.0877961896537,0.0880035740629,0.0872518055794,0.0872621747999,0.087153297985,0.086458560214,0.0861474836002,0.0858104839351,0.085426822778,0.0846439466331,0.0845921005308,0.0849446540266,0.0851209307744,0.0850431616209,0.0851364846051,0.0848098541605,0.0850639000619,0.0849446540266,0.0842706546965,0.0841617778817,0.084213623984,0.084618023582,0.0848254079912,0.0848513310424,0.0851364846051,0.0847839311094,0.0844417468341,0.0840217934054,0.0843173161886,0.0841099317793,0.0843121315784,0.0843328700193,0.0844780391058,0.0846595004638,0.08524536142,0.0854942227111,0.0857223455612,0.0856134687464,0.0860074991239,0.0857690070533,0.0861371143797,0.08659336008,0.0864326371629,0.0864067141117,0.0868007444893,0.086748898387,0.0866711292335,0.0863289449583,0.0861060067183,0.0853438690143,0.0851883307074,0.0854942227111,0.0854164535576,0.0846335774127,0.0850016847391,0.0849187309754,0.0847683772787,0.0845609928695,0.0840062395747,0.0838403320473,0.0832803941424,0.0828656253239,0.082844886883,0.0828604407136,0.0828500714932,0.0828345176625,0.0827619331193,0.0824767795565,0.0824093796235,0.0816627957503,0.0810095348611,0.0805532891608,0.0802577663776,0.0799466897638,0.080019274307,0.0798222591182,0.0789512445994,0.0786297987651,0.0785001835093,0.0781994761159,0.0781683684545,0.0782409529977,0.0782772452693,0.0782772452693,0.078313537541,0.0790445675835,0.0792986134849,0.0793660134179,0.0797133823034,0.0800244589172,0.0800659357991,0.0799985358661,0.0801229665116,0.0798792898308,0.0799933512558,0.0800244589172,0.0803925662436,0.0808851042156,0.0808591811644,0.0808384427235,0.0808799196054,0.0807503043496,0.0803303509209,0.0801281511218,0.079951874374,0.0805429199403,0.0801955510549,0.0802629509879,0.0804858892278,0.0808954734361,0.0809939810304,0.0810665655737,0.081522811274,0.0811547039476,0.080828073503,0.0810354579123,0.0806673505859,0.0806880890268,0.0807762274007,0.0803147970902,0.0802525817674,0.0797341207443,0.079480074843,0.0794748902327,0.0789823522608,0.0786349833753,0.0783653836433,0.0783964913047,0.0778676610611,0.0776239843802,0.077261061664,0.0768462928456,0.0760530474802,0.0757212324254,0.0759389860551,0.0758456630709,0.0752649867251,0.0750887099772,0.0750368638749,0.0755242172366,0.0758301092403,0.0758301092403,0.0762967241611,0.0766752007079,0.0764004163657,0.0759856475472,0.0759338014449,0.0759856475472,0.075980462937,0.0757160478152,0.0759960167677,0.0762189550076,0.0763278318224,0.076161924295,0.0763330164327,0.0767477852512,0.0765818777238,0.0764004163657,0.0764626316885,0.0763122779917,0.0767114929795,0.0772351386129,0.0776499074314,0.077416599971,0.0781683684545,0.078427598966,0.0787075679185,0.079257136603,0.080221474106,0.0807762274007,0.0804029354641,0.0802629509879,0.0806414275347,0.080916211877,0.0810354579123,0.080558473771,0.0800451973582,0.0799259513228,0.079547474776,0.0793660134179,0.0791378905677,0.0791171521268,0.0788060755129,0.0787542294106,0.0788579216152,0.0795630286067,0.0795371055555,0.0794645210123,0.0795889516578,0.0795837670476,0.0787386755799,0.0781839222852,0.0783913066944,0.0786557218162,0.0788060755129,0.0783653836433,0.0779143225532,0.0782824298796,0.078157999234,0.0780180147578,0.0776136151598,0.0773595692584,0.0773129077664,0.0770536772548,0.0766492776568,0.0763589394838,0.076452262468,0.0763330164327,0.0760737859211,0.0764626316885,0.0768203697944,0.0769292466093,0.0771884771208,0.0771988463413,0.0776706458723,0.0778106303485,0.0781061531317,0.0782720606591,0.0786609064264,0.0785416603911,0.0779920917066,0.0775825074984,0.0778521072304,0.0777743380769,0.07761879977,0.0775202921756,0.0779246917736,0.078157999234,0.0782098453363,0.0790082753119,0.0788060755129,0.0788319985641,0.0791275213472,0.0786349833753,0.0781424454033,0.0783498298126,0.0780283839782,0.0783290913717,0.0783290913717,0.0782565068284,0.0780750454703,0.078178737675,0.0778106303485,0.0777743380769,0.0776602766518,0.0774010461403,0.0774580768528,0.0770744156957,0.0771366310185,0.0764833701294,0.0762915395508,0.0756745709333,0.0753790481501,0.0750783407567,0.0744924798006,0.0745339566825,0.0748294794657,0.0748657717373,0.074860587127,0.0745132182416,0.0747154180406,0.0749176178396,0.0746117258359,0.0745443259029,0.0747050488201,0.0736162806716,0.0734296347033,0.0736992344353,0.0736214652818,0.0736110960613,0.0739999418287,0.0740984494231,0.0742384338993,0.0739740187775,0.0741451109151,0.074051787931,0.0737873728092,0.073694049825,0.0740258648798,0.0740725263719,0.0741762185765,0.0739377265059,0.0737251574864,0.0740310494901,0.0739636495571,0.0743524953244,0.074388787596,0.0742332492891,0.0744769259699,0.0741969570175,0.0745650643439,0.0747154180406,0.0743836029858,0.074119187864,0.0738858804036,0.0741762185765,0.0742488031198,0.0738806957934,0.0745650643439,0.0746687565485,0.0744665567495,0.0747309718713,0.0753997865911,0.0752442482841,0.0758715861221,0.0756745709333,0.0756849401538,0.0755864325594,0.076027124429,0.0760686013109,0.0761411858541,0.0759286168346,0.076519662401,0.0763589394838,0.076519662401,0.0767581544716,0.0762915395508,0.0761515550746,0.0763382010429,0.0767322314205,0.0765922469442,0.076519662401,0.0762137703974,0.0768048159637,0.0763330164327,0.0768048159637,0.0764937393498,0.076452262468,0.0764470778578,0.0765766931135,0.076991461932,0.0769344312195,0.0766752007079,0.077058861865,0.0764263394168,0.0764107855861,0.0762604318894,0.0763433856531,0.0760012013779,0.0760323090393,0.0753634943195,0.0754153404218,0.0754464480832,0.0753064636069,0.0747361564815,0.0748242948554,0.0745184028518,0.0748761409577,0.0744250798676,0.074321387663,0.07425398773,0.0741451109151,0.0748087410247,0.0750472330954,0.075218325233,0.0726519431686,0.0706143913478,0.068556101086,0.0665911338084,0.0644135975113,0.0626819376942,0.0605873551608,0.058596464832,0.0564085593145,0.0546302380052,0.0525771323537,0.0500159348995,0.0479420908071,0.0458682467147,0.043701079638,0.0418190661242,0.0398437296261,0.0377128548211)
s <- c(0.0395598815727,0.0396718331978,0.0396390668685,0.0398411258991,0.0397646711308,0.0396144921215,0.0391967214229,0.0393387088499,0.0391939908955,0.0394970794415,0.0397264437466,0.0397510184936,0.0396882163624,0.0395871868471,0.0398302037894,0.0398356648442,0.039895736448,0.0397919764052,0.039592647902,0.0395489594629,0.0395462289354,0.0396800247801,0.0397400963838,0.0399203111949,0.0400349933475,0.0399940354359,0.0400022270182,0.0400923344238,0.0400786817865,0.0402070165763,0.0400896038963,0.0399503469968,0.0396772942526,0.0395735342099,0.0396691026703,0.0393851278164,0.0397974374601,0.039988574381,0.0401960944665,0.0401960944665,0.0404309198265,0.0405101051223,0.0404909914302,0.0404391114088,0.0406002125279,0.0405346798693,0.0405865598907,0.0405319493418,0.0404336503539,0.0404609556284,0.0402643576526,0.0402124776312,0.0402042860489,0.0400841428414,0.0401360228628,0.0400841428414,0.0399721912163,0.0399667301614,0.0400896038963,0.0398520480089,0.0398875448656,0.0400022270182,0.0399831133261,0.0401469449726,0.0401578670823,0.0401851723568,0.0402807408172,0.0402643576526,0.0403080460916,0.0401879028842,0.0401114481158,0.0613112631718,0.0621085771847,0.0632526681827,0.0641127843268,0.0651558458094,0.0663190504995,0.0675477878482,0.0688557104927,0.0700216457102,0.0710756293026,0.0720231223248,0.0729378490177,0.0739891020827,0.0754717784834,0.0762936672433,0.0778691815771,0.0790788052337,0.080206513067,0.0799716877071,0.080206513067,0.0802720457256,0.0803102731098,0.0800590645852,0.0801792077926,0.080299351,0.0802966204726,0.0803758057684,0.0807526185553,0.0804031110428,0.0805887869088,0.0805369068875,0.0807280438084,0.0810284018269,0.0807143911712,0.0808099596316,0.0809137196744,0.0807335048632,0.0808208817414,0.0809655996958,0.0814079451413,0.0812796103515,0.0808181512139,0.0806433974577,0.0807007385339,0.0808864144,0.0808918754549,0.0808536480707,0.0810256712995,0.0813478735376,0.0811157787051,0.0815472020408,0.0813642567022,0.0810693597386,0.0809410249488,0.081702842105,0.0816181957543,0.0815444715134,0.0814762083273,0.0818393684771,0.0817738358185,0.082333593944,0.082543844557,0.0826066466881,0.0824182402947,0.0825110782277,0.0824974255905,0.0824400845142,0.082216181264,0.0818939790259,0.0823226718342,0.0821724928249,0.0822052591542,0.0823882044928,0.0822052591542,0.0819895474863,0.0816455010287,0.0814625556901,0.0817492610715,0.081888517971,0.0816345789189,0.0817629137087,0.0817328779068,0.0819021706082,0.0815963515348,0.0812714187692,0.0811676587264,0.0811594671441,0.0810065576074,0.0811130481776,0.0811376229246,0.08065158904,0.0805287153051,0.0803211952196,0.0805778647991,0.0799553045424,0.0799416519052,0.079575761228,0.0793627800876,0.0794801927676,0.0796276412494,0.0795402643713,0.0797477844569,0.0798269697527,0.0799252687406,0.0801655551554,0.0794283127462,0.0796877128531,0.0797095570727,0.0794283127462,0.0796795212708,0.0793245527034,0.0793791632523,0.0795784917555,0.0794610790755,0.0796631381062,0.0798406223899,0.0797805507862,0.0794228516913,0.0794310432736,0.0794801927676,0.0796030665025,0.0795784917555,0.0792999779565,0.0793627800876,0.0796167191397,0.0796522159964,0.0798433529173,0.0800426814205,0.080206513067,0.0799798792894,0.0803703447135,0.08041676368,0.0805887869088,0.0803785362959,0.0801300582987,0.0800399508931,0.0802037825396,0.0800071845638,0.0801573635731,0.0801546330456,0.0801437109359,0.0808427259609,0.0806925469516,0.0807662711925,0.0809382944214,0.0807116606437,0.0809601386409,0.081282340879,0.0812441134948,0.0813915619767,0.0810284018269,0.0812413829674,0.0814379809432,0.0816919199952,0.0817438000166,0.0821615707152,0.0824127792398,0.0826476045997,0.083008034222,0.0830462616062,0.0830408005513,0.0831527521764,0.0830762974081,0.0829807289476,0.0828824299597,0.0829233878713,0.0826530656546,0.0828114362462,0.0827076762035,0.0828005141365,0.0827786699169,0.0826257603802,0.0828278194109,0.0829315794537,0.0827185983132,0.0827704783346,0.0825083477002,0.0822735223403,0.0824318929319,0.0823581686909,0.0825793414137,0.0829206573439,0.0831172553197,0.0829479626183,0.0831227163746,0.0833193143504,0.083545948128,0.0832920090759,0.0828442025755,0.0830271479141,0.0830544531885,0.0827622867523,0.0825165392826,0.0826639877644,0.0827895920267,0.0828824299597,0.0830544531885,0.0831773269234,0.0833138532955,0.0831609437588,0.083521373381,0.0838408450917,0.0841657778572,0.0836770134452,0.0837070492471,0.0837343545215,0.0839009166954,0.0839691798814,0.0839746409363,0.0839801019912,0.0837125103019,0.0839691798814,0.0839992156833,0.0839937546284,0.08403471254,0.0843896811074,0.0844279084916,0.0840702093968,0.0840429041224,0.0842613463177,0.0841111673084,0.084108436781,0.0840319820126,0.0840510957047,0.0841685083847,0.0842121968237,0.0840019462107,0.0839801019912,0.0840265209577,0.0838654198387,0.0837698513782,0.0840155988479,0.0837698513782,0.083898186168,0.0834258049206,0.0836906660824,0.0834148828108,0.0833630027894,0.0834066912285,0.0837125103019,0.0836114807866,0.0840920536163,0.0841412031103,0.0843569147781,0.0843132263391,0.0839964851559,0.0845070937874,0.084411525327,0.0847255359827,0.084807451806,0.0844934411502,0.0846354285772,0.0846163148851,0.0850368161111,0.0851514982636,0.0848238349706,0.0848374876078,0.0848292960255,0.0849767445074,0.085110540352,0.0852306835594,0.0850941571873,0.0855173889408,0.0857385616635,0.0859651954412,0.085926968057,0.0859488122765,0.0856102268738,0.0858723575082,0.0855938437091,0.0861344881426,0.0861426797249,0.0864758040728,0.0863037808439,0.0865140314569,0.0867625094541,0.0870082569238,0.0865549893686,0.0866287136095,0.0866287136095,0.0866177914997,0.0868935747713,0.0866396357192,0.0867024378504,0.0867898147285,0.0868717305518,0.0871447832959,0.086978221122,0.0869154189908,0.0870382927257,0.0873113454699,0.0875789371591,0.087677236147,0.0879339057265,0.0881441563395,0.0881605395042,0.0881059289553,0.088332562733,0.0885400828185,0.0888568240018,0.088938739825,0.0890233861757,0.0889988114287,0.0893292052491,0.0890370388129,0.0895094200603,0.0898589275728,0.0900364118565,0.0901374413718,0.0906862773876,0.0906070920918,0.0904951404667,0.0904924099392,0.0909647911866,0.0912405744582,0.0913579871382,0.0914180587419,0.0916037346079,0.091480860873,0.0914781303456,0.0915764293335,0.091554585114,0.0912323828759,0.0912678797326,0.0915081661475,0.0914453640163,0.0912105386563,0.0912924544796,0.0917238778153,0.0915764293335,0.0916283093549,0.0920570021632,0.0922863664683,0.0925648802673,0.0920870379651,0.0921826064255,0.0922809054134,0.0927314424413,0.0928625077585,0.0924256233678,0.0928652382859,0.092791514045,0.0922590611939,0.0922699833036,0.0924310844227,0.0921307264041,0.0921989895902,0.0926194908162,0.0925894550143,0.0930208783501,0.0932010931612,0.0931956321063,0.0933813079723,0.0933403500607,0.093886455549,0.094356106269,0.0945363210801,0.0948093738243,0.0954537783004,0.0957623279013,0.0957814415934,0.0957186394623,0.0959425427125,0.0962647449506,0.096409462905,0.0966388272101,0.0967398567254,0.0967234735608,0.0970702505458,0.0970784421282,0.0973842612016,0.097176741116,0.0973105369607,0.0971275916221,0.0971876632258,0.0977310381867,0.0980559709522,0.0979522109094,0.0986321122424,0.0988095965261,0.0989734281726,0.0990908408525,0.0989051649865,0.0989215481512,0.0990253081939,0.0985037774526,0.0981160425559,0.0983481373885,0.0982935268396,0.0988860512944,0.0989597755354,0.0984000174098,0.0982662215652,0.0982198025987,0.0978511813941,0.0975753981225,0.0977719960983,0.0977037329123,0.097367878037,0.0970866337105,0.0970292926342,0.0968900357347,0.0966988988138,0.096409462905,0.0959343511302,0.0960271890632,0.0966961682863,0.0969200715365,0.0967425872528,0.0966988988138,0.0966524798473,0.0965186840026,0.0960080753711,0.0964313071245,0.0959261595478,0.0962101344017,0.096223787039,0.0962046733469,0.0963248165543,0.0963985407952,0.0965569113868,0.0966934377589,0.0968572694054,0.0968518083505,0.0968408862407,0.0966934377589,0.0967343956705,0.0972914232686,0.0974088359486,0.097553553903,0.0979931688211,0.097974055129,0.0981624615224,0.0985829627484,0.0992055230051,0.0994157736181,0.0995195336609,0.0995987189567,0.0996287547585,0.0998062390422,0.0999263822496,0.100000106491,0.100016489655,0.100101136006,0.100603553055,0.100901180546,0.100953060568,0.101458208144,0.102132648422,0.102198181081,0.102760669734,0.102640526527,0.10306375828,0.103675396427,0.104240615607,0.104396255671,0.10479218215,0.105368323441,0.105797016249,0.105914428929,0.106127410069,0.10620113431,0.106184751146,0.106157445871,0.106504222856,0.106979334631,0.107143166278,0.107473560098,0.107421680077,0.107533631702,0.1075035959,0.107689271766,0.107519979065,0.107645583327,0.10796232451,0.108478394196,0.109054535487,0.109169217639,0.108931661752,0.10887978173,0.108579423712,0.108855206983,0.109109146035,0.10890162595,0.108470202614,0.108625842678,0.108412861538,0.108620381623,0.108311832023,0.108156191958,0.108150730903,0.108180766705,0.108148000376,0.108027857169,0.108134347739,0.108568501602,0.108745985886,0.109043613377,0.109313935594,0.109431348274,0.109363085088,0.108967158609,0.108953505971,0.109221097661,0.109051804959,0.109212906078,0.109354893505,0.109420426164,0.109753550512,0.110152207518,0.110518098195,0.110433451845,0.110264159143,0.110575439272,0.110881258345,0.111066934211,0.111457399635,0.111512010184,0.111820559785,0.112358473691,0.112910040234,0.112798088609,0.113251356164,0.113404265701,0.113723737412,0.114043209122,0.114018634375,0.114092358616,0.114455518766,0.113996790156,0.113860263784,0.113628168951,0.113712815302,0.113852072201,0.113666396335,0.11357628893,0.11333054146,0.113518947854,0.113600863677,0.113617246841,0.114278034482,0.114272573427,0.114125124946,0.114015903848,0.113813844817,0.113710084774,0.113303236186,0.11343703203,0.113363307789,0.113450684667,0.113207667725,0.112986495002,0.11298922553,0.112415814767,0.112194642044,0.111976199849,0.112014427233,0.112129109386,0.1119215893,0.112115456749,0.111987121959,0.111716799742,0.111405519614,0.110949521531,0.110468948701,0.110247775979,0.110332422329,0.110089405387,0.109881885301,0.109597910447,0.109794508423,0.109920112686,0.109783586314,0.109720784182,0.109622485194,0.109305744011,0.108508429998,0.107959593983,0.107910444489,0.107929558181,0.108202610925,0.108279065693,0.108374634154,0.108180766705,0.108426514175,0.108087928772,0.107861294995,0.107814876028,0.107159549442,0.107369800055,0.10725784843,0.106845538786,0.106378618594,0.106009997389,0.10576424992,0.105054312785,0.104879559029,0.10471845791,0.104819487425,0.104805834788,0.104576470483,0.104947822215,0.104494554659,0.104467249385,0.104224232443,0.103721815393,0.103380499463,0.10306375828,0.10306375828,0.102891735051,0.102490347517,0.102285557959,0.102072576819,0.102353821145,0.101873248315,0.10167665034,0.101316220717,0.100775576284,0.100333230838,0.0998826938106,0.0989461228981,0.0986594175168,0.0985829627484,0.098580232221,0.098648495407,0.0984273226843,0.0979522109094,0.0975890507597,0.097621817089,0.097201315863,0.0966497493198,0.0965514503319,0.0963357386641,0.0960381111729,0.0957814415934,0.095661298386,0.0955083888493,0.0954865446297,0.0953855151144,0.0951343065898,0.0950278160196,0.094962283361,0.0949295170317,0.0952134918856,0.0952107613582,0.0949650138884,0.09524079716,0.0953390961479,0.0955493467609,0.0950851570958,0.0955629993981,0.0952326055777,0.0953445572028,0.0954401256632,0.0953937066967,0.0956640289134,0.096057224865,0.0961036438315,0.0959916922064,0.0962647449506,0.0960954522492,0.0958278605599,0.0958387826697,0.0963084333896,0.096174637545,0.0960244585357,0.0960490332827,0.0961282185785,0.0961418712157,0.0964859176733,0.0962729365329,0.0961391406883,0.0962074038743,0.0959671174595,0.0958578963618,0.0960326501181,0.0961910207097,0.0963685049934,0.0960217280083,0.0955793825628,0.0953664014223,0.0954046288065,0.0950114328549,0.0948476012084,0.0946018537387,0.094659194815,0.0941130893267,0.0942195798969,0.0936652828263,0.0935424090914,0.09360794175,0.0930645667891,0.0928078972096,0.0924256233678,0.0921061516572,0.0916365009372,0.0916747283214,0.0918194462758,0.092136187459,0.0916228483,0.0912187302387,0.0913634481931,0.0913525260833,0.0911750417996,0.0909292943299,0.0904814878295,0.0906617026406,0.0909811743512,0.0908692227261,0.0907518100462,0.0908446479792,0.090410494116,0.0901811298109,0.0899053465393,0.0901592855914,0.0897933949142,0.0899927234174,0.0900364118565,0.0899299212863,0.0900964834602,0.0905879783997,0.0906453194759,0.0906262057839,0.0905852478722,0.0906098226192,0.0902275487774,0.090151094009,0.0904214162257,0.0903285782927,0.0904241467532,0.0906862773876,0.090410494116,0.090317656183,0.0904814878295,0.0903504225123,0.0900964834602,0.0898343528258,0.0897196706733,0.0899708791979,0.0895339948072,0.0893155526119,0.0891326072733,0.0889851587915,0.0887830997608,0.0885209691264,0.0882752216567,0.0882124195256,0.0880840847358,0.0879393667814,0.0881086594828,0.0881168510651,0.0881277731749,0.08788748676,0.0876690445647,0.0878001098819,0.0870901727471,0.0864730735453,0.0862655534598,0.0864703430179,0.0862955892616,0.0864266545788,0.0864102714142,0.0861945597463,0.0861208355054,0.0860798775937,0.0858423217063,0.0855774605445,0.0854463952273,0.0853125993827,0.0849412476506,0.0848292960255,0.0850668519129,0.0856074963463,0.0855146584133,0.0854081678431,0.0854573173371,0.0853781320413,0.085252527779,0.0850258940013,0.0848647928823,0.0848019907511,0.0848811760469,0.084993127672,0.0849658223976,0.0848948286841,0.084528938007,0.0844142558544,0.0843350705586,0.0838353840368,0.0836742829178,0.0834312659755,0.0839446051345,0.0837725819057,0.0835486786554,0.083384847009,0.0832592427466,0.0832483206369,0.0831664048136,0.0831281774295,0.0827677478072,0.0826421435449,0.08251926981,0.0822707918128,0.0823254023616,0.0824482760965,0.0821288043859,0.0820905770017,0.0819840864315,0.0815417409859,0.0815390104585,0.0811567366167,0.0810830123758,0.0810256712995,0.0812195387478,0.0810993955404,0.0806980080065,0.0804604521191,0.0803130036373,0.0796085275573,0.0797259402373,0.0797559760392,0.0795238812067,0.0792754032095,0.0792535589899,0.0792016789686,0.0793682411425,0.0794310432736,0.0792890558467,0.0792399063527,0.0794446959109,0.0792890558467,0.0792672116272,0.0791334157825,0.0792590200448,0.0794583485481,0.0794938454048,0.0796658686336,0.0798979634661,0.0800754477498,0.0801109446066,0.0803075425824,0.0807116606437,0.0805915174363,0.0801409804084,0.0802338183414,0.0803321173293,0.0806051700735,0.0807635406651,0.0810912039581,0.080930102839,0.0812768798241,0.0817438000166,0.0818748653338,0.0822271033738,0.0825984551058,0.0829070047067,0.0827486341151,0.0829097352341,0.083174596396,0.0830899500453,0.083570522875,0.0834749544145,0.0834066912285,0.0832155543076,0.0833739248992,0.0834230743931,0.0832510511643,0.0831773269234,0.0831609437588,0.0832756259113,0.0833438890973,0.0836715523903,0.0833903080638,0.0833575417345,0.083311122768,0.0832210153625,0.0825684193039,0.0821042296389,0.0822025286268,0.0827131372583,0.0827322509504,0.0822926360324,0.0821970675719,0.0825301919198,0.0823144802519,0.0823718213282,0.0821861454621,0.0819868169589,0.0819185537729,0.0815963515348,0.0817001115775,0.0814134061962,0.0813587956474,0.0813014545711,0.0811621976716,0.081610004172,0.0816291178641,0.0817055726324,0.0816646147208,0.081863943224,0.0819485895747,0.0819677032668,0.0825165392826,0.0828988131244,0.0829425015634,0.0826694488193,0.0822134507365,0.0817792968733,0.0820632717273,0.0820277748705,0.0817847579282,0.081702842105,0.0820195832882,0.0822352949561,0.0823390549989,0.0825083477002,0.0824182402947,0.0826721793467,0.0821697622975,0.0817656442361,0.0815881599524,0.0812878019339,0.0809601386409,0.0808809533451,0.0809027975646,0.0805724037442,0.0803648836586,0.0805123321405,0.0804358773721,0.0804768352837,0.0801983214847,0.0799116161034,0.0797805507862,0.0793518579778,0.0792835947918,0.0787975609072,0.0789095125323,0.0784835502514,0.0780220911138,0.0774596024609,0.0769954127958,0.0771455918051,0.0772930402869,0.0775005603725,0.0772985013418,0.0769298801372,0.0773176150339,0.0774404887688,0.0772930402869,0.0771128254758,0.0768698085335,0.0762144819475,0.0762335956396,0.0762936672433,0.0770882507288,0.0770855202014,0.0771046338935,0.0773667645279,0.0773258066162,0.0771674360246,0.0773531118907,0.0775961288329,0.0774841772078,0.0773585729455,0.0774077224395,0.0774322971865,0.0775142130097,0.0774950993176,0.0775879372506,0.077918331071,0.0780302826961,0.0783279101873,0.0779592889827,0.0778282236655,0.0780767016627,0.0782214196171,0.0785818492393,0.0786009629314,0.0784589755045,0.0782978743854,0.0783115270226,0.0784070954831,0.0784262091752,0.0782596470012,0.0786637650626,0.0788794767305,0.078833057764,0.0790924578709,0.0792016789686,0.0789450093891,0.0789122430598,0.0786883398096,0.0788002914347,0.0787566029956,0.0793846243071,0.0794474264383,0.0793518579778,0.079346396923,0.0797068265452,0.0795784917555,0.0798160476429,0.0798515444996,0.0796385633592,0.0794310432736,0.0794173906364,0.0795293422615,0.0794528874932,0.079297247429,0.0793518579778,0.0798870413564,0.0795894138653,0.0795730307006,0.079414660109,0.0793982769443,0.0791006494532,0.0791306852551,0.079507498042,0.0797450539294,0.0796276412494,0.0796549465238,0.0790897273435,0.0787920998523,0.0788931293677,0.0791224936728,0.0790760747062,0.079204409496,0.0789122430598,0.0789340872793,0.0789149735872,0.0788658240933,0.0784262091752,0.0784043649556,0.0782159585622,0.0782159585622,0.0779865942571,0.0780029774217,0.0778145710283,0.0778418763027,0.0779947858394,0.0781067374645,0.0781941143426,0.0769462633019,0.0759168544564,0.0749284035226,0.0737570072502,0.0724545456606,0.0715015915835,0.0703001595092,0.0691533379838,0.0679382532723,0.0670917897654,0.0660077703712,0.064615201376,0.0635557567287,0.0624935815539,0.061720842288,0.0608743787811,0.0599569215608,0.0588073695079,0.0388007949439,0.0386724601542,0.0385605085291,0.0384021379375,0.0385441253644,0.038658807517,0.0384540179588,0.0384376347942,0.0385031674528,0.0386478854072,0.038585083276,0.0385960053858,0.0384458263765,0.0384567484863,0.0383366052789,0.0382983778947,0.0383284136965,0.0383557189709,0.0383693716082,0.0384512874314,0.0381836957421,0.0381727736324,0.0383202221142,0.0384267126844,0.0388499444379,0.0391066140174,0.0392977509383,0.0393687446518,0.0394342773103,0.0394533910024,0.0392786372462,0.0393004814657,0.0391639550936,0.0391857993132,0.0395462289354,0.0397755932405,0.0399503469968,0.0402534355428,0.0404473029911,0.040780427339,0.0407039725707,0.0406793978237,0.0409824863697,0.0410698632478,0.0410534800832,0.0410644021929,0.0412364254217,0.0411490485436,0.041318341245,0.0416651182301,0.0418862909528,0.0421729963342,0.0420009731054,0.0421129247305,0.0421648047519,0.041992781523,0.0422494511025,0.0425443480662,0.0422576426849,0.0420501225993,0.0417907224924,0.0416705792849,0.0415558971324,0.0417361119435,0.0418726383156,0.0419135962272,0.0418589856784,0.0416978845594,0.0416733098124,0.0417989140747,0.0417033456142)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("25-organelles-nucleus-merged/KAN1-FLAG-replicate-2-GSM1167539.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=142"),bty="n")
dev.off()