# R script for Peak Model
#  -- generated by MACS
p <- c(0.0417941922048,0.0442034135187,0.0463807311768,0.0484420970068,0.0505807640556,0.0528998006144,0.0550255841267,0.0573832712948,0.0597796090723,0.0621888303862,0.0641728949976,0.0664532809472,0.0686048315323,0.0710527034555,0.0732944387957,0.0754588729173,0.0775202387474,0.0798521588427,0.0799423435977,0.0800711789621,0.0800711789621,0.0799036929884,0.0801871307901,0.0801098295714,0.0800325283528,0.079980994207,0.079890809452,0.0801871307901,0.0803675003002,0.080509219201,0.0802644320087,0.0801742472536,0.0800454118892,0.0801613637172,0.0800454118892,0.0804319179824,0.0806638216383,0.0806380545654,0.0805994039561,0.0809086088306,0.0809987935856,0.0809086088306,0.0808570746848,0.0804834521281,0.0800196448164,0.0798006246969,0.0801742472536,0.0801227131079,0.080303082618,0.079774857624,0.0793754679945,0.0793754679945,0.0797104399418,0.0796460222597,0.0794398856767,0.0792466326301,0.0795300704317,0.0796460222597,0.079774857624,0.0796331387232,0.0798779259155,0.079774857624,0.0796331387232,0.0794012350673,0.0789374277556,0.0786539899539,0.078538038126,0.078215949715,0.0782803673972,0.0781128814235,0.0783061344701,0.0780871143507,0.0784736204438,0.0781128814235,0.0783061344701,0.0784478533709,0.078215949715,0.0780999978871,0.0780742308142,0.0779969295956,0.0784607369074,0.0787055240997,0.0786539899539,0.0786668734904,0.0783834356887,0.0789245442191,0.0791693314115,0.078950311292,0.0789889619013,0.0786797570268,0.0784478533709,0.0786282228811,0.0783061344701,0.0783447850794,0.0784865039802,0.0783963192252,0.0782674838608,0.0781515320329,0.0782288332515,0.078422086298,0.0786411064175,0.0788343594641,0.0793754679945,0.0796460222597,0.0796975564054,0.0798006246969,0.0802000143265,0.0805736368832,0.0800196448164,0.0802257813994,0.0798392753062,0.079684672869,0.0802386649358,0.0803675003002,0.0806638216383,0.0811920466322,0.0812693478508,0.0814110667517,0.0816687374804,0.0815656691889,0.0816816210169,0.0815012515067,0.0817331551626,0.0824030990574,0.0822871472294,0.082596352104,0.0829957417335,0.0831245770979,0.0830730429522,0.0829828581971,0.082480400276,0.0826607697861,0.0826350027133,0.082686536859,0.0825190508853,0.0825319344218,0.0826607697861,0.0823000307659,0.0815012515067,0.0813208819966,0.0815141350432,0.0815270185796,0.081243580778,0.0809987935856,0.081243580778,0.0814883679703,0.0819521752821,0.0822098460108,0.0819006411363,0.0816300868711,0.081243580778,0.0807282393205,0.0801742472536,0.0794270021402,0.0788214759276,0.0783447850794,0.0782803673972,0.0778294436219,0.0776233070389,0.0770821985085,0.0768374113162,0.0765926241239,0.0763349533951,0.0756134753546,0.0753944552351,0.0750594832877,0.0751625515792,0.0746987442675,0.07418340281,0.0735907601338,0.0737711296439,0.0734232741601,0.0729594668483,0.0726116113645,0.0728563985568,0.0728048644111,0.0720318522248,0.0716711132045,0.0715165107673,0.0712330729657,0.0706146632166,0.0702796912692,0.0699447193219,0.0694680284736,0.0689526870161,0.0688882693339,0.0687852010424,0.0689526870161,0.068978454089,0.0693649601821,0.069712815666,0.069596863838,0.0698545345668,0.0699576028583,0.0697772333482,0.069184590672,0.0689398034797,0.0688753857975,0.0685404138501,0.0686177150687,0.0684888797044,0.0686950162874,0.0683986949493,0.0686692492145,0.0689398034797,0.0693778437186,0.0689140364068,0.0687465504331,0.0686950162874,0.0691717071356,0.0690042211619,0.0687336668967,0.068772317506,0.0687465504331,0.0683729278764,0.0679864217833,0.0682183254392,0.0679091205646,0.0678060522731,0.0673937791071,0.0678189358096,0.0677545181274,0.0678704699553,0.0677029839816,0.067831819346,0.0672907108156,0.0665563492387,0.0669042047225,0.066272911437,0.0661440760726,0.0659121724168,0.0662857949735,0.066594999848,0.0665434657022,0.0664017468014,0.0670201565504,0.0672520602063,0.0670330400869,0.0671361083784,0.0668397870403,0.0669042047225,0.0666336504573,0.0669428553318,0.0673422449614,0.0674968473986,0.0672649437427,0.0672778272792,0.0674839638622,0.0675226144715,0.0673293614249,0.0674581967893,0.0678189358096,0.0677802852003,0.0677029839816,0.0674968473986,0.067625682763,0.0677029839816,0.067625682763,0.0676514498359,0.0674710803258,0.0672391766699,0.067625682763,0.0684244620222,0.0683729278764,0.0688882693339,0.0690299882348,0.0688496187246,0.0686563656781,0.0680637230019,0.0681152571477,0.0686048315323,0.068037955929,0.0682569760485,0.0685532973865,0.0686563656781,0.0689655705526,0.0690944059169,0.0695453296923,0.0694551449372,0.0696097473745,0.069712815666,0.0698158839575,0.069803000421,0.0700606711498,0.0705244784616,0.0709754022369,0.0710527034555,0.0713490247936,0.071271723575,0.0718514827147,0.071774181496,0.072096269907,0.0717870650325,0.0717355308867,0.0720318522248,0.0724054747815,0.072624494901,0.0723152900264,0.0718514827147,0.0722895229536,0.0718385991782,0.0719159003969,0.0725343101459,0.0730238845305,0.0735778765974,0.0734876918423,0.0733846235508,0.0733846235508,0.0737067119617,0.0733459729415,0.0732042540407,0.0734103906237,0.07324290465,0.0732557881864,0.0735521095245,0.0735134589152,0.0733588564779,0.0735005753787,0.0736809448889,0.0736809448889,0.0734103906237,0.0736809448889,0.0739772662269,0.0737453625711,0.0740288003727,0.0738999650083,0.074801812559,0.0749821820691,0.0751367845064,0.0753944552351,0.0754073387716,0.0757551942554,0.0759742143748,0.0765153229052,0.0768502948526,0.0767343430247,0.0771079655814,0.0773269857008,0.0773785198466,0.0774429375288,0.0778165600855,0.0784092027616,0.0783705521523,0.078538038126,0.0781644155693,0.0786024558082,0.079272399703,0.0795300704317,0.0798521588427,0.0799036929884,0.0801098295714,0.0800454118892,0.0802773155451,0.0808055405391,0.0814368338245,0.0816300868711,0.0820037094278,0.0820938941829,0.0821325447922,0.0822613801566,0.0822098460108,0.0820294765007,0.0819392917456,0.0818748740634,0.0821711954015,0.0824932838125,0.0824932838125,0.0826994203955,0.0825834685675,0.0825190508853,0.0824159825938,0.082686536859,0.0829313240513,0.0830601594157,0.0833564807538,0.0834853161182,0.083304946608,0.0832405289259,0.0836528020919,0.0843098624502,0.0851601758551,0.0857399349948,0.0856626337762,0.0856626337762,0.0861393246244,0.0865258307175,0.0866160154726,0.0872344252216,0.087479212414,0.0873890276589,0.0876595819241,0.0880332044808,0.0882393410638,0.0881362727723,0.0885743130112,0.0890767709323,0.0896822971449,0.0905712611591,0.0902620562846,0.0902105221388,0.0903908916489,0.0905326105498,0.09089334957,0.0906743294506,0.0911381367623,0.0915504099284,0.09183384773,0.0922718879689,0.092568209307,0.0927356952807,0.0925939763798,0.0929031812544,0.0931222013738,0.0934700568576,0.0938565629508,0.0934056391754,0.0929160647908,0.0927485788171,0.0931350849102,0.0931995025924,0.0930449001552,0.0930191330823,0.0928258800357,0.0927099282078,0.0925939763798,0.0928129964993,0.0921817032138,0.0917951971207,0.0917178959021,0.0921044019952,0.0920271007766,0.0922074702867,0.0920271007766,0.0921172855316,0.0928387635722,0.0936375428313,0.0938565629508,0.0939080970965,0.0940498159973,0.0944620891633,0.0945265068455,0.0948228281836,0.0955056556148,0.0954025873233,0.0957504428071,0.0961755995096,0.0968068927951,0.0971032141331,0.0975799049813,0.0978246921737,0.0976572062,0.0985977043599,0.0991130458175,0.0995382025199,0.100027776905,0.100671953726,0.100826556164,0.101122877502,0.101625335423,0.101973190907,0.102462765291,0.102668901874,0.103055407967,0.10330019516,0.103699584789,0.1038799543,0.104395295757,0.104459713439,0.104833335996,0.104640082949,0.104498364049,0.104227809783,0.104395295757,0.104897753678,0.104859103069,0.104833335996,0.104807568923,0.104871986605,0.104382412221,0.104768918314,0.104408179293,0.104305111002,0.104498364049,0.104756034777,0.104730267704,0.104627199413,0.104923520751,0.10496217136,0.10536156099,0.105026589043,0.104343761611,0.103983022591,0.103867070763,0.103712468326,0.103583632961,0.103454797597,0.103622283571,0.10348056467,0.103390379915,0.103828420154,0.103673817717,0.103416146988,0.103403263451,0.103390379915,0.103725351862,0.103905721372,0.103867070763,0.103867070763,0.103712468326,0.103416146988,0.103454797597,0.103197126868,0.103519215279,0.103429030524,0.103983022591,0.103635167107,0.103905721372,0.10384130369,0.103712468326,0.103557865889,0.103776886008,0.103931488445,0.103751118935,0.103544982352,0.103210010405,0.103506331743,0.10420204271,0.104472596976,0.104897753678,0.104846219532,0.10496217136,0.105271376235,0.105567697573,0.105967087202,0.106134573176,0.105979970739,0.106443778051,0.106946235972,0.107203906701,0.107538878648,0.107306974992,0.107590412794,0.107796549377,0.108208822543,0.108440726199,0.109110670093,0.109329690213,0.109600244478,0.109832148134,0.109922332889,0.109896565816,0.110437674346,0.110540742638,0.110733995685,0.110772646294,0.110682461539,0.110669578002,0.110811296903,0.111133385314,0.111120501778,0.11100454995,0.111300871288,0.11096589934,0.110630927393,0.110463441419,0.11096589934,0.111429706652,0.111352405434,0.111146268851,0.111017433486,0.111094734705,0.111378172506,0.111133385314,0.111172035923,0.11078552983,0.110167120081,0.110051168253,0.109780613988,0.109510059723,0.109406991431,0.109561593869,0.109059135948,0.109097786557,0.109110670093,0.108492260344,0.108247473152,0.107551762184,0.107319858528,0.107165256091,0.107100838409,0.106894701826,0.10702353719,0.106868934753,0.106972003045,0.106765866462,0.106907585362,0.106469545124,0.105670765864,0.105593464646,0.10514254087,0.105245609162,0.104884870142,0.104472596976,0.103802653081,0.103325962233,0.102990990285,0.102527182974,0.101715520178,0.101406315303,0.100762138482,0.100195262878,0.100401399461,0.100646186654,0.100349865316,0.100105078123,0.0997701061758,0.0992676482547,0.0994609013013,0.0991259293539,0.0991259293539,0.0993578330098,0.0991774634997,0.0992289976454,0.0992289976454,0.0986105878964,0.0984559854591,0.0985977043599,0.0981210135117,0.0976314391271,0.0968326598679,0.096510571457,0.0962271336554,0.0963559690197,0.0961755995096,0.0962915513375,0.0966651738942,0.0960338806088,0.0955185391513,0.0951835672039,0.0955958403699,0.0957375592707,0.0958406275622,0.095686025125,0.0955958403699,0.0953768202504,0.0952351013496,0.0956473745156,0.0956602580521,0.0946682257464,0.0944105550176,0.0942301855075,0.0934958239305,0.0928387635722,0.0921430526045,0.0916663617563,0.0910737190802,0.0904424257947,0.0901074538473,0.0898368995821,0.0893730922703,0.0894890440983,0.0890896544687,0.0881362727723,0.0878141843613,0.0876982325334,0.0871828910759,0.0872086581488,0.086422762426,0.0859074209685,0.0858558868228,0.0848123203713,0.0841423764765,0.0837945209927,0.0838718222113,0.0835626173368,0.0829184405149,0.0825577014946,0.0821454283286,0.082390215521,0.0826092356404,0.0821454283286,0.0818491069906,0.0810760948043,0.0804448015188,0.0804705685917,0.0800067612799,0.0797104399418,0.0797362070147,0.0797233234783,0.0792208655572,0.0795171868953,0.0794656527495,0.0788472430005,0.0789116606827,0.0787570582454,0.0783834356887,0.0780742308142,0.0776619576482,0.0776233070389,0.0776233070389,0.0772883350915,0.0771337326543,0.0766828088789,0.0766956924154,0.0765539735145,0.0763478369315,0.0763478369315,0.0764766722959,0.0763349533951,0.0759999814477,0.0760643991299,0.0762576521765,0.0759870979113,0.0755490576724,0.0750337162149,0.074595675976,0.0745570253667,0.0742993546379,0.074273587565,0.0742349369557,0.0740030332998,0.0738741979354,0.0739901497634,0.0740932180549,0.0741189851278,0.0742993546379,0.0738484308626,0.0734232741601,0.073861314399,0.0734748083059,0.0736294107431,0.0736938284253,0.0738355473261,0.0740416839091,0.0744926076845,0.0741061015913,0.0744410735387,0.0751110174335,0.0749950656055,0.0754975235266,0.0758067284011,0.075832495474,0.0757809613283,0.0758067284011,0.076038632057,0.0762834192493,0.0762061180307,0.0759870979113,0.0758840296198,0.0762705357129,0.0763349533951,0.0767601100975,0.0769275960712,0.0774300539923,0.0773398692373,0.0778165600855,0.07812576496,0.0782674838608,0.0783061344701,0.0784607369074,0.0791306808021,0.0796073716503,0.0799938777435,0.0805349862739,0.0806509381018,0.0807540063933,0.0804061509095,0.0804834521281,0.0800325283528,0.0802644320087,0.0799423435977,0.0802386649358,0.0798006246969,0.0794012350673,0.0798521588427,0.0795171868953,0.0796331387232,0.0799681106706,0.0801227131079,0.0801742472536,0.0799552271342,0.0795300704317,0.0796975564054,0.0795558375046,0.0800711789621,0.0802257813994,0.0802773155451,0.0800454118892,0.0803159661544,0.0802515484722,0.0806895887111,0.0800582954257,0.0801613637172,0.0802128978629,0.0805607533468,0.0806122874925,0.0798135082334,0.0793110503123,0.0788085923912,0.0784736204438,0.078422086298,0.0783834356887,0.0784993875167,0.0781386484964,0.0787184076361,0.0784349698345,0.0786153393446,0.0786797570268,0.078744174709,0.0789245442191,0.0789245442191,0.0787055240997,0.0786411064175,0.0787699417819,0.0786282228811,0.0786282228811,0.0788085923912,0.0788858936098,0.0786926405632,0.0788472430005,0.078215949715,0.0779711625227,0.0780226966685,0.0779840460592,0.0778294436219,0.0774944716745,0.0770564314356,0.0772110338729,0.0767601100975,0.0768631783891,0.0764380216866,0.0757938448647,0.0758582625469,0.0758196119376,0.0759355637655,0.0760515155935,0.0756650095003,0.0759870979113,0.0762834192493,0.0760772826663,0.0758196119376,0.0756005918181,0.0753815716987,0.0753171540165,0.075214085725,0.0751367845064,0.0749177643869,0.0750337162149,0.0745054912209,0.0739901497634,0.0745312582938,0.0744539570751,0.0743380052472,0.0742220534193,0.0741189851278,0.0741189851278,0.0741576357371,0.07418340281,0.0740932180549,0.0740030332998,0.0735263424516,0.0736165272067,0.0738741979354,0.0736422942796,0.073861314399,0.0738226637897,0.0740159168363,0.0742607040286,0.0742478204921,0.0740545674456,0.0739257320812,0.0736422942796,0.0740159168363,0.0738226637897,0.0734876918423,0.0735649930609,0.0732944387957,0.0733588564779,0.0731784869678,0.07324290465,0.0732815552593,0.0731140692856,0.0727404467289,0.0728048644111,0.073036768067,0.0731656034313,0.0724956595366,0.0722379888078,0.0721349205163,0.0723668241722,0.0726116113645,0.0725987278281,0.0728048644111,0.0724698924637,0.0724698924637,0.0725600772188,0.0729079327026,0.0730110009941,0.0724956595366,0.0725600772188,0.0724698924637,0.0723925912451,0.0723668241722,0.072714679656,0.0726889125831,0.0729852339212,0.0734232741601,0.0737453625711,0.0738870814719,0.0739386156176,0.0740803345184,0.0741576357371,0.074479724148,0.0747245113403,0.074685860731,0.074685860731,0.0747502784132,0.074479724148,0.075007949142,0.0751754351157,0.0753171540165,0.0757809613283,0.0761674674214,0.0765926241239,0.0772496844822,0.0774171704559,0.0773012186279,0.0775331222838,0.0774300539923,0.0778552106948,0.0776748411846,0.0776490741118,0.0776104235025,0.077803676549,0.0781772991057,0.0784736204438,0.0786411064175,0.0786282228811,0.0786153393446,0.078331901543,0.0786797570268,0.0786926405632,0.078422086298,0.078422086298,0.0783190180065,0.0782674838608,0.0784349698345,0.0784865039802,0.0784736204438,0.0785122710531,0.0790662631199,0.0790791466564,0.0792595161665,0.079568721041,0.078950311292,0.0788601265369,0.0786539899539,0.0783705521523,0.078331901543,0.0783834356887,0.0780226966685,0.0780999978871,0.0780613472778,0.0781644155693,0.0785251545896,0.0782030661786,0.0785251545896,0.0788601265369,0.0789760783649,0.0788085923912,0.0788472430005,0.0782674838608,0.0780355802049,0.0782674838608,0.0786024558082,0.0788987771463,0.0789889619013,0.0786797570268,0.0787957088548,0.0790791466564,0.0793239338487,0.0793883515309,0.0794141186038,0.0797362070147,0.0796202551868,0.0797104399418,0.0796589057961,0.079568721041,0.0797362070147,0.0796460222597,0.080509219201,0.0802901990816,0.0810503277314,0.0812951149237,0.0813208819966,0.0814110667517,0.0815141350432,0.0813208819966,0.0815012515067,0.081655853944,0.0815914362618,0.0822871472294,0.0821840789379,0.0820294765007,0.0823129143023,0.0826994203955,0.082892673442,0.0836012679461,0.0841166094036,0.0843227459866,0.0841294929401,0.0841423764765,0.0843742801324,0.0850184569543,0.0852632441466,0.0848123203713,0.0846706014705,0.0847479026891,0.085185942928,0.0849669228085,0.0852245935373,0.0850957581729,0.0850184569543,0.0851215252458,0.0854822642661,0.0859589551143,0.085804352677,0.0864356459625,0.0860362563329,0.0856497502398,0.0855853325576,0.0857399349948,0.0857657020677,0.0863068105981,0.0864356459625,0.0862295093795,0.086538714254,0.0866031319362,0.0870411721751,0.0870669392479,0.0868221520556,0.0867706179099,0.0871313569301,0.0873503770496,0.0871700075394,0.0871957746123,0.0871700075394,0.0875436300961,0.0871957746123,0.0872086581488,0.0869252203471,0.0875178630233,0.0874405618046,0.0874147947318,0.0870669392479,0.0872601922945,0.0874019111953,0.0880332044808,0.0882135739909,0.0882779916731,0.0880460880172,0.0882264575274,0.0884068270375,0.0883810599646,0.0885227788654,0.0888964014221,0.0895019276347,0.0893602087339,0.0895276947076,0.0892957910517,0.0892700239788,0.0893859758068,0.0894890440983,0.089334441661,0.0891411886145,0.0895663453169,0.0897982489728,0.0897724818999,0.0896436465355,0.0893988593432,0.089334441661,0.0892957910517,0.089334441661,0.0890638873958,0.0892957910517,0.0892957910517,0.0892056062966,0.0889608191043,0.0889737026408,0.0888706343493,0.0884970117926,0.0886387306934,0.0882522246002,0.0879687867986,0.0879430197257,0.0879043691164,0.0878270678978,0.0875178630233,0.0872473087581,0.0871828910759,0.0873117264403,0.0869252203471,0.0863969953532,0.0861908587702,0.0861006740151,0.0861522081608,0.0859718386507,0.0857657020677,0.0856239831669,0.0851086417094,0.0848767380535,0.0843871636688,0.0842196776951,0.0841294929401,0.0839620069664,0.0840264246486,0.0838847057478,0.0840135411121,0.0841294929401,0.0839877740393,0.0839104728206,0.0838975892842,0.0839620069664,0.0840521917215,0.0846061837883,0.0851086417094,0.0857399349948,0.0857914691406,0.0859847221872,0.0861522081608,0.0863068105981,0.0863454612074,0.0861779752337,0.0862552764523,0.0863969953532,0.0861135575515,0.0859331880414,0.0862681599888,0.0865644813269,0.0866804331548,0.0868994532742,0.0868865697378,0.0873503770496,0.0872988429038,0.0871184733937,0.0873503770496,0.0875822807055,0.0878399514342,0.0879430197257,0.0879043691164,0.0880847386265,0.087981670335,0.0884712447197,0.0885743130112,0.0886644977663,0.0886387306934,0.088922168495,0.0891540721509,0.0893859758068,0.0894890440983,0.0891927227602,0.089244256906,0.0888835178857,0.0889608191043,0.0893988593432,0.0889479355679,0.0887289154484,0.0885485459383,0.0887289154484,0.0884583611832,0.0887417989849,0.0888706343493,0.0889994697136,0.0889994697136,0.089038120323,0.0891154215416,0.0888706343493,0.0887031483756,0.0884454776468,0.0885614294747,0.0887417989849,0.0888319837399,0.0886000800841,0.0860620234058,0.0836785691648,0.0813208819966,0.078744174709,0.0764122546137,0.0737840131804,0.0711042376013,0.068566180923,0.0663115620463,0.0636317864672,0.060977777961,0.0585556731107,0.0560304999688,0.0536212786549,0.0509415030758,0.0486611171263,0.0460328756929,0.0433531001138)
m <- c(0.0450156005011,0.0473916390818,0.0497805909156,0.0519887572053,0.0543647957859,0.0567279211135,0.058845694631,0.0614025187559,0.0638302103491,0.0663612079677,0.0685306344979,0.070945412838,0.0734247574439,0.0755683574678,0.0778540032764,0.0805141334264,0.082799779235,0.0851629045625,0.0854211696257,0.0854986491446,0.0854857358914,0.0852662105878,0.0846851141958,0.0844268491327,0.0845301551579,0.0842331503353,0.0845172419047,0.0846980274489,0.0847625937147,0.0848271599805,0.0847367672084,0.0848788129931,0.0851758178157,0.084956292512,0.0848529864868,0.0847367672084,0.0852145575752,0.0850725117904,0.0851499913094,0.0854986491446,0.0854599093851,0.085614868423,0.0859118732456,0.0856923479419,0.0857569142077,0.0856794346888,0.0857440009545,0.0856536081825,0.085446996132,0.0857698274609,0.0857310877014,0.0852920370941,0.0854728226383,0.0856923479419,0.0854728226383,0.0854082563725,0.0856277816761,0.0854082563725,0.0854728226383,0.0857181744482,0.0854599093851,0.0854599093851,0.0851887310688,0.0848788129931,0.0847755069679,0.0847367672084,0.0848013334742,0.0842977166011,0.0838328394875,0.084039451538,0.0837553599686,0.0838199262343,0.0832388298423,0.0830063912855,0.0828901720071,0.0823090756151,0.0824252948935,0.0823219888683,0.0820378972988,0.0818700250078,0.0815859334384,0.0817667189826,0.0816117599447,0.0815213671726,0.0815471936789,0.0810177502995,0.0811081430716,0.0806690924643,0.0803462611354,0.0802429551102,0.0805270466796,0.0804237406544,0.0799459502876,0.0799588635407,0.0799330370344,0.0797135117308,0.0797264249839,0.0797264249839,0.0795327261866,0.079481073174,0.0793648538956,0.0793906804019,0.0791065888325,0.0794165069082,0.0796876852245,0.079816817756,0.0802042153507,0.0800105165534,0.0801783888444,0.0803591743886,0.0803720876417,0.0807853117427,0.080643265958,0.080811138249,0.0810177502995,0.0813534948816,0.0814051478942,0.0809015310211,0.0809144442743,0.0808627912617,0.0807853117427,0.0807982249959,0.0808369647553,0.0813664081347,0.0816763262105,0.0816117599447,0.0810952298185,0.0810435768058,0.0811597960842,0.0812501888563,0.0813664081347,0.0815730201852,0.0819991575394,0.0819991575394,0.0825286009188,0.0830193045387,0.0832259165892,0.0829547382729,0.0831355238171,0.0833937888802,0.083380875627,0.0831096973108,0.0834970949054,0.0838070129812,0.083961972019,0.0839748852722,0.0839877985254,0.0837424467154,0.084039451538,0.0837553599686,0.0837811864749,0.0837166202091,0.0838586659938,0.0842589768416,0.0845430684111,0.0846980274489,0.0850595985373,0.0856794346888,0.0855890419167,0.0858214804735,0.0858602202329,0.0855244756509,0.0860668322834,0.0862992708402,0.0866350154223,0.0867383214475,0.086944933498,0.0867124949412,0.0866995816881,0.0867254081944,0.0866608419286,0.0863896636123,0.086777061207,0.0869965865107,0.0869965865107,0.0867641479539,0.087190285308,0.0873452443459,0.0873065045864,0.0874098106116,0.0874098106116,0.0875905961558,0.0875776829027,0.0877068154342,0.0877455551937,0.0879521672442,0.0879134274847,0.0879263407379,0.0879650804973,0.0879134274847,0.08801673351,0.0881716925478,0.0879909070037,0.0877068154342,0.0877713817,0.08752602989,0.0875518563964,0.0878230347126,0.0876680756748,0.0876680756748,0.0874614636243,0.0874227238648,0.0871515455485,0.0869707600043,0.086363837106,0.0865446226502,0.0863896636123,0.086363837106,0.0856406949293,0.0859247864987,0.086028092524,0.0861443118024,0.086028092524,0.0860668322834,0.0861313985492,0.0860410057771,0.085950613005,0.0858473069798,0.0860022660177,0.085950613005,0.0854986491446,0.085369516613,0.0855503021572,0.085201644322,0.0851629045625,0.084788420221,0.0848917262463,0.0844655888921,0.0844914153984,0.0844010226263,0.0841298443101,0.084039451538,0.083871579247,0.0838586659938,0.0834454418928,0.0834970949054,0.0834325286397,0.0831742635765,0.0834454418928,0.0839361455127,0.0839232322596,0.0835358346649,0.0830193045387,0.0830967840576,0.0832517430955,0.0824382081467,0.0821928563367,0.0818441985015,0.0813276683753,0.0812501888563,0.0806690924643,0.0805657864391,0.0805399599328,0.080475393667,0.0802687816165,0.0804237406544,0.0805012201733,0.0803850008949,0.080062169566,0.0800105165534,0.0797135117308,0.0796747719713,0.0788483237693,0.0786287984657,0.0784221864152,0.0782155743647,0.07807352858,0.0778152635169,0.0775699117069,0.0771825141122,0.0770921213402,0.0767822032644,0.0764851984418,0.0760461478345,0.075335918911,0.0746515164937,0.0747806490253,0.0745740369748,0.0744965574558,0.0737088490133,0.0737475887728,0.0740704201017,0.0735409767223,0.0732439718997,0.0731923188871,0.0725983092419,0.0724046104446,0.0718364273057,0.0716685550147,0.0716169020021,0.0709066730785,0.0705063622307,0.070532188737,0.0699898321045,0.0696928272819,0.0693829092061,0.0693570826998,0.0691375573962,0.0691633839025,0.0690471646241,0.068956771852,0.0686468537763,0.0689696851052,0.0689180320925,0.0686468537763,0.0686339405231,0.0686210272699,0.068543547751,0.0686081140168,0.0691117308899,0.0695766080035,0.0700285718639,0.070364316446,0.0703384899397,0.0705709284965,0.0710874586227,0.0713069839264,0.0710616321164,0.0714748562174,0.0718751670652,0.0717460345337,0.0718364273057,0.0720042995968,0.0719268200778,0.0716039887489,0.0715006827237,0.0716556417616,0.0716685550147,0.0711003718759,0.0709970658506,0.0707388007875,0.0709583260912,0.070532188737,0.0703901429523,0.0702480971676,0.0703772296991,0.0703126634334,0.0706871477749,0.070777540547,0.0708033670533,0.0709324995848,0.0709970658506,0.0710745453696,0.0712036779011,0.0709841525975,0.0705580152433,0.0702480971676,0.0700027453576,0.0695766080035,0.0695895212566,0.0697315670413,0.0695895212566,0.0694087357125,0.0693570826998,0.0689825983583,0.0690729911304,0.0693054296872,0.0694603887251,0.0694862152314,0.0699898321045,0.0701835309018,0.0700414851171,0.0702739236739,0.0703514031928,0.0704934489775,0.0709195863317,0.0716685550147,0.0720172128499,0.0724562634572,0.0729598803303,0.0730115333429,0.073347277925,0.0733214514187,0.0734764104565,0.0737346755196,0.0741737261269,0.0743803381774,0.0743157719117,0.0747031695063,0.0745352972153,0.0747935622784,0.0750647405947,0.0754650514425,0.0751680466199,0.0750518273415,0.075503791202,0.0754392249362,0.075258439392,0.0752196996326,0.0757104032525,0.0756845767462,0.0759557550624,0.0759557550624,0.0760332345814,0.0760590610877,0.0759428418093,0.0762914996445,0.0761107141003,0.0759944948219,0.0758653622904,0.0761881936193,0.0761881936193,0.0756329237336,0.0754263116831,0.0754004851767,0.0753617454173,0.0758911887967,0.0760978008472,0.0764464586824,0.0764851984418,0.0760978008472,0.0757362297588,0.0754650514425,0.0755941839741,0.0750130875821,0.0751163936073,0.0751809598731,0.0754392249362,0.0755167044551,0.0759557550624,0.0762011068724,0.0761881936193,0.0765755912139,0.0770921213402,0.0772729068843,0.0771308610996,0.0776215647195,0.0770662948338,0.0770275550744,0.076911335796,0.0770146418212,0.0769500755554,0.076498111695,0.0769888153149,0.0772729068843,0.0771954273654,0.0769888153149,0.0768467695302,0.0768596827834,0.0767047237455,0.0764593719355,0.0762785863913,0.0758266225309,0.0755812707209,0.0754392249362,0.0752455261389,0.0749872610758,0.0750001743289,0.0753100924047,0.0756200104804,0.0760590610877,0.0763431526571,0.0761365406066,0.0759041020498,0.0757233165056,0.0754650514425,0.0754779646957,0.075503791202,0.0753488321641,0.0754263116831,0.0752713526452,0.0754133984299,0.0751938731263,0.0754779646957,0.0754133984299,0.0756329237336,0.0755167044551,0.0758911887967,0.0762398466319,0.0761623671129,0.0756974899993,0.0759041020498,0.0761365406066,0.0763044128977,0.0770533815807,0.0772858201375,0.0778410900232,0.0779443960484,0.078486752681,0.0786417117189,0.0785900587062,0.078822497263,0.0793648538956,0.0797651647434,0.0799072105281,0.0799846900471,0.0799330370344,0.0798813840218,0.0804495671607,0.0805916129454,0.0807723984896,0.080888617768,0.081392234641,0.0811856225905,0.0814826274131,0.0814955406663,0.0815084539194,0.0819604177799,0.0822703358556,0.0823219888683,0.0828385189945,0.0830709575513,0.0833292226144,0.0832517430955,0.0832000900829,0.0833163093613,0.0839232322596,0.0842331503353,0.0842331503353,0.0844139358795,0.0841944105759,0.0844010226263,0.0843235431074,0.0846980274489,0.0846463744363,0.0848142467273,0.0854857358914,0.0858473069798,0.0858085672203,0.0858860467393,0.0859635262582,0.0861184852961,0.0863767503592,0.0861701383087,0.0862734443339,0.0866350154223,0.0868545407259,0.0870094997638,0.0865575359034,0.0870740660296,0.0873194178396,0.0878746877253,0.0880942130289,0.0879005142316,0.0882749985731,0.0885849166488,0.088597829902,0.0888431817119,0.0888173552056,0.0889594009903,0.0889723142435,0.0893726250913,0.0896954564202,0.0900312010023,0.0904056853438,0.0909351287232,0.0913612660773,0.091580791381,0.0920585817477,0.0919552757225,0.0924718058487,0.0930270757344,0.0927817239245,0.0929366829623,0.0929495962155,0.0930916420002,0.093324080557,0.0935048661012,0.0937502179111,0.0946283191257,0.0944733600879,0.0943700540626,0.094486273341,0.0947187118978,0.0953256347962,0.095480593834,0.0954676805809,0.0956355528719,0.0960358637197,0.0965394805928,0.0966169601117,0.0970172709596,0.0980115914526,0.0986701673635,0.0995870083376,0.0997677938818,0.100723374615,0.101033292691,0.10135612402,0.101523996311,0.102079266197,0.10233753126,0.102453750538,0.102750755361,0.102996107171,0.103848381879,0.104003340917,0.103951687904,0.104351998752,0.104403651765,0.104765222853,0.105139707195,0.105501278283,0.10597906865,0.106366466244,0.106547251789,0.107244567459,0.107502832522,0.107812750598,0.108561719281,0.109168642179,0.109039509648,0.109039509648,0.109155728926,0.109698085559,0.109904697609,0.110098396406,0.110227528938,0.109491473508,0.10933651447,0.108974943382,0.109452733749,0.109246121698,0.109530213268,0.109413993989,0.109388167483,0.109297774711,0.109142815673,0.109078249407,0.109220295192,0.109388167483,0.109142815673,0.109194468685,0.109142815673,0.109349427723,0.109426907242,0.109491473508,0.109271948204,0.109284861458,0.109194468685,0.10909116266,0.109271948204,0.109181555432,0.109465647002,0.109698085559,0.109491473508,0.109181555432,0.109323601217,0.109465647002,0.109607692786,0.109142815673,0.108755418078,0.108923290369,0.1086391988,0.108587545787,0.10835510723,0.108497153015,0.108497153015,0.108626285547,0.108510066268,0.108819984344,0.109052422901,0.109078249407,0.109026596394,0.109388167483,0.109452733749,0.109207381939,0.10958186628,0.10958186628,0.109762651824,0.109646432546,0.109904697609,0.110472880748,0.110924844608,0.111467201241,0.111454287988,0.111609247026,0.111325155456,0.111221849431,0.11126058919,0.110718232558,0.110666579545,0.110731145811,0.110756972317,0.110950671115,0.110524533761,0.110692406052,0.110718232558,0.11080862533,0.111131456659,0.111441374735,0.111376808469,0.111183109671,0.110847365089,0.110795712077,0.110485794001,0.110485794001,0.11031792171,0.11011130966,0.110098396406,0.109659345799,0.109723912065,0.109775565078,0.109284861458,0.109181555432,0.10909116266,0.108858724103,0.108690851812,0.108071015661,0.107360786737,0.10667638432,0.106740950586,0.106237333713,0.106030721662,0.105914502384,0.105991981903,0.106443945763,0.106753863839,0.106702210826,0.106999215649,0.107141261434,0.107154174687,0.106986302396,0.107025042155,0.106495598776,0.106069461422,0.105707890333,0.105798283106,0.105720803587,0.105953242143,0.10569497708,0.105875762624,0.105837022865,0.105875762624,0.105927415637,0.105475451777,0.105333405992,0.1047523096,0.104158299955,0.103977514411,0.103448071031,0.102763668614,0.102402097526,0.101821001134,0.101369037273,0.101536909564,0.101265731248,0.100258497502,0.0999744059322,0.0995224420718,0.099044651705,0.0986830806167,0.0979857649463,0.0971722299974,0.0967331793901,0.0958292516692,0.0949769769609,0.0947961914168,0.0942409215311,0.0936727383922,0.0934402998354,0.0932724275444,0.092910856456,0.0922651937982,0.0916066178873,0.0910126082421,0.0907930829385,0.0900312010023,0.0893855383445,0.0886882226741,0.0884041311046,0.0885461768894,0.088520350383,0.0880296467631,0.0877068154342,0.0874227238648,0.087435637118,0.0873968973585,0.086944933498,0.0868932804854,0.0865187961439,0.0861055720429,0.0857569142077,0.0858731334861,0.0857698274609,0.0857698274609,0.0858214804735,0.085369516613,0.0856406949293,0.0853824298662,0.0849821190184,0.0849950322715,0.0850208587778,0.0845172419047,0.0849821190184,0.0850854250436,0.0852403840815,0.0852145575752,0.0848788129931,0.0851112515499,0.0851629045625,0.084788420221,0.0845301551579,0.084207323829,0.0837424467154,0.0839748852722,0.0834325286397,0.0832259165892,0.0827610394756,0.0830709575513,0.0829547382729,0.0827739527287,0.0827481262224,0.0825415141719,0.082967651526,0.0825544274251,0.0825931671845,0.0824898611593,0.0827610394756,0.0826835599566,0.0826706467035,0.082386555134,0.0818183719952,0.0818571117547,0.0813147551221,0.081392234641,0.0811081430716,0.0810435768058,0.0810694033121,0.0811856225905,0.0805399599328,0.0803850008949,0.0801138225786,0.079816817756,0.0800105165534,0.079648945465,0.0795327261866,0.0795327261866,0.0797909912497,0.0803850008949,0.0806174394517,0.080475393667,0.080643265958,0.0809402707806,0.0809015310211,0.0806820057175,0.0804883069201,0.0804624804138,0.0804366539075,0.0804624804138,0.0802558683633,0.0804624804138,0.0805786996922,0.0805528731859,0.0801396490849,0.079894297275,0.0798426442623,0.080062169566,0.0804495671607,0.0799459502876,0.0799201237813,0.0796747719713,0.0797264249839,0.0797005984776,0.0794294201614,0.0790549358198,0.0788095840099,0.0787062779846,0.0784609261747,0.0785900587062,0.0784092731621,0.0784609261747,0.0783059671368,0.0783317936431,0.0778540032764,0.0775569984538,0.0775440852006,0.0774795189348,0.0773891261627,0.0771954273654,0.0775699117069,0.0774795189348,0.0775053454411,0.0774666056817,0.0772729068843,0.0771308610996,0.0767305502518,0.0766530707329,0.0766530707329,0.0766143309734,0.0762785863913,0.076330239404,0.0764077189229,0.0760074080751,0.0758137092777,0.0758266225309,0.0757878827714,0.0758137092777,0.0758782755435,0.0758782755435,0.0755941839741,0.0759041020498,0.0762398466319,0.0761107141003,0.076084887594,0.0755425309615,0.0753617454173,0.0752455261389,0.0751938731263,0.0753100924047,0.0754004851767,0.0751809598731,0.074845215291,0.0748323020379,0.0746644297469,0.0741737261269,0.0733860176844,0.0731664923808,0.0733343646718,0.0729986200898,0.0727532682798,0.072766181533,0.0725724827356,0.0722109116473,0.0721592586346,0.0719655598373,0.0719139068247,0.0716427285084,0.0711649381416,0.0710616321164,0.0705709284965,0.0706484080154,0.0706354947623,0.0705967550028,0.0702997501802,0.0699898321045,0.0701706176486,0.0699640055982,0.0695895212566,0.0696928272819,0.069705740535,0.0698736128261,0.0698865260792,0.0695636947503,0.0697444802945,0.0692150369151,0.0688922055862,0.0687372465484,0.0686081140168,0.0681690634095,0.0678591453338,0.0680011911185,0.0681690634095,0.0678849718401,0.0680011911185,0.0681819766627,0.0683111091942,0.0680786706374,0.0684402417258,0.0686726802826,0.0683111091942,0.0683369357005,0.0686081140168,0.0689438585988,0.0690859043836,0.0691892104088,0.0696411742693,0.0694991284845,0.0694087357125,0.0693958224593,0.0697444802945,0.0698219598134,0.0698477863198,0.0703514031928,0.0708679333191,0.0710228923569,0.0709841525975,0.0711520248885,0.0710874586227,0.0715394224832,0.07152650923,0.071939733331,0.0719655598373,0.0721979983941,0.0725079164698,0.0726241357482,0.0732956249124,0.0734376706971,0.0733085381655,0.0740445935954,0.0740058538359,0.0742253791396,0.0743803381774,0.0750260008352,0.0751163936073,0.0748193887847,0.0754263116831,0.0758137092777,0.075839535784,0.0759299285561,0.0763689791634,0.0765239382013,0.076665983986,0.0772341671249,0.077492432188,0.0779831358079,0.0778798297827,0.0778023502637,0.0780864418332,0.0773503864033,0.0770921213402,0.0765755912139,0.0767951165176,0.0769629888086,0.0771050345933,0.0771050345933,0.0772858201375,0.0768855092897,0.0768984225428,0.0769629888086,0.0772212538717,0.0775569984538,0.077324559897,0.0772599936312,0.0777248707448,0.077247080378,0.0771308610996,0.0771566876059,0.0773632996564,0.0773503864033,0.0774795189348,0.0779443960484,0.0778410900232,0.0777636105043,0.0777765237574,0.0777377839979,0.0773762129096,0.0771566876059,0.0770662948338,0.0768080297707,0.0766530707329,0.0763689791634,0.0765497647076,0.0768467695302,0.0764335454292,0.076911335796,0.0771050345933,0.0770921213402,0.0770275550744,0.0765755912139,0.0768855092897,0.0768467695302,0.0766788972392,0.0769888153149,0.0769500755554,0.0769500755554,0.0769629888086,0.0771308610996,0.0772341671249,0.0774278659222,0.0778410900232,0.0779314827953,0.0782801406305,0.0780864418332,0.0777119574916,0.0771566876059,0.0773891261627,0.077492432188,0.0773762129096,0.077660304479,0.0779314827953,0.0779831358079,0.0780089623142,0.0785900587062,0.0785254924405,0.0788095840099,0.0785642321999,0.0787579309973,0.0788612370225,0.0786675382252,0.078899976782,0.0787579309973,0.0786417117189,0.0789774563009,0.078899976782,0.0796102057055,0.0796876852245,0.0795456394398,0.0797909912497,0.0803333478823,0.0804237406544,0.0805012201733,0.0806820057175,0.0807078322238,0.0805399599328,0.0805399599328,0.0802429551102,0.0804366539075,0.080643265958,0.0807594852364,0.0809660972869,0.0813793213879,0.0808757045148,0.0809015310211,0.0812114490969,0.080811138249,0.0805399599328,0.0804366539075,0.0807207454769,0.0802429551102,0.0803591743886,0.0801396490849,0.0806820057175,0.0805916129454,0.0802687816165,0.0810306635527,0.0810435768058,0.0807982249959,0.0809144442743,0.0810306635527,0.0815084539194,0.0811985358437,0.0810823165653,0.0812760153626,0.0813405816284,0.0808498780085,0.0812372756032,0.0813276683753,0.0807465719833,0.0805270466796,0.0806174394517,0.0805012201733,0.0799459502876,0.0799072105281,0.0796747719713,0.0795972924524,0.0796360322119,0.0793648538956,0.0800750828191,0.0802687816165,0.080307521376,0.0803462611354,0.0805786996922,0.0805657864391,0.0804495671607,0.0803462611354,0.0804624804138,0.0805012201733,0.0804624804138,0.0803720876417,0.080643265958,0.0804495671607,0.0809015310211,0.0810306635527,0.0809660972869,0.0810435768058,0.0807465719833,0.0807207454769,0.0806561792112,0.0805399599328,0.0804108274012,0.0806949189706,0.0805012201733,0.0808627912617,0.0813405816284,0.0817021527168,0.0822057695899,0.0826189936908,0.0833550491207,0.0833421358676,0.0833163093613,0.0836907937028,0.0839748852722,0.0843622828669,0.0839232322596,0.0837811864749,0.083626227437,0.0834325286397,0.0835616611712,0.0837682732217,0.0838070129812,0.0841169310569,0.0845172419047,0.0846980274489,0.084788420221,0.0852274708283,0.0852403840815,0.0851112515499,0.0847367672084,0.0853824298662,0.0860539190303,0.0864542298781,0.0868545407259,0.08462054793,0.0824769479061,0.0803204346291,0.0780347888205,0.0756070972272,0.0734376706971,0.0707646272938,0.0683627622068,0.0657413718162,0.063068328413,0.0604469380223,0.0579675934164,0.0558756464052,0.0536545668624,0.0512010487628,0.0486829643974,0.0463198390699,0.0440471065145)
s <- c(0.0445785044989,0.0443502066901,0.0444442116702,0.0445583605746,0.0444442116702,0.044410638463,0.0445247873674,0.044410638463,0.0444442116702,0.0445717898575,0.0444374970288,0.0444374970288,0.0442964895586,0.0441353381641,0.0440816210326,0.0440614771083,0.0440950503155,0.0438331792995,0.0435914522077,0.0436988864707,0.0435511643591,0.0435847375663,0.0432825787016,0.0431617151558,0.0431012833828,0.0427991245182,0.0428595562911,0.0428058391596,0.042658117048,0.0425708267093,0.0424231045977,0.0425171095778,0.0424365338806,0.0423895313905,0.0424029606734,0.0421276603745,0.0421746628646,0.0419463650557,0.0417784990198,0.0417247818883,0.0418725039999,0.0418187868684,0.0415703451353,0.0415770597767,0.0415636304938,0.0414494815894,0.0414561962308,0.0414561962308,0.0413554766093,0.0413286180435,0.0630504830916,0.0643195503231,0.0653066026144,0.0665420966387,0.0677977345874,0.0690735164604,0.0703828715406,0.071510931302,0.0728471449479,0.0741967878767,0.0752375572994,0.0766409173597,0.0776884014238,0.0790514736355,0.0803272555085,0.0816298959472,0.0827310971429,0.0836845762269,0.0837382933584,0.083778581207,0.0837382933584,0.0836577176611,0.0838255836971,0.0840605961474,0.0841814596932,0.0841210279203,0.0838054397728,0.0839330179601,0.0840874547131,0.084208318259,0.0841411718446,0.0842016036175,0.0843560403706,0.0844164721435,0.0846313406695,0.0850879362872,0.085316234096,0.085161797343,0.0852356583988,0.085531102622,0.0855713904706,0.0853833805104,0.0855579611878,0.0855243879806,0.0853632365861,0.0852558023231,0.0854572415662,0.0853028048132,0.0855512465463,0.0851282241358,0.0849334995341,0.084899926327,0.0851483680601,0.0853229487375,0.0853632365861,0.0853430926618,0.0856788247336,0.0860615592955,0.0860817032198,0.0861287057099,0.0862764278215,0.0860481300126,0.0862562838972,0.0862562838972,0.0861891374828,0.0860951325027,0.0861421349928,0.085853405411,0.0858802639767,0.0858064029209,0.0858735493353,0.0856183929607,0.0860212714469,0.0859474103911,0.0860481300126,0.0860011275226,0.0861018471441,0.0861219910685,0.0860884178613,0.0861018471441,0.0863435742359,0.0865651574033,0.0865315841961,0.0866054452519,0.0864778670646,0.0868673162679,0.0869747505309,0.0868673162679,0.0869076041166,0.0867195941563,0.086652447742,0.0868270284193,0.0865651574033,0.086437579216,0.086545013479,0.0863704328016,0.0863167156701,0.0863972913674,0.0863570035187,0.0864577231403,0.0864644377817,0.086545013479,0.0866860209491,0.0867330234392,0.0864442938574,0.086592015969,0.0867195941563,0.0869008894751,0.0862361399729,0.0864912963475,0.0863435742359,0.0863234303116,0.0865517281204,0.0866390184591,0.0868270284193,0.0870553262282,0.0870486115867,0.087068755511,0.087283624037,0.0872030483398,0.0870284676624,0.0868673162679,0.0870821847939,0.0872500508298,0.0871694751326,0.0871359019254,0.0873977729414,0.0872433361884,0.0872299069055,0.0871359019254,0.0867330234392,0.0867800259293,0.0866793063077,0.086699450232,0.0863972913674,0.0864308645745,0.0864644377817,0.0861421349928,0.0858668346939,0.0860279860883,0.0861219910685,0.0859272664668,0.0855109586977,0.085423668359,0.0856318222436,0.0853363780203,0.0854505269248,0.0854035244347,0.0849737873828,0.084792492064,0.0842888939562,0.0839665911672,0.0836644323026,0.0832414098921,0.0828183874815,0.0826505214456,0.0826572360871,0.0823617918638,0.0820864915649,0.0817776180588,0.0814956031185,0.0813478810069,0.0807838511262,0.0802936823013,0.0800720991339,0.0797900841935,0.0797699402692,0.0793939203488,0.078997756504,0.0784874437548,0.0785344462449,0.0781919995316,0.0777958356868,0.0773862425592,0.0771445154674,0.0767617809055,0.0764260488337,0.0761306046105,0.0760097410646,0.0754524258254,0.0751502669607,0.0751435523193,0.074693671343,0.0742907928568,0.0739953486336,0.0736529019203,0.0734984651673,0.0732903112827,0.0732164502269,0.0733910309043,0.073203020944,0.0729344352866,0.0730821573982,0.0728538595893,0.0726054178562,0.0721353929556,0.0719943854854,0.0718466633738,0.0716855119793,0.071665368055,0.0715512191506,0.0714975020191,0.071510931302,0.0716250802064,0.0716250802064,0.0718466633738,0.0715982216406,0.0714706434533,0.0714773580948,0.071987670844,0.072142107597,0.0722361125771,0.0724308371788,0.0724039786131,0.0723301175573,0.0723972639716,0.0726322764219,0.0723435468401,0.0725046982346,0.0724979835932,0.0726524203462,0.0726658496291,0.0728135717407,0.0726859935534,0.0725852739319,0.07224954186,0.0719473829954,0.0721353929556,0.071510931302,0.0713900677561,0.0711349113815,0.0714437848876,0.0713833531147,0.0712826334931,0.0711349113815,0.0715243605848,0.0716116509235,0.0716922266208,0.0717929462423,0.0716519387721,0.0717526583937,0.0716452241307,0.0718466633738,0.0721219636727,0.0720883904655,0.0717459437523,0.0715915069992,0.0715713630749,0.0713699238318,0.0712759188517,0.0714169263219,0.0715310752263,0.0714169263219,0.0713497799075,0.0710476210428,0.0711617699473,0.0713229213417,0.0713632091904,0.0713900677561,0.071557933792,0.0715377898677,0.071665368055,0.07220253937,0.0722159686528,0.0725584153661,0.0728538595893,0.0731493038125,0.0732298795098,0.0731493038125,0.0734380333943,0.0737200483347,0.0735991847888,0.0736999044104,0.0739349168607,0.0741229268209,0.0745123760242,0.0746869567016,0.0748883959447,0.0750428326977,0.0750361180563,0.0752241280165,0.0754188526182,0.0756202918613,0.075600147937,0.0757814432558,0.0762514681564,0.0762581827978,0.0763186145707,0.0762581827978,0.076815498037,0.0767617809055,0.0770706544116,0.0769095030172,0.0769229323,0.077090798336,0.0772250911647,0.0775205353879,0.0772653790133,0.0769632201487,0.0771243715431,0.0770572251288,0.0770975129774,0.0771310861846,0.0772788082962,0.0775541085951,0.0774869621807,0.0777085453481,0.0778159796111,0.0781651409658,0.0779972749299,0.077721974631,0.0776413989338,0.0774131011249,0.0774869621807,0.0773392400691,0.0773728132763,0.0773258107862,0.0775339646708,0.0776682574995,0.0778965553084,0.0778831260255,0.0780174188542,0.0783732948504,0.078521016962,0.0787627440537,0.0786217365835,0.0793469178587,0.079152193257,0.07921262503,0.0792864860858,0.0793469178587,0.0794946399703,0.0793737764245,0.0799109477394,0.0802332505284,0.0801325309068,0.0802198212455,0.0802601090941,0.0802936823013,0.0802466798112,0.0803138262256,0.0805286947516,0.080273538377,0.0802332505284,0.0799646648709,0.0800922430582,0.0803071115842,0.0804481190544,0.0807771364848,0.080965146445,0.0813008785168,0.0814150274213,0.0814284567041,0.0815828934572,0.0818179059075,0.0817843327003,0.0819857719434,0.0820462037163,0.0819857719434,0.0820932062064,0.0819857719434,0.0819656280191,0.0818044766246,0.081918625529,0.0820394890749,0.0823215040152,0.0822610722423,0.0825632311069,0.0826840946528,0.082610233597,0.0823147893738,0.0825632311069,0.0828116728401,0.0829661095932,0.0835099955495,0.0836980055098,0.0838927301114,0.0839128740357,0.0844097575021,0.0848327799126,0.0852490876817,0.0856721100922,0.0859138371839,0.0861219910685,0.0864442938574,0.0866860209491,0.0867061648735,0.0870016090967,0.0874246315072,0.0874514900729,0.0876865025232,0.0879416588978,0.0883109641769,0.0881498127824,0.0885325473443,0.0888011330017,0.0891234357907,0.0898217585001,0.0898217585001,0.0898217585001,0.0901843491377,0.0903790737394,0.0907013765284,0.0905469397753,0.0907618083013,0.0910371086002,0.0915004188593,0.0918898680627,0.0920443048157,0.0922256001345,0.0920375901743,0.0923061758317,0.0923800368876,0.092756056808,0.0929306374854,0.0927829153738,0.0928769203539,0.0929776399754,0.0931589352942,0.09323279635,0.0931925085014,0.0932596549158,0.093293228123,0.093125362087,0.0931186474456,0.0934208063103,0.0932059377843,0.0930850742384,0.0928097739395,0.0932797988401,0.0933670891788,0.0937498237407,0.093769967665,0.0937162505335,0.0942869950556,0.0948644542192,0.094985317765,0.0951397545181,0.095200186291,0.0954889158728,0.0955292037214,0.095891794359,0.0964155363911,0.0965363999369,0.0969124198574,0.0974093033237,0.0979599039215,0.098228489579,0.0987253730453,0.0987992341011,0.0989805294199,0.0997594278266,0.0999004352968,0.100202594161,0.100464465177,0.100874058305,0.101075497548,0.101323939281,0.101713388485,0.102351279421,0.102525860099,0.10257957723,0.102841448246,0.103089889979,0.103613632011,0.103788212689,0.104050083705,0.104170947251,0.104573825737,0.104734977131,0.104701403924,0.104768550338,0.105372868068,0.105977185797,0.106433781415,0.106514357112,0.106997811295,0.107192535897,0.107105245558,0.10739397514,0.107494694762,0.107575270459,0.107736421854,0.108025151435,0.10813930034,0.108528749543,0.108763761993,0.108757047352,0.109173355121,0.109025633009,0.108857766973,0.108864481615,0.108992059802,0.109159925838,0.109294218667,0.109321077233,0.109770958209,0.109831389982,0.109945538886,0.110563285898,0.110798298349,0.110596859106,0.110590144464,0.110643861596,0.111100457213,0.111301896456,0.111382472154,0.111449618568,0.110986308309,0.110751295859,0.110583429823,0.110697578727,0.1107580105,0.110858730122,0.11108702793,0.110892303329,0.110986308309,0.110872159405,0.110771439783,0.110764725142,0.110966164385,0.110919161895,0.11085201548,0.110717722651,0.110650576237,0.110845300839,0.111241464684,0.111268323249,0.111496621058,0.111422760002,0.111429474644,0.111684631018,0.111792065281,0.112147941278,0.112356095162,0.112168085202,0.112248660899,0.112584392971,0.112792546855,0.113040988589,0.112678397951,0.11262468082,0.112819405421,0.112886551836,0.112980556816,0.113208854625,0.113396864585,0.113537872055,0.113725882015,0.113712452732,0.113860174844,0.11426305333,0.114330199744,0.1144040608,0.114612214685,0.114598785402,0.114464492573,0.114733078231,0.114900944267,0.114988234605,0.114867371059,0.115156100641,0.115276964187,0.11533739596,0.115532120562,0.115787276936,0.116109579725,0.115921569765,0.115760418371,0.11571341588,0.115471688789,0.115592552335,0.115498547354,0.115532120562,0.11543140094,0.114887514984,0.114914373549,0.114786795362,0.114692790382,0.114806939286,0.115048666378,0.114753222155,0.114672646458,0.114504780422,0.114155619067,0.113866889485,0.113504298848,0.113296144963,0.113108135003,0.113067847154,0.112732115083,0.112832834704,0.112779117573,0.112577678329,0.112416526935,0.112443385501,0.112094224146,0.111590626038,0.111228035401,0.110623717671,0.110321558807,0.110167122054,0.109690382512,0.109233786894,0.108924913388,0.108790620559,0.108783905918,0.108522034902,0.108334024941,0.108152729623,0.107931146455,0.10804529536,0.108085583208,0.10795129038,0.107548411893,0.107152248049,0.106702367072,0.106850089184,0.106635220658,0.106756084204,0.106742654921,0.106742654921,0.106749369562,0.106769513487,0.106474069263,0.106158481116,0.106158481116,0.105607880518,0.105043850637,0.104533537888,0.104090371553,0.103586773446,0.1034659099,0.103069746055,0.102895165378,0.103177180318,0.102707155417,0.101914827728,0.101592524939,0.101572381015,0.101397800337,0.101263507508,0.100820341174,0.100350316273,0.10000786956,0.0994639836034,0.0992356857945,0.0991483954559,0.0983426384834,0.0979129014315,0.0976980329055,0.0972280080049,0.0966975513314,0.095999228622,0.0954083401756,0.0947905931634,0.0943474268285,0.0937766823064,0.0932999427644,0.0926956250351,0.0926083346964,0.0924740418677,0.0919637291185,0.091540706708,0.0913124088991,0.09089610113,0.0909162450543,0.0904865080024,0.0899829098946,0.0899291927631,0.0891905822051,0.0886265523244,0.0882639616868,0.0883646813083,0.0881498127824,0.0878140807105,0.087652929316,0.0872030483398,0.0874716339973,0.0874514900729,0.0870016090967,0.0868538869851,0.0864644377817,0.0858735493353,0.0861287057099,0.0859406957497,0.0858668346939,0.0858668346939,0.0856855393751,0.0855445319049,0.0857258272237,0.0855042440563,0.0850476484386,0.0849133556098,0.0845910528209,0.0845171917651,0.0840740254302,0.0837517226413,0.0834898516252,0.0836510030197,0.0834159905694,0.0832414098921,0.0829929681589,0.0828922485373,0.083039970649,0.08271766786,0.0827378117843,0.0827512410672,0.0828183874815,0.0826035189556,0.0826303775213,0.0825833750313,0.0821469233379,0.0819387694533,0.0813881688555,0.0812001588953,0.0810322928594,0.0808644268234,0.0808644268234,0.0809047146721,0.0804481190544,0.0803003969427,0.0802198212455,0.0801191016239,0.0802332505284,0.0801392455483,0.079843801325,0.0796222181576,0.0799848087952,0.0800922430582,0.0802936823013,0.0802533944527,0.0804145458472,0.0806764168632,0.0808912853892,0.0805756972417,0.0806495582975,0.0809852903693,0.0809114293135,0.0811867296124,0.0812404467439,0.0813613102898,0.0813948834969,0.0813948834969,0.0813008785168,0.0813008785168,0.0812337321025,0.0812337321025,0.0813814542141,0.0813210224411,0.0813411663654,0.0814351713456,0.08154932025,0.0817977619832,0.0816097520229,0.0816634691544,0.0816970423616,0.0817171862859,0.0816097520229,0.0817574741345,0.0820126305091,0.082287930808,0.0824087943539,0.0827042385771,0.0825162286169,0.0824155089953,0.0822274990351,0.0822342136765,0.0819521987362,0.0819723426605,0.0819992012263,0.0821066354892,0.0818917669633,0.0816634691544,0.0817977619832,0.08154932025,0.0814015981384,0.0815358909671,0.0816164666644,0.0816231813058,0.081334451724,0.0811397271223,0.0812673053096,0.0809852903693,0.0811531564052,0.0812404467439,0.0812471613853,0.0811397271223,0.0813143077997,0.0812807345925,0.0813613102898,0.0811934442538,0.0814217420627,0.0813814542141,0.08154932025,0.0812941638754,0.0807838511262,0.0804615483372,0.0801728187554,0.080058669851,0.0800788137753,0.0799445209466,0.0798303720422,0.0796356474405,0.0798505159665,0.0794476374803,0.0791320493327,0.0790514736355,0.0791723371814,0.0790917614841,0.0789641832968,0.0788567490338,0.0787224562051,0.0786015926592,0.0785008730377,0.0784001534161,0.0784672998305,0.0783665802089,0.0780174188542,0.07804427742,0.077460103615,0.0773728132763,0.0773929572006,0.077352669352,0.0771176569017,0.0767819248299,0.0766476320011,0.0766207734354,0.0761910363834,0.0762984706464,0.0760836021204,0.0758351603873,0.0758754482359,0.0756874382757,0.0758418750287,0.0756270065027,0.0752577012237,0.0753449915624,0.0754322819011,0.0750965498292,0.074801105606,0.0747608177574,0.0747339591916,0.0745526638728,0.0745593785143,0.0746130956458,0.0745660931557,0.0745056613828,0.0744183710441,0.0742706489325,0.0743646539126,0.0743377953469,0.0744183710441,0.0745325199485,0.0745526638728,0.0746063810043,0.0748615373789,0.074801105606,0.0747071006259,0.0746533834944,0.07458623708,0.0746735274187,0.0748212495303,0.0749622570005,0.0753449915624,0.0754054233353,0.0754859990326,0.0757008675585,0.0756605797099,0.0757948725386,0.0757210114828,0.0757881578972,0.0759963117818,0.0760164557061,0.0760030264232,0.0761037460447,0.0763118999293,0.0764193341923,0.0762581827978,0.0766744905669,0.0766744905669,0.0767013491326,0.0765872002282,0.0769565055072,0.0771243715431,0.0770370812045,0.0770035079973,0.0770706544116,0.077030366563,0.0771982325989,0.0775541085951,0.0776279696509,0.0778092649697,0.0779301285156,0.0780644213443,0.0783665802089,0.0784941583962,0.0785075876791,0.0783867241333,0.0780375627785,0.0778562674597,0.0775473939537,0.0776481135752,0.0779166992327,0.0779771310056,0.0781315677587,0.0784538705476,0.078413582699,0.0784941583962,0.0785545901692,0.0787627440537,0.0789776125797,0.0790246150698,0.0791186200499,0.0793402032173,0.0790917614841,0.0790649029184,0.0789373247311,0.079320059293,0.0794006349902,0.0795416424604,0.0800250966438,0.0801728187554,0.0803541140742,0.080703275429,0.0807704218433,0.0805219801102,0.0805286947516,0.08042797513,0.0805152654687,0.0803406847914,0.0801795333969,0.0802533944527,0.0805085508273,0.080488406903,0.0808912853892,0.0810792953494,0.0810658660665,0.0810255782179,0.080642843656,0.0809852903693,0.0809718610864,0.0807435632776,0.0809047146721,0.0808308536163,0.0808039950505,0.0808980000306,0.081012148935,0.0810591514251,0.081180014971,0.0816836130787,0.0817373302102,0.0820126305091,0.0820730622821,0.0815560348914,0.0812203028196,0.0812337321025,0.0811397271223,0.0810591514251,0.0812337321025,0.0811867296124,0.0812538760268,0.0812471613853,0.0816030373815,0.0817574741345,0.0817373302102,0.0817776180588,0.0820529183577,0.0821670672622,0.0819790573019,0.0821200647721,0.0817440448517,0.0815627495329,0.0818581937561,0.0819924865848,0.0825162286169,0.0826035189556,0.0823685065053,0.0825565164655,0.0829862535175,0.0831608341948,0.0832346952506,0.0833421295136,0.0835234248324,0.0833757027208,0.0834227052109,0.0832414098921,0.0832951270236,0.0834898516252,0.0835032809081,0.0840605961474,0.0841613157689,0.0842956085976,0.0844366160678,0.0846111967452,0.0844500453507,0.084362755012,0.084208318259,0.0844500453507,0.0842821793148,0.0843090378805,0.0845574796137,0.0847857774225,0.0846581992352,0.0846380553109,0.0852356583988,0.0853430926618,0.0855848197535,0.0859138371839,0.0860817032198,0.0862294253314,0.0860749885784,0.0861354203513,0.0865718720447,0.0867330234392,0.0862428546143,0.0863704328016,0.0864577231403,0.0863838620845,0.0861555642756,0.0863368595944,0.0862092814071,0.0858802639767,0.0859138371839,0.0859809835983,0.0861891374828,0.0861287057099,0.0863167156701,0.0864778670646,0.0863771474431,0.0863637181602,0.0864644377817,0.0865987306105,0.0868740309094,0.0868807455508,0.0867195941563,0.0869411773237,0.0869948944552,0.0872030483398,0.0871694751326,0.0871829044155,0.0870553262282,0.0874783486387,0.0876596439575,0.0875320657702,0.0875857829017,0.0874179168658,0.0875992121845,0.0873843436586,0.0873306265271,0.0871157580011,0.0875723536188,0.0874313461486,0.087605926826,0.0876730732404,0.0879618028221,0.088297534894,0.0888414208504,0.0893181603924,0.0893450189581,0.0892107261294,0.0894994557112,0.0897411828029,0.0899291927631,0.0897747560101,0.0898956195559,0.0901306320062,0.0899560513289,0.0901104880819,0.090097058799,0.0901037734405,0.0903253566079,0.0905872276239,0.0906006569068,0.0905469397753,0.0909968207516,0.0911243989389,0.0910438232416,0.0907819522256,0.0909901061101,0.0913056942577,0.0914937042179,0.0917220020267,0.090419361588,0.0894255946554,0.0883042495354,0.087068755511,0.0856788247336,0.0845574796137,0.0831138317048,0.0816701837959,0.08038097264,0.0787896026195,0.0772788082962,0.0759761678574,0.0748682520204,0.0736730458446,0.0722361125771,0.0707857500268,0.0695233974367,0.0684087669582,0.0453036857741,0.0450283854752,0.0449209512122,0.0448739487222,0.0449008072879,0.0448068023078,0.0446993680448,0.044625506989,0.0443569213315,0.0442360577857,0.0439809014111,0.0438936110724,0.0438466085823,0.0437593182437,0.0437928914508,0.043719030395,0.0437861768094,0.0438466085823,0.0437727475265,0.0437324596779,0.0437257450365,0.0437593182437,0.0438063207337,0.0440950503155,0.0443569213315,0.0446859387619,0.0447127973277,0.0448135169492,0.0449008072879,0.0449813829852,0.0450015269095,0.0449142365708,0.0449545244194,0.0450283854752,0.0448806633636,0.0447866583835,0.0449612390608,0.0451156758139,0.0451761075868,0.0452902564912,0.0452835418498,0.0455252689415,0.0454984103758,0.0454044053957,0.0455252689415,0.0456461324874,0.0457804253161,0.0458341424476,0.0458139985233,0.0459080035034)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("1-organelles-nucleus-merged/DP104-1-FLMdelta-GFP-GSM1167543.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=101"),bty="n")
dev.off()
