# R script for Peak Model
#  -- generated by MACS
p <- c(0.0351287170236,0.0369121749648,0.03868482407,0.0405115173552,0.0428570347688,0.0448566694301,0.0466185096993,0.0486721885407,0.0508447645781,0.0525417518313,0.0543252097725,0.0557087407814,0.0573949191985,0.0590702887797,0.0606267611647,0.0626263958261,0.0645827951434,0.0664094884286,0.0664743414446,0.0661825028724,0.0659555173163,0.065469119696,0.0649178690596,0.0646152216514,0.0643125742432,0.0643882360952,0.0651016192717,0.0647665453555,0.0647449276835,0.0645827951434,0.0647125011755,0.0645611774714,0.0638369854589,0.064085588687,0.064042353343,0.0645287509633,0.0644855156193,0.0647233100115,0.0650367662557,0.0653718401719,0.0648097806995,0.0646584569954,0.0651448546158,0.0650908104357,0.0650151485837,0.0650475750917,0.06551235504,0.0661933117085,0.0664311061006,0.0666364739848,0.0667013270008,0.0666364739848,0.0667877976889,0.0668634595409,0.0668634595409,0.0674363278493,0.0677389752575,0.0682577993858,0.068560446794,0.0693603006586,0.0691225062664,0.0692305946265,0.0691116974304,0.0700736838351,0.0702574340472,0.0703222870632,0.0706789786515,0.0705816991274,0.0707438316675,0.0711761851078,0.0705060372754,0.0702358163752,0.0703871400793,0.0704303754233,0.0705276549474,0.0701709633591,0.0702574340472,0.0707438316675,0.0700953015071,0.0698683159509,0.0696737569028,0.0700736838351,0.0697818452629,0.069954786639,0.0698791247869,0.069911551295,0.0705600814554,0.0706789786515,0.0705384637834,0.0706033167994,0.0708303023556,0.0707330228315,0.0705276549474,0.0703330958992,0.0701493456871,0.0694143448386,0.0694035360026,0.069943977803,0.0696953745748,0.0689495648903,0.0691333151024,0.0693278741506,0.0694467713466,0.0698575071149,0.0701061103431,0.0695116243627,0.0704844196033,0.0707438316675,0.0706897874875,0.0704844196033,0.0701169191791,0.0702033898671,0.0705384637834,0.0702250075392,0.0703330958992,0.0704195665873,0.0704303754233,0.069911551295,0.0703006693912,0.0701385368511,0.0702682428832,0.0701385368511,0.0698358894429,0.0697061834108,0.0699007424589,0.0694359625106,0.0696737569028,0.069911551295,0.0701925810311,0.0705168461114,0.0706465521434,0.0708194935196,0.0711869939438,0.0711437585998,0.0717382445802,0.0716733915641,0.0710897144197,0.0709275818796,0.0708735376996,0.0713383176479,0.0712518469599,0.0713923618279,0.0704195665873,0.0701925810311,0.0703330958992,0.0707870670115,0.0707222139955,0.0707438316675,0.0705816991274,0.0704628019313,0.0703439047352,0.0705276549474,0.0707222139955,0.0711221409278,0.0708086846836,0.0709059642076,0.0710248614037,0.0711113320918,0.0709167730436,0.0705600814554,0.0706249344714,0.0713275088119,0.0711005232558,0.0713491264839,0.0716301562201,0.0715869208761,0.071478832516,0.0711437585998,0.0710572879117,0.0710464790757,0.0704087577513,0.0711437585998,0.0712734646319,0.0716085385481,0.0711545674358,0.0702574340472,0.0705276549474,0.0705060372754,0.0711437585998,0.0712626557959,0.071478832516,0.0711545674358,0.0716842004001,0.0719328036283,0.0717706710882,0.0718679506123,0.0725813337887,0.0721922156925,0.0717490534162,0.0719652301363,0.0717166269082,0.071446406008,0.0713058911399,0.0711978027798,0.071500450188,0.0717814799242,0.0717598622522,0.0711869939438,0.0709924348957,0.0707438316675,0.0703547135713,0.069998021983,0.070030448491,0.0703006693912,0.0702898605552,0.0701061103431,0.0705816991274,0.0697278010828,0.0696089038867,0.0695116243627,0.0701169191791,0.0703222870632,0.0702574340472,0.0701817721951,0.0703547135713,0.0703222870632,0.0697926540989,0.0694791978547,0.0691441239384,0.0688414765302,0.0687333881702,0.0687874323502,0.0687441970062,0.0687766235142,0.0688739030383,0.0684091230899,0.0682469905498,0.0683118435659,0.0679983873217,0.0682469905498,0.0676200780614,0.0677930194375,0.0677497840935,0.0681280933538,0.0681713286978,0.0681713286978,0.0683226524019,0.0690252267424,0.0689711825623,0.0691873592825,0.0693603006586,0.0695332420347,0.0695224331987,0.0697386099188,0.0707222139955,0.0704087577513,0.0701601545231,0.0706357433074,0.0708951553716,0.0711545674358,0.0707222139955,0.0709383907156,0.0711761851078,0.0713275088119,0.0713058911399,0.0716085385481,0.071500450188,0.0713707441559,0.0713275088119,0.0710140525677,0.071478832516,0.0717814799242,0.0721165538404,0.0719111859563,0.0722030245285,0.0723003040526,0.0728839811969,0.0732839081292,0.0734892760134,0.0732190551132,0.0736730262255,0.0734136141613,0.0734352318333,0.0732514816212,0.0732622904572,0.0734136141613,0.0734460406693,0.0733163346372,0.0732190551132,0.0739216294536,0.0734136141613,0.0737054527335,0.0739540559617,0.0739972913057,0.0737594969135,0.0737703057495,0.0736622173895,0.074483688926,0.0751106014144,0.0755861901988,0.0764725147514,0.0766346472915,0.0775317806801,0.0778128104163,0.0776831043842,0.078882885181,0.0785153847567,0.0787423703129,0.0786126642808,0.0791531060812,0.0797692097336,0.0803204603699,0.0804934017461,0.0807311961382,0.0808825198423,0.0817148002149,0.0816931825429,0.0826551689475,0.0831523754038,0.08332531678,0.0836603906962,0.0841792148245,0.0847520831329,0.0851844365732,0.0861356141418,0.0866976736142,0.08633017319,0.0865031145661,0.0868922326624,0.0872489242506,0.0873137772666,0.0880920134592,0.0896917211882,0.0896701035162,0.0895728239922,0.0900700304485,0.089410691452,0.0896376770082,0.0895620151561,0.0897998095483,0.0901673099726,0.0896592946802,0.0898106183843,0.0903726778567,0.0909131196571,0.0905888545768,0.0909563550011,0.0909455461651,0.0910428256891,0.0912698112453,0.0916697381776,0.0913778996054,0.0921345181259,0.0918751060617,0.0913346642613,0.0919831944218,0.092361503682,0.09233988601,0.0924912097141,0.0926857687622,0.092307459502,0.0918859148977,0.0929343719904,0.0930424603505,0.0931937840546,0.0931181222025,0.0944043736874,0.0949231978158,0.0939828290831,0.0942206234753,0.0949772419958,0.0946313592436,0.0951609922079,0.0954960661241,0.0959392284004,0.096825552953,0.0974957007855,0.0983928341741,0.0988035699424,0.0986306285662,0.0994304824308,0.100478939523,0.100792395768,0.101430117092,0.101549014288,0.101981367728,0.101819235188,0.102964971805,0.103137913181,0.103721590326,0.104780856254,0.105159165515,0.105418577579,0.105850931019,0.105396959907,0.105894166363,0.106726446736,0.106921005784,0.106964241128,0.10774247732,0.108055933565,0.108812552085,0.108801743249,0.108196448433,0.109320567377,0.109407038065,0.10945027341,0.110325789126,0.110541965846,0.11090946627,0.111352628547,0.111028363467,0.111266157859,0.111590422939,0.11245512982,0.112952336276,0.112757777228,0.112498365164,0.112476747492,0.112444320984,0.113557631092,0.113687337124,0.114368293793,0.114195352417,0.11375219014,0.113730572468,0.113979175697,0.113968366861,0.114670941201,0.115611309934,0.116562487502,0.116627340518,0.116951605599,0.118270283591,0.119037710948,0.1191133728,0.120032123861,0.120442859629,0.120550947989,0.12146969905,0.121869625982,0.12244249429,0.122453303126,0.122745141698,0.123739554611,0.124485364296,0.124355658264,0.12533926234,0.125760806944,0.125631100912,0.125793233452,0.126322866417,0.127392941182,0.128884560551,0.128095515522,0.128592721978,0.129284487483,0.129662796743,0.130354562248,0.130830151032,0.131705666748,0.132646035481,0.132646035481,0.133240521461,0.13402956649,0.133943095802,0.134072801834,0.134656478978,0.134364640406,0.134742949666,0.13462405247,0.135207729615,0.135726553743,0.135769789087,0.136526407608,0.137542438192,0.137920747453,0.138018026977,0.139217807773,0.139790676082,0.140320309046,0.140277073702,0.141455236827,0.141584942859,0.142211855348,0.143833180749,0.145108623397,0.14615708049,0.145951712606,0.146394874882,0.148135097479,0.14867553928,0.148416127216,0.149399731292,0.149615908012,0.150275247009,0.151118336217,0.151604733838,0.152361352358,0.153009882519,0.152890985323,0.153063926699,0.153971868923,0.154620399084,0.154923046492,0.154587972576,0.154771722788,0.156295768665,0.156955107661,0.156738930941,0.156490327713,0.155755326865,0.155636429669,0.156339004009,0.155971503585,0.156393048189,0.155906650569,0.155982312421,0.155214885064,0.154966281836,0.154479884216,0.153701648023,0.153117970879,0.152890985323,0.152631573259,0.151529071986,0.151604733838,0.150513041401,0.150588703253,0.149691569865,0.149421348964,0.14948620198,0.148988995524,0.148794436476,0.148199950496,0.146275977686,0.14577877123,0.145205902922,0.144838402497,0.144092592813,0.143800754241,0.14277391482,0.142838767836,0.141293104287,0.140082514654,0.141066118731,0.141249868943,0.141703840055,0.140709427143,0.13933670497,0.138742218989,0.137110084752,0.136407510412,0.136018392315,0.135921112791,0.135294200303,0.135240156123,0.135283391467,0.13473214083,0.134051184162,0.134278169718,0.134591625962,0.133997139982,0.135186111943,0.135196920779,0.135034788239,0.134926699879,0.134126846014,0.134613243634,0.134613243634,0.134926699879,0.135813024431,0.135694127235,0.135910303955,0.135445524007,0.134937508715,0.134580817126,0.134775376175,0.134634861306,0.13467809665,0.134180890194,0.133110815429,0.132927065217,0.131889416961,0.131954269977,0.132267726221,0.131856990453,0.132278535057,0.132289343893,0.13167324024,0.13102471008,0.131003092408,0.129997870659,0.128408971766,0.12807389785,0.126852499381,0.126171542713,0.125382497684,0.124258378739,0.122410067782,0.120961683757,0.120010506189,0.118724254704,0.117394767875,0.115081676969,0.113795425484,0.112703733048,0.111374246219,0.110304171454,0.108953066953,0.107699241976,0.107104755996,0.1069858588,0.1067156379,0.105645563135,0.104099899586,0.103083869001,0.102273206301,0.100684307408,0.0996466591509,0.0990521731705,0.0976686421616,0.0971606268693,0.0962310669726,0.0952150363879,0.0944908443755,0.093809887707,0.0928154747943,0.0926101069102,0.0921885623059,0.0910536345252,0.0913022377533,0.0903942955287,0.0890215733558,0.0888378231437,0.0887729701276,0.0884595138834,0.087908263247,0.0872381154146,0.0873353949387,0.0870759828745,0.0862437025019,0.0853357602773,0.0847520831329,0.0846115682648,0.0839954646124,0.0836711995322,0.0837036260402,0.0824822275714,0.0816823737069,0.0811311230705,0.0813256821186,0.0811527407425,0.0807960491543,0.0808392844983,0.0808609021703,0.0804934017461,0.0805582547621,0.080417739894,0.0799205334377,0.0800718571418,0.080406931058,0.0805582547621,0.0805042105821,0.0801583278298,0.0807095784662,0.0807420049742,0.0800826659778,0.0799205334377,0.0805798724341,0.0807095784662,0.080471784074,0.08042854873,0.0801583278298,0.080471784074,0.0800826659778,0.0800178129617,0.0799097246017,0.080406931058,0.0810122258744,0.0809473728584,0.0811311230705,0.0814661969867,0.0808609021703,0.0813256821186,0.0812608291026,0.0810770788905,0.0805474459261,0.0799205334377,0.0800610483058,0.0802339896819,0.0805906812701,0.0800718571418,0.0801799455018,0.0795097976694,0.0795638418494,0.0793152386213,0.0787639879849,0.0786991349689,0.078936929361,0.0785586201008,0.0781262666605,0.0786342819528,0.0781478843325,0.0780397959724,0.0777695750722,0.0776398690401,0.0772291332719,0.0773156039599,0.0771858979278,0.0768616328476,0.0770453830597,0.0772183244359,0.077380456976,0.0768400151756,0.0764941324234,0.0761266319991,0.0760509701471,0.0761158231631,0.075996925967,0.0757050873948,0.0751214102505,0.0752619251185,0.0752294986105,0.0758347934269,0.0753051604626,0.0742242768618,0.0736946438975,0.0742242768618,0.0735649378654,0.0733379523093,0.072970451885,0.0731217755891,0.072927216541,0.0725705249527,0.0726678044768,0.0724083924126,0.0722678775445,0.0715544943681,0.0718895682843,0.0716842004001,0.0716950092362,0.0709924348957,0.0712734646319,0.0706141256354,0.0706573609795,0.0701061103431,0.0694900066907,0.0693927271666,0.0690252267424,0.0690576532504,0.0690576532504,0.0692522122985,0.0692089769545,0.0683766965819,0.0683550789099,0.0681389021898,0.068528020286,0.0688630942022,0.0694791978547,0.0693278741506,0.0695008155267,0.0703006693912,0.0702790517192,0.070008830819,0.0701817721951,0.070008830819,0.0701925810311,0.0704087577513,0.0706465521434,0.0706249344714,0.0702790517192,0.0705816991274,0.0703979489153,0.069954786639,0.0701925810311,0.0701385368511,0.0702250075392,0.0704195665873,0.0704519930953,0.0708086846836,0.0709708172237,0.0712302292878,0.0717814799242,0.0718463329403,0.0715977297121,0.0720300831524,0.0723327305606,0.0726245691328,0.0724083924126,0.0727758928369,0.073002878393,0.0727002309848,0.0722138333645,0.0717058180722,0.0710572879117,0.0709383907156,0.0706573609795,0.069976404311,0.0695008155267,0.0689495648903,0.0691981681185,0.0694900066907,0.0695224331987,0.0691116974304,0.0686361086461,0.0682145640418,0.0680740491737,0.0683118435659,0.0681929463698,0.0687550058422,0.068495593778,0.0688630942022,0.0690144179064,0.0689387560543,0.0688955207103,0.0683983142539,0.0679443431416,0.0675119897013,0.0668850772129,0.0668094153609,0.0668310330329,0.0661392675284,0.0657933847762,0.0651556634518,0.0653718401719,0.0656961052521,0.0653826490079,0.0653826490079,0.0659771349883,0.0660960321844,0.0657825759402,0.0656096345641,0.0656961052521,0.0664527237726,0.0672201511291,0.0679335343056,0.0678038282735,0.068441549598,0.0681929463698,0.0678038282735,0.0679119166336,0.0683658877459,0.0680308138297,0.0678362547816,0.0679767696497,0.0676092692254,0.0671661069491,0.0668418418689,0.0662149293805,0.0660960321844,0.0660311791683,0.0668094153609,0.0671120627691,0.0675336073734,0.0673390483252,0.066971547901,0.0672633864732,0.0676957399135,0.0674255190133,0.0676416957334,0.0674579455213,0.0666040474767,0.0664094884286,0.0665067679527,0.0663878707566,0.0662581647245,0.0664527237726,0.0661825028724,0.0664959591167,0.0660527968404,0.0653826490079,0.0650800015997,0.065479928532,0.0648854425516,0.0649935309116,0.0658258112842,0.0662473558885,0.0658798554642,0.0660744145124,0.0656420610721,0.065588016892,0.065523163876,0.0659987526603,0.0659771349883,0.0656096345641,0.0661068410204,0.0659771349883,0.0657393405962,0.0653826490079,0.06545831086,0.0658041936122,0.0658041936122,0.0658258112842,0.0659447084803,0.0660311791683,0.0657285317601,0.065555590384,0.0661825028724,0.0664311061006,0.0665608121327,0.0666364739848,0.0667445623448,0.0665391944607,0.0666148563127,0.0660960321844,0.0660636056764,0.0661825028724,0.0662365470525,0.0660311791683,0.0656204434001,0.0658366201202,0.0650151485837,0.0650475750917,0.0652745606478,0.0651880899598,0.0654366931879,0.06551235504,0.0660203703323,0.0659014731363,0.0663986795926,0.0669175037209,0.0663554442486,0.0660960321844,0.0660311791683,0.0663014000685,0.0666256651487,0.0672201511291,0.0674579455213,0.0674039013413,0.0673390483252,0.0671120627691,0.0671661069491,0.0671769157851,0.066971547901,0.067068827425,0.0671552981131,0.0669283125569,0.0666256651487,0.0665932386407,0.066982356737,0.066982356737,0.0667769888528,0.067047209753,0.0668526507049,0.0666364739848,0.0671336804411,0.0665175767887,0.067003974409,0.0665608121327,0.0668202241969,0.067058018589,0.0672309599652,0.0667337535088,0.0661825028724,0.0660311791683,0.0651772811238,0.0649070602236,0.0656961052521,0.0658366201202,0.0651988987958,0.0658258112842,0.065447502024,0.0646800746674,0.0647989718635,0.0645936039794,0.0643882360952,0.0648205895355,0.0650800015997,0.0656636787441,0.065544781548,0.065533972712,0.0656744875801,0.0660311791683,0.0663122089045,0.0665824298047,0.0669175037209,0.0668958860489,0.0668742683769,0.0665824298047,0.0663878707566,0.0667661800168,0.066993165573,0.0672417688012,0.0666040474767,0.0669175037209,0.0666797093288,0.0668094153609,0.0662149293805,0.0667121358368,0.0672525776372,0.0674471366853,0.0681605198618,0.068419931926,0.0681497110258,0.068430740762,0.0691333151024,0.068560446794,0.0687550058422,0.0687982411862,0.0681821375338,0.0687550058422,0.0687441970062,0.0685928733021,0.0681605198618,0.0680091961577,0.0679119166336,0.0678254459456,0.0677281664215,0.0675011808653,0.0675984603894,0.0679119166336,0.067058018589,0.0673174306532,0.0675660338814,0.0678902989616,0.0682469905498,0.0679119166336,0.0676416957334,0.0678794901256,0.0679443431416,0.0676200780614,0.0677497840935,0.0675768427174,0.0682794170579,0.0683875054179,0.0678578724536,0.0681064756817,0.0677281664215,0.0678794901256,0.0681280933538,0.0682686082218,0.068430740762,0.068484784942,0.0685820644661,0.0692414034625,0.0696953745748,0.0693711094946,0.0692738299705,0.0698791247869,0.0705276549474,0.0705708902914,0.0708086846836,0.0712626557959,0.0715544943681,0.0711545674358,0.0705492726194,0.0708411111916,0.0711978027798,0.0711978027798,0.0713383176479,0.0709491995516,0.0707005963235,0.0705060372754,0.0706897874875,0.0707978758475,0.0713275088119,0.0716301562201,0.071532876696,0.0716193473841,0.0718571417763,0.0717922887602,0.0723759659046,0.0723543482326,0.072970451885,0.0727218486568,0.0722570687085,0.0721814068565,0.0719003771203,0.0719219947923,0.0716625827281,0.0713383176479,0.0713815529919,0.0715544943681,0.0713923618279,0.0707330228315,0.0702574340472,0.0707005963235,0.0708627288636,0.0709924348957,0.0707978758475,0.0712194204518,0.0720192743164,0.071489641352,0.07146802368,0.0711978027798,0.0712950823039,0.0713707441559,0.0716842004001,0.0717922887602,0.0720733184964,0.0721057450044,0.0718139064322,0.0716733915641,0.0715544943681,0.0718571417763,0.0718247152682,0.0716733915641,0.071403170664,0.0713166999759,0.0710789055837,0.0711437585998,0.0711978027798,0.0709383907156,0.0707978758475,0.0707546405035,0.0710032437317,0.0709491995516,0.0715544943681,0.071424788336,0.07146802368,0.0717922887602,0.0721597891845,0.071403170664,0.071403170664,0.0709275818796,0.0707762581755,0.0706573609795,0.0705816991274,0.0713815529919,0.0713275088119,0.071424788336,0.0710248614037,0.0711437585998,0.0711113320918,0.0710680967477,0.0706897874875,0.0709167730436,0.0709383907156,0.0709059642076,0.0709600083877,0.0706897874875,0.0702250075392,0.0700844926711,0.069943977803,0.0696089038867,0.0688090500222,0.0688847118743,0.0689171383823,0.0688955207103,0.068560446794,0.0684091230899,0.0683550789099,0.068528020286,0.0684091230899,0.0682577993858,0.0683550789099,0.0686901528261,0.0686469174821,0.068452358434,0.0686469174821,0.0688414765302,0.0688847118743,0.0689063295463,0.0692630211345,0.0687550058422,0.0689063295463,0.0693927271666,0.0698466982789,0.0697926540989,0.0698791247869,0.0700844926711,0.0704952284393,0.0702574340472,0.0702141987032,0.0703871400793,0.0703222870632,0.069965595475,0.0698791247869,0.0703979489153,0.0705816991274,0.0705384637834,0.0716625827281,0.0720841273324,0.0716409650561,0.0717706710882,0.0723435393966,0.0727867016729,0.0732514816212,0.0732622904572,0.073024496065,0.072959643049,0.0731109667531,0.0724840542647,0.0726569956408,0.072992069557,0.0728407458529,0.0731866286052,0.073002878393,0.072970451885,0.0724408189207,0.0723435393966,0.0724083924126,0.0701709633591,0.0679443431416,0.0661068410204,0.064074779851,0.0620967628617,0.0597296277761,0.0577732284588,0.0559357263376,0.0538712386602,0.052120207227,0.0503691757938,0.0485965266886,0.0464563771592,0.0444999778419,0.0427381375727,0.0403493848151,0.0379822497295,0.0364690126885)
m <- c(0.0377903887345,0.0398748543034,0.0415597073022,0.0429637514678,0.0453506265493,0.0470462798878,0.0487743342455,0.050956002872,0.0534184803317,0.0552545380868,0.0570581948226,0.0589698549558,0.0608059127108,0.0624583646903,0.0641972193877,0.0662924852964,0.0682257461091,0.0699970018257,0.0704506160946,0.0707746262866,0.0710554351198,0.0710014334211,0.0709474317224,0.0713254436132,0.071249841235,0.0708610290045,0.0706666228893,0.0697593943515,0.0695109865376,0.0691761760058,0.0695541878965,0.0698349967297,0.0693057800826,0.0698133960502,0.070310211678,0.0704398157548,0.0708286279853,0.0709258310429,0.0705478191522,0.0714010459913,0.0713038429337,0.0719194622986,0.0724054775867,0.0716062524463,0.0708394283251,0.0710662354595,0.0710122337608,0.0709258310429,0.0712282405555,0.0716494538052,0.0716926551642,0.0715846517668,0.0714334470105,0.0718114589013,0.0714658480297,0.0708394283251,0.0702346092999,0.0700294028449,0.0702670103191,0.0695973892555,0.0694677851787,0.0694461844992,0.0698241963899,0.0701806076012,0.0704614164343,0.0706990239085,0.070353413037,0.070353413037,0.0708394283251,0.0705370188125,0.0704722167741,0.0700834045436,0.0702994113383,0.070148206582,0.0710338344403,0.0704938174535,0.0699970018257,0.0699646008065,0.0699646008065,0.0702994113383,0.0709474317224,0.0709366313827,0.0713362439529,0.07145504769,0.0711526381774,0.0711094368184,0.0713038429337,0.0705910205111,0.0706558225496,0.0705694198317,0.0707746262866,0.07104463478,0.0711418378377,0.0715090493887,0.0712714419145,0.07145504769,0.0715306500681,0.0717034555039,0.0717682575423,0.0716926551642,0.0714766483695,0.0713578446324,0.0714010459913,0.0716710544847,0.0718654605999,0.071822259241,0.0717898582218,0.0719302626383,0.0714010459913,0.0714874487092,0.071249841235,0.0712714419145,0.0714010459913,0.0707530256072,0.0702454096396,0.0705694198317,0.070310211678,0.0703210120178,0.0701158055628,0.0700402031846,0.0704398157548,0.0703642133767,0.0705802201714,0.0708286279853,0.0708502286648,0.0705802201714,0.0702346092999,0.0703642133767,0.0706342218701,0.0699754011462,0.0698241963899,0.0705586194919,0.0709474317224,0.0712066398761,0.0708286279853,0.0708610290045,0.0710230341006,0.0711958395363,0.0715198497284,0.0712066398761,0.0708718293443,0.0708178276456,0.0706234215303,0.0705910205111,0.0708070273059,0.0706450222098,0.0712174402158,0.0712714419145,0.0710554351198,0.0717142558436,0.0725350816635,0.0723190748688,0.0722218718112,0.0721246687536,0.0722758735099,0.0724702796251,0.0720706670549,0.0722002711317,0.0720598667152,0.0723082745291,0.0724918803046,0.072718687439,0.0725350816635,0.0727078870993,0.0725026806443,0.0725026806443,0.0726754860801,0.0722002711317,0.0717466568628,0.0713902456516,0.0711202371582,0.0711094368184,0.0712066398761,0.0712390408953,0.0709474317224,0.0707854266264,0.0704290154151,0.0702454096396,0.0707422252674,0.0706558225496,0.0702346092999,0.0700942048833,0.0700294028449,0.069986201486,0.070148206582,0.0702454096396,0.0700402031846,0.0705262184727,0.0708610290045,0.0710014334211,0.0710662354595,0.0710554351198,0.0710770357992,0.07104463478,0.070882629684,0.0709690324019,0.0706882235688,0.0705478191522,0.0708178276456,0.0701914079409,0.0704506160946,0.0703858140562,0.0698997987681,0.0697485940118,0.0697485940118,0.0697701946912,0.0697701946912,0.069943000127,0.069780995031,0.069780995031,0.0697269933323,0.0703642133767,0.0705910205111,0.0708070273059,0.0708070273059,0.0710554351198,0.0710014334211,0.0711418378377,0.0707854266264,0.0709042303635,0.0709366313827,0.0705478191522,0.0701374062423,0.0695325872171,0.0689493688713,0.0686577596985,0.0683229491667,0.0678909355773,0.0678585345581,0.0676533281031,0.0675885260647,0.0676101267441,0.0677505311607,0.0675561250455,0.06737251927,0.0678585345581,0.0674373213084,0.0671889134945,0.0670485090779,0.0666812975269,0.0664004886938,0.0667244988858,0.0671889134945,0.0669297053408,0.0667136985461,0.0666812975269,0.0667785005845,0.0661952822388,0.0667244988858,0.0668973043216,0.0666056951487,0.0665192924309,0.0668541029627,0.0671457121355,0.0666704971872,0.0664760910719,0.0665732941295,0.066227683258,0.0659144734057,0.0658928727262,0.0659900757838,0.0661628812196,0.0662600842772,0.0666704971872,0.0671457121355,0.0666812975269,0.0672969168918,0.0669513060203,0.0667244988858,0.0668109016037,0.0668973043216,0.066756899905,0.0668541029627,0.0668973043216,0.0671133111163,0.067534524366,0.0677829321799,0.0675993264044,0.06737251927,0.0675561250455,0.0677721318402,0.0676857291223,0.0679449372759,0.0678477342183,0.0671349117958,0.0673833196097,0.0675021233468,0.0674373213084,0.0674589219879,0.0672321148534,0.0675453247057,0.0681393433912,0.0680097393144,0.0682905481475,0.0683229491667,0.0681393433912,0.0681609440707,0.0680529406733,0.0679881386349,0.0681177427117,0.0675453247057,0.067696529462,0.0672645158726,0.0675993264044,0.0678369338786,0.0681177427117,0.0680313399938,0.0677829321799,0.0675561250455,0.0677289304812,0.0677937325197,0.0678045328594,0.0678369338786,0.0676317274236,0.0675129236865,0.0679125362567,0.0675561250455,0.068106942372,0.0675777257249,0.0677181301415,0.0679125362567,0.0672969168918,0.0673401182508,0.0671457121355,0.0673401182508,0.0671133111163,0.0673185175713,0.0668541029627,0.067005307719,0.067005307719,0.067167312815,0.0678585345581,0.0675021233468,0.0675885260647,0.067739730821,0.0677073298018,0.0679881386349,0.0684417529038,0.0686577596985,0.0687765634356,0.0683013484872,0.0682257461091,0.0685281556217,0.0684525532435,0.069046571929,0.0696729916336,0.0699970018257,0.0702994113383,0.0701374062423,0.0698565974091,0.0703966143959,0.0702130086204,0.0705586194919,0.0699646008065,0.0702238089601,0.0705586194919,0.0703318123575,0.0705262184727,0.070310211678,0.070310211678,0.0703210120178,0.0705586194919,0.0704290154151,0.0701590069217,0.0698673977489,0.0699646008065,0.0703642133767,0.0698565974091,0.0700402031846,0.0701590069217,0.0701266059025,0.0696621912939,0.0698241963899,0.0697485940118,0.0694245838197,0.0692193773647,0.0698133960502,0.0695001861979,0.0694461844992,0.0701914079409,0.0700510035244,0.0694785855184,0.0697917953707,0.0697269933323,0.0698457970694,0.0702562099793,0.0696945923131,0.0691113739674,0.0693489814416,0.0696189899349,0.0692193773647,0.0689385685316,0.0694353841594,0.0698349967297,0.0701914079409,0.0702454096396,0.0701590069217,0.070310211678,0.070353413037,0.0707746262866,0.0710554351198,0.0704290154151,0.0700402031846,0.0700618038641,0.069943000127,0.0700618038641,0.0698025957105,0.0702778106588,0.0703966143959,0.0701698072615,0.0702130086204,0.0699754011462,0.0700726042038,0.0699538004667,0.0698457970694,0.0694569848389,0.0694569848389,0.0696945923131,0.0698133960502,0.0698133960502,0.0700618038641,0.0698673977489,0.0702778106588,0.070515418133,0.0702238089601,0.0696297902747,0.0696945923131,0.0697053926528,0.0693921828005,0.0692409780442,0.0687657630958,0.0688629661535,0.0688197647945,0.0686577596985,0.0682581471283,0.0680421403336,0.0680529406733,0.0683985515448,0.0682473467885,0.0684417529038,0.0690897732879,0.0685929576601,0.0687549627561,0.0682365464488,0.0680961420322,0.0680313399938,0.0679341369362,0.0684201522243,0.0680853416925,0.0682581471283,0.0686469593588,0.0686577596985,0.0685713569806,0.0681393433912,0.0677181301415,0.0675993264044,0.0674049202892,0.0672537155329,0.0664544903924,0.0669837070395,0.0668541029627,0.067534524366,0.0681177427117,0.0685821573203,0.0688197647945,0.0690789729482,0.0690789729482,0.0696837919734,0.0695217868773,0.0697701946912,0.0699970018257,0.0706018208509,0.0704398157548,0.0712606415747,0.0718654605999,0.071984264337,0.0720598667152,0.0722542728304,0.0726106840417,0.0729346942337,0.0724162779264,0.0725242813238,0.0726106840417,0.0725242813238,0.0730642983106,0.0731074996695,0.0731399006887,0.0728482915159,0.073334306804,0.0737987214126,0.0734099091821,0.0732695047655,0.073291105445,0.0736151156371,0.0744467417967,0.0741551326239,0.0746735489312,0.0746735489312,0.0749219567451,0.0749867587835,0.0752459669371,0.0753971716934,0.0758939873213,0.0757319822252,0.0763044002312,0.0761423951352,0.0763800026094,0.0759911903789,0.0760883934365,0.0755483764497,0.0752783679563,0.0754295727126,0.0758615863021,0.0764556049875,0.0763044002312,0.0767040128014,0.0773088318266,0.0776004409995,0.0781944596849,0.0784212668194,0.0783888658002,0.0786588742935,0.0783780654604,0.0789180824472,0.0785508708962,0.0788208793896,0.0793932973956,0.0793716967161,0.0793176950174,0.0798469116645,0.0798037103055,0.0793176950174,0.07962010453,0.0796093041903,0.0797713092863,0.0801277204976,0.0797173075876,0.0795661028313,0.0795121011327,0.0800737187989,0.080149321177,0.0804085293307,0.0805273330678,0.0812077544711,0.0814129609261,0.0818773755347,0.0818773755347,0.0820069796116,0.0815533653427,0.0811753534519,0.081337358548,0.0809917476764,0.0809377459777,0.0811537527724,0.0809701469969,0.0816937697592,0.081704570099,0.0821041826692,0.0829034078096,0.0826333993162,0.0826658003354,0.0832382183414,0.0835514281937,0.0839510407639,0.0835622285335,0.083335421399,0.0833246210593,0.0837674349884,0.0836270305719,0.0839402404242,0.0840590441613,0.083907839405,0.0843182523149,0.0842966516355,0.0845882608083,0.0840806448408,0.0843722540136,0.0848258682825,0.085171479154,0.0852470815322,0.0855926924037,0.0855494910448,0.0866187246786,0.0874071494793,0.0881847739402,0.0895348164072,0.0905716490218,0.0911224663483,0.0923429047384,0.0934661400709,0.094891784916,0.0957126107359,0.0970410525233,0.0982182895545,0.0991471187718,0.101199183322,0.102635628506,0.103154044814,0.103888467916,0.105983733824,0.107906194297,0.10941824186,0.110876287725,0.112334333589,0.113824780472,0.114829212068,0.115876845022,0.117496895982,0.119408556116,0.120769398922,0.122346248524,0.124355111714,0.125931961316,0.12697959427,0.127865222128,0.12901005814,0.130295298569,0.131364532203,0.132012552587,0.132347363119,0.132541769234,0.132368963798,0.132746975689,0.13351379981,0.133265391996,0.133308593355,0.133038584862,0.133060185541,0.133578601848,0.134086217816,0.134377826989,0.134010615438,0.133816209323,0.133708205925,0.133999815098,0.13311418724,0.13311418724,0.132800977388,0.132757776029,0.13312498758,0.133135787919,0.133675804906,0.133351794714,0.132228559382,0.131753344433,0.131634540696,0.131926149869,0.131688542395,0.130846115895,0.131332131184,0.131213327446,0.131278129485,0.130759713178,0.131170126087,0.131245728466,0.13187214817,0.132498567875,0.133265391996,0.133978214419,0.13434542597,0.134237422572,0.135738669796,0.136408290859,0.136548695276,0.136473092898,0.136505493917,0.136851104788,0.136915906827,0.138384753031,0.139583590741,0.140091206709,0.140771628112,0.142251274656,0.143201704553,0.143979329014,0.144270938187,0.144821755513,0.144627349398,0.145977391865,0.147597442825,0.148288664568,0.149357898202,0.148979886311,0.148969085972,0.150707940669,0.151442363771,0.152878808956,0.153861639872,0.154844470788,0.155179281319,0.155460090153,0.155622095249,0.156324117331,0.156356518351,0.157101741792,0.157069340773,0.157954968631,0.157728161497,0.15760935776,0.157944168292,0.157782163196,0.158062972029,0.157803763875,0.158656990714,0.158170975426,0.157792963535,0.157371750286,0.157004538735,0.155902904082,0.155632895588,0.154801269429,0.154488059576,0.154261252442,0.154531260935,0.154164049384,0.153256820847,0.152500797065,0.15146396445,0.151420763092,0.151388362072,0.150124722323,0.148807080876,0.147975454716,0.146495808172,0.145523777596,0.145167366385,0.144368141244,0.143882125956,0.143147702854,0.142434880432,0.140976834567,0.141236042721,0.141182041022,0.140318013843,0.139464787004,0.138579159146,0.138222747935,0.137531526192,0.137067111583,0.135231053828,0.135004246694,0.134161820194,0.134161820194,0.133611002868,0.13350299947,0.132131356324,0.132898180445,0.132044953606,0.131904549189,0.131450934921,0.130727312158,0.129874085319,0.129290866974,0.128999257801,0.128351237417,0.127260403103,0.127022795629,0.126741986796,0.126083166072,0.125661952822,0.125262340252,0.124808725983,0.124506316471,0.124214707298,0.123199475363,0.123339879779,0.122951067549,0.122303047165,0.121979036973,0.121244613871,0.120769398922,0.12087740232,0.120369786352,0.120067376839,0.120207781256,0.120726197563,0.119667764269,0.11924655102,0.118792936751,0.118436525539,0.117745303796,0.117756104136,0.116254856913,0.116686870502,0.115326027696,0.114537602895,0.113630374357,0.113986785568,0.113716777075,0.113003954652,0.112960753293,0.113619574017,0.113727577415,0.112960753293,0.112993154313,0.113068756691,0.113597973338,0.113252362466,0.113230761787,0.113025555332,0.113349565524,0.112971553633,0.111999523057,0.111837517961,0.111319101654,0.11145950607,0.11144870573,0.110930289423,0.111340702333,0.111038292821,0.110293069379,0.1094290422,0.108975427931,0.10860821638,0.107744189201,0.107549783086,0.106815359984,0.107009766099,0.107193371875,0.106502150132,0.106070136542,0.106253742318,0.106091737222,0.105648923293,0.105594921594,0.105692124651,0.104709293736,0.103445653986,0.102138812878,0.10207401084,0.1012747857,0.100507961578,0.0996223337201,0.0995899327009,0.0991147177526,0.0983478936313,0.0981858885353,0.0982290898943,0.098445096689,0.0977970763048,0.097095054222,0.0963390304405,0.09636063112,0.0961230236458,0.0949349862749,0.0941681621537,0.0936821468656,0.0942005631729,0.094848583557,0.0949133855955,0.0953021978259,0.0948377832173,0.0952481961273,0.0946973788007,0.0940601587564,0.0934553397312,0.0932609336159,0.0924941094947,0.0922241010013,0.0919000908093,0.0919216914887,0.0915652802775,0.0918568894503,0.0917812870722,0.0913492734827,0.091338473143,0.0914788775596,0.0915220789185,0.0914680772198,0.0913492734827,0.091705684694,0.0916732836748,0.0909172598933,0.090074833394,0.0903232412079,0.0903556422271,0.090809256496,0.0907768554768,0.090193637131,0.0895564170867,0.0897184221827,0.0895348164072,0.0895564170867,0.0887895929654,0.0876879583124,0.0873963491396,0.0869643355501,0.0866079243389,0.0859923049739,0.0856250934229,0.0854846890064,0.0857006958011,0.0855602913845,0.0853334842501,0.0850850764362,0.0844910577507,0.0838646380461,0.08370263295,0.0828710067904,0.0824929948996,0.081704570099,0.0812401554903,0.0808729439393,0.0806245361254,0.0801709218565,0.0791664902611,0.0779676525505,0.0772764308074,0.0769092192564,0.0766176100835,0.0761855964941,0.075375571014,0.0743063373801,0.0738959244702,0.0731939023874,0.0733883085026,0.0729562949132,0.0726430850609,0.0723730765675,0.0720706670549,0.0718114589013,0.071617052786,0.0714010459913,0.0717034555039,0.0716926551642,0.0713902456516,0.070720624588,0.0706558225496,0.0706990239085,0.0708286279853,0.0712174402158,0.0715846517668,0.0711202371582,0.0706882235688,0.0703858140562,0.0707098242482,0.0710770357992,0.0709906330814,0.0701698072615,0.0693597817813,0.0692517783839,0.0693597817813,0.0694353841594,0.0694245838197,0.0692193773647,0.0691329746469,0.0687009610574,0.0691545753263,0.0693165804224,0.0693489814416,0.0695865889157,0.0691761760058,0.0691221743071,0.0695541878965,0.0691329746469,0.0692409780442,0.0688197647945,0.0684093518846,0.0683229491667,0.0681285430515,0.0677289304812,0.0678261335389,0.0679341369362,0.0673941199494,0.0674373213084,0.0667460995653,0.0658388710275,0.0655472618547,0.0662168829183,0.0661736815593,0.0664220893732,0.0662492839375,0.0661088795209,0.0657524683096,0.0663356866554,0.0673401182508,0.0672213145137,0.0671133111163,0.0671133111163,0.067167312815,0.067167312815,0.0673617189302,0.067696529462,0.06737251927,0.0671781131547,0.0669945073792,0.0674265209686,0.0677721318402,0.0676857291223,0.0672213145137,0.0667460995653,0.0665300927706,0.0674157206289,0.067329317911,0.06737251927,0.0669945073792,0.067167312815,0.0669081046613,0.0669513060203,0.0671997138342,0.0670485090779,0.0676209270839,0.0675129236865,0.0674697223276,0.0670809100971,0.06737251927,0.0673617189302,0.0673833196097,0.0675453247057,0.0676101267441,0.0673617189302,0.0669081046613,0.0672213145137,0.0676641284428,0.0680421403336,0.0683553501859,0.0687441624164,0.0687441624164,0.068636159019,0.0685713569806,0.0687765634356,0.0687765634356,0.0686469593588,0.0685605566409,0.0687765634356,0.0688953671727,0.0696621912939,0.0697917953707,0.0692625787237,0.0696189899349,0.0696189899349,0.0698673977489,0.0702994113383,0.0699646008065,0.0698349967297,0.069737793672,0.0697161929926,0.0696189899349,0.0702778106588,0.070353413037,0.0703318123575,0.0706234215303,0.0707638259469,0.0706342218701,0.0705262184727,0.070677423229,0.0708502286648,0.0704290154151,0.0700942048833,0.069575788576,0.0694569848389,0.0691005736276,0.0689061675124,0.0682365464488,0.0683337495064,0.068679360378,0.0684525532435,0.0686577596985,0.0687657630958,0.0684957546025,0.0685713569806,0.0682473467885,0.0683553501859,0.0683445498462,0.0683445498462,0.0687225617369,0.0691761760058,0.0689493688713,0.0682905481475,0.0690573722687,0.0691653756661,0.0696189899349,0.0699321997873,0.0696729916336,0.0695865889157,0.0691329746469,0.0688953671727,0.0686253586793,0.0687441624164,0.0688521658137,0.0690897732879,0.0688953671727,0.0687441624164,0.0689817698906,0.0691221743071,0.0689601692111,0.0687873637753,0.0688953671727,0.068841365474,0.0693921828005,0.0693597817813,0.0691329746469,0.0693381811018,0.0692409780442,0.0690573722687,0.0689493688713,0.0687657630958,0.0688197647945,0.0683445498462,0.0686253586793,0.0687981641151,0.0683985515448,0.0678045328594,0.0684849542627,0.0682797478077,0.068106942372,0.0684957546025,0.0677505311607,0.0673401182508,0.0676425277634,0.0671565124753,0.0674589219879,0.0676317274236,0.0674157206289,0.06737251927,0.0672645158726,0.0672321148534,0.0673617189302,0.0670809100971,0.0675129236865,0.0671349117958,0.0673401182508,0.067534524366,0.067739730821,0.0672969168918,0.0672645158726,0.0666272958282,0.0662600842772,0.0661952822388,0.065860471707,0.0657416679699,0.0658928727262,0.0656768659315,0.0659252737454,0.0658388710275,0.0660332771428,0.0662168829183,0.065860471707,0.0658820723865,0.0654176577778,0.066227683258,0.0661952822388,0.0660980791812,0.0661520808799,0.0661304802004,0.0662924852964,0.06696210636,0.0673401182508,0.0676857291223,0.0679125362567,0.0680961420322,0.0682581471283,0.0684093518846,0.0680529406733,0.0682257461091,0.068474153923,0.0689277681919,0.0689817698906,0.0690789729482,0.0687657630958,0.0690681726084,0.0686037579998,0.0691437749866,0.0699105991078,0.0697701946912,0.070353413037,0.0706990239085,0.0708718293443,0.0713578446324,0.0713794453118,0.0716494538052,0.0713470442926,0.0715198497284,0.0713686449721,0.0712714419145,0.0709798327416,0.0710662354595,0.0712066398761,0.0713578446324,0.0713254436132,0.0713902456516,0.0714442473502,0.07145504769,0.0691977766853,0.0669729066998,0.0649316424897,0.0628363765811,0.0607303103326,0.0587430478213,0.0572093995789,0.0554705448815,0.0531268711589,0.0511396086475,0.0491631464759,0.0470894812467,0.0453506265493,0.0436981745698,0.0421537259876,0.0400584600789,0.0378011890742,0.0361379367549)
s <- c(0.0385378789137,0.0386424120391,0.0386191824557,0.0386017602681,0.0386772564143,0.0383926940173,0.0384391531841,0.0383113904752,0.038323005267,0.0383926940173,0.0380442502658,0.0377713026604,0.0379455245362,0.0378061470356,0.0378119544315,0.0377016139102,0.0376609621391,0.0378758357859,0.0378351840149,0.037951331932,0.0380849020368,0.0380965168285,0.037951331932,0.0377654952646,0.0378351840149,0.0379803689113,0.037626117764,0.037544814222,0.0379397171403,0.0381487833912,0.0382881608918,0.0380849020368,0.0381023242244,0.0381894351622,0.038282353496,0.0384565753717,0.0382881608918,0.0381081316202,0.0380790946409,0.0379745615155,0.0379571393279,0.0380732872451,0.0379861763072,0.0382939682877,0.038323005267,0.0382068573498,0.0385611084971,0.0390024705823,0.0388863226652,0.0388340561025,0.0387817895397,0.0388630930818,0.0389676262072,0.0387527525605,0.0388224413107,0.0387469451646,0.0388805152693,0.0389792409989,0.0391011963119,0.0390024705823,0.0390953889161,0.0389850483948,0.0389850483948,0.0390779667285,0.0388224413107,0.0385785306847,0.0383868866214,0.0382417017249,0.0382358943291,0.0382881608918,0.0383055830794,0.0381487833912,0.0380616724533,0.03787002839,0.0377713026604,0.0380384428699,0.0379919837031,0.0377654952646,0.0376899991184,0.0376551547433,0.0376319251599,0.0377190360977,0.0377713026604,0.0376609621391,0.0379222949528,0.0381023242244,0.0381778203705,0.0382126647457,0.0382068573498,0.0382184721415,0.0382010499539,0.0381139390161,0.0381603981829,0.0380094058906,0.0379339097445,0.0380790946409,0.0377422656812,0.0378816431818,0.0378467988066,0.037585465993,0.037504162451,0.037504162451,0.0375157772427,0.0563898137812,0.0574409524315,0.0583062544143,0.0592877043143,0.0605188722362,0.0619358768256,0.0630044376635,0.0642239907937,0.0653912773611,0.0664366086156,0.0673657919528,0.0681846347688,0.0688989444593,0.0698629721718,0.0707166593629,0.0715819613457,0.0724124189534,0.0730686546854,0.0727898996842,0.0724763003079,0.0721743157233,0.0716806870753,0.071367087699,0.0710941400937,0.0708966886345,0.0709489551972,0.07140773947,0.071123177073,0.0710128365517,0.0711870584274,0.0710302587392,0.0708153850925,0.0703507934238,0.0702869120694,0.0701126901937,0.070548244883,0.0707747333215,0.0707631185298,0.0708153850925,0.0709779921765,0.0707282741546,0.0703333712363,0.0708792664469,0.0709431478014,0.0707456963422,0.0707166593629,0.0711464066564,0.0716690722836,0.0715413095747,0.0715471169706,0.0716342279085,0.0714135468659,0.071326435928,0.0713554729073,0.07140773947,0.0718084497842,0.0720233234309,0.0725227594747,0.0729408919765,0.0731209212481,0.0733241801031,0.0731964173943,0.0730105807268,0.073573898125,0.0737190830215,0.0736784312505,0.0739223418765,0.0738933048972,0.0740965637523,0.074555348025,0.0743288595866,0.0740849489605,0.0740442971895,0.0741662525026,0.0743346669824,0.0740965637523,0.0742824004197,0.0744914666706,0.0737597347925,0.0737713495842,0.0737306978132,0.0739107270848,0.0737655421883,0.0737365052091,0.0738642679179,0.0742010968777,0.0744798518789,0.0746947255256,0.0746366515671,0.0745727702126,0.0747063403173,0.074595999796,0.0744508148996,0.0744159705244,0.0740094528144,0.0736958534381,0.0734577502079,0.0739281492724,0.0739223418765,0.0736726238546,0.0737248904173,0.0736958534381,0.0736377794795,0.0739513788558,0.0741197933357,0.0738061939594,0.0743462817742,0.0743753187534,0.0742824004197,0.0743869335452,0.0739978380227,0.0743404743783,0.0742359412528,0.0741430229191,0.0743056300031,0.0740210676061,0.0740501045854,0.0736668164588,0.0739804158351,0.0737713495842,0.0739513788558,0.0736319720836,0.0735506685416,0.0734809797913,0.0736726238546,0.0737945791676,0.0737306978132,0.0739049196889,0.0741372155233,0.0742940152114,0.074514696254,0.0748515252138,0.0751651245901,0.0752057763611,0.0752696577156,0.0751941615694,0.0750431692771,0.0749154065682,0.0752057763611,0.0757923233428,0.0759200860517,0.0761581892818,0.0755484127168,0.0752754651114,0.0756413310505,0.0757865159469,0.0759375082392,0.0756297162588,0.0756819828215,0.0757981307387,0.0756122940712,0.0758155529262,0.0758039381345,0.0760188117813,0.0758562046972,0.0760362339688,0.076030426573,0.0759317008434,0.0756703680298,0.0755309905292,0.0757807085511,0.0758852416765,0.0758620120931,0.0760594635523,0.076193033657,0.0759200860517,0.075949123031,0.0757284419884,0.0755077609458,0.0753916130286,0.0753683834452,0.0755948718836,0.0756355236546,0.0762162632404,0.0758968564682,0.0751070506315,0.0754206500079,0.075374190841,0.0757807085511,0.0760652709481,0.0758794342807,0.0753916130286,0.0758039381345,0.0760826931357,0.0757807085511,0.0756819828215,0.0763324111576,0.0763382185534,0.0762917593866,0.076436944283,0.0762569150114,0.076193033657,0.0761407670943,0.0763091815742,0.0766227809505,0.076436944283,0.0762162632404,0.0759200860517,0.0757516715718,0.0756819828215,0.07533353907,0.0753974204244,0.0754787239665,0.0755019535499,0.0755193757375,0.075292887299,0.0756006792795,0.0750780136523,0.0749560583392,0.0746947255256,0.0750199396937,0.0752580429239,0.0752870799031,0.0752464281321,0.0754729165706,0.0753509612576,0.0752870799031,0.0752464281321,0.0749095991724,0.0744275853162,0.0744043557327,0.0744392001079,0.0742475560446,0.0741836746901,0.0739804158351,0.0737829643759,0.0736726238546,0.0736203572919,0.0732370691653,0.0732544913528,0.0729234697889,0.0732022247901,0.0730976916647,0.0734054836452,0.0737771569801,0.0735100167706,0.0736784312505,0.0737771569801,0.0736726238546,0.0737539273966,0.0737945791676,0.074148830315,0.0739629936475,0.0741720598984,0.0749095991724,0.0747469920884,0.0745669628168,0.0745901924002,0.0745030814623,0.0745785776085,0.0742417486487,0.0742765930239,0.0739746084392,0.0743404743783,0.0742591708363,0.0747876438594,0.0750431692771,0.0752231985487,0.0753277316742,0.0752986946949,0.0755484127168,0.0760362339688,0.0761291523026,0.076152381886,0.0764311368872,0.0768086176179,0.0770351060564,0.0776913417884,0.0781268964777,0.0780455929357,0.0783301553327,0.0782953109576,0.0784985698126,0.0785740659588,0.0783011183534,0.078440495854,0.0785043772085,0.0783882292913,0.0786263325215,0.0790270428357,0.0787715174179,0.0787715174179,0.0791664203363,0.0794393679416,0.0791025389819,0.0790328502316,0.0789863910647,0.0796019750256,0.0803859734665,0.0804846991961,0.0812396606576,0.0813267715955,0.0819423555564,0.0821281922239,0.0821978809742,0.0829238054564,0.0829934942067,0.0830283385819,0.083266441812,0.0834697006671,0.0839284849399,0.0840155958777,0.0841607807742,0.0839981736902,0.0839342923357,0.0844627653588,0.0846834464014,0.0855197114049,0.0857055480724,0.0860133400529,0.0865185834925,0.0869541381819,0.0875813369345,0.0879355880819,0.0884292167298,0.0888763862109,0.0885279424594,0.088911230586,0.0889228453777,0.0892596743375,0.0896023106931,0.0900088284032,0.0908392860109,0.0911122336162,0.09103673747,0.0910425448659,0.0908509008026,0.0909670487198,0.0910135078866,0.0913329146588,0.0913096850754,0.090955433928,0.0910077004908,0.09161166966,0.0919426912239,0.0919078468488,0.0921691796624,0.0925292382056,0.0926918452896,0.0930635186245,0.0932783922712,0.0931912813334,0.0933538884174,0.0930112520618,0.0928079932067,0.0929706002908,0.0931448221665,0.0932493552919,0.0932319331044,0.0937255617523,0.0935281102931,0.0935164955014,0.0945095601931,0.0944224492553,0.0945211749849,0.0947883151943,0.0956478097813,0.0961414384292,0.0954271287387,0.0954329361346,0.0958336464488,0.0958859130115,0.0960949792624,0.0964434230139,0.0967454075985,0.0971403105168,0.0977210501026,0.0981914491671,0.0985689298979,0.0982030639588,0.0987896109405,0.0995968389647,0.0999510901121,0.100334378239,0.100584096261,0.100793162511,0.101280983764,0.102320507622,0.102831558458,0.103871082316,0.104997717113,0.105497153156,0.106292766389,0.107129031393,0.10765169702,0.108360199314,0.109521678486,0.11025921776,0.110781883387,0.112303421102,0.113244219231,0.113929491942,0.114318587465,0.115120008093,0.116757693725,0.117617188312,0.118424416336,0.119678813842,0.120596382387,0.121333921661,0.12213534229,0.122832229793,0.123987901568,0.124893855322,0.126206326786,0.127553642625,0.128296989295,0.128720929193,0.129185520861,0.129783682635,0.131072924515,0.131717545455,0.132431855146,0.132518966084,0.132385395979,0.132280862854,0.132617691813,0.133024209523,0.133268120149,0.133796593173,0.134162459112,0.134208918278,0.134661895155,0.135643345055,0.136212469849,0.136055670161,0.136444765684,0.136607372768,0.136822246415,0.136839668602,0.137054542249,0.137193919749,0.137176497562,0.137530748709,0.138070836524,0.138761916631,0.138518006005,0.138442509859,0.13841347288,0.138279902775,0.138523813401,0.138680613089,0.138802568402,0.139865321844,0.139377500592,0.139679485177,0.13977240351,0.140196343408,0.140608668514,0.141201022891,0.142008250916,0.142925819461,0.143309107588,0.143825965819,0.144191831758,0.144952600616,0.145382347909,0.145771443432,0.145573991973,0.145794673015,0.145916628328,0.14626507208,0.147333632918,0.148001483441,0.148680948757,0.149592709906,0.150591581994,0.151154899392,0.152217652834,0.152682244503,0.153262984089,0.15313522138,0.15449415201,0.155434950139,0.156143452434,0.157589494003,0.158071507859,0.158629017861,0.159453668073,0.160086674222,0.161794048604,0.16261289142,0.163001986942,0.163710489237,0.163977629447,0.164418991532,0.165249449139,0.165528204141,0.166335432165,0.166666453729,0.167078778835,0.167049741855,0.167473681753,0.168002154776,0.168077650922,0.168048613943,0.168007962172,0.169285589261,0.169378507595,0.169059100822,0.168699042279,0.168106687902,0.16745045217,0.167682748004,0.167038127064,0.167096201022,0.166712912896,0.166898749563,0.166288972998,0.165667581641,0.164999731118,0.164024088613,0.163687259654,0.163547882153,0.162729039337,0.161428182665,0.161021664955,0.159639504741,0.159157490884,0.158483832965,0.157908900775,0.157682412336,0.157020369209,0.156532547957,0.155429142744,0.154534803781,0.154238626593,0.153466242944,0.152810007212,0.151933090437,0.151584646686,0.150661270744,0.150446397097,0.148628682194,0.147856298545,0.147931794691,0.14803052042,0.147978253858,0.14738589948,0.145910820932,0.146003739266,0.144668038219,0.144215061342,0.143762084465,0.14332072238,0.142525109147,0.142182472791,0.142048902687,0.141404281747,0.140451868826,0.14044606143,0.140463483618,0.139789825698,0.140202150804,0.139993084553,0.139662062989,0.139441381947,0.138854834965,0.138570272568,0.138645768714,0.138605116943,0.138732879652,0.138494776422,0.13821602142,0.137710777981,0.137495904334,0.137031312665,0.136973238707,0.136973238707,0.137275223291,0.136438958288,0.13563753766,0.135294901304,0.134545747238,0.134208918278,0.134383140154,0.133355231087,0.13381401536,0.133088090878,0.132333129416,0.131496864413,0.131676893684,0.130991620973,0.129754645655,0.1295513868,0.129249402216,0.128941610235,0.128105345232,0.12751879825,0.126566385329,0.126072756681,0.125375869178,0.12467317428,0.123848524068,0.12277996323,0.121885624268,0.120776411659,0.11997499103,0.119121303839,0.118470875503,0.117791410188,0.117193248414,0.117350048103,0.117042256122,0.116066613618,0.114771564342,0.113981758505,0.113348752356,0.112030473497,0.111368430369,0.110654120678,0.110015307134,0.109841085258,0.10896997588,0.108191784835,0.107901415042,0.107448438165,0.106676054516,0.106536677015,0.106362455139,0.105224205551,0.10467831034,0.10348779419,0.10271541054,0.102186937517,0.101739768036,0.101095147096,0.10078154772,0.100165963759,0.0998059052156,0.0995794167772,0.0991554768795,0.0987838035446,0.0981217604168,0.0976687835399,0.0969312442659,0.0967686371819,0.0966582966606,0.0953632473843,0.0945211749849,0.0939636649825,0.0943469531091,0.0946024785269,0.0944456788387,0.094677974673,0.0944398714428,0.0944631010263,0.0942017682127,0.0937836357109,0.0931912813334,0.0931680517499,0.0929357559156,0.0928718745612,0.0926686157061,0.0924943938304,0.0925989269559,0.0927731488316,0.0923782459132,0.0920588391411,0.0924072828925,0.092552467789,0.0924479346635,0.0923956681008,0.0921866018499,0.0925466603931,0.0923201719547,0.0918788098695,0.091367759034,0.0917684693482,0.0921111057038,0.0923201719547,0.0924014754967,0.0922679053919,0.0916000548683,0.091936883828,0.0918033137233,0.0917162027854,0.0910193152825,0.0900901319452,0.0900088284032,0.0898694509026,0.0898694509026,0.0892596743375,0.0891202968369,0.0886847421476,0.088829927044,0.0886208607931,0.0882027282913,0.0880343138115,0.0878426697481,0.0873025819334,0.0869831751612,0.0868089532854,0.0863443616168,0.0858623477606,0.0854674448422,0.0852003046328,0.0848460534854,0.0846486020262,0.0840388254612,0.0832199826452,0.0829470350399,0.0828425019144,0.0827728131641,0.0822501475369,0.0816287561801,0.080856372531,0.0805950397174,0.0802524033617,0.0802930551327,0.0799039596103,0.079421945754,0.0793522570037,0.0791722277322,0.0793580643996,0.0789689688771,0.0782720813742,0.0781501260611,0.0784288810623,0.077912022831,0.0774300089747,0.0771977131404,0.0773022462659,0.0772674018907,0.0772848240783,0.0775345421002,0.0771454465777,0.0768376545972,0.0762917593866,0.0766460105339,0.0767331214718,0.0766924697008,0.0758736268848,0.0755890644878,0.0751767393818,0.0752580429239,0.0750025175061,0.0746656885463,0.0745030814623,0.0742591708363,0.0740442971895,0.0742882078156,0.0744798518789,0.074474044483,0.0741546377108,0.0739223418765,0.0737771569801,0.0742185190653,0.0741720598984,0.0745611554209,0.0742533634404,0.0741256007315,0.0745088888582,0.074392740941,0.0740326823978,0.0741778672943,0.0741430229191,0.0739513788558,0.0740907563564,0.0738468457304,0.0733474096866,0.073004773331,0.0735274389582,0.0734054836452,0.0733009505197,0.0733357948949,0.0732312617694,0.073086076873,0.0735042093747,0.0740617193771,0.074189482086,0.0742185190653,0.0743578965659,0.0746831107339,0.0747179551091,0.0746889181298,0.0751012432357,0.075089628444,0.0751418950067,0.07492702136,0.0753567686534,0.0756645606339,0.075455494383,0.0749444435475,0.0744159705244,0.0739513788558,0.0743637039617,0.0741662525026,0.0738236161469,0.0733648318741,0.0731615730191,0.0731557656233,0.0733357948949,0.0734867871872,0.0731848026025,0.0732370691653,0.0729525067682,0.0728537810386,0.0727724774966,0.0728653958304,0.0731615730191,0.0730338103102,0.0733183727073,0.0734345206244,0.0732602987487,0.0729931585392,0.0728944328096,0.0728886254138,0.0728595884345,0.0726911739546,0.0728595884345,0.0728712032262,0.0724414559327,0.0722207748901,0.0719884790558,0.072104626973,0.0722091600984,0.0719942864517,0.0721104343688,0.0724937224954,0.0729699289558,0.0728712032262,0.0724937224954,0.0727318257256,0.0731383434357,0.0736842386463,0.0742998226073,0.0740501045854,0.0743230521907,0.0741372155233,0.0739165344807,0.0739223418765,0.0745205036499,0.0743811261493,0.0742649782321,0.0744972740665,0.0743753187534,0.074067526773,0.0738352309386,0.0735797055209,0.0736087425002,0.0733474096866,0.0735855129168,0.0734693649996,0.0736319720836,0.0733357948949,0.0730338103102,0.0728305514552,0.0731151138523,0.0731557656233,0.0731499582274,0.0731615730191,0.0727608627049,0.072511144683,0.0726040630167,0.0723659597866,0.0723543449949,0.0724530707244,0.072307885828,0.0726795591629,0.0726853665588,0.0722033527025,0.0716864944712,0.0723136932238,0.0720523604102,0.0723543449949,0.0729699289558,0.0730570398937,0.0728131292676,0.072673751767,0.0723136932238,0.0721394713481,0.0721685083274,0.0724821077037,0.0725982556209,0.0722962710363,0.0724821077037,0.0725401816623,0.0724879150996,0.0722091600984,0.0721568935357,0.0724008041617,0.0723717671824,0.0726795591629,0.0727260183298,0.0726505221836,0.0725982556209,0.0724530707244,0.0726911739546,0.0727666701008,0.0727376331215,0.0728073218718,0.0726098704126,0.0726505221836,0.0727840922883,0.0722904636404,0.0719536346807,0.0723833819741,0.0723020784321,0.0720988195771,0.0720872047854,0.0718026423883,0.0711405992605,0.0713206285321,0.0711812510315,0.0712973989487,0.0715238873872,0.071448391241,0.0716981092629,0.0715761539499,0.0718258719718,0.0721743157233,0.0717213388463,0.0718142571801,0.0715761539499,0.0718316793676,0.0721104343688,0.0725401816623,0.072429841141,0.0723833819741,0.0720059012434,0.0716864944712,0.0716806870753,0.0715064651996,0.0713322433238,0.0714658134286,0.0713961246783,0.07140773947,0.0711986732191,0.071285784157,0.0715935761375,0.0714019320741,0.0713032063446,0.0711986732191,0.071529694783,0.0713961246783,0.071610998325,0.0713090137404,0.0715587317623,0.07140773947,0.0719071755138,0.0722381970777,0.0725169520789,0.0723717671824,0.0721743157233,0.0721801231191,0.0718026423883,0.0714658134286,0.0719826716599,0.0721917379108,0.0720930121812,0.0724588781203,0.072307885828,0.0717271462422,0.0719536346807,0.0715935761375,0.0717736054091,0.0724182263493,0.0724821077037,0.0731093064564,0.0732312617694,0.0733183727073,0.073655201667,0.0738584605221,0.0741546377108,0.0741372155233,0.0744101631286,0.0743172447949,0.0742533634404,0.0739397640641,0.0738816901055,0.0741604451067,0.0743637039617,0.0744798518789,0.0741720598984,0.0743695113576,0.0742475560446,0.0731034990605,0.0715877687416,0.0707573111339,0.0699210461304,0.0688931370635,0.0682078643522,0.067522591641,0.0664424160114,0.0653332034025,0.0646421232954,0.0632715778729,0.0622610909936,0.0613493298439,0.0601297767138,0.0596071110865,0.0584746688942,0.0571796196179,0.0560529848214,0.0365401347386,0.0364878681758,0.036441409009,0.0363891424462,0.0362671871332,0.0363194536959,0.0364878681758,0.036029083903,0.0361684614036,0.0363020315084,0.0364762533841,0.0366678974474,0.0364878681758,0.0363426832794,0.0364704459883,0.0365052903634,0.0363310684877,0.036400757238,0.0363078389042,0.036685319635,0.0367433935936,0.0364588311965,0.0365924013013,0.0363891424462,0.0364704459883,0.036604016093,0.0366795122391,0.036766623177,0.0367956601563,0.036847926719,0.0372021778664,0.0374460884924,0.0372718666167,0.0372196000539,0.037544814222,0.0378932579735,0.0379164875569,0.0380442502658,0.0382881608918,0.03844496058,0.0382300869332,0.0379048727652,0.0380616724533,0.0382533165167,0.0382533165167,0.0383288126628,0.0381197464119,0.0379861763072,0.0378816431818,0.0379803689113,0.0380384428699,0.038323005267,0.038485612351,0.0384333457883,0.0384798049551,0.038607567664,0.0385727232889,0.0388863226652,0.0388747078735,0.0392057294374,0.0390721593326,0.0388224413107,0.0387817895397,0.0386307972474,0.0386424120391,0.0385030345386,0.0383288126628,0.0383520422462,0.03844496058,0.0383578496421,0.0380035984948,0.037748073077,0.0379861763072,0.0380732872451,0.0381429759954,0.0380384428699,0.0382649313084,0.0386946786019,0.0384101162048,0.0383985014131,0.0382533165167,0.0383055830794,0.0383462348504,0.0385146493303,0.0385727232889,0.0387237155812,0.0387411377687,0.0385843380806,0.0385088419344,0.03844496058,0.038607567664,0.0385901454764,0.0385088419344,0.038363657038,0.0383171978711,0.0381894351622,0.0382242795374,0.0382533165167,0.0381139390161,0.0380384428699,0.0380152132865,0.0381487833912,0.0381197464119)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("18-organelles-nucleus-merged/FHY3-Dark-GSM761689.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=206"),bty="n")
dev.off()