# R script for Peak Model
#  -- generated by MACS
p <- c(0.0214616837406,0.0216660807286,0.0247320355487,0.0263672114528,0.0286155783208,0.0290243722968,0.0318859301289,0.032703518081,0.034543090973,0.0359738698891,0.0372002518171,0.0398574126612,0.0421057795292,0.0441497494093,0.0447629403733,0.0463981162774,0.0486464831454,0.0496684680855,0.0515080409775,0.0529388198936,0.0547783927856,0.0541652018216,0.0551871867616,0.0555959807376,0.0560047747136,0.0582531415817,0.0584575385697,0.0582531415817,0.0586619355577,0.0586619355577,0.0600927144738,0.0607059054378,0.0621366843538,0.0607059054378,0.0611146994138,0.0611146994138,0.0609103024258,0.0615234933898,0.0615234933898,0.0617278903778,0.0607059054378,0.0613190964018,0.0596839204977,0.0609103024258,0.0613190964018,0.0619322873658,0.0627498753178,0.0615234933898,0.0615234933898,0.0617278903778,0.0623410813418,0.0623410813418,0.0615234933898,0.0621366843538,0.0619322873658,0.0607059054378,0.0596839204977,0.0600927144738,0.0600927144738,0.0617278903778,0.0627498753178,0.0621366843538,0.0635674632699,0.0643850512219,0.0633630662819,0.0633630662819,0.0621366843538,0.0613190964018,0.0623410813418,0.0619322873658,0.0621366843538,0.0613190964018,0.0617278903778,0.0629542723058,0.0633630662819,0.0641806542339,0.0641806542339,0.0649982421859,0.0645894482099,0.0631586692938,0.0619322873658,0.0631586692938,0.0625454783298,0.0629542723058,0.0625454783298,0.0613190964018,0.0621366843538,0.0633630662819,0.0633630662819,0.0637718602579,0.0627498753178,0.0617278903778,0.0619322873658,0.0615234933898,0.0600927144738,0.0584575385697,0.0564135686897,0.0553915837496,0.0541652018216,0.0529388198936,0.0535520108576,0.0527344229055,0.0533476138696,0.0545739957976,0.0519168349535,0.0537564078456,0.0537564078456,0.0562091717016,0.0555959807376,0.0560047747136,0.0537564078456,0.0535520108576,0.0547783927856,0.0549827897736,0.0551871867616,0.0553915837496,0.0555959807376,0.0537564078456,0.0525300259175,0.0510992470015,0.0496684680855,0.0498728650735,0.0488508801334,0.0478288951934,0.0474201012174,0.0463981162774,0.0466025132654,0.0474201012174,0.0484420861574,0.0494640710974,0.0513036439895,0.0515080409775,0.0539608048336,0.0541652018216,0.0551871867616,0.0566179656777,0.0586619355577,0.0594795235097,0.0594795235097,0.0594795235097,0.0602971114618,0.0572311566417,0.0568223626657,0.0551871867616,0.0558003777256,0.0551871867616,0.0580487445937,0.0592751265217,0.0592751265217,0.0594795235097,0.0602971114618,0.0602971114618,0.0598883174858,0.0588663325457,0.0598883174858,0.0621366843538,0.0625454783298,0.0625454783298,0.0625454783298,0.0611146994138,0.0607059054378,0.0617278903778,0.0621366843538,0.0611146994138,0.0611146994138,0.0592751265217,0.0582531415817,0.0574355536297,0.0560047747136,0.0562091717016,0.0560047747136,0.0553915837496,0.0533476138696,0.0523256289295,0.0517124379655,0.0525300259175,0.0537564078456,0.0543695988096,0.0535520108576,0.0539608048336,0.0535520108576,0.0529388198936,0.0510992470015,0.0494640710974,0.0488508801334,0.0484420861574,0.0484420861574,0.0496684680855,0.0506904530255,0.0506904530255,0.0531432168816,0.0529388198936,0.0535520108576,0.0547783927856,0.0566179656777,0.0572311566417,0.0582531415817,0.0570267596537,0.0574355536297,0.0590707295337,0.0588663325457,0.0584575385697,0.0582531415817,0.0598883174858,0.0600927144738,0.0613190964018,0.0605015084498,0.0619322873658,0.0619322873658,0.0625454783298,0.0635674632699,0.0629542723058,0.0613190964018,0.0623410813418,0.0643850512219,0.0658158301379,0.06663341809,0.067451006042,0.0664290211019,0.0664290211019,0.0652026391739,0.0654070361619,0.0658158301379,0.0647938451979,0.0637718602579,0.0645894482099,0.0621366843538,0.0600927144738,0.0598883174858,0.0588663325457,0.0560047747136,0.0570267596537,0.0564135686897,0.0582531415817,0.0598883174858,0.0588663325457,0.0586619355577,0.0590707295337,0.0590707295337,0.0588663325457,0.0584575385697,0.0578443476057,0.0576399506177,0.0578443476057,0.0582531415817,0.0582531415817,0.0574355536297,0.0560047747136,0.0562091717016,0.0551871867616,0.0527344229055,0.0504860560375,0.0496684680855,0.0486464831454,0.0494640710974,0.0482376891694,0.0496684680855,0.0500772620615,0.0486464831454,0.0484420861574,0.0482376891694,0.0486464831454,0.0496684680855,0.0504860560375,0.0513036439895,0.0510992470015,0.0525300259175,0.0537564078456,0.0551871867616,0.0535520108576,0.0519168349535,0.0519168349535,0.0506904530255,0.0529388198936,0.0529388198936,0.0523256289295,0.0523256289295,0.0521212319415,0.0527344229055,0.0521212319415,0.0531432168816,0.0535520108576,0.0549827897736,0.0584575385697,0.0578443476057,0.0582531415817,0.0594795235097,0.0590707295337,0.0580487445937,0.0580487445937,0.0594795235097,0.0598883174858,0.0611146994138,0.0609103024258,0.0615234933898,0.0631586692938,0.0654070361619,0.0658158301379,0.0649982421859,0.0660202271259,0.0658158301379,0.068472990982,0.06867738797,0.0664290211019,0.0649982421859,0.0658158301379,0.06765540303,0.068268593994,0.0705169608621,0.0707213578501,0.0713345488141,0.0741961066462,0.0766488705022,0.0768532674903,0.0768532674903,0.0766488705022,0.0768532674903,0.0784884433943,0.0780796494183,0.0778752524303,0.0784884433943,0.0782840464063,0.0797148253223,0.0821675891784,0.0829851771304,0.0844159560465,0.0833939711064,0.0870731168905,0.0864599259265,0.0866643229145,0.0858467349625,0.0862555289385,0.0842115590585,0.0840071620705,0.0856423379745,0.0854379409865,0.0868687199025,0.0860511319505,0.0872775138786,0.0893214837586,0.0891170867706,0.0893214837586,0.0889126897826,0.0901390717106,0.0889126897826,0.0885038958066,0.0895258807466,0.0874819108666,0.0860511319505,0.0852335439985,0.0852335439985,0.0852335439985,0.0835983680944,0.0815543982144,0.0809412072504,0.0786928403823,0.0780796494183,0.0807368102624,0.0805324132744,0.0803280162864,0.0827807801424,0.0819631921904,0.0807368102624,0.0786928403823,0.0782840464063,0.0791016343583,0.0813500012264,0.0811456042384,0.0827807801424,0.0840071620705,0.0825763831544,0.0831895741184,0.0813500012264,0.0797148253223,0.0786928403823,0.0793060313463,0.0817587952024,0.0823719861664,0.0821675891784,0.0815543982144,0.0833939711064,0.0827807801424,0.0833939711064,0.0825763831544,0.0844159560465,0.0868687199025,0.0868687199025,0.0860511319505,0.0878907048426,0.0905478656867,0.0917742476147,0.0923874385787,0.0923874385787,0.0903434686986,0.0913654536387,0.0903434686986,0.0891170867706,0.0887082927946,0.0895258807466,0.0901390717106,0.0899346747226,0.0893214837586,0.0878907048426,0.0864599259265,0.0856423379745,0.0846203530345,0.0840071620705,0.0838027650825,0.0848247500225,0.0848247500225,0.0848247500225,0.0848247500225,0.0827807801424,0.0819631921904,0.0803280162864,0.0799192223103,0.0766488705022,0.0768532674903,0.0754224885742,0.0760356795382,0.0748092976102,0.0725609307421,0.0735829156822,0.0748092976102,0.0735829156822,0.0733785186941,0.0737873126702,0.0733785186941,0.0750136945982,0.0762400765262,0.0758312825502,0.0762400765262,0.0758312825502,0.0776708554423,0.0774664584543,0.0750136945982,0.0762400765262,0.0770576644783,0.0778752524303,0.0776708554423,0.0788972373703,0.0793060313463,0.0817587952024,0.0827807801424,0.0813500012264,0.0844159560465,0.0840071620705,0.0823719861664,0.0840071620705,0.0864599259265,0.0887082927946,0.0880951018306,0.0911610566507,0.0911610566507,0.0897302777346,0.0905478656867,0.0905478656867,0.0899346747226,0.0895258807466,0.0897302777346,0.0923874385787,0.0913654536387,0.0899346747226,0.0903434686986,0.0905478656867,0.0903434686986,0.0893214837586,0.0876863078546,0.0868687199025,0.0858467349625,0.0862555289385,0.0872775138786,0.0856423379745,0.0840071620705,0.0823719861664,0.0825763831544,0.0819631921904,0.0823719861664,0.0811456042384,0.0799192223103,0.0815543982144,0.0801236192983,0.0803280162864,0.0823719861664,0.0831895741184,0.0805324132744,0.0791016343583,0.0801236192983,0.0784884433943,0.0788972373703,0.0797148253223,0.0797148253223,0.0801236192983,0.0827807801424,0.0823719861664,0.0823719861664,0.0811456042384,0.0817587952024,0.0831895741184,0.0844159560465,0.0833939711064,0.0829851771304,0.0825763831544,0.0846203530345,0.0870731168905,0.0872775138786,0.0864599259265,0.0858467349625,0.0860511319505,0.0866643229145,0.0885038958066,0.0895258807466,0.0903434686986,0.0893214837586,0.0899346747226,0.0907522626747,0.0893214837586,0.0895258807466,0.0909566596627,0.0907522626747,0.0905478656867,0.0901390717106,0.0899346747226,0.0882994988186,0.0889126897826,0.0887082927946,0.0913654536387,0.0899346747226,0.0880951018306,0.0860511319505,0.0866643229145,0.0870731168905,0.0864599259265,0.0864599259265,0.0858467349625,0.0842115590585,0.0852335439985,0.0842115590585,0.0831895741184,0.0858467349625,0.0856423379745,0.0856423379745,0.0870731168905,0.0893214837586,0.0893214837586,0.0880951018306,0.0895258807466,0.0897302777346,0.0917742476147,0.0974973632789,0.101789700027,0.107104021715,0.114666710271,0.123864574732,0.13224485124,0.14246470064,0.154319725945,0.169240706069,0.185796862097,0.20705414885,0.235056536207,0.268373245252,0.298828396465,0.329896738642,0.363009050699,0.391624629019,0.424736941076,0.455600886265,0.486056037478,0.512627645919,0.532658550744,0.553302646532,0.570676390513,0.583757797745,0.596226014013,0.602971114618,0.610125009198,0.615234933898,0.620344858598,0.622593225466,0.629133929082,0.631791089926,0.632813074867,0.632608677879,0.629747120046,0.625659180286,0.622797622454,0.616665712814,0.609716215222,0.601540335702,0.591729280277,0.579669857985,0.567610435693,0.55350704352,0.535520108576,0.514671615799,0.485034052538,0.451921740481,0.419013825412,0.386719101307,0.35258480431,0.324173622977,0.28901734104,0.255905028983,0.224632289819,0.197447490414,0.176190203661,0.155546107873,0.138172363892,0.125908544612,0.114871107259,0.104038066895,0.0977017602669,0.0942270114708,0.0870731168905,0.0827807801424,0.0762400765262,0.0729697247181,0.069290578934,0.068472990982,0.068268593994,0.067246609054,0.0635674632699,0.0643850512219,0.0654070361619,0.0627498753178,0.0623410813418,0.0615234933898,0.0598883174858,0.0590707295337,0.0594795235097,0.0586619355577,0.0578443476057,0.0568223626657,0.0570267596537,0.0578443476057,0.0592751265217,0.0586619355577,0.0590707295337,0.0607059054378,0.0613190964018,0.0598883174858,0.0596839204977,0.0588663325457,0.0586619355577,0.0590707295337,0.0588663325457,0.0592751265217,0.0572311566417,0.0551871867616,0.0551871867616,0.0568223626657,0.0560047747136,0.0564135686897,0.0562091717016,0.0566179656777,0.0564135686897,0.0558003777256,0.0560047747136,0.0558003777256,0.0539608048336,0.0533476138696,0.0539608048336,0.0547783927856,0.0555959807376,0.0558003777256,0.0572311566417,0.0574355536297,0.0621366843538,0.0629542723058,0.0629542723058,0.0643850512219,0.0656114331499,0.0656114331499,0.0660202271259,0.0639762572459,0.0623410813418,0.0611146994138,0.0605015084498,0.0596839204977,0.0602971114618,0.0594795235097,0.0596839204977,0.0617278903778,0.0611146994138,0.0605015084498,0.0615234933898,0.0607059054378,0.0619322873658,0.0621366843538,0.0631586692938,0.0617278903778,0.0619322873658,0.0617278903778,0.0617278903778,0.0602971114618,0.0617278903778,0.0643850512219,0.0658158301379,0.0654070361619,0.0654070361619,0.0654070361619,0.0641806542339,0.0643850512219,0.0615234933898,0.0600927144738,0.0615234933898,0.0607059054378,0.0605015084498,0.0625454783298,0.0621366843538,0.0637718602579,0.067859800018,0.069290578934,0.0709257548381,0.0717433427901,0.0715389458021,0.0725609307421,0.0739917096582,0.0746049006222,0.0760356795382,0.0756268855622,0.0764444735142,0.0764444735142,0.0766488705022,0.0778752524303,0.0782840464063,0.0791016343583,0.0788972373703,0.0782840464063,0.0791016343583,0.0801236192983,0.0782840464063,0.0770576644783,0.0756268855622,0.0768532674903,0.0762400765262,0.0758312825502,0.0756268855622,0.0762400765262,0.0760356795382,0.0778752524303,0.0752180915862,0.0758312825502,0.0766488705022,0.0766488705022,0.0791016343583,0.0795104283343,0.0768532674903,0.0764444735142,0.0752180915862,0.0756268855622,0.0758312825502,0.0741961066462,0.0719477397781,0.069290578934,0.06867738797,0.068881784958,0.068268593994,0.06867738797,0.069086181946,0.068881784958,0.069290578934,0.0701081668861,0.069086181946,0.069903769898,0.0701081668861,0.069290578934,0.0707213578501,0.0711301518261,0.0723565337541,0.0733785186941,0.0758312825502,0.0778752524303,0.0803280162864,0.0811456042384,0.0809412072504,0.0803280162864,0.0807368102624,0.0811456042384,0.0788972373703,0.0764444735142,0.0744005036342,0.0741961066462,0.0750136945982,0.0756268855622,0.0778752524303,0.0770576644783,0.0748092976102,0.0768532674903,0.0776708554423,0.0797148253223,0.0795104283343,0.0801236192983,0.0815543982144,0.0807368102624,0.0815543982144,0.0815543982144,0.0815543982144,0.0821675891784,0.0815543982144,0.0833939711064,0.0838027650825,0.0838027650825,0.0840071620705,0.0838027650825,0.0823719861664,0.0795104283343,0.0760356795382,0.0741961066462,0.0725609307421,0.0719477397781,0.0717433427901,0.0723565337541,0.0737873126702,0.0744005036342,0.0752180915862,0.0776708554423,0.0805324132744,0.0805324132744,0.0825763831544,0.0854379409865,0.0864599259265,0.0876863078546,0.0895258807466,0.0903434686986,0.0905478656867,0.0889126897826,0.0897302777346,0.0901390717106,0.0887082927946,0.0917742476147,0.0903434686986,0.0903434686986,0.0895258807466,0.0895258807466,0.0911610566507,0.0889126897826,0.0889126897826,0.0905478656867,0.0909566596627,0.0930006295427,0.0944314084588,0.0972929662908,0.0995413331589,0.101380906051,0.101789700027,0.100972112075,0.101994097015,0.101789700027,0.100767715087,0.0993369361709,0.0999501271349,0.0985193482189,0.0970885693028,0.0962709813508,0.0923874385787,0.0905478656867,0.0868687199025,0.0868687199025,0.0848247500225,0.0831895741184,0.0817587952024,0.0803280162864,0.0795104283343,0.0778752524303,0.0780796494183,0.0746049006222,0.0752180915862,0.0758312825502,0.0768532674903,0.0754224885742,0.0746049006222,0.0754224885742,0.0750136945982,0.0741961066462,0.0719477397781,0.069086181946,0.06765540303,0.0652026391739,0.0637718602579,0.0619322873658,0.0621366843538,0.0613190964018,0.0605015084498,0.0584575385697,0.0592751265217,0.0578443476057,0.0576399506177,0.0584575385697,0.0576399506177,0.0582531415817,0.0590707295337,0.0582531415817,0.0596839204977,0.0590707295337,0.0588663325457,0.0568223626657,0.0568223626657,0.0574355536297,0.0558003777256,0.0584575385697,0.0576399506177,0.0574355536297,0.0555959807376,0.0543695988096,0.0533476138696,0.0533476138696,0.0535520108576,0.0521212319415,0.0515080409775,0.0513036439895,0.0521212319415,0.0508948500135,0.0500772620615,0.0502816590495,0.0502816590495,0.0498728650735,0.0486464831454,0.0492596741094,0.0490552771214,0.0498728650735,0.0492596741094,0.0515080409775,0.0517124379655,0.0527344229055,0.0531432168816,0.0525300259175,0.0525300259175,0.0531432168816,0.0527344229055,0.0521212319415,0.0529388198936,0.0539608048336,0.0531432168816,0.0539608048336,0.0555959807376,0.0543695988096,0.0535520108576,0.0537564078456,0.0533476138696,0.0517124379655,0.0521212319415,0.0527344229055,0.0525300259175,0.0553915837496,0.0562091717016,0.0549827897736,0.0549827897736,0.0551871867616,0.0560047747136,0.0564135686897,0.0555959807376,0.0576399506177,0.0574355536297,0.0584575385697,0.0590707295337,0.0594795235097,0.0586619355577,0.0570267596537,0.0558003777256,0.0539608048336,0.0527344229055,0.0523256289295,0.0539608048336,0.0523256289295,0.0517124379655,0.0541652018216,0.0549827897736,0.0549827897736,0.0553915837496,0.0553915837496,0.0551871867616,0.0549827897736,0.0562091717016,0.0555959807376,0.0560047747136,0.0572311566417,0.0555959807376,0.0553915837496,0.0558003777256,0.0537564078456,0.0531432168816,0.0537564078456,0.0543695988096,0.0555959807376,0.0551871867616,0.0535520108576,0.0539608048336,0.0525300259175,0.0537564078456,0.0541652018216,0.0541652018216,0.0543695988096,0.0541652018216,0.0553915837496,0.0574355536297,0.0578443476057,0.0574355536297,0.0572311566417,0.0564135686897,0.0578443476057,0.0578443476057,0.0570267596537,0.0568223626657,0.0588663325457,0.0602971114618,0.0600927144738,0.0625454783298,0.0617278903778,0.0617278903778,0.0623410813418,0.0627498753178,0.0641806542339,0.0649982421859,0.0652026391739,0.0654070361619,0.0658158301379,0.0658158301379,0.0662246241139,0.0652026391739,0.0639762572459,0.0627498753178,0.0643850512219,0.0647938451979,0.0649982421859,0.0654070361619,0.0641806542339,0.0633630662819,0.0627498753178,0.0627498753178,0.0627498753178,0.0602971114618,0.0596839204977,0.0594795235097,0.0598883174858,0.0590707295337,0.0576399506177,0.0576399506177,0.0574355536297,0.0560047747136,0.0539608048336,0.0523256289295,0.0525300259175,0.0492596741094,0.0515080409775,0.0502816590495,0.0500772620615,0.0500772620615,0.0492596741094,0.0488508801334,0.0498728650735,0.0494640710974,0.0484420861574,0.0484420861574,0.0480332921814,0.0488508801334,0.0492596741094,0.0508948500135,0.0492596741094,0.0492596741094,0.0484420861574,0.0463981162774,0.0455805283253,0.0453761313373,0.0457849253133,0.0455805283253,0.0449673373613,0.0441497494093,0.0433321614573,0.0439453524213,0.0439453524213,0.0423101765172,0.0421057795292,0.0437409554333,0.0423101765172,0.0433321614573,0.0437409554333,0.0441497494093,0.0443541463973,0.0445585433853,0.0429233674813,0.0443541463973,0.0457849253133,0.0451717343493,0.0443541463973,0.0447629403733,0.0429233674813,0.0433321614573,0.0443541463973,0.0441497494093,0.0433321614573,0.0439453524213,0.0451717343493,0.0449673373613,0.0482376891694,0.0478288951934,0.0494640710974,0.0504860560375,0.0519168349535,0.0525300259175,0.0523256289295,0.0523256289295,0.0529388198936,0.0541652018216,0.0551871867616,0.0564135686897,0.0566179656777,0.0574355536297,0.0588663325457,0.0576399506177,0.0586619355577,0.0592751265217,0.0596839204977,0.0619322873658,0.0639762572459,0.0637718602579,0.0656114331499,0.0647938451979,0.0639762572459,0.0660202271259,0.067451006042,0.068268593994,0.06969937291,0.0715389458021,0.0707213578501,0.0723565337541,0.0735829156822,0.0729697247181,0.0725609307421,0.0721521367661,0.069086181946,0.069494975922,0.06867738797,0.068472990982,0.068472990982,0.068064197006,0.067859800018,0.06867738797,0.069086181946,0.068881784958,0.06969937291,0.069290578934,0.068881784958,0.069903769898,0.069086181946,0.0709257548381,0.0703125638741,0.069086181946,0.069086181946,0.067042212066,0.0637718602579,0.0631586692938,0.0609103024258,0.0617278903778,0.0611146994138,0.0586619355577,0.0578443476057,0.0570267596537,0.0562091717016,0.0529388198936,0.0539608048336,0.0523256289295,0.0527344229055,0.0523256289295,0.0513036439895,0.0510992470015,0.0517124379655,0.0508948500135,0.0498728650735,0.0494640710974,0.0496684680855,0.0517124379655,0.0529388198936,0.0543695988096,0.0529388198936,0.0541652018216,0.0531432168816,0.0529388198936,0.0539608048336,0.0551871867616,0.0551871867616,0.0535520108576,0.0523256289295,0.0515080409775,0.0496684680855,0.0484420861574,0.0476244982054,0.0472157042294,0.0461937192894,0.0441497494093,0.0427189704933,0.0423101765172,0.0406750006132,0.0390398247091,0.0374046488051,0.0372002518171,0.034951884949,0.033725503021,0.0312727391649,0.0300463572369)
m <- c(0.0348061882165,0.0356156344541,0.0382463347263,0.0400675887608,0.0414841196766,0.0429006505924,0.0443171815082,0.044721904627,0.0465431586616,0.047757328018,0.0485667742556,0.0489714973744,0.0505903898495,0.0513998360871,0.0522092823247,0.0538281747999,0.0560541519533,0.0576730444285,0.0560541519533,0.0564588750721,0.0586848522255,0.0598990215819,0.0594942984631,0.0586848522255,0.0546376210375,0.0542328979187,0.0509951129683,0.048769135815,0.0489714973744,0.0499833051713,0.0493762204932,0.0495785820526,0.0499833051713,0.0499833051713,0.049780943612,0.0495785820526,0.0495785820526,0.0507927514089,0.0495785820526,0.0491738589338,0.0491738589338,0.0493762204932,0.0491738589338,0.0491738589338,0.049780943612,0.0503880282901,0.0513998360871,0.0528163670029,0.0540305363593,0.0558517903939,0.0570659597503,0.0562565135127,0.0560541519533,0.0558517903939,0.0584824906661,0.0584824906661,0.0580777675473,0.0580777675473,0.0588872137849,0.0596966600225,0.062529721854,0.0647556990074,0.065565145245,0.066576953042,0.067588760839,0.0673863992796,0.068600568636,0.069612376433,0.0692076533142,0.0690052917548,0.0690052917548,0.0671840377202,0.0661722299232,0.0653627836856,0.065565145245,0.0649580605668,0.0647556990074,0.063541529651,0.0639462527698,0.0651604221262,0.0653627836856,0.0649580605668,0.0661722299232,0.065565145245,0.0653627836856,0.0647556990074,0.063541529651,0.0643509758886,0.0639462527698,0.0643509758886,0.0649580605668,0.0659698683638,0.0653627836856,0.0649580605668,0.065565145245,0.0643509758886,0.0619226371758,0.0592919369037,0.0584824906661,0.0570659597503,0.0568635981909,0.0560541519533,0.0546376210375,0.0540305363593,0.0548399825969,0.0542328979187,0.0534234516811,0.0530187285623,0.0536258132405,0.0542328979187,0.0546376210375,0.0546376210375,0.0546376210375,0.0570659597503,0.0566612366315,0.0566612366315,0.0572683213097,0.0580777675473,0.0566612366315,0.0562565135127,0.0544352594781,0.0536258132405,0.0536258132405,0.0538281747999,0.0542328979187,0.0532210901217,0.0516021976465,0.0501856667307,0.0489714973744,0.0499833051713,0.0491738589338,0.0499833051713,0.0503880282901,0.0516021976465,0.0522092823247,0.0522092823247,0.0513998360871,0.0513998360871,0.0518045592059,0.0534234516811,0.0526140054435,0.0532210901217,0.0544352594781,0.0554470672751,0.0572683213097,0.0570659597503,0.0570659597503,0.0572683213097,0.0584824906661,0.0562565135127,0.0558517903939,0.0550423441563,0.0530187285623,0.0511974745277,0.0511974745277,0.0511974745277,0.0511974745277,0.0524116438841,0.0532210901217,0.0528163670029,0.0526140054435,0.0536258132405,0.0524116438841,0.0509951129683,0.0513998360871,0.0507927514089,0.0501856667307,0.0489714973744,0.0499833051713,0.049780943612,0.0507927514089,0.0518045592059,0.0513998360871,0.0520069207653,0.0520069207653,0.049780943612,0.0503880282901,0.0518045592059,0.0518045592059,0.0524116438841,0.0511974745277,0.0509951129683,0.0532210901217,0.0552447057157,0.0554470672751,0.0570659597503,0.0580777675473,0.0586848522255,0.0592919369037,0.0603037447007,0.0603037447007,0.0619226371758,0.0629344449728,0.0621249987352,0.0623273602946,0.061517914057,0.0605061062601,0.0596966600225,0.0596966600225,0.0607084678195,0.0617202756164,0.0609108293789,0.0605061062601,0.0621249987352,0.0611131909382,0.0609108293789,0.0607084678195,0.0601013831413,0.0592919369037,0.0590895753443,0.0594942984631,0.0598990215819,0.0596966600225,0.0576730444285,0.0574706828691,0.0558517903939,0.0556494288345,0.0550423441563,0.0540305363593,0.0516021976465,0.0499833051713,0.0499833051713,0.0507927514089,0.0516021976465,0.0526140054435,0.0520069207653,0.0532210901217,0.0522092823247,0.0524116438841,0.0532210901217,0.0528163670029,0.0526140054435,0.0544352594781,0.0542328979187,0.0554470672751,0.0552447057157,0.0546376210375,0.0552447057157,0.0558517903939,0.0550423441563,0.0566612366315,0.0570659597503,0.0574706828691,0.0598990215819,0.0607084678195,0.0607084678195,0.0603037447007,0.0609108293789,0.0607084678195,0.0613155524976,0.0623273602946,0.0631368065322,0.063541529651,0.0653627836856,0.0639462527698,0.0659698683638,0.0653627836856,0.0649580605668,0.0637438912104,0.0627320834134,0.0605061062601,0.0601013831413,0.0586848522255,0.0580777675473,0.0580777675473,0.0572683213097,0.0582801291067,0.0607084678195,0.0607084678195,0.0603037447007,0.0611131909382,0.061517914057,0.061517914057,0.0623273602946,0.0609108293789,0.0617202756164,0.0613155524976,0.0611131909382,0.0609108293789,0.0594942984631,0.0603037447007,0.0596966600225,0.0609108293789,0.0601013831413,0.0598990215819,0.0601013831413,0.0594942984631,0.0586848522255,0.0576730444285,0.0556494288345,0.0554470672751,0.0536258132405,0.0552447057157,0.0552447057157,0.0562565135127,0.0560541519533,0.0572683213097,0.0572683213097,0.0562565135127,0.0568635981909,0.0574706828691,0.0582801291067,0.0578754059879,0.0566612366315,0.0562565135127,0.0566612366315,0.0552447057157,0.0554470672751,0.0550423441563,0.0544352594781,0.0554470672751,0.0556494288345,0.0544352594781,0.0538281747999,0.0542328979187,0.0560541519533,0.0568635981909,0.0578754059879,0.0580777675473,0.0594942984631,0.0598990215819,0.0596966600225,0.0598990215819,0.0609108293789,0.0613155524976,0.0637438912104,0.0633391680916,0.0649580605668,0.065565145245,0.0657675068044,0.064553337448,0.0659698683638,0.065565145245,0.067588760839,0.07062418423,0.0704218226706,0.0694100148736,0.0683982070766,0.0671840377202,0.0667793146014,0.0663745914826,0.068600568636,0.0698147379924,0.0702194611112,0.071635992027,0.0726477998239,0.0730525229427,0.0748737769773,0.0762903078931,0.0787186466059,0.0787186466059,0.0777068388089,0.0775044772495,0.0768973925713,0.0764926694525,0.0756832232149,0.0744690538585,0.0742666922991,0.0730525229427,0.0732548845021,0.0736596076209,0.0732548845021,0.0730525229427,0.0734572460615,0.0728501613833,0.0734572460615,0.0732548845021,0.0724454382645,0.0730525229427,0.0718383535864,0.0700170995518,0.07062418423,0.0704218226706,0.0700170995518,0.0714336304676,0.0714336304676,0.071635992027,0.069612376433,0.0704218226706,0.0692076533142,0.067588760839,0.067588760839,0.0669816761608,0.0649580605668,0.0643509758886,0.0631368065322,0.0619226371758,0.0605061062601,0.0598990215819,0.0617202756164,0.0617202756164,0.0621249987352,0.0633391680916,0.064553337448,0.066576953042,0.0667793146014,0.065565145245,0.0641486143292,0.0641486143292,0.0629344449728,0.0633391680916,0.0631368065322,0.0637438912104,0.0643509758886,0.0647556990074,0.0651604221262,0.0661722299232,0.0661722299232,0.0679934839578,0.069612376433,0.0708265457894,0.071635992027,0.0720407151458,0.0724454382645,0.0708265457894,0.0726477998239,0.0726477998239,0.0714336304676,0.0718383535864,0.0728501613833,0.0734572460615,0.0734572460615,0.0744690538585,0.0760879463337,0.0775044772495,0.0779092003683,0.0787186466059,0.0783139234871,0.0811469853187,0.0799328159623,0.0783139234871,0.0770997541307,0.0793257312841,0.0793257312841,0.0791233697247,0.0787186466059,0.0775044772495,0.0775044772495,0.0770997541307,0.0764926694525,0.0764926694525,0.0754808616555,0.0740643307397,0.0744690538585,0.0736596076209,0.0728501613833,0.0722430767051,0.0722430767051,0.0710289073488,0.0704218226706,0.0700170995518,0.0671840377202,0.0671840377202,0.0659698683638,0.0653627836856,0.063541529651,0.0631368065322,0.062529721854,0.061517914057,0.0601013831413,0.0586848522255,0.0582801291067,0.0580777675473,0.0588872137849,0.0558517903939,0.0554470672751,0.0548399825969,0.0560541519533,0.0542328979187,0.0550423441563,0.0558517903939,0.0552447057157,0.0550423441563,0.0538281747999,0.0544352594781,0.0540305363593,0.0544352594781,0.0548399825969,0.0548399825969,0.0534234516811,0.0538281747999,0.0534234516811,0.0534234516811,0.0542328979187,0.0538281747999,0.0544352594781,0.0546376210375,0.0568635981909,0.0578754059879,0.0584824906661,0.0607084678195,0.0617202756164,0.0611131909382,0.0611131909382,0.0623273602946,0.063541529651,0.0631368065322,0.0613155524976,0.0613155524976,0.0613155524976,0.0617202756164,0.0621249987352,0.0631368065322,0.0613155524976,0.0621249987352,0.0613155524976,0.0611131909382,0.061517914057,0.0621249987352,0.0623273602946,0.0623273602946,0.0619226371758,0.0619226371758,0.062529721854,0.0637438912104,0.0643509758886,0.0621249987352,0.0627320834134,0.0607084678195,0.0594942984631,0.0627320834134,0.061517914057,0.0609108293789,0.0601013831413,0.0592919369037,0.0598990215819,0.0607084678195,0.0607084678195,0.0611131909382,0.0613155524976,0.0619226371758,0.0592919369037,0.0609108293789,0.0619226371758,0.0627320834134,0.0627320834134,0.0621249987352,0.0619226371758,0.0619226371758,0.0639462527698,0.063541529651,0.0641486143292,0.0641486143292,0.0641486143292,0.0637438912104,0.0639462527698,0.0641486143292,0.064553337448,0.064553337448,0.0647556990074,0.0643509758886,0.0653627836856,0.066576953042,0.0667793146014,0.0669816761608,0.067588760839,0.0649580605668,0.0661722299232,0.0679934839578,0.0677911223984,0.0688029301954,0.0690052917548,0.066576953042,0.066576953042,0.0653627836856,0.065565145245,0.0639462527698,0.0663745914826,0.0643509758886,0.0643509758886,0.0627320834134,0.0621249987352,0.0613155524976,0.061517914057,0.0605061062601,0.0605061062601,0.0596966600225,0.0609108293789,0.0619226371758,0.0637438912104,0.0669816761608,0.0677911223984,0.0702194611112,0.0744690538585,0.0766950310119,0.0811469853187,0.084384770269,0.0916697864074,0.0977406331893,0.104013841531,0.113322473263,0.122428743436,0.136796414153,0.153794785143,0.169781348335,0.189208058037,0.215515060759,0.243845679075,0.274199912985,0.304149423775,0.337336719517,0.367690953426,0.397842825777,0.424149828499,0.454301700849,0.483037042283,0.509141683446,0.530389647183,0.548602187528,0.562565135127,0.575516274928,0.586848522255,0.597573684903,0.602228000769,0.609917740026,0.614976779011,0.617809840843,0.621249987352,0.622261795149,0.621857072031,0.621047625793,0.617809840843,0.61517914057,0.607894124432,0.602835085447,0.596966600225,0.589276860967,0.57834933676,0.563981666043,0.548399825969,0.531806178098,0.512177106837,0.485870104115,0.458753655156,0.43042303684,0.400878249168,0.368095676545,0.337943804195,0.307589570285,0.280877844445,0.25234486457,0.224823692491,0.198719051329,0.177875810711,0.162293970637,0.149949915514,0.139629475985,0.128701951777,0.120809850961,0.116155535095,0.108668157397,0.103406756852,0.0997642487833,0.0973359100705,0.0930863173232,0.0902532554916,0.088432001457,0.0888367245758,0.0888367245758,0.0910627017292,0.0906579786104,0.0898485323728,0.0886343630164,0.0922768710856,0.0920745095262,0.0910627017292,0.0902532554916,0.0902532554916,0.0906579786104,0.089443809254,0.0872178321006,0.0862060243036,0.0882296398976,0.0876225552194,0.0892414476946,0.0906579786104,0.0912650632886,0.0902532554916,0.0892414476946,0.0890390861352,0.0896461708134,0.0876225552194,0.0858013011848,0.0847894933878,0.0839800471502,0.0827658777939,0.0839800471502,0.0837776855908,0.0835753240314,0.0825635162345,0.0837776855908,0.0827658777939,0.0827658777939,0.0811469853187,0.0827658777939,0.0801351775217,0.0797304544029,0.0793257312841,0.0795280928435,0.0779092003683,0.0779092003683,0.0789210081653,0.0817540699969,0.0841824087096,0.0847894933878,0.0866107474224,0.0888367245758,0.0890390861352,0.0888367245758,0.0892414476946,0.0880272783382,0.08742019366,0.0876225552194,0.0872178321006,0.0888367245758,0.0898485323728,0.08742019366,0.089443809254,0.0902532554916,0.0908603401698,0.0912650632886,0.0943004866796,0.0926815942044,0.093491040442,0.0916697864074,0.0926815942044,0.0918721479668,0.0928839557638,0.0926815942044,0.0936934020014,0.0918721479668,0.0922768710856,0.0922768710856,0.0955146560359,0.0975382716299,0.0977406331893,0.0993595256645,0.0973359100705,0.0961217407141,0.0949075713577,0.093491040442,0.090455617051,0.0892414476946,0.0906579786104,0.0912650632886,0.092479232645,0.092479232645,0.0912650632886,0.0900508939322,0.090455617051,0.0900508939322,0.0898485323728,0.0922768710856,0.0916697864074,0.0916697864074,0.0926815942044,0.0928839557638,0.090455617051,0.089443809254,0.0892414476946,0.0898485323728,0.0886343630164,0.0890390861352,0.0880272783382,0.0888367245758,0.089443809254,0.0886343630164,0.0880272783382,0.088432001457,0.086408385863,0.0841824087096,0.0839800471502,0.0835753240314,0.0851942165066,0.084384770269,0.0849918549472,0.0845871318284,0.0866107474224,0.0866107474224,0.0866107474224,0.0866107474224,0.0870154705412,0.0876225552194,0.089443809254,0.0902532554916,0.0896461708134,0.0890390861352,0.08742019366,0.088432001457,0.0882296398976,0.0872178321006,0.0851942165066,0.0837776855908,0.0829682393533,0.084384770269,0.0862060243036,0.085396578066,0.0866107474224,0.0862060243036,0.0858013011848,0.0841824087096,0.083372962472,0.083372962472,0.0825635162345,0.0827658777939,0.0819564315563,0.0827658777939,0.083372962472,0.0819564315563,0.0827658777939,0.0837776855908,0.084384770269,0.0845871318284,0.0837776855908,0.0847894933878,0.0829682393533,0.0829682393533,0.0827658777939,0.0821587931157,0.0815517084375,0.0807422621999,0.0795280928435,0.0823611546751,0.0825635162345,0.0815517084375,0.0803375390811,0.0813493468781,0.0819564315563,0.0819564315563,0.0823611546751,0.0831706009127,0.0807422621999,0.0827658777939,0.0797304544029,0.0811469853187,0.0817540699969,0.0823611546751,0.0831706009127,0.0839800471502,0.0870154705412,0.0876225552194,0.0868131089818,0.0872178321006,0.0849918549472,0.086408385863,0.0847894933878,0.083372962472,0.0817540699969,0.0811469853187,0.0831706009127,0.0821587931157,0.0841824087096,0.0829682393533,0.0819564315563,0.0837776855908,0.0835753240314,0.0855989396254,0.0892414476946,0.088432001457,0.0902532554916,0.0906579786104,0.0928839557638,0.0955146560359,0.0955146560359,0.0957170175953,0.0961217407141,0.0947052097983,0.0945028482389,0.0926815942044,0.0947052097983,0.0940981251202,0.0957170175953,0.0975382716299,0.0971335485111,0.0971335485111,0.0971335485111,0.0971335485111,0.0977406331893,0.0979429947487,0.10097841814,0.100168971902,0.103811479971,0.104418564649,0.104013841531,0.106644541803,0.106239818684,0.108263434278,0.106846903362,0.107251626481,0.107049264922,0.105835095565,0.104620926209,0.102192587496,0.100573695021,0.0989548025457,0.0993595256645,0.0975382716299,0.0957170175953,0.0930863173232,0.0926815942044,0.0916697864074,0.0922768710856,0.0910627017292,0.0912650632886,0.0908603401698,0.0892414476946,0.0888367245758,0.088432001457,0.0866107474224,0.084384770269,0.0837776855908,0.0821587931157,0.0803375390811,0.0805399006405,0.0783139234871,0.0766950310119,0.0758855847743,0.0714336304676,0.0708265457894,0.07062418423,0.0688029301954,0.0663745914826,0.0629344449728,0.0639462527698,0.0631368065322,0.0623273602946,0.0613155524976,0.0617202756164,0.0621249987352,0.0609108293789,0.0605061062601,0.0582801291067,0.0580777675473,0.0580777675473,0.0572683213097,0.0576730444285,0.0578754059879,0.0560541519533,0.0574706828691,0.0570659597503,0.0564588750721,0.0566612366315,0.0560541519533,0.0550423441563,0.0530187285623,0.0540305363593,0.0550423441563,0.0544352594781,0.0538281747999,0.0530187285623,0.0528163670029,0.0516021976465,0.0518045592059,0.0520069207653,0.0520069207653,0.0530187285623,0.0524116438841,0.0532210901217,0.0550423441563,0.0544352594781,0.0558517903939,0.0562565135127,0.0564588750721,0.0562565135127,0.0566612366315,0.0556494288345,0.0566612366315,0.0558517903939,0.0550423441563,0.0550423441563,0.0554470672751,0.0548399825969,0.0546376210375,0.0542328979187,0.0542328979187,0.0534234516811,0.0542328979187,0.0532210901217,0.0548399825969,0.0548399825969,0.0566612366315,0.0564588750721,0.0546376210375,0.0540305363593,0.0548399825969,0.0542328979187,0.0556494288345,0.0560541519533,0.0566612366315,0.0570659597503,0.0578754059879,0.0560541519533,0.0546376210375,0.0534234516811,0.0520069207653,0.0513998360871,0.0499833051713,0.0491738589338,0.0499833051713,0.049780943612,0.0505903898495,0.0518045592059,0.0503880282901,0.0505903898495,0.0511974745277,0.0522092823247,0.0511974745277,0.0509951129683,0.0505903898495,0.0522092823247,0.0511974745277,0.0513998360871,0.0516021976465,0.0528163670029,0.0518045592059,0.0505903898495,0.0507927514089,0.049780943612,0.0493762204932,0.049780943612,0.0495785820526,0.0509951129683,0.0499833051713,0.0499833051713,0.049780943612,0.048769135815,0.0479596895774,0.0481620511368,0.049780943612,0.0503880282901,0.0509951129683,0.0513998360871,0.0522092823247,0.0524116438841,0.0518045592059,0.0520069207653,0.0503880282901,0.0503880282901,0.0507927514089,0.0511974745277,0.0505903898495,0.0507927514089,0.0516021976465,0.0528163670029,0.0544352594781,0.0536258132405,0.0540305363593,0.0538281747999,0.0550423441563,0.0556494288345,0.0554470672751,0.0562565135127,0.0560541519533,0.0574706828691,0.0588872137849,0.0596966600225,0.0603037447007,0.0598990215819,0.0621249987352,0.0629344449728,0.0627320834134,0.0651604221262,0.0653627836856,0.0659698683638,0.0649580605668,0.064553337448,0.0647556990074,0.0637438912104,0.0631368065322,0.0631368065322,0.0621249987352,0.0617202756164,0.0605061062601,0.0598990215819,0.0601013831413,0.0607084678195,0.0607084678195,0.0590895753443,0.0588872137849,0.0580777675473,0.0564588750721,0.0562565135127,0.0560541519533,0.0556494288345,0.0534234516811,0.0530187285623,0.0520069207653,0.0538281747999,0.0548399825969,0.0546376210375,0.0536258132405,0.0534234516811,0.0526140054435,0.0528163670029,0.0513998360871,0.0509951129683,0.0509951129683,0.0495785820526,0.0507927514089,0.0501856667307,0.0526140054435,0.0546376210375,0.0544352594781,0.0558517903939,0.0544352594781,0.0538281747999,0.0542328979187,0.0536258132405,0.0540305363593,0.0544352594781,0.0544352594781,0.0534234516811,0.0538281747999,0.0532210901217,0.0534234516811,0.0544352594781,0.0552447057157,0.0564588750721,0.0564588750721,0.0562565135127,0.0570659597503,0.0564588750721,0.0572683213097,0.0554470672751,0.0542328979187,0.0548399825969,0.0566612366315,0.0568635981909,0.0572683213097,0.0564588750721,0.0564588750721,0.0554470672751,0.0560541519533,0.0564588750721,0.0552447057157,0.0564588750721,0.0542328979187,0.0530187285623,0.0509951129683,0.0503880282901,0.0520069207653,0.0538281747999,0.0538281747999,0.0540305363593,0.0548399825969,0.0544352594781,0.0538281747999,0.0552447057157,0.0570659597503,0.0582801291067,0.0592919369037,0.0588872137849,0.0594942984631,0.0586848522255,0.0574706828691,0.0584824906661,0.0605061062601,0.061517914057,0.0621249987352,0.0629344449728,0.0641486143292,0.0641486143292,0.0631368065322,0.0621249987352,0.0623273602946,0.0639462527698,0.0651604221262,0.0651604221262,0.0661722299232,0.0657675068044,0.0659698683638,0.0643509758886,0.0653627836856,0.0671840377202,0.0702194611112,0.0714336304676,0.07062418423,0.0700170995518,0.0698147379924,0.0692076533142,0.0694100148736,0.0692076533142,0.07062418423,0.0683982070766,0.0649580605668,0.0631368065322,0.0605061062601,0.0582801291067,0.0560541519533,0.0542328979187,0.0540305363593,0.0524116438841,0.0489714973744,0.0471502433398,0.0449242661864,0.0429006505924,0.0400675887608,0.0376392500481,0.0358179960135,0.0344014650977,0.0325802110631)
s <- c(0.028393424206,0.0285984308789,0.0297259675802,0.0303409875991,0.0301359809262,0.0297259675802,0.0276759008506,0.0274708941776,0.0258308407939,0.0247033040925,0.024805807429,0.0253183241114,0.025010814102,0.0251133174385,0.0253183241114,0.0253183241114,0.025215820775,0.0251133174385,0.0358761677693,0.0365936911246,0.037516221153,0.0381312411719,0.0392587778732,0.0395662878827,0.040898831257,0.0413088446029,0.0425388846407,0.0435639180055,0.0446914547069,0.0467415214365,0.0484840781567,0.0504316415499,0.0513541715783,0.0517641849242,0.0527892182891,0.053199231635,0.0554543050376,0.056171828393,0.0568893517484,0.0565818417389,0.0575043717673,0.0581193917862,0.0597594451699,0.0620145185726,0.062527035255,0.0629370486009,0.0636545719563,0.0635520686198,0.0648846119941,0.065704638686,0.0662171553684,0.0653971286765,0.0656021353495,0.0646796053212,0.0640645853023,0.0639620819658,0.0640645853023,0.0638595786293,0.0632445586104,0.0629370486009,0.062322028582,0.0635520686198,0.0638595786293,0.0639620819658,0.0649871153306,0.0640645853023,0.0639620819658,0.0637570752928,0.0634495652833,0.0638595786293,0.0632445586104,0.0637570752928,0.0639620819658,0.0638595786293,0.0630395519374,0.0630395519374,0.0633470619469,0.0635520686198,0.0628345452644,0.0611944918807,0.0615020018902,0.0611944918807,0.0605794718618,0.0601694585159,0.0588369151416,0.0581193917862,0.0590419218146,0.0585294051321,0.0582218951227,0.0576068751038,0.0581193917862,0.0590419218146,0.0594519351605,0.0598619485064,0.0598619485064,0.0615020018902,0.0610919885442,0.0603744651888,0.0600669551794,0.0610919885442,0.0600669551794,0.0600669551794,0.0589394184781,0.0579143851132,0.0583243984592,0.0590419218146,0.0592469284875,0.0589394184781,0.0576068751038,0.056376835066,0.0558643183836,0.056171828393,0.0550442916917,0.0546342783458,0.0538142516539,0.0539167549904,0.0536092449809,0.052994224962,0.0528917216255,0.0524817082796,0.052994224962,0.0544292716728,0.0526867149526,0.0539167549904,0.0545317750093,0.0562743317295,0.0568893517484,0.0569918550849,0.0558643183836,0.0558643183836,0.0570943584214,0.0560693250565,0.05596682172,0.0556593117106,0.0547367816822,0.0528917216255,0.0522767016066,0.0515591782513,0.0508416548959,0.0515591782513,0.0514566749148,0.0507391515594,0.0504316415499,0.0504316415499,0.0499191248675,0.0496116148581,0.0503291382134,0.0505341448864,0.0511491649053,0.0506366482229,0.0523792049431,0.0523792049431,0.053404238308,0.0546342783458,0.0554543050376,0.056171828393,0.056171828393,0.0550442916917,0.0557618150471,0.0549417883552,0.0547367816822,0.0542242649998,0.0539167549904,0.0535067416444,0.0560693250565,0.0577093784403,0.0578118817768,0.0587344118051,0.0596569418335,0.0599644518429,0.0600669551794,0.0600669551794,0.0605794718618,0.062527035255,0.0632445586104,0.0628345452644,0.0629370486009,0.0618095118996,0.0610919885442,0.0611944918807,0.0613994985537,0.0613994985537,0.0619120152361,0.0605794718618,0.0598619485064,0.0602719618524,0.0590419218146,0.0590419218146,0.0588369151416,0.0582218951227,0.0567868484119,0.056171828393,0.0560693250565,0.0566843450754,0.0571968617579,0.0564793384025,0.05596682172,0.0553518017011,0.0550442916917,0.0544292716728,0.052994224962,0.0509441582324,0.049816621531,0.0496116148581,0.050021628204,0.0510466615688,0.0520716949337,0.0517641849242,0.0536092449809,0.052994224962,0.053404238308,0.0544292716728,0.0551467950282,0.0553518017011,0.0567868484119,0.0560693250565,0.0568893517484,0.0576068751038,0.0571968617579,0.0572993650943,0.0575043717673,0.0579143851132,0.0588369151416,0.0596569418335,0.0594519351605,0.0613994985537,0.0618095118996,0.0621170219091,0.0624245319185,0.0624245319185,0.0615020018902,0.062322028582,0.0638595786293,0.0649871153306,0.0656021353495,0.0669346787238,0.065704638686,0.0667296720508,0.0658071420225,0.065704638686,0.0652946253401,0.0642695919752,0.0626295385915,0.0628345452644,0.0608869818713,0.059554438497,0.0594519351605,0.0585294051321,0.0576068751038,0.059349431824,0.0590419218146,0.0597594451699,0.0609894852077,0.0606819751983,0.0605794718618,0.0611944918807,0.0604769685253,0.0607844785348,0.0603744651888,0.0599644518429,0.0597594451699,0.059144425151,0.0597594451699,0.0594519351605,0.0596569418335,0.0585294051321,0.0585294051321,0.0581193917862,0.0565818417389,0.0550442916917,0.0541217616633,0.0525842116161,0.0528917216255,0.0513541715783,0.0528917216255,0.0530967282985,0.0528917216255,0.0526867149526,0.053199231635,0.053404238308,0.053404238308,0.0541217616633,0.0548392850187,0.0551467950282,0.0556593117106,0.0556593117106,0.056171828393,0.0555568083741,0.0540192583269,0.0541217616633,0.0533017349715,0.0541217616633,0.0546342783458,0.0544292716728,0.0538142516539,0.053404238308,0.0539167549904,0.0545317750093,0.0554543050376,0.056171828393,0.0569918550849,0.0594519351605,0.059349431824,0.0594519351605,0.0601694585159,0.0604769685253,0.0601694585159,0.0613994985537,0.0619120152361,0.0629370486009,0.0638595786293,0.0638595786293,0.0635520686198,0.0650896186671,0.0660121486954,0.0672421887332,0.0683697254346,0.0687797387805,0.0681647187616,0.0689847454535,0.068472228771,0.0671396853968,0.0662171553684,0.0677547054157,0.0692922554629,0.0698047721453,0.071649832202,0.0722648522209,0.0727773689034,0.0751349456425,0.0770825090357,0.07841505241,0.07841505241,0.0778000323911,0.0778000323911,0.0783125490735,0.0779025357275,0.0773900190451,0.0770825090357,0.0768775023627,0.0769800056992,0.0783125490735,0.0789275690924,0.0794400857748,0.0788250657559,0.0808751324856,0.0802601124667,0.0806701258126,0.0801576091302,0.0799526024572,0.0792350791018,0.0785175557464,0.07841505241,0.0786200590829,0.0792350791018,0.0786200590829,0.0799526024572,0.080977635822,0.080977635822,0.0800551057937,0.0802601124667,0.0802601124667,0.0788250657559,0.0786200590829,0.0788250657559,0.0767749990262,0.0757499656614,0.0747249322965,0.0741099122776,0.0733923889223,0.0722648522209,0.0721623488845,0.071854838875,0.0709323088467,0.0712398188561,0.0731873822493,0.0741099122776,0.0741099122776,0.0747249322965,0.0735973955952,0.0729823755763,0.0713423221926,0.0713423221926,0.071649832202,0.0730848789128,0.0732898855858,0.0743149189506,0.0751349456425,0.0749299389695,0.075237448979,0.075237448979,0.075237448979,0.0753399523154,0.0760574756708,0.0774925223816,0.078005039064,0.0770825090357,0.0776975290546,0.0786200590829,0.0776975290546,0.078210045737,0.0783125490735,0.0795425891113,0.0807726291491,0.0812851458315,0.0816951591774,0.0833352125612,0.0848727626084,0.0858977959733,0.0860002993097,0.0874353460205,0.0857952926368,0.0854877826273,0.084360245926,0.0848727626084,0.0846677559355,0.0849752659449,0.0850777692814,0.084360245926,0.0840527359166,0.0831302058882,0.0821051725234,0.0816951591774,0.0806701258126,0.0796450924478,0.0797475957842,0.0798500991207,0.0794400857748,0.0791325757653,0.0791325757653,0.0774925223816,0.0767749990262,0.0757499656614,0.0741099122776,0.0724698588939,0.0719573422115,0.0709323088467,0.0703172888278,0.0694972621359,0.0680622154251,0.0680622154251,0.0679597120886,0.0666271687143,0.0663196587049,0.0664221620414,0.0666271687143,0.065909645359,0.0663196587049,0.0658071420225,0.0666271687143,0.065499632013,0.0668321753873,0.0671396853968,0.0656021353495,0.0661146520319,0.065909645359,0.0666271687143,0.0663196587049,0.0671396853968,0.0675496987427,0.0687797387805,0.0685747321075,0.0680622154251,0.0693947587994,0.0691897521264,0.0687797387805,0.0693947587994,0.0709323088467,0.0721623488845,0.0729823755763,0.075032442306,0.0753399523154,0.0757499656614,0.0766724956897,0.0763649856803,0.0760574756708,0.0764674890168,0.0771850123722,0.0783125490735,0.0768775023627,0.0761599790073,0.0763649856803,0.0766724956897,0.0767749990262,0.0767749990262,0.075032442306,0.075032442306,0.0741099122776,0.0742124156141,0.0749299389695,0.0744174222871,0.0736998989317,0.0728798722398,0.0727773689034,0.0724698588939,0.0729823755763,0.0729823755763,0.0726748655669,0.0723673555574,0.0719573422115,0.0710348121831,0.0714448255291,0.0734948922587,0.0715473288656,0.0705222955007,0.0706247988372,0.0693947587994,0.0699072754818,0.0707273021737,0.0707273021737,0.0711373155196,0.0725723622304,0.0726748655669,0.0713423221926,0.0715473288656,0.0723673555574,0.0734948922587,0.0741099122776,0.0732898855858,0.0729823755763,0.0727773689034,0.074827435633,0.0758524689979,0.0762624823438,0.0758524689979,0.0755449589884,0.0754424556519,0.0758524689979,0.0768775023627,0.0775950257181,0.078005039064,0.0775950257181,0.0776975290546,0.0786200590829,0.0785175557464,0.0787225624194,0.0795425891113,0.0797475957842,0.0783125490735,0.0787225624194,0.0795425891113,0.0786200590829,0.0794400857748,0.0794400857748,0.0795425891113,0.0788250657559,0.0772875157086,0.0763649856803,0.0758524689979,0.0772875157086,0.0759549723343,0.0759549723343,0.074827435633,0.0736998989317,0.0738024022682,0.0733923889223,0.0723673555574,0.0736998989317,0.0731873822493,0.0738024022682,0.075032442306,0.0770825090357,0.0787225624194,0.0785175557464,0.0804651191396,0.0827201925423,0.0848727626084,0.0899979294326,0.0937905528825,0.100145759744,0.107013483289,0.114803736862,0.123721527136,0.133459344102,0.146682274508,0.162775298336,0.179175832173,0.19967649947,0.227044890311,0.258103401266,0.288751898874,0.319502899819,0.352918987513,0.382644955093,0.41452349274,0.443326930292,0.473872924564,0.501753832087,0.525022089469,0.546137776785,0.564075860669,0.577708804422,0.590521721482,0.599644518429,0.60866481204,0.613584972191,0.620042682389,0.623732802503,0.628447955981,0.631523056075,0.63254808944,0.632240579431,0.630395519374,0.626705399261,0.623937809176,0.617172588968,0.611124892115,0.604052161898,0.59523687496,0.583653997938,0.570328564195,0.555363077068,0.537937509866,0.517539345906,0.489350928373,0.459009940774,0.428156436492,0.396995422201,0.363271824498,0.333750863591,0.300744789243,0.270608808317,0.240472827391,0.212899429876,0.189016152476,0.168105471833,0.151499931323,0.139097027608,0.128334177277,0.117366320274,0.11019108672,0.106090953261,0.0987107130337,0.093893056219,0.0887678893948,0.0858977959733,0.0819001658504,0.0800551057937,0.0790300724289,0.0787225624194,0.0768775023627,0.07841505241,0.0787225624194,0.0769800056992,0.0761599790073,0.0775950257181,0.0766724956897,0.0757499656614,0.0755449589884,0.0751349456425,0.0749299389695,0.0738024022682,0.0727773689034,0.0726748655669,0.0744174222871,0.0738024022682,0.074827435633,0.0763649856803,0.0769800056992,0.0757499656614,0.0751349456425,0.0746224289601,0.074827435633,0.0740074089412,0.0729823755763,0.0726748655669,0.0712398188561,0.0695997654724,0.0702147854913,0.0709323088467,0.0704197921642,0.0701122821548,0.0706247988372,0.0703172888278,0.0702147854913,0.0690872487899,0.0700097788183,0.0685747321075,0.0674471954062,0.0669346787238,0.0673446920697,0.0669346787238,0.0673446920697,0.0679597120886,0.0701122821548,0.0714448255291,0.0741099122776,0.0754424556519,0.0765699923533,0.0773900190451,0.0779025357275,0.0781075424005,0.0776975290546,0.0763649856803,0.0756474623249,0.074827435633,0.0753399523154,0.0754424556519,0.0745199256236,0.0751349456425,0.0756474623249,0.0769800056992,0.0768775023627,0.0781075424005,0.0778000323911,0.0778000323911,0.0774925223816,0.0781075424005,0.078210045737,0.078005039064,0.078005039064,0.07841505241,0.0774925223816,0.0769800056992,0.0776975290546,0.0806701258126,0.0824126825328,0.0823101791963,0.0831302058882,0.0821051725234,0.0808751324856,0.0803626158031,0.078210045737,0.0759549723343,0.0760574756708,0.0763649856803,0.0765699923533,0.078210045737,0.078005039064,0.078210045737,0.0796450924478,0.0805676224761,0.081182642495,0.0814901525045,0.0826176892058,0.0828226958788,0.0835402192341,0.084360245926,0.0851802726179,0.0837452259071,0.0836427225706,0.0835402192341,0.0839502325801,0.0839502325801,0.084360245926,0.0842577425895,0.084565252599,0.084565252599,0.084565252599,0.0847702592719,0.0840527359166,0.0824126825328,0.0805676224761,0.0810801391585,0.0805676224761,0.081182642495,0.0806701258126,0.0812851458315,0.080977635822,0.0829251992152,0.0815926558409,0.0819001658504,0.0823101791963,0.0825151858693,0.0840527359166,0.0851802726179,0.0842577425895,0.0837452259071,0.0828226958788,0.0822076758598,0.0828226958788,0.0819001658504,0.0802601124667,0.0779025357275,0.0768775023627,0.0765699923533,0.0769800056992,0.0781075424005,0.0779025357275,0.07841505241,0.07841505241,0.0786200590829,0.0772875157086,0.0772875157086,0.0773900190451,0.0765699923533,0.0773900190451,0.0771850123722,0.078210045737,0.0790300724289,0.0795425891113,0.080977635822,0.0827201925423,0.0834377158977,0.0834377158977,0.0827201925423,0.0834377158977,0.0827201925423,0.0815926558409,0.0802601124667,0.0789275690924,0.0785175557464,0.0785175557464,0.078210045737,0.0807726291491,0.0804651191396,0.0788250657559,0.0792350791018,0.0801576091302,0.0814901525045,0.081387649168,0.0819001658504,0.0830277025517,0.081387649168,0.0828226958788,0.0812851458315,0.0820026691869,0.0826176892058,0.0826176892058,0.0839502325801,0.084565252599,0.0861028026462,0.0865128159922,0.0860002993097,0.0854877826273,0.0829251992152,0.0819001658504,0.0801576091302,0.0786200590829,0.0774925223816,0.0770825090357,0.07841505241,0.0786200590829,0.0799526024572,0.0797475957842,0.0804651191396,0.0828226958788,0.0827201925423,0.0847702592719,0.0880503660394,0.0881528693759,0.0896904194232,0.0908179561245,0.0923555061717,0.0937905528825,0.0929705261906,0.093483042873,0.093893056219,0.0924580095082,0.093893056219,0.0922530028352,0.0932780362001,0.0925605128447,0.0933805395366,0.0951230962568,0.0937905528825,0.0937905528825,0.0946105795744,0.0948155862473,0.0961481296216,0.0969681563135,0.0999407530715,0.100658276427,0.103425866512,0.103938383194,0.103323363175,0.105168423232,0.104860913223,0.105373429905,0.103938383194,0.104450899877,0.103630873185,0.102298329811,0.101273296446,0.0980956930148,0.0963531362946,0.093688049546,0.093893056219,0.0919454928258,0.0902029361056,0.0881528693759,0.0872303393475,0.0863078093192,0.0857952926368,0.0852827759544,0.0836427225706,0.0837452259071,0.0832327092247,0.0835402192341,0.0826176892058,0.0812851458315,0.0805676224761,0.0800551057937,0.0788250657559,0.0767749990262,0.0754424556519,0.0735973955952,0.0715473288656,0.0704197921642,0.0672421887332,0.0670371820603,0.0665246653779,0.0651921220036,0.0629370486009,0.0616045052266,0.0613994985537,0.0608869818713,0.0608869818713,0.0599644518429,0.0604769685253,0.0610919885442,0.0600669551794,0.0605794718618,0.059144425151,0.0589394184781,0.0579143851132,0.0575043717673,0.0580168884497,0.0572993650943,0.0577093784403,0.0580168884497,0.0577093784403,0.0564793384025,0.05596682172,0.0551467950282,0.0546342783458,0.0537117483174,0.0535067416444,0.0537117483174,0.0533017349715,0.053404238308,0.0523792049431,0.0518666882607,0.0513541715783,0.0514566749148,0.0513541715783,0.0507391515594,0.0515591782513,0.0511491649053,0.0519691915972,0.0525842116161,0.053404238308,0.0542242649998,0.0549417883552,0.0552492983647,0.0548392850187,0.0550442916917,0.0548392850187,0.0551467950282,0.0544292716728,0.0544292716728,0.0549417883552,0.0547367816822,0.0548392850187,0.0555568083741,0.0547367816822,0.0543267683363,0.0540192583269,0.0542242649998,0.0528917216255,0.0539167549904,0.0542242649998,0.0550442916917,0.056376835066,0.0558643183836,0.0549417883552,0.0553518017011,0.0551467950282,0.0562743317295,0.0566843450754,0.0565818417389,0.0578118817768,0.0581193917862,0.0577093784403,0.0572993650943,0.0568893517484,0.0557618150471,0.0546342783458,0.0533017349715,0.0519691915972,0.0517641849242,0.0514566749148,0.0526867149526,0.0524817082796,0.0514566749148,0.0527892182891,0.0535067416444,0.0540192583269,0.0537117483174,0.0536092449809,0.0533017349715,0.0540192583269,0.0541217616633,0.0539167549904,0.0542242649998,0.0554543050376,0.0541217616633,0.053404238308,0.0537117483174,0.0521741982702,0.0516616815877,0.0521741982702,0.0523792049431,0.0537117483174,0.052994224962,0.0521741982702,0.0522767016066,0.0510466615688,0.0512516682418,0.0515591782513,0.0523792049431,0.0527892182891,0.052994224962,0.0538142516539,0.0552492983647,0.0555568083741,0.0550442916917,0.0550442916917,0.0538142516539,0.0545317750093,0.0547367816822,0.0545317750093,0.0541217616633,0.0552492983647,0.056376835066,0.0568893517484,0.0589394184781,0.0581193917862,0.0583243984592,0.0585294051321,0.059349431824,0.0603744651888,0.0606819751983,0.0611944918807,0.0611944918807,0.0621170219091,0.0628345452644,0.0634495652833,0.0632445586104,0.0624245319185,0.0629370486009,0.0641670886387,0.0642695919752,0.0656021353495,0.065909645359,0.0656021353495,0.0646796053212,0.0641670886387,0.0642695919752,0.0637570752928,0.0622195252455,0.0619120152361,0.0612969952172,0.0612969952172,0.0602719618524,0.0592469284875,0.059349431824,0.059554438497,0.0588369151416,0.0569918550849,0.0560693250565,0.0557618150471,0.0533017349715,0.0543267683363,0.0536092449809,0.0533017349715,0.0521741982702,0.0515591782513,0.0508416548959,0.0522767016066,0.0525842116161,0.0519691915972,0.0514566749148,0.0511491649053,0.0511491649053,0.0514566749148,0.0515591782513,0.0505341448864,0.0505341448864,0.0494066081851,0.0489965948392,0.0482790714838,0.0494066081851,0.0506366482229,0.0504316415499,0.0508416548959,0.0497141181945,0.0489965948392,0.0495091115216,0.0492016015121,0.0485865814932,0.0486890848297,0.0495091115216,0.0482790714838,0.0489965948392,0.0488940915027,0.0492016015121,0.049816621531,0.0503291382134,0.0501241315405,0.0508416548959,0.0514566749148,0.0515591782513,0.0508416548959,0.0514566749148,0.0496116148581,0.0492016015121,0.050021628204,0.0508416548959,0.0505341448864,0.0510466615688,0.0512516682418,0.0511491649053,0.0522767016066,0.0523792049431,0.053404238308,0.0533017349715,0.0546342783458,0.0538142516539,0.0530967282985,0.0520716949337,0.0520716949337,0.0535067416444,0.0549417883552,0.0555568083741,0.0557618150471,0.0565818417389,0.0570943584214,0.056171828393,0.0574018684308,0.0586319084686,0.0594519351605,0.0610919885442,0.0619120152361,0.0621170219091,0.0626295385915,0.0616045052266,0.0617070085631,0.0637570752928,0.0649871153306,0.065704638686,0.0668321753873,0.0683697254346,0.0679597120886,0.0682672220981,0.0683697254346,0.0681647187616,0.0687797387805,0.0691897521264,0.0676522020792,0.0683697254346,0.0677547054157,0.0677547054157,0.0669346787238,0.0672421887332,0.0680622154251,0.0700097788183,0.0708298055102,0.0703172888278,0.0704197921642,0.0701122821548,0.0695997654724,0.0702147854913,0.0697022688088,0.0713423221926,0.0699072754818,0.0675496987427,0.0666271687143,0.0642695919752,0.0615020018902,0.0600669551794,0.0580168884497,0.0583243984592,0.0571968617579,0.0542242649998,0.0528917216255,0.0513541715783,0.0499191248675,0.046844024773,0.0461265014176,0.0443839446974,0.043871428015,0.0427438913137,0.0257283374574,0.0256258341209,0.0259333441304,0.0255233307844,0.025010814102,0.024805807429,0.0249083107655,0.0259333441304,0.0265483641493,0.0272658875046,0.0265483641493,0.0271633841682,0.0266508674857,0.0265483641493,0.0270608808317,0.0276759008506,0.0276759008506,0.0268558741587)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf("ChIPseq_LANA_iSLK_rep1-GSM1359483.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=37"),bty="n")
dev.off()