# R script for Peak Model
#  -- generated by MACS
p <- c(0.0380697521731,0.0400354880857,0.041804650407,0.044163533502,0.0467189901884,0.0487502506313,0.0513057073176,0.0532059186998,0.0559579489774,0.0583823566028,0.0604791415762,0.0624448774888,0.0646071869926,0.0662453002531,0.0686041833481,0.0708320173823,0.0737150967208,0.0760084552854,0.0776465685459,0.078760485563,0.0790881082151,0.0804641233539,0.0800709761713,0.0797433535193,0.0783018138501,0.0778431421371,0.078760485563,0.0773844704242,0.0783673383805,0.0782362893196,0.0783018138501,0.0774499949546,0.0784328629109,0.0794812553976,0.0799399271105,0.0791536327455,0.0792846818063,0.0799399271105,0.0798088780497,0.0790881082151,0.0786949610326,0.0789570591542,0.0783673383805,0.0786949610326,0.0775810440154,0.0772534213634,0.0765981760592,0.0774499949546,0.0770568477721,0.0774499949546,0.0785639119717,0.0784328629109,0.0777120930763,0.0773844704242,0.0767947496504,0.0763360779375,0.0765981760592,0.075942930755,0.0754187345116,0.0745669156162,0.0758774062246,0.0767947496504,0.0762705534071,0.07672922512,0.0764016024679,0.0769913232417,0.0769257987113,0.0774499949546,0.0763360779375,0.0762050288767,0.0760739798158,0.0755497835725,0.075942930755,0.0753532099812,0.0756153081029,0.0753532099812,0.0750911118595,0.0754842590421,0.07515663639,0.07515663639,0.0750255873291,0.0750255873291,0.075942930755,0.0743048174945,0.0745013910858,0.0745013910858,0.0729288023557,0.0735840476599,0.0735185231295,0.073911670312,0.0737150967208,0.0731909004774,0.0733874740687,0.0739771948424,0.0748290137379,0.0758774062246,0.0767947496504,0.075942930755,0.0758118816941,0.0764016024679,0.075942930755,0.0749600627987,0.0744358665554,0.0742392929641,0.0754187345116,0.07515663639,0.0754187345116,0.0770568477721,0.0770568477721,0.0768602741808,0.0773844704242,0.0785639119717,0.0777776176067,0.0767947496504,0.0769913232417,0.0764016024679,0.0771223723025,0.0772534213634,0.0773189458938,0.0786949610326,0.0783673383805,0.077974191198,0.0785639119717,0.0781052402588,0.0788260100934,0.0790881082151,0.0798088780497,0.0803985988234,0.0802020252322,0.0792846818063,0.0785639119717,0.0786949610326,0.0774499949546,0.0786949610326,0.0789570591542,0.0782362893196,0.0785639119717,0.0784983874413,0.078760485563,0.0798744025801,0.0790881082151,0.0783673383805,0.0786294365021,0.0776465685459,0.0785639119717,0.0781707647892,0.0784983874413,0.0783673383805,0.0794157308672,0.0798744025801,0.0812504177189,0.0819711875535,0.0820367120839,0.081578040371,0.0813814667797,0.0803985988234,0.0808572705364,0.081578040371,0.0816435649014,0.0817746139622,0.0814469913101,0.080791746006,0.0799399271105,0.079546779928,0.0798744025801,0.0801365007018,0.0805951724147,0.081119368658,0.080791746006,0.0804641233539,0.0812504177189,0.0814469913101,0.0813814667797,0.0811848931885,0.0813159422493,0.0815125158406,0.0809883195972,0.0814469913101,0.0810538441276,0.0805951724147,0.079546779928,0.0805296478843,0.0802675497626,0.0801365007018,0.0798744025801,0.0796778289888,0.0790225836847,0.080333074293,0.0807262214755,0.0816435649014,0.0819711875535,0.0819711875535,0.0820367120839,0.0819711875535,0.0808572705364,0.0812504177189,0.0809883195972,0.0809883195972,0.0818401384926,0.0811848931885,0.0815125158406,0.0809227950668,0.0815125158406,0.0802675497626,0.081119368658,0.0804641233539,0.0785639119717,0.0792846818063,0.0789570591542,0.0794157308672,0.0791536327455,0.0778431421371,0.0788260100934,0.0788915346238,0.0786294365021,0.0789570591542,0.0790225836847,0.0790225836847,0.0783018138501,0.0778431421371,0.0780397157284,0.0789570591542,0.0782362893196,0.0766637005896,0.0765981760592,0.075942930755,0.0754842590421,0.0756153081029,0.0748290137379,0.0741082439033,0.0748290137379,0.0741737684337,0.0741737684337,0.0737806212512,0.0728632778253,0.073125375947,0.0721425079907,0.0731909004774,0.0727322287645,0.0733874740687,0.0724701306428,0.071880409869,0.0727322287645,0.071880409869,0.0726011797036,0.0727322287645,0.072339081582,0.0721425079907,0.0718148853386,0.071880409869,0.0730598514166,0.072339081582,0.0710285909736,0.0708975419128,0.071094115504,0.0724046061124,0.0714872626865,0.071094115504,0.0712251645649,0.0708320173823,0.0706354437911,0.070307821139,0.0702422966086,0.071094115504,0.072339081582,0.0727322287645,0.0728632778253,0.0729288023557,0.0731909004774,0.0741082439033,0.0743048174945,0.0748945382683,0.0741737684337,0.073125375947,0.072339081582,0.071552787217,0.0719459343995,0.0727322287645,0.0727977532949,0.0741737684337,0.0738461457816,0.073911670312,0.0752876854508,0.0760084552854,0.0762050288767,0.0758118816941,0.075942930755,0.0765326515288,0.077974191198,0.0781052402588,0.0781707647892,0.0776465685459,0.0790881082151,0.0794157308672,0.0788915346238,0.0788260100934,0.0785639119717,0.0794157308672,0.0804641233539,0.0808572705364,0.0811848931885,0.0828230064489,0.0830851045706,0.0837403498748,0.083936923466,0.0833472026923,0.0838713989356,0.0840679725269,0.0855750367265,0.0866889537436,0.0883270670041,0.0895065085516,0.090030704795,0.090358327447,0.0904238519775,0.0904893765079,0.0907514746296,0.0906859500991,0.0901617538558,0.0906859500991,0.0909480482208,0.0912756708729,0.0906204255687,0.0907514746296,0.0913411954033,0.0922585388292,0.09238958789,0.0922585388292,0.0927172105421,0.0935035049071,0.0945518973938,0.0954037162893,0.0963865842455,0.0969107804889,0.0961244861239,0.095993437063,0.0954692408197,0.0938966520896,0.0938966520896,0.0938311275592,0.0941587502113,0.0947484709851,0.0937000784984,0.0941587502113,0.0935690294376,0.0942242747417,0.0942242747417,0.0938311275592,0.0937656030288,0.0935035049071,0.0939621766201,0.0929137841334,0.0938311275592,0.0934379803767,0.0943553238026,0.0930448331942,0.0925206369509,0.0919309161771,0.0917343425858,0.0918653916467,0.0915377689946,0.0908825236904,0.0912101463425,0.0917998671163,0.0920619652379,0.0907514746296,0.090358327447,0.090358327447,0.0893099349604,0.088785738717,0.0889823123083,0.0886546896562,0.0887202141866,0.0897686066733,0.0901617538558,0.0897686066733,0.0902928029166,0.0899651802645,0.09081699916,0.0904893765079,0.0904893765079,0.0902928029166,0.0896375576124,0.0897686066733,0.0898341312037,0.0904893765079,0.0899651802645,0.0908825236904,0.0902928029166,0.0915377689946,0.0906859500991,0.0913411954033,0.0919964407075,0.0931103577246,0.093634553968,0.0933069313159,0.0940277011505,0.0934379803767,0.0937000784984,0.0946174219242,0.0938966520896,0.0944863728634,0.0955347653501,0.0952726672284,0.0960589615935,0.0956658144109,0.0965176333064,0.0966486823672,0.0965176333064,0.0954037162893,0.0963865842455,0.0976970748539,0.0966486823672,0.0977625993843,0.0985488937494,0.0989420409319,0.0991386145231,0.0984178446885,0.0985488937494,0.0990730899927,0.0998593843577,0.0997938598273,0.100711203253,0.100973301375,0.101300924027,0.101366448557,0.101956169331,0.102742463696,0.101890644801,0.102218267453,0.101956169331,0.102611414635,0.101497497618,0.101366448557,0.101366448557,0.100318056071,0.100121482479,0.0993351881144,0.099597286236,0.0999904334186,0.0990730899927,0.0999904334186,0.0995317617056,0.0990075654623,0.100121482479,0.100449105131,0.0996628107665,0.0980902220364,0.0981557465668,0.0975005012627,0.0985488937494,0.0977625993843,0.0975005012627,0.0984178446885,0.0995317617056,0.0999904334186,0.098810991871,0.0995317617056,0.0978281239147,0.0968452559585,0.096452108776,0.0961900106543,0.0954037162893,0.0948139955155,0.0952726672284,0.0952726672284,0.0956002898805,0.0962555351847,0.0960589615935,0.0975660257931,0.0982212710973,0.0974349767322,0.0969107804889,0.0977625993843,0.0963865842455,0.0966486823672,0.0978936484452,0.0976970748539,0.0976970748539,0.0990075654623,0.0989420409319,0.098810991871,0.0994007126448,0.0994007126448,0.0999249088881,0.0997283352969,0.0973694522018,0.098810991871,0.0993351881144,0.0992041390535,0.0990075654623,0.098024697506,0.0988765164014,0.0974349767322,0.0986799428102,0.0988765164014,0.0986799428102,0.0983523201581,0.0984833692189,0.0988765164014,0.0984178446885,0.0976970748539,0.0970418295497,0.0979591729756,0.0996628107665,0.0982867956277,0.0971728786106,0.0965176333064,0.0986799428102,0.0986144182798,0.098810991871,0.0989420409319,0.0989420409319,0.0984833692189,0.0978281239147,0.0973039276714,0.0966486823672,0.0983523201581,0.0975660257931,0.0985488937494,0.0986799428102,0.0984178446885,0.099269663584,0.0982212710973,0.0983523201581,0.0983523201581,0.0975660257931,0.0974349767322,0.0967142068976,0.0973694522018,0.0980902220364,0.0984833692189,0.099597286236,0.0997938598273,0.100383580601,0.0999904334186,0.102742463696,0.10333218447,0.10333218447,0.102087218392,0.100973301375,0.100973301375,0.101890644801,0.103856380713,0.103004561818,0.103070086348,0.104446101487,0.10497029773,0.104446101487,0.104642675078,0.105101346791,0.105101346791,0.1049047732,0.10483924867,0.104118478835,0.104511626017,0.104577150548,0.106280788339,0.106804984582,0.10811547519,0.108639671434,0.108705195964,0.108574146903,0.109032818616,0.109294916738,0.110081211103,0.10968806392,0.110212260164,0.110277784694,0.110539882816,0.110474358286,0.110277784694,0.108770720495,0.109098343147,0.110408833755,0.110343309225,0.110408833755,0.110605407346,0.110212260164,0.109360441268,0.108180999721,0.108967294086,0.108705195964,0.107460229886,0.107918901599,0.107853377069,0.107067082704,0.106084214747,0.1064118374,0.105494493974,0.105363444913,0.104052954305,0.103528758061,0.102283791983,0.101366448557,0.0999904334186,0.098810991871,0.0984833692189,0.0986144182798,0.0978936484452,0.0982212710973,0.0969107804889,0.0957968634718,0.0940277011505,0.0929793086638,0.0929793086638,0.0917998671163,0.0916688180554,0.0909480482208,0.0897686066733,0.0881960179432,0.0885236405953,0.0881960179432,0.087999444352,0.0883270670041,0.0883270670041,0.0882615424737,0.0865579046828,0.0859026593786,0.0861647575003,0.0853784631352,0.0852474140744,0.0857716103178,0.0868200028044,0.0855095121961,0.0857060857873,0.0866889537436,0.0860992329698,0.0854439876657,0.0853129386048,0.0853129386048,0.0852474140744,0.085968183909,0.0850508404832,0.0844611197094,0.084395595179,0.0835437762835,0.0838713989356,0.085181889544,0.0860992329698,0.0859026593786,0.0855095121961,0.0859026593786,0.0859026593786,0.0868855273349,0.0877373462303,0.0883925915345,0.0874097235782,0.0871476254565,0.087213149987,0.0855095121961,0.0849197914223,0.0861647575003,0.0860992329698,0.0856405612569,0.0853784631352,0.0848542668919,0.0840679725269,0.0837403498748,0.0826919573881,0.0838713989356,0.0829540555098,0.0816435649014,0.0822332856752,0.0832161536314,0.0826264328577,0.0824298592664,0.0821022366143,0.0815125158406,0.0817746139622,0.082364334736,0.0835437762835,0.0836748253444,0.0837403498748,0.0828885309793,0.083936923466,0.0838713989356,0.0836748253444,0.0836093008139,0.0835437762835,0.0822332856752,0.0808572705364,0.0794812553976,0.0800054516409,0.0805951724147,0.0808572705364,0.081578040371,0.0820367120839,0.0813814667797,0.0821677611447,0.0826919573881,0.0821022366143,0.0819711875535,0.0826264328577,0.0829540555098,0.0836093008139,0.0826264328577,0.0834127272227,0.0845921687702,0.0850508404832,0.0845266442398,0.0850508404832,0.085968183909,0.0864268556219,0.0861647575003,0.0866889537436,0.085968183909,0.0845921687702,0.0846576933006,0.0848542668919,0.0845266442398,0.0827574819185,0.0828885309793,0.0830195800402,0.0838058744052,0.0837403498748,0.0834782517531,0.0840679725269,0.0856405612569,0.0858371348482,0.0855750367265,0.085968183909,0.0874752481086,0.0865579046828,0.0865579046828,0.0856405612569,0.0847232178311,0.0851163650136,0.0853129386048,0.0849853159527,0.0840679725269,0.0840024479965,0.0836093008139,0.0825609083273,0.0811848931885,0.0801365007018,0.0806606969451,0.0815125158406,0.0804641233539,0.0799399271105,0.0792846818063,0.0786949610326,0.0783673383805,0.0786294365021,0.0794812553976,0.0803985988234,0.0805951724147,0.0809227950668,0.0812504177189,0.0808572705364,0.080333074293,0.0806606969451,0.0813814667797,0.0817090894318,0.0813814667797,0.0802675497626,0.0802020252322,0.0798088780497,0.0789570591542,0.0794812553976,0.0789570591542,0.079546779928,0.0794812553976,0.0788915346238,0.0794157308672,0.0798088780497,0.0802020252322,0.0796778289888,0.0810538441276,0.0817746139622,0.0829540555098,0.0845266442398,0.0840024479965,0.083150629101,0.0829540555098,0.0828230064489,0.0827574819185,0.0830195800402,0.0838058744052,0.0834127272227,0.0832161536314,0.0818401384926,0.0816435649014,0.0810538441276,0.0810538441276,0.0804641233539,0.0808572705364,0.0802020252322,0.0800054516409,0.0796123044584,0.0792191572759,0.0792846818063,0.0794812553976,0.0783673383805,0.0782362893196,0.0786294365021,0.0786949610326,0.0782362893196,0.078760485563,0.0793502063367,0.0790225836847,0.0792191572759,0.0783673383805,0.0788915346238,0.0783673383805,0.0781052402588,0.0771878968329,0.0768602741808,0.0767947496504,0.0756808326333,0.0765981760592,0.0765981760592,0.0768602741808,0.0769913232417,0.0764671269983,0.0769257987113,0.0773844704242,0.077515519485,0.0773844704242,0.0773189458938,0.0764671269983,0.0773844704242,0.0773844704242,0.0773844704242,0.0765326515288,0.0770568477721,0.0781052402588,0.0786949610326,0.0796123044584,0.0810538441276,0.0794812553976,0.0784983874413,0.0782362893196,0.0791536327455,0.0796123044584,0.0807262214755,0.0809883195972,0.0801365007018,0.081119368658,0.0810538441276,0.0819711875535,0.0819711875535,0.082364334736,0.0821022366143,0.0821022366143,0.0825609083273,0.0820367120839,0.082364334736,0.0835437762835,0.0830851045706,0.0827574819185,0.0840024479965,0.0826264328577,0.0838058744052,0.0841334970573,0.0847887423615,0.0846576933006,0.0843300706485,0.0838713989356,0.0836093008139,0.0843300706485,0.0840679725269,0.0822988102056,0.0810538441276,0.0789570591542,0.0783673383805,0.0791536327455,0.0800709761713,0.0800054516409,0.0788915346238,0.0782362893196,0.0771223723025,0.0777776176067,0.0782362893196,0.0780397157284,0.0784328629109,0.0763360779375,0.0754187345116,0.0748290137379,0.0746324401466,0.0743048174945,0.0743048174945,0.0754842590421,0.0752221609204,0.0746324401466,0.0745013910858,0.0744358665554,0.073125375947,0.0728632778253,0.0711596400344,0.0711596400344,0.0708320173823,0.0712251645649,0.0708320173823,0.0708320173823,0.0705699192607,0.0698491494261,0.0707009683215,0.0706354437911,0.0708975419128,0.0727322287645,0.071880409869,0.0719459343995,0.0724046061124,0.0724046061124,0.0726667042341,0.0732564250078,0.0745013910858,0.0737150967208,0.0732564250078,0.0742392929641,0.0733219495382,0.0741737684337,0.0750255873291,0.0755497835725,0.0752221609204,0.0743703420249,0.0750911118595,0.0740427193729,0.0738461457816,0.0729288023557,0.0736495721903,0.0741082439033,0.0741082439033,0.0746324401466,0.0750911118595,0.0752876854508,0.0750911118595,0.0754187345116,0.0761395043462,0.0757463571637,0.0769257987113,0.0775810440154,0.0768602741808,0.0776465685459,0.0783673383805,0.0776465685459,0.0777120930763,0.0773844704242,0.0768602741808,0.0768602741808,0.07672922512,0.0752876854508,0.0742392929641,0.0741082439033,0.0752876854508,0.0742392929641,0.0748945382683,0.0754187345116,0.074697964677,0.0736495721903,0.0733219495382,0.0745013910858,0.074697964677,0.074697964677,0.0752221609204,0.0757463571637,0.0754842590421,0.0755497835725,0.0754187345116,0.0758118816941,0.0752876854508,0.07515663639,0.0756153081029,0.0757463571637,0.0757463571637,0.0769913232417,0.0768602741808,0.0766637005896,0.0764671269983,0.0771878968329,0.0771878968329,0.0763360779375,0.0773189458938,0.078760485563,0.0784983874413,0.0792846818063,0.0793502063367,0.0810538441276,0.0812504177189,0.080791746006,0.0805951724147,0.0811848931885,0.0803985988234,0.0809883195972,0.0819711875535,0.0838058744052,0.0842645461181,0.0836748253444,0.0833472026923,0.0829540555098,0.0826919573881,0.0838713989356,0.0847887423615,0.0844611197094,0.0843300706485,0.0841990215877,0.0838713989356,0.0838713989356,0.0836748253444,0.0838058744052,0.0828230064489,0.0817090894318,0.0817746139622,0.0820367120839,0.0821677611447,0.0821677611447,0.0818401384926,0.0825609083273,0.0826264328577,0.0818401384926,0.0816435649014,0.081119368658,0.081119368658,0.0802675497626,0.0792191572759,0.0800709761713,0.080333074293,0.0805296478843,0.0800054516409,0.0796123044584,0.0790225836847,0.077974191198,0.0773844704242,0.0778431421371,0.0781707647892,0.0777776176067,0.0772534213634,0.07672922512,0.0758118816941,0.0771223723025,0.0765326515288,0.07672922512,0.077515519485,0.077974191198,0.0783018138501,0.0775810440154,0.0779086666675,0.0782362893196,0.0782362893196,0.0781707647892,0.0781052402588,0.0777120930763,0.0775810440154,0.0779086666675,0.0785639119717,0.0780397157284,0.0797433535193,0.0803985988234,0.0805296478843,0.0801365007018,0.0810538441276,0.0803985988234,0.0798744025801,0.0798744025801,0.0805296478843,0.0800054516409,0.0803985988234,0.0802020252322,0.081578040371,0.0811848931885,0.0802675497626,0.0809227950668,0.0813159422493,0.081119368658,0.0811848931885,0.0813159422493,0.0824298592664,0.0819711875535,0.0821677611447,0.0813159422493,0.0818401384926,0.0819056630231,0.0820367120839,0.0819056630231,0.0814469913101,0.0818401384926,0.0818401384926,0.0816435649014,0.0818401384926,0.0822988102056,0.081578040371,0.0817746139622,0.0802020252322,0.0799399271105,0.0796778289888,0.0802020252322,0.0796123044584,0.0798088780497,0.0794812553976,0.0782362893196,0.0788915346238,0.0783673383805,0.0790225836847,0.0790225836847,0.0777776176067,0.0783673383805,0.078760485563,0.0790225836847,0.0784328629109,0.0784328629109,0.0782362893196,0.0765326515288,0.0769257987113,0.0765981760592,0.0758118816941,0.0760739798158,0.0754187345116,0.0748290137379,0.0748290137379,0.0749600627987,0.07515663639,0.0746324401466,0.0745013910858,0.0741737684337,0.07515663639,0.0746324401466,0.0743048174945,0.0739771948424,0.0741737684337,0.074697964677,0.074697964677,0.0752221609204,0.07515663639,0.0744358665554,0.0746324401466,0.0760084552854,0.0756153081029,0.0762050288767,0.0761395043462,0.0764671269983,0.0770568477721,0.0775810440154,0.0775810440154,0.0770568477721,0.0788915346238,0.0792191572759,0.0798088780497,0.0802020252322,0.0792191572759,0.0803985988234,0.0806606969451,0.0806606969451,0.0809883195972,0.0825609083273,0.0836093008139,0.0840024479965,0.0842645461181,0.0847887423615,0.0844611197094,0.0846576933006,0.0842645461181,0.0837403498748,0.0844611197094,0.0847887423615,0.0843300706485,0.0832816781619,0.0832161536314,0.0826264328577,0.083936923466,0.0859026593786,0.0855750367265,0.0844611197094,0.0841990215877,0.0847887423615,0.0842645461181,0.0845921687702,0.0844611197094,0.0847232178311,0.0838058744052,0.0841334970573,0.0829540555098,0.0829540555098,0.0824298592664,0.083150629101,0.0840024479965,0.0826919573881,0.0824298592664,0.0827574819185,0.0821022366143,0.0809227950668,0.0800054516409,0.0799399271105,0.0775810440154,0.0748945382683,0.0730598514166,0.0709630664432,0.0683420852264,0.0663108247835,0.0635587945059,0.0615930585933,0.059823896272,0.0579236848899,0.0561545225686,0.0539922130648,0.0509780846656,0.0477018581446,0.0457361222321,0.044163533502,0.0422633221199,0.0395112918423)
m <- c(0.0430888108999,0.0453220724404,0.0468984923514,0.0493288063808,0.0512336471066,0.053729645299,0.0560942751654,0.0577363792393,0.0596412199651,0.0620715339945,0.0645018480239,0.0665380570756,0.0687056344532,0.0712673168085,0.0733692100231,0.0753397349119,0.0775729964524,0.0800689946448,0.0803974154596,0.0814483620669,0.0804630996225,0.0817110987187,0.0819738353705,0.0823679403483,0.0830904661408,0.084272781074,0.0849296227036,0.0849953068666,0.0857178326591,0.0854550960073,0.0847982543777,0.0853894118443,0.0847982543777,0.0838786760963,0.0837473077704,0.0846668860518,0.0845355177259,0.0852580435184,0.0859805693109,0.0861119376368,0.085783516822,0.0853237276813,0.0865717267775,0.0870972000812,0.0876883575478,0.087425620896,0.0865717267775,0.0866374109405,0.0866374109405,0.0868344634294,0.0869001475923,0.0869001475923,0.0870972000812,0.0867030951034,0.0852580435184,0.0844698335629,0.0862433059627,0.085849200985,0.0855864643332,0.0851923593554,0.0846012018888,0.0833532027926,0.0834845711185,0.0842070969111,0.0834845711185,0.0846012018888,0.0850609910295,0.0849296227036,0.0855864643332,0.085849200985,0.0856521484961,0.0853894118443,0.0853894118443,0.0847325702147,0.0847982543777,0.0854550960073,0.0864403584516,0.0860462534739,0.0847325702147,0.0855864643332,0.0849296227036,0.0845355177259,0.0849296227036,0.084272781074,0.0840757285852,0.0840757285852,0.0837473077704,0.0833532027926,0.082827729489,0.0831561503038,0.0834188869556,0.0846668860518,0.082827729489,0.0824993086742,0.0820395195335,0.0816454145557,0.0823022561853,0.0820395195335,0.0814483620669,0.0807258362743,0.0803317312966,0.0793464688522,0.079674889667,0.0790837322004,0.0791494163634,0.0792151005263,0.0782955222449,0.0773102598006,0.0769818389858,0.0759965765414,0.0765220498451,0.0754711032378,0.0745515249564,0.0748142616082,0.0747485774452,0.0747485774452,0.0756024715637,0.0757995240526,0.0759308923785,0.076653418171,0.076653418171,0.0757338398896,0.0757338398896,0.0762593131933,0.0771132073117,0.076719102334,0.0771788914747,0.0768504706599,0.0776386806154,0.0780327855931,0.0785582588968,0.0786896272227,0.0779671014301,0.078229838082,0.0774416281265,0.0779671014301,0.0794121530152,0.0787553113856,0.0777700489413,0.0780984697561,0.0775073122894,0.0775073122894,0.0775729964524,0.0778357331042,0.0782955222449,0.0792151005263,0.0786239430597,0.0786239430597,0.0786239430597,0.0794121530152,0.0794121530152,0.0794778371782,0.0794121530152,0.0798719421559,0.0800689946448,0.0802003629707,0.079674889667,0.0807258362743,0.0811199412521,0.0809885729262,0.0815140462298,0.0809885729262,0.0805287837855,0.0802660471336,0.081316993741,0.0805287837855,0.0803974154596,0.0799376263189,0.0811199412521,0.0807258362743,0.0826963611631,0.0829590978149,0.0826306770001,0.0830904661408,0.0838129919333,0.0840100444222,0.0840100444222,0.0834188869556,0.0834845711185,0.0837473077704,0.0832218344667,0.082762045326,0.0825649928371,0.0821052036964,0.0826306770001,0.0817767828817,0.0823022561853,0.0805287837855,0.081251309578,0.0816454145557,0.0807915204373,0.0804630996225,0.0802660471336,0.0803974154596,0.0807258362743,0.0810542570891,0.0804630996225,0.0809885729262,0.0808572046003,0.0803317312966,0.0787553113856,0.0790837322004,0.0786239430597,0.0794778371782,0.0784268905708,0.0790180480375,0.0785582588968,0.078229838082,0.0771788914747,0.0779671014301,0.0778357331042,0.0772445756376,0.0776386806154,0.0786896272227,0.0788209955486,0.0784925747338,0.0776386806154,0.0779014172672,0.0777043647783,0.0776386806154,0.0782955222449,0.0795435213411,0.0790837322004,0.0800689946448,0.0785582588968,0.0774416281265,0.0784925747338,0.0789523638745,0.0793464688522,0.0790180480375,0.0786239430597,0.0787553113856,0.0775073122894,0.0783612064079,0.0783612064079,0.0788866797115,0.0794121530152,0.0796092055041,0.07974057383,0.0794121530152,0.0794121530152,0.0788866797115,0.0786896272227,0.0791494163634,0.0793464688522,0.0788209955486,0.0789523638745,0.0791494163634,0.0790837322004,0.0783612064079,0.0798062579929,0.081185625415,0.0819738353705,0.0826306770001,0.0830904661408,0.0844698335629,0.0833532027926,0.0829590978149,0.0826963611631,0.082762045326,0.0838129919333,0.0851266751925,0.0850609910295,0.0847982543777,0.0856521484961,0.0847982543777,0.084338465237,0.084272781074,0.0852580435184,0.0846668860518,0.0849953068666,0.0847982543777,0.0848639385406,0.0844041493999,0.0849296227036,0.0848639385406,0.0842070969111,0.0850609910295,0.0844698335629,0.0841414127481,0.0845355177259,0.0853237276813,0.0849953068666,0.0846012018888,0.084272781074,0.0852580435184,0.0846668860518,0.0832218344667,0.0837473077704,0.0836816236074,0.0828934136519,0.0823679403483,0.0832218344667,0.0821708878594,0.0821052036964,0.0820395195335,0.0817767828817,0.0809885729262,0.081251309578,0.0805944679484,0.0802660471336,0.0799376263189,0.0810542570891,0.0806601521114,0.0814483620669,0.0817767828817,0.0814483620669,0.0815797303928,0.0820395195335,0.0821708878594,0.0828934136519,0.0821708878594,0.0836159394445,0.0824336245112,0.0826306770001,0.0823022561853,0.0817767828817,0.0816454145557,0.0817767828817,0.0829590978149,0.0826963611631,0.0821052036964,0.0823022561853,0.0830247819778,0.0825649928371,0.0815797303928,0.0824993086742,0.0822365720224,0.0815797303928,0.0821052036964,0.0823679403483,0.0817110987187,0.0810542570891,0.0809228887632,0.0800689946448,0.0804630996225,0.0809228887632,0.0818424670446,0.0815140462298,0.0815797303928,0.081185625415,0.081251309578,0.0804630996225,0.0810542570891,0.0794778371782,0.0793464688522,0.0777043647783,0.0782955222449,0.0773102598006,0.0771132073117,0.0764563656821,0.0771788914747,0.0780327855931,0.0769161548228,0.0767847864969,0.0763906815192,0.0770475231487,0.076653418171,0.0763906815192,0.0764563656821,0.0763249973562,0.0769818389858,0.076719102334,0.0768504706599,0.0765220498451,0.0780984697561,0.078164153919,0.0794121530152,0.0798719421559,0.07974057383,0.07974057383,0.0805944679484,0.07974057383,0.0788209955486,0.0787553113856,0.0788209955486,0.0782955222449,0.0777700489413,0.0792151005263,0.0790837322004,0.0802003629707,0.0805287837855,0.0817767828817,0.0824336245112,0.0819081512076,0.082762045326,0.0838786760963,0.0840100444222,0.0835502552815,0.0844041493999,0.0832875186297,0.0835502552815,0.082762045326,0.0825649928371,0.0831561503038,0.0832875186297,0.0840757285852,0.0848639385406,0.0844041493999,0.0841414127481,0.0857178326591,0.0855864643332,0.0855207801702,0.0842070969111,0.0839443602592,0.0836159394445,0.0835502552815,0.0832218344667,0.0834845711185,0.0845355177259,0.0846012018888,0.0855207801702,0.0861776217998,0.0863746742887,0.0855207801702,0.0849953068666,0.0845355177259,0.0849296227036,0.0844041493999,0.0840100444222,0.0851266751925,0.0851923593554,0.0852580435184,0.0844698335629,0.0844041493999,0.0841414127481,0.0844041493999,0.0836159394445,0.0841414127481,0.0842070969111,0.0824336245112,0.0815797303928,0.0805287837855,0.0803317312966,0.0805287837855,0.081185625415,0.0802003629707,0.0790180480375,0.0790180480375,0.0792151005263,0.0796092055041,0.0801346788077,0.0804630996225,0.0805944679484,0.0802660471336,0.0803974154596,0.0805287837855,0.0804630996225,0.0803974154596,0.0800689946448,0.0802003629707,0.0798719421559,0.0803317312966,0.0804630996225,0.0807258362743,0.0802003629707,0.0792151005263,0.0795435213411,0.0790180480375,0.0792807846893,0.0794121530152,0.07974057383,0.0804630996225,0.0803974154596,0.0805287837855,0.0817110987187,0.0832218344667,0.0834188869556,0.0840757285852,0.0837473077704,0.0834845711185,0.0830904661408,0.0833532027926,0.0828934136519,0.0830904661408,0.0841414127481,0.0837473077704,0.0826306770001,0.0831561503038,0.0823022561853,0.0823022561853,0.0816454145557,0.0815140462298,0.0806601521114,0.0794778371782,0.0804630996225,0.0809885729262,0.0809228887632,0.0810542570891,0.0802660471336,0.0801346788077,0.0803317312966,0.0806601521114,0.0802003629707,0.0801346788077,0.0798062579929,0.0809228887632,0.0802660471336,0.0796092055041,0.0801346788077,0.07974057383,0.0789523638745,0.0777700489413,0.0779014172672,0.0775073122894,0.0771132073117,0.0780327855931,0.0769161548228,0.0764563656821,0.0775073122894,0.0780984697561,0.0772445756376,0.0771132073117,0.0786239430597,0.0780984697561,0.0787553113856,0.0800689946448,0.0802660471336,0.0807258362743,0.0805944679484,0.0816454145557,0.0809885729262,0.0811199412521,0.0813826779039,0.0802003629707,0.07974057383,0.07974057383,0.0809885729262,0.0807915204373,0.0803974154596,0.0807258362743,0.081316993741,0.0807258362743,0.081185625415,0.0813826779039,0.0820395195335,0.0825649928371,0.0822365720224,0.0832875186297,0.0832218344667,0.0838129919333,0.0841414127481,0.0842070969111,0.0853237276813,0.0846012018888,0.0844041493999,0.0833532027926,0.0845355177259,0.0853894118443,0.0854550960073,0.0851266751925,0.0845355177259,0.0846012018888,0.0836816236074,0.0828934136519,0.082762045326,0.0826306770001,0.0821052036964,0.081316993741,0.0821052036964,0.0832875186297,0.0837473077704,0.0832218344667,0.0819081512076,0.0824993086742,0.0832218344667,0.082827729489,0.0826306770001,0.0822365720224,0.081251309578,0.0821052036964,0.0807915204373,0.081251309578,0.0821708878594,0.0811199412521,0.0818424670446,0.0815797303928,0.0826963611631,0.0821052036964,0.0829590978149,0.0839443602592,0.0832875186297,0.0837473077704,0.0833532027926,0.0832218344667,0.0826306770001,0.0828934136519,0.0839443602592,0.0847325702147,0.0862433059627,0.0866374109405,0.0880824625255,0.087359936733,0.0888049883181,0.0896588824365,0.0892647774588,0.0892647774588,0.0901843557402,0.0902500399031,0.0911696181845,0.0922205647918,0.0918921439771,0.0924176172807,0.0930087747473,0.0930744589103,0.0953077204508,0.0973439295025,0.0978694028062,0.0975409819914,0.0978694028062,0.0993801385542,0.099708559369,0.100825190139,0.0994458227171,0.0999056118578,0.0993144543912,0.0997742435319,0.101022242628,0.101876136747,0.102467294213,0.10305845168,0.103846661635,0.104766239917,0.104372134939,0.102730030865,0.103124135843,0.103386872495,0.10305845168,0.104437819102,0.104240766613,0.104240766613,0.105160344894,0.106605396479,0.10772202725,0.109167078835,0.110020972953,0.10883865802,0.10949549965,0.109232762998,0.10949549965,0.109626867975,0.109823920464,0.10772202725,0.10772202725,0.107196553946,0.107196553946,0.107656343087,0.107656343087,0.106079923176,0.106079923176,0.106802448968,0.106671080642,0.106145607339,0.10529171322,0.104569187428,0.10417508245,0.103321188332,0.103715293309,0.10351824082,0.10351824082,0.103846661635,0.10351824082,0.103321188332,0.104043714124,0.102927083354,0.102073189235,0.102467294213,0.101547715932,0.100562453487,0.0997742435319,0.100036980184,0.0985919285987,0.0987232969246,0.099708559369,0.0999056118578,0.0995115068801,0.0997742435319,0.0993801385542,0.100299716836,0.100431085161,0.10016834851,0.0995115068801,0.0980007711321,0.098132139458,0.0989203494135,0.0988546652505,0.0985262444357,0.0985262444357,0.0989203494135,0.10016834851,0.0997742435319,0.0999712960208,0.0997742435319,0.0988546652505,0.099642875206,0.100036980184,0.10062813765,0.100299716836,0.100825190139,0.0993144543912,0.099708559369,0.100365400999,0.0994458227171,0.0989203494135,0.0993801385542,0.0993801385542,0.0984605602728,0.0983948761098,0.0987889810876,0.0976723503173,0.0971468770136,0.0964243512211,0.0963586670581,0.0951763521249,0.0936656163769,0.0939940371917,0.0945195104953,0.0942567738435,0.0944538263324,0.0944538263324,0.094979299636,0.0959645620804,0.0953734046138,0.0953734046138,0.0960302462434,0.0957675095915,0.0964900353841,0.0954390887767,0.0959645620804,0.0963586670581,0.0956361412656,0.0953734046138,0.0936656163769,0.093468563888,0.0935999322139,0.0935999322139,0.0936656163769,0.0934028797251,0.0944538263324,0.0958988779174,0.0955047729397,0.0943881421694,0.093468563888,0.0937313005399,0.0939940371917,0.0945195104953,0.0955047729397,0.0958331937545,0.0957018254286,0.0957675095915,0.0976066661543,0.0975409819914,0.0978694028062,0.0986576127616,0.0984605602728,0.0979350869691,0.0971468770136,0.0980007711321,0.0975409819914,0.0973439295025,0.0967527720359,0.0958331937545,0.0953077204508,0.0958988779174,0.0960959304063,0.0970155086877,0.096555719547,0.0970155086877,0.0974096136655,0.0978037186432,0.0974096136655,0.0971468770136,0.0968841403618,0.096555719547,0.0960302462434,0.095044983799,0.0943881421694,0.094979299636,0.0948479313101,0.0943224580065,0.0943881421694,0.0938626688658,0.0934028797251,0.0937969847028,0.0943224580065,0.0945195104953,0.0941254055176,0.0934028797251,0.0926146697696,0.0912353023475,0.0909725656957,0.0909725656957,0.0910382498586,0.0898559349254,0.0907755132068,0.0911039340216,0.0906441448809,0.0902500399031,0.090447092392,0.090447092392,0.0911039340216,0.0895931982736,0.090512776555,0.0901843557402,0.0909068815327,0.0902500399031,0.0896588824365,0.0903157240661,0.0896588824365,0.0897245665995,0.0901843557402,0.0899216190883,0.0899216190883,0.0891334091329,0.0902500399031,0.0916294073252,0.0908411973697,0.0911696181845,0.0912353023475,0.0909725656957,0.0903157240661,0.0902500399031,0.0898559349254,0.090512776555,0.0915637231623,0.0924176172807,0.0930744589103,0.0933371955621,0.093534248051,0.0934028797251,0.0926803539325,0.0922862489548,0.0932058272362,0.0934028797251,0.0948479313101,0.0943224580065,0.0925489856066,0.0935999322139,0.0937313005399,0.0936656163769,0.0939940371917,0.0945851946583,0.0953734046138,0.0958331937545,0.0962929828952,0.0957675095915,0.0960302462434,0.0958331937545,0.0970811928507,0.0978694028062,0.0967527720359,0.0959645620804,0.0956361412656,0.0954390887767,0.0947822471472,0.095044983799,0.0954390887767,0.0956361412656,0.0957675095915,0.0945195104953,0.0941254055176,0.0939283530287,0.0937969847028,0.0932715113992,0.0924833014437,0.0928117222585,0.0941910896806,0.0941254055176,0.093534248051,0.0924176172807,0.0908411973697,0.0917607756511,0.0924176172807,0.0914980389993,0.0905784607179,0.0909725656957,0.0900529874143,0.0900529874143,0.0893961457847,0.0888049883181,0.0884108833403,0.0888049883181,0.0874913050589,0.0876226733848,0.0866374109405,0.0861119376368,0.0863746742887,0.0861119376368,0.0859805693109,0.0851266751925,0.0855864643332,0.0849296227036,0.0840100444222,0.0828934136519,0.0823022561853,0.0831561503038,0.082827729489,0.0830904661408,0.0820395195335,0.081251309578,0.0815797303928,0.0809228887632,0.0798719421559,0.0794121530152,0.0789523638745,0.079674889667,0.0790837322004,0.0775729964524,0.0769161548228,0.0757995240526,0.07507699826,0.0740917358157,0.0748142616082,0.075142682423,0.0745515249564,0.0745515249564,0.0750113140971,0.0752740507489,0.0747485774452,0.0749456299341,0.0742231041416,0.0736976308379,0.0741574199786,0.0746828932823,0.0756681557266,0.0752083665859,0.0748799457712,0.0746828932823,0.075142682423,0.0756681557266,0.0756024715637,0.0750113140971,0.07507699826,0.0744858407934,0.0746828932823,0.0763249973562,0.0759965765414,0.075142682423,0.0747485774452,0.07507699826,0.0746172091193,0.0747485774452,0.0746172091193,0.0753397349119,0.0754054190748,0.0757995240526,0.0755367874007,0.075142682423,0.0738289991638,0.0725153159047,0.0730407892084,0.0733035258602,0.0731721575343,0.0724496317417,0.0736976308379,0.073631946675,0.0744201566305,0.0752083665859,0.0749456299341,0.0745515249564,0.0740260516527,0.0747485774452,0.0740260516527,0.0737633150009,0.0738289991638,0.0733692100231,0.0722525792529,0.0725810000677,0.0733692100231,0.0729094208824,0.0735005783491,0.072121210927,0.0737633150009,0.0742887883045,0.0740917358157,0.0736976308379,0.0750113140971,0.0746172091193,0.0747485774452,0.0744201566305,0.0746828932823,0.07507699826,0.0746172091193,0.0752083665859,0.0757338398896,0.0761936290303,0.0758652082155,0.0757995240526,0.0756681557266,0.0761936290303,0.0754711032378,0.0752740507489,0.0742231041416,0.0745515249564,0.0744858407934,0.0738289991638,0.0733692100231,0.073566262512,0.0737633150009,0.0736976308379,0.0735005783491,0.0742231041416,0.0746828932823,0.0741574199786,0.0730407892084,0.0745515249564,0.0745515249564,0.0738289991638,0.0721868950899,0.0718584742751,0.071989842601,0.0723182634158,0.0709388959937,0.0712016326456,0.0715300534603,0.0722525792529,0.0717927901122,0.0716614217863,0.0727123683936,0.0725810000677,0.0721868950899,0.0717271059492,0.0713986851344,0.0712016326456,0.0709388959937,0.0708732118308,0.0713330009715,0.0710045801567,0.0712016326456,0.0701506860382,0.0698879493864,0.0694281602457,0.0699536335494,0.0701506860382,0.0704134226901,0.0704134226901,0.0701506860382,0.0701506860382,0.0704134226901,0.0710702643196,0.0729751050454,0.0731721575343,0.0744201566305,0.0757338398896,0.0756681557266,0.0756024715637,0.0754054190748,0.07507699826,0.0759308923785,0.0757995240526,0.0763906815192,0.0754711032378,0.0754054190748,0.075142682423,0.0746828932823,0.0746828932823,0.0759965765414,0.0769161548228,0.0772445756376,0.076719102334,0.0778357331042,0.0780327855931,0.0775729964524,0.078229838082,0.0787553113856,0.0792807846893,0.0787553113856,0.0791494163634,0.0789523638745,0.0779671014301,0.0779671014301,0.0779671014301,0.0776386806154,0.0775073122894,0.0779671014301,0.0787553113856,0.0777043647783,0.0768504706599,0.0754711032378,0.0742231041416,0.0742887883045,0.0741574199786,0.0754054190748,0.0756681557266,0.0757338398896,0.0758652082155,0.0754711032378,0.076587734008,0.0775073122894,0.0787553113856,0.0790180480375,0.0793464688522,0.0784268905708,0.0779671014301,0.0782955222449,0.0784925747338,0.0775729964524,0.0769161548228,0.0769161548228,0.0772445756376,0.0772445756376,0.0772445756376,0.0774416281265,0.078164153919,0.0784268905708,0.0784925747338,0.0790837322004,0.0794121530152,0.0796092055041,0.079674889667,0.0796092055041,0.0788209955486,0.0784268905708,0.0775073122894,0.0779671014301,0.0786239430597,0.0790837322004,0.0798719421559,0.0795435213411,0.0798719421559,0.0788209955486,0.079674889667,0.0795435213411,0.0790180480375,0.0784925747338,0.0788209955486,0.0794778371782,0.0784268905708,0.078229838082,0.0777043647783,0.0770475231487,0.0777043647783,0.078164153919,0.0782955222449,0.0788866797115,0.0782955222449,0.0783612064079,0.0782955222449,0.0788209955486,0.078229838082,0.0774416281265,0.0783612064079,0.0777700489413,0.0774416281265,0.0789523638745,0.0792151005263,0.0800033104818,0.0799376263189,0.0793464688522,0.0798062579929,0.0786239430597,0.0791494163634,0.0791494163634,0.0788866797115,0.0786896272227,0.078164153919,0.0792151005263,0.0782955222449,0.0784925747338,0.0780327855931,0.0779671014301,0.0765220498451,0.0764563656821,0.0773102598006,0.0776386806154,0.0779671014301,0.078164153919,0.0769161548228,0.076719102334,0.076587734008,0.0765220498451,0.0770475231487,0.0769818389858,0.0764563656821,0.0769161548228,0.0779014172672,0.0783612064079,0.0784925747338,0.0786239430597,0.0792151005263,0.0787553113856,0.0789523638745,0.0782955222449,0.0763249973562,0.0746828932823,0.0727780525565,0.0713986851344,0.0687713186161,0.0664723729126,0.064436163861,0.0619401656686,0.0602323774317,0.0578020634023,0.0558315385136,0.0534012244842,0.0514963837584,0.0494601747067,0.0478180706328,0.0453220724404,0.0430888108999,0.0410526018482)
s <- c(0.0435402179755,0.0432055506583,0.0435067512438,0.0432055506583,0.0427370164141,0.0426700829506,0.0431386171948,0.0430716837314,0.0434398177803,0.0438079518293,0.0438748852928,0.0437075516341,0.0434732845121,0.0441091524149,0.0443768862687,0.0446780868542,0.0445442199273,0.0441091524149,0.0441426191466,0.0441426191466,0.0442430193418,0.0442764860735,0.0442764860735,0.0443768862687,0.0441760858783,0.0434398177803,0.0430382169996,0.0439418187562,0.0437410183659,0.0630513225718,0.0638545241332,0.0644569253043,0.0650258597436,0.0663979957444,0.0678035984769,0.0687406669652,0.0702801366246,0.0719200064792,0.0730913420896,0.0744969448221,0.0756348137007,0.0766388156525,0.0773416170188,0.0785464193609,0.0793496209223,0.08085562385,0.0823616267777,0.0837002960467,0.0840684300957,0.0835664291198,0.0847042979985,0.0841688302909,0.0838006962419,0.0832652285343,0.0826962940949,0.0830644281439,0.0823616267777,0.0826962940949,0.0824285602411,0.082194293119,0.0819265592652,0.082562427168,0.0837337627784,0.0830309614122,0.0824620269728,0.0822946933142,0.0824285602411,0.0826962940949,0.082194293119,0.0816922921431,0.0814580250211,0.0809560240452,0.0806213567279,0.0802197559472,0.079751221703,0.0794500211175,0.0799185553617,0.0792492207272,0.0789480201416,0.0793496209223,0.078780686483,0.0786802862878,0.0779774849216,0.0772077500919,0.0771073498967,0.0772077500919,0.0768730827746,0.0770404164332,0.076705749116,0.0774420172139,0.0782786855071,0.0780109516533,0.0777766845312,0.0776093508726,0.0781782853119,0.0785798860926,0.0786468195561,0.0783121522388,0.0780778851167,0.078412552434,0.0783456189705,0.0788141532147,0.0785798860926,0.0783456189705,0.0783456189705,0.0778101512629,0.0782786855071,0.0788476199464,0.0785129526292,0.0779440181898,0.0781113518485,0.0782786855071,0.0774420172139,0.0775758841409,0.0777097510678,0.0771408166284,0.0779440181898,0.0776093508726,0.0778101512629,0.0777097510678,0.0778436179947,0.0779440181898,0.0782786855071,0.0786802862878,0.0794500211175,0.0800189555568,0.0796508215079,0.0793161541906,0.0801528224838,0.080119355752,0.0795504213127,0.0795504213127,0.0791822872637,0.0795504213127,0.0792826874589,0.0799520220934,0.0803870896058,0.0803201561424,0.0799854888251,0.08085562385,0.0812572246307,0.0818596258018,0.0814914917528,0.0814245582893,0.0813576248259,0.0820938929239,0.0822612265825,0.0822946933142,0.0826962940949,0.082562427168,0.0824954937046,0.0825289604363,0.0820604261921,0.0823281600459,0.0822277598508,0.0828636277536,0.0827297608267,0.0828970944853,0.0815249584845,0.0815249584845,0.0817926923383,0.0807217569231,0.0811902911673,0.081223757899,0.0809225573135,0.0812572246307,0.0813910915576,0.081223757899,0.0820604261921,0.081591891948,0.0809560240452,0.0802866894107,0.0799520220934,0.0801862892155,0.0804205563376,0.0800524222886,0.0802866894107,0.0805878899962,0.0806548234596,0.0808221571183,0.081591891948,0.0815584252162,0.0810229575086,0.0811233577038,0.0811568244355,0.0814580250211,0.0816588254114,0.0812572246307,0.0814580250211,0.0811902911673,0.0808221571183,0.0807217569231,0.0811568244355,0.0810898909721,0.0817257588749,0.0811902911673,0.0808890905817,0.0812572246307,0.0813241580942,0.0819265592652,0.0818596258018,0.0816253586797,0.081591891948,0.0810229575086,0.0815584252162,0.0812906913624,0.0817926923383,0.0818596258018,0.0817257588749,0.0812572246307,0.081591891948,0.0814580250211,0.0811233577038,0.0808890905817,0.0810229575086,0.0807886903865,0.0811902911673,0.0814580250211,0.0820269594604,0.0821608263873,0.0817926923383,0.082562427168,0.0832317618025,0.0830644281439,0.0835998958515,0.0837002960467,0.084403097413,0.0842692304861,0.0837337627784,0.0837672295102,0.0834994956564,0.0843361639495,0.0843696306812,0.0847712314619,0.0843026972178,0.0837672295102,0.0837002960467,0.083298695266,0.0834994956564,0.0838676297053,0.0828970944853,0.0835664291198,0.0834994956564,0.0833990954612,0.0833321619977,0.0836333625833,0.0835998958515,0.0828970944853,0.0830978948756,0.0828970944853,0.0831982950708,0.0830309614122,0.0826293606315,0.0824285602411,0.0818930925335,0.0814914917528,0.0820604261921,0.0813576248259,0.0802532226789,0.0808890905817,0.0805209565327,0.080119355752,0.0796508215079,0.0796173547761,0.0792157539954,0.0786802862878,0.0791822872637,0.0788141532147,0.0787472197513,0.078412552434,0.0777766845312,0.078044418385,0.0774420172139,0.0783790857023,0.0782452187754,0.0784460191657,0.0785129526292,0.0781782853119,0.0782786855071,0.0791153538002,0.0788141532147,0.0785129526292,0.0780778851167,0.0789145534099,0.0789814868733,0.0786133528244,0.0782452187754,0.078044418385,0.0777766845312,0.0777432177995,0.0781782853119,0.0780109516533,0.0781448185802,0.0788810866782,0.0794500211175,0.0792826874589,0.0788141532147,0.0794165543858,0.079751221703,0.079516954581,0.0800858890203,0.0798516218982,0.0789814868733,0.0782452187754,0.0777766845312,0.0775424174091,0.0781448185802,0.078412552434,0.0795838880444,0.0792492207272,0.0793161541906,0.0798181551665,0.0802197559472,0.0799185553617,0.0800189555568,0.0792826874589,0.079516954581,0.0794165543858,0.0797846884348,0.0793161541906,0.0789480201416,0.0793496209223,0.0798850886299,0.0800524222886,0.0794500211175,0.0792492207272,0.0794834878492,0.0803536228741,0.0803536228741,0.0803870896058,0.0812572246307,0.0813241580942,0.0819934927287,0.081960025997,0.0817257588749,0.0818261590701,0.0827297608267,0.0835329623881,0.0847377647302,0.0858087001454,0.0863441678531,0.0866119017069,0.0872143028779,0.0868127020972,0.0863776345848,0.08647803478,0.08647803478,0.0859425670724,0.0859425670724,0.0868127020972,0.0869131022924,0.0871473694145,0.0873816365366,0.0883187050249,0.0891219065863,0.088921106196,0.0892892402449,0.0900924418064,0.0905609760505,0.0908621766361,0.0917323116609,0.0916653781975,0.0920669789782,0.0912637774168,0.0910964437582,0.0911299104899,0.0903936423919,0.0907952431726,0.0911633772216,0.0910964437582,0.0912637774168,0.0915315112706,0.0916988449292,0.091364177612,0.0910295102947,0.0908956433678,0.0905275093188,0.0904605758554,0.0901593752698,0.0905275093188,0.0905275093188,0.0910295102947,0.0912972441485,0.0921004457099,0.0915315112706,0.0908287099043,0.090259775465,0.0899251081477,0.0901928420016,0.0897577744891,0.0892223067815,0.0899585748795,0.0902932421967,0.0904605758554,0.0893896404401,0.089155373318,0.0890215063911,0.0886199056104,0.0879505709759,0.0883187050249,0.088184838098,0.0873147030731,0.0874151032683,0.087080435951,0.0867792353655,0.0871473694145,0.0873147030731,0.0872477696097,0.08647803478,0.08647803478,0.08647803478,0.0863441678531,0.0866788351703,0.0868796355607,0.0872812363414,0.086846168829,0.0873816365366,0.0871473694145,0.0877497705856,0.0872812363414,0.08744857,0.0878501707807,0.0882517715614,0.0887537725373,0.0886533723422,0.089155373318,0.0885864388787,0.0882183048297,0.0888541727325,0.0882183048297,0.0886533723422,0.0892557735132,0.0892892402449,0.0900589750746,0.0898247079526,0.0903267089285,0.090996043563,0.0916988449292,0.0912303106851,0.0920669789782,0.0925689799541,0.0918996453196,0.0922677793686,0.0928032470762,0.0927697803445,0.0929705807348,0.0931379143934,0.0930040474665,0.092702846881,0.0933721815155,0.0929036472714,0.0933721815155,0.0931713811252,0.0932717813203,0.0928701805396,0.0925689799541,0.0934725817107,0.0933052480521,0.093439114979,0.0933721815155,0.0933052480521,0.0926693801493,0.092702846881,0.0928701805396,0.0921004457099,0.091966578783,0.0913976443437,0.0921004457099,0.091966578783,0.0911633772216,0.0918996453196,0.0914645778071,0.0907952431726,0.0907617764409,0.090996043563,0.0903936423919,0.0893896404401,0.089891641416,0.0889880396594,0.0892892402449,0.0894231071719,0.0895904408305,0.0896239075622,0.0901259085381,0.0911299104899,0.090259775465,0.0909625768312,0.0907617764409,0.0903601756602,0.0903936423919,0.0901928420016,0.0903267089285,0.0896908410257,0.0899920416112,0.0901259085381,0.0896908410257,0.0897912412208,0.0896908410257,0.0910964437582,0.0913307108802,0.0907283097092,0.090627909514,0.091364177612,0.0903601756602,0.0907283097092,0.0914645778071,0.0916988449292,0.091966578783,0.0924685797589,0.0929705807348,0.0928701805396,0.0934725817107,0.0936399153693,0.0939411159549,0.094409650199,0.0928367138079,0.0934725817107,0.0932048478569,0.0937403155645,0.0940749828818,0.0936064486376,0.0938741824914,0.0928367138079,0.0935060484424,0.0931379143934,0.0926359134175,0.0924016462955,0.0924016462955,0.092334712832,0.0916988449292,0.0917323116609,0.0920000455148,0.092702846881,0.0933052480521,0.0919331120513,0.0916653781975,0.0916988449292,0.0926024466858,0.0924685797589,0.0923681795637,0.0919331120513,0.0923681795637,0.0914645778071,0.091364177612,0.0915649780023,0.0906948429774,0.0919331120513,0.0913976443437,0.0924685797589,0.0922343126368,0.0925355132224,0.0934725817107,0.0926024466858,0.0929036472714,0.092702846881,0.0922343126368,0.0918661785879,0.0916319114658,0.0925020464906,0.0932717813203,0.0942423165404,0.0950120513701,0.0958487196632,0.0957817861998,0.0963172539074,0.0981579241523,0.0982583243475,0.0982583243475,0.0980909906889,0.0975555229813,0.0980240572254,0.0990280591772,0.0998647274704,0.0996973938117,0.100032061129,0.100768329227,0.102173931959,0.102943666789,0.103311800838,0.103378734302,0.10354606796,0.104215402595,0.104349269522,0.104550069912,0.104048068936,0.10431580279,0.104884737229,0.105386738205,0.106691940742,0.107394742109,0.107729409426,0.107963676548,0.108599544451,0.109201945622,0.109402746012,0.108365277329,0.108833811573,0.109001145232,0.1089676785,0.109637013134,0.109436212744,0.108666477914,0.109302345817,0.11070794855,0.111243416257,0.112013151087,0.112548618795,0.111745417233,0.111645017038,0.11090874894,0.111444216648,0.111377283184,0.110841815476,0.110005147183,0.109971680452,0.109302345817,0.108800344841,0.109201945622,0.108733411378,0.107863276353,0.107193941718,0.107294341914,0.106591540547,0.105855272449,0.104717403571,0.103746868351,0.103378734302,0.103010600253,0.102843266594,0.102910200057,0.102240865423,0.101839264642,0.100768329227,0.100132461324,0.100500595373,0.0993292597627,0.0988272587869,0.0986599251282,0.097588989713,0.0962837871757,0.0960495200536,0.0960160533219,0.0951793850287,0.0954136521508,0.0959156531267,0.0959825865901,0.0949116511749,0.0947108507846,0.0946439173211,0.0947108507846,0.0947108507846,0.0948447177115,0.0950455181018,0.0936064486376,0.0937737822962,0.0946773840528,0.0943427167356,0.0938407157597,0.0937737822962,0.0939745826866,0.0945769838577,0.0947443175163,0.0943761834673,0.0939745826866,0.0934725817107,0.093439114979,0.093807249028,0.094777784248,0.0950789848335,0.0952463184922,0.0942757832721,0.0946773840528,0.0950120513701,0.0950455181018,0.0952128517605,0.0957817861998,0.0952797852239,0.0946773840528,0.0946773840528,0.0940080494183,0.0931379143934,0.0935060484424,0.0931044476617,0.0928367138079,0.0921004457099,0.0910629770264,0.0908287099043,0.0909291100995,0.090259775465,0.0909625768312,0.0904940425871,0.0900924418064,0.0908956433678,0.0910964437582,0.0907952431726,0.0910295102947,0.0907283097092,0.0907952431726,0.0903936423919,0.0909625768312,0.0917657783927,0.0914645778071,0.091364177612,0.0900589750746,0.0904940425871,0.0905275093188,0.0904271091236,0.0904271091236,0.090259775465,0.0901259085381,0.0901593752698,0.0892557735132,0.0889545729277,0.0887872392691,0.0890549731229,0.0895569740988,0.0900589750746,0.0902263087333,0.0907952431726,0.090996043563,0.0907283097092,0.091598444734,0.0918996453196,0.0922343126368,0.0929705807348,0.0923681795637,0.0925020464906,0.092702846881,0.0933721815155,0.0928701805396,0.0930375141983,0.0932048478569,0.0929705807348,0.0925689799541,0.0931379143934,0.0928701805396,0.0926359134175,0.0924351130272,0.0927697803445,0.0928032470762,0.0921004457099,0.091966578783,0.0918996453196,0.0921673791734,0.091966578783,0.0915649780023,0.091364177612,0.0918327118561,0.0922343126368,0.0920335122465,0.091966578783,0.0927697803445,0.0920335122465,0.0917992451244,0.0915315112706,0.0913307108802,0.0916319114658,0.0915315112706,0.090996043563,0.0901259085381,0.0893896404401,0.0890549731229,0.0885195054153,0.0878501707807,0.086712301902,0.08744857,0.0880509711711,0.0872812363414,0.0868127020972,0.0865784349751,0.0862772343896,0.0864445680482,0.0858087001454,0.086712301902,0.0870135024876,0.0874820367317,0.0873147030731,0.0871808361462,0.0873147030731,0.086712301902,0.0869131022924,0.0875155034635,0.0875489701952,0.0873816365366,0.0864111013165,0.0869465690241,0.08744857,0.0866119017069,0.0870469692193,0.0868127020972,0.0869800357559,0.0866119017069,0.0862772343896,0.0863441678531,0.0868796355607,0.0876159036587,0.0877832373173,0.0888207060008,0.0893227069767,0.0900255083429,0.0907617764409,0.0901259085381,0.0894900406353,0.0898581746843,0.089891641416,0.0905944427823,0.0904605758554,0.0899585748795,0.0902932421967,0.090259775465,0.089523507367,0.0895904408305,0.0895904408305,0.0899920416112,0.0899251081477,0.0903601756602,0.0897577744891,0.0897912412208,0.0894900406353,0.0899251081477,0.0903601756602,0.089891641416,0.088921106196,0.0886868390739,0.0887872392691,0.0884860386835,0.0883856384883,0.0888541727325,0.0892557735132,0.089155373318,0.0886199056104,0.0879840377076,0.0881513713663,0.087816704049,0.0874151032683,0.0865449682434,0.0865449682434,0.0872143028779,0.0866119017069,0.0867792353655,0.0862103009262,0.0855409662916,0.0860764339993,0.0861433674627,0.0859091003406,0.0856748332185,0.0859425670724,0.0854070993647,0.085373632633,0.0846038978033,0.0847712314619,0.0845704310716,0.0847712314619,0.083666829315,0.0840014966322,0.084034963364,0.0840684300957,0.0846708312668,0.0852732324378,0.084403097413,0.0834660289246,0.0835664291198,0.0837002960467,0.0834660289246,0.0834660289246,0.083298695266,0.083298695266,0.0836333625833,0.0837337627784,0.083666829315,0.0832652285343,0.0836333625833,0.0831648283391,0.0826293606315,0.0826293606315,0.0821273596556,0.0826628273632,0.0829640279487,0.081960025997,0.0814580250211,0.0815249584845,0.0804540230693,0.0805544232645,0.0810898909721,0.081591891948,0.081223757899,0.0810564242404,0.0810564242404,0.0810564242404,0.0811568244355,0.0811233577038,0.0798516218982,0.0789480201416,0.0781113518485,0.0780778851167,0.0789814868733,0.0792157539954,0.0790149536051,0.0783456189705,0.0782452187754,0.0779440181898,0.0782452187754,0.0781782853119,0.0781113518485,0.0780109516533,0.0770404164332,0.0774085504822,0.0769400162381,0.0764045485304,0.0760364144815,0.0762037481401,0.0765718821891,0.0765049487256,0.0761368146766,0.0764380152622,0.0764380152622,0.075969481018,0.0757017471642,0.074630811749,0.0739614771144,0.0731248088213,0.0735933430655,0.073526409602,0.0734594761386,0.0729574751627,0.0732252090165,0.0736268097972,0.0739949438462,0.0745304115538,0.0753336131152,0.0746977452124,0.0744634780903,0.0750658792614,0.0746977452124,0.0746977452124,0.0750324125297,0.0754340133104,0.0744634780903,0.0743965446269,0.0753001463835,0.0745973450172,0.0753336131152,0.0750658792614,0.0761702814084,0.0762706816035,0.0757352138959,0.0759025475546,0.0760364144815,0.0757352138959,0.0753336131152,0.0755344135056,0.0759025475546,0.0761033479449,0.0761368146766,0.0766722823843,0.0770404164332,0.0771742833601,0.0771742833601,0.0775089506774,0.0772412168236,0.0781113518485,0.0780778851167,0.0776093508726,0.0774754839457,0.0780109516533,0.0776093508726,0.077308150287,0.0769065495063,0.0767392158477,0.0768396160429,0.0767392158477,0.0759025475546,0.0757352138959,0.0759025475546,0.0762372148718,0.0751328127249,0.0762372148718,0.0765049487256,0.0757686806276,0.0743965446269,0.0740618773096,0.0747312119441,0.074998945798,0.0742961444317,0.0746977452124,0.0751328127249,0.0753670798469,0.0751662794566,0.0750324125297,0.0757686806276,0.0754340133104,0.0751662794566,0.0751662794566,0.0750658792614,0.0749654790662,0.0754674800421,0.0753670798469,0.0755009467738,0.07523321292,0.0757017471642,0.0751662794566,0.0745973450172,0.074865078871,0.0758690808228,0.0758356140911,0.0763710817987,0.0764045485304,0.0771408166284,0.0772412168236,0.0771408166284,0.0773750837505,0.0786468195561,0.0783456189705,0.0792826874589,0.0804540230693,0.0813576248259,0.0815584252162,0.0811568244355,0.0808221571183,0.0810564242404,0.08085562385,0.0817592256066,0.0817592256066,0.0815584252162,0.0813576248259,0.0810564242404,0.0808890905817,0.0815584252162,0.0819265592652,0.0821608263873,0.0813910915576,0.0813910915576,0.0815249584845,0.0814245582893,0.0818261590701,0.0820938929239,0.082194293119,0.0822946933142,0.0825289604363,0.0820269594604,0.0814245582893,0.0811568244355,0.0811568244355,0.0805544232645,0.0799520220934,0.0806213567279,0.0811568244355,0.0807217569231,0.0800189555568,0.0791153538002,0.0781782853119,0.077676284336,0.077308150287,0.0781782853119,0.0784794858975,0.0783121522388,0.0781113518485,0.0776428176043,0.0777432177995,0.0788810866782,0.0792157539954,0.0794500211175,0.0800189555568,0.0797846884348,0.0797177549713,0.079516954581,0.0797846884348,0.0794834878492,0.079148820532,0.0791153538002,0.0792492207272,0.0790484203368,0.0789814868733,0.0792492207272,0.0799520220934,0.0798181551665,0.0807217569231,0.0813576248259,0.081591891948,0.0814914917528,0.0819934927287,0.0816253586797,0.0809560240452,0.0807552236548,0.0806213567279,0.0805878899962,0.0811233577038,0.0812572246307,0.0823616267777,0.0819934927287,0.0816922921431,0.0814914917528,0.0821273596556,0.081960025997,0.0817257588749,0.0815249584845,0.0822612265825,0.0823616267777,0.0819265592652,0.0813910915576,0.0813910915576,0.0810898909721,0.0814914917528,0.0816588254114,0.0814914917528,0.0819934927287,0.0816922921431,0.0816253586797,0.0816922921431,0.082194293119,0.0815249584845,0.081223757899,0.0808890905817,0.0804540230693,0.0801528224838,0.0811902911673,0.0810229575086,0.0815249584845,0.0813241580942,0.0803870896058,0.0809560240452,0.0800858890203,0.0806882901914,0.0806882901914,0.0799185553617,0.080119355752,0.0800524222886,0.0807217569231,0.0799520220934,0.0800524222886,0.0797177549713,0.0788141532147,0.0782786855071,0.0780778851167,0.0781113518485,0.078412552434,0.0782452187754,0.078044418385,0.0774085504822,0.0773750837505,0.0774085504822,0.0771073498967,0.077308150287,0.0771073498967,0.0773416170188,0.077308150287,0.0776428176043,0.0777097510678,0.0778770847264,0.0782117520436,0.0785129526292,0.0785464193609,0.0786133528244,0.0779105514581,0.0770069497015,0.0768730827746,0.0757017471642,0.0753001463835,0.0739280103827,0.0729240084309,0.072187740333,0.0711837383812,0.0703136033563,0.0688076004286,0.0687406669652,0.06766973155,0.0670003969154,0.0661637286223,0.0648250593532,0.0641557247187,0.0631517227669,0.0621142540834,0.0413648804133,0.0421680819748,0.0427035496824,0.0429043500727,0.0430382169996,0.0433059508534,0.0431386171948,0.04323901739,0.0430382169996,0.0427704831458,0.0431386171948,0.0433059508534,0.0430716837314,0.0425362160237,0.042502749292,0.0422015487065,0.042870883341,0.0438748852928,0.0437075516341,0.0431386171948,0.0430047502679,0.0433059508534,0.0430382169996,0.0432055506583,0.0431386171948,0.0432724841217,0.0428039498775,0.0429712835362,0.0423688823651)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("3-organelles-nucleus-merged/PolIV-ChIP-GSM1103231.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=59"),bty="n")
dev.off()