inst/examples/MACS-2sample-50hits-fixed/FoxA1.vs.input.MCF7_model.r

In drmjc/macsR: Facilitate analysis of MACS results.

# R script for Peak Model
#  -- generated by MACS
p <- c(0.0129832146579,0.0135416324927,0.0141698525568,0.0146584681622,0.0151470837676,0.0155658971436,0.0159847105197,0.0164733261251,0.0172411506479,0.0180089751706,0.0187069974641,0.0193352175282,0.0201728442803,0.0204520531977,0.0211500754911,0.0221273067019,0.0230347356834,0.0241515713529,0.0245005824996,0.0242213735822,0.0244307802703,0.0242911758116,0.0244307802703,0.0244307802703,0.0242213735822,0.0242911758116,0.0238025602062,0.0240817691235,0.0242213735822,0.0244307802703,0.0242213735822,0.0238723624355,0.0233837468301,0.0232441423714,0.0228253289954,0.022546120078,0.0222669111606,0.0224763178486,0.0224763178486,0.0224763178486,0.0226159223073,0.0228253289954,0.0231045379127,0.0232441423714,0.0231045379127,0.0226857245367,0.0230347356834,0.0228951312247,0.02233671339,0.0224763178486,0.0221273067019,0.0217084933259,0.0212896799498,0.0206614598857,0.0204520531977,0.0199634375923,0.0196842286749,0.0196842286749,0.0194050197575,0.0198936353629,0.0199634375923,0.0200332398216,0.0209406688031,0.0205916576564,0.020731262115,0.0208708665737,0.0212896799498,0.0212896799498,0.0214990866378,0.0212198777205,0.0211500754911,0.0214292844085,0.0220575044726,0.0220575044726,0.0220575044726,0.0219877022432,0.0221273067019,0.0219877022432,0.0219877022432,0.0219877022432,0.0218480977845,0.0220575044726,0.0212896799498,0.0214990866378,0.0221273067019,0.02233671339,0.0228951312247,0.022755526766,0.0231743401421,0.0233139446008,0.0235931535181,0.0238723624355,0.0239421646649,0.0239421646649,0.0240817691235,0.0238723624355,0.0239421646649,0.0235931535181,0.0231045379127,0.0230347356834,0.0231045379127,0.0228951312247,0.0224763178486,0.0226159223073,0.022546120078,0.0226159223073,0.022755526766,0.0224065156193,0.0219179000139,0.0217782955552,0.0220575044726,0.0222669111606,0.0221971089313,0.0221273067019,0.02233671339,0.0224065156193,0.0224065156193,0.0224763178486,0.022755526766,0.022546120078,0.0221971089313,0.0220575044726,0.0217782955552,0.0220575044726,0.0214990866378,0.0214292844085,0.0208708665737,0.0203822509683,0.0206614598857,0.020731262115,0.0210802732618,0.0210802732618,0.0209406688031,0.0211500754911,0.0213594821791,0.0215688888672,0.0218480977845,0.0221273067019,0.0220575044726,0.0222669111606,0.0221971089313,0.0222669111606,0.0220575044726,0.0222669111606,0.0224065156193,0.02233671339,0.0219877022432,0.0220575044726,0.0220575044726,0.0220575044726,0.0212198777205,0.0211500754911,0.0212198777205,0.0217084933259,0.0219179000139,0.0219877022432,0.0221971089313,0.0221273067019,0.0222669111606,0.0224065156193,0.022546120078,0.0224763178486,0.0231743401421,0.0236629557475,0.0237327579768,0.0233837468301,0.0233139446008,0.0232441423714,0.0235233512888,0.0232441423714,0.0233139446008,0.0231743401421,0.0228951312247,0.0224065156193,0.0226857245367,0.022546120078,0.0228951312247,0.0231743401421,0.0237327579768,0.0236629557475,0.0238723624355,0.0240817691235,0.0241515713529,0.0244307802703,0.0240119668942,0.0245005824996,0.0252684070224,0.0252684070224,0.0254778137104,0.0247099891876,0.0244307802703,0.0244307802703,0.0242911758116,0.0246401869583,0.0245703847289,0.0242911758116,0.0246401869583,0.0250590003344,0.024989198105,0.0253382092517,0.0250590003344,0.0253382092517,0.0254080114811,0.0257570226278,0.0254778137104,0.0256174181691,0.025198604793,0.0252684070224,0.0252684070224,0.0253382092517,0.025198604793,0.0258268248571,0.0256174181691,0.0253382092517,0.0250590003344,0.0251288025637,0.025198604793,0.0252684070224,0.0253382092517,0.024989198105,0.0255476159398,0.0256872203984,0.0255476159398,0.0253382092517,0.0251288025637,0.0255476159398,0.0255476159398,0.0258268248571,0.0260362315452,0.0266644516093,0.0269436605266,0.0271530672147,0.027013462756,0.027222869444,0.0266644516093,0.0261060337745,0.0263154404625,0.0263852426919,0.0260362315452,0.0254080114811,0.0259664293158,0.0263154404625,0.0268040560679,0.0271530672147,0.027222869444,0.0275718805907,0.0277114850494,0.0270832649853,0.0272926716733,0.0277114850494,0.0277114850494,0.0281302984255,0.0283397051135,0.0282699028842,0.0284793095722,0.0284095073428,0.0282001006548,0.0278510895081,0.0279906939668,0.0285491118015,0.0287585184896,0.0285491118015,0.0287585184896,0.0291075296363,0.0295961452417,0.0288981229483,0.0284095073428,0.0286189140309,0.0286189140309,0.0280604961961,0.0288981229483,0.029456540783,0.029456540783,0.029456540783,0.0293867385537,0.0305733764525,0.0303639697645,0.0303639697645,0.0304337719938,0.0302941675351,0.0302243653058,0.0305035742232,0.0303639697645,0.0310619920579,0.0311317942872,0.0313412009753,0.0316204098927,0.031480805434,0.0310619920579,0.0311317942872,0.0309921898286,0.0319694210394,0.0324580366448,0.0333654656262,0.0329466522502,0.0333654656262,0.0339936856903,0.0344124990664,0.0348313124425,0.0350407191305,0.0343426968371,0.0344823012957,0.0350407191305,0.0349709169011,0.0349709169011,0.0353897302772,0.0348313124425,0.0352501258185,0.0357387414239,0.0362971592587,0.0367857748641,0.0367159726347,0.0371347860108,0.0379724127629,0.038391226139,0.038391226139,0.0391590506618,0.0391590506618,0.0392288528911,0.0395778640378,0.0403456885606,0.0400664796432,0.0404852930193,0.0409739086247,0.0418813376062,0.0424397554409,0.0427887665876,0.043067975505,0.0431377777343,0.0427189643583,0.0436961955691,0.0434169866517,0.0436961955691,0.0440452067158,0.0447432290092,0.0451620423853,0.0459996691374,0.0465580869722,0.0472561092656,0.0480937360177,0.0491407694579,0.0494897806046,0.0506066162741,0.0503972095861,0.0510952318795,0.0510254296502,0.0513046385675,0.051793254173,0.0521422653197,0.0519328586316,0.052002660861,0.0529100898424,0.0534685076772,0.054445738888,0.0549343544934,0.0543061344293,0.0545155411174,0.0551437611814,0.0556323767868,0.0559813879336,0.0561907946216,0.0567492124563,0.0577264436672,0.0578660481258,0.058703674878,0.0594016971714,0.0601695216942,0.0610769506757,0.0607279395289,0.061356159593,0.0614259618224,0.0620541818865,0.0624031930332,0.0628918086386,0.063171017556,0.0637294353907,0.0653348866656,0.0665215245645,0.0669403379405,0.0688249981328,0.0688249981328,0.0695230204262,0.0709888672424,0.0716170873065,0.072733922976,0.0735017474988,0.0744091764803,0.0753864076911,0.0761542322139,0.0771314634247,0.0781086946355,0.0793651347637,0.0806215748919,0.0820176194787,0.0827156417722,0.0841814885884,0.085926544322,0.0864849621567,0.0875319955969,0.0902542825413,0.0919295360455,0.0938141962378,0.0938839984671,0.0949310319073,0.0970250987876,0.0979325277691,0.0996077812733,0.10107362809,0.103237497199,0.104424135098,0.106727608666,0.108193455483,0.10951969784,0.110706335739,0.112870204849,0.114126644977,0.116150909628,0.117407349756,0.119222207719,0.120897461223,0.122572714727,0.124736583837,0.127947486387,0.130669773331,0.13290344467,0.134788104862,0.136533160596,0.138836634164,0.141489118879,0.14351338353,0.14567725264,0.146514879392,0.148050528438,0.149795584171,0.151959453281,0.152727277804,0.154402531308,0.156496598188,0.16054512749,0.163825832269,0.167106537049,0.170247637369,0.172481308708,0.174505573359,0.175971420175,0.179880345018,0.181485796293,0.183440258715,0.185464523366,0.189582854897,0.192165537383,0.195446242162,0.199215562547,0.202845278473,0.205567565417,0.208150247903,0.209546292489,0.21157055714,0.213525019562,0.215409679754,0.21910919791,0.221482473707,0.225321596321,0.227764674348,0.23076617021,0.234954303971,0.239980064483,0.24458701162,0.247867716399,0.25198604793,0.255825170544,0.259315282011,0.262246975644,0.264410844754,0.268110362909,0.270972254312,0.273903947944,0.277812872788,0.280953973108,0.284793095722,0.288702020565,0.291214900822,0.294844616747,0.300079783948,0.303151082039,0.306710995736,0.310340711662,0.314528845422,0.317809550201,0.321927881733,0.326255619952,0.330094742566,0.336446745436,0.340634879197,0.345102221875,0.351035411369,0.355014138442,0.359970096725,0.367159726347,0.373162718071,0.377141445143,0.382446414574,0.384261272537,0.389356835279,0.394452398021,0.401083609808,0.406946997073,0.412042559815,0.418324760456,0.42432775218,0.429144106004,0.435286702187,0.439544638177,0.442895145185,0.448130312386,0.453644688504,0.458042228953,0.462369967172,0.46683730985,0.470676432464,0.475073972913,0.47744724871,0.483380438204,0.486800747442,0.489592836616,0.493362157001,0.496433455092,0.500481984394,0.503483480255,0.506066162741,0.507741416245,0.507113196181,0.509067658603,0.509765680896,0.508509240768,0.508369636309,0.508160229621,0.505996360512,0.508160229621,0.508579042997,0.507532009557,0.505019129301,0.502157237898,0.499644357641,0.497829499679,0.495665630569,0.49231512356,0.488476000947,0.486591340754,0.485474505085,0.48275221814,0.478075468774,0.476958633105,0.474445752848,0.471374454757,0.467116518767,0.463417000612,0.461253131503,0.455040733091,0.449456554743,0.444919409836,0.440382264929,0.434867888811,0.430958963967,0.424886170014,0.421047047401,0.416928715869,0.411623746439,0.404922732422,0.400315785286,0.395290024773,0.391241495471,0.386774152793,0.382586019032,0.377281049602,0.37218548686,0.368067155329,0.362552779211,0.357876029845,0.353687896084,0.348662135571,0.343775979517,0.339727450215,0.335050700849,0.329745731419,0.323742739696,0.317460539055,0.312783789689,0.306012973442,0.300219388407,0.295472836811,0.291005494133,0.287585184896,0.282210413236,0.276905443806,0.272856914504,0.269576209725,0.263922229148,0.258966270865,0.252335059077,0.246890485188,0.243190967033,0.239212239961,0.237048370851,0.233418654925,0.229370125623,0.225321596321,0.221552275937,0.217573548864,0.215060668608,0.209546292489,0.204101718601,0.201100222739,0.198377935795,0.194957626557,0.191746724007,0.188117008081,0.184766501073,0.181206587376,0.178065487056,0.174924386735,0.172132297561,0.170736252974,0.168851592782,0.166827328131,0.164384250104,0.161522358701,0.15949809405,0.154960949143,0.151750046593,0.149865386401,0.147561912832,0.144769823659,0.143024767925,0.142954965696,0.142117338944,0.141558921109,0.138976238623,0.135904940532,0.133322258046,0.13185641123,0.130111355496,0.127528673011,0.125364803901,0.123410341479,0.120408845618,0.120478647847,0.119501416636,0.116569723004,0.114266249435,0.112590995931,0.11063653351,0.109100884464,0.107565235418,0.106588004208,0.105401366309,0.103865717263,0.103237497199,0.101841452612,0.100724616943,0.0988399567505,0.0980721322278,0.0967458898702,0.0952102408247,0.0944424163019,0.0933953828617,0.0920691405042,0.0916503271281,0.0899052713946,0.0894864580185,0.0873225889088,0.0859963465513,0.0843210930471,0.0829948506895,0.0822968283961,0.081668608332,0.0804121682038,0.0799933548278,0.0799933548278,0.0788067169289,0.0781784968648,0.0765730455899,0.0752468032324,0.0744091764803,0.0741997697922,0.0734319452695,0.0726641207467,0.0723849118293,0.0710586694718,0.0703606471783,0.0689646025915,0.06805717361,0.0676383602339,0.0662423156471,0.0654744911243,0.0638690398494,0.0629616108679,0.0627522041799,0.0621239841158,0.0607279395289,0.0600997194648,0.0594016971714,0.0587734771073,0.0569586191444,0.0565398057683,0.0556323767868,0.0547947500347,0.0539571232826,0.0538175188239,0.0531892987598,0.052212067549,0.052002660861,0.0517234519436,0.0507462207328,0.0498387917513,0.0492105716872,0.0490709672286,0.0491407694579,0.0490709672286,0.0484427471645,0.0473957137243,0.047535318183,0.047325911495,0.0469769003482,0.0467674936602,0.0468372958896,0.0464184825135,0.0457204602201,0.0449526356973,0.0451620423853,0.0447432290092,0.0444640200919,0.0449526356973,0.0437659977984,0.0436263933398,0.0436263933398,0.0436961955691,0.0431377777343,0.0427189643583,0.0427189643583,0.0422303487529,0.0420907442942,0.0416021286888,0.0413927220008,0.041043710854,0.0405550952486,0.040624897478,0.0402758863313,0.0399966774139,0.0399268751845,0.0399966774139,0.0397174684965,0.0395080618085,0.0390892484324,0.038391226139,0.0377630060749,0.0374837971575,0.0370649837815,0.0371347860108,0.036576368176,0.0364367637174,0.0355991369652,0.0357387414239,0.0358085436533,0.0356689391946,0.0355293347359,0.0352501258185,0.0351803235892,0.0343426968371,0.0343426968371,0.0336446745436,0.033923883461,0.0334352678556,0.0338540812316,0.0338540812316,0.0335050700849,0.033923883461,0.0339936856903,0.0342728946077,0.0336446745436,0.0336446745436,0.0335050700849,0.0332258611676,0.0325278388741,0.0323184321861,0.0320392232687,0.031690212122,0.031690212122,0.0312713987459,0.031480805434,0.0315506076633,0.0316204098927,0.031690212122,0.03189961881,0.0312713987459,0.0312015965166,0.0310619920579,0.0313412009753,0.0309921898286,0.0313412009753,0.031690212122,0.0307129809112,0.0306431786818,0.0305733764525,0.0307129809112,0.0306431786818,0.0306431786818,0.0297357497004,0.0300847608471,0.0299451563884,0.0298753541591,0.0302243653058,0.0301545630764,0.0299451563884,0.0300149586177,0.0305035742232,0.0307827831405,0.0312713987459,0.0312015965166,0.0311317942872,0.0310619920579,0.0314110032046,0.0316204098927,0.0315506076633,0.0315506076633,0.0313412009753,0.0311317942872,0.0309223875992,0.0312015965166,0.0306431786818,0.0308525853699,0.0307129809112,0.0311317942872,0.0310619920579,0.0311317942872,0.0307129809112,0.0304337719938,0.0307129809112,0.0304337719938,0.0302941675351,0.0300149586177,0.0299451563884,0.0299451563884,0.0303639697645,0.0298753541591,0.0293867385537,0.0291773318656,0.0287585184896,0.0284793095722,0.0282001006548,0.0277812872788,0.0272926716733,0.0268040560679,0.0263852426919,0.0262456382332,0.0263852426919,0.0258268248571,0.0256872203984,0.0256174181691,0.0256872203984,0.0255476159398,0.0254080114811,0.0254778137104,0.0256174181691,0.0248495936463,0.0246401869583,0.0242213735822,0.0242213735822,0.0238723624355,0.0236629557475,0.0238025602062,0.0233837468301,0.0231045379127,0.0233139446008,0.0234535490594,0.0233139446008,0.0234535490594,0.0235931535181,0.0237327579768,0.0238723624355,0.0240817691235,0.0240817691235,0.0247099891876,0.0246401869583,0.0243609780409,0.0241515713529,0.0242213735822,0.0242911758116,0.0242213735822,0.0242213735822,0.0240817691235,0.0237327579768,0.0240817691235,0.0238723624355,0.0233139446008,0.0231045379127,0.0228951312247,0.022964933454,0.0228253289954,0.022755526766,0.0232441423714,0.0233139446008,0.0231045379127,0.0230347356834,0.0224763178486,0.0224065156193,0.0219179000139,0.0218480977845,0.0219179000139,0.0217782955552,0.0217782955552,0.0217084933259,0.0213594821791,0.0209406688031,0.0210104710324,0.0205916576564,0.020312448739,0.020312448739,0.0196842286749,0.0196144264456,0.0196842286749,0.0196144264456,0.0194050197575,0.0194050197575,0.0192654152988,0.0194050197575,0.0194748219869,0.0196144264456,0.0195446242162,0.0195446242162,0.0197540309042,0.0200332398216,0.020103042051,0.020103042051,0.0199634375923,0.0197540309042,0.0193352175282,0.0193352175282,0.0192654152988,0.0189164041521,0.0194050197575,0.0192654152988,0.0194050197575,0.0194050197575,0.0193352175282,0.0191258108401,0.0189862063815,0.0190560086108,0.0191258108401,0.0195446242162,0.0191956130695,0.0189862063815,0.0189164041521,0.0190560086108,0.0192654152988,0.0194748219869,0.0196144264456,0.0196842286749,0.0196842286749,0.0196144264456,0.0196842286749,0.0194050197575,0.0194050197575,0.0194050197575,0.0195446242162,0.0193352175282,0.0191956130695,0.0187069974641,0.0190560086108,0.0188466019228,0.0189862063815,0.0193352175282,0.0191258108401,0.0191956130695,0.0196144264456,0.0195446242162,0.0191258108401,0.0194050197575,0.0189164041521,0.0189164041521,0.0187767996934,0.0188466019228,0.0189164041521,0.0186371952347,0.0187069974641,0.018288184088,0.018288184088,0.0180787774,0.0180787774,0.0179391729413,0.0177297662533,0.0175203595652,0.0173109528772,0.0172411506479,0.0173109528772,0.0172411506479,0.0172411506479,0.0173807551066,0.0174505573359,0.0176599640239,0.0173807551066,0.0171713484185,0.0172411506479,0.0173109528772,0.0171713484185,0.0171713484185,0.0173109528772,0.0169619417305,0.0171015461892,0.0170317439598,0.0163337216664,0.0166129305838,0.0166129305838,0.0164035238957,0.0166827328131,0.0166129305838,0.0168223372718,0.0166827328131,0.0167525350425,0.0169619417305,0.0171015461892,0.0171713484185,0.0172411506479,0.0174505573359,0.0175203595652,0.0173109528772,0.0169619417305,0.0169619417305,0.0171713484185,0.0170317439598,0.0166129305838,0.0168921395012,0.0166129305838,0.0164733261251,0.0165431283544,0.0162639194371,0.0163337216664,0.0162639194371,0.0161941172077,0.0159847105197,0.0154262926849,0.0152866882262,0.0148678748502,0.0151470837676,0.0152866882262,0.0152168859969,0.015635699373,0.0155658971436,0.0157055016023,0.0157055016023,0.0155658971436,0.015845106061,0.0159847105197,0.0162639194371,0.0163337216664,0.0161941172077,0.0161243149784,0.0157753038317,0.0161243149784,0.015845106061,0.0157055016023,0.0159847105197,0.0162639194371,0.0163337216664,0.0161941172077,0.0163337216664,0.0167525350425,0.0165431283544,0.0166129305838,0.0166827328131,0.0164733261251,0.0164733261251,0.0163337216664,0.0164035238957,0.0165431283544,0.0167525350425,0.0170317439598,0.0172411506479,0.0173109528772,0.0170317439598,0.0171015461892,0.0174505573359,0.0177297662533,0.0175901617946,0.0177297662533,0.0175203595652,0.0180787774,0.0180089751706,0.0179391729413,0.0173807551066,0.0170317439598,0.0173109528772,0.0175203595652,0.0181485796293,0.017869370712,0.0184277885467,0.0186371952347,0.0182183818587,0.0182183818587,0.0181485796293,0.0184975907761,0.0181485796293,0.0181485796293,0.0180089751706,0.0184975907761,0.0180787774,0.0179391729413,0.0180089751706,0.0183579863174,0.0185673930054,0.0186371952347,0.0186371952347,0.0186371952347,0.0185673930054,0.0189164041521,0.0191258108401,0.0189862063815,0.0187069974641,0.0180089751706,0.0181485796293,0.0177995684826,0.0177995684826,0.0175203595652,0.0174505573359,0.0174505573359,0.0176599640239,0.0174505573359,0.0171713484185,0.0168921395012,0.0165431283544,0.0166827328131,0.0164733261251,0.0161243149784,0.0161941172077,0.0162639194371,0.016054512749,0.0157753038317,0.0161941172077,0.0162639194371,0.0169619417305,0.0165431283544,0.0171015461892,0.0171713484185,0.0171713484185,0.0169619417305,0.0168921395012,0.0166827328131,0.0168223372718,0.0166129305838,0.0165431283544,0.0157753038317,0.0154262926849,0.0151470837676,0.0152168859969,0.0154960949143,0.0151470837676,0.0152168859969,0.0152866882262,0.0150772815382,0.0149376770795,0.0146584681622,0.0147980726208,0.0148678748502,0.0149376770795,0.0148678748502,0.0149376770795,0.0149376770795,0.0150772815382,0.0152866882262,0.0152866882262,0.0151470837676,0.0152168859969,0.0148678748502,0.0152168859969,0.0150074793089,0.0147980726208,0.0147282703915,0.0145886659328,0.0147980726208,0.0147980726208,0.0144490614741,0.0144490614741,0.0143792592448,0.01382084141,0.013611434722,0.0132624235753,0.0132624235753,0.0130530168873,0.0129134124286,0.0124247968232,0.0120757856764,0.0119361812178,0.011587170071,0.0112381589243,0.0108193455483,0.0104703344015,0.0101213232548,0.00956290542007,0.0092836965027,0.00879508089729,0.00837626752123)
m <- c(0.0119173313541,0.0125445593201,0.0135202472672,0.014077783237,0.014705011203,0.015332239169,0.0158897751388,0.0168654630859,0.017213923067,0.0175623830481,0.0179805350255,0.0183986870028,0.0189562229726,0.0195137589424,0.0200712949121,0.0205591388857,0.0214651348366,0.0218135948177,0.0215348268328,0.0211863668517,0.0213257508441,0.021604518829,0.0211166748555,0.020977290863,0.0213257508441,0.020977290863,0.0211166748555,0.0211166748555,0.0211863668517,0.0209075988668,0.0207682148744,0.0206985228781,0.0211166748555,0.021604518829,0.0217439028215,0.0218135948177,0.021604518829,0.0214651348366,0.0210469828593,0.0209075988668,0.0208379068706,0.0207682148744,0.0208379068706,0.0206985228781,0.0211166748555,0.0212560588479,0.0214651348366,0.0218135948177,0.0221620547988,0.022231746795,0.0220923628026,0.0219529788101,0.0215348268328,0.0219529788101,0.021604518829,0.0216742108253,0.0216742108253,0.0210469828593,0.0213954428404,0.0214651348366,0.0217439028215,0.0218135948177,0.0216742108253,0.0215348268328,0.0211863668517,0.0214651348366,0.0213954428404,0.021604518829,0.0212560588479,0.0207682148744,0.0207682148744,0.0212560588479,0.021604518829,0.0214651348366,0.0212560588479,0.021604518829,0.0213954428404,0.0214651348366,0.0214651348366,0.0215348268328,0.0213257508441,0.0217439028215,0.0216742108253,0.021604518829,0.0216742108253,0.021604518829,0.0214651348366,0.0213257508441,0.0213954428404,0.0211166748555,0.0208379068706,0.0210469828593,0.0206985228781,0.0210469828593,0.0206288308819,0.0208379068706,0.0204894468895,0.0202803709008,0.020350062897,0.0205591388857,0.0210469828593,0.020977290863,0.0211863668517,0.021604518829,0.0215348268328,0.0218832868139,0.0214651348366,0.020977290863,0.020977290863,0.020977290863,0.0212560588479,0.0208379068706,0.0211166748555,0.0211166748555,0.0208379068706,0.0204197548932,0.0207682148744,0.0202803709008,0.020350062897,0.020350062897,0.0202803709008,0.0208379068706,0.0213257508441,0.0216742108253,0.0218135948177,0.0217439028215,0.0219529788101,0.0218832868139,0.0220226708064,0.0220226708064,0.022231746795,0.0221620547988,0.0224408227837,0.0224408227837,0.0225105147799,0.022231746795,0.0221620547988,0.022231746795,0.0223711307875,0.0217439028215,0.0218832868139,0.0217439028215,0.0219529788101,0.0225105147799,0.0227892827648,0.0230680507497,0.0230680507497,0.0236255867195,0.0236952787157,0.0239043547044,0.0240437386968,0.0243921986779,0.0243225066817,0.0246012746666,0.0246709666628,0.0248103506553,0.0243225066817,0.0241134306931,0.0237649707119,0.0239043547044,0.0235558947233,0.0236952787157,0.0238346627082,0.0238346627082,0.023486202727,0.0237649707119,0.0242528146855,0.0238346627082,0.0235558947233,0.0241831226893,0.0240437386968,0.0240437386968,0.0239043547044,0.0239740467006,0.0239740467006,0.0239043547044,0.0238346627082,0.0237649707119,0.0242528146855,0.0236255867195,0.0236255867195,0.0232771267384,0.0232074347422,0.0227195907686,0.0225802067762,0.0221620547988,0.0227195907686,0.0225802067762,0.022231746795,0.0217439028215,0.0218135948177,0.0215348268328,0.0217439028215,0.0214651348366,0.021604518829,0.0211166748555,0.0213257508441,0.0215348268328,0.0217439028215,0.021604518829,0.0218832868139,0.0215348268328,0.0210469828593,0.0211863668517,0.021604518829,0.0209075988668,0.0211166748555,0.0214651348366,0.0212560588479,0.0212560588479,0.020977290863,0.0215348268328,0.0213257508441,0.0213257508441,0.0211166748555,0.0212560588479,0.020977290863,0.020977290863,0.0211863668517,0.021604518829,0.0213954428404,0.0214651348366,0.0211166748555,0.0209075988668,0.0206288308819,0.0211166748555,0.0210469828593,0.0212560588479,0.0211166748555,0.020977290863,0.0210469828593,0.0219529788101,0.0220923628026,0.0216742108253,0.0216742108253,0.0218135948177,0.0219529788101,0.0219529788101,0.0220923628026,0.022231746795,0.0216742108253,0.0217439028215,0.0217439028215,0.0215348268328,0.0216742108253,0.0216742108253,0.0220923628026,0.021604518829,0.0216742108253,0.0217439028215,0.0212560588479,0.0213954428404,0.0212560588479,0.0218832868139,0.0216742108253,0.0213954428404,0.0216742108253,0.0217439028215,0.0218135948177,0.0224408227837,0.0230680507497,0.0232771267384,0.0229983587535,0.022858974761,0.0232074347422,0.0234165107308,0.0237649707119,0.0232074347422,0.0231377427459,0.0237649707119,0.0236952787157,0.0235558947233,0.0237649707119,0.0238346627082,0.0239740467006,0.0239043547044,0.0242528146855,0.0245315826704,0.0244618906742,0.0243921986779,0.0246012746666,0.0246012746666,0.0240437386968,0.0245315826704,0.0246012746666,0.0244618906742,0.0250891186402,0.0250194266439,0.0250891186402,0.0248103506553,0.0251588106364,0.0251588106364,0.0248800426515,0.0254375786213,0.0252285026326,0.0247406586591,0.0242528146855,0.0243225066817,0.0243921986779,0.0245315826704,0.0241831226893,0.0242528146855,0.0239740467006,0.0238346627082,0.0237649707119,0.0232771267384,0.0232074347422,0.0236952787157,0.0234165107308,0.0232771267384,0.022858974761,0.0229286667573,0.0229983587535,0.0225802067762,0.0225802067762,0.0226498987724,0.0226498987724,0.0229983587535,0.0232771267384,0.022858974761,0.0232074347422,0.0236952787157,0.0235558947233,0.0237649707119,0.0238346627082,0.0237649707119,0.0234165107308,0.023486202727,0.0236255867195,0.0235558947233,0.0236255867195,0.0235558947233,0.0244618906742,0.0243225066817,0.0247406586591,0.0244618906742,0.0249497346477,0.0246012746666,0.0241831226893,0.0246709666628,0.0249497346477,0.0250891186402,0.0250891186402,0.0248103506553,0.0247406586591,0.0252285026326,0.0257860386024,0.0260648065873,0.0260648065873,0.0262041905797,0.0266920345533,0.0266223425571,0.0267617265495,0.0266223425571,0.026901110542,0.0274586465117,0.0276677225004,0.0278071064929,0.0279464904853,0.0283646424626,0.0285040264551,0.0286434104475,0.0289918704286,0.0292009464173,0.0296887903909,0.0292706384135,0.0296190983946,0.0301069423682,0.0302463263606,0.0305250943455,0.0303857103531,0.0308038623304,0.0305250943455,0.0311523223115,0.0318492422738,0.0321977022549,0.0320583182624,0.0320583182624,0.0321280102587,0.0324067782436,0.0326855462284,0.0323370862473,0.0317795502775,0.0315007822927,0.0314310902964,0.0314310902964,0.0315007822927,0.0316401662851,0.0316401662851,0.0315704742889,0.0312220143078,0.0313613983002,0.0315007822927,0.0313613983002,0.0314310902964,0.0311523223115,0.0311523223115,0.031291706304,0.0312220143078,0.0313613983002,0.0310826303153,0.0314310902964,0.031291706304,0.0310129383191,0.030664478338,0.0305947863418,0.0305947863418,0.0303160183569,0.0308735543267,0.0311523223115,0.0316401662851,0.0310826303153,0.0310826303153,0.0315007822927,0.0317098582813,0.03191893427,0.0321977022549,0.0330340062096,0.0335218501831,0.0340096941567,0.0343581541378,0.0350550741,0.0347066141189,0.0354732260774,0.035682302066,0.0358913780547,0.0364489140245,0.0366579900131,0.0362398380358,0.0361004540434,0.0363792220282,0.0365882980169,0.036309530032,0.0366579900131,0.0367973740056,0.0368670660018,0.0372852179791,0.0374942939678,0.0380518299376,0.0383305979225,0.0382609059263,0.0384699819149,0.0389578258885,0.0397244378469,0.0395850538545,0.0395153618583,0.0391669018772,0.0397941298432,0.0403516658129,0.0410485857752,0.0409788937789,0.0417455057374,0.0418151977336,0.0418151977336,0.0425818096921,0.0425818096921,0.0425121176958,0.0425121176958,0.0432090376581,0.042860577677,0.0431393456618,0.0436271896354,0.0445331855863,0.044742261575,0.0452301055485,0.0465542534768,0.046623945473,0.0469027134579,0.0480874773937,0.0480874773937,0.0484359373748,0.0494116253219,0.0496207013106,0.0507357732501,0.051641769201,0.0519205371859,0.0529659171292,0.0531749931179,0.0529659171292,0.0529659171292,0.0535931450953,0.0540809890688,0.0546385250386,0.0549172930235,0.0553354450008,0.0558929809706,0.0567292849253,0.0562414409517,0.0565899009328,0.0565899009328,0.0571474369026,0.0572868208951,0.0583322008384,0.059447272778,0.0601441927402,0.0609108046986,0.0607714207062,0.0611895726835,0.0602138847364,0.0606320367137,0.0612592646797,0.06070172871,0.06070172871,0.0611895726835,0.0616774166571,0.0620258766382,0.0630712565815,0.0629318725891,0.0630712565815,0.0624440286155,0.0624440286155,0.0633500245664,0.0637681765438,0.064465096506,0.0655801684456,0.0670437003662,0.0673921603473,0.067601236336,0.0680193883133,0.0684375402907,0.0696919962227,0.069482920234,0.0699010722114,0.0712949121358,0.071991832098,0.0736644400074,0.0740128999885,0.0747098199507,0.0754764319092,0.0758248918903,0.076661195845,0.0774278078034,0.079170107709,0.0803548716448,0.0828637835088,0.0831425514937,0.0843273154295,0.0856514633577,0.0882997592142,0.0903208271046,0.0921328190064,0.0933175829422,0.0942932708893,0.0967324907571,0.0994504786098,0.101332162508,0.102726002432,0.104468302338,0.106559062224,0.109137666085,0.111298117968,0.112761649888,0.115200869756,0.117500705631,0.119312697533,0.120985305443,0.122170069378,0.12453959725,0.126978817118,0.128512041035,0.131578488868,0.133529864763,0.135690316646,0.138826456476,0.140917216362,0.142589824272,0.144819968151,0.147886415985,0.150952863818,0.15332239169,0.154437463629,0.157852371444,0.161058203271,0.163915575116,0.166703254965,0.169142474832,0.169909086791,0.173114918617,0.176111674455,0.178063050349,0.179875042251,0.181756726149,0.186007937918,0.190050073699,0.193464981514,0.194789129442,0.198134345261,0.202734017012,0.206358000815,0.211515208536,0.21604518829,0.220993320022,0.225035455803,0.230471431508,0.234583259286,0.238137551093,0.243085682825,0.247824738568,0.252354718322,0.25590901013,0.259881453914,0.265178045627,0.26991710137,0.272913857208,0.276468149015,0.280858744777,0.287200716434,0.29242761615,0.296400059935,0.301487575659,0.305878171421,0.310547535168,0.31605320287,0.321140718594,0.326855462284,0.329782526126,0.335706345805,0.341490781491,0.343581541378,0.3468570652,0.351456736951,0.35738055663,0.361562076403,0.36623144015,0.370552343916,0.374942939678,0.379542611429,0.383724131202,0.389578258885,0.394038546643,0.398498834401,0.403446966133,0.406025569993,0.409161709823,0.414527993533,0.419824585246,0.425609020932,0.431044996637,0.43634158835,0.443798631946,0.450070911606,0.454322123376,0.457249187217,0.460803479024,0.464497154824,0.469166518571,0.473766190322,0.478017402091,0.481502001903,0.484986601714,0.487356129585,0.491816417344,0.4944647132,0.497740237022,0.501433912822,0.504082208679,0.508054652463,0.509518184384,0.511051408301,0.511678636267,0.513072476191,0.513699704157,0.513420936173,0.512514940222,0.511330176286,0.510006028358,0.510563564327,0.511051408301,0.511748328263,0.511399868282,0.510493872331,0.508960648414,0.506172968565,0.502200524781,0.497879621015,0.492304261317,0.486937977608,0.482617073842,0.479411242016,0.475578182224,0.472093582413,0.467633294654,0.4631033149,0.45829456716,0.453485819421,0.448398303697,0.443380479969,0.437177892305,0.4317419166,0.42546963694,0.422403189106,0.417803517355,0.409788937789,0.405816494005,0.400519902292,0.395641462556,0.391250866794,0.385117971127,0.380866759357,0.377870003519,0.372155259829,0.366022364162,0.360586388456,0.355080720755,0.348669057102,0.343302773393,0.336751725748,0.330897598065,0.326925154281,0.322255790534,0.31807427076,0.315356282908,0.311035379142,0.307550779331,0.30406617952,0.29925743178,0.296051599954,0.291382236207,0.284970572555,0.279952748827,0.277095376981,0.273819853159,0.269777717378,0.268523261446,0.265665889601,0.263017593744,0.258278538001,0.253191022277,0.24963673047,0.246082438662,0.242597838851,0.238834471055,0.234374183297,0.230680507497,0.226917139701,0.223571923882,0.220993320022,0.218693484147,0.213745352415,0.20977290863,0.207473072755,0.204894468895,0.20203709705,0.199946337163,0.196531429348,0.194440669461,0.191792373605,0.187680545828,0.186217013907,0.184823173983,0.181687034153,0.180153810236,0.177644898372,0.175554138485,0.174020914568,0.171233234719,0.168097094889,0.166145718995,0.16586695101,0.163148963157,0.16015220732,0.157922063441,0.154994999599,0.15387992766,0.151371015796,0.149349947905,0.147398572011,0.144819968151,0.142311056287,0.1402202964,0.138617380487,0.136387236608,0.134157092729,0.132275408831,0.13081187691,0.129905880959,0.126700049133,0.12398206128,0.123215449322,0.121612533409,0.119661157514,0.117291629643,0.116037173711,0.11513117776,0.112273805915,0.10941643407,0.108231670134,0.105862142262,0.102935078421,0.101820006481,0.100774626538,0.100217090568,0.0997292465947,0.0977778707004,0.0946417308704,0.0935266589309,0.0922722029988,0.0905299030933,0.0898329831311,0.0889269871802,0.0887179111915,0.0862786913237,0.0856514633577,0.0840485474446,0.0837000874635,0.0827940915126,0.0813305595919,0.0793791836976,0.0789610317203,0.0777762677845,0.0781247277656,0.0777065757883,0.0773581158072,0.0770793478223,0.0754764319092,0.0744310519658,0.0742219759772,0.0738735159961,0.0722009080867,0.0712949121358,0.0708767601585,0.0706676841698,0.069482920234,0.0693435362416,0.0691344602529,0.0671830843587,0.0668346243776,0.0665558563927,0.0655801684456,0.0643954045098,0.0643954045098,0.0641863285211,0.0631409485778,0.063210640574,0.0620955686344,0.0608411127024,0.0596563487666,0.0602835767326,0.0593078887855,0.0593775807817,0.0582625088422,0.0574958968837,0.0569383609139,0.0567989769215,0.0558929809706,0.0554748289933,0.0544991410461,0.0535931450953,0.0533143771104,0.0528265331368,0.0519205371859,0.0510842332312,0.0508054652463,0.0501782372803,0.0505266972615,0.049760085303,0.049132857337,0.0485753213672,0.0475996334201,0.0465542534768,0.0458573335145,0.0452997975448,0.0445331855863,0.0440453416127,0.0435574976392,0.0436968816316,0.042860577677,0.0423030417072,0.0420242737223,0.0413273537601,0.0409788937789,0.0405607418016,0.0407001257941,0.0399335138356,0.0400032058318,0.0395850538545,0.0395153618583,0.0400032058318,0.0398638218394,0.0397941298432,0.040072897828,0.0398638218394,0.0393062858696,0.0383305979225,0.0384002899187,0.0383305979225,0.0379821379414,0.0379821379414,0.0366579900131,0.0367276820094,0.0356126100698,0.0353338420849,0.0352641500887,0.0349853821038,0.0350550741,0.0347763061151,0.0345672301265,0.0351944580925,0.0350550741,0.0344975381302,0.0344975381302,0.0340793861529,0.0334521581869,0.0330340062096,0.0334521581869,0.0332430821982,0.0335218501831,0.0338703101642,0.033800618168,0.0333127741944,0.0330340062096,0.0330340062096,0.0331036982058,0.032546162236,0.0326855462284,0.0322673942511,0.0316401662851,0.0315007822927,0.0317795502775,0.0321280102587,0.0318492422738,0.0313613983002,0.0312220143078,0.0313613983002,0.0317098582813,0.0315704742889,0.0315704742889,0.0313613983002,0.0310826303153,0.0309432463229,0.0308038623304,0.0308735543267,0.0308735543267,0.0301766343644,0.0301766343644,0.0299675583758,0.0293403304098,0.0295494063984,0.0297584823871,0.0298281743833,0.0293403304098,0.0292706384135,0.02878279444,0.0285737184513,0.028155566474,0.0280858744777,0.0279464904853,0.0275980305042,0.0271798785269,0.0270404945344,0.0268314185457,0.0266223425571,0.0264829585646,0.026273882576,0.0259254225948,0.0255072706175,0.0251588106364,0.0252285026326,0.02564665461,0.0250194266439,0.0246709666628,0.0250194266439,0.0252981946288,0.0253678866251,0.0253678866251,0.0252285026326,0.0250891186402,0.0252285026326,0.0252285026326,0.0250891186402,0.0248800426515,0.0248800426515,0.0251588106364,0.0250891186402,0.0252981946288,0.0243225066817,0.0243921986779,0.0241831226893,0.0243225066817,0.0239740467006,0.0236255867195,0.0231377427459,0.0233468187346,0.022858974761,0.022858974761,0.0226498987724,0.0224408227837,0.022231746795,0.022231746795,0.0225802067762,0.022231746795,0.022231746795,0.0223711307875,0.0220923628026,0.0218832868139,0.0220923628026,0.0217439028215,0.0212560588479,0.0210469828593,0.0209075988668,0.0212560588479,0.0213257508441,0.0216742108253,0.0216742108253,0.0213954428404,0.0217439028215,0.0216742108253,0.0213954428404,0.0212560588479,0.0211863668517,0.0207682148744,0.0207682148744,0.0204894468895,0.0206288308819,0.0202803709008,0.0204894468895,0.0204197548932,0.0204197548932,0.0202106789046,0.020350062897,0.0202106789046,0.0199319109197,0.019722834931,0.0199319109197,0.0199319109197,0.0194440669461,0.019722834931,0.0195834509386,0.0196531429348,0.0196531429348,0.0200016029159,0.0197925269272,0.0200016029159,0.0201409869084,0.0202106789046,0.0199319109197,0.019722834931,0.0195137589424,0.019095606965,0.0188168389801,0.0188865309764,0.0183289950066,0.0183986870028,0.0187471469839,0.0191652989612,0.0192349909575,0.0193743749499,0.0195137589424,0.0198622189235,0.0196531429348,0.019722834931,0.0195834509386,0.0200016029159,0.0204894468895,0.0204197548932,0.020350062897,0.0205591388857,0.0212560588479,0.0213257508441,0.0214651348366,0.0213954428404,0.0215348268328,0.0213954428404,0.0214651348366,0.0211863668517,0.0211863668517,0.0205591388857,0.0206288308819,0.0204894468895,0.0202106789046,0.0200016029159,0.0202803709008,0.0200016029159,0.0195834509386,0.0195834509386,0.0194440669461,0.0192349909575,0.0192349909575,0.0188865309764,0.0186774549877,0.0183289950066,0.0180502270217,0.0180502270217,0.0181896110141,0.0183289950066,0.018468378999,0.0183986870028,0.0182593030103,0.0177714590368,0.0175623830481,0.0170745390746,0.017213923067,0.0170048470783,0.0169351550821,0.017213923067,0.0170048470783,0.0171442310708,0.0170745390746,0.0173533070595,0.0173533070595,0.0176320750443,0.0174926910519,0.0177714590368,0.0174926910519,0.0175623830481,0.017213923067,0.0170745390746,0.0170745390746,0.017213923067,0.0174229990557,0.0171442310708,0.0170745390746,0.0172836150632,0.0174926910519,0.0177017670406,0.0174229990557,0.0174229990557,0.0172836150632,0.0170745390746,0.0167260790934,0.0160988511274,0.015959467135,0.0158200831426,0.0162382351199,0.0169351550821,0.0169351550821,0.0171442310708,0.017213923067,0.0173533070595,0.0170745390746,0.0165170031048,0.0167957710897,0.0165170031048,0.0164473111086,0.0163079271161,0.0162382351199,0.0158200831426,0.015959467135,0.0157503911463,0.0161685431237,0.0164473111086,0.0167957710897,0.0170048470783,0.0167260790934,0.0170048470783,0.017213923067,0.0174926910519,0.0174229990557,0.0175623830481,0.017841151033,0.0176320750443,0.0180502270217,0.0181199190179,0.0179805350255,0.0181199190179,0.0183986870028,0.0183986870028,0.0187471469839,0.019095606965,0.0189562229726,0.0187471469839,0.0185380709952,0.0186774549877,0.0186774549877,0.0181896110141,0.0179805350255,0.0180502270217,0.017841151033,0.0176320750443,0.0177714590368,0.0177017670406,0.0174926910519,0.017841151033,0.017841151033,0.0176320750443,0.0173533070595,0.0170745390746,0.0168654630859,0.0168654630859,0.017213923067,0.0170745390746,0.0167260790934,0.0162382351199,0.015959467135,0.015332239169,0.0145656272105,0.0141474752332,0.0135899392634,0.0130324032936,0.0126839433125,0.0121264073427,0.0116385633692,0.0113597953843,0.0105931834258,0.00996595545985,0.00940841949006,0.00871149952784,0.00836303954672,0.00787519557316,0.00738735159961,0.00724796760716)
s <- c(0.0107200941111,0.010861147981,0.0108258845136,0.010931674916,0.0107553575786,0.0105085133063,0.0105085133063,0.0107553575786,0.010931674916,0.010861147981,0.0107553575786,0.010931674916,0.0108258845136,0.010861147981,0.010861147981,0.0108964114485,0.0107906210461,0.0110022018509,0.0109669383834,0.010931674916,0.0109669383834,0.010931674916,0.010861147981,0.0107906210461,0.0108258845136,0.0106848306437,0.0105437767738,0.0106495671762,0.0104732498388,0.0106495671762,0.0104379863714,0.0105437767738,0.0103674594364,0.010261669034,0.0102969325015,0.0104027229039,0.0106495671762,0.0106143037087,0.0107200941111,0.010931674916,0.0108964114485,0.0110727287859,0.010861147981,0.0106143037087,0.0106143037087,0.0106143037087,0.0107553575786,0.0105437767738,0.0106848306437,0.0106848306437,0.0105437767738,0.010332195969,0.0105085133063,0.010261669034,0.0102969325015,0.0102969325015,0.010261669034,0.0105437767738,0.0107906210461,0.0109669383834,0.0110374653184,0.0110022018509,0.0111079922533,0.0110727287859,0.0177022606704,0.0179843684101,0.0184075300198,0.0186191108246,0.0190070089668,0.0192185897716,0.0194654340439,0.0195712244463,0.019923859121,0.0203470207307,0.0207701823403,0.0207701823403,0.0212638708849,0.0213343978199,0.021792822897,0.0225686191814,0.0231680981284,0.0238733674778,0.0240496848151,0.024190738685,0.0243317925549,0.0243670560224,0.0245081098922,0.0246844272296,0.0245433733597,0.0247196906971,0.0245081098922,0.0247196906971,0.0245433733597,0.0245433733597,0.02426126562,0.0241554752175,0.0237323136079,0.0237323136079,0.023591259738,0.0234502058681,0.0231328346609,0.0233796789332,0.0236265232055,0.0234149424007,0.0233444154657,0.0237675770754,0.0238381040103,0.0239086309452,0.0237675770754,0.023591259738,0.0237675770754,0.0236617866729,0.0233444154657,0.0233796789332,0.0234502058681,0.0229212538561,0.0227096730512,0.0222159845066,0.0220749306368,0.0215812420922,0.0213696612873,0.0211580804825,0.0212991343524,0.0214754516898,0.0213343978199,0.021122817015,0.0216165055596,0.0212991343524,0.0214754516898,0.0214049247548,0.0216870324946,0.0214401882223,0.0216517690271,0.0216165055596,0.0216870324946,0.0217575594295,0.0222159845066,0.0220396671693,0.021792822897,0.0218280863645,0.0221101941042,0.0216870324946,0.021792822897,0.0219691402343,0.021792822897,0.0218986132994,0.0213696612873,0.0217575594295,0.0219691402343,0.0220749306368,0.0222512479741,0.0222512479741,0.0223217749091,0.022392301844,0.0226391461163,0.022991780791,0.0229212538561,0.0229565173235,0.0228507269211,0.0226391461163,0.0225333557139,0.0226038826488,0.0223217749091,0.022392301844,0.0223570383765,0.0221807210392,0.0220044037018,0.0225333557139,0.0225686191814,0.022392301844,0.0224628287789,0.0223570383765,0.0221807210392,0.0221101941042,0.0223217749091,0.0224980922464,0.0221807210392,0.0221807210392,0.0222865114416,0.0222159845066,0.0222865114416,0.0223217749091,0.0226744095838,0.0223217749091,0.0221807210392,0.0221454575717,0.0217575594295,0.0219691402343,0.0216165055596,0.0218986132994,0.0215107151572,0.021122817015,0.0214049247548,0.0214754516898,0.0216870324946,0.0220044037018,0.0222512479741,0.0224628287789,0.0224275653115,0.0224628287789,0.0227801999862,0.0230270442585,0.0231680981284,0.022991780791,0.0229212538561,0.0232738885308,0.0231328346609,0.0231680981284,0.0233444154657,0.0233444154657,0.0232386250633,0.0232386250633,0.0234149424007,0.0235559962705,0.0230975711934,0.0230270442585,0.0231680981284,0.0234149424007,0.0232386250633,0.0235207328031,0.0236617866729,0.0235559962705,0.0239438944127,0.0239791578802,0.0240849482826,0.0239086309452,0.0244375829573,0.0246844272296,0.0245786368272,0.0246844272296,0.0245433733597,0.02426126562,0.0241554752175,0.0240496848151,0.0241202117501,0.0241202117501,0.0238028405428,0.023591259738,0.023591259738,0.0234502058681,0.023591259738,0.0234854693356,0.0237323136079,0.0239438944127,0.0239086309452,0.0239438944127,0.0237675770754,0.0239438944127,0.0237675770754,0.0238028405428,0.024190738685,0.0242260021525,0.0243317925549,0.0241202117501,0.0241202117501,0.0239086309452,0.0240144213477,0.0244375829573,0.0243317925549,0.0242965290874,0.0245081098922,0.0246844272296,0.0244728464248,0.0246844272296,0.0246139002947,0.0247196906971,0.024790217632,0.0249312715019,0.0252486427091,0.0252486427091,0.0252486427091,0.0251428523067,0.025389696579,0.0252486427091,0.0249665349694,0.0255307504489,0.0255660139164,0.0254954869814,0.0253544331115,0.0252486427091,0.0252486427091,0.0255307504489,0.0258481216561,0.0258128581887,0.0260949659284,0.0262360197983,0.0264123371357,0.0262712832658,0.0262360197983,0.0263770736682,0.0265181275381,0.0269412891477,0.0271528699526,0.0275407680947,0.0277523488996,0.0280697201068,0.0280697201068,0.0282460374442,0.0281402470417,0.0279639297044,0.0283165643791,0.0281402470417,0.0281402470417,0.0280697201068,0.0284223547815,0.0287397259888,0.0289160433261,0.0293039414683,0.0291981510659,0.0296918396105,0.0301150012201,0.0299739473502,0.0300092108177,0.0302207916225,0.03025605509,0.0306086897647,0.030855534037,0.0306439532322,0.0304676358948,0.0302913185575,0.0301502646876,0.0299739473502,0.0300797377526,0.0304323724274,0.0305381628298,0.0303971089599,0.0303265820249,0.0305734262972,0.0308907975045,0.0304676358948,0.03025605509,0.0302207916225,0.0302207916225,0.0300092108177,0.0303971089599,0.0307497436346,0.0306086897647,0.0307850071021,0.0306792166996,0.0311376417768,0.030855534037,0.0308202705695,0.030855534037,0.0306439532322,0.0308907975045,0.0311729052442,0.0313492225816,0.0314197495165,0.031455012984,0.0317723841912,0.0320192284635,0.032054491931,0.0319839649961,0.0324423900732,0.0326187074105,0.0333592402274,0.0337824018371,0.0345934615889,0.0342055634467,0.0348050423937,0.0352282040034,0.0355455752106,0.0360392637552,0.03625084456,0.0356866290805,0.0356866290805,0.0361097906902,0.0361803176251,0.0360392637552,0.0364271618974,0.0362155810926,0.0364624253649,0.036920850442,0.0373087485842,0.0378377005962,0.0379434909986,0.038119808336,0.0386487603481,0.0391071854252,0.0394950835674,0.0398124547746,0.0397771913071,0.0396361374372,0.0401298259818,0.0407998318638,0.0410114126686,0.041187730006,0.0418224724204,0.042316160965,0.0425982687048,0.0431624841843,0.0433035380542,0.0433035380542,0.0430919572494,0.0439382804687,0.0436209092615,0.0439030170012,0.0443261786109,0.0451372383627,0.0454546095699,0.0461246154519,0.0470767290736,0.0474646272158,0.0480288426953,0.0491572736544,0.0493335909917,0.0500741238086,0.0504620219508,0.0509204470279,0.05144939904,0.052048877987,0.0524367761292,0.0531420454786,0.0531420454786,0.0530715185436,0.0535299436208,0.0541294225678,0.0548699553847,0.0553989073967,0.0552225900594,0.0555399612666,0.0561394402136,0.0568094460956,0.0567389191606,0.0570210269004,0.0573031346402,0.0580789309245,0.0582199847944,0.0591720984161,0.0600889485703,0.0608294813872,0.0616758046065,0.0614289603342,0.0619579123463,0.0614994872692,0.0620284392812,0.0625221278258,0.0624868643584,0.0626279182283,0.0631568702403,0.0642147742644,0.0649905705488,0.0657311033657,0.0666126900525,0.0666832169874,0.0667184804549,0.0674590132718,0.0682348095561,0.0690106058405,0.0697511386574,0.070773779214,0.0720080005755,0.072572216055,0.073171695002,0.0738769643515,0.0747232875708,0.0759927723997,0.0765922513467,0.0771564668262,0.0786022689926,0.079836490354,0.0809649213131,0.0816701906625,0.0833981005686,0.0846323219301,0.0857607528891,0.0862191779663,0.0871360281205,0.0890755188314,0.0901334228555,0.0922492309038,0.0931308175905,0.0948234640291,0.0960929488581,0.0985966550485,0.100359828422,0.101946684458,0.103145642352,0.104732498388,0.106601462164,0.108999377952,0.110586233989,0.112208353492,0.113936263398,0.115840490642,0.11823840643,0.120953693425,0.123069501473,0.125432153794,0.127547961842,0.129346398683,0.131356416329,0.13329590704,0.135517505491,0.137844894344,0.139043852238,0.141371241091,0.143240204867,0.14542653985,0.147401294028,0.149305521272,0.151209748515,0.154383460587,0.157592436127,0.160801411667,0.163587225597,0.165279872036,0.168030422499,0.170393074819,0.173813631164,0.176035229615,0.178256828065,0.179667366764,0.183370030848,0.186191108246,0.188835868306,0.191656945704,0.194442759634,0.197969106381,0.201319135791,0.203752315047,0.205444961485,0.208124985013,0.211404487488,0.215107151572,0.218915606059,0.223147222156,0.226885149708,0.230446759922,0.235313118433,0.239932632672,0.244058458366,0.248219547527,0.252698007896,0.256929623993,0.260491234207,0.263982317487,0.267755508506,0.27202238807,0.274984519338,0.278264021813,0.282460374442,0.287256206018,0.291840456789,0.295825228613,0.299668946567,0.303724245327,0.308731657707,0.313069064206,0.317441734173,0.322167038814,0.325763912496,0.330418690202,0.335426102583,0.33867034159,0.342267215272,0.347803579665,0.352916782448,0.357289452415,0.36264949947,0.366845852099,0.37157115674,0.377530682743,0.382679148994,0.387651297907,0.392588183353,0.395761895425,0.400839834741,0.404718816163,0.409655701609,0.415333119872,0.420587376525,0.426687956397,0.432471165063,0.437584367846,0.444460744003,0.449785527591,0.453629245545,0.457755071239,0.46233932201,0.466429884237,0.470978871541,0.475563122312,0.479653684539,0.483638456363,0.48660058763,0.490796940259,0.494781712084,0.497532262546,0.501093872761,0.504514429106,0.507899721983,0.51142606873,0.513471349843,0.515093469347,0.515093469347,0.516786115785,0.517456121667,0.516680325383,0.516151373371,0.515446104022,0.513682930648,0.515058205879,0.515516630957,0.515340313619,0.513894511453,0.511990284209,0.509945003096,0.507617614243,0.504514429106,0.500635447684,0.495874879575,0.492207478958,0.489456928496,0.486459533761,0.482157390729,0.479830001876,0.476303655129,0.472459937175,0.467875686403,0.463573543372,0.459906142755,0.454228724492,0.44826919849,0.443226522641,0.437760685183,0.433423278684,0.429121135653,0.421997915224,0.418048406867,0.413287838759,0.408139372508,0.40253248118,0.397101907189,0.392411866016,0.388850255801,0.38370178955,0.378482796365,0.373052222374,0.367692175319,0.362367391731,0.356866290805,0.351188872542,0.346110933227,0.341561945923,0.336730850879,0.332569761718,0.328831834166,0.323965475655,0.319169644079,0.314232758633,0.309436927057,0.304394251208,0.299104731088,0.293462576293,0.288666744716,0.285493032644,0.281120362678,0.276395058037,0.273715034509,0.270611849371,0.266415496742,0.261513874764,0.255589612229,0.251040624925,0.247373224308,0.243600033289,0.240602638554,0.236512076327,0.232597831438,0.228648323081,0.225051449399,0.221736683457,0.219303504201,0.214013984081,0.209253415972,0.206573392444,0.203893368917,0.200719656844,0.198039633316,0.194478023102,0.191727472639,0.188589024034,0.184921623417,0.182594234564,0.180478426516,0.17818630113,0.176458391224,0.174166265839,0.171874140453,0.169652542002,0.167219362747,0.163340381325,0.160730884732,0.159637717241,0.157098747583,0.154171879783,0.152161862137,0.150645533036,0.149658155946,0.148106563378,0.145779174525,0.143240204867,0.140630708274,0.138620690628,0.136681199917,0.134565391869,0.132343793418,0.13022798537,0.127759542647,0.127054273298,0.126102159676,0.122998974538,0.12046000488,0.119225783519,0.117427346678,0.115664173304,0.113689419126,0.112560988167,0.111503084143,0.109281485692,0.107518312319,0.106213564022,0.104450390649,0.102017211393,0.101065097771,0.0998661398775,0.0988082358534,0.0981734934389,0.0966571643376,0.0944003024195,0.0936245061351,0.0921081770339,0.0910150095423,0.089569207376,0.0884407764169,0.0874886627952,0.0855844355518,0.0849144296698,0.0837859987108,0.0829749389589,0.082304933077,0.0815644002601,0.0799775442239,0.0794485922119,0.078038053513,0.0775443649684,0.0769096225539,0.0766275148142,0.0760985628021,0.0748996049081,0.0742295990262,0.0734538027418,0.0729248507297,0.071373258161,0.0704564080068,0.0700332463971,0.0692221866453,0.0682348095561,0.0673532228693,0.0667890073898,0.0656958398982,0.0652021513536,0.0643558281343,0.0635447683825,0.0625926547608,0.0622752835535,0.0612526429969,0.06051211018,0.0600889485703,0.0591015714812,0.058043667457,0.0573736615751,0.0573736615751,0.0563862844859,0.056315757551,0.0556104882015,0.0547289015148,0.0539883686979,0.0536004705557,0.0530715185436,0.0528952012063,0.0523662491942,0.0515904529099,0.0509204470279,0.0507441296906,0.050179914211,0.049580435264,0.0493335909917,0.049051483252,0.0490162197845,0.0482756869676,0.0475704176182,0.0473941002808,0.0466888309314,0.0460188250495,0.0459130346471,0.0450314479603,0.0445730228832,0.0443261786109,0.044114597806,0.0439030170012,0.0432682745867,0.042986166847,0.0425982687048,0.0421751070952,0.0417519454855,0.0414345742783,0.0413287838759,0.0406940414614,0.0407645683963,0.0403766702541,0.0402003529168,0.0404119337216,0.0403766702541,0.0402003529168,0.0402356163843,0.039918245177,0.0392835027625,0.0384724430107,0.0383666526083,0.038119808336,0.0379787544661,0.0376966467264,0.0369561139095,0.0365682157673,0.0360745272227,0.0359687368203,0.0358629464179,0.035651365613,0.0355455752106,0.0353692578733,0.0348403058612,0.0351576770684,0.0347345154588,0.0345934615889,0.0343466173166,0.0343466173166,0.0340292461094,0.0336413479672,0.0340645095769,0.0339939826419,0.0342760903817,0.0341350365118,0.0340997730443,0.0337824018371,0.0335002940973,0.0331476594226,0.0330771324877,0.032653970878,0.0325481804756,0.0323365996708,0.0318076476587,0.0318429111262,0.0320192284635,0.0322308092684,0.032125018866,0.0319839649961,0.0315960668539,0.0316313303214,0.0317371207238,0.0318076476587,0.0316313303214,0.0317018572563,0.0317371207238,0.0311729052442,0.0310671148418,0.0310671148418,0.0311376417768,0.0307497436346,0.0307497436346,0.0301855281551,0.0300444742852,0.0300797377526,0.0301502646876,0.0303618454924,0.0300797377526,0.0299386838828,0.0297271030779,0.0298681569478,0.0297976300129,0.0300092108177,0.0299034204153,0.0296918396105,0.0294449953382,0.0295507857406,0.0295507857406,0.0294097318707,0.0293392049358,0.0291276241309,0.0288455163912,0.0285281451839,0.0284928817165,0.0282460374442,0.0285634086514,0.0281755105092,0.0282107739767,0.0283518278466,0.0285281451839,0.0283518278466,0.0282107739767,0.0282813009116,0.0280697201068,0.0280697201068,0.0279286662369,0.0278228758345,0.0277170854321,0.0279286662369,0.0278228758345,0.0275407680947,0.0275407680947,0.0268354987453,0.0267297083429,0.0264828640706,0.0263418102007,0.0259186485911,0.0254954869814,0.0250370619043,0.0250723253718,0.0248960080344,0.0246139002947,0.0244375829573,0.0242965290874,0.0242260021525,0.0241554752175,0.02426126562,0.0241202117501,0.024190738685,0.0238733674778,0.0236265232055,0.0233091519982,0.0234149424007,0.0230623077259,0.0227096730512,0.0226744095838,0.022392301844,0.0224275653115,0.0225686191814,0.0228154634536,0.0227449365187,0.0226744095838,0.0229212538561,0.0229565173235,0.0228859903886,0.0229212538561,0.0228859903886,0.022991780791,0.0229565173235,0.0226744095838,0.0226391461163,0.0224980922464,0.0226391461163,0.0225686191814,0.0225686191814,0.022392301844,0.0222865114416,0.022392301844,0.0221454575717,0.0217575594295,0.0217575594295,0.0216517690271,0.0214401882223,0.0215107151572,0.0214049247548,0.0216870324946,0.0217222959621,0.021792822897,0.0216517690271,0.0214754516898,0.0215107151572,0.0212991343524,0.021122817015,0.0210522900801,0.0208759727428,0.0206643919379,0.0204880746006,0.0203470207307,0.0198533321861,0.019923859121,0.0198885956536,0.0199591225885,0.019994386056,0.0197475417837,0.0197828052512,0.019994386056,0.0198533321861,0.0197828052512,0.0197122783162,0.0198533321861,0.0201707033933,0.0201707033933,0.0202059668608,0.0202764937957,0.0206291284705,0.0207701823403,0.0209817631452,0.0209817631452,0.0210522900801,0.0209112362102,0.0208407092753,0.0204880746006,0.0204880746006,0.0201354399259,0.019994386056,0.0201707033933,0.0199591225885,0.019923859121,0.0200649129909,0.0198885956536,0.0195712244463,0.0195006975114,0.0194654340439,0.019394907109,0.0196064879138,0.0192538532391,0.0190422724343,0.0188306916294,0.0187601646945,0.0188659550969,0.0190422724343,0.0191833263041,0.0192891167066,0.0192538532391,0.0191480628367,0.0189364820319,0.0186896377596,0.0184427934873,0.0185133204222,0.0184780569547,0.0183370030848,0.0184075300198,0.0180548953451,0.0183017396174,0.0181606857475,0.0183722665523,0.0185485838897,0.0185838473571,0.0185485838897,0.0189012185644,0.018724901227,0.0185485838897,0.0185133204222,0.018195949215,0.018195949215,0.018195949215,0.0183370030848,0.0182312126824,0.0180548953451,0.018195949215,0.0180901588126,0.018195949215,0.0179491049427,0.0179491049427,0.0178080510728,0.017596470268,0.0173143625282,0.0168912009185,0.0167854105161,0.0167501470487,0.016926464386,0.0172790990607,0.0173496259957,0.0174906798655,0.0176317337354,0.0175612068005,0.0173143625282,0.0170675182559,0.0172438355933,0.0170322547884,0.016996991321,0.016996991321,0.0167854105161,0.0166443566462,0.0166796201137,0.0162211950366,0.0165738297113,0.0167148835812,0.0167854105161,0.0170322547884,0.0168559374511,0.0171027817234,0.0171380451908,0.0173143625282,0.0173848894631,0.017525943333,0.0177022606704,0.0176317337354,0.0179491049427,0.0180196318776,0.0178433145403,0.0177375241378,0.0178785780077,0.0179843684101,0.0180901588126,0.0180548953451,0.01812542228,0.0178785780077,0.0177022606704,0.0178080510728,0.0176669972029,0.0174554163981,0.0173143625282,0.0173143625282,0.0171027817234,0.0167148835812,0.0167148835812,0.0164680393089,0.0165033027764,0.0167501470487,0.0167148835812,0.0168206739836,0.0166443566462,0.0165738297113,0.0164680393089,0.016397512374,0.0167148835812,0.0167148835812,0.0166796201137,0.0164680393089,0.0162564585041,0.0159038238294,0.0153396083498,0.0153043448824,0.0148811832727,0.014528548598,0.0144932851305,0.0143522312606,0.0141406504558,0.013929069651,0.0136116984438,0.0135059080413,0.0131180098992,0.0128006386919,0.012659584822,0.0123069501473,0.012060105875,0.0119190520052,0.00828691485565,0.00835744179059,0.00846323219301,0.00860428606289,0.0087100764653,0.00874533993277,0.00860428606289,0.00863954953036,0.00881586686772,0.0089569207376,0.00888639380266,0.0089569207376,0.00885113033519,0.00913323807495,0.00909797460748,0.00906271114001,0.00878060340024,0.00860428606289,0.00874533993277,0.00885113033519,0.00916850154242,0.00902744767254,0.00930955541231,0.00941534581472,0.00920376500989,0.00920376500989,0.00916850154242,0.00934481887978,0.00916850154242,0.00916850154242,0.00909797460748,0.00934481887978,0.00913323807495,0.00906271114001,0.00909797460748,0.00927429194484,0.00938008234725,0.00941534581472,0.00941534581472,0.00941534581472,0.00938008234725,0.0095563996846,0.00966219008702,0.00959166315207,0.00945060928219,0.00909797460748,0.00916850154242,0.00899218420507,0.00899218420507,0.00885113033519,0.00881586686772,0.00881586686772,0.00892165727013,0.00881586686772,0.00867481299783,0.00853375912795,0.00835744179059,0.00842796872554,0.00832217832312,0.00814586098577,0.00818112445324,0.00821638792071,0.0081105975183,0.00796954364841)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("FoxA1.vs.input.MCF7_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=129"),bty="n")
dev.off()