# R script for Peak Model
#  -- generated by MACS
p <- c(0.0356094094787,0.0374665405977,0.0389565644024,0.0412239919314,0.0427248130101,0.0445495523072,0.0462231297691,0.0477347481217,0.049537892871,0.0509199439362,0.0528742505207,0.0551200835018,0.0566964854981,0.0582189011247,0.0597737085732,0.0616200424182,0.0633152144279,0.0650967646293,0.0653235073822,0.0655934392308,0.0656366283266,0.0651831428208,0.0653882910258,0.06534510193,0.0649564000679,0.0656150337787,0.0658201819837,0.0656474256006,0.065355899204,0.0646648736714,0.0645029145621,0.0644273336445,0.0644165363706,0.0644921172882,0.064319360905,0.0644381309185,0.0649240082461,0.0644057390966,0.0645784954798,0.0642869690832,0.0647944409587,0.0646540763974,0.0653019128343,0.0652803182864,0.0651291564511,0.0661980865719,0.0664680184206,0.0659821410929,0.0662628702156,0.0662412756677,0.0660685192845,0.0659281547232,0.0662952620374,0.0663924375029,0.0659173574493,0.0658525738056,0.0659173574493,0.0658957629014,0.0654962637653,0.0661225056543,0.0661872892979,0.0658201819837,0.0657446010661,0.0651723455469,0.0652371291906,0.0654314801216,0.0652371291906,0.0646648736714,0.0640602263303,0.0642761718092,0.0642221854395,0.0635527544548,0.0634663762632,0.0646000900277,0.0650751700814,0.0650535755335,0.0649995891637,0.0653774937519,0.0650103864377,0.0651075619032,0.0651723455469,0.0648052382327,0.0644057390966,0.0643517527269,0.0638658753992,0.0641681990698,0.0645461036579,0.0644921172882,0.0647080627671,0.0646324818495,0.0646756709453,0.0645784954798,0.0645784954798,0.064535306384,0.0649024136982,0.0646324818495,0.0655286555872,0.0659065601753,0.0658849656274,0.0663060593114,0.0666947611735,0.0672238275969,0.0677205021985,0.0678392722119,0.0683467440874,0.0685410950185,0.0687570404974,0.0694048769343,0.0695668360435,0.0685842841143,0.0682819604438,0.0684655141009,0.0681200013345,0.068022825869,0.068238771348,0.0684007304572,0.0685195004706,0.0683899331832,0.0689945805243,0.0691997287293,0.0701174970148,0.0705277934248,0.0703010506719,0.0703550370417,0.0697719842485,0.0696208224132,0.0696964033309,0.0694804578519,0.069469660578,0.0693508905646,0.068843418689,0.0688758105109,0.0678824613077,0.0680444204169,0.0677528940203,0.0679148531295,0.0675585430893,0.0669862875701,0.0668999093785,0.0668567202827,0.0666299775298,0.0659929383669,0.0652263319166,0.065139953725,0.0647080627671,0.0648700218764,0.0646756709453,0.0645137118361,0.0651291564511,0.0649024136982,0.0645569009319,0.064729657315,0.0646108873016,0.0646432791235,0.0638118890295,0.063919861769,0.0632504307842,0.0631316607708,0.0633368089758,0.0636283353724,0.0633907953456,0.0637471053858,0.0640602263303,0.0641897936177,0.064125009974,0.0644057390966,0.0644057390966,0.0642545772614,0.0643409554529,0.0638658753992,0.064125009974,0.0635851462766,0.0633152144279,0.063509565359,0.0630344853053,0.0631748498666,0.0631748498666,0.0632720253321,0.0640278345085,0.0638442808513,0.0637686999337,0.0635851462766,0.0632720253321,0.0631316607708,0.0627213643608,0.0628401343742,0.0630020934834,0.063088471675,0.0635743490027,0.06329361988,0.0636499299203,0.0635311599069,0.0634555789892,0.0629373098398,0.0630452825792,0.0627861480045,0.0632504307842,0.0633152144279,0.0630236880313,0.06288332347,0.0629157152919,0.0632180389624,0.0632828226061,0.0636823217421,0.0638118890295,0.0643625500008,0.0647188600411,0.0648592246024,0.0655934392308,0.0658417765316,0.0661548974761,0.0661225056543,0.0665651938861,0.0669754902961,0.067213030323,0.0679148531295,0.068638270484,0.0688002295932,0.0693508905646,0.0697287951527,0.0703226452198,0.0702470643022,0.0697395924267,0.0699123488098,0.0696856060569,0.0698907542619,0.070290253398,0.0699879297275,0.0705277934248,0.070894900739,0.0712080216835,0.0712080216835,0.0706141716164,0.070894900739,0.0710352653004,0.0709164952869,0.0710028734785,0.0708193198214,0.0716723044633,0.071315994423,0.0714671562583,0.0712836026011,0.0712943998751,0.071510345354,0.0711432380398,0.0709488871088,0.071110846218,0.0714347644364,0.0712296162314,0.0708193198214,0.0706357661643,0.0701066997409,0.0697935787964,0.0706357661643,0.0707113470819,0.0702038752064,0.0696424169611,0.0698043760703,0.0702362670282,0.0699231460838,0.0701498888367,0.0701930779325,0.0699339433577,0.0703982261375,0.0703118479459,0.0703658343156,0.0705169961509,0.0707437389038,0.071100048944,0.0712080216835,0.0711216434919,0.0716075208196,0.0714671562583,0.0716291153675,0.0714995480801,0.0721473845169,0.0718234662985,0.0718558581204,0.0717910744767,0.0724497081875,0.0731191391722,0.0739289347183,0.0740800965535,0.0740153129099,0.0741448801972,0.0746631493467,0.0745335820593,0.0752354048659,0.0756780930978,0.0753649721533,0.0758940385767,0.0762719431649,0.0765526722875,0.0771141305328,0.077276089642,0.0773084814638,0.0777943587915,0.0783450197628,0.0785825597896,0.0790036534736,0.0794031526096,0.0796622871844,0.0804288936347,0.0810875273454,0.0816273910428,0.0824803756847,0.0829122666426,0.0833009685047,0.0839488049415,0.0840135885852,0.0846290332002,0.0849745459665,0.0859463006218,0.0866589207023,0.0869072580031,0.0871016089342,0.0874471217005,0.0870260280166,0.0876954590013,0.0883540927121,0.0884080790818,0.0884944572734,0.0896929546816,0.0902112238311,0.0899844810782,0.0897685355992,0.0893150500934,0.0896389683118,0.0903947774882,0.0904811556797,0.0909670330074,0.0916904503619,0.0915932748963,0.0918308149232,0.0918308149232,0.0918092203753,0.0918848012929,0.0921007467719,0.0916256667182,0.0914097212392,0.0915500858005,0.0906863038847,0.0915176939787,0.0919387876626,0.0925110431819,0.0930185150574,0.0928457586742,0.0929321368658,0.0930725014271,0.0925002459079,0.0928673532221,0.0927269886608,0.0923922731684,0.0929969205095,0.0925650295516,0.092489448634,0.0928349614003,0.0933748250977,0.0929537314137,0.0927269886608,0.0935691760287,0.094324985205,0.0954479016956,0.096182116324,0.0955018880653,0.0960417517627,0.0969163309524,0.0973266273624,0.0974561946498,0.0974993837456,0.0979852610732,0.0987518675235,0.0989354211806,0.099270136673,0.0993997039603,0.100025945849,0.101397199641,0.102260981556,0.102595697049,0.10314635802,0.102952007089,0.102898020719,0.103189547116,0.103286722581,0.103643032622,0.104744354564,0.104971097317,0.105813284685,0.106148000178,0.106579891135,0.107260119394,0.108318252241,0.108350644063,0.108706954103,0.108782535021,0.108912102308,0.108955291404,0.109905451511,0.109754289676,0.109786681498,0.11129829985,0.11176258263,0.111881352644,0.111989325383,0.112248459958,0.112788323655,0.112950282764,0.113177025517,0.114245955638,0.114030010159,0.114569873857,0.115520033964,0.115001764814,0.11545525032,0.115714384895,0.11545525032,0.115930330374,0.11674012592,0.116772517742,0.117010057769,0.117323178713,0.116988463221,0.117733475123,0.117949420602,0.118521676121,0.118931972531,0.119461038955,0.119137120736,0.120000902652,0.120065686296,0.12078910365,0.122451883838,0.122916166618,0.123315665754,0.123564003055,0.124265825861,0.124546554984,0.124665324997,0.124762500463,0.125399539626,0.126338902459,0.127083914362,0.128185236304,0.128908653659,0.129146193686,0.13033389382,0.130862960243,0.130377082916,0.130906149339,0.131726742159,0.132417767692,0.133389522347,0.134307290632,0.134544830659,0.135646152602,0.136812258188,0.137341324612,0.138777362047,0.139554765771,0.139954264907,0.14012702129,0.139997454003,0.139900278537,0.140807249549,0.141249937781,0.142685975216,0.143538959858,0.142901920695,0.143312217105,0.142955907064,0.143560554405,0.143970850815,0.144445930869,0.144802240909,0.14546087462,0.146076319235,0.145741603743,0.145730806469,0.145849576482,0.145935954674,0.146421832002,0.146108711057,0.146400237454,0.147944247628,0.148354544038,0.148181787655,0.14792265308,0.147577140314,0.148451719504,0.149401879611,0.148991583201,0.148700056804,0.148948394105,0.148829624092,0.147965842176,0.147814680341,0.148397733134,0.149023975023,0.149693406008,0.149639419638,0.15043841791,0.149747392377,0.149002380475,0.14879723227,0.148916002283,0.148635273161,0.148516503147,0.14838693586,0.147911855806,0.147307208465,0.146583791111,0.146270670166,0.146734952946,0.146842925685,0.146594588385,0.146173494701,0.145827981934,0.145709211921,0.145428482798,0.144035634459,0.144154404473,0.143323014379,0.142858731599,0.14299909616,0.142092125149,0.140818046823,0.141282329603,0.141109573219,0.140958411384,0.140461736783,0.140504925878,0.140213399482,0.139554765771,0.139759913976,0.139511576675,0.138917726608,0.13812952561,0.138194309254,0.138226701075,0.138453443828,0.137643648282,0.137654445556,0.137989161049,0.138086336514,0.137578864639,0.137805607391,0.137395310981,0.137244149146,0.137578864639,0.136974217298,0.136736677271,0.136747474545,0.136326380861,0.136855447284,0.136725879997,0.136455948148,0.135991665368,0.1364343536,0.137017406393,0.13638036723,0.136250799943,0.136391164504,0.136002462642,0.135894489903,0.135786517163,0.135279045288,0.135192667096,0.135235856192,0.134955127069,0.134987518891,0.135095491631,0.135354626205,0.134652803399,0.134717587042,0.134857951604,0.135441004397,0.135926881725,0.136715082723,0.136337178135,0.13561376078,0.135602963506,0.135322234384,0.135656949876,0.135041505261,0.134307290632,0.133767426935,0.133249157786,0.132115444021,0.131607972146,0.130539042025,0.129988381054,0.129578084644,0.128735897276,0.127569791689,0.12587461968,0.125097215955,0.123261679384,0.12289457207,0.121490926457,0.120357212692,0.119385458037,0.11832732519,0.11668613955,0.116167870401,0.115692790347,0.113706091941,0.11222686541,0.111028368002,0.109959437881,0.10842622498,0.107324903038,0.105543352836,0.104722760016,0.103286722581,0.102239387009,0.101461983284,0.10073856593,0.100047540397,0.0992485421251,0.0977909101422,0.0968839391306,0.0960525490366,0.0955450771611,0.09494042982,0.0943897688487,0.0941090397261,0.0935799733027,0.0929537314137,0.0920467604021,0.0916472612661,0.0911289921166,0.0905675338713,0.0905999256932,0.0896821574076,0.0894662119287,0.0890883073405,0.0884404709037,0.0887104027524,0.0891746855321,0.0888615645876,0.0882353226987,0.0885484436431,0.0889263482313,0.08919628008,0.0897469410513,0.0895633873942,0.0895417928463,0.089401428285,0.0886240245608,0.0881381472331,0.0879977826718,0.0873067571392,0.0866697179763,0.0864753670452,0.0862378270184,0.0866373261544,0.0863026106621,0.0859139088,0.0858707197042,0.0860650706352,0.0862270297444,0.0856763687731,0.0852336805413,0.0849853432405,0.0851041132539,0.0848449786792,0.0847046141178,0.0848665732271,0.0851365050757,0.0849961405144,0.0848017895834,0.0847262086657,0.0845210604607,0.0845426550086,0.0842835204339,0.0839056158457,0.0836248867231,0.0840351831331,0.0837760485584,0.0832577794089,0.083020239382,0.0829770502863,0.0823832002191,0.0816705801386,0.0817461610562,0.0818325392478,0.0812062973589,0.0810227437018,0.0810227437018,0.0812278919068,0.0807960009489,0.080774406401,0.0809903518799,0.0814870264815,0.0810335409757,0.0805908527439,0.080353312717,0.0806664336615,0.0808391900447,0.0810119464278,0.0806880282094,0.0808715818665,0.0810659327976,0.0806988254833,0.0801913536078,0.0801697590599,0.0805476636481,0.080158961786,0.0802237454296,0.0800509890465,0.0798350435675,0.079532719897,0.0793815580617,0.0786473434333,0.0777727642436,0.077276089642,0.077060144163,0.0768981850538,0.0762719431649,0.0765310777396,0.0762827404388,0.0760020113162,0.0761423758775,0.0760991867817,0.0759480249465,0.0751706212222,0.0752785939617,0.0745551766072,0.0740261101838,0.0738749483485,0.0734106655688,0.0737021919654,0.072967977337,0.0727196400362,0.072557680927,0.0731947200899,0.073993718362,0.073583421952,0.0735078410343,0.073378273747,0.0734214628427,0.0735402328562,0.0730543555285,0.073572624678,0.0732487064596,0.0723849245438,0.0725792754748,0.0720286145035,0.071920641764,0.0717802772027,0.0720394117775,0.0717478853809,0.0718666553943,0.0718882499422,0.0721905736127,0.0721149926951,0.0718018717506,0.0718234662985,0.0720286145035,0.0722445599825,0.0727844236798,0.0732163146377,0.0732163146377,0.0737993674309,0.0739397319922,0.0737021919654,0.0735942192259,0.073572624678,0.0735618274041,0.0732810982814,0.0729247882412,0.0722661545304,0.0717478853809,0.0714023726146,0.0712080216835,0.0718342635725,0.0717802772027,0.0714347644364,0.0716075208196,0.0710568598483,0.0709596843827,0.0716831017372,0.0719530335859,0.0721581817909,0.0720933981472,0.0715643317238,0.0715427371759,0.0716291153675,0.0714563589843,0.0708301170954,0.0706465634382,0.0701390915627,0.0705169961509,0.0705601852467,0.0701390915627,0.0699987270014,0.0693940796603,0.0687246486756,0.0689837832503,0.0691457423596,0.068854215963,0.0692321205511,0.0694912551259,0.0690809587159,0.0688974050588,0.0691457423596,0.0691349450856,0.0688218241411,0.0687786350453,0.0692321205511,0.0695560387696,0.0690053777982,0.0686274732101,0.0688326214151,0.0689405941546,0.0692861069209,0.0699231460838,0.0694264714822,0.0687570404974,0.068638270484,0.0690917559898,0.0694048769343,0.0693940796603,0.0695992278653,0.0696100251393,0.0701282942888,0.0701714833846,0.0705169961509,0.0705601852467,0.0706789552601,0.071315994423,0.0713267916969,0.0712404135054,0.071715493559,0.0711432380398,0.0711864271356,0.0712080216835,0.0705601852467,0.0704198206854,0.0707653334517,0.070894900739,0.0708301170954,0.0711648325877,0.0711756298617,0.0708193198214,0.0706249688904,0.0704630097811,0.0710892516701,0.0717478853809,0.0719098444901,0.0710892516701,0.0709272925609,0.0705061988769,0.0705277934248,0.0705817797946,0.0707977252735,0.0703874288635,0.0706249688904,0.0708409143693,0.0709164952869,0.070290253398,0.0700311188232,0.0698475651661,0.0696100251393,0.0697503897006,0.0694912551259,0.0691889314553,0.0690809587159,0.0689082023327,0.0689513914285,0.0690161750722,0.0683467440874,0.0682063795261,0.0684979059227,0.0685842841143,0.0679256504035,0.0678932585816,0.0675585430893,0.067213030323,0.0671374494053,0.0671482466793,0.0671914357751,0.0669323012003,0.0667271529953,0.0664032347769,0.066176492024,0.0666839638995,0.0662088838458,0.0658849656274,0.0656798174224,0.0663168565853,0.066597585708,0.066802733913,0.0660901138324,0.0661333029282,0.0659173574493,0.0660145329148,0.0661009111064,0.0668135311869,0.0672454221448,0.0670834630356,0.0669323012003,0.0671158548574,0.0670942603095,0.0675693403632,0.066586788434,0.066381640229,0.0664788156945,0.0670618684877,0.0671806385011,0.0674613676237,0.0678824613077,0.0679688394993,0.0681200013345,0.0683575413614,0.0686166759361,0.0687462432235,0.0684871086488,0.0684871086488,0.0685302977445,0.0684763113748,0.0686814595798,0.0684979059227,0.0687030541277,0.0685518922924,0.0693184987427,0.0692105260032,0.0691889314553,0.0693508905646,0.069869159714,0.0695452414956,0.0700311188232,0.0707329416298,0.0703982261375,0.0699663351796,0.0695128496738,0.0692321205511,0.0693077014688,0.0689405941546,0.0693077014688,0.0688002295932,0.0697827815225,0.0702470643022,0.0705817797946,0.0701390915627,0.0693832823864,0.0690269723461,0.0693184987427,0.0699987270014,0.0698259706182,0.0698151733443,0.0692429178251,0.0693832823864,0.0694156742082,0.0695236469477,0.0695884305914,0.0695884305914,0.0691025532638,0.0691133505377,0.0693832823864,0.0702038752064,0.0700095242753,0.069879956988,0.069869159714,0.0697395924267,0.0695776333175,0.0696856060569,0.0694048769343,0.0687570404974,0.0688650132369,0.0695560387696,0.0700527133711,0.0703334424938,0.0705169961509,0.0703874288635,0.0702362670282,0.0706033743425,0.0699339433577,0.069048566894,0.0689189996067,0.0689189996067,0.0698367678922,0.0704522125072,0.070484604329,0.0699879297275,0.0698367678922,0.0694912551259,0.0698475651661,0.0693077014688,0.0688758105109,0.0688326214151,0.0684223250051,0.0684007304572,0.0688326214151,0.068854215963,0.0694372687561,0.0693724851124,0.0692321205511,0.0689837832503,0.0688758105109,0.069253715099,0.0693400932906,0.0693724851124,0.069264512373,0.0692105260032,0.0693724851124,0.0684979059227,0.0680552176909,0.0676017321851,0.0669107066524,0.0666947611735,0.0666299775298,0.0666299775298,0.0674505703498,0.0683359468135,0.068238771348,0.0682819604438,0.0676773131027,0.0671266521314,0.066802733913,0.0664896129685,0.0668999093785,0.067407381254,0.067817677664,0.0684979059227,0.0687138514017,0.0685302977445,0.0683251495395,0.0681523931564,0.0675909349111,0.0675693403632,0.0668243284608,0.0664572211466,0.0667055584474,0.066802733913,0.0664896129685,0.0657769928879,0.0660577220106,0.0659497492711,0.0660793165585,0.0662736674895,0.0662628702156,0.0665759911601,0.0662628702156,0.0661980865719,0.0666839638995,0.0666839638995,0.067213030323,0.0671050575835,0.0660253301887,0.0658957629014,0.0665112075164,0.0662520729416,0.0664248293248,0.0661441002022,0.0664140320508,0.0662844647635,0.0665759911601,0.0664464238727,0.0660901138324,0.06534510193,0.0657230065182,0.066176492024,0.0661548974761,0.0663060593114,0.066381640229,0.0665112075164,0.0664356265987,0.0666623693516,0.0662628702156,0.0661117083803,0.0663276538593,0.0668135311869,0.0663924375029,0.0660037356408,0.0657985874358,0.0659065601753,0.0659389519972,0.0659389519972,0.0663708429551,0.0668135311869,0.0669107066524,0.0672778139666,0.0667703420911,0.066791936639,0.0670942603095,0.0666947611735,0.0662088838458,0.0662412756677,0.0667379502693,0.0672346248709,0.0669862875701,0.0676665158287,0.0668783148306,0.0670186793919,0.0669107066524,0.0675261512674,0.0675585430893,0.0679148531295,0.068033623143,0.0682819604438,0.0684223250051,0.0682711631698,0.0680768122388,0.0681307986085,0.0680768122388,0.0684007304572,0.0689297968806,0.0688758105109,0.069059364168,0.0691889314553,0.069469660578,0.0693077014688,0.0688758105109,0.0686274732101,0.0685626895664,0.0688866077848,0.0688218241411,0.0688002295932,0.0687138514017,0.0683791359093,0.0688218241411,0.0689513914285,0.0694912551259,0.0695668360435,0.0693508905646,0.0691241478117,0.0688002295932,0.0686922568538,0.0694372687561,0.069264512373,0.0690809587159,0.0693724851124,0.0693508905646,0.0690917559898,0.0689513914285,0.0687894323193,0.0685518922924,0.068649067758,0.0689082023327,0.0683251495395,0.0687462432235,0.0682495686219,0.0678608667598,0.0680876095127,0.0680984067866,0.0680660149648,0.0679364476774,0.0676665158287,0.0684979059227,0.0688758105109,0.0691025532638,0.068843418689,0.0689837832503,0.0685842841143,0.0689405941546,0.0691349450856,0.0685410950185,0.069059364168,0.0685518922924,0.0687894323193,0.0690269723461,0.0697179978788,0.0701066997409,0.0697072006048,0.0696208224132,0.0694264714822,0.0698475651661,0.0694048769343,0.0693292960167,0.0694264714822,0.0696208224132,0.0695020523998,0.0699231460838,0.0700959024669,0.0702254697543,0.0705817797946,0.0702686588501,0.0707545361777,0.070894900739,0.0705817797946,0.0701066997409,0.0700635106451,0.0681523931564,0.0666191802558,0.0643085636311,0.062267878855,0.0602811804487,0.0582512929466,0.0561566218008,0.0546018143523,0.0523667786452,0.0506176202657,0.0491599882828,0.0468817634799,0.0448842677996,0.0427895966538,0.040489777303,0.0379956070211,0.0360736922585,0.0343569257008)
m <- c(0.0368405293834,0.0391545514814,0.0409171010234,0.042928353875,0.0450152990382,0.0469292332034,0.0490161783666,0.0507895410959,0.052238508204,0.0542713874303,0.0558068600375,0.0576234755163,0.0592238272477,0.0618081790301,0.064262772564,0.0663821572893,0.0682095859555,0.0698640036237,0.0699072563732,0.0703289706808,0.0698964431858,0.0698207508742,0.0695179816277,0.0691611464444,0.0694855420656,0.0693341574424,0.0695396080025,0.0696369266889,0.0695287948151,0.069150333257,0.0693990365666,0.0690530145707,0.0687178057621,0.0686313002631,0.0689232563222,0.0690854541328,0.0691395200697,0.0683934101408,0.0683825969535,0.0679716958333,0.0676905529615,0.0675391683383,0.067733805711,0.0685556079515,0.0688043112611,0.0687394321368,0.0689556958843,0.0690530145707,0.0696477398762,0.0687610585116,0.0683069046419,0.0684042233282,0.0681987727681,0.0683934101408,0.0680473881449,0.0681122672691,0.0687718716989,0.0690854541328,0.0687610585116,0.0686961793873,0.0683609705787,0.068598860701,0.0686313002631,0.0686745530126,0.068425849703,0.0682203991429,0.0683934101408,0.0682203991429,0.0682312123302,0.0683825969535,0.0675391683383,0.0673553441529,0.0672147727171,0.0669660694075,0.0672039595297,0.0671498935928,0.0672472122792,0.0674742892141,0.0668579375337,0.0657333660468,0.0656252341731,0.0652683989897,0.0653657176761,0.0654954759246,0.0652900253645,0.0657225528595,0.0655819814236,0.0652251462402,0.065419783613,0.0654738495499,0.0657874319837,0.0652900253645,0.0649223769938,0.0649548165559,0.0650088824928,0.0652035198655,0.06567930011,0.0657982451711,0.065592794611,0.0656360473605,0.0656684869226,0.066230772666,0.0660902012302,0.0660577616681,0.0664254100388,0.0666741133484,0.0673985969024,0.0675932342752,0.0670633880938,0.0673769705277,0.0673445309656,0.0676581133994,0.0678960035216,0.0681338936439,0.0684691024525,0.0686637398252,0.0692043991939,0.0695612343772,0.0700910805586,0.0706858058641,0.070566860803,0.0705993003652,0.0706425531146,0.0709669487359,0.0709236959864,0.0712372784202,0.0711183333591,0.0712264652328,0.071345410294,0.0716157399783,0.0718428169132,0.0718320037258,0.0716481795404,0.071983388349,0.0716698059152,0.0717454982268,0.0717022454773,0.0720158279112,0.0720374542859,0.0722212784713,0.0717887509763,0.0715184212919,0.0714211026056,0.0712480916076,0.0719076960374,0.0718860696627,0.0717454982268,0.0716373663531,0.0711507729212,0.070566860803,0.0704479157419,0.0707074322389,0.0706749926768,0.0707290586136,0.0703614102429,0.0702424651818,0.0699937618722,0.070015388247,0.0698099376868,0.0694855420656,0.0696261135015,0.06975587175,0.0698207508742,0.069669366251,0.0694531025035,0.0689340695095,0.0686745530126,0.0684042233282,0.0680690145196,0.0676689265868,0.068339344204,0.0682203991429,0.0684366628903,0.0678094980226,0.0676797397742,0.0673012782161,0.0672363990918,0.0667606188474,0.0666524869736,0.0665011023504,0.066490289163,0.067009322157,0.0669120034706,0.0672472122792,0.0671715199676,0.0675499815257,0.0678311243974,0.0679500694585,0.0676689265868,0.0679176298964,0.0674094100898,0.0668687507211,0.0668903770959,0.0669552562201,0.0673445309656,0.0671931463423,0.0672904650287,0.0662740254155,0.0660577616681,0.06674980566,0.0667281792852,0.0666092342241,0.066922816658,0.067095827656,0.0672039595297,0.0670525749065,0.067009322157,0.0673120914034,0.0670742012812,0.0671390804055,0.0671931463423,0.0676148606499,0.0673877837151,0.0677986848353,0.0672472122792,0.0671390804055,0.0668146847842,0.0662740254155,0.0663605309145,0.0659280034196,0.0660793880428,0.065765805609,0.0653765308635,0.0651818934908,0.0652251462402,0.0648683110569,0.0649115638064,0.0646953000589,0.0654089704256,0.0649548165559,0.0648791242443,0.0646736736842,0.0645114758736,0.0644682231241,0.0645439154357,0.0638086186942,0.0635491021973,0.0637221131953,0.0639275637554,0.0640789483786,0.0636680472584,0.0636680472584,0.0633760911993,0.0626516076452,0.0625218493967,0.0621866405881,0.0624785966472,0.0620568823397,0.0627813658937,0.0626840472073,0.0634734098857,0.0635815417594,0.0636139813215,0.0638410582564,0.0639816296922,0.0637545527574,0.0641870802523,0.0639708165049,0.0637221131953,0.063657234071,0.0635382890099,0.0636031681341,0.0640573220039,0.0637978055069,0.0633328384498,0.0636247945089,0.0635599153846,0.06374373957,0.064089761566,0.0646412341221,0.0646628604968,0.0649548165559,0.0651710803034,0.0648574978695,0.0648791242443,0.0653224649266,0.0655495418615,0.0653765308635,0.0655279154867,0.0657874319837,0.0658739374827,0.0670417617191,0.0666416737862,0.0662848386029,0.066144267167,0.0661983331039,0.0658198715458,0.0658847506701,0.0660253221059,0.065506289112,0.0656144209857,0.0656576737352,0.0651170143665,0.0653549044887,0.0653008385519,0.0651927066781,0.0652792121771,0.065073761617,0.065073761617,0.0647601791832,0.0640140692544,0.0638734978185,0.0637761791321,0.0641113879407,0.0634409703235,0.0633328384498,0.0631165747023,0.0629003109548,0.0631706406392,0.0635274758225,0.0628570582053,0.0628029922685,0.0630625087654,0.0633436516372,0.0629219373296,0.0630192560159,0.0634734098857,0.0630300692033,0.063570728572,0.064262772564,0.064003256067,0.0639708165049,0.0641005747533,0.0643600912503,0.0641330143155,0.0646196077473,0.0644249703746,0.0648466846822,0.0654954759246,0.0657982451711,0.0660145089186,0.066144267167,0.066230772666,0.066230772666,0.0665876078494,0.0672472122792,0.0681122672691,0.0675067287762,0.0676256738373,0.0676256738373,0.0679176298964,0.0683717837661,0.0684042233282,0.0686421134504,0.0683609705787,0.0683717837661,0.0689124431348,0.0688583771979,0.0685880475136,0.0689124431348,0.0695179816277,0.0694639156909,0.069236838756,0.0691827728192,0.0687394321368,0.0688043112611,0.0686745530126,0.0687718716989,0.0688475640106,0.0685231683893,0.0687286189494,0.0691178936949,0.0691070805075,0.0689881354464,0.0686529266378,0.0683501573913,0.068598860701,0.0688367508232,0.0685664211388,0.0687934980737,0.0681230804565,0.0681987727681,0.0686745530126,0.0688800035727,0.068512355202,0.0684907288272,0.0689232563222,0.0689124431348,0.0693125310676,0.0693882233793,0.0697126190005,0.0697774981247,0.0696585530636,0.0693774101919,0.0696369266889,0.0693882233793,0.0690854541328,0.0698856299985,0.0699396959353,0.0700262014343,0.0702316519944,0.0697774981247,0.0702100256197,0.0702640915566,0.0700694541838,0.0699721354975,0.0698207508742,0.069323344255,0.0690962673202,0.0694639156909,0.069150333257,0.0693557838171,0.0695287948151,0.0691070805075,0.0691178936949,0.0687610585116,0.0692043991939,0.0693449706298,0.0684907288272,0.0691287068823,0.0691611464444,0.0691935860065,0.0687934980737,0.0688151244484,0.069063827758,0.0690962673202,0.0685664211388,0.0688908167601,0.0686961793873,0.0693341574424,0.0693341574424,0.069582860752,0.0696801794384,0.0688475640106,0.068977322259,0.0690530145707,0.0692152123813,0.0696585530636,0.0693882233793,0.0692909046929,0.0697883113121,0.0708912564242,0.0713886630435,0.0712264652328,0.0718211905384,0.0715292344793,0.0725132345304,0.0724916081556,0.07276193784,0.0728700697137,0.0732809708339,0.0733566631455,0.073745937891,0.0739297620764,0.0742325313228,0.0745677401314,0.0751083995001,0.0752922236855,0.0758545094289,0.0756923116183,0.0757463775552,0.0756923116183,0.0763735424229,0.0760383336143,0.0764276083598,0.0760491468017,0.0760707731764,0.0761356523007,0.0764492347345,0.077011520478,0.0766546852946,0.0763735424229,0.0763951687976,0.0766546852946,0.0767628171684,0.0771088391643,0.0776711249078,0.0773575424739,0.0770007072906,0.0774440479729,0.0775305534719,0.0776278721583,0.0774440479729,0.0776386853457,0.0776927512825,0.078514553523,0.0784496743987,0.0786443117714,0.0786551249588,0.079066026079,0.0790876524538,0.0795634326982,0.079498553574,0.0795309931361,0.0794553008245,0.0796931909467,0.079498553574,0.0797905096331,0.0798013228205,0.0801689711912,0.0799635206311,0.0801581580038,0.0805906854988,0.0801689711912,0.0798878283195,0.0796283118225,0.0800824656922,0.0807961360589,0.0806880041851,0.0808177624336,0.0809583338695,0.0810123998064,0.0802554766902,0.0801797843786,0.0806880041851,0.0806339382483,0.0804284876882,0.0807636964968,0.0811097184927,0.0811313448675,0.0811962239917,0.0809475206821,0.0814341141139,0.0813908613644,0.0814989932382,0.0810772789306,0.0816179382993,0.0810556525559,0.081001586619,0.0815422459877,0.0812502899286,0.0818342020468,0.0822667295417,0.0828290152852,0.0829479603463,0.0830777185948,0.0840292790837,0.0843320483302,0.0849267736358,0.0853052351939,0.0856836967519,0.0859324000615,0.0864730594303,0.0865379385545,0.0871218506727,0.0880193452247,0.0884734990944,0.0887222024041,0.0899657189521,0.0898575870783,0.0896845760803,0.0898684002657,0.0900197848889,0.0903658068849,0.0904090596344,0.0915660706834,0.0914363124349,0.0916633893698,0.0915660706834,0.09207429049,0.0916201366203,0.0920959168648,0.092420312486,0.0934259389118,0.0944640048997,0.0940206642173,0.0944640048997,0.0946586422724,0.0949614115189,0.0957183346351,0.0959129720078,0.096237367629,0.096496884126,0.0969942907452,0.0965293236881,0.0969618511831,0.0978052797983,0.0985838292892,0.0986919611629,0.0989406644725,0.0990055435968,0.0988217194114,0.0998597853993,0.100378818393,0.0998273458372,0.100659961265,0.101622334941,0.102465763556,0.103417324045,0.1040553021,0.104996049402,0.105309631836,0.106390950573,0.107612840747,0.108488708924,0.109840357346,0.111678599199,0.112522027814,0.112716665187,0.112986994871,0.11332220368,0.11500906091,0.116317456583,0.117290643446,0.11764747863,0.117658291817,0.118901808365,0.119961500728,0.120588665595,0.12147534696,0.122697237133,0.123875874557,0.124405720738,0.125519479038,0.127444226391,0.128612050627,0.130352973794,0.131120710098,0.131585677155,0.132764314579,0.133510424507,0.134148402562,0.135067523489,0.136192094976,0.137208534589,0.138257413765,0.13910084238,0.139825325934,0.14033354574,0.139846952309,0.140409238052,0.1405389963,0.139846952309,0.139630688561,0.140009150119,0.140571435863,0.140712007298,0.140528183113,0.140733633673,0.140247040241,0.140279479804,0.14037679849,0.140625501799,0.140820139172,0.14058224905,0.140495743551,0.141360798541,0.141317545791,0.141760886474,0.141685194162,0.140755260048,0.140874205109,0.140214600679,0.139890205058,0.139490117125,0.139111655567,0.139554996249,0.139565809437,0.139890205058,0.139803699559,0.13946849075,0.138971084131,0.137814073082,0.136635435658,0.13675438072,0.137695128021,0.137997897268,0.13798708408,0.138203347828,0.139609062186,0.140690380924,0.140809325985,0.141209413918,0.14124185348,0.141306732604,0.141912271097,0.142085282095,0.142658381026,0.142366424967,0.142863831586,0.143966776698,0.144474996505,0.144020842635,0.144723699814,0.144301985507,0.144496622879,0.145156227309,0.145015655873,0.145221106433,0.14577257899,0.145599567992,0.145350864682,0.145080534998,0.145502249305,0.145394117431,0.145361677869,0.145848271301,0.146064535049,0.146724139478,0.147535128531,0.14721073291,0.146659260354,0.146810644977,0.147221546098,0.148108227462,0.147437809845,0.146983655975,0.147167480161,0.147264798847,0.14721073291,0.147016095538,0.147113414224,0.146929590039,0.14655112848,0.146789018603,0.146702513104,0.146421370232,0.145902337238,0.146334864733,0.145599567992,0.145664447116,0.145513062493,0.144961589936,0.145242732808,0.144842644875,0.145329238307,0.145177853684,0.145545502055,0.145642820741,0.145426556994,0.145048095435,0.144810205313,0.144431743755,0.144420930568,0.144691260252,0.144712886627,0.144680447065,0.145156227309,0.144107348134,0.143923523949,0.143718073388,0.143090908521,0.143036842584,0.14206365572,0.141252666667,0.141349985354,0.140614688612,0.139598248999,0.140355172115,0.140084842431,0.138754820384,0.137197721402,0.136170468601,0.13568387517,0.134429545434,0.133975391564,0.132764314579,0.131488358468,0.130580050729,0.129390600118,0.128990512185,0.12794163301,0.128374160505,0.127671303325,0.127422600016,0.127141457144,0.126708929649,0.126535918651,0.125876314221,0.125043698793,0.124092138305,0.123400094313,0.123281149252,0.122459347011,0.122362028325,0.121648357958,0.120437280972,0.119756050168,0.119139698487,0.119096445738,0.11908563255,0.118566599556,0.118285456685,0.118198951186,0.117323083008,0.116706731328,0.117074379699,0.117290643446,0.116922995076,0.116522907143,0.11546321478,0.115484841155,0.115830863151,0.116674291766,0.116955434638,0.116382335707,0.115625412591,0.114976621348,0.114230511419,0.114230511419,0.113560093802,0.112922115747,0.112100313507,0.111105500268,0.110489148588,0.109753851847,0.109397016663,0.109299697977,0.108240005614,0.108034555054,0.107677719871,0.106974862691,0.106769412131,0.107039741816,0.106574774759,0.105277192274,0.104736532905,0.104130994412,0.104033675726,0.103514642732,0.103114554799,0.102930730614,0.102281939371,0.102108928373,0.102173807497,0.101665587691,0.101795345939,0.101124928322,0.100811345888,0.0991244886579,0.0983675655417,0.0984000051038,0.0982053677311,0.0974376314275,0.0967239610608,0.0965293236881,0.0963454995028,0.0959021588204,0.095512884075,0.0960319170689,0.0962698071911,0.096323873128,0.0957075214477,0.095426378576,0.0957291478224,0.0951236093295,0.0953831258265,0.0955561368245,0.0953723126391,0.0948532796451,0.0941504224658,0.094474818087,0.0936313894719,0.0932961806633,0.0932096751643,0.0928095872314,0.0921391696143,0.0915985102455,0.0912416750622,0.0912308618748,0.0909497190031,0.0907983343799,0.0909389058157,0.0907767080051,0.0901927958869,0.0904739387586,0.0901927958869,0.0899873453268,0.0898792134531,0.0901603563248,0.090398246447,0.0901495431374,0.0899657189521,0.0889709057137,0.0891871694611,0.0887005760293,0.0887330155914,0.0887978947157,0.0888627738399,0.0883221144712,0.0875976309172,0.0875327517929,0.0868839605505,0.0862676088701,0.0854458066297,0.0849484000105,0.0853160483812,0.0853701143181,0.0859432132489,0.0859540264363,0.0857053231267,0.0857377626888,0.086148663809,0.0855863780656,0.0853809275055,0.085078158259,0.0845807516398,0.0841590373322,0.0838130153362,0.083315608717,0.0828938944094,0.0823640482281,0.0820072130448,0.0818342020468,0.0817909492973,0.0817152569857,0.0811313448675,0.0805474327493,0.079758070071,0.0804068613134,0.0792174107023,0.0784821139608,0.0773899820361,0.0761897182375,0.0754868610582,0.0757463775552,0.0754868610582,0.0751408390623,0.0744487950703,0.0743082236344,0.0744271686956,0.0744379818829,0.074178465386,0.0729349488379,0.0726862455283,0.0723618499071,0.0719509487869,0.0719293224122,0.0711832124833,0.0714102894182,0.071345410294,0.0706966190515,0.0700262014343,0.0696801794384,0.0692800915055,0.0693341574424,0.0696477398762,0.0699505091227,0.0697126190005,0.0691395200697,0.068512355202,0.0685772343262,0.0686529266378,0.0681447068312,0.068598860701,0.0685015420146,0.0690313881959,0.0695071684404,0.0693665970045,0.0704371025545,0.0702965311187,0.0700370146217,0.0702208388071,0.0702208388071,0.0709236959864,0.0708588168621,0.0705776739904,0.0701883992449,0.0697883113121,0.0702100256197,0.0698748168111,0.0693665970045,0.0690746409454,0.0686204870757,0.0691178936949,0.0689232563222,0.0693017178803,0.0694422893161,0.0700586409964,0.0701667728702,0.070480355304,0.070015388247,0.0696909926257,0.0697342453752,0.0701451464954,0.0704695421167,0.0713778498561,0.071431915793,0.0714751685424,0.0719076960374,0.0722320916586,0.0722645312208,0.0722212784713,0.0719185092248,0.0721996520965,0.0718211905384,0.0713778498561,0.0712264652328,0.0708804432369,0.0706317399273,0.0701883992449,0.0701775860576,0.0705019816788,0.0703830366177,0.0704911684914,0.070653366302,0.0705560476157,0.0703289706808,0.0706209267399,0.0706641794894,0.0700370146217,0.0697234321879,0.069150333257,0.0687286189494,0.0676905529615,0.0679392562711,0.0676256738373,0.0678527507721,0.0682095859555,0.0676689265868,0.0673661573403,0.0670201353443,0.0664470364135,0.0659820693564,0.065592794611,0.0649440033685,0.0643925308124,0.0643276516882,0.0640356956291,0.0638410582564,0.0642195198145,0.0642087066271,0.0649115638064,0.0645763549978,0.0649115638064,0.0651170143665,0.0656576737352,0.0657441792342,0.0661550803544,0.0667065529105,0.0667606188474,0.0663929704766,0.0666849265357,0.067009322157,0.0667065529105,0.0662632122282,0.0661226407923,0.0667173660979,0.0663389045398,0.0668254979716,0.0674202232772,0.0674742892141,0.0680473881449,0.0682744650797,0.0679284430838,0.0684366628903,0.0684907288272,0.0683717837661,0.0679825090206,0.0676797397742,0.0678743771469,0.0685231683893,0.0684582892651,0.0689232563222,0.068977322259,0.0691611464444,0.0683285310166,0.0682203991429,0.0682203991429,0.067906816709,0.0679716958333,0.068079827707,0.0676148606499,0.0676689265868,0.0670309485317,0.0669876957822,0.0671390804055,0.0677662452732,0.0674959155888,0.0671066408433,0.0681338936439,0.0685556079515,0.0686961793873,0.0684150365156,0.0689016299474,0.0690422013833,0.0693017178803,0.0687610585116,0.0682203991429,0.0674202232772,0.0674418496519,0.0668795639085,0.066403783664,0.0667389924726,0.0674851024014,0.0675175419635,0.0675067287762,0.0677229925237,0.0675824210878,0.0668038715969,0.0671066408433,0.0672472122792,0.0674851024014,0.0673985969024,0.0671174540307,0.0674094100898,0.0671282672181,0.0668471243464,0.0662632122282,0.0661010144175,0.0660902012302,0.0660145089186,0.0660469484807,0.0657225528595,0.065592794611,0.0662199594787,0.0653765308635,0.0653224649266,0.0652143330529,0.0652575858024,0.065246772615,0.0643276516882,0.0638734978185,0.0642735857513,0.064176267065,0.0648791242443,0.0653440913014,0.0659928825438,0.0661118276049,0.0661010144175,0.0656144209857,0.0657117396721,0.0653008385519,0.0649656297433,0.0652143330529,0.0652143330529,0.0649548165559,0.0644141571872,0.0645979813726,0.0646520473094,0.0644465967493,0.064900750619,0.0645331022483,0.0645979813726,0.0650845748044,0.0648358714948,0.064900750619,0.0645114758736,0.0642195198145,0.0642952121261,0.0643709044377,0.064176267065,0.0642195198145,0.064262772564,0.0643600912503,0.0643709044377,0.0645871681852,0.0654954759246,0.0659496297943,0.0660469484807,0.0663389045398,0.0660902012302,0.0662199594787,0.0658090583584,0.0660036957312,0.0660145089186,0.0657009264847,0.0658631242953,0.0663280913524,0.0662632122282,0.066144267167,0.0661226407923,0.0664362232261,0.0666849265357,0.0665876078494,0.0665551682873,0.0669985089696,0.066403783664,0.0669011902832,0.0671931463423,0.0673661573403,0.0676040474625,0.0677013661489,0.0677554320858,0.0681014540817,0.0678635639595,0.0679716958333,0.0678851903343,0.0676689265868,0.0675175419635,0.0676689265868,0.0677770584605,0.0674526628393,0.0670309485317,0.067009322157,0.0668038715969,0.0666524869736,0.0665335419125,0.0662199594787,0.0664794759756,0.0664794759756,0.0666416737862,0.066836311159,0.0648899374317,0.0629435637043,0.0610728822886,0.0592778931845,0.0575153436426,0.0556014094773,0.0537631676238,0.0518600466459,0.0499785520428,0.0480970574398,0.0463777606473,0.04443138692,0.0422038703209,0.040095298783,0.0381272986809,0.0362349908904,0.0346130127843,0.032320617061)
s <- c(0.0351050448517,0.0349954317289,0.0350185081758,0.035035815511,0.0353358093207,0.0352608108683,0.0352435035331,0.0354396533318,0.0355723429015,0.0359588733871,0.0360627173982,0.0357800309236,0.0359473351636,0.0359300278285,0.0360973320685,0.0362242525265,0.0363511729844,0.036530015448,0.036633859459,0.0369223150453,0.0371126957323,0.0373953822068,0.0377126833517,0.0376492231228,0.0376665304579,0.0376896069048,0.0378626802566,0.0378396038097,0.0380069080498,0.0379434478208,0.038001138938,0.038064599167,0.0382088269602,0.0383299783064,0.0383242091947,0.0382261342953,0.0384049767588,0.0382376725188,0.0382780563009,0.038254979854,0.038422284094,0.0384338223175,0.0385318972168,0.0383011327478,0.0381569049546,0.0381049829491,0.0380126771615,0.0383645929768,0.0383530547533,0.0382780563009,0.0382203651836,0.037960755156,0.0376492231228,0.0375857628938,0.0377242215752,0.03770691424,0.0377357597986,0.03753961,0.037476149771,0.0373434602013,0.0373549984247,0.037245385302,0.0370723119502,0.0371473104026,0.0372165397433,0.0372511544137,0.0371703868495,0.037055004615,0.0367780872522,0.0366396285707,0.0364954007776,0.0363165583141,0.0361031011802,0.0364607861072,0.0363973258783,0.0365127081128,0.0361780996327,0.036108870292,0.0359069513816,0.0358723367112,0.0356184957953,0.035560804678,0.0354800371138,0.0354742680021,0.035751185365,0.0356992633594,0.0358781058229,0.0358377220409,0.0360396409513,0.0361896378561,0.0362530980851,0.0361031011802,0.0362357907499,0.0359646424988,0.0356761869125,0.035687725136,0.0357223398063,0.0549565583002,0.0558680779529,0.0567161373766,0.0573853543368,0.0580718786322,0.0594160816643,0.0602987557584,0.061042971171,0.0621737170693,0.0630044691578,0.0641063694974,0.0652255771722,0.0660447910373,0.067019770919,0.0677236025495,0.068744735325,0.0696793314246,0.0708562302166,0.0708562302166,0.0712196842554,0.0709485360042,0.0706485421945,0.0705850819655,0.0702735499323,0.070112014804,0.0702331661502,0.0704235468372,0.0701639368095,0.0698004827708,0.0693274156093,0.0692639553803,0.0690331909113,0.0690504982464,0.068975499794,0.0692639553803,0.0690851129168,0.0693043391624,0.0689178086768,0.0689235777885,0.068744735325,0.0690562673582,0.0685889693084,0.0687966573305,0.0688774248947,0.0689062704533,0.0695581800783,0.0694831816259,0.0692235715982,0.0692178024865,0.0688197337774,0.0686581986491,0.0684043577332,0.0687562735484,0.0685832001967,0.0687158897664,0.0686293530905,0.0690851129168,0.0691312658106,0.0689351160119,0.0693908758383,0.0695004889611,0.0691831878161,0.0693735685031,0.0689524233471,0.0688543484478,0.0689235777885,0.0687562735484,0.0684851252973,0.0684043577332,0.0683812812863,0.0681043639234,0.067902445013,0.0678216774488,0.0685255090794,0.0689639615706,0.0692466480451,0.06922934071,0.069587025637,0.0695062580728,0.0693908758383,0.0694370287321,0.0694774125142,0.0693851067265,0.0692639553803,0.0690851129168,0.0693851067265,0.0696331785308,0.0702273970385,0.0701293221392,0.0698985576701,0.0698466356646,0.0698235592177,0.0696216403073,0.0696331785308,0.0699043267819,0.0694831816259,0.0700197090164,0.0702447043737,0.069944710564,0.0702966263792,0.0704754688427,0.0707004642,0.0710119962332,0.0709658433394,0.0712369915905,0.0711735313616,0.070890844887,0.0711619931381,0.0711966078085,0.0708504611049,0.0703312410496,0.0703716248317,0.0700716310219,0.0699043267819,0.0701639368095,0.0704408541724,0.0701466294744,0.070048554575,0.0705100835131,0.0707696935407,0.0710350726801,0.0713062209312,0.0714273722775,0.0712196842554,0.0711966078085,0.0714850633947,0.0713869884954,0.0712542989257,0.0713177591547,0.0713927576071,0.0710004580098,0.0712773753726,0.0706427730828,0.070954305116,0.0711446858029,0.0713927576071,0.0713177591547,0.0710812255739,0.0710812255739,0.071058149127,0.0711273784677,0.0711389166912,0.0711908386967,0.0708216155463,0.0706543113062,0.0707408479821,0.0707927699877,0.0709485360042,0.0712946827078,0.0713004518195,0.0709658433394,0.0710639182388,0.0712889135961,0.0712773753726,0.0706889259766,0.0709196904456,0.0708850757753,0.0707927699877,0.0707812317642,0.0709081522222,0.0705446981834,0.0707696935407,0.0708677684401,0.0709889197863,0.0709946888981,0.0709716124512,0.0710812255739,0.0712081460319,0.071248529814,0.0709312286691,0.070890844887,0.0704408541724,0.0704293159489,0.070660080418,0.0702620117089,0.0704581615076,0.0701004765806,0.0701927823682,0.0708504611049,0.0708619993284,0.0706254657476,0.0705158526248,0.0705793128538,0.0704985452896,0.0704927761779,0.070596620189,0.0708562302166,0.0709369977808,0.0711331475795,0.0708331537697,0.0711619931381,0.0709658433394,0.070763924429,0.0709139213339,0.0710004580098,0.0709081522222,0.0712658371492,0.071058149127,0.0711331475795,0.0710869946857,0.0710004580098,0.0711100711326,0.0710639182388,0.0710119962332,0.0709600742277,0.0714504487244,0.0714735251713,0.0716581367465,0.0721427421315,0.0720504363439,0.0722235096957,0.0720158216735,0.072488888835,0.0727831135331,0.0724542741647,0.0731696440187,0.0735734818395,0.0736773258506,0.0737580934147,0.0739715505486,0.0744215412632,0.0743984648163,0.0738446300906,0.07411000923,0.0738850138727,0.0743350045873,0.0745484617212,0.0745196161625,0.0748599937544,0.0746119219501,0.0748484555309,0.074888839313,0.074658074844,0.0750446053296,0.0749753759889,0.0748599937544,0.0751715257876,0.0756619002842,0.07638303925,0.0761061218871,0.0765041905962,0.0762503496803,0.0767811079591,0.0768849519701,0.0768330299646,0.0767868770708,0.0770926399923,0.0773060971261,0.0774041720255,0.0772830206792,0.0773464809082,0.0772426368971,0.0773637882434,0.0779118538573,0.0782522314491,0.0778945465221,0.077623398271,0.0776810893883,0.0782753078961,0.0779291611925,0.0782580005609,0.0780791580974,0.0779522376394,0.078234924114,0.0783560754602,0.0786849148286,0.0785753017058,0.0785464561472,0.0787483750576,0.0789445248562,0.0789560630797,0.0794002846826,0.0796252800399,0.0795445124757,0.0792849024481,0.0798675827324,0.0797406622744,0.0798098916151,0.0796772020454,0.0801329618718,0.0805194923574,0.081390628228,0.0814367811218,0.0815060104625,0.081581008915,0.0820771525234,0.0820194614061,0.0826482945842,0.0828502134946,0.0827002165898,0.0829425192822,0.0832713586506,0.0833175115444,0.0837732713708,0.0838655771584,0.0840790342922,0.0842290311971,0.0846270999062,0.0849847848332,0.0849847848332,0.0850482450622,0.0850482450622,0.0857001546872,0.0864328318764,0.0866635963454,0.0871885855125,0.0874943484339,0.0877308820147,0.0876731908974,0.0876674217857,0.0882674094052,0.0884231754218,0.0888327823543,0.0893923861917,0.0897096873366,0.0898250695712,0.0900442958167,0.0896866108897,0.0903039058444,0.0906327452128,0.0907192818887,0.0905404394252,0.091469266413,0.0914461899661,0.0912961930612,0.091469266413,0.0910711977039,0.0915558030889,0.0921904053788,0.0925365520823,0.0928596223389,0.0933153821653,0.0937711419916,0.0940595975779,0.0943768987228,0.0945672794098,0.0948095821023,0.0950576539065,0.0950922685768,0.0950115010127,0.0953980314983,0.0954153388335,0.0961018631289,0.0964595480559,0.0974287588258,0.0976422159597,0.0974576043844,0.0976018321776,0.0977575981942,0.0976364468479,0.0978556730935,0.0983979695957,0.0981498977915,0.0985941193944,0.0983114329199,0.0985421973889,0.0984845062716,0.0990268027739,0.0989748807683,0.0993902568126,0.100394082253,0.100561386493,0.101397907693,0.101894051302,0.101692132391,0.102384425798,0.102955567859,0.103347867457,0.103555555479,0.103844011065,0.103855549288,0.10449592069,0.105043986304,0.105638204812,0.10576512527,0.106232423319,0.106999715179,0.107363169218,0.108095846407,0.108666988468,0.108268919759,0.108684295803,0.109353512763,0.109855425483,0.110553488002,0.11148231499,0.112105379056,0.112722674011,0.113478427647,0.114361101741,0.11519185383,0.116478365744,0.117476422073,0.118116793475,0.118261021268,0.118474478402,0.118676397312,0.120084060573,0.120701355528,0.121237882918,0.122235939247,0.122489780163,0.12321668824,0.123839752307,0.124312819468,0.125074342216,0.125812788517,0.126562773041,0.127416601577,0.12789543785,0.129210795323,0.130341541222,0.130993450847,0.131645360472,0.132031890957,0.132522265454,0.133174175079,0.13394723605,0.134454917882,0.13518182596,0.135891426702,0.136272188076,0.1371202475,0.13762216022,0.138199071392,0.13815868761,0.138741367894,0.138637523883,0.138729829671,0.138649062107,0.139237511503,0.140425948518,0.140749018775,0.14086440101,0.141106703702,0.141222085937,0.141389390177,0.141504772411,0.141689383986,0.142133605589,0.142508597851,0.142860513667,0.143910492001,0.14427394604,0.144637400078,0.145231618586,0.145018161452,0.144822011653,0.144752782313,0.145018161452,0.145173927469,0.145491228614,0.146218136691,0.146350826261,0.147112349009,0.147689260181,0.147793104192,0.148295016912,0.148093098002,0.147677721958,0.147833487974,0.148266171354,0.148375784477,0.14885462075,0.149206536565,0.150723812949,0.151756483948,0.151479566585,0.151912249965,0.151739176613,0.15209686154,0.152639158042,0.152985304746,0.153481448354,0.153677598153,0.15427181666,0.154681423593,0.154946802732,0.154767960269,0.155189105425,0.155223720095,0.155160259866,0.155667941698,0.156417926222,0.156746765591,0.156948684501,0.156717920032,0.156400618887,0.156723689144,0.157456366333,0.15717944897,0.157006375618,0.157398675216,0.157450597221,0.157340984099,0.157692899914,0.157831358595,0.157871742377,0.158310194868,0.158500575555,0.159400556985,0.158673648907,0.158033277506,0.158021739282,0.158137121517,0.157958279053,0.157790974813,0.157773667478,0.157421751663,0.156896762496,0.156637152468,0.156423695334,0.156521770233,0.156302543988,0.156400618887,0.155783323933,0.155633327028,0.155489099235,0.155044877632,0.154450659124,0.154300662219,0.154116050644,0.153787211275,0.154058359527,0.153625676147,0.152829538729,0.152875691623,0.152656465377,0.152373778903,0.152102630651,0.152269934892,0.152125707098,0.151756483948,0.152119937987,0.15142764458,0.151012268535,0.150481510257,0.150181516447,0.150169978223,0.149771909514,0.148906542755,0.148964233873,0.148750776739,0.148260402242,0.148393091812,0.148370015365,0.147441188377,0.146529668724,0.146160445574,0.14557776529,0.144781627871,0.144545094291,0.14367395842,0.143275889711,0.142722054985,0.141943224902,0.141481695964,0.141158625708,0.14170092221,0.140985552356,0.140783633445,0.140708634993,0.140270182502,0.140120185597,0.139710578664,0.13899520881,0.138441374085,0.138095227381,0.137881770247,0.137460625091,0.137466394203,0.137224091511,0.136202958735,0.135874119367,0.135620278451,0.135908734037,0.136162574953,0.136306802746,0.135954886931,0.135522203551,0.13504913639,0.134570300117,0.134945292379,0.134731835245,0.134143385849,0.133641473129,0.132799182817,0.132204964309,0.132118427633,0.131997276287,0.131853048494,0.131328059327,0.130474230791,0.129505020021,0.128201200771,0.127785824727,0.126447390807,0.125910863416,0.124722426401,0.123585911391,0.122737851967,0.121780179421,0.120712893751,0.120384054383,0.119564840518,0.118393710837,0.117412961844,0.11639759818,0.115716842997,0.115041856925,0.114205335725,0.112561138883,0.111834230805,0.110743868689,0.110132342846,0.109440049439,0.108840061819,0.10837276377,0.107599702798,0.106728566928,0.106278576213,0.105563206359,0.105361287449,0.104680532265,0.104219003327,0.103169024993,0.102482500698,0.102165199553,0.101576750157,0.10095368609,0.100296007354,0.0998921695327,0.0998114019686,0.0990844938911,0.0987614236345,0.0988364220869,0.0986171958413,0.0987902691931,0.0987095016289,0.098392200484,0.0982191271322,0.0980633611156,0.0984037387075,0.0986402722882,0.0988364220869,0.0984614298247,0.0980748993391,0.0981729742384,0.0973076074796,0.0968691549884,0.0967480036422,0.0961653233578,0.095467260839,0.0950749612417,0.0947576600967,0.0949653481189,0.0946365087505,0.0943480531642,0.0943999751697,0.0944172825049,0.0941922871476,0.0940480593545,0.0936615288688,0.0934192261764,0.0934249952881,0.0934365335115,0.0934884555171,0.0934423026233,0.0934884555171,0.0928826987859,0.0928942370093,0.0925942431996,0.0925019374119,0.0925480903058,0.0924442462947,0.091953871798,0.0914173444075,0.0916019559827,0.0911173505977,0.0905115938665,0.0899462209174,0.0896577653311,0.0895366139849,0.0891846981696,0.0895308448731,0.0895827668787,0.0891154688289,0.0890347012647,0.0892539275103,0.0890635468234,0.0887231692315,0.0885500958798,0.0884000989749,0.088440482757,0.0880135684893,0.0875116557691,0.0871597399538,0.0870443577193,0.08694628282,0.08694628282,0.0867501330213,0.0868078241386,0.0866001361164,0.0860924542845,0.0854001608774,0.0857347693575,0.0853020859781,0.0847020983586,0.0841540327447,0.0834213555555,0.0829309810588,0.0829079046119,0.0826886783663,0.0821117671937,0.0812752459935,0.0809348684017,0.0808829463961,0.080802178832,0.0803291116704,0.0798041225034,0.079538743364,0.0792156731074,0.0790714453142,0.0790368306439,0.0785579943706,0.0782637696726,0.0782868461195,0.0775541689303,0.0769137975288,0.0766484183894,0.0761868894513,0.0763715010265,0.0761465056692,0.0761753512278,0.075961894094,0.0759965087643,0.076088814552,0.0759042029767,0.0759042029767,0.0755638253849,0.0758292045243,0.0758407427478,0.0758638191947,0.0763945774734,0.0761465056692,0.076256118792,0.0762849643506,0.0758522809712,0.0758926647533,0.0758176663008,0.0763311172444,0.0761407365575,0.0760541998816,0.0758580500829,0.0758061280774,0.0759907396526,0.0756445929491,0.0753849829214,0.0753388300276,0.0752119095696,0.0757657442953,0.0758926647533,0.0760945836637,0.0764811141493,0.0768849519701,0.0768157226294,0.0769253357522,0.0766657257245,0.076486883261,0.0763599628031,0.0763888083617,0.0762099658982,0.0764176539203,0.0762618879037,0.0761811203396,0.0767464932887,0.0768907210819,0.0767234168418,0.0767926461825,0.0763368863562,0.0764349612555,0.0766195728307,0.0765272670431,0.0765561126018,0.0763368863562,0.0759215103119,0.0756734385077,0.0757138222898,0.0757945898539,0.0753965211449,0.0753561373628,0.0751715257876,0.0753215226924,0.0752234477931,0.0751542184524,0.0751022964468,0.0744446177101,0.073919628543,0.073752324303,0.0736138656216,0.0729042648793,0.0732388733594,0.0732100278008,0.0731119529014,0.073204258689,0.0730484926724,0.0728811884324,0.0725292726171,0.0722004332488,0.072194664137,0.0721600494667,0.0715196780651,0.0710235344567,0.0710985329091,0.0710004580098,0.0710812255739,0.0716235220762,0.0713523738251,0.0713696811602,0.0711273784677,0.0715485236237,0.0718254409866,0.0721081274611,0.0722638934777,0.072488888835,0.0730600308959,0.0731119529014,0.073100414678,0.0732792571415,0.0735157907222,0.0736946331857,0.0734638687167,0.0733427173705,0.0739138594313,0.0734061775995,0.073688864074,0.0740177034424,0.0737004022975,0.0739311667665,0.074236929688,0.0741215474535,0.0743580810342,0.0745657690563,0.0745080779391,0.07411000923,0.0738446300906,0.0738619374258,0.0745426926094,0.0748599937544,0.0751946022345,0.0747849953019,0.0747965335254,0.0741273165652,0.0740811636714,0.07411000923,0.0740580872245,0.0738734756492,0.0740580872245,0.0739253976548,0.0739946269955,0.0733196409236,0.0731581057952,0.0731407984601,0.0733484864822,0.0732792571415,0.0729331104379,0.0733196409236,0.0734869451636,0.0734696378284,0.0733427173705,0.0736369420685,0.0733542555939,0.0734177158229,0.0732850262532,0.0730427235607,0.0722638934777,0.072258124366,0.0717792880928,0.0713408356016,0.071479294283,0.0718831321038,0.0719235158859,0.0717792880928,0.0717850572045,0.0715369854003,0.0710004580098,0.0714331413892,0.0712542989257,0.0712081460319,0.0710523800153,0.0712427607023,0.0715485236237,0.0715081398417,0.0709773815629,0.0706889259766,0.0704870070662,0.07053315996,0.0705389290717,0.0709369977808,0.0709946888981,0.0708389228815,0.0710927637974,0.0707408479821,0.0707004642,0.0708966139987,0.0703947012786,0.0702793190441,0.0698408665529,0.0699100958936,0.0701870132564,0.0702850881558,0.0708850757753,0.0711793004733,0.071606214741,0.0717965954279,0.0719292849976,0.0717389043107,0.0716523676348,0.0714331413892,0.0712773753726,0.0713812193837,0.0714908325065,0.0712542989257,0.0710754564622,0.0710927637974,0.0715312162886,0.0713639120485,0.0715946765175,0.0714850633947,0.0717965954279,0.0718831321038,0.0720100525618,0.0724196594943,0.0720331290087,0.0716465985231,0.0714446796127,0.0713350664899,0.0712716062609,0.0710985329091,0.0713177591547,0.0710985329091,0.0716292911879,0.0719927452266,0.0726561930751,0.0726619621868,0.0723100463715,0.0722754317012,0.0722985081481,0.0727311915275,0.0724196594943,0.0725177343937,0.0722177405839,0.0721254347963,0.0722292788074,0.0725350417289,0.0725350417289,0.0724715814999,0.0722004332488,0.0723735066005,0.0726504239634,0.073036954449,0.0729158031028,0.0730831073428,0.0727600370862,0.0729561868848,0.0730254162255,0.0731754131304,0.0731523366835,0.0728581119855,0.0729446486614,0.0734984833871,0.0736369420685,0.0738446300906,0.0738965520961,0.0737119405209,0.0735504053926,0.0738273227554,0.0735273289457,0.0728811884324,0.0725869637344,0.0725754255109,0.0729561868848,0.073204258689,0.0731581057952,0.0727254224158,0.0727831135331,0.0725985019578,0.0728754193207,0.0726908077454,0.0714216031658,0.0703600866082,0.0691428040341,0.0681735932641,0.0674639925218,0.0664543979698,0.0657851810096,0.0647352026755,0.0636563787828,0.0625198637728,0.0615448838911,0.0607083626909,0.0595660785692,0.0584584091178,0.0573507396665,0.0563122995558,0.0555334694728,0.0538431197372,0.0363627112079,0.0361204085154,0.035751185365,0.0356358031304,0.0356011884601,0.0356011884601,0.0360396409513,0.0365127081128,0.0364607861072,0.0364838625541,0.0361607922975,0.0358665675995,0.0356934942477,0.0355261900077,0.0357454162532,0.0360165645044,0.0362357907499,0.0365992447887,0.0367146270232,0.0366165521238,0.036506939001,0.0364146332134,0.0361146394037,0.0361031011802,0.0357050324712,0.0355088826725,0.0356415722422,0.0356934942477,0.0355261900077,0.0351454286338,0.0352954255386,0.0352377344214,0.0353069637621,0.0354108077731,0.0354050386614,0.0355723429015,0.0354050386614,0.0353704239911,0.0356300340187,0.0356300340187,0.0359127204933,0.035855029376,0.0352781182034,0.0352088888627,0.0355377282311,0.0353992695497,0.0354915753373,0.0353415784324,0.0354858062256,0.0354165768849,0.0355723429015,0.0355031135608,0.0353127328738,0.0349146641647,0.0351165830751,0.0353588857676,0.0353473475442,0.0354281151083,0.0354684988904,0.0355377282311,0.035497344449,0.0356184957953,0.0354050386614,0.0353242710973,0.0354396533318,0.0356992633594,0.0354742680021,0.03526657998,0.0351569668572,0.0352146579745,0.0352319653096,0.0352319653096,0.0354627297787,0.0356992633594,0.035751185365,0.0359473351636,0.0356761869125,0.035687725136,0.0358492602643,0.0356358031304,0.0353761931028,0.035393500438,0.0356588795774,0.0359242587167,0.035791569147,0.0361550231858,0.0357338780298,0.0358088764822,0.035751185365,0.0360800247333,0.0360973320685,0.0362877127555,0.0363511729844,0.0364838625541,0.0365588610066,0.0364780934424,0.0363742494314)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("22-organelles-nucleus-merged/APETALA2-chip_rep1-GSM532325.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=195"),bty="n")
dev.off()