# R script for Peak Model
#  -- generated by MACS
p <- c(0.0359372625239,0.0384828186194,0.0403545510425,0.0417770676841,0.0440231465918,0.0452210553426,0.0470927877658,0.0484404351104,0.0512854683936,0.0530074622228,0.0555530183183,0.0575744893352,0.0598954375399,0.0609436076969,0.0628902094169,0.0643875953554,0.0659598505908,0.0670828900447,0.0670080207478,0.0667085435601,0.0660347198878,0.0676818444201,0.0676818444201,0.0681310602017,0.0692540996555,0.0688797531709,0.067831583014,0.0676069751232,0.0704520084063,0.070751485594,0.0691792303586,0.0694038382494,0.0687300145771,0.0700776619217,0.0714253092663,0.0708263548909,0.0704520084063,0.0689546224678,0.0686551452801,0.0694787075463,0.0690294917648,0.0694787075463,0.0696284461402,0.0700027926248,0.0694038382494,0.0693289689525,0.0693289689525,0.0692540996555,0.0684305373894,0.0706766162971,0.0712007013756,0.0711258320786,0.0732221723925,0.0735965188772,0.0732970416895,0.0741206039556,0.0750190355187,0.0741954732526,0.0731473030956,0.0741954732526,0.0729226952048,0.0735965188772,0.0735965188772,0.0733719109864,0.0712007013756,0.0715001785633,0.0723237408294,0.0715001785633,0.071799655751,0.0703771391094,0.0696284461402,0.0704520084063,0.070751485594,0.0713504399694,0.071799655751,0.0721740022356,0.0729975645018,0.0738211267679,0.0735965188772,0.0732970416895,0.0725483487202,0.0726980873141,0.0712755706725,0.0714253092663,0.0729975645018,0.0712755706725,0.0708263548909,0.0712755706725,0.0700776619217,0.0703022698125,0.0703022698125,0.0689546224678,0.0687300145771,0.0691792303586,0.0706017470002,0.0690294917648,0.0697033154371,0.0684305373894,0.0670828900447,0.0669331514509,0.0665588049662,0.0670828900447,0.0664839356693,0.0675321058263,0.0679813216078,0.0688797531709,0.0679064523109,0.0689546224678,0.069778184734,0.0693289689525,0.0694038382494,0.0681310602017,0.0676069751232,0.067756713717,0.0691043610617,0.0696284461402,0.0691792303586,0.0706017470002,0.070751485594,0.0705268777032,0.0687300145771,0.0683556680924,0.0667085435601,0.0669331514509,0.0655855041062,0.0658849812939,0.0657352427001,0.0663341970755,0.0663341970755,0.0659598505908,0.0653608962154,0.0646870725431,0.0643127260585,0.0651362883247,0.0654357655124,0.0665588049662,0.0685054066863,0.0679813216078,0.0683556680924,0.0673823672324,0.0673823672324,0.0661844584816,0.065810111997,0.0652860269185,0.0659598505908,0.0673074979355,0.0664839356693,0.0666336742632,0.065810111997,0.0651362883247,0.0639383795739,0.0644624646523,0.0646870725431,0.0631148173077,0.0631148173077,0.0641629874646,0.0640132488708,0.0644624646523,0.066783412857,0.0671577593416,0.0675321058263,0.066783412857,0.0673823672324,0.0674572365293,0.0661844584816,0.0667085435601,0.0661095891847,0.0687300145771,0.0689546224678,0.0693289689525,0.0695535768432,0.0685054066863,0.0673074979355,0.0682807987955,0.0690294917648,0.069778184734,0.0695535768432,0.0706017470002,0.0722488715325,0.072772956611,0.0718745250479,0.0725483487202,0.072772956611,0.0734467802833,0.0741954732526,0.0729226952048,0.0729226952048,0.072772956611,0.0732970416895,0.0732221723925,0.0729975645018,0.0729226952048,0.0738211267679,0.0735216495802,0.0736713881741,0.0731473030956,0.0740457346587,0.0752436434095,0.0753933820034,0.0751687741126,0.0751687741126,0.0736713881741,0.0754682513003,0.0738959960649,0.0734467802833,0.0729975645018,0.0738211267679,0.0764415521603,0.0751687741126,0.0741954732526,0.0735216495802,0.0735216495802,0.0726232180171,0.0723986101264,0.0702274005155,0.0689546224678,0.068804883874,0.0676069751232,0.0685054066863,0.0672326286386,0.0671577593416,0.0673823672324,0.0679064523109,0.0692540996555,0.0691043610617,0.0699279233279,0.070751485594,0.0694038382494,0.0688797531709,0.0690294917648,0.0673823672324,0.0668582821539,0.0653608962154,0.0642378567616,0.0634891637923,0.0631896866046,0.0631896866046,0.0646870725431,0.0636389023862,0.0628902094169,0.0634891637923,0.0632645559015,0.0631896866046,0.0614676927753,0.0611682155876,0.0616174313692,0.0616923006661,0.0619917778538,0.0622163857446,0.0621415164477,0.0627404708231,0.0632645559015,0.0625158629323,0.0625158629323,0.0622912550415,0.0634142944954,0.0632645559015,0.0645373339493,0.0640881181677,0.06281534012,0.0628902094169,0.0634142944954,0.06378864098,0.0634142944954,0.0637137716831,0.0637137716831,0.0643127260585,0.0651362883247,0.0655855041062,0.0658849812939,0.0675321058263,0.0684305373894,0.0690294917648,0.0698530540309,0.0700027926248,0.0698530540309,0.0701525312186,0.0708263548909,0.0705268777032,0.0708263548909,0.0729226952048,0.0728478259079,0.0738211267679,0.0739708653618,0.0752436434095,0.0763666828634,0.0775645916142,0.0782384152865,0.0782384152865,0.0772651144265,0.0762918135665,0.0753933820034,0.0768907679419,0.0783132845834,0.0806342327881,0.0816824029451,0.0819818801328,0.0820567494297,0.0823562266174,0.0830300502897,0.0842279590405,0.0854258677913,0.0855756063852,0.0855756063852,0.086773515136,0.0865489072452,0.0860248221667,0.0858750835729,0.0863242993544,0.086773515136,0.087746815996,0.0881211624806,0.087746815996,0.0878965545898,0.0882709010744,0.0874473388083,0.0865489072452,0.0875222081052,0.0875970774021,0.0888698554498,0.0891693326375,0.0878965545898,0.0870729923237,0.0884955089652,0.0902175027945,0.0925384509992,0.0926133202961,0.0939609676407,0.0926133202961,0.0908164571699,0.0891693326375,0.0885703782621,0.0881211624806,0.0869232537298,0.0858002142759,0.085725344979,0.0844525669313,0.0843028283374,0.0849766520098,0.0853509984944,0.0839284818528,0.0846023055251,0.0849017827128,0.0868483844329,0.0869232537298,0.0858002142759,0.0850515213067,0.0849766520098,0.0855756063852,0.086773515136,0.0859499528698,0.0865489072452,0.0863991686513,0.0848269134159,0.0842279590405,0.0833295274774,0.0838536125559,0.0849766520098,0.0858002142759,0.0846023055251,0.0831797888836,0.0838536125559,0.0853509984944,0.0852761291975,0.0854258677913,0.0869232537298,0.0860248221667,0.0849017827128,0.0854258677913,0.0861745607606,0.0869981230267,0.0884955089652,0.0892442019345,0.0890195940437,0.0893190712314,0.0892442019345,0.0914902808422,0.0923887124053,0.0922389738115,0.0914154115453,0.0914902808422,0.0912656729514,0.0898431563099,0.0894688098252,0.0881960317775,0.0873724695114,0.0879714238867,0.0890944633406,0.0898431563099,0.0901426334976,0.0910410650607,0.0895436791222,0.0890195940437,0.0878216852929,0.0869232537298,0.086773515136,0.0881960317775,0.0852012599005,0.0843776976344,0.0844525669313,0.0851263906036,0.084752044119,0.0851263906036,0.0855756063852,0.0855756063852,0.0849017827128,0.084752044119,0.0830300502897,0.0831049195866,0.0834043967743,0.0829551809928,0.0828803116959,0.0815326643512,0.0808588406789,0.0808588406789,0.0789871082558,0.0789122389588,0.0798855398189,0.0826557038051,0.0836290046651,0.0831797888836,0.0834792660713,0.0839284818528,0.0840782204467,0.0842279590405,0.0851263906036,0.0849766520098,0.0856504756821,0.0863242993544,0.0869981230267,0.0875970774021,0.0875970774021,0.0863242993544,0.0881211624806,0.0881960317775,0.0885703782621,0.0896185484191,0.0890195940437,0.0892442019345,0.0901426334976,0.0896185484191,0.089693417716,0.0893190712314,0.0891693326375,0.088720116856,0.0894688098252,0.0920143659207,0.0924635817022,0.092688189593,0.0933620132653,0.0931374053746,0.0946347913131,0.0956080921731,0.0954583535792,0.0950091377977,0.0963567851423,0.0984531254562,0.0977793017839,0.0995012956132,0.0994264263163,0.0984531254562,0.0982285175655,0.098677733347,0.0987526026439,0.0988274719409,0.100474596473,0.102570936787,0.103544237647,0.104966754289,0.104517538507,0.104966754289,0.10541597007,0.105790316555,0.108710219135,0.109458912104,0.111405513824,0.112678291872,0.115298717264,0.11784427336,0.11979087508,0.119117051408,0.118892443517,0.117469926875,0.117170449687,0.118667835626,0.119865744377,0.119716005783,0.120389829455,0.119716005783,0.120090352268,0.12076417594,0.120539568049,0.11979087508,0.120614437346,0.120614437346,0.119117051408,0.120090352268,0.120464698752,0.121138522424,0.123384601332,0.124507640786,0.123833817114,0.123159993441,0.123534339926,0.1217374768,0.12076417594,0.121887215394,0.121437999612,0.121512868909,0.120015482971,0.119566267189,0.117245318984,0.116945841797,0.116421756718,0.115747933046,0.115972540937,0.117769404063,0.118667835626,0.118667835626,0.119042182111,0.120090352268,0.119491397892,0.120090352268,0.120240090861,0.119641136486,0.121213391721,0.120314960158,0.120090352268,0.120913914534,0.120839045237,0.119416528595,0.120614437346,0.119191920704,0.119117051408,0.119117051408,0.117020711094,0.115598194452,0.115448455858,0.114699762889,0.113651592732,0.115822802343,0.11784427336,0.118518097032,0.118592966329,0.118742704923,0.119341659298,0.120389829455,0.123908686411,0.126903458288,0.126678850397,0.128176236335,0.130197707352,0.131919701182,0.132069439776,0.134315518683,0.136861074779,0.13828359142,0.139481500171,0.143000357127,0.145396174628,0.149963201741,0.151834934164,0.155728137604,0.159172125262,0.161792550655,0.166958532143,0.171076343473,0.175119285507,0.179536574026,0.183280038872,0.185825594968,0.190317752783,0.193537132551,0.196681643022,0.198703114039,0.201248670134,0.203120402557,0.204917265683,0.204318311308,0.20671412881,0.206863867403,0.206339782325,0.205591089356,0.201248670134,0.198553375445,0.197355466694,0.195034518489,0.193612001848,0.190542360674,0.189569059814,0.186274810749,0.183280038872,0.178638142463,0.174670069726,0.170103042613,0.166509316361,0.161792550655,0.157599870027,0.151760064867,0.147342776348,0.14412339658,0.137684637045,0.132967871339,0.128625452117,0.124956856568,0.119191920704,0.114400285701,0.109234304213,0.104891884992,0.100399727176,0.0983782561593,0.0961321772516,0.0922389738115,0.0881960317775,0.0875970774021,0.0840782204467,0.0809337099758,0.0799604091158,0.0782384152865,0.0788373696619,0.0776394609111,0.0781635459896,0.0773399837234,0.0756179898941,0.0755431205972,0.0744949504403,0.0742703425495,0.0743452118464,0.0756179898941,0.0769656372388,0.0783132845834,0.0786876310681,0.0798106705219,0.0785378924742,0.0809337099758,0.0813080564604,0.0819818801328,0.0834792660713,0.0833295274774,0.0846771748221,0.0851263906036,0.0865489072452,0.0874473388083,0.088720116856,0.0888698554498,0.0900677642006,0.0898431563099,0.0904421106853,0.0905169799822,0.0914902808422,0.0899180256068,0.0893190712314,0.0908164571699,0.0904421106853,0.0911908036545,0.0905169799822,0.0911908036545,0.0897682870129,0.0898431563099,0.0889447247468,0.0888698554498,0.0893939405283,0.0893939405283,0.088720116856,0.0886452475591,0.0880462931837,0.0868483844329,0.0866237765421,0.0859499528698,0.0872976002144,0.0866237765421,0.0869232537298,0.0852761291975,0.0840033511497,0.0834792660713,0.0818321415389,0.0822813573205,0.0825059652112,0.0830300502897,0.0830300502897,0.0825808345082,0.0828803116959,0.0828803116959,0.0811583178666,0.0806342327881,0.0816824029451,0.0816075336481,0.0831049195866,0.0823562266174,0.0819070108358,0.0813829257574,0.0828803116959,0.0823562266174,0.0834792660713,0.082730573102,0.0825808345082,0.0834792660713,0.0830300502897,0.0822064880235,0.0821316187266,0.0810085792727,0.0818321415389,0.0825808345082,0.0825808345082,0.082730573102,0.0821316187266,0.0822064880235,0.0811583178666,0.082730573102,0.0832546581805,0.0839284818528,0.0843776976344,0.0838536125559,0.0833295274774,0.0825059652112,0.0830300502897,0.0825059652112,0.0825059652112,0.0813080564604,0.0816824029451,0.0836290046651,0.0828054423989,0.0835541353682,0.0834792660713,0.0844525669313,0.0842279590405,0.0843776976344,0.0836290046651,0.0830300502897,0.0824310959143,0.0835541353682,0.0840033511497,0.0838536125559,0.0841530897436,0.0846023055251,0.0852012599005,0.0855007370882,0.0855007370882,0.0844525669313,0.083703873962,0.0838536125559,0.0829551809928,0.0824310959143,0.0836290046651,0.0816824029451,0.0814577950543,0.0815326643512,0.0798855398189,0.0799604091158,0.0808588406789,0.0808588406789,0.0789122389588,0.0801850170066,0.0803347556004,0.080709102085,0.080783971382,0.0802598863035,0.0798106705219,0.0798855398189,0.0790619775527,0.0786127617711,0.079735801225,0.079735801225,0.0783881538804,0.0792117161465,0.0778640688019,0.0770405065357,0.0774148530203,0.0772651144265,0.0762169442695,0.0769656372388,0.0774148530203,0.0774897223173,0.0776394609111,0.077714330208,0.0772651144265,0.0774148530203,0.0786127617711,0.0788373696619,0.0780138073957,0.078762500365,0.0780886766927,0.0783881538804,0.0799604091158,0.078762500365,0.0779389380988,0.0779389380988,0.0776394609111,0.0764415521603,0.074719558331,0.0746446890341,0.073746257471,0.0739708653618,0.0736713881741,0.0741206039556,0.0744200811433,0.0732970416895,0.0736713881741,0.0764415521603,0.0783881538804,0.0780138073957,0.0800352784127,0.079735801225,0.0801101477096,0.0808588406789,0.081757272242,0.0819818801328,0.0812331871635,0.081757272242,0.0822064880235,0.082730573102,0.0840033511497,0.0830300502897,0.0830300502897,0.0823562266174,0.0819818801328,0.0818321415389,0.0828054423989,0.0816075336481,0.0803347556004,0.0806342327881,0.0804096248973,0.0798855398189,0.0800352784127,0.0803347556004,0.0810834485697,0.0811583178666,0.0813080564604,0.0813080564604,0.0813829257574,0.0810085792727,0.0808588406789,0.0806342327881,0.0790619775527,0.075767728488,0.0746446890341,0.074719558331,0.0735965188772,0.0744949504403,0.0743452118464,0.0724734794233,0.0723237408294,0.0726232180171,0.0726232180171,0.0721740022356,0.0716499171571,0.0714253092663,0.0695535768432,0.0694787075463,0.0703022698125,0.0703771391094,0.0701525312186,0.0705268777032,0.0712755706725,0.0715750478602,0.0744200811433,0.0753185127064,0.0756928591911,0.0760672056757,0.0774897223173,0.0773399837234,0.0771902451296,0.0782384152865,0.0779389380988,0.0768158986449,0.0771902451296,0.076741029348,0.0771153758326,0.0784630231773,0.0789871082558,0.0790619775527,0.0795111933342,0.0801101477096,0.079735801225,0.0806342327881,0.0822813573205,0.0815326643512,0.0804096248973,0.0801101477096,0.0795111933342,0.0791368468496,0.0792117161465,0.0781635459896,0.0783881538804,0.077789199505,0.0764415521603,0.0756179898941,0.0762918135665,0.0762169442695,0.0754682513003,0.0744949504403,0.0720991329387,0.0723237408294,0.0703771391094,0.0703771391094,0.0686551452801,0.0691043610617,0.0687300145771,0.0682807987955,0.068804883874,0.0691043610617,0.0681310602017,0.0679813216078,0.066783412857,0.0653608962154,0.0651362883247,0.0657352427001,0.06476194184,0.065810111997,0.0661844584816,0.06476194184,0.06184203926,0.0631148173077,0.0645373339493,0.0636389023862,0.0640881181677,0.0638635102769,0.0620666471507,0.061767169963,0.0621415164477,0.0627404708231,0.0640881181677,0.0653608962154,0.0660347198878,0.0655855041062,0.0644624646523,0.0645373339493,0.0645373339493,0.0634142944954,0.0650614190277,0.0639383795739,0.0652111576216,0.0639383795739,0.0649116804339,0.0637137716831,0.0634142944954,0.0633394251985,0.06476194184,0.0651362883247,0.0659598505908,0.0675321058263,0.0689546224678,0.0686551452801,0.0682807987955,0.0670080207478,0.0675321058263,0.0667085435601,0.0682807987955,0.0692540996555,0.0691792303586,0.0683556680924,0.068804883874,0.0702274005155,0.0710509627817,0.0720991329387,0.072772956611,0.0741954732526,0.0721740022356,0.0718745250479,0.0699279233279,0.0699279233279,0.0724734794233,0.0731473030956,0.0725483487202,0.0723237408294,0.0722488715325,0.0723986101264,0.0712007013756,0.0715750478602,0.0710509627817,0.0712007013756,0.0712755706725,0.0710509627817,0.0716499171571,0.0723237408294,0.0726232180171,0.071799655751,0.0705268777032,0.0708263548909,0.0710509627817,0.071724786454,0.071724786454,0.0720991329387,0.0718745250479,0.071724786454,0.0722488715325,0.0734467802833,0.0730724337987,0.0712007013756,0.0709760934848,0.0711258320786,0.0704520084063,0.0703022698125,0.071799655751,0.0721740022356,0.0742703425495,0.0738959960649,0.0709760934848,0.071799655751,0.0735216495802,0.0734467802833,0.0722488715325,0.0724734794233,0.0718745250479,0.0721740022356,0.071724786454,0.0723237408294,0.0729226952048,0.0731473030956,0.0720242636417,0.0705268777032,0.0706017470002,0.0705268777032,0.071724786454,0.0715750478602,0.0713504399694,0.0706766162971,0.0705268777032,0.0720242636417,0.0716499171571,0.0714253092663,0.0703022698125,0.0687300145771,0.0689546224678,0.0698530540309,0.0694038382494,0.0698530540309,0.0701525312186,0.0691792303586,0.0682059294986,0.0679064523109,0.0661844584816,0.0673823672324,0.0688797531709,0.0685054066863,0.0676818444201,0.0689546224678,0.0705268777032,0.0699279233279,0.0724734794233,0.0733719109864,0.0738959960649,0.0742703425495,0.0734467802833,0.0738959960649,0.0743452118464,0.0762918135665,0.0750939048157,0.0759923363788,0.0745698197372,0.0756179898941,0.0764415521603,0.0780138073957,0.0774897223173,0.0780886766927,0.0779389380988,0.0786127617711,0.0791368468496,0.0822813573205,0.0821316187266,0.0822064880235,0.0849766520098,0.0851263906036,0.0852761291975,0.0854258677913,0.0852012599005,0.0846771748221,0.0853509984944,0.0848269134159,0.0860996914636,0.0859499528698,0.0853509984944,0.0859499528698,0.0862494300575,0.087746815996,0.0855756063852,0.0852012599005,0.0849766520098,0.0843028283374,0.0844525669313,0.0845274362282,0.0843776976344,0.083703873962,0.0844525669313,0.0830300502897,0.082730573102,0.0823562266174,0.0826557038051,0.0798855398189,0.0796609319281,0.0783881538804,0.0789871082558,0.0772651144265,0.0784630231773,0.0768158986449,0.0762918135665,0.0758425977849,0.0741954732526,0.0738211267679,0.0733719109864,0.0734467802833,0.0738211267679,0.0753185127064,0.0746446890341,0.0742703425495,0.0722488715325,0.0734467802833,0.0738211267679,0.0735965188772,0.0728478259079,0.0726232180171,0.0729975645018,0.0723986101264,0.0714253092663,0.0720991329387,0.0726980873141,0.0716499171571,0.0713504399694,0.0706766162971,0.0711258320786,0.0715001785633,0.0723237408294,0.0721740022356,0.072772956611,0.0735216495802,0.0748692969249,0.0744200811433,0.0734467802833,0.074794427628,0.0730724337987,0.0734467802833,0.0734467802833,0.0728478259079,0.0724734794233,0.071799655751,0.0720991329387,0.0718745250479,0.0715750478602,0.0704520084063,0.0715001785633,0.0711258320786,0.0734467802833,0.073746257471,0.0740457346587,0.0735965188772,0.0750190355187,0.0753933820034,0.075767728488,0.0761420749726,0.0771153758326,0.0766661600511,0.0768907679419,0.0770405065357,0.0774148530203,0.0764415521603,0.0760672056757,0.0759923363788,0.0752436434095,0.0753933820034,0.0744949504403,0.0745698197372,0.0741954732526,0.0750190355187,0.0759174670818,0.0753185127064,0.0758425977849,0.075767728488,0.0762169442695,0.0774148530203,0.0775645916142,0.0784630231773,0.0796609319281,0.0798855398189,0.0810085792727,0.0811583178666,0.0825059652112,0.0836290046651,0.0822064880235,0.0800352784127,0.0810834485697,0.0793614547404,0.0779389380988,0.0768907679419,0.0750939048157,0.0733719109864,0.0712007013756,0.0692540996555,0.0668582821539,0.0653608962154,0.0629650787138,0.0620666471507,0.0601200454307,0.0583980516014,0.0566760577721,0.0543551095675,0.0524085078474,0.0506865140182,0.0482906965166,0.045894879015,0.0434241922164,0.0414027211995)
m <- c(0.0430498816128,0.0455248748066,0.0487498659379,0.0507748603691,0.0536998523254,0.0553498477879,0.0565498444879,0.0583498395379,0.0600748347942,0.062249828813,0.0633748257192,0.065549819738,0.0675748141693,0.069749808188,0.0714748034443,0.0731247989068,0.0758247914818,0.0788247832318,0.0785247840568,0.0783747844693,0.0782997846756,0.0779997855006,0.0788247832318,0.0785997838506,0.0780747852943,0.0759747910693,0.0753747927193,0.0752997929256,0.0758997912756,0.0743997954006,0.0708748050943,0.0707998053005,0.0714748034443,0.071849802413,0.0714748034443,0.0707248055068,0.0701998069505,0.0695998086005,0.0683998119005,0.0677998135505,0.0677998135505,0.067949813138,0.067349814788,0.0680248129318,0.0696748083943,0.069749808188,0.0707248055068,0.0698998077755,0.070949804888,0.070349806538,0.0704248063318,0.070349806538,0.0707998053005,0.069749808188,0.0710998044755,0.070949804888,0.0719248022068,0.0716998028255,0.071849802413,0.0722998011755,0.0727497999381,0.0731997987006,0.0737247972568,0.0740247964318,0.0747747943693,0.0759747910693,0.0773997871506,0.0777747861193,0.0784497842631,0.0796497809631,0.0790497826131,0.0792747819943,0.0807747778694,0.0807747778694,0.0809997772506,0.0806247782819,0.0791997822006,0.0800247799319,0.0814497760131,0.0815247758069,0.0806247782819,0.0800247799319,0.0791997822006,0.0790497826131,0.0786747836443,0.0795747811694,0.0812247766319,0.0811497768381,0.0798747803444,0.0797247807569,0.0799497801381,0.0801747795194,0.0789747828193,0.0788247832318,0.0788997830256,0.0791997822006,0.0776997863256,0.0770997879756,0.0764247898318,0.0777747861193,0.0778497859131,0.0776997863256,0.0770997879756,0.0769497883881,0.0767997888006,0.0749997937506,0.0745497949881,0.0755247923068,0.0746247947818,0.0750747935443,0.0735747976693,0.0737247972568,0.0736497974631,0.0729747993193,0.0728247997318,0.0722248013818,0.0716998028255,0.0720748017943,0.0749247939568,0.0749997937506,0.0749997937506,0.0747747943693,0.0727497999381,0.0739497966381,0.0730497991131,0.0737997970506,0.0746997945756,0.0744747951943,0.0740997962256,0.0751497933381,0.0745497949881,0.0751497933381,0.0770247881818,0.0776997863256,0.0776247865318,0.0755997921006,0.0752997929256,0.0756747918943,0.0770997879756,0.0758247914818,0.0749247939568,0.0748497941631,0.0740997962256,0.0730497991131,0.0728997995256,0.072449800763,0.0735747976693,0.0749247939568,0.0749247939568,0.0750747935443,0.0759747910693,0.0756747918943,0.0760497908631,0.0766497892131,0.0756747918943,0.0764247898318,0.0755247923068,0.0740997962256,0.0734997978756,0.0722248013818,0.0731997987006,0.0723748009693,0.069749808188,0.0695998086005,0.0701998069505,0.070049807363,0.0698248079818,0.0678748133443,0.0683248121068,0.0683998119005,0.0689998102505,0.069449809013,0.068249812313,0.0665998168505,0.065549819738,0.0663748174693,0.0656248195317,0.0663748174693,0.0681748125193,0.0677248137568,0.0674248145818,0.0674248145818,0.066749816438,0.0669748158193,0.0680998127255,0.0692998094255,0.0695998086005,0.070949804888,0.0704248063318,0.0693748092193,0.0675748141693,0.066449817263,0.0668998160255,0.0678748133443,0.0687748108693,0.0692248096318,0.0687748108693,0.0695248088068,0.0695248088068,0.0689998102505,0.0692248096318,0.0693748092193,0.0701248071568,0.0722248013818,0.070949804888,0.0707248055068,0.0704998061255,0.0714748034443,0.0717748026193,0.0735747976693,0.0750747935443,0.0750747935443,0.0752247931318,0.0752997929256,0.0753747927193,0.0758997912756,0.0760497908631,0.0767997888006,0.0777747861193,0.0760497908631,0.0758997912756,0.0748497941631,0.0728997995256,0.0719248022068,0.0710248046818,0.0714748034443,0.0725248005568,0.0740247964318,0.0746997945756,0.0744747951943,0.0743247956068,0.0749247939568,0.0755247923068,0.0758247914818,0.0756747918943,0.0767997888006,0.0770247881818,0.0760497908631,0.0747747943693,0.0729747993193,0.0726748001443,0.0730497991131,0.0725248005568,0.0711748042693,0.0710248046818,0.0702748067443,0.0686248112818,0.0677248137568,0.0668998160255,0.0657748191192,0.0647248220067,0.0651748207692,0.064349823038,0.0632248261317,0.0633748257192,0.0641998234505,0.0630748265442,0.0638248244817,0.0650998209755,0.0650998209755,0.0659248187067,0.0659998185005,0.0653248203567,0.0644248228317,0.0623998284005,0.0630748265442,0.064349823038,0.064049823863,0.063149826338,0.063149826338,0.0644248228317,0.0647248220067,0.064049823863,0.0641248236567,0.0644998226255,0.064049823863,0.064649822213,0.0638248244817,0.064349823038,0.0650248211817,0.0651748207692,0.0650998209755,0.0650998209755,0.0660748182942,0.0674998143755,0.067949813138,0.0675748141693,0.0671998152005,0.0674998143755,0.0677248137568,0.0690748100443,0.0692248096318,0.069149809838,0.067649813963,0.067649813963,0.067349814788,0.0671248154068,0.066749816438,0.0672748149943,0.067349814788,0.0689248104568,0.0698248079818,0.069149809838,0.0690748100443,0.0692248096318,0.0680248129318,0.0681748125193,0.0672748149943,0.0674998143755,0.0674248145818,0.0674998143755,0.0702748067443,0.069449809013,0.0717748026193,0.0723748009693,0.071849802413,0.0735747976693,0.0731247989068,0.0733497982881,0.0731997987006,0.0734247980818,0.0740997962256,0.0746247947818,0.0737997970506,0.0734247980818,0.0732747984943,0.072449800763,0.0728247997318,0.0736497974631,0.0751497933381,0.0749247939568,0.0747747943693,0.0752247931318,0.0764997896256,0.0769497883881,0.0777747861193,0.0777747861193,0.0764997896256,0.0764997896256,0.0760497908631,0.0779997855006,0.0779997855006,0.0775497867381,0.0772497875631,0.0770997879756,0.0778497859131,0.0785997838506,0.0772497875631,0.0769497883881,0.0746997945756,0.0743997954006,0.0758247914818,0.0740247964318,0.0744747951943,0.0743997954006,0.0736497974631,0.0737247972568,0.072449800763,0.0725248005568,0.0728997995256,0.0737247972568,0.0740247964318,0.0728247997318,0.0713248038568,0.071549803238,0.070049807363,0.0699748075693,0.0695998086005,0.0692248096318,0.0677998135505,0.0678748133443,0.0659998185005,0.0647248220067,0.065249820563,0.064649822213,0.0650248211817,0.064049823863,0.063449825513,0.0639748240692,0.0635998251005,0.0636748248942,0.0636748248942,0.0626248277817,0.063449825513,0.0657748191192,0.0656248195317,0.0656248195317,0.0644248228317,0.0645748224192,0.063749824688,0.0642748232442,0.0659248187067,0.0653248203567,0.0671998152005,0.0665998168505,0.0672748149943,0.0663748174693,0.0668998160255,0.0668998160255,0.0677248137568,0.0677248137568,0.0681748125193,0.0684748116943,0.069149809838,0.070649805713,0.0716998028255,0.0713248038568,0.0732747984943,0.0746997945756,0.0746997945756,0.0755997921006,0.0760497908631,0.0761997904506,0.0769497883881,0.0774747869443,0.0786747836443,0.0787497834381,0.0773247873568,0.0772497875631,0.0756747918943,0.0748497941631,0.0764247898318,0.0764997896256,0.0761997904506,0.0752997929256,0.0758247914818,0.0759747910693,0.0754497925131,0.0764997896256,0.0758247914818,0.0762747902443,0.0756747918943,0.0761247906568,0.0758247914818,0.0758997912756,0.0751497933381,0.0747747943693,0.0755997921006,0.0758997912756,0.0749997937506,0.0736497974631,0.0731247989068,0.0725998003505,0.0725248005568,0.0713248038568,0.0710998044755,0.0711748042693,0.0701248071568,0.0693748092193,0.0695248088068,0.0687748108693,0.0681748125193,0.0695248088068,0.070949804888,0.072449800763,0.0723748009693,0.0727497999381,0.0713248038568,0.0710998044755,0.0714748034443,0.0728997995256,0.0729747993193,0.0727497999381,0.0725248005568,0.0719998020005,0.0707248055068,0.0699748075693,0.0701248071568,0.0719248022068,0.0713998036505,0.0720748017943,0.0730497991131,0.0738747968443,0.0732747984943,0.0716248030318,0.0725998003505,0.0728247997318,0.0728247997318,0.0728997995256,0.0730497991131,0.0733497982881,0.0734247980818,0.0737247972568,0.0737997970506,0.0744747951943,0.0761247906568,0.0749247939568,0.0745497949881,0.0736497974631,0.0732747984943,0.0732747984943,0.0736497974631,0.072449800763,0.0733497982881,0.0744747951943,0.0749247939568,0.0754497925131,0.0780747852943,0.0791997822006,0.0799497801381,0.0788997830256,0.0801747795194,0.0808497776631,0.0810747770444,0.0791997822006,0.0787497834381,0.0779247857068,0.0774747869443,0.0770247881818,0.0772497875631,0.0799497801381,0.0800997797256,0.0803247791069,0.0806997780756,0.0796497809631,0.0795747811694,0.0799497801381,0.0797247807569,0.0790497826131,0.0802497793131,0.0813747762194,0.0797247807569,0.0800247799319,0.0816747753944,0.0825747729194,0.0837747696194,0.0828747720944,0.0844497677631,0.0863247626069,0.0863247626069,0.0852747654944,0.0861747630194,0.0857247642569,0.0831747712694,0.0826497727131,0.0819747745694,0.0836997698256,0.0830247716819,0.0841497685881,0.0839247692069,0.0850497661131,0.0860247634319,0.0868497611632,0.0875247593069,0.0869247609569,0.0864747621944,0.0851997657006,0.0871497603382,0.0870747605444,0.0868497611632,0.0888747555944,0.0888747555944,0.0890997549757,0.0904497512632,0.0898497529132,0.0883497570382,0.0867747613694,0.0866997615757,0.0872997599257,0.0862497628132,0.0845997673506,0.0850497661131,0.0844497677631,0.0833997706506,0.0836247700319,0.0846747671444,0.0842247683819,0.0841497685881,0.0845997673506,0.0845247675569,0.0832497710631,0.0836247700319,0.0824247733319,0.0839247692069,0.0837747696194,0.0839997690006,0.0844497677631,0.0862497628132,0.0852747654944,0.0854997648756,0.0863997624007,0.0869997607507,0.0877497586882,0.0870747605444,0.0903747514694,0.0921747465194,0.0944997401257,0.096224735382,0.0983997294007,0.0991497273382,0.101924719707,0.104024713932,0.109199699701,0.113924686707,0.117674676395,0.121874664845,0.126599651851,0.130049642363,0.133724632257,0.138524619057,0.140924612457,0.144599602351,0.149924587707,0.15277457987,0.158249564814,0.162449553264,0.166649541714,0.170549530989,0.175724516758,0.179324506858,0.182474498195,0.186449487264,0.188699481076,0.19057447592,0.193724467258,0.19597446107,0.19897445282,0.201224446633,0.201674445395,0.20257444292,0.19957445117,0.199049452614,0.197324457358,0.197549456739,0.198449454264,0.199349451789,0.197849455914,0.19717445777,0.193799467051,0.191699472826,0.189449479014,0.186899486026,0.184349493039,0.182024499433,0.181724500258,0.179099507476,0.176399514901,0.172199526451,0.168599536351,0.16597454357,0.16297455182,0.16057455842,0.157349567289,0.155024573682,0.151649582964,0.147674593895,0.145499599876,0.14197460957,0.140999612251,0.140099614726,0.139649615964,0.138899618026,0.136874623595,0.134549629989,0.13297463432,0.13177463762,0.133274633495,0.131849637413,0.131999637001,0.130649640713,0.127499649376,0.123749659688,0.125024656182,0.127274649995,0.127424649582,0.125549654738,0.124874656595,0.126224652882,0.126149653088,0.124274658245,0.122024664432,0.121799665051,0.122474663195,0.122324663607,0.121424666082,0.122249663813,0.121124666907,0.120899667526,0.121649665463,0.120299669176,0.120224669382,0.120524668557,0.120224669382,0.121199666701,0.119249672063,0.117674676395,0.117149677838,0.116324680107,0.116924678457,0.117299677426,0.118724673507,0.119024672682,0.118199674951,0.119699670826,0.119624671032,0.120224669382,0.121949664638,0.124499657626,0.124874656595,0.123674659895,0.122924661957,0.124199658451,0.124349658038,0.122549662988,0.122999661751,0.12397465907,0.123899659276,0.123224661132,0.121424666082,0.121349666288,0.122399663401,0.122924661957,0.121649665463,0.122324663607,0.123149661338,0.123449660513,0.121874664845,0.122024664432,0.123074661545,0.123074661545,0.123899659276,0.123599660101,0.122699662576,0.123899659276,0.122624662782,0.12157466567,0.121499665876,0.122399663401,0.122099664226,0.12397465907,0.123149661338,0.122849662163,0.121649665463,0.120149669588,0.117674676395,0.115874681345,0.115874681345,0.11377468712,0.112649690213,0.11137469372,0.109499698876,0.107924703207,0.10837470197,0.107099705476,0.106274707745,0.10597470857,0.106649706713,0.104474712695,0.105299710426,0.104099713726,0.103724714757,0.103274715995,0.103874714345,0.102074719295,0.100349724038,0.0999747250695,0.0993747267195,0.0989997277507,0.098924727957,0.0966747341445,0.0972747324945,0.0987747283695,0.097424732082,0.0953997376507,0.0948747390945,0.092624745282,0.0914247485819,0.0896247535319,0.0893247543569,0.0894747539444,0.0913497487882,0.0908247502319,0.0897747531194,0.0897747531194,0.0905247510569,0.0905997508507,0.0903747514694,0.0911247494069,0.0911997492007,0.0911997492007,0.0916497479632,0.0917247477569,0.0902997516757,0.0898497529132,0.0899997525007,0.0893997541507,0.0892497545632,0.0893247543569,0.0901497520882,0.0917247477569,0.0917997475507,0.0922497463132,0.0930747440445,0.093824741982,0.0940497413632,0.0951747382695,0.094724739507,0.0943497405382,0.095024738682,0.0960747357945,0.0961497355882,0.0966747341445,0.098024730432,0.098924727957,0.0992997269258,0.0999747250695,0.098324729607,0.0993747267195,0.100124724657,0.102074719295,0.101999719501,0.102599717851,0.10297471682,0.101699720326,0.100724723007,0.101024722182,0.102599717851,0.102599717851,0.102299718676,0.104024713932,0.103349715788,0.103199716201,0.100724723007,0.099524726307,0.0991497273382,0.0988497281632,0.0986997285757,0.0976497314632,0.0976497314632,0.096524734557,0.0953997376507,0.0952497380632,0.094724739507,0.0957747366195,0.0960747357945,0.0959997360007,0.0965997343507,0.0947997393007,0.095324737857,0.095924736207,0.096224735382,0.0951747382695,0.0956997368257,0.0964497347632,0.0966747341445,0.095924736207,0.0948747390945,0.0950997384757,0.0943497405382,0.0954747374445,0.095324737857,0.0955497372382,0.0937497421882,0.0941997409507,0.0939747415695,0.0919497471382,0.0911247494069,0.0907497504382,0.0912747489944,0.0927747448695,0.0921747465194,0.0917997475507,0.0902997516757,0.0904497512632,0.0905247510569,0.0900747522944,0.0898497529132,0.0896247535319,0.0902247518819,0.0882747572444,0.0875247593069,0.0878997582757,0.0883497570382,0.0886497562132,0.0873747597194,0.0862497628132,0.0858747638444,0.0856497644631,0.0854247650819,0.0828747720944,0.0813747762194,0.0800997797256,0.0800247799319,0.0800247799319,0.0820497743631,0.0816747753944,0.0819747745694,0.0816747753944,0.0820497743631,0.0812997764256,0.0806997780756,0.0805497784881,0.0803997789006,0.0803247791069,0.0812997764256,0.0802497793131,0.0800247799319,0.0793497817881,0.0802497793131,0.0790497826131,0.0777747861193,0.0782997846756,0.0793497817881,0.0781497850881,0.0768747885943,0.0761997904506,0.0760497908631,0.0747747943693,0.0732747984943,0.0716998028255,0.071249804063,0.070949804888,0.0698248079818,0.0689998102505,0.067649813963,0.0698248079818,0.0702748067443,0.0710998044755,0.0723748009693,0.0710248046818,0.0696748083943,0.0686998110755,0.0689248104568,0.070049807363,0.0692998094255,0.068249812313,0.0701998069505,0.0704248063318,0.0701998069505,0.070349806538,0.0692998094255,0.069449809013,0.070949804888,0.071249804063,0.0710998044755,0.0717748026193,0.0702748067443,0.0692998094255,0.068249812313,0.0680248129318,0.0675748141693,0.0674998143755,0.0678748133443,0.0666748166443,0.066149818088,0.0668998160255,0.0677248137568,0.0674998143755,0.0668998160255,0.0677998135505,0.0692998094255,0.0689248104568,0.068549811488,0.067949813138,0.0678748133443,0.068549811488,0.0683998119005,0.0690748100443,0.0699748075693,0.0687748108693,0.0698998077755,0.0704248063318,0.068549811488,0.0681748125193,0.0687748108693,0.0701998069505,0.0692998094255,0.0684748116943,0.0662248178818,0.0657748191192,0.066449817263,0.065549819738,0.066449817263,0.0656248195317,0.0656998193255,0.0653248203567,0.0662248178818,0.0671998152005,0.066749816438,0.0680248129318,0.0687748108693,0.0687748108693,0.0677998135505,0.068549811488,0.069749808188,0.0689248104568,0.0689248104568,0.0683998119005,0.0680248129318,0.0680248129318,0.067049815613,0.067049815613,0.0656998193255,0.0644998226255,0.0638998242755,0.0635998251005,0.0633748257192,0.0636748248942,0.0635248253067,0.0632998259255,0.0626248277817,0.0602998341755,0.0615748306692,0.0621748290192,0.061949829638,0.0626998275755,0.0618748298442,0.062249828813,0.0618748298442,0.0626248277817,0.0620248294317,0.0626248277817,0.0620998292255,0.0617248302567,0.0602248343817,0.0593998366504,0.0589498378879,0.0599248352067,0.0609748323192,0.060149834588,0.0596248360317,0.0596998358255,0.0589498378879,0.0579748405692,0.0593248368567,0.0596248360317,0.0591748372692,0.0594748364442,0.0612748314942,0.0626248277817,0.0623248286067,0.0617248302567,0.062549827988,0.0627748273692,0.063749824688,0.0648748215942,0.0653998201505,0.0665248170568,0.066449817263,0.066449817263,0.068549811488,0.067949813138,0.0686998110755,0.0683248121068,0.0684748116943,0.0687748108693,0.0689248104568,0.0689248104568,0.0692998094255,0.0711748042693,0.0722998011755,0.0727497999381,0.0727497999381,0.0729747993193,0.0732747984943,0.0733497982881,0.0734247980818,0.0752247931318,0.0755247923068,0.0760497908631,0.0753747927193,0.0753747927193,0.0758997912756,0.0755247923068,0.0744747951943,0.0730497991131,0.072449800763,0.0726748001443,0.0727497999381,0.0722998011755,0.0722248013818,0.0722248013818,0.0723748009693,0.0713998036505,0.0707998053005,0.0711748042693,0.070349806538,0.070949804888,0.070949804888,0.0722998011755,0.0722998011755,0.0726748001443,0.0740247964318,0.0744747951943,0.0743997954006,0.0725248005568,0.071549803238,0.0728247997318,0.0722998011755,0.0702748067443,0.0686248112818,0.0690748100443,0.0698998077755,0.0687748108693,0.068249812313,0.068849810663,0.0695998086005,0.0695998086005,0.0698248079818,0.0707998053005,0.0728997995256,0.0750747935443,0.0746997945756,0.0754497925131,0.0743997954006,0.0745497949881,0.0743247956068,0.0731247989068,0.072449800763,0.0731247989068,0.0732747984943,0.0727497999381,0.0723748009693,0.0705748059193,0.070349806538,0.070049807363,0.070049807363,0.0701998069505,0.0701998069505,0.069149809838,0.068549811488,0.068249812313,0.0705748059193,0.068849810663,0.070049807363,0.0707998053005,0.0710248046818,0.0704248063318,0.0692998094255,0.0690748100443,0.0699748075693,0.0702748067443,0.070649805713,0.0710998044755,0.070649805713,0.0699748075693,0.0695248088068,0.067649813963,0.0677248137568,0.0678748133443,0.067349814788,0.067949813138,0.0663748174693,0.0668998160255,0.0666748166443,0.066449817263,0.0668248162318,0.066449817263,0.066149818088,0.0677248137568,0.0677998135505,0.067949813138,0.0681748125193,0.0686248112818,0.068549811488,0.0686998110755,0.0687748108693,0.0695248088068,0.0686248112818,0.0686248112818,0.0674998143755,0.0684748116943,0.0683998119005,0.0686998110755,0.0695998086005,0.0698248079818,0.0695998086005,0.0699748075693,0.0686248112818,0.0671998152005,0.0678748133443,0.0677998135505,0.0665998168505,0.0677998135505,0.0683998119005,0.0681748125193,0.0684748116943,0.0680998127255,0.0695998086005,0.0699748075693,0.0701248071568,0.0720748017943,0.0728247997318,0.0714748034443,0.0698248079818,0.0677998135505,0.0656998193255,0.0632998259255,0.0615748306692,0.0590248376817,0.0566248442817,0.0554998473754,0.0539998515004,0.0516748578941,0.0494998638754,0.0479248682066,0.0467248715066,0.0443998779003,0.0429748818191,0.0413998861503,0.0389998927503)
s <- c(0.0396048017408,0.0394530592054,0.0398703511777,0.0397565442762,0.0394909948392,0.0384287970914,0.0381253120206,0.0380873763867,0.0383908614575,0.0376321487805,0.0358491739895,0.0358112383557,0.0361526590603,0.0363423372296,0.0361526590603,0.0357733027218,0.0355077532848,0.035204268214,0.0345972980724,0.0342938130016,0.0525029172502,0.0538686000689,0.0545135058444,0.0555757035922,0.0575483565525,0.0581932623279,0.0596348164143,0.0599003658513,0.0618730188115,0.0624420533193,0.0637698005041,0.0647561269842,0.0661597454367,0.0661597454367,0.0678289133262,0.0685117547355,0.0698015662865,0.0702567938927,0.0702947295265,0.0703706007942,0.0702567938927,0.0713189916405,0.0715845410775,0.071963897416,0.0729122882623,0.0733295802346,0.0735192584039,0.0735951296716,0.0753781044626,0.0761368171396,0.0750366837579,0.075264297561,0.0756815895334,0.0763644309427,0.0771610792536,0.0766679160135,0.0757574608011,0.0754160400964,0.0759850746042,0.0764403022104,0.0757574608011,0.0756815895334,0.0753401688287,0.0754539757303,0.0749608124902,0.0753781044626,0.0762126884073,0.0761368171396,0.0750746193918,0.0761368171396,0.0765161734781,0.0765920447458,0.0770472723521,0.0771610792536,0.0770472723521,0.0776163068598,0.077312821789,0.0765920447458,0.0757195251673,0.0769334654505,0.0763264953089,0.0765920447458,0.076288559675,0.0760988815058,0.0749228768564,0.0741641641794,0.0743538423486,0.0744297136163,0.0741262285455,0.0736330653054,0.0724949962899,0.07298815953,0.0731019664315,0.0730640307977,0.0732157733331,0.0731019664315,0.0732537089669,0.0738606791085,0.0751884262933,0.0750746193918,0.0746952630533,0.0746573274194,0.0729122882623,0.0735951296716,0.0739365503762,0.0734433871362,0.0736710009393,0.0737848078408,0.07298815953,0.0736330653054,0.0733295802346,0.0729502238961,0.0737848078408,0.0743538423486,0.0750366837579,0.0732157733331,0.0734054515023,0.0729502238961,0.07298815953,0.0722673824868,0.0716224767113,0.0718500905144,0.0711672491051,0.0711672491051,0.0713189916405,0.0715466054436,0.0716224767113,0.0728364169946,0.0732537089669,0.0731019664315,0.0735951296716,0.0727984813607,0.072722610093,0.0731019664315,0.0732916446008,0.0739365503762,0.0732537089669,0.0732537089669,0.0730260951638,0.0722673824868,0.0718500905144,0.0712431203728,0.0690807892433,0.0691187248771,0.0687393685386,0.0688152398063,0.0686255616371,0.0679427202277,0.0681703340308,0.0680185914954,0.0680185914954,0.0679047845939,0.067108136283,0.0666908443106,0.0663114879721,0.0672978144523,0.0679047845939,0.0680185914954,0.0691187248771,0.068397947834,0.0682462052985,0.0676392351569,0.067108136283,0.0669563937476,0.06786684896,0.069156660511,0.068891111074,0.069649823751,0.0689669823417,0.0680944627631,0.0665770374091,0.0662735523383,0.0666149730429,0.0663114879721,0.0667667155783,0.0675254282554,0.0672219431846,0.0678289133262,0.0690049179756,0.0689290467079,0.0692325317787,0.0689290467079,0.0696118881172,0.0707120214989,0.0694222099479,0.0695739524833,0.069156660511,0.0709775709358,0.0712431203728,0.0723432537545,0.0732157733331,0.0726846744592,0.0721535755852,0.0726846744592,0.0731019664315,0.073746872207,0.0737089365731,0.0746193917856,0.0759471389704,0.0753401688287,0.0748090699548,0.0746193917856,0.073746872207,0.0735951296716,0.0735192584039,0.0731019664315,0.0736330653054,0.0743159067148,0.0749228768564,0.074771134321,0.0745814561517,0.0748470055887,0.0756057182657,0.0756057182657,0.0756057182657,0.0759092033365,0.0764782378443,0.0765920447458,0.0760230102381,0.0749987481241,0.0748470055887,0.0742779710809,0.0749228768564,0.0734433871362,0.0731399020654,0.0725329319237,0.0721156399514,0.07298815953,0.0719259617821,0.0708637640343,0.0699912444557,0.0702188582588,0.0693463386802,0.0686634972709,0.0676392351569,0.0674116213538,0.0667667155783,0.0665391017752,0.0676392351569,0.0669943293815,0.06737368572,0.0675254282554,0.0674495569877,0.0676771707908,0.0665770374091,0.0673357500861,0.068397947834,0.0675633638892,0.066842586846,0.0669184581137,0.0667287799445,0.0666149730429,0.0655148396612,0.0649837407873,0.0647940626181,0.0644147062796,0.0647181913504,0.065059612055,0.0647940626181,0.0647561269842,0.0651354833227,0.0649837407873,0.0649458051535,0.064566448815,0.0651354833227,0.065590710929,0.0654389683935,0.0654010327597,0.0656665821967,0.0657424534644,0.0667287799445,0.0670702006492,0.0666529086768,0.0658941959998,0.0657803890982,0.0661976810706,0.0660080029013,0.0664632305075,0.0665011661414,0.0658941959998,0.0667287799445,0.0674495569877,0.0672978144523,0.0670702006492,0.0672978144523,0.0666908443106,0.0670702006492,0.0670322650153,0.06737368572,0.0674874926215,0.0683600122001,0.0702188582588,0.0701050513573,0.071698347979,0.0720777043175,0.0717362836129,0.0727605457269,0.0728743526284,0.0728364169946,0.0729122882623,0.0740882929117,0.0743917779825,0.0751504906595,0.0748090699548,0.075264297561,0.0757574608011,0.0759471389704,0.0764782378443,0.0768955298166,0.0771610792536,0.076554109112,0.0760230102381,0.0770093367182,0.0783750195369,0.0797786379894,0.0807270288356,0.080878771371,0.0802718012294,0.0804235437648,0.0805373506664,0.0821306472881,0.0827376174298,0.0825858748943,0.0824341323589,0.0829652312329,0.0832307806698,0.0833445875714,0.0825858748943,0.0826617461621,0.0817512909496,0.0820927116543,0.0830031668667,0.081903033485,0.0822065185558,0.0823582610912,0.0815616127804,0.081144320808,0.0809925782726,0.0810684495403,0.081903033485,0.0824720679928,0.0819789047527,0.0809546426387,0.0809167070049,0.081903033485,0.0823203254574,0.0823203254574,0.0828134886975,0.0819409691189,0.0803097368633,0.0795130885524,0.0782612126353,0.0773886930567,0.0770472723521,0.0761747527735,0.0763264953089,0.0751884262933,0.0748090699548,0.0754160400964,0.0754160400964,0.0747331986871,0.0750746193918,0.0746952630533,0.0760988815058,0.077312821789,0.0766679160135,0.076288559675,0.0756436538996,0.0760230102381,0.0762126884073,0.0760609458719,0.0771990148875,0.0768196585489,0.0769714010844,0.0763644309427,0.0762506240412,0.0760609458719,0.0768955298166,0.077312821789,0.0771231436198,0.0764023665766,0.0769714010844,0.0778818562968,0.0781853413676,0.0790199253123,0.0803097368633,0.0796648310878,0.0800821230602,0.0810684495403,0.0814478058788,0.0823203254574,0.0833066519375,0.0837618795437,0.0840274289807,0.0844447209531,0.0850137554608,0.0861897601102,0.0859242106733,0.0858104037717,0.0845964634885,0.08421710715,0.0848999485593,0.08421710715,0.0838756864453,0.0827755530636,0.0826238105282,0.0830031668667,0.0833066519375,0.08421710715,0.0840274289807,0.08471027039,0.0836480726422,0.0836101370083,0.0828514243313,0.0824341323589,0.0819789047527,0.0825100036266,0.081409870245,0.081144320808,0.0807270288356,0.080385608131,0.0799303805248,0.0798545092571,0.0800441874263,0.0794372172847,0.0789819896785,0.0789440540446,0.0775404355921,0.0771990148875,0.0774266286906,0.0768196585489,0.0764782378443,0.0764782378443,0.0768575941828,0.0776163068598,0.0766299803797,0.0767817229151,0.076554109112,0.0778439206629,0.0785267620723,0.0790199253123,0.0792096034816,0.0793234103831,0.0792854747493,0.07909579658,0.0789061184108,0.0784508908046,0.0788681827769,0.080120058694,0.0801959299617,0.0808408357372,0.0813339989773,0.0811063851741,0.0817133553158,0.0809167070049,0.0815995484142,0.0822444541897,0.0819409691189,0.0820927116543,0.0826238105282,0.0825100036266,0.0825858748943,0.0825479392605,0.0825100036266,0.0826238105282,0.0838377508114,0.0845205922208,0.0845585278546,0.08421710715,0.0843688496854,0.0842550427838,0.0852034336301,0.0850896267285,0.0854689830671,0.0858104037717,0.0867208589841,0.0880486061689,0.0890349326491,0.0904764867354,0.0908179074401,0.0897936453261,0.0903247442,0.0908937787078,0.0910455212432,0.0901350660308,0.0907420361724,0.0913869419479,0.0916524913848,0.0921456546249,0.0920318477233,0.0936251443451,0.0939286294159,0.0942321144867,0.0959012823762,0.0957495398408,0.096697930687,0.0975325146318,0.098746454915,0.0996948457613,0.101288142383,0.101515756186,0.10056736534,0.0999983308321,0.100681172241,0.101895112525,0.103109052808,0.102577953934,0.10371602295,0.104322993091,0.10451267126,0.104322993091,0.104664413796,0.104057443654,0.103184924076,0.102919374639,0.101819241257,0.103184924076,0.10303318154,0.103943636753,0.104967898867,0.106105967882,0.106257710418,0.106333581685,0.106864680559,0.105650740276,0.104929963233,0.104854091965,0.105612804642,0.105612804642,0.104740285064,0.105536933374,0.104360928725,0.104322993091,0.104740285064,0.104095379288,0.103450473513,0.103564280414,0.103981572387,0.104285057457,0.103943636753,0.103640151682,0.103564280414,0.103564280414,0.103109052808,0.102919374639,0.104247121823,0.103564280414,0.103412537879,0.104057443654,0.103981572387,0.102615889568,0.103412537879,0.102084790694,0.102805567737,0.102729696469,0.101781305623,0.101288142383,0.102122726328,0.101250206749,0.100832914777,0.102388275765,0.10371602295,0.104436799993,0.104133314922,0.105878354079,0.107092294362,0.108799397886,0.111454892255,0.114072450991,0.114338000428,0.116500331557,0.118586791419,0.122076869734,0.124542685934,0.127577536642,0.130991743689,0.134102465664,0.136454474963,0.140096295813,0.143738116663,0.147266130611,0.150073367516,0.15473945048,0.157926043723,0.162023092179,0.16676504641,0.170975901768,0.174997078956,0.179852840089,0.183570532207,0.186453640379,0.190740367004,0.193509668276,0.196051355744,0.198668914479,0.201096795046,0.203562611246,0.205611135474,0.205535264207,0.207204432096,0.20576287801,0.205231779136,0.203979903219,0.201893443357,0.200982988144,0.200831245609,0.198896528283,0.197834330535,0.194571866023,0.193016505036,0.190209268131,0.187402031226,0.183760210376,0.180573617132,0.178107800932,0.174959143322,0.171203515571,0.16695472458,0.162174834714,0.158608885132,0.155460227523,0.150983822728,0.14696264554,0.143586374127,0.140020424545,0.135088792145,0.131560778196,0.12716024467,0.124466814666,0.121735449029,0.120483573112,0.118966147758,0.115969232684,0.112744703806,0.111644570424,0.109254625492,0.108420041547,0.107206101264,0.106409452953,0.106030096614,0.103829829851,0.102198597595,0.102426211399,0.102691760836,0.102729696469,0.101250206749,0.100794979143,0.101515756186,0.102122726328,0.101857176891,0.101401949285,0.101477820552,0.102388275765,0.101667498722,0.102426211399,0.10303318154,0.102805567737,0.103450473513,0.103753958583,0.103753958583,0.103943636753,0.104816156331,0.105119641402,0.106257710418,0.105347255205,0.105157577036,0.104778220697,0.104664413796,0.1050058345,0.10568867591,0.105612804642,0.105461062107,0.105802482811,0.106371517319,0.106712938024,0.10667500239,0.107888942673,0.108457977181,0.108685590984,0.107623393236,0.107206101264,0.108116556476,0.108192427744,0.106940551827,0.107130229996,0.107319908165,0.10667500239,0.106219774784,0.104967898867,0.105612804642,0.105802482811,0.106219774784,0.104740285064,0.104436799993,0.104588542528,0.103905701119,0.103336666611,0.10352634478,0.104322993091,0.104322993091,0.10451267126,0.10451267126,0.104057443654,0.103791894217,0.102881439005,0.102881439005,0.102805567737,0.10401950802,0.103488409146,0.10420918619,0.10352634478,0.104133314922,0.103260795343,0.103071117174,0.101439884918,0.100453558438,0.100908786045,0.0996189744936,0.0986326480135,0.0979498066041,0.0964323812501,0.0960530249116,0.0966599950532,0.0960150892777,0.0956736685731,0.0952184409668,0.0955977973054,0.0939665650497,0.095180505333,0.0948390846283,0.0949908271637,0.0949908271637,0.0950287627976,0.0938527581482,0.0925629465972,0.092638817865,0.0920697833572,0.0918801051879,0.0912351994125,0.0902868085662,0.0915766201171,0.0919180408218,0.091614555751,0.0905523580031,0.0907799718062,0.0895280958891,0.0889969970152,0.0877071854643,0.0872519578581,0.087024344055,0.088541769409,0.0885038337752,0.0878968636335,0.0880486061689,0.0886555763106,0.0889969970152,0.0890349326491,0.0894142889876,0.0889211257475,0.088541769409,0.0888452544798,0.0884279625075,0.0874416360273,0.0878209923658,0.0869105371534,0.086493245181,0.0864553095472,0.0856586612363,0.0861138888425,0.0873657647596,0.0874037003935,0.0866449877164,0.0877071854643,0.0881624130705,0.0884658981413,0.0890728682829,0.0885797050429,0.0881624130705,0.088541769409,0.0886555763106,0.0884658981413,0.089300482086,0.0899833234954,0.0897557096923,0.0903626798339,0.0900212591292,0.0887693832121,0.0894901602553,0.0897936453261,0.0902488729323,0.090590293637,0.0911213925109,0.091349006314,0.0907799718062,0.0903247442,0.0902488729323,0.0911213925109,0.0917283626525,0.0916904270187,0.0921456546249,0.0921835902587,0.0917662982864,0.0906661649047,0.0908558430739,0.0900591947631,0.0894901602553,0.0894142889876,0.0887314475783,0.0881244774366,0.0866829233503,0.0860759532087,0.0855448543348,0.0853931117993,0.0857724681379,0.0861518244764,0.0862656313779,0.086000081941,0.0852793048978,0.0869484727873,0.0882382843382,0.0882003487043,0.0886935119444,0.088807318846,0.0893763533537,0.0898695165938,0.0899453878615,0.0895280958891,0.0892625464522,0.0891487395506,0.0899453878615,0.0901350660308,0.0908937787078,0.0894901602553,0.0897177740584,0.0892625464522,0.0880486061689,0.0875554429289,0.0878589279997,0.087517507295,0.0876313141966,0.0874795716612,0.0871760865904,0.0861518244764,0.0863035670118,0.086493245181,0.0866449877164,0.0865691164487,0.0865311808149,0.0868346658857,0.0858862750394,0.0853172405316,0.0854310474332,0.0855448543348,0.0848999485593,0.0825858748943,0.0814478058788,0.0812960633434,0.0806132219341,0.0809546426387,0.0795889598201,0.0778818562968,0.0771610792536,0.0772748861552,0.0772748861552,0.078071534466,0.0776163068598,0.0776542424937,0.076554109112,0.0767058516474,0.0767437872812,0.0764782378443,0.076288559675,0.0764023665766,0.0767437872812,0.0773886930567,0.0782991482691,0.0786405689738,0.0784888264384,0.0791337322139,0.0792475391154,0.0785267620723,0.0787164402415,0.0797786379894,0.0790199253123,0.0778059850291,0.0776542424937,0.0773507574229,0.0768955298166,0.0768196585489,0.076288559675,0.0760988815058,0.0761747527735,0.0759092033365,0.0753022331949,0.0750746193918,0.0770093367182,0.0768575941828,0.0767058516474,0.0771990148875,0.0762126884073,0.0753401688287,0.0748849412225,0.0744676492502,0.0751504906595,0.0744676492502,0.0732537089669,0.0738227434747,0.0742779710809,0.0741262285455,0.0738227434747,0.0727984813607,0.0716604123452,0.0725329319237,0.071698347979,0.0716224767113,0.0710913778374,0.0705602789635,0.0698774375542,0.0691187248771,0.0692704674125,0.0691945961448,0.0686634972709,0.0687773041725,0.0675633638892,0.0665770374091,0.066842586846,0.0675633638892,0.0669563937476,0.0671840075507,0.0678289133262,0.06786684896,0.0661976810706,0.0666529086768,0.0670702006492,0.0665770374091,0.0671460719169,0.0669563937476,0.0663873592398,0.0666908443106,0.0662735523383,0.0671460719169,0.0680944627631,0.0677909776923,0.0679427202277,0.0680185914954,0.0681703340308,0.0677530420585,0.0673357500861,0.0656286465628,0.0662356167044,0.0660080029013,0.0661976810706,0.0660080029013,0.066083874169,0.0655148396612,0.0651734189566,0.065590710929,0.0668046512122,0.0667667155783,0.0678289133262,0.0690049179756,0.0697256950187,0.0690807892433,0.0692704674125,0.0692325317787,0.0690807892433,0.0686634972709,0.0691945961448,0.0694980812156,0.0694601455818,0.0685496903694,0.0687773041725,0.0688152398063,0.0686255616371,0.0688531754402,0.0690428536094,0.069649823751,0.0687773041725,0.0685496903694,0.0674495569877,0.067108136283,0.0672219431846,0.0682082696647,0.0682082696647,0.0679806558616,0.0683220765662,0.0679806558616,0.0675633638892,0.0675633638892,0.0676771707908,0.0674495569877,0.0677909776923,0.0674116213538,0.0675254282554,0.067108136283,0.066842586846,0.0661976810706,0.0660459385352,0.0667287799445,0.0664252948737,0.0665011661414,0.0665391017752,0.066349423606,0.0657424534644,0.066349423606,0.0667667155783,0.0671460719169,0.067108136283,0.0670702006492,0.0676392351569,0.0675633638892,0.0669184581137,0.0672598788184,0.068132398397,0.0688152398063,0.0704464720619,0.0705223433296,0.0696118881172,0.0699912444557,0.0708637640343,0.0718880261483,0.0709775709358,0.0714707341759,0.0709775709358,0.0712051847389,0.0711293134712,0.0715086698098,0.0718121548806,0.0721156399514,0.0724949962899,0.0723053181206,0.0725708675576,0.0725329319237,0.0732537089669,0.0733295802346,0.0732537089669,0.0729502238961,0.0737848078408,0.0746952630533,0.074771134321,0.0743159067148,0.073746872207,0.0732157733331,0.0731399020654,0.0730640307977,0.0721156399514,0.0720397686837,0.0723053181206,0.0718500905144,0.0711293134712,0.070939635302,0.0700671157234,0.0707499571327,0.0710155065697,0.0705223433296,0.0702947295265,0.0705223433296,0.0716224767113,0.0713189916405,0.0732916446008,0.073746872207,0.0742020998132,0.0750746193918,0.0748849412225,0.0750746193918,0.0743538423486,0.0748470055887,0.0748849412225,0.0750746193918,0.0733295802346,0.0730260951638,0.0736710009393,0.0748849412225,0.0740503572778,0.0740882929117,0.0743159067148,0.0750366837579,0.0753022331949,0.0770093367182,0.0774266286906,0.0785267620723,0.0810305139064,0.0809167070049,0.0813719346111,0.0809167070049,0.080878771371,0.0804994150325,0.0802338655956,0.0796268954539,0.0806132219341,0.0806132219341,0.0800441874263,0.0801579943279,0.0793992816508,0.0800441874263,0.0787923115092,0.07860263334,0.0785646977061,0.0782232770014,0.0777680493952,0.0775024999583,0.0772748861552,0.0781094700999,0.0776163068598,0.0775024999583,0.0777301137614,0.0776542424937,0.0775024999583,0.075529846998,0.0753022331949,0.0751125550256,0.0755677826319,0.0748849412225,0.0757195251673,0.0746573274194,0.0740503572778,0.0735951296716,0.0718121548806,0.0716604123452,0.0715086698098,0.0712810560067,0.0717742192467,0.0717362836129,0.0716604123452,0.0713569272744,0.0702188582588,0.0710155065697,0.0710155065697,0.0707499571327,0.0711672491051,0.0710913778374,0.0713569272744,0.0711672491051,0.0709016996681,0.0712051847389,0.0715845410775,0.0710913778374,0.0713189916405,0.0705223433296,0.0707499571327,0.0703706007942,0.0712810560067,0.0711672491051,0.0716224767113,0.072457060656,0.0732537089669,0.0729122882623,0.0726088031914,0.0726088031914,0.0710155065697,0.0715466054436,0.0715086698098,0.0705982145973,0.0710155065697,0.0709775709358,0.0710155065697,0.0710534422035,0.0707120214989,0.0709016996681,0.0716224767113,0.0715086698098,0.0736710009393,0.0742020998132,0.0736710009393,0.0726088031914,0.0723053181206,0.0714327985421,0.0704085364281,0.0697256950187,0.0689290467079,0.0674874926215,0.0670322650153,0.066349423606,0.0653630971258,0.0637698005041,0.062783474024,0.0621385682485,0.0605832072606,0.0599383014851,0.058686425568,0.0575104209186,0.0375942131467,0.038011505119,0.0384667327253,0.0381632476544,0.0384287970914,0.0383908614575,0.0386184752607,0.0392254454023,0.03930131667,0.0397565442762,0.0403635144178,0.0404773213194,0.0410463558271,0.0411222270948,0.0418050685042,0.0423741030119,0.0416533259688,0.0405531925871,0.041084291461,0.0402117718824)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("22-organelles-nucleus-merged/APETALA2-chip_rep2-GSM532326.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=40"),bty="n")
dev.off()