# R script for Peak Model
#  -- generated by MACS
p <- c(0.0428453151561,0.0451105961745,0.0473554201097,0.0496438858224,0.0518982563964,0.0541662650259,0.056450639322,0.0587527430903,0.0610630296918,0.0633092174326,0.0655404033122,0.0678206861917,0.0701146071266,0.0723812519506,0.0746765366911,0.0769759128482,0.0792834718387,0.0815910308292,0.0816660401344,0.0816646763288,0.0817315028008,0.0817151371342,0.0818133311338,0.081806512106,0.0818406072448,0.081846062467,0.08191561655,0.0819074337167,0.0818856128279,0.081873338578,0.0818747023835,0.0819047061056,0.0818542453003,0.0818637919391,0.0818637919391,0.0819101613278,0.0818515176892,0.0818556091058,0.081861064328,0.0818378796337,0.0818433348559,0.0818351520226,0.0817969654672,0.0817533236896,0.0816810419954,0.0817410494396,0.0817819636061,0.0818133311338,0.0817887826339,0.0817669617451,0.0817669617451,0.0817110457175,0.0817192285508,0.0817424132452,0.0817383218285,0.0816933162454,0.0816469468567,0.0816510382733,0.0816101241069,0.0816414916345,0.0816524020789,0.0817260475786,0.0817274113841,0.0817628703284,0.0817778721895,0.0818256053837,0.081873338578,0.0818992508834,0.0819538031054,0.0819660773554,0.081970168772,0.0819197079667,0.0819906258553,0.0819933534664,0.0820206295774,0.0820506332995,0.0821133683548,0.0821556463268,0.0822265642154,0.0822770250208,0.0823452152983,0.0823002097151,0.0822920268818,0.0822620231597,0.0823111201595,0.0823356686594,0.0823124839651,0.0823506705205,0.0822729336041,0.0822183813821,0.0821583739379,0.0821692843823,0.082146099688,0.0821133683548,0.0820956388826,0.0820356314384,0.0820588161328,0.082009719133,0.0819933534664,0.081982443022,0.0819797154109,0.0819647135498,0.0819865344386,0.0819783516053,0.0819756239942,0.0819715325776,0.0819347098277,0.0819674411609,0.0819688049665,0.0819865344386,0.0820151743552,0.082024720994,0.0819892620497,0.0819810792164,0.0819469840777,0.0819060699112,0.0819087975223,0.0819469840777,0.0819892620497,0.0820383590495,0.0820233571885,0.0820410866606,0.0820765456049,0.0820942750771,0.0821351892436,0.0821351892436,0.0821870138545,0.0821529187157,0.0822020157155,0.0822183813821,0.0822211089932,0.0821815586323,0.0821951966878,0.0822374746598,0.0822211089932,0.0822647507708,0.0822933906874,0.0823356686594,0.0823043011318,0.0823056649373,0.0823329410483,0.0824393178812,0.0825634241862,0.0826261592415,0.0826752562413,0.082679347658,0.0826834390746,0.0826902581024,0.082776177852,0.0827816330742,0.0828320938796,0.0829002841571,0.0828757356572,0.082897556546,0.0828825546849,0.0828730080461,0.0828839184905,0.0828989203515,0.0829098307959,0.0829261964625,0.0829889315178,0.0829807486845,0.0829971143511,0.0830653046286,0.083076215073,0.0831403139339,0.0831212206562,0.083158043406,0.0831403139339,0.0831212206562,0.0831403139339,0.0831144016284,0.0830939445452,0.0830748512675,0.0830734874619,0.0830857617119,0.0830857617119,0.0829930229345,0.0828866461016,0.0828280024629,0.0827625397965,0.082748901741,0.0827557207688,0.0827625397965,0.082679347658,0.0826561629636,0.0826493439359,0.0825511499363,0.0825525137418,0.0825320566586,0.0824584111589,0.0824297712423,0.0823997675203,0.0823465791038,0.0822852078541,0.0822524765209,0.0821911052711,0.0821870138545,0.0821433720769,0.082161101549,0.0821433720769,0.0821420082713,0.0821938328822,0.0822197451877,0.0822470212987,0.0822224727988,0.0822811164374,0.0823206667984,0.0823261220206,0.0823111201595,0.0823452152983,0.0823043011318,0.0823152115762,0.0823220306039,0.0823574895482,0.0823452152983,0.0823656723815,0.0823602171593,0.0823179391873,0.0822947544929,0.0822483851042,0.0822852078541,0.0822715697986,0.0823493067149,0.0823970399092,0.0823943122981,0.0824134055757,0.0823888570759,0.0824106779647,0.0824584111589,0.0824938701032,0.0825388756863,0.0825538775474,0.0825511499363,0.0826152487971,0.0826166126027,0.0825647879918,0.0825797898528,0.0825893364917,0.0826220678249,0.0826684372136,0.0826752562413,0.0826507077414,0.0826479801303,0.0826561629636,0.082652071547,0.0826411611026,0.0827161704078,0.082679347658,0.082706623769,0.0827079875745,0.0827270808522,0.082706623769,0.0827107151856,0.0827829968798,0.0827666312132,0.0828225472407,0.0828293662685,0.0828048177686,0.0827952711297,0.082776177852,0.082815728213,0.0829193774348,0.0829657468235,0.08300666099,0.083076215073,0.0831103102118,0.0830789426841,0.0831444053505,0.0832194146557,0.083282149711,0.0833176086553,0.0833898903495,0.0833776160995,0.0834294407104,0.0834485339881,0.0834471701826,0.0835167242656,0.0835712764876,0.0836735619039,0.0837076570426,0.0837949405978,0.083773119709,0.0838031234311,0.0838658584864,0.0839422315972,0.0840267875413,0.0840867949855,0.0842313583738,0.0842940934291,0.0843254609567,0.0844195635397,0.0844782071783,0.0845232127615,0.0845573079002,0.0846650485387,0.0847441492606,0.0847332388162,0.0847045988996,0.0847646063438,0.0847768805938,0.0847877910382,0.0847577873161,0.0848218861769,0.0847905186492,0.0848068843158,0.084727783594,0.0847509682883,0.0847591511216,0.0848287052046,0.0847714253716,0.0847905186492,0.0847946100659,0.0848096119269,0.0847632425383,0.0846718675664,0.0847141455385,0.0847045988996,0.0847646063438,0.0847727891771,0.0847809720104,0.0847305112051,0.0846923246497,0.0846868694275,0.0846009496778,0.0845982220667,0.0845600355113,0.0845068470949,0.0845273041781,0.0845436698447,0.0845995858723,0.0845491250669,0.0845041194838,0.0845313955948,0.0846023134834,0.0846173153444,0.0846214067611,0.0845777649835,0.0846445914554,0.0846745951775,0.084673231372,0.0846418638443,0.084673231372,0.0846759589831,0.0846800503997,0.0846841418164,0.0847141455385,0.0847100541218,0.0846991436774,0.084700507483,0.0847618787327,0.0847768805938,0.0847264197884,0.0847305112051,0.0847373302328,0.0847127817329,0.0847127817329,0.084770061566,0.0847877910382,0.08486689176,0.0848900764544,0.0848996230932,0.0849309906209,0.0849473562875,0.0849200801765,0.0848955316766,0.0848464346768,0.0848655279545,0.084851889899,0.0848832574266,0.08486689176,0.0848218861769,0.0848300690102,0.0848750745933,0.0849078059265,0.0848996230932,0.084948720093,0.0850332760371,0.0850346398427,0.0850414588704,0.085085100648,0.0850960110924,0.0851110129535,0.08513965287,0.0852092069531,0.085206479342,0.0852119345642,0.085248757314,0.0852664867862,0.0852583039529,0.0853101285638,0.0853060371471,0.0853414960914,0.0853551341469,0.0853783188413,0.0853114923693,0.0853046733416,0.0853414960914,0.0853483151192,0.085370136008,0.0853865016746,0.0854096863689,0.0854642385909,0.0854915147019,0.0855351564795,0.0855719792294,0.0855637963961,0.0856047105625,0.0855883448959,0.0855842534793,0.0855828896737,0.0855597049794,0.0855815258682,0.0855201546185,0.0855624325905,0.0855378840906,0.0855474307295,0.0854928785075,0.085494242313,0.0855269736462,0.0854860594797,0.0855297012573,0.0855378840906,0.085533792674,0.0855351564795,0.0855815258682,0.0856019829514,0.0856251676458,0.0856292590624,0.0856278952569,0.0856251676458,0.0856142572014,0.0856128933958,0.0855815258682,0.0856251676458,0.085657898979,0.0856347142846,0.0856401695068,0.0856333504791,0.0855747068405,0.085548794535,0.0854601471743,0.0854846956742,0.0854383262855,0.0854315072577,0.0854260520355,0.0853837740635,0.0853865016746,0.0853564979525,0.0854260520355,0.0853810464524,0.0853919568968,0.0853469513136,0.0853946845079,0.0854274158411,0.0853905930912,0.0854028673412,0.0853646807858,0.0853387684803,0.0853074009527,0.085288307675,0.0852460297029,0.0852160259808,0.0852323916474,0.085206479342,0.0851751118143,0.0851505633144,0.0851832946476,0.0852010241198,0.0852132983697,0.0851614737588,0.0851642013699,0.0851805670365,0.0852392106752,0.0852623953695,0.0853224028137,0.0853510427303,0.0853946845079,0.085385137869,0.0854355986744,0.0854683300076,0.0854901508964,0.085561068785,0.0856169848125,0.0856510799512,0.0856619903956,0.0857342720898,0.0857615482008,0.0858133728117,0.0858570145893,0.0858570145893,0.0858952011447,0.0859142944224,0.0859265686723,0.0859647552277,0.0860574940051,0.0861352309215,0.0861802365046,0.0861897831435,0.0861938745601,0.0862675200598,0.0863848073371,0.0864475423924,0.0864843651422,0.0865498278086,0.0865798315307,0.0865975610029,0.0866780255303,0.0867039378358,0.0866602960582,0.0866357475583,0.0866248371139,0.0866643874748,0.086682116947,0.0867271225301,0.0867721281133,0.0867925851965,0.0867925851965,0.086791221391,0.0867830385577,0.0868321355575,0.086833499363,0.0868362269741,0.0868307717519,0.0868648668907,0.0868416821963,0.0868389545852,0.0868894153906,0.0868785049462,0.0869248743349,0.0869630608903,0.0869562418625,0.0869126000849,0.0869412400015,0.086982154168,0.0870107940845,0.0870298873622,0.086997156029,0.0869957922235,0.086969879918,0.0869576056681,0.0869671523069,0.0869712437236,0.0868635030851,0.0869453314181,0.0869344209737,0.0869957922235,0.0870407978066,0.0870435254177,0.0870994414453,0.0871403556118,0.0871649041117,0.087203090667,0.0872521876668,0.0872590066946,0.0872658257223,0.0872399134169,0.087242641028,0.0872603705001,0.0873435626387,0.0873626559164,0.0873844768052,0.0874649413326,0.0874499394716,0.0874322099994,0.0874226633606,0.0874499394716,0.0874226633606,0.0874322099994,0.0874240271661,0.0873585644997,0.087406297694,0.0873926596385,0.0873285607776,0.0872903742222,0.0872521876668,0.0872276391669,0.0872371858058,0.0872644619168,0.0873040122777,0.0872549152779,0.0872821913889,0.0872235477503,0.087203090667,0.0871499022506,0.087078984362,0.0870053388623,0.0869016896405,0.0868212251131,0.086791221391,0.0867475796134,0.0867012102247,0.0866630236693,0.0865975610029,0.0865839229474,0.0865211878921,0.0864284491147,0.0863738968927,0.0863370741429,0.0862675200598,0.0862893409486,0.0862716114765,0.086191146949,0.0861870555324,0.0861693260602,0.0861475051714,0.0861297756993,0.0859947589498,0.0859470257556,0.0859565723944,0.085972938061,0.0859920313387,0.0859688466444,0.0859743018666,0.0859102030057,0.0858979287558,0.0858351937005,0.0857765500618,0.0857301806731,0.0856565351734,0.0856960855344,0.085700176951,0.0857260892565,0.0857588205897,0.0858106452006,0.0858079175895,0.0857765500618,0.0857983709506,0.0857710948396,0.0857738224507,0.0857574567841,0.085727453062,0.0857901881173,0.0858461041449,0.0858161004228,0.0858379213116,0.0858229194505,0.0857833690896,0.0857479101453,0.0857424549231,0.085782005284,0.0857997347562,0.0857915519229,0.0858201918394,0.0857860967007,0.0858051899784,0.0857765500618,0.0858188280339,0.0858229194505,0.0858420127282,0.0858706526448,0.0858556507837,0.085863833617,0.0858651974226,0.0859415705334,0.0859497533667,0.0859320238945,0.0859211134501,0.0858270108672,0.0857970071451,0.085782005284,0.0857206340343,0.0857029045621,0.0856374418957,0.0856060743681,0.0856224400347,0.0855897087015,0.0855569773683,0.0855133355907,0.0854219606189,0.0853605893691,0.0853101285638,0.0852596677584,0.085248757314,0.0852433020918,0.0852078431475,0.0851437442867,0.085070098787,0.0850673711759,0.0850414588704,0.0850073637317,0.0849146249543,0.0848778022044,0.0848027928992,0.0847605149272,0.0846145877333,0.0846214067611,0.084564126928,0.0845545802891,0.084524576567,0.0844659329284,0.0844250187619,0.0844100169008,0.0844454758451,0.0845409422336,0.0845232127615,0.0844659329284,0.0844863900116,0.0845191213448,0.0845450336503,0.084564126928,0.0845600355113,0.0845709459557,0.0845859478168,0.0844945728449,0.0844509310673,0.0844713881506,0.0844386568174,0.0844359292063,0.0844195635397,0.0844031978731,0.0843909236231,0.0843895598176,0.0843786493732,0.0843200057345,0.0842940934291,0.084318641929,0.0843445542344,0.0843390990122,0.0843691027343,0.0844086530953,0.084442748234,0.0843895598176,0.0844045616786,0.0843718303454,0.084373194151,0.0843622837066,0.0843759217621,0.0843581922899,0.0843036400679,0.0842654535125,0.0843159143179,0.0843159143179,0.0842818191791,0.0842545430681,0.0841945356239,0.0841618042907,0.0841318005686,0.0840908864021,0.0840786121522,0.0840786121522,0.0841249815409,0.0840990692354,0.0840799759577,0.0840963416243,0.0841372557908,0.0841358919853,0.0841536214574,0.0842013546517,0.084224539346,0.0842872744013,0.0842736363458,0.0843350075956,0.0843240971512,0.0843854684009,0.0843500094566,0.0843841045954,0.0844468396507,0.0844468396507,0.0844904814283,0.0845163937337,0.0845450336503,0.0845695821502,0.0846118601222,0.0846323172055,0.0846514104832,0.0846473190665,0.0846254981777,0.084633681011,0.0846391362332,0.0846309533999,0.0847264197884,0.0847373302328,0.0847359664273,0.0847086903163,0.0847182369551,0.084742785455,0.0847400578439,0.0847468768717,0.0848150671491,0.0847659701494,0.084742785455,0.0847877910382,0.0847768805938,0.0847536958994,0.0847332388162,0.0846964160663,0.0847441492606,0.0846486828721,0.0846432276499,0.0845709459557,0.0845845840112,0.0844932090394,0.0844468396507,0.0844413844285,0.084388196012,0.0843663751232,0.0843445542344,0.0843268247623,0.0842190841238,0.0841508938463,0.0840758845411,0.0839845095693,0.0839354125695,0.0839081364585,0.0838808603475,0.0838863155697,0.0838153976811,0.0838181252922,0.0837526626258,0.0837594816535,0.0836871999594,0.0836844723483,0.0836462857929,0.0836299201263,0.0835794593209,0.0835835507376,0.083554910821,0.0835139966545,0.0835344537378,0.0834689910714,0.0834512615992,0.0834130750438,0.0833980731828,0.083445806377,0.0834253492938,0.0833885265439,0.0833748884884,0.083376252294,0.0833530675996,0.0833612504329,0.0833176086553,0.0832862411277,0.0832344165168,0.0831812281004,0.0832507821834,0.0832807859055,0.0832889687388,0.0833271552942,0.0832971515721,0.08326714785,0.0832685116555,0.0832221422668,0.0832357803223,0.0832085042113,0.0832289612946,0.0831730452671,0.0831825919059,0.0831648624338,0.0831184930451,0.083103491184,0.0830857617119,0.0830953083507,0.0830993997674,0.0830434837398,0.0830475751565,0.0830503027676,0.0830775788786,0.0831007635729,0.0830639408231,0.0830039333789,0.0830257542677,0.0830380285176,0.0830530303787,0.0830230266566,0.0829766572679,0.0829562001846,0.0829234688514,0.0829616554068,0.0829957505456,0.0830257542677,0.0829780210734,0.0829562001846,0.0829316516847,0.0829384707125,0.0829330154903,0.0829425621291,0.0829562001846,0.082967110629,0.0829562001846,0.0829712020457,0.0829725658512,0.0830721236564,0.0830748512675,0.0830721236564,0.0831348587117,0.0831948661559,0.0832139594335,0.083239871739,0.0832303251001,0.0832562374056,0.0831880471281,0.0832071404058,0.0831689538504,0.0832235060724,0.0832507821834,0.0832494183778,0.0832385079334,0.0832535097945,0.0832235060724,0.0832685116555,0.0832630564333,0.0832603288222,0.0833503399885,0.0832726030722,0.0832889687388,0.0832630564333,0.0832698754611,0.0832862411277,0.0832739668777,0.0832616926278,0.0832576012111,0.0831989575725,0.0831403139339,0.0831498605727,0.0831512243783,0.083115765434,0.0831007635729,0.0830571217953,0.0830543941842,0.0830775788786,0.0830680322397,0.0830243904621,0.0829780210734,0.0829411983236,0.082912558407,0.0828921013238,0.0829275602681,0.0828961927404,0.082885282296,0.0828075453797,0.0827379912966,0.0827502655466,0.0827748140465,0.0827666312132,0.0827052599634,0.0826316144637,0.0826834390746,0.0826316144637,0.0825347842697,0.0825934279083,0.0825866088806,0.082585245075,0.0825838812695,0.0825347842697,0.0825606965751,0.0825443309085,0.0825388756863,0.0826179764082,0.082652071547,0.0826438887137,0.0825866088806,0.0825893364917,0.0826207040193,0.082597519325,0.0825879726861,0.0825907002972,0.0826084297694,0.0825416032974,0.0825320566586,0.0825375118808,0.0825347842697,0.0825552413529,0.0825361480752,0.0825361480752,0.0825634241862,0.0825947917139,0.0826343420748,0.0825907002972,0.0825361480752,0.0825920641028,0.0826411611026,0.082694349519,0.0826766200469,0.0826888942968,0.0827625397965,0.0827148066023,0.0826179764082,0.0826057021583,0.0826179764082,0.0826698010191,0.0826834390746,0.0827161704078,0.0827625397965,0.082748901741,0.0827666312132,0.0827120789912,0.0827434465188,0.0827598121854,0.0827202618245,0.0826875304913,0.0827202618245,0.0827298084633,0.0826711648247,0.0827352636855,0.0827911797131,0.0827911797131,0.0827802692687,0.0827816330742,0.0827352636855,0.0827625397965,0.0827625397965,0.0827734502409,0.0827911797131,0.0828457319351,0.082870280435,0.0828716442405,0.082885282296,0.0828934651293,0.0829139222126,0.0829261964625,0.0829493811569,0.0829834762956,0.0830639408231,0.0831525881838,0.0831866833226,0.083130767295,0.0831116740173,0.0830462113509,0.0830380285176,0.08300666099,0.0829657468235,0.0830257542677,0.083033937101,0.0830448475454,0.0830666684342,0.0831498605727,0.0831294034895,0.0830734874619,0.083130767295,0.0830953083507,0.0830680322397,0.083021662851,0.0830121162122,0.0830571217953,0.0830462113509,0.0830503027676,0.0830530303787,0.08300666099,0.0830080247955,0.0829357431014,0.0829207412403,0.0828280024629,0.0827598121854,0.0827202618245,0.0827134427967,0.082748901741,0.0826547991581,0.0826479801303,0.0826275230471,0.0825511499363,0.0824802320477,0.0825443309085,0.0825606965751,0.082570243214,0.0825484223252,0.0825811536584,0.0825947917139,0.082639797297,0.0826329782693,0.0826288868526,0.0826288868526,0.0826902581024,0.0827120789912,0.0827693588243,0.0827598121854,0.0827789054631,0.0828511871573,0.0829357431014,0.083048938962,0.0830380285176,0.0830803064897,0.0831007635729,0.0831362225172,0.0831744090726,0.0832262336835,0.083321700072,0.0832930601554,0.0833203362664,0.0833571590163,0.0833380657386,0.0833503399885,0.0833503399885,0.0834335321271,0.0834594444325,0.0834267130993,0.0834389873493,0.0834908119602,0.083430804516,0.0833830713217,0.0834076198216,0.083445806377,0.0834485339881,0.0834594444325,0.0833803437106,0.0833953455717,0.083363978044,0.0833667056551,0.0832030489892,0.0832289612946,0.0831785004893,0.0831921385448,0.0831689538504,0.0830925807396,0.0830298456843,0.0829780210734,0.08300666099,0.0830707598508,0.0830707598508,0.08300666099,0.0830175714344,0.0829589277957,0.0829425621291,0.0829971143511,0.0830707598508,0.0830871255174,0.0831171292395,0.0830912169341,0.0830898531285,0.0830993997674,0.0830680322397,0.0831171292395,0.0830789426841,0.0830571217953,0.0830830341008,0.0831634986282,0.0831907747392,0.0831894109337,0.0831689538504,0.0831730452671,0.083212595628,0.0831785004893,0.0831798642948,0.0831894109337,0.0832466907667,0.083239871739,0.0831962299614,0.083143041545,0.0831471329616,0.0831621348227,0.083185319517,0.0831375863228,0.0830993997674,0.0830148438233,0.0830052971844,0.08299438674,0.082979384879,0.0829712020457,0.082912558407,0.0828566423795,0.0827707226298,0.0827843606853,0.0828089091852,0.0828089091852,0.0827175342134,0.0826452525192,0.0826657096025,0.0826479801303,0.0826493439359,0.082624795436,0.082639797297,0.0825988831305,0.0825484223252,0.0825716070195,0.0826152487971,0.0826166126027,0.0825497861307,0.082557968964,0.082530692853,0.0825279652419,0.0824993253254,0.0824665939922,0.082570243214,0.0826261592415,0.0826288868526,0.0825784260473,0.0825756984362,0.0825688794084,0.0825497861307,0.0825729708251,0.0824965977143,0.0825320566586,0.0825402394919,0.0802354081125,0.0779660356775,0.0756952994369,0.0734204717796,0.0711060937614,0.0687835329099,0.0664800653361,0.0642475156509,0.0619808708269,0.0596719480309,0.0573807547071,0.0551100184665,0.0528351908092,0.0505071747355,0.0482091623839,0.0459356985322,0.0435844977641,0.0412510264682)
m <- c(0.043216421268,0.0455073530582,0.0478324167285,0.0500796597123,0.0523951664561,0.0546820024207,0.0569579161837,0.0592925367804,0.0615780074699,0.0638744003609,0.0661680627015,0.0684412459141,0.0706939499987,0.0729698637616,0.0752457775246,0.0775421704157,0.0798467549579,0.0820666924376,0.0821049201433,0.0820571355112,0.0820544049608,0.0820448480344,0.082089902116,0.0821103812441,0.0820939979417,0.082143147849,0.0821731839034,0.0821472436746,0.0821322256473,0.0821472436746,0.0821349561977,0.0821527047754,0.0821608964266,0.0821649922522,0.0822196032603,0.0821963935819,0.0822400823884,0.0821977588571,0.0821813755546,0.082244178214,0.0822032199579,0.0821868366554,0.0821977588571,0.0821527047754,0.0821745491786,0.0821322256473,0.0821622617018,0.0821513395002,0.0821663575274,0.0822168727099,0.0822318907371,0.082177279729,0.0821690880778,0.0822469087644,0.0822305254619,0.0822796753692,0.0822824059196,0.0822987892221,0.0823097114237,0.0823124419741,0.0823015197725,0.0823015197725,0.0822824059196,0.08228513647,0.0823069808733,0.0822933281213,0.0823097114237,0.0823069808733,0.0822496393148,0.0821486089498,0.082089902116,0.0820612313368,0.0820735188136,0.0821049201433,0.0821103812441,0.0820885368408,0.0820530396856,0.0820748840888,0.082062596612,0.0820475785848,0.0820079856039,0.0820939979417,0.0820530396856,0.082055770236,0.08208307574,0.0821062854185,0.0821158423449,0.0821376867481,0.082143147849,0.0821527047754,0.0821608964266,0.0820939979417,0.0821322256473,0.0821390520233,0.0821308603721,0.0821417825738,0.0822086810587,0.0822100463339,0.0822769448188,0.0823138072493,0.0822919628461,0.082271483718,0.0822742142684,0.0822796753692,0.0823028850477,0.0823984543119,0.0823766099086,0.082386166835,0.0823602266062,0.0824298556415,0.0824134723391,0.0824243945407,0.0824639875216,0.0824790055488,0.0824981194017,0.0824653527968,0.0825145027041,0.0824749097232,0.0824571611456,0.0824844666496,0.0824858319248,0.0824230292655,0.0823834362846,0.0823875321102,0.0824011848623,0.0823875321102,0.082352034955,0.0824202987151,0.0823615918814,0.0823479391294,0.0823206336253,0.0823247294509,0.0822223338107,0.0821827408298,0.0821158423449,0.082089902116,0.0820776146392,0.0820967284921,0.0821281298217,0.0821882019306,0.0821868366554,0.0821308603721,0.0821131117945,0.0821608964266,0.082177279729,0.0820844410152,0.0820844410152,0.0820530396856,0.0820366563831,0.0820311952823,0.0820666924376,0.0821021895929,0.0820503091352,0.0820585007864,0.0820803451896,0.0820817104648,0.0820885368408,0.0820980937673,0.082143147849,0.082184106105,0.082170453353,0.0821827408298,0.0823110766989,0.0822987892221,0.0823766099086,0.0823697835326,0.0823411127534,0.0822755795436,0.0823643224318,0.0824025501375,0.082459891696,0.0824844666496,0.0825117721537,0.0825035805025,0.0824708138976,0.0824202987151,0.0824831013744,0.0825595567858,0.0825991497667,0.0825663831618,0.0825786706386,0.0826360121972,0.0826264552707,0.082648299674,0.0827370425622,0.0827247550853,0.0827479647638,0.082749330039,0.0827711744422,0.0827848271943,0.0827984799463,0.0827957493959,0.0828285160007,0.0828298812759,0.0828312465511,0.0828066715975,0.0828012104967,0.0827916535703,0.0827438689382,0.0827657133414,0.0827097370581,0.0827165634341,0.0827165634341,0.0827384078374,0.0827001801317,0.0825964192163,0.0825595567858,0.0824953888513,0.0824721791728,0.0824585264208,0.0824557958704,0.0824544305952,0.0824189334399,0.082386166835,0.0824121070639,0.0823902626607,0.082386166835,0.0823247294509,0.0823206336253,0.0823465738542,0.0822701184428,0.0822605615164,0.0822359865627,0.0822264296363,0.0822605615164,0.0822168727099,0.0822182379851,0.0821991241323,0.0821267645465,0.0821076506937,0.0820653271624,0.08208307574,0.0820776146392,0.082062596612,0.0820175425303,0.0820148119799,0.0820230036311,0.0820038897783,0.0820707882632,0.0820530396856,0.0820339258327,0.08208307574,0.0820871715656,0.0821718186282,0.0821895672058,0.0822482740396,0.0822496393148,0.0823342863773,0.0823179030749,0.0823015197725,0.0823056155981,0.0822974239469,0.0823042503229,0.0823015197725,0.0823069808733,0.0822905975709,0.0822701184428,0.0822742142684,0.0822523698652,0.0822810406444,0.0822824059196,0.0823097114237,0.0823097114237,0.0823383822029,0.0823493044046,0.0823670529822,0.0823752446334,0.0823219989005,0.082352034955,0.0823779751838,0.0823875321102,0.0823929932111,0.0823848015598,0.0824202987151,0.0824189334399,0.082446238944,0.0825486345842,0.0826196288947,0.0826196288947,0.0825704789874,0.0825964192163,0.082554095685,0.082567748437,0.0824940235761,0.0825295207313,0.0826018803171,0.0826100719683,0.0826305510963,0.0825800359138,0.0826305510963,0.082648299674,0.0826646829764,0.0827370425622,0.0828230548999,0.0828462645784,0.0828844922841,0.0828803964584,0.0829595824202,0.082971869897,0.0830141934283,0.0830906488397,0.0831097626925,0.0832039666815,0.0833159192481,0.0833637038802,0.0833882788339,0.0834319676404,0.0834456203924,0.0835015966757,0.083550746583,0.0835739562614,0.0835739562614,0.0835657646102,0.083530267455,0.0836108186919,0.0836872741033,0.083752807313,0.0838156099723,0.0838934306589,0.0839357541902,0.0839971915743,0.0839958262991,0.0840149401519,0.0841132399665,0.084150102397,0.0841828690019,0.084163755149,0.0841978870291,0.0842388452852,0.0841910606531,0.0842129050563,0.0842224619828,0.0841992523043,0.0841350843698,0.0841077788657,0.0841419107458,0.0841023177649,0.0841391801954,0.0840941261137,0.0841187010673,0.084055898408,0.0840436109312,0.0840449762064,0.0840381498304,0.0840477067568,0.0840272276288,0.0840258623536,0.0840108443263,0.0839862693727,0.0839849040975,0.0839384847406,0.0838784126317,0.0838729515308,0.0838442807516,0.0837773822667,0.0837623642394,0.0837173101577,0.0837159448825,0.0837473462122,0.0836927352041,0.0836995615801,0.0837050226809,0.083739154561,0.0836954657545,0.0836749866264,0.0836422200216,0.0836135492423,0.083557572959,0.0835971659399,0.0836121839671,0.083672256076,0.0836353936456,0.0836736213512,0.0836231061687,0.0836476811224,0.0835998964903,0.0836053575911,0.0835766868118,0.0835821479127,0.0835848784631,0.0835848784631,0.0836108186919,0.0835998964903,0.0836558727736,0.0836981963049,0.0837282323594,0.0837569031386,0.0838210710731,0.0838238016235,0.0839002570349,0.0839070834109,0.0839248319886,0.0839657902446,0.0840204012527,0.0840067485007,0.0840709164352,0.0840995872145,0.0841009524897,0.0840722817104,0.0841391801954,0.0841309885442,0.084163755149,0.0842047134051,0.0842347494596,0.0842497674868,0.0843030132197,0.0842825340917,0.0843193965221,0.0843576242278,0.0844504629416,0.0844354449144,0.0844450018408,0.0844832295465,0.0845501280314,0.0845665113338,0.0845706071595,0.0846156612411,0.0846088348651,0.0846470625708,0.0846142959659,0.0846006432139,0.0845951821131,0.0845514933066,0.0845665113338,0.0845214572522,0.0844818642713,0.0845255530778,0.0845487627562,0.0845296489034,0.0844804989961,0.0844804989961,0.084460019868,0.0844545587672,0.0844286185384,0.0844996128489,0.0844886906473,0.0845323794538,0.0845856251867,0.0845938168379,0.0846142959659,0.084621122342,0.0846033737643,0.0846661764236,0.0846593500476,0.0846525236716,0.0846770986253,0.084735805459,0.0847713026143,0.0847576498622,0.0847262485326,0.0847590151374,0.0847399012846,0.0847044041293,0.0847699373391,0.0847808595407,0.0848081650447,0.0848177219712,0.0848395663744,0.0849201176114,0.0848600455024,0.0848190872464,0.0848122608703,0.084830009448,0.0848013386687,0.084830009448,0.0848914468321,0.0848655066032,0.0848873510065,0.084917387061,0.0849897466467,0.0849760938947,0.0849870160963,0.0849760938947,0.0849679022435,0.0849037343089,0.0849337703634,0.0849556147666,0.0849201176114,0.0848914468321,0.0849091954097,0.0849064648593,0.0847917817423,0.0847590151374,0.0847453623854,0.0847699373391,0.0847876859167,0.0847439971102,0.0847753984399,0.0847330749086,0.0846784639005,0.084662080598,0.084621122342,0.084634775094,0.084627948718,0.0845828946363,0.0846579847724,0.0846443320204,0.0846770986253,0.0846566194972,0.0846579847724,0.0846470625708,0.0846238528924,0.0846443320204,0.0846634458732,0.08464160147,0.0846948472029,0.0846716375245,0.0846675416988,0.0846456972956,0.0846293139932,0.0846716375245,0.0846866555517,0.0847003083037,0.0847317096334,0.0847071346797,0.0846839250013,0.0846456972956,0.0847003083037,0.084722152707,0.084763110963,0.0847508234862,0.0847303443582,0.0847590151374,0.0847317096334,0.0847931470175,0.0848477580256,0.0848996384833,0.0849569800418,0.0849651716931,0.0849760938947,0.0850156868756,0.085025243802,0.0851617713222,0.0851986337527,0.0852395920088,0.0852764544393,0.085341987649,0.0853692931531,0.0854047903083,0.0853802153547,0.0854061555835,0.085321508521,0.0853733889787,0.0854006944827,0.085429365262,0.0854389221884,0.0854989942973,0.0854908026461,0.0854621318669,0.085456670766,0.0855071859485,0.0854880720957,0.0854580360412,0.0854129819596,0.0854416527388,0.0853965986571,0.0854512096652,0.0855276650766,0.085557701131,0.0856437134688,0.0856286954416,0.0855645275071,0.0855385872782,0.0855727191583,0.0855809108095,0.0855781802591,0.0855317609022,0.0855645275071,0.0855658927823,0.0855262998014,0.085557701131,0.0855931982863,0.0855481442046,0.0855467789294,0.085557701131,0.0855563358558,0.0856068510383,0.0857228994306,0.0857160730546,0.0857215341554,0.0857474743842,0.0857433785586,0.0857228994306,0.0857761451635,0.0858252950708,0.0858416783732,0.0858580616757,0.0859358823622,0.0860669487817,0.0861843624491,0.0861406736426,0.0860956195609,0.0861147334138,0.0861611527707,0.0861802666235,0.0861993804763,0.0862021110267,0.0862717400621,0.086345464923,0.0863714051519,0.0863946148303,0.0864929146449,0.0865775617075,0.0866103283124,0.0866321727156,0.0867400294566,0.0867454905574,0.0867687002359,0.0868041973912,0.0868751917017,0.0868779222521,0.086917515233,0.0868943055545,0.0868560778489,0.0869366290858,0.0869639345899,0.0869775873419,0.0870513122029,0.0870827135325,0.0870854440829,0.0871086537614,0.0872151452272,0.0872192410528,0.0871482467423,0.0871523425679,0.0871223065134,0.0871769175215,0.0872451812817,0.0872479118321,0.0872601993089,0.0872479118321,0.087227432704,0.0873448463715,0.0873571338483,0.0873584991235,0.0873871699027,0.0874131101316,0.0874240323332,0.0874076490308,0.08740218793,0.0874445114613,0.0874185712324,0.0874513378373,0.0874909308181,0.0874608947637,0.087422667058,0.0874772780661,0.0875114099462,0.087537350175,0.0874786433413,0.0874499725621,0.0874472420117,0.0874636253141,0.0874759127909,0.0874581642133,0.0874663558645,0.0874677211397,0.0873735171507,0.0873858046275,0.0874595294885,0.0874895655429,0.0874991224694,0.0875155057718,0.0875469071015,0.0875004877446,0.0874513378373,0.0874527031125,0.0874335892596,0.0873475769219,0.0873325588946,0.0872875048129,0.0872151452272,0.0872301632544,0.087140055091,0.0871345939902,0.0870731566061,0.0870431205516,0.0869789526171,0.0869680304155,0.0869257068842,0.0869666651403,0.0869052277562,0.0868574431241,0.0867932751895,0.0867646044103,0.0867741613367,0.0867454905574,0.0867236461542,0.0866622087701,0.0865584478547,0.0865379687266,0.0864819924433,0.0864505911136,0.0864383036368,0.0863591176751,0.0862990455661,0.0861488652938,0.0860614876809,0.0859672836919,0.0859686489671,0.0859850322695,0.0859768406183,0.0859700142423,0.0859222296102,0.0859372476374,0.0858826366293,0.0858894630053,0.0858758102533,0.0857993548419,0.0857624924115,0.0857106119538,0.0857133425042,0.0856764800737,0.0856560009456,0.0855768149839,0.0855276650766,0.0854826109949,0.0855208387006,0.0855331261774,0.0855153775998,0.0854757846189,0.0854908026461,0.08544984439,0.0854252694364,0.0854143472348,0.0854389221884,0.0854075208587,0.0854553054908,0.085429365262,0.085429365262,0.0855017248477,0.0855344914526,0.0855727191583,0.0856013899375,0.0856286954416,0.0855727191583,0.0855699886079,0.0855699886079,0.0855099164989,0.0855836413599,0.0855604316815,0.0855522400302,0.0855181081502,0.085537222003,0.0855208387006,0.0855754497087,0.085631425992,0.0856164079648,0.0856082163135,0.085624599616,0.0856095815888,0.0856000246623,0.0856164079648,0.0855822760847,0.0855071859485,0.0854621318669,0.0854539402156,0.0853802153547,0.0854389221884,0.0853993292075,0.0854198083356,0.085422538886,0.0854594013164,0.0853651973275,0.0853706584283,0.0853337959978,0.0852737238889,0.0852314003576,0.0852081906791,0.0851563102214,0.0851631365974,0.0851904421015,0.0852013643031,0.0851508491206,0.0851508491206,0.0851112561397,0.0850443576548,0.0850279743524,0.085038896554,0.0850361660036,0.0850238785268,0.0849993035731,0.0849187523362,0.0849460578402,0.0849228481618,0.0849214828866,0.084924213437,0.0849392314642,0.0848586802272,0.084836835824,0.0848586802272,0.0849474231154,0.0849460578402,0.0849965730227,0.0849528842162,0.0849392314642,0.0849324050882,0.0849351356386,0.0848955426577,0.0848736982545,0.084857314952,0.0848545844016,0.0848559496768,0.0848764288049,0.0849132912353,0.0850307049028,0.0850143216003,0.0849679022435,0.0849324050882,0.0849897466467,0.0850293396276,0.0850361660036,0.0851057950389,0.0851549449462,0.0851180825158,0.0850907770117,0.0851221783414,0.0851767893495,0.0852150170552,0.0851795198999,0.0851699629735,0.0851112561397,0.0851317352678,0.0850976033877,0.0851385616438,0.0851221783414,0.0851016992133,0.0849924771971,0.0850006688483,0.0849610758674,0.0848914468321,0.0849255787122,0.0849214828866,0.0848941773825,0.0849050995841,0.0848723329793,0.0848518538512,0.0848614107776,0.0848204525216,0.0847617456878,0.0847658415134,0.0846948472029,0.0846798291757,0.0846825597261,0.0846634458732,0.0845992779387,0.084547397481,0.0844859600969,0.0844272532632,0.0843794686311,0.0843712769799,0.0843480673014,0.0843221270726,0.0842347494596,0.0842265578084,0.0841842342771,0.0841623898738,0.0842129050563,0.084150102397,0.0841337190946,0.0840763775361,0.0840504373072,0.0840340540048,0.0840545331328,0.0840231318031,0.083968520795,0.0839767124463,0.0839562333182,0.0838360891004,0.0838429154764,0.08383335855,0.0838661251548,0.0838115141467,0.0837446156618,0.0837255018089,0.0836913699289,0.0836708908008,0.0836039923159,0.0835753215366,0.0835589382342,0.0835452854822,0.0834688300708,0.0834606384196,0.0834538120436,0.0834415245668,0.0833527816786,0.0833213803489,0.0833500511282,0.0833200150737,0.0833336678258,0.0833049970465,0.0832899790193,0.0832449249376,0.0831875833791,0.0832217152591,0.0832394638368,0.0832558471392,0.0832585776896,0.0832189847087,0.083247655488,0.0832626735152,0.0832981706705,0.0833541469538,0.083341859477,0.0833841830083,0.0833445900274,0.0833445900274,0.0833200150737,0.0833650691554,0.0834456203924,0.083530267455,0.083571225711,0.0835329980054,0.0835698604358,0.0835684951606,0.0835739562614,0.0835616687846,0.0836121839671,0.0835821479127,0.0835589382342,0.083571225711,0.0836504116728,0.0836504116728,0.0836026270407,0.0836463158472,0.0836080881415,0.0835821479127,0.0835930701143,0.0836244714439,0.0836080881415,0.0835971659399,0.0835657646102,0.0835466507574,0.0835835131879,0.0836176450679,0.0836149145175,0.0836067228663,0.0836640644248,0.0836408547464,0.0836299325448,0.083644950572,0.0836845435529,0.0836504116728,0.0836626991496,0.0836162797927,0.0835534771334,0.0834906744741,0.0834551773188,0.0834606384196,0.0834988661253,0.0834975008501,0.0835056925013,0.0834606384196,0.083477021722,0.0835138841525,0.083571225711,0.0835603035094,0.0835398243814,0.0835384591062,0.0835166147029,0.0834306023652,0.0834319676404,0.0834387940164,0.0834019315859,0.0833923746595,0.0834183148883,0.0833814524579,0.0833309372754,0.0833049970465,0.0832435596624,0.0832312721856,0.083173930627,0.0831548167742,0.0830537864092,0.0830182892539,0.0830060017771,0.0829636782458,0.0828694742568,0.08285718678,0.0828763006328,0.0828735700824,0.0828476298536,0.0828408034776,0.0828872228345,0.0828940492105,0.0828558215048,0.082877665908,0.0828339771015,0.082843534028,0.0828134979735,0.0827984799463,0.0828257854503,0.0828257854503,0.0827943841207,0.0827943841207,0.0828530909544,0.0828844922841,0.0828899533849,0.082944564393,0.0829814268234,0.0830319420059,0.0830087323275,0.0830305767307,0.0831124932429,0.0831561820494,0.0831725653518,0.0832135236079,0.0832585776896,0.0832271763599,0.0833077275969,0.0833241108993,0.0833650691554,0.0833732608066,0.0833828177331,0.0834278718147,0.0834333329156,0.0834524467684,0.0834906744741,0.0834756564468,0.0834483509428,0.0834551773188,0.0834278718147,0.0833650691554,0.0833718955314,0.0833910093843,0.0833951052099,0.0833855482835,0.0833118234225,0.0832858831937,0.0833077275969,0.0832763262672,0.083254481864,0.0832312721856,0.0832217152591,0.0831479903982,0.0831384334718,0.0831124932429,0.0831179543437,0.0830906488397,0.0830633433356,0.0830346725564,0.0830182892539,0.0829896184747,0.0829486602186,0.0829909837499,0.0829008755865,0.082870839532,0.0828203243495,0.0828271507255,0.0828817617336,0.0828312465511,0.0827520605894,0.082742503663,0.0827575216902,0.0827479647638,0.0827329467365,0.0826715093524,0.0826988148565,0.0826442038484,0.0826182636195,0.0826046108675,0.0825418082082,0.0825308860065,0.0824557958704,0.0825063110529,0.0825199638049,0.0824585264208,0.0823916279359,0.0823670529822,0.0823165377997,0.0822701184428,0.0822564656908,0.0821813755546,0.0820912673913,0.0821062854185,0.0820871715656,0.0821158423449,0.0821008243177,0.0820434827592,0.0820530396856,0.0820025245031,0.0820161772551,0.0819956981271,0.082042117484,0.08208307574,0.082055770236,0.0820366563831,0.0821117465193,0.0821021895929,0.0820530396856,0.0820107161543,0.081968392623,0.0819670273478,0.0818919372116,0.0819956981271,0.0820462133096,0.0820380216583,0.0821144770697,0.0821376867481,0.0822400823884,0.0821731839034,0.0821308603721,0.0822346212875,0.0822865017452,0.0823315558269,0.0824243945407,0.0824680833472,0.0825104068785,0.082547269309,0.0826250899955,0.0826510302244,0.0826428385732,0.0826605871508,0.0827684438918,0.0828339771015,0.0828585520552,0.0828408034776,0.0828517256792,0.0828763006328,0.0827984799463,0.0828162285239,0.0828216896247,0.0828394382024,0.082769809167,0.0827288509109,0.0827534258646,0.0827984799463,0.0828094021479,0.0827657133414,0.0828421687528,0.0827984799463,0.0827520605894,0.0827452342134,0.0827124676085,0.0826878926549,0.0826319163715,0.0826892579301,0.0827151981589,0.082675605178,0.0827247550853,0.0827261203605,0.0827138328837,0.0827015454069,0.0827179287093,0.0827520605894,0.082762982791,0.0827820966438,0.0828025757719,0.082836707652,0.0827657133414,0.0828216896247,0.0827930188455,0.082843534028,0.0828981450361,0.0829281810905,0.082971869897,0.0829486602186,0.0829636782458,0.0829664087962,0.0830060017771,0.0830619780604,0.0830565169596,0.0831043015917,0.083173930627,0.0832763262672,0.0833009012209,0.083355512229,0.0834005663107,0.0834265065395,0.0834469856676,0.0834742911716,0.083543920207,0.083537093831,0.0835289021798,0.0835739562614,0.0835316327302,0.0835493813078,0.0835097883269,0.0835248063541,0.0834934050245,0.08346336897,0.0834715606212,0.083456542594,0.0811424011253,0.0787722833734,0.0764608724551,0.0740852936023,0.0717875354361,0.0694815856186,0.0671387733707,0.0648123444252,0.0625050293325,0.0601881573135,0.0578767463952,0.0555776229537,0.0532825953379,0.0509780107957,0.0486816179046,0.0463469973079,0.0440151072616,0.0416777561145)
s <- c(0.0427020073079,0.0426977506575,0.0427381888363,0.0427296755355,0.0427552154378,0.0427566343213,0.0427651476221,0.0427708231559,0.0427722420394,0.0427665665056,0.0427665665056,0.0427566343213,0.0427580532048,0.0427694042725,0.0427623098552,0.0427708231559,0.0427694042725,0.0427396077197,0.0426871090315,0.0426566030371,0.0426417047607,0.0426480897363,0.0426644068961,0.042667244663,0.0426558935953,0.0426374481103,0.042648799178,0.0426424142024,0.0426346103433,0.0426140365331,0.0426587313622,0.0426374481103,0.0426388669937,0.0426530558284,0.0426651163378,0.04267008243,0.0426814334977,0.0426842712646,0.0426892373567,0.0426934940071,0.0426587313622,0.0426785957308,0.0426821429394,0.042677886289,0.0426835618229,0.0427183244678,0.0427190339095,0.0427537965544,0.0427729514811,0.0427616004134,0.0427509587874,0.0650401991323,0.0662214196166,0.0674012212174,0.0686413253654,0.0698026814812,0.0709874491741,0.0721622846827,0.0733960038552,0.0745892848489,0.0757634109158,0.0769446314001,0.0781386218355,0.0793418350135,0.0805039005709,0.0817234309087,0.0828989758591,0.0840901285276,0.0853046927733,0.0853444215103,0.0853110777489,0.0853252665835,0.085318881608,0.08537705583,0.085366414204,0.0853657047623,0.0854040146158,0.0854096901497,0.085398339082,0.0853727991796,0.0853685425292,0.085316043841,0.0853110777489,0.0852500657599,0.0852415524591,0.0852351674835,0.0852692206867,0.0852550318521,0.0852883756135,0.0852905039387,0.0852493563182,0.0852429713426,0.0852635451528,0.0852521940851,0.0851812499119,0.0851436495001,0.0851585477765,0.0851713177276,0.0851847971206,0.0851904726544,0.0851975670717,0.0851706082859,0.0851457778253,0.0851613855434,0.0851741554946,0.085175574378,0.085157128893,0.0851564194513,0.0851798310284,0.0851514533591,0.0851741554946,0.0852465185513,0.0852784434292,0.0853195910497,0.0853344893261,0.0853273949087,0.0853181721662,0.0853891163395,0.0854224601009,0.0854806343229,0.0854997892497,0.0855161064095,0.085485600415,0.0855054647836,0.0854806343229,0.0855274574773,0.0855827939324,0.0856360020623,0.0856409681544,0.0856842441001,0.0857402899969,0.0857707959914,0.085758735482,0.0858005925442,0.0857785998505,0.0858162002623,0.0858296796552,0.0858289702135,0.0858559289993,0.0858225852379,0.0857927886851,0.0857785998505,0.0857849848261,0.0857736337584,0.0857438372056,0.0857317766961,0.0856955951678,0.0856828252166,0.085668636382,0.0856310359702,0.085628907645,0.0856274887615,0.0856310359702,0.0856225226694,0.0855643484473,0.0855437746371,0.0855083025505,0.0854770871143,0.0854870192985,0.0854863098568,0.0854948231576,0.0854912759489,0.0854792154395,0.0854742493473,0.0854586416292,0.0854387772607,0.0853855691308,0.0853848596891,0.0854182034505,0.0854004674072,0.0854210412174,0.0854004674072,0.0854047240576,0.0854409055859,0.085427426193,0.0854494188867,0.0854394867024,0.0854288450765,0.0854011768489,0.0854047240576,0.0854224601009,0.0854210412174,0.0853926635481,0.0853763463883,0.0853969201985,0.0853926635481,0.0854054334993,0.0854550944206,0.0854678643717,0.0854416150276,0.0854678643717,0.0854841815316,0.0855835033741,0.0856572853143,0.0857204256284,0.0857466749725,0.0857927886851,0.0857864037095,0.0857814376174,0.0858282607717,0.0858268418883,0.085856638441,0.0858906916442,0.0858807594599,0.0858835972269,0.0858651517418,0.0858623139749,0.085856638441,0.0858793405765,0.0858857255521,0.0859084276875,0.0859410620072,0.0859517036332,0.0859658924678,0.0860105872969,0.0860205194812,0.086026195015,0.0860318705489,0.0860645048686,0.0860602482182,0.0860531538009,0.0860588293347,0.0860637954269,0.0860524443591,0.0860567010095,0.0861091996977,0.0861524756434,0.0861524756434,0.0860786937032,0.086036836641,0.0859843379528,0.085957379167,0.0859119748961,0.0859339675898,0.0859751152103,0.085936095915,0.0859346770316,0.0859048804788,0.0858800500182,0.0858899822024,0.0858878538773,0.0858871444355,0.0859169409883,0.0859133937796,0.0859055899206,0.0858715367174,0.0858956577363,0.0858701178339,0.0858899822024,0.085907008804,0.0859261637308,0.0859658924678,0.0860233572481,0.0860751464946,0.0861013958387,0.0861382868087,0.0861326112749,0.0861922043804,0.086238318093,0.0862532163694,0.0862454125103,0.0862588919032,0.0862191631662,0.0862666957623,0.086309971708,0.0863624703961,0.0863887197402,0.086439799545,0.0864589544717,0.086468886656,0.0864561167048,0.0864419278702,0.0865121626017,0.0865242231111,0.0865816878914,0.0865965861678,0.0866129033276,0.0866441187639,0.0866065183521,0.0866292204875,0.0866590170402,0.0866654020158,0.0866554698316,0.086649084856,0.0866654020158,0.086678171967,0.0866980363355,0.0866476659725,0.0866682397828,0.0866405715552,0.0866512131812,0.0866760436418,0.0866760436418,0.0866682397828,0.0866561792733,0.086659726482,0.0866497942977,0.0866313488127,0.0866696586662,0.0866263827206,0.086609356119,0.0866072277938,0.0866022617017,0.0865568574308,0.0865511818969,0.0865653707316,0.0865561479891,0.0866015522599,0.0865767217993,0.0865674990568,0.0865653707316,0.0865731745906,0.0865710462654,0.0866143222111,0.0866214166284,0.086627801604,0.0866348960213,0.0866732058749,0.0866646925741,0.0867299612135,0.086749825582,0.0868023242702,0.0867945204111,0.0868448907741,0.0868136753379,0.0868434718906,0.0868385057985,0.0868406341237,0.0868782345355,0.0869066122048,0.0869732997276,0.0869853602371,0.087059851619,0.087070493245,0.0871017086812,0.0871492412773,0.0872223137757,0.0872677180465,0.0873386622198,0.0874174102521,0.0874592673143,0.0874968677261,0.0875741968749,0.0875976084521,0.0876543637906,0.0876869981103,0.0877437534489,0.087770002793,0.087799089904,0.0877799349773,0.087828177015,0.0878558452426,0.0878771284946,0.0878693246355,0.0879303366245,0.0879033778387,0.0879310460662,0.0879097628143,0.0879700653615,0.0879665181528,0.0880076657733,0.0879977335891,0.0880424284182,0.0880530700442,0.0880630022284,0.0880622927867,0.088011212982,0.0880530700442,0.0880310773505,0.0880551983694,0.0880566172528,0.0880381717678,0.0880197262828,0.0879764503371,0.0879530387599,0.0879310460662,0.0879416876922,0.0879118911395,0.0878586830095,0.0878693246355,0.0878671963103,0.0878934456544,0.0878537169174,0.0878671963103,0.0878757096111,0.0879353027166,0.0879707748032,0.0879771597788,0.0879650992694,0.0880034091229,0.0880097940985,0.0880417189765,0.088021854608,0.0880346245591,0.0880488133938,0.0880814477135,0.0881020215237,0.0881105348245,0.0880920893395,0.0881034404072,0.0880942176647,0.0881076970576,0.0881495541198,0.0881289803095,0.0881452974694,0.0881538107702,0.0881523918867,0.0881942489489,0.0881928300654,0.088180769556,0.0882183699678,0.0882396532198,0.0882297210355,0.0882609364717,0.0883013746505,0.0882737064229,0.0882722875395,0.0882623553552,0.0883098879513,0.0882956991166,0.0883176918103,0.0883035029757,0.0882758347481,0.0882467476371,0.0882857669324,0.0883141446017,0.0882914424662,0.0883020840922,0.0883552922221,0.0883545827804,0.0882985368836,0.0883042124174,0.0883027935339,0.0883233673442,0.0883474883631,0.088360967756,0.0883758660324,0.0883567111056,0.0883474883631,0.0883481978048,0.0883226579025,0.0883567111056,0.0883510355717,0.0883460694796,0.0883921831922,0.0883971492843,0.088379413241,0.0883652244064,0.0883850887749,0.0883829604497,0.088382251008,0.0884014059347,0.0884233986284,0.08844042523,0.0884822822922,0.0884929239182,0.0885099505198,0.0884943428017,0.0885071127528,0.0885205921458,0.0885262676796,0.0885326526552,0.0885369093056,0.0885354904221,0.0884915050347,0.0884936333599,0.088509241078,0.0885255582379,0.0885184638206,0.0885127882867,0.0885191732623,0.0885127882867,0.0885213015875,0.0885574831158,0.0885837324599,0.0886114006875,0.0886653182591,0.0886802165355,0.0886979525788,0.0887206547143,0.0887249113647,0.0887944366544,0.0888079160473,0.0888284898576,0.0888313276245,0.0888880829631,0.0889192983993,0.0889256833749,0.0889157511906,0.0889256833749,0.088851191993,0.0888646713859,0.088832746508,0.0888604147355,0.0888412598088,0.0888689280363,0.088861833619,0.0888249426489,0.0888235237654,0.0888341653914,0.0888604147355,0.0888213954402,0.0888036593969,0.0887951460962,0.0887965649796,0.0888419692505,0.0888625430607,0.0888845357544,0.088909366215,0.0888880829631,0.0888384220418,0.0888150104647,0.0888107538143,0.0887994027465,0.0888064971639,0.0887688967521,0.0887696061938,0.0887575456843,0.0887539984757,0.088779538378,0.0888043688387,0.0887539984757,0.0887547079174,0.0887688967521,0.0887986933048,0.0888370031584,0.0889285211418,0.0889398722095,0.0889654121119,0.0889739254127,0.0889980464316,0.0890044314072,0.0890434507025,0.0891058815749,0.0891434819867,0.0891697313308,0.0892158450434,0.0893215518615,0.0893967526851,0.0894010093355,0.0894002998938,0.089410232078,0.0894542174654,0.0894740818339,0.0894903989938,0.0895116822458,0.0895961058119,0.0896748538442,0.0897117448143,0.0897287714158,0.0897819795458,0.0898642747867,0.0899423133773,0.0899862987647,0.0900614995883,0.0900983905584,0.0901260587859,0.0901537270135,0.0902324750458,0.0902473733221,0.0902452449969,0.0902204145363,0.0901948746339,0.0902573055064,0.0902807170836,0.090311223078,0.0903729445088,0.0903999032946,0.090401322178,0.0904126732458,0.0904637530505,0.090491421278,0.0904552397497,0.0904587869584,0.0904403414733,0.0904864551859,0.0905098667631,0.0905098667631,0.0905425010828,0.0905304405733,0.0905439199662,0.0906247963237,0.0906276340906,0.0906056413969,0.0906354379497,0.0906702005946,0.0906907744048,0.0906921932883,0.0906723289198,0.0906936121717,0.0906666533859,0.0906772950119,0.0907028349143,0.0906893555214,0.090613445256,0.0906843894292,0.0906964499387,0.0907418542095,0.0907347597922,0.0907212803993,0.0907489486269,0.0907787451796,0.0907979001064,0.0908085417324,0.0908383382851,0.0908425949355,0.0907971906647,0.0907900962473,0.0908298249843,0.090854655445,0.0909028974828,0.0909213429678,0.0909490111954,0.0909667472387,0.0909334034773,0.0909248901765,0.0909099919001,0.0908794859056,0.0908574932119,0.0908390477269,0.0907971906647,0.0907709413206,0.0907489486269,0.0907390164426,0.0906737478032,0.0906382757166,0.0905850675867,0.0905666221017,0.0905495955001,0.0905850675867,0.090573716519,0.090523346156,0.0905041912292,0.0904587869584,0.0904531114245,0.0904105449206,0.0903623028828,0.0902920681513,0.090184233008,0.0901317343198,0.0900870394906,0.0900480201954,0.0900175142009,0.0899565022119,0.0898912335725,0.0898061005647,0.0897280619741,0.0896308684568,0.0896032002292,0.0895925586032,0.0895521204245,0.0895599242836,0.0895258710804,0.0894918178773,0.0894613118828,0.0894556363489,0.0894371908639,0.0893882393843,0.0892988497261,0.0892470604796,0.0892534454552,0.0892428038292,0.0892420943875,0.0891888862576,0.0891661841221,0.0891094287836,0.0891229081765,0.0890966588324,0.0890569300954,0.0890122352662,0.0889817292717,0.08898101983,0.088970378204,0.0889781820631,0.0890079786158,0.0890186202418,0.089042031819,0.0890122352662,0.0890235863339,0.0890469979111,0.0890654433962,0.0890767944639,0.0890760850221,0.0891229081765,0.0891229081765,0.0891058815749,0.0891172326426,0.0890782133473,0.0890959493906,0.0890654433962,0.0890583489788,0.0890611867458,0.0890803416725,0.0890675717213,0.089110847667,0.0891221987347,0.0891243270599,0.0891051721332,0.0891356781276,0.0891300025938,0.0891349686859,0.0891583802631,0.0891328403607,0.0890980777158,0.0890753755804,0.089110847667,0.0890767944639,0.0890980777158,0.0890718283717,0.0890335185182,0.0890193296836,0.0890306807513,0.0889498043938,0.0889434194182,0.0888902112883,0.0888426786922,0.0888291992993,0.0888001121883,0.0887561268009,0.0887369718741,0.0887036281127,0.0886773787686,0.0886248800804,0.0885986307363,0.0885723813922,0.0885347809804,0.0885078221946,0.088480153967,0.08844042523,0.088432621371,0.0884063720269,0.0883467789213,0.0883127257182,0.088281510282,0.088241781545,0.0882212077347,0.0881531013284,0.0881147914749,0.0880736438544,0.08808002883,0.0881105348245,0.0880793193883,0.0880842854804,0.0880537794859,0.0880651305536,0.0881112442662,0.0881034404072,0.0880530700442,0.0880523606025,0.0880608739032,0.0880729344127,0.0880835760387,0.0880920893395,0.0881169198001,0.0881857356481,0.0881296897513,0.0880828665969,0.0880750627379,0.0880878326891,0.0881069876158,0.0881020215237,0.0881296897513,0.088148844678,0.0881289803095,0.088109115941,0.0880949271064,0.0881098253828,0.0881424597025,0.0881374936103,0.0881296897513,0.0881147914749,0.0881460069111,0.0881460069111,0.0881396219355,0.0881389124938,0.0881112442662,0.0880551983694,0.0880537794859,0.088040300093,0.0879948958221,0.0879842541962,0.0879622615025,0.0879743220119,0.0879799975458,0.0879452349009,0.0879204044402,0.0878941550962,0.0878558452426,0.08780973153,0.0877905766032,0.0877473006576,0.0877394967985,0.0877650367009,0.0877416251237,0.087698349178,0.087679903693,0.087669262067,0.0876380466308,0.0876224389127,0.0876430127229,0.0876430127229,0.0876621676497,0.0876096689615,0.0876373371891,0.0876096689615,0.0876302427717,0.0876380466308,0.0876231483544,0.0876472693733,0.0876174728206,0.0876266955631,0.0876316616552,0.0876572015576,0.0876536543489,0.0876472693733,0.0876621676497,0.087661458208,0.0875968990103,0.0875890951513,0.0875883857095,0.087608250078,0.0875756157584,0.0875905140347,0.0875862573843,0.0875678118993,0.0875429814387,0.0875131848859,0.0875110565607,0.0875011243765,0.0874975771678,0.0874933205174,0.0874635239647,0.0874479162465,0.0874649428481,0.0874131536017,0.0873847759324,0.0873890325828,0.0873542699379,0.0873861948158,0.0873216356182,0.0873109939922,0.0872499820032,0.0872272798678,0.087197483315,0.0871825850387,0.0871882605725,0.0871620112284,0.0871300863505,0.0871336335591,0.0871322146757,0.0870946142639,0.0870882292883,0.0870428250174,0.087017285115,0.0869711714024,0.0869569825678,0.086930023782,0.0869562731261,0.0869612392182,0.0870066434891,0.0869938735379,0.086977556378,0.086959110893,0.0869569825678,0.0869399559662,0.0869250576899,0.0869250576899,0.0869115782969,0.0868846195111,0.0868697212347,0.0869215104812,0.086887457278,0.0868534040749,0.0868562418418,0.0868285736143,0.086839924682,0.0868349585899,0.0868321208229,0.0868165131048,0.0868115470127,0.0867831693434,0.0867774938095,0.0867739466009,0.0867753654843,0.086746987815,0.0867150629371,0.0867810410182,0.0867845882269,0.0867831693434,0.086810837571,0.0868158036631,0.0867824599017,0.086789554319,0.0867413122812,0.0867157723788,0.0866689492245,0.0866611453654,0.0866348960213,0.086659726482,0.0866497942977,0.0866299299292,0.086598714493,0.0865980050513,0.0866221260702,0.0866540509481,0.0866192883032,0.0866107750024,0.0866114844442,0.0866143222111,0.0865816878914,0.0865632424064,0.0865355741788,0.0865277703198,0.0865291892032,0.0865504724552,0.0865157098103,0.0864653394473,0.0864412184284,0.0863922669489,0.0864057463418,0.0863936858324,0.0863993613662,0.0863220322174,0.0862922356647,0.0862730807379,0.0862546352528,0.0862028460064,0.0862014271229,0.0862184537245,0.0862227103749,0.0862035554481,0.0862078120985,0.0862326425591,0.0862879790143,0.0862695335292,0.0862794657135,0.0862893978977,0.0863255794261,0.0863199038922,0.0863255794261,0.0863348021686,0.0863482815615,0.086296492315,0.0863064244993,0.0863170661253,0.0863617609544,0.086378787556,0.0864064557836,0.0864199351765,0.0864539883796,0.0864263201521,0.0864610827969,0.0865008115339,0.0865220947859,0.086577431241,0.0865582763143,0.0865902011922,0.0865604046395,0.0866058089103,0.0866228355119,0.0866377337883,0.0866356054631,0.08663844323,0.0866313488127,0.0866036805851,0.0866185788615,0.0866391526717,0.0866129033276,0.0865909106339,0.0865717557072,0.0865561479891,0.0865355741788,0.0865341552954,0.0865213853442,0.0864993926505,0.0864752716316,0.0864220635017,0.0863979424828,0.0864277390355,0.0863951047158,0.0863780781143,0.0863255794261,0.0862844318056,0.0862525069276,0.0862603107867,0.0862425747434,0.0862134876324,0.0861609889442,0.0861737588954,0.0861319018332,0.0860730181694,0.0860886258875,0.0860637954269,0.0860850786788,0.0860375460828,0.0859963984623,0.0859836285111,0.085978662419,0.0860042023213,0.0860191005977,0.0859956890206,0.085986466278,0.0859644735843,0.0859609263757,0.0859694396765,0.0859254542891,0.0859346770316,0.0859077182458,0.0859034615954,0.0858616045332,0.0858240041213,0.0858211663544,0.0857807281757,0.0858176191458,0.0858147813788,0.0857828565009,0.0857622826906,0.0857658298993,0.0857601543654,0.0857133312111,0.0856778591245,0.0856679269402,0.0856466436883,0.0856821157749,0.0856629608481,0.0856842441001,0.0857147500946,0.0856601230812,0.0856147188103,0.0855820844906,0.0855955638836,0.0856118810434,0.0856430964796,0.0856814063332,0.0856913385174,0.0856743119158,0.0857225539536,0.0856892101922,0.0856799874497,0.0856665080568,0.0856239415528,0.0856062055095,0.0855842128158,0.0856430964796,0.0856388398292,0.0856679269402,0.0857367427883,0.0857488032977,0.0857963358938,0.0857622826906,0.085716168978,0.0857842753843,0.0858112341702,0.0858403212812,0.0858977860615,0.0859488658662,0.0859836285111,0.0860034928796,0.0860510254757,0.086068761519,0.0860751464946,0.0860907542127,0.086158860619,0.0862106498654,0.0862652768788,0.0863021678489,0.0863255794261,0.0863092622662,0.0862588919032,0.0862340614426,0.0862326425591,0.0862255481418,0.0861680833615,0.0861780155458,0.0861950421473,0.0862241292584,0.0862411558599,0.0862617296702,0.0862908167812,0.0862390275347,0.0862447030686,0.0862227103749,0.0861914949387,0.0861546039686,0.0861205507654,0.0861737588954,0.0861815627544,0.0861631172694,0.0861900760552,0.086166664478,0.0861609889442,0.0861170035568,0.0861177129985,0.086087207004,0.0860574104513,0.0860467688253,0.0860538632426,0.086090044771,0.0860042023213,0.0860297422237,0.0860042023213,0.0859907229284,0.0859822096276,0.0860311611072,0.0860623765434,0.0860552821261,0.0860517349174,0.0860701804024,0.08609784863,0.0861503473182,0.0861439623426,0.086166664478,0.0862028460064,0.0862879790143,0.0863121000332,0.0863702742552,0.0863887197402,0.0864121313174,0.0864603733552,0.0865185475773,0.0866136127694,0.0866043900269,0.0866221260702,0.0866561792733,0.0866526320647,0.0866817191757,0.0866881041513,0.0867455689316,0.0867143534954,0.0867129346119,0.0867363461891,0.0867186101458,0.0855224913851,0.0842909005379,0.0831330916308,0.0819121424095,0.0807011253725,0.0795092632623,0.0783188200355,0.0770787158875,0.0758549288993,0.0746637762308,0.0734825557465,0.0722892747528,0.0711023787347,0.0698636934701,0.0686782163355,0.0674487538135,0.0662384462182,0.0649387489646,0.0432951005961,0.043268851252,0.0432759456693,0.0432638851599,0.0432241564229,0.0431915221032,0.0431645633174,0.0431794615937,0.0432128053552,0.0432128053552,0.0431794615937,0.0431851371276,0.0431546311331,0.0431461178323,0.0431744955016,0.0432128053552,0.0432213186559,0.0432369263741,0.0432234469811,0.0432227375394,0.0432277036315,0.0432113864717,0.0432369263741,0.0432170620056,0.0432057109378,0.0432191903308,0.043261047393,0.0432752362276,0.0432745267859,0.0432638851599,0.0432660134851,0.0432865872953,0.043268851252,0.0432695606937,0.0432745267859,0.0433043233386,0.04330077613,0.0432780739945,0.043250405767,0.0432525340922,0.0432603379512,0.0432723984607,0.043247568,0.0432277036315,0.0431837182441,0.043178752152,0.0431730766182,0.0431652727591,0.0431610161087,0.0431305101142,0.0431014230032)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("3-organelles-nucleus-merged/PolIV-ChIP-replicate-2-GSM1103233.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=102"),bty="n")
dev.off()