# R script for Peak Model
#  -- generated by MACS
p <- c(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0,0.0,0.0,0.0,0.0,0.0676818950931,0.0676818950931,0.0676818950931,0.0676818950931,0.0676818950931,0.0846023688663,0.0846023688663,0.0846023688663,0.0846023688663,0.0846023688663,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0338409475465,0.0846023688663,0.0846023688663,0.0846023688663,0.10152284264,0.10152284264,0.118443316413,0.118443316413,0.152284263959,0.169204737733,0.169204737733,0.118443316413,0.118443316413,0.10152284264,0.118443316413,0.169204737733,0.186125211506,0.186125211506,0.219966159052,0.253807106599,0.253807106599,0.270727580372,0.270727580372,0.304568527919,0.270727580372,0.219966159052,0.186125211506,0.186125211506,0.118443316413,0.0676818950931,0.0507614213198,0.0676818950931,0.0676818950931,0.10152284264,0.118443316413,0.118443316413,0.135363790186,0.135363790186,0.152284263959,0.152284263959,0.152284263959,0.135363790186,0.169204737733,0.118443316413,0.10152284264,0.118443316413,0.118443316413,0.152284263959,0.135363790186,0.169204737733,0.169204737733,0.169204737733,0.135363790186,0.135363790186,0.152284263959,0.152284263959,0.135363790186,0.118443316413,0.186125211506,0.169204737733,0.203045685279,0.186125211506,0.186125211506,0.219966159052,0.236886632826,0.287648054146,0.372250423012,0.372250423012,0.304568527919,0.338409475465,0.321489001692,0.338409475465,0.338409475465,0.321489001692,0.287648054146,0.253807106599,0.169204737733,0.203045685279,0.219966159052,0.186125211506,0.169204737733,0.152284263959,0.186125211506,0.169204737733,0.236886632826,0.219966159052,0.236886632826,0.186125211506,0.186125211506,0.186125211506,0.203045685279,0.236886632826,0.219966159052,0.203045685279,0.169204737733,0.169204737733,0.219966159052,0.236886632826,0.236886632826,0.253807106599,0.236886632826,0.219966159052,0.203045685279,0.253807106599,0.219966159052,0.203045685279,0.169204737733,0.169204737733,0.203045685279,0.203045685279,0.203045685279,0.203045685279,0.203045685279,0.169204737733,0.203045685279,0.270727580372,0.253807106599,0.287648054146,0.253807106599,0.253807106599,0.253807106599,0.253807106599,0.253807106599,0.270727580372,0.236886632826,0.203045685279,0.236886632826,0.304568527919,0.389170896785,0.406091370558,0.439932318105,0.439932318105,0.439932318105,0.558375634518,0.609137055838,0.626057529611,0.626057529611,0.524534686971,0.524534686971,0.507614213198,0.524534686971,0.575296108291,0.659898477157,0.575296108291,0.558375634518,0.642978003384,0.609137055838,0.626057529611,0.609137055838,0.659898477157,0.676818950931,0.642978003384,0.72758037225,0.761421319797,0.812182741117,0.744500846024,0.795262267343,0.862944162437,0.77834179357,0.710659898477,0.846023688663,0.93062605753,0.82910321489,0.862944162437,0.846023688663,0.87986463621,0.998307952623,0.93062605753,0.964467005076,0.998307952623,0.896785109983,0.846023688663,0.846023688663,0.761421319797,0.846023688663,0.812182741117,0.693739424704,0.77834179357,0.846023688663,0.82910321489,0.72758037225,0.744500846024,0.795262267343,0.846023688663,0.812182741117,0.82910321489,0.896785109983,0.812182741117,0.77834179357,0.77834179357,0.913705583756,0.913705583756,0.862944162437,0.82910321489,0.710659898477,0.659898477157,0.575296108291,0.626057529611,0.575296108291,0.609137055838,0.524534686971,0.524534686971,0.490693739425,0.439932318105,0.524534686971,0.541455160745,0.524534686971,0.473773265651,0.473773265651,0.439932318105,0.423011844332,0.372250423012,0.372250423012,0.389170896785,0.321489001692,0.270727580372,0.253807106599,0.236886632826,0.219966159052,0.219966159052,0.186125211506,0.186125211506,0.169204737733,0.169204737733,0.169204737733,0.203045685279,0.186125211506,0.169204737733,0.186125211506,0.152284263959,0.186125211506,0.203045685279,0.203045685279,0.186125211506,0.186125211506,0.169204737733,0.169204737733,0.169204737733,0.152284263959,0.152284263959,0.152284263959,0.169204737733,0.203045685279,0.186125211506,0.186125211506,0.186125211506,0.203045685279,0.203045685279,0.203045685279,0.203045685279,0.203045685279,0.135363790186,0.0846023688663,0.118443316413,0.118443316413,0.10152284264,0.10152284264,0.10152284264,0.10152284264,0.10152284264,0.0676818950931,0.10152284264,0.10152284264,0.0676818950931,0.0676818950931,0.0846023688663,0.0846023688663,0.10152284264,0.135363790186,0.186125211506,0.203045685279,0.186125211506,0.203045685279,0.219966159052,0.253807106599,0.253807106599,0.236886632826,0.236886632826,0.219966159052,0.186125211506,0.169204737733,0.152284263959,0.169204737733,0.152284263959,0.135363790186,0.118443316413,0.135363790186,0.135363790186,0.135363790186,0.118443316413,0.135363790186,0.169204737733,0.135363790186,0.152284263959,0.135363790186,0.135363790186,0.118443316413,0.10152284264,0.0846023688663,0.0846023688663,0.0676818950931,0.0338409475465,0.0338409475465,0.0169204737733,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0169204737733,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0338409475465,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0)
m <- c(0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0170969396478,0.0341938792956,0.0341938792956,0.085484698239,0.085484698239,0.085484698239,0.102581637887,0.136775517182,0.136775517182,0.15387245683,0.15387245683,0.170969396478,0.170969396478,0.119678577535,0.136775517182,0.136775517182,0.15387245683,0.119678577535,0.119678577535,0.136775517182,0.15387245683,0.119678577535,0.15387245683,0.170969396478,0.188066336126,0.239357155069,0.205163275774,0.222260215421,0.239357155069,0.256454094717,0.222260215421,0.222260215421,0.205163275774,0.205163275774,0.170969396478,0.119678577535,0.119678577535,0.102581637887,0.102581637887,0.0512908189434,0.085484698239,0.102581637887,0.102581637887,0.085484698239,0.102581637887,0.102581637887,0.102581637887,0.119678577535,0.119678577535,0.119678577535,0.119678577535,0.119678577535,0.188066336126,0.188066336126,0.222260215421,0.222260215421,0.222260215421,0.205163275774,0.205163275774,0.222260215421,0.222260215421,0.222260215421,0.136775517182,0.170969396478,0.136775517182,0.136775517182,0.15387245683,0.170969396478,0.188066336126,0.188066336126,0.170969396478,0.188066336126,0.222260215421,0.188066336126,0.170969396478,0.222260215421,0.239357155069,0.222260215421,0.205163275774,0.188066336126,0.188066336126,0.205163275774,0.205163275774,0.239357155069,0.290647974013,0.239357155069,0.256454094717,0.256454094717,0.290647974013,0.341938792956,0.359035732604,0.341938792956,0.393229611899,0.393229611899,0.410326551547,0.495811249786,0.478714310138,0.530005129082,0.54710206873,0.512908189434,0.495811249786,0.54710206873,0.530005129082,0.632586766969,0.649683706617,0.615489827321,0.598392887673,0.632586766969,0.70097452556,0.786459223799,0.889040861686,0.871943922038,0.923234740981,0.837750042742,0.786459223799,0.786459223799,0.871943922038,0.906137801334,0.820653103095,0.786459223799,0.837750042742,0.803556163447,0.752265344503,0.803556163447,0.803556163447,0.85484698239,0.786459223799,0.769362284151,0.85484698239,0.906137801334,0.769362284151,0.871943922038,0.923234740981,0.906137801334,1.00871943922,0.906137801334,0.889040861686,0.906137801334,0.837750042742,0.786459223799,0.85484698239,0.837750042742,0.837750042742,0.85484698239,0.752265344503,0.803556163447,0.871943922038,0.752265344503,0.769362284151,0.769362284151,0.735168404856,0.666780646264,0.615489827321,0.581295948025,0.598392887673,0.598392887673,0.632586766969,0.632586766969,0.615489827321,0.581295948025,0.598392887673,0.666780646264,0.615489827321,0.581295948025,0.598392887673,0.581295948025,0.598392887673,0.666780646264,0.598392887673,0.598392887673,0.54710206873,0.444520430843,0.427423491195,0.393229611899,0.359035732604,0.324841853308,0.239357155069,0.170969396478,0.188066336126,0.256454094717,0.239357155069,0.222260215421,0.222260215421,0.256454094717,0.239357155069,0.273551034365,0.256454094717,0.290647974013,0.290647974013,0.188066336126,0.188066336126,0.222260215421,0.222260215421,0.205163275774,0.205163275774,0.205163275774,0.188066336126,0.188066336126,0.188066336126,0.188066336126,0.205163275774,0.170969396478,0.205163275774,0.205163275774,0.256454094717,0.222260215421,0.222260215421,0.205163275774,0.222260215421,0.256454094717,0.256454094717,0.273551034365,0.239357155069,0.222260215421,0.170969396478,0.170969396478,0.222260215421,0.205163275774,0.170969396478,0.136775517182,0.119678577535,0.119678577535,0.170969396478,0.188066336126,0.205163275774,0.239357155069,0.188066336126,0.256454094717,0.290647974013,0.359035732604,0.359035732604,0.376132672252,0.324841853308,0.324841853308,0.324841853308,0.359035732604,0.359035732604,0.30774491366,0.290647974013,0.222260215421,0.222260215421,0.239357155069,0.239357155069,0.239357155069,0.222260215421,0.170969396478,0.188066336126,0.170969396478,0.170969396478,0.188066336126,0.170969396478,0.15387245683,0.188066336126,0.170969396478,0.15387245683,0.136775517182,0.119678577535,0.136775517182,0.119678577535,0.119678577535,0.15387245683,0.15387245683,0.15387245683,0.15387245683,0.15387245683,0.15387245683,0.136775517182,0.119678577535,0.119678577535,0.102581637887,0.102581637887,0.0683877585912,0.0512908189434,0.0512908189434,0.0683877585912,0.188066336126,0.188066336126,0.188066336126,0.256454094717,0.273551034365,0.256454094717,0.256454094717,0.239357155069,0.239357155069,0.239357155069,0.170969396478,0.170969396478,0.188066336126,0.119678577535,0.102581637887,0.102581637887,0.119678577535,0.170969396478,0.188066336126,0.170969396478,0.119678577535,0.119678577535,0.102581637887,0.102581637887,0.102581637887,0.085484698239,0.0683877585912,0.0170969396478,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0)
ycorr <- c(7.632640723359933e-05,7.629147813876956e-05,7.620145158868532e-05,7.605632758334664e-05,7.585814487264538e-05,7.560690345658153e-05,7.53100398900353e-05,7.501056685830955e-05,7.470548726438112e-05,7.439794593467282e-05,7.409444675070392e-05,7.379352167787019e-05,7.349769347976617e-05,7.319421449810834e-05,7.287225376887571e-05,7.253831517358752e-05,7.219239871224377e-05,7.18240707329411e-05,7.142736271540359e-05,7.10094767835267e-05,7.05737463186366e-05,7.012209769526983e-05,6.965407257349406e-05,6.917390165395199e-05,6.869730401817997e-05,6.823955008805605e-05,6.780154686317086e-05,6.738323331570972e-05,6.70020309927979e-05,6.666105904708789e-05,6.635320205626917e-05,6.607752734698079e-05,6.583496759258371e-05,6.562668989742353e-05,6.545290301871464e-05,6.530181764530474e-05,6.516449383366508e-05,6.503904056330342e-05,6.49235057859129e-05,6.480337834980638e-05,6.467734342123857e-05,6.453038016104939e-05,6.43511125637005e-05,6.41266452415087e-05,6.385776313843525e-05,6.353784031733153e-05,6.317191262511258e-05,6.276645826952731e-05,6.231746077860666e-05,6.182993032549533e-05,6.130701173661616e-05,6.0765729246976714e-05,6.0224472431107606e-05,5.970010180112045e-05,5.920115998842642e-05,5.8727285034952206e-05,5.827904765598546e-05,5.7847905220115056e-05,5.743403113051098e-05,5.703985176890872e-05,5.666194705239717e-05,5.6294745772818e-05,5.592934334068679e-05,5.55705668457042e-05,5.5195958893829956e-05,5.480396474887482e-05,5.439548173015536e-05,5.397404229593803e-05,5.353884129995048e-05,5.3090811415553666e-05,5.262344876122832e-05,5.213924074652462e-05,5.163818737144257e-05,5.110454388067549e-05,5.0545497246385626e-05,4.9970522773345044e-05,4.937769408701716e-05,4.876209739611635e-05,4.811956302781459e-05,4.743901043537288e-05,4.6720801576864536e-05,4.596709725781079e-05,4.5175012756543814e-05,4.434151562199609e-05,4.345653416033759e-05,4.251050636521121e-05,4.149557269584878e-05,4.040822636775419e-05,3.925467580364734e-05,3.805640952840022e-05,3.682008883320585e-05,3.553119288610304e-05,3.417461414634672e-05,3.274192235788107e-05,3.12525521439529e-05,2.9725592163232014e-05,2.816198476935341e-05,2.655380939373423e-05,2.4897406051019433e-05,2.3159297828244434e-05,2.1318175075166473e-05,1.9378115291569314e-05,1.735959814941604e-05,1.5306742970788935e-05,1.3230778031826665e-05,1.1098328272882945e-05,8.890382056598924e-06,6.62834204802457e-06,4.327631869896879e-06,1.992629952258222e-06,-3.357148830022494e-07,-2.646235387560558e-06,-4.938258992810752e-06,-7.231347849088271e-06,-9.560033598348004e-06,-1.1899422784540125e-05,-1.4208184425391127e-05,-1.649615578374639e-05,-1.8790361238591857e-05,-2.1062971264669253e-05,-2.3333930172698372e-05,-2.5618982717985872e-05,-2.7921054447703208e-05,-3.0263820366013942e-05,-3.2623875253783556e-05,-3.49925489525123e-05,-3.740808864586552e-05,-3.9869831445511345e-05,-4.2343877452597205e-05,-4.483891702793392e-05,-4.737006318372583e-05,-4.99187369487761e-05,-5.248753263653096e-05,-5.505120535490432e-05,-5.759074346653731e-05,-6.013245290572857e-05,-6.266209230582004e-05,-6.515121639194733e-05,-6.762054389675452e-05,-7.00599067445525e-05,-7.243794295181653e-05,-7.475248624156611e-05,-7.69856567267437e-05,-7.913404947617143e-05,-8.122948481330637e-05,-8.327636137050196e-05,-8.524180409531085e-05,-8.715244973487538e-05,-8.901120321317444e-05,-9.082285079440507e-05,-9.263577238387741e-05,-9.444659924622093e-05,-9.625000007572127e-05,-9.805777470556771e-05,-9.986018772623315e-05,-0.0001016579373800939,-0.00010347340403987923,-0.0001053159194897764,-0.00010717294061990141,-0.00010905251005446652,-0.00011090579922850333,-0.00011269633960348336,-0.00011444147570522094,-0.00011613857239476618,-0.00011778220619336046,-0.0001193573411101104,-0.00012083404784205115,-0.00012217140871252313,-0.0001233947561569604,-0.00012449879422369293,-0.0001254862855787592,-0.00012639754182948676,-0.00012724308332936397,-0.0001280299846751977,-0.0001287787255389511,-0.00012948694603816255,-0.00013018148199691473,-0.00013090141141891564,-0.00013162490865322737,-0.00013233217711852978,-0.00013304240185535172,-0.00013376511919627993,-0.00013450599673133182,-0.00013526107901635294,-0.0001360257178362719,-0.00013678650811593254,-0.00013754814941794688,-0.0001382946166799422,-0.00013901826458982398,-0.0001397497463667036,-0.00014047398014360631,-0.00014118034918518473,-0.00014185857304039446,-0.00014251137902122953,-0.00014312827244797197,-0.00014372454394481093,-0.0001443001068101613,-0.00014485363105854463,-0.0001453953617869609,-0.0001459277607311899,-0.00014646263740469503,-0.0001470159550002714,-0.00014757745326918559,-0.00014813729494859228,-0.00014868912388637184,-0.0001492391741790145,-0.0001497826595623232,-0.00015032626700126135,-0.00015087085214787881,-0.00015140063489282461,-0.00015190397912580542,-0.00015236879039659556,-0.00015279998249648067,-0.00015321450263915741,-0.00015363319245466218,-0.0001540461279785646,-0.00015445953783589563,-0.00015487918178971682,-0.00015532584044224994,-0.00015581255691057784,-0.00015635712438017313,-0.00015695828357364594,-0.0001576125630605445,-0.00015831441730648082,-0.0001590574194512466,-0.0001598486537719228,-0.00016069364012912714,-0.0001615715368928232,-0.0001624461966570522,-0.00016328601332703068,-0.00016408260799424348,-0.00016482644432610377,-0.0001655299947244068,-0.0001661928972310793,-0.00016681431555461937,-0.00016737307725214688,-0.0001678480965823668,-0.00016825337500949315,-0.0001686143510310932,-0.00016895768159662033,-0.0001692925154068177,-0.00016962659962709817,-0.00016996458247253317,-0.00017029590823558998,-0.00017061446066659298,-0.00017093948583388565,-0.00017129272689563578,-0.00017167070274111754,-0.00017205931552425778,-0.00017245892720312977,-0.00017287065900599774,-0.00017330226862031158,-0.00017373765480415058,-0.0001741742080923352,-0.0001746164546443075,-0.00017505972057122574,-0.00017548217601333718,-0.0001758837952968715,-0.0001762696752965584,-0.00017664032569987082,-0.0001769799407236875,-0.00017727558962628076,-0.00017752820508101162,-0.0001777550554341464,-0.0001779809377598759,-0.00017820958275164384,-0.00017845817205413157,-0.00017874916306137941,-0.00017908826418890832,-0.00017948243765816984,-0.0001799343186081139,-0.00018045437604468812,-0.00018104824220386558,-0.00018171175288427747,-0.00018242100833104966,-0.00018315648174789106,-0.0001839143814135431,-0.00018467567001687675,-0.00018542018901849855,-0.000186133055628374,-0.00018680658918036425,-0.00018744043318785517,-0.00018803726361530033,-0.0001885939966640915,-0.0001891017277447443,-0.00018956479993325665,-0.0001899754555421788,-0.00019032874542618066,-0.0001906386100216617,-0.0001909069146753438,-0.00019114331777544312,-0.0001913557954468979,-0.00019153822596857327,-0.00019168031373769154,-0.00019179117210095146,-0.00019188582189751317,-0.00019197734159850376,-0.00019207076705083845,-0.00019216295342809432,-0.00019225033291796063,-0.00019233590261746045,-0.00019241144649921163,-0.00019247321366745924,-0.00019253056705162015,-0.00019257934245032554,-0.00019260883642664304,-0.00019261242304342404,-0.0001925884865366646,-0.0001925456915934052,-0.00019249627071299722,-0.0001924407335829136,-0.0001923749160017855,-0.0001923028954693968,-0.00019222662403405434,-0.00019215068888301485,-0.00019208783220310256,-0.0001920436605565202,-0.000192015202520015,-0.00019199591885802326,-0.00019197408675866669,-0.00019194460934721553,-0.00019191360287334545,-0.00019188106733705645,-0.00019184640634929053,-0.00019180359036195715,-0.00019174650312538054,-0.0001916690283898851,-0.00019157779209261948,-0.0001914767850317824,-0.00019137008470715766,-0.0001912597298686371,-0.0001911441914538018,-0.0001910295857123275,-0.0001909196538596949,-0.00019081805040979983,-0.00019072681411253417,-0.000190645435280425,-0.00019057136547610741,-0.00019049848844990573,-0.00019043037201413077,-0.00019036956460614742,-0.00019031861466332052,-0.00019027395437333928,-0.00019022488029927126,-0.00019016867060058163,-0.00019010328652737857,-0.00019003331526691876,-0.00018995620838183736,-0.00018987502399697218,-0.00018978721367495836,-0.00018968819022853922,-0.00018957489553287686,-0.0001894463102130254,-0.0001893075311437145,-0.00018916314551220095,-0.00018901264363101173,-0.00018885347706278202,-0.00018868921361982256,-0.00018852647923928202,-0.00018836629329610635,-0.00018821273329007926,-0.00018806732828361978,-0.0001879300782767278,-0.0001878020026443493,-0.00018768208201153832,-0.00018757286481565973,-0.0001874789382439703,-0.00018739877323405106,-0.00018732370509886152,-0.00018725118540103685,-0.00018717560757837434,-0.00018709442319350916,-0.0001870076322464413,-0.00018691370567475187,-0.00018681213379096785,-0.00018670189722014334,-0.00018657840877502158,-0.00018644166845560258,-0.00018629524407419714,-0.00018614015500575116,-0.00018598098843752143,-0.00018582437030665656,-0.0001856708103006295,-0.00018552336654427813,-0.00018538356810002127,-0.000185251414967859,-0.00018512741683526427,-0.00018500953495234515,-0.00018489624025668286,-0.0001847885521232232,-0.00018468901898933108,-0.00018459254398027678,-0.0001844991270960603,-0.00018440723927426274,-0.00018431178364015439,-0.00018421072144384333,-0.00018410456237280255,-0.00018399636455186994,-0.00018388714735599138,-0.00018377589141022087,-0.00018365953858972073,-0.00018353605014459896,-0.00018340593576232856,-0.00018326766638049062,-0.0001831263388738149,-0.00018298654042955806,-0.00018284980011013907,-0.00018271509854061194,-0.00018258345509592264,-0.00018245690852596304,-0.00018233596851820614,-0.00018222216413507077,-0.00018211345662666521,-0.00018201035568046227,-0.00018191184192151605,-0.00018181485722498878,-0.00018171634346604261,-0.0001816168103321505,-0.00018151370938594756,-0.000181403982502596,-0.00018128661030714988,-0.00018116261217455515,-0.00018103453654217666,-0.00018090442215990625,-0.00018077175934027104,-0.00018063603839579798,-0.000180498788388906,-0.00018035898994464913,-0.00018021868181291933,-0.00018008092211855442,-0.00017994622054902728,-0.00017981457710433796,-0.0001796854820970135,-0.00017955689677716206,-0.00017942831145731055,-0.00017930023582493206,-0.00017917266988002654,-0.000179045613622594,-0.00017891906705263437,-0.0001787899720453099,-0.00017865679953820175,-0.0001785190398438368,-0.00017837618327474212,-0.00017822772014344478,-0.00017807365044994477,-0.00017791601294413396,-0.00017775582700095828,-0.00017759513137030966,-0.0001774329066772421,-0.0001772717013591205,-0.0001771150832282556,-0.00017696560072201232,-0.00017682427321533657,-0.00017669161039570136,-0.00017656965101299848,-0.00017645686600480914,-0.00017635019724629542,-0.00017624760598756547,-0.00017614960191609223,-0.00017605465596945685,-0.00017596021971029443,-0.00017586272532629416,-0.00017576013406756422,-0.0001756534653090505,-0.0001755411899883341,-0.00017542279841794203,-0.00017530134872271213,-0.00017517684090264445,-0.00017504723620784707,-0.00017491202495084694,-0.00017477273619406308,-0.00017463089899991436,-0.00017448753274334672,-0.00017434263742436017,-0.0001741951936680088,-0.00017404622084923847,-0.00017389418990563032,-0.00017373961052465734,-0.00017358656020610325,-0.00017343809707480592,-0.0001732932017558194,-0.0001731513645616707,-0.0001730125854923598,-0.00017287635486041376,-0.00017274267266583255,-0.00017261102922114325,-0.00017248142452634584,-0.00017235436826891327,-0.00017222731201148073,-0.00017209872669162924,-0.00017196759293441294,-0.00017183442042730473,-0.00017169869948283165,-0.00017155992041352077,-0.000171419102594318,-0.00017127624602522335,-0.00017113186039370977,-0.00017098492632483135,-0.00017083544381858807,-0.00017068086443761506,-0.00017052118818191233,-0.00017035641505147993,-0.0001701870547337908,-0.0001700131072288449,-0.00016983457253664228,-0.00016964992159476398,-0.00016945966409068303,-0.00016926430971187238,-0.00016906385845833199,-0.0001688608587674268,-0.00016865633001410268,-0.0001684497625108867,-0.0001682401368828328,-0.00016802796281741408,-0.00016781476937704945,-0.00016760463406152262,-0.00016739602780841472,-0.00016718742155530679,-0.00016697932498967185,-0.00016676969936161803,-0.0001665595640460912,-0.00016635240015381724,-0.00016615177549710684,-0.0001659576900759601,-0.0001657665760780662,-0.0001655728269412224,-0.00016537593297795582,-0.00016517946200057722,-0.00016498545275897845,-0.00016479900212788923,-0.00016462265854467448,-0.0001644514118361894,-0.00016427668401697854,-0.00016409796539956892,-0.0001639208625461632,-0.00016374792389412625,-0.0001635847560056607,-0.00016342982981834775,-0.00016328212595724138,-0.00016313399911024702,-0.0001629778039652701,-0.00016281608895967552,-0.00016266049020375657,-0.00016251151738498626,-0.00016236050581632408,-0.00016220898456018891,-0.000162052876116797,-0.00016189116111120242,-0.00016171976204362138,-0.00016153918860152685,-0.00016135954783279331,-0.00016118236879983963,-0.00016099796744067931,-0.00016080583406783946,-0.00016061616243077947,-0.00016043828978514577,-0.0001602706870685195,-0.00016011233490595465,-0.000159968330172181,-0.00015984988599160386,-0.00015975199219107856,-0.0001596675998475685,-0.0001596002767733844,-0.00015955562953072906,-0.0001595265224949808,-0.00015950565716038508,-0.00015948828345855215,-0.00015947796920179284,-0.00015947573376505307,-0.00015947138339887345,-0.00015946177327683114,-0.00015945395232196274,-0.00015945250772152498,-0.00015944877478847738,-0.00015944530196018475,-0.00015943546329949846,-0.00015941942168755158,-0.00015939615774939806,-0.0001593595552353623,-0.0001593136916452281,-0.00015925865368058038,-0.0001591848439810178,-0.00015908359785949972,-0.00015895644437844515,-0.00015880389322532701,-0.00015862747346256426,-0.0001584373788396163,-0.00015823513841890202,-0.00015802126188789442,-0.00015779371049670158,-0.0001575550326826884,-0.00015732145174340487,-0.0001571021420533646,-0.00015690372954971614,-0.00015672417548256756,-0.00015658196215974222,-0.0001564730120814564,-0.00015638764118572357,-0.0001563258494725438,-0.00015628661756697117,-0.00015626382921932994,-0.00015623862599312022,-0.0001561972463265718,-0.00015612949647022525,-0.00015603429602131994,-0.00015592132904184238,-0.00015577109384902325,-0.00015558511950528145,-0.0001553679931978738,-0.00015512022461427316,-0.00015484945906657415,-0.00015456894842907402,-0.00015429211797923998,-0.00015402202584190993,-0.0001537668270166513,-0.00015351740815676534,-0.00015326357551279267,-0.00015300889689704404,-0.00015275184324710052,-0.00015248578862581355,-0.00015220053928372367,-0.0001518889595962093,-0.00015153354678601946,-0.00015113667588734895,-0.00015069070158810324,-0.0001501854301388229,-0.00014962442935181875,-0.00014901534453918533,-0.00014835970476334152,-0.00014766923283616578,-0.00014695667094448222,-0.00014623578065006115,-0.00014553306570149705,-0.00014485685450152746,-0.00014421785048708473,-0.0001436375215598483,-0.000143137784281156,-0.00014272016771342669,-0.0001423704006074172,-0.00014208287640092484,-0.0001418575950939496,-0.0001416843629370321,-0.0001415422827437805,-0.00014141504451505976,-0.0001412965320011942,-0.00014117445167501782,-0.00014101969032275663,-0.0001408133895079107,-0.0001405749173544529,-0.00014030733198722108,-0.00014001063340621524,-0.00013967870536175974,-0.00013932072222836803,-0.00013895911025485084,-0.00013858775319153252,-0.0001382199029127103,-0.00013786989169544208,-0.00013755504891380886,-0.00013726212269351336,-0.00013699824865917722,-0.00013675578149870588,-0.0001365413471492479,-0.0001363544359233304,-0.00013616803438488585,-0.00013598112315896832,-0.00013578045037128056,-0.0001355466478978497,-0.00013526289605206768,-0.00013494193702075883,-0.00013457408674193662,-0.00013414405459141195,-0.00013364827275687402,-0.00013307145061413375,-0.00013242633035001535,-0.000131727692901235,-0.00013096789295569816,-0.00013016884707474255,-0.00012936011713180048,-0.00012853660625214227,-0.00012768812068630846,-0.0001268477901200422,-0.0001260227501779651,-0.00012523695617130671,-0.0001244995824745806,-0.0001237983965884354,-0.00012313034038803332,-0.00012248165231160411,-0.00012180595079910745,-0.00012108233866415152,-0.00012031030621926337,-0.00011944653002924042,-0.00011847520978242065,-0.00011737086110515547,-0.00011611564493589085,-0.00011468254783855939,-0.0001130674923133773,-0.00011128576898453375,-0.00010937815284986633,-0.00010734413422190214,-0.00010518575185053305,-0.00010293613542150216,-0.00010060301694848902,-9.818588674402068e-05,-9.566384762170535e-05,-9.306238395519153e-05,-9.038914105657382e-05,-8.761557642736582e-05,-8.467594038355432e-05,-8.15717619875582e-05,-7.830711873916124e-05,-7.486570063922837e-05,-7.122142692505306e-05,-6.73925596440773e-05,-6.339489910796317e-05,-5.922181937956203e-05,-5.488810139559005e-05,-5.042279734200658e-05,-4.5884011590730305e-05,-4.132679038884207e-05,-3.6773050297679645e-05,-3.2254901628040186e-05,-2.779629969115332e-05,-2.3385608376725727e-05,-1.903913768389247e-05,-1.4784920423666953e-05,-1.0620469186499006e-05,-6.50500897455095e-06,-2.446185099917346e-06,1.6003452475502738e-06,5.701860814284072e-06,9.922072534405412e-06,1.4272703219792632e-05,1.8711448810189138e-05,2.321027649458153e-05,2.779059314683459e-05,3.246876979389807e-05,3.718472434177608e-05,4.191755960407682e-05,4.6687663079719125e-05,5.143489164689241e-05,5.6037939687029604e-05,6.0432076891063415e-05,6.465858794430447e-05,6.88061584670497e-05,7.286867220962346e-05,7.679923792451247e-05,8.061206583314518e-05,8.439788030571042e-05,8.810571259491111e-05,9.16784777037745e-05,9.525379125000274e-05,9.892441635367653e-05,0.0001027183858258093,0.00010650521967332048,0.00011026758852212907,0.00011408449393054551,0.00011801098214565071,0.00012195123192252612,0.00012590728201106362,0.0001299897345928979,0.00013414150467105625,0.00013823568006476888,0.00014219020109088745,0.00014609579211960082,0.00015001769314744928,0.0001538769026161223,0.00015758830271763374,0.0001611666743886998,0.00016465228293968516,0.00016795848150018473,0.00017108017319546884,0.00017410196614605063,0.00017709878441045685,0.00018006196330164702,0.00018291504969867548,0.0001857059542240015,0.00018847647125040865,0.00019127553077530213,0.00019408478404965508,0.00019700311044322378,0.0002000830077657243,0.00020335097976575112,0.000206792755194061,0.00021039763061372159,0.00021419516789816516,0.00021818281861002688,0.00022237995087327964,0.00022678860343781535,0.00023143884786453928,0.00023626595384438414,0.0002411837841944178,0.0002461347442301946,0.0002511127177020388,0.00025615898929526115,0.00026132248900726684,0.0002666210558996098,0.0002720307346610604,0.00027750718248147017,0.0002830315409243393,0.0002886552884244377,0.0002944696590394272,0.0003005521252651994,0.0003069026871017544,0.0003135136992369975,0.0003203433672981451,0.00032732543191371096,0.0003345368558921138,0.0003420775379780558,0.0003499765303574964,0.0003581981549073277,0.0003666017378850096,0.00037516383366678537,0.0003839140041260874,0.000392847662075659,0.0004019908015766216,0.00041143261793674527,0.00042107015428648973,0.0004307591690710042,0.00044040944760757297,0.0004499679823990069,0.00045958207312499466,0.0004692721072844551,0.0004789855870676722,0.0004886746018521867,0.0004982382335183503,0.0005075781123838797,0.0005167492846958558,0.000525848591074143,0.0005348770508936871,0.0005439396597739203,0.0005530338692774778,0.0005620949490952921,0.0005711070989157011,0.0005800433053026375,0.0005889657501278038,0.0005979488477622536,0.0006068993253984332,0.0006157147358542756,0.0006245051716239422,0.0006332420902089471,0.000641698170996345,0.0006497882961781497,0.0006574890201306046,0.0006648747572247634,0.0006720020827701261,0.000678809834269936,0.0006853321607848821,0.0006916628448099912,0.0006977397044735608,0.0007033379676000107,0.0007086441798044483,0.00071384131888967,0.000718962514541419,0.0007239241780141283,0.0007285229440060822,0.0007326986693954701,0.0007365201619911432,0.0007398987361728047,0.0007426972860102252,0.0007450962408688366,0.0007470981491860036,0.000748444089725457,0.0007491361012370888,0.0007492470690295336,0.0007489054343459803,0.000748245754679293,0.0007471166528499998,0.0007454824507349921,0.0007435398876988372,0.0007413149578026563,0.0007387546535492606,0.0007361184058623922,0.0007334617706766048,0.0007306160414383454,0.0007275552240864919,0.0007241651486270997,0.0007205288941182623,0.000716840651487182,0.0007129602566787915,0.0007088051403224696,0.0007044002771043922,0.0006996060126569647,0.0006942913572996341,0.000688669870083575,0.0006828633663148275,0.0006768749041182292,0.000670779407552307,0.0006644051119386699,0.0006578223541485877,0.000651229402609046,0.0006445768176351665,0.0006379063935997331,0.0006313404554962589,0.0006248086664534736,0.0006182106180392023,0.0006116380539985793,0.0006050614124581726,0.000598571417788171,0.0005922159806110338,0.0005857514703146808,0.0005791473056507336,0.000572515617863246,0.000565840606640556,0.0005590289991751098,0.0005520818148418532,0.0005449750983295569,0.0005377103787006395,0.000530341173139763,0.0005227793057141036,0.0005151781923530254,0.0005077228496092168,0.0005002899331142189,0.0004927978928723566,0.00048544091981083136,0.0004783576489222916,0.0004715776420801695,0.000465103957409303,0.00045878674679263856,0.000452681056477257,0.00044683326802319874,0.0004411720251842479,0.0004357421804580258,0.0004307068338358832,0.0004259869837595096,0.0004213670324278383,0.0004168301601542613,0.00041243600037311616,0.0004083206396396861,0.00040454727920061955,0.00040101143312395744,0.0003976544873503081,0.0003944958100036445,0.00039141256640298056,0.000388392524048965,0.0003856186607443944,0.00038313379023699836,0.00038076359941102076,0.00037839289889757017,0.00037599824307288994,0.00037363060068427723,0.00037140516110062335,0.0003692597424502259,0.00036716529254712555,0.0003651105982669169,0.000362957534304425,0.0003606337250384877,0.00035825741796283444,0.0003559922227562888,0.0003537570991106485,0.00035141748953304916,0.00034887655340362634,0.0003460940254120152,0.0003431978371139316,0.00034025118975602385,0.0003373509239581565,0.0003345184465941943,0.00033176904828832634,0.0003289839718593504,0.00032618462418113124,0.000323581506180006,0.0003211328234831908,0.0003188818995258884,0.00031680172087203125,0.0003148362218995926,0.00031295380198524816,0.0003111682226907682,0.00030943463151853124,0.0003077097050333348,0.0003060010885472735,0.00030409981019642916,0.0003020517418533692,0.0003000006153854714,0.00029785621611001984,0.00029556043965509596,0.0002930587494610919,0.0002902991574057645,0.00028727605692691115,0.00028411228270551784,0.00028081548005367906,0.00027753804552581323,0.00027437325192947393,0.0002711284373998782,0.0002678301056856205,0.00026459905271779505,0.0002615254931791175,0.0002586517311298447,0.00025596298563326027,0.0002533379510707971,0.0002507542011936447,0.00024823976881281634,0.00024565907706050177,0.0002430320037481468,0.00024035498106344071,0.00023745114745326253,0.000234221113860383,0.00023061798903728872,0.00022671669704250644,0.0002226181559956844,0.00021837996058126835,0.00021377122237400243,0.00020874657918879222,0.00020339573602088065,0.00019778750067911874,0.00019214256783930294,0.00018657663655779764,0.00018111722995814322,0.0001757240827299751,0.00017029831550353675,0.00016474359734643682,0.00015922965418717458,0.00015397310320176263,0.00014894489220424167,0.0001440441030749634,0.00013914586238305003,0.0001341579166958938,0.00012915671913444026,0.00012414889563583815,0.00011913495588756034,0.0001141989983226471,0.00010935784262770646,0.00010448763474680648,9.960105583895675e-05,9.475875871344078e-05,8.997195649466397e-05,8.52493138696668e-05,8.050214521815236e-05,7.566521054358033e-05,7.084350546538276e-05,6.607117904424868e-05,6.129981097024587e-05,5.6535007805576986e-05,5.171719714371913e-05,4.681127157685198e-05,4.187074828963749e-05,3.697360946544022e-05,3.217643041375992e-05,2.7539863943880156e-05,2.3025173807855126e-05,1.8568139384090494e-05,1.4203929108221255e-05,9.931523605301461e-06,5.770290999304016e-06,1.7594161978329966e-06,-2.185708919624774e-06,-6.156828098204061e-06,-1.0219691021918114e-05,-1.4366652378672369e-05,-1.860484779308842e-05,-2.29266319530717e-05,-2.735748923227076e-05,-3.192596212917197e-05,-3.658464970878904e-05,-4.125658916270335e-05,-4.583984299632072e-05,-5.0237570589776674e-05,-5.440899694523354e-05,-5.836635456204261e-05,-6.21025078155823e-05,-6.563478607993362e-05,-6.895146654321824e-05,-7.201024514517957e-05,-7.483049000979052e-05,-7.754471988002349e-05,-8.027271131202669e-05,-8.308378180212416e-05,-8.597538291295104e-05,-8.892203027085876e-05,-9.190996231407714e-05,-9.493000466809267e-05,-9.797247327091893e-05,-0.00010103889718497485,-0.00010410939859881453,-0.00010709835001697886,-0.00010990585269476554,-0.00011249368007170175,-0.0001148898649588009,-0.00011712804672927906,-0.00011924339381877121,-0.00012121093154110181,-0.0001230245436465952,-0.00012469085607239995,-0.00012623892100447544,-0.00012770951344065937,-0.00012915513119066772,-0.0001305936133160545,-0.0001320117079425224,-0.0001333808725715851,-0.00013470314595313452,-0.00013599636714872455,-0.00013728958834431458,-0.0001385955517267289,-0.00013990967010871073,-0.00014124315661466545,-0.00014260110811932283,-0.0001439988152468719,-0.00014542302612301547,-0.00014688597324710484,-0.00014833369077481978,-0.00014972081652106582,-0.00015104531173595114,-0.000152284750170665,-0.0001534488158871938,-0.00015451406326178098,-0.00015542289760998076,-0.00015616920268211748,-0.00015675297847819118,-0.00015720531593405306,-0.000157586297143699,-0.00015798760482444907,-0.00015841535522597897,-0.0001588919745970994,-0.00015942459856243196,-0.00016003412430836843,-0.00016077814651935452,-0.00016166889769474158,-0.0001626956743975972,-0.00016382432756723226,-0.0001650344697047281,-0.00016628538684006154,-0.00016757554991081374,-0.00016890648797940366,-0.0001702445616726151,-0.00017156479630427263,-0.00017285546906249783,-0.00017410842494772314,-0.00017537106489493492,-0.00017668212515207894,-0.00017806556103038484,-0.00017950557221819053,-0.0001809736162170096,-0.00018242840834153143,-0.0001838995104651883,-0.00018540323258711534,-0.00018693345845763687,-0.00018847132964025295,-0.0001899674674779001,-0.0001913846647850514,-0.000192686733751126,-0.00019387571312601577,-0.00019496944197127462,-0.00019601226309705106,-0.0001970184477525883,-0.0001979839184381025,-0.00019891020421601265,-0.00019980851821072406,-0.00020069001251882745,-0.00020155819392481895,-0.00020239930086692827,-0.0002031944749086555,-0.00020393556105043314,-0.0002046154236676396,-0.00020519838463716692,-0.00020567883739681237,-0.0002060511753843733,-0.0002063245729743632,-0.00020652196610306572,-0.00020665972579743066,-0.000206773530180566,-0.00020692148362439037,-0.0002071362061271739,-0.00020741463956407884,-0.00020775729362257808,-0.00020816161986530684,-0.00020861793423027864,-0.0002091185914053989,-0.00020964320389174878,-0.00021017495200272026,-0.00021071638417567817,-0.00021124405478686588,-0.00021172942133779703,-0.0002121719741409986,-0.00021258598444571375,-0.00021299999475042896,-0.00021345579942792775,-0.0002139656309775615,-0.00021454885752330302,-0.00021521465343966582,-0.00021596148966423107,-0.00021676235276093118,-0.0002176050102304149,-0.00021847773926080396,-0.00021938461735188203,-0.0002203093345045141,-0.00022121270581109602,-0.00022207026627292533,-0.00022286468651592088,-0.00022358526310315035,-0.00022421517634800564,-0.00022477073624962185,-0.00022527895624406647,-0.00022576277226762315,-0.00022621912619545412,-0.00022663935334051881,-0.0002270269604873134,-0.00022739921598210415,-0.00022772320871739364,-0.0002279859053971302,-0.00022819087383362473,-0.00022833856268653544,-0.00022842132664376775)
xcorr <- c(-600.0,-598.999165971643,-597.9983319432861,-596.9974979149291,-595.9966638865722,-594.9958298582152,-593.9949958298582,-592.9941618015013,-591.9933277731443,-590.9924937447873,-589.9916597164304,-588.9908256880734,-587.9899916597165,-586.9891576313595,-585.9883236030025,-584.9874895746456,-583.9866555462886,-582.9858215179316,-581.9849874895747,-580.9841534612177,-579.9833194328608,-578.9824854045038,-577.9816513761468,-576.9808173477899,-575.9799833194329,-574.9791492910759,-573.978315262719,-572.977481234362,-571.976647206005,-570.9758131776481,-569.9749791492911,-568.974145120934,-567.9733110925772,-566.9724770642201,-565.9716430358633,-564.9708090075062,-563.9699749791492,-562.9691409507923,-561.9683069224353,-560.9674728940784,-559.9666388657214,-558.9658048373644,-557.9649708090075,-556.9641367806505,-555.9633027522935,-554.9624687239366,-553.9616346955796,-552.9608006672227,-551.9599666388657,-550.9591326105087,-549.9582985821518,-548.9574645537948,-547.9566305254378,-546.9557964970809,-545.9549624687239,-544.954128440367,-543.95329441201,-542.952460383653,-541.9516263552961,-540.9507923269391,-539.9499582985821,-538.9491242702252,-537.9482902418682,-536.9474562135113,-535.9466221851543,-534.9457881567973,-533.9449541284404,-532.9441201000834,-531.9432860717264,-530.9424520433695,-529.9416180150125,-528.9407839866556,-527.9399499582986,-526.9391159299416,-525.9382819015847,-524.9374478732277,-523.9366138448707,-522.9357798165138,-521.9349457881568,-520.9341117597999,-519.9332777314429,-518.9324437030859,-517.931609674729,-516.930775646372,-515.929941618015,-514.9291075896581,-513.9282735613011,-512.9274395329442,-511.92660550458714,-510.9257714762302,-509.9249374478732,-508.92410341951626,-507.9232693911593,-506.92243536280233,-505.92160133444537,-504.9207673060884,-503.91993327773145,-502.9190992493745,-501.9182652210175,-500.91743119266056,-499.9165971643036,-498.91576313594663,-497.91492910758967,-496.9140950792327,-495.91326105087575,-494.9124270225188,-493.9115929941618,-492.91075896580486,-491.90992493744784,-490.9090909090909,-489.9082568807339,-488.90742285237695,-487.90658882402,-486.90575479566303,-485.90492076730607,-484.9040867389491,-483.90325271059214,-482.9024186822352,-481.9015846538782,-480.90075062552125,-479.8999165971643,-478.89908256880733,-477.89824854045037,-476.8974145120934,-475.89658048373644,-474.8957464553795,-473.8949124270225,-472.89407839866556,-471.8932443703086,-470.89241034195163,-469.89157631359467,-468.8907422852377,-467.88990825688074,-466.8890742285238,-465.8882402001668,-464.88740617180986,-463.8865721434529,-462.88573811509593,-461.88490408673897,-460.884070058382,-459.88323603002505,-458.8824020016681,-457.8815679733111,-456.88073394495416,-455.8798999165972,-454.87906588824023,-453.8782318598833,-452.8773978315263,-451.87656380316935,-450.8757297748124,-449.8748957464554,-448.87406171809846,-447.87322768974144,-446.8723936613845,-445.8715596330275,-444.87072560467055,-443.8698915763136,-442.86905754795663,-441.86822351959967,-440.8673894912427,-439.86655546288574,-438.8657214345288,-437.8648874061718,-436.86405337781486,-435.8632193494579,-434.86238532110093,-433.86155129274397,-432.860717264387,-431.85988323603004,-430.859049207673,-429.85821517931606,-428.8573811509591,-427.85654712260214,-426.8557130942452,-425.8548790658882,-424.85404503753125,-423.8532110091743,-422.8523769808173,-421.85154295246036,-420.8507089241034,-419.84987489574644,-418.8490408673895,-417.8482068390325,-416.84737281067555,-415.8465387823186,-414.8457047539616,-413.84487072560466,-412.8440366972477,-411.84320266889074,-410.8423686405338,-409.8415346121768,-408.84070058381985,-407.8398665554629,-406.8390325271059,-405.83819849874897,-404.837364470392,-403.83653044203504,-402.8356964136781,-401.8348623853211,-400.83402835696415,-399.8331943286072,-398.83236030025023,-397.83152627189327,-396.8306922435363,-395.82985821517934,-394.8290241868224,-393.8281901584654,-392.82735613010846,-391.8265221017515,-390.82568807339453,-389.82485404503757,-388.8240200166806,-387.82318598832364,-386.8223519599667,-385.8215179316097,-384.82068390325276,-383.81984987489574,-382.8190158465388,-381.8181818181818,-380.81734778982485,-379.8165137614679,-378.8156797331109,-377.81484570475396,-376.814011676397,-375.81317764804004,-374.8123436196831,-373.8115095913261,-372.81067556296915,-371.8098415346122,-370.8090075062552,-369.80817347789826,-368.8073394495413,-367.80650542118434,-366.8056713928273,-365.80483736447036,-364.8040033361134,-363.80316930775643,-362.8023352793995,-361.8015012510425,-360.80066722268555,-359.7998331943286,-358.7989991659716,-357.79816513761466,-356.7973311092577,-355.79649708090074,-354.7956630525438,-353.7948290241868,-352.79399499582985,-351.7931609674729,-350.7923269391159,-349.79149291075896,-348.790658882402,-347.78982485404504,-346.7889908256881,-345.7881567973311,-344.78732276897415,-343.7864887406172,-342.7856547122602,-341.78482068390326,-340.7839866555463,-339.78315262718934,-338.7823185988324,-337.7814845704754,-336.78065054211845,-335.7798165137615,-334.7789824854045,-333.77814845704756,-332.7773144286906,-331.77648040033364,-330.7756463719767,-329.7748123436197,-328.77397831526275,-327.7731442869058,-326.77231025854877,-325.7714762301918,-324.77064220183485,-323.7698081734779,-322.7689741451209,-321.76814011676396,-320.767306088407,-319.76647206005003,-318.7656380316931,-317.7648040033361,-316.76396997497915,-315.7631359466222,-314.7623019182652,-313.76146788990826,-312.7606338615513,-311.75979983319434,-310.7589658048374,-309.7581317764804,-308.75729774812345,-307.7564637197665,-306.7556296914095,-305.75479566305256,-304.7539616346956,-303.75312760633864,-302.7522935779817,-301.7514595496247,-300.75062552126775,-299.7497914929108,-298.7489574645538,-297.74812343619686,-296.7472894078399,-295.7464553794829,-294.7456213511259,-293.74478732276896,-292.743953294412,-291.74311926605503,-290.74228523769807,-289.7414512093411,-288.74061718098415,-287.7397831526272,-286.7389491242702,-285.73811509591326,-284.7372810675563,-283.73644703919933,-282.73561301084237,-281.7347789824854,-280.73394495412845,-279.7331109257715,-278.7322768974145,-277.73144286905756,-276.7306088407006,-275.72977481234363,-274.7289407839867,-273.7281067556297,-272.72727272727275,-271.7264386989158,-270.7256046705588,-269.72477064220186,-268.7239366138449,-267.72310258548794,-266.722268557131,-265.721434528774,-264.72060050041705,-263.7197664720601,-262.71893244370307,-261.7180984153461,-260.71726438698914,-259.7164303586322,-258.7155963302752,-257.71476230191826,-256.7139282735613,-255.71309424520433,-254.71226021684737,-253.7114261884904,-252.71059216013344,-251.70975813177648,-250.70892410341952,-249.70809007506256,-248.7072560467056,-247.70642201834863,-246.70558798999167,-245.7047539616347,-244.70391993327775,-243.70308590492078,-242.70225187656382,-241.70141784820686,-240.7005838198499,-239.69974979149293,-238.69891576313597,-237.698081734779,-236.69724770642205,-235.69641367806508,-234.69557964970812,-233.69474562135116,-232.6939115929942,-231.69307756463718,-230.69224353628022,-229.69140950792325,-228.6905754795663,-227.68974145120933,-226.68890742285237,-225.6880733944954,-224.68723936613844,-223.68640533778148,-222.68557130942452,-221.68473728106756,-220.6839032527106,-219.68306922435363,-218.68223519599667,-217.6814011676397,-216.68056713928274,-215.67973311092578,-214.67889908256882,-213.67806505421186,-212.6772310258549,-211.67639699749793,-210.67556296914097,-209.674728940784,-208.67389491242704,-207.67306088407008,-206.67222685571312,-205.67139282735616,-204.6705587989992,-203.66972477064223,-202.66889074228527,-201.6680567139283,-200.66722268557135,-199.66638865721438,-198.66555462885736,-197.6647206005004,-196.66388657214344,-195.66305254378648,-194.66221851542952,-193.66138448707255,-192.6605504587156,-191.65971643035863,-190.65888240200167,-189.6580483736447,-188.65721434528774,-187.65638031693078,-186.65554628857382,-185.65471226021685,-184.6538782318599,-183.65304420350293,-182.65221017514597,-181.651376146789,-180.65054211843204,-179.64970809007508,-178.64887406171812,-177.64804003336116,-176.6472060050042,-175.64637197664723,-174.64553794829027,-173.6447039199333,-172.64386989157634,-171.64303586321938,-170.64220183486242,-169.64136780650546,-168.6405337781485,-167.63969974979148,-166.6388657214345,-165.63803169307755,-164.6371976647206,-163.63636363636363,-162.63552960800666,-161.6346955796497,-160.63386155129274,-159.63302752293578,-158.63219349457881,-157.63135946622185,-156.6305254378649,-155.62969140950793,-154.62885738115097,-153.628023352794,-152.62718932443704,-151.62635529608008,-150.62552126772312,-149.62468723936615,-148.6238532110092,-147.62301918265223,-146.62218515429527,-145.6213511259383,-144.62051709758134,-143.61968306922438,-142.61884904086742,-141.61801501251045,-140.6171809841535,-139.61634695579653,-138.61551292743957,-137.6146788990826,-136.61384487072564,-135.61301084236868,-134.61217681401166,-133.6113427856547,-132.61050875729774,-131.60967472894077,-130.6088407005838,-129.60800667222685,-128.6071726438699,-127.60633861551293,-126.60550458715596,-125.604670558799,-124.60383653044204,-123.60300250208508,-122.60216847372811,-121.60133444537115,-120.60050041701419,-119.59966638865723,-118.59883236030026,-117.5979983319433,-116.59716430358634,-115.59633027522938,-114.59549624687241,-113.59466221851545,-112.59382819015849,-111.59299416180153,-110.59216013344457,-109.5913261050876,-108.59049207673064,-107.58965804837368,-106.58882402001672,-105.58798999165975,-104.58715596330279,-103.58632193494577,-102.58548790658881,-101.58465387823185,-100.58381984987489,-99.58298582151792,-98.58215179316096,-97.581317764804,-96.58048373644704,-95.57964970809007,-94.57881567973311,-93.57798165137615,-92.57714762301919,-91.57631359466222,-90.57547956630526,-89.5746455379483,-88.57381150959134,-87.57297748123437,-86.57214345287741,-85.57130942452045,-84.57047539616349,-83.56964136780653,-82.56880733944956,-81.5679733110926,-80.56713928273564,-79.56630525437868,-78.56547122602171,-77.56463719766475,-76.56380316930779,-75.56296914095083,-74.56213511259386,-73.5613010842369,-72.56046705587994,-71.55963302752298,-70.55879899916602,-69.55796497080905,-68.55713094245209,-67.55629691409513,-66.55546288573817,-65.5546288573812,-64.55379482902424,-63.55296080066728,-62.55212677231032,-61.551292743953354,-60.55045871559639,-59.54962468723943,-58.54879065888247,-57.547956630525505,-56.54712260216854,-55.54628857381158,-54.545454545454504,-53.54462051709754,-52.54378648874058,-51.54295246038362,-50.542118432026655,-49.54128440366969,-48.54045037531273,-47.53961634695577,-46.538782318598805,-45.53794829024184,-44.53711426188488,-43.53628023352792,-42.535446205170956,-41.534612176813994,-40.53377814845703,-39.53294412010007,-38.53211009174311,-37.531276063386144,-36.53044203502918,-35.52960800667222,-34.52877397831526,-33.527939949958295,-32.52710592160133,-31.52627189324437,-30.525437864887408,-29.524603836530446,-28.523769808173483,-27.52293577981652,-26.52210175145956,-25.521267723102596,-24.520433694745634,-23.51959966638867,-22.51876563803171,-21.517931609674747,-20.517097581317785,-19.516263552960822,-18.51542952460386,-17.514595496246898,-16.513761467889935,-15.512927439532973,-14.51209341117601,-13.511259382819048,-12.510425354462086,-11.509591326105124,-10.508757297748161,-9.507923269391199,-8.507089241034237,-7.506255212677274,-6.505421184320312,-5.50458715596335,-4.503753127606387,-3.502919099249425,-2.5020850708924627,-1.5012510425355003,-0.500417014178538,0.5004170141784243,1.5012510425353867,2.502085070892349,3.5029190992493113,4.503753127606274,5.504587155963236,6.505421184320198,7.506255212677161,8.507089241034237,9.507923269391199,10.508757297748161,11.509591326105124,12.510425354462086,13.511259382819048,14.51209341117601,15.512927439532973,16.513761467889935,17.514595496246898,18.51542952460386,19.516263552960822,20.517097581317785,21.517931609674747,22.51876563803171,23.51959966638867,24.520433694745634,25.521267723102596,26.52210175145956,27.52293577981652,28.523769808173483,29.524603836530446,30.525437864887408,31.52627189324437,32.52710592160133,33.527939949958295,34.52877397831526,35.52960800667222,36.53044203502918,37.531276063386144,38.53211009174311,39.53294412010007,40.53377814845703,41.534612176813994,42.535446205170956,43.53628023352792,44.53711426188488,45.53794829024184,46.538782318598805,47.53961634695577,48.54045037531273,49.54128440366969,50.542118432026655,51.54295246038362,52.54378648874058,53.54462051709754,54.545454545454504,55.54628857381147,56.54712260216843,57.54795663052539,58.54879065888235,59.549624687239316,60.55045871559628,61.55129274395324,62.5521267723102,63.552960800667165,64.55379482902413,65.55462885738109,66.55546288573805,67.55629691409501,68.55713094245198,69.55796497080894,70.5587989991659,71.55963302752286,72.56046705587983,73.5613010842369,74.56213511259386,75.56296914095083,76.56380316930779,77.56463719766475,78.56547122602171,79.56630525437868,80.56713928273564,81.5679733110926,82.56880733944956,83.56964136780653,84.57047539616349,85.57130942452045,86.57214345287741,87.57297748123437,88.57381150959134,89.5746455379483,90.57547956630526,91.57631359466222,92.57714762301919,93.57798165137615,94.57881567973311,95.57964970809007,96.58048373644704,97.581317764804,98.58215179316096,99.58298582151792,100.58381984987489,101.58465387823185,102.58548790658881,103.58632193494577,104.58715596330273,105.5879899916597,106.58882402001666,107.58965804837362,108.59049207673058,109.59132610508755,110.59216013344451,111.59299416180147,112.59382819015843,113.5946622185154,114.59549624687236,115.59633027522932,116.59716430358628,117.59799833194324,118.59883236030021,119.59966638865717,120.60050041701413,121.6013344453711,122.60216847372806,123.60300250208502,124.60383653044198,125.60467055879894,126.6055045871559,127.60633861551287,128.60717264386983,129.6080066722268,130.60884070058376,131.60967472894072,132.61050875729768,133.61134278565464,134.6121768140116,135.61301084236857,136.61384487072564,137.6146788990826,138.61551292743957,139.61634695579653,140.6171809841535,141.61801501251045,142.61884904086742,143.61968306922438,144.62051709758134,145.6213511259383,146.62218515429527,147.62301918265223,148.6238532110092,149.62468723936615,150.62552126772312,151.62635529608008,152.62718932443704,153.628023352794,154.62885738115097,155.62969140950793,156.6305254378649,157.63135946622185,158.63219349457881,159.63302752293578,160.63386155129274,161.6346955796497,162.63552960800666,163.63636363636363,164.6371976647206,165.63803169307755,166.6388657214345,167.63969974979148,168.64053377814844,169.6413678065054,170.64220183486236,171.64303586321932,172.6438698915763,173.64470391993325,174.6455379482902,175.64637197664717,176.64720600500414,177.6480400333611,178.64887406171806,179.64970809007502,180.65054211843199,181.65137614678895,182.6522101751459,183.65304420350287,184.65387823185984,185.6547122602168,186.65554628857376,187.65638031693072,188.65721434528768,189.65804837364465,190.6588824020016,191.65971643035857,192.66055045871553,193.6613844870725,194.66221851542946,195.66305254378642,196.66388657214338,197.66472060050035,198.6655546288573,199.66638865721427,200.66722268557123,201.6680567139283,202.66889074228527,203.66972477064223,204.6705587989992,205.67139282735616,206.67222685571312,207.67306088407008,208.67389491242704,209.674728940784,210.67556296914097,211.67639699749793,212.6772310258549,213.67806505421186,214.67889908256882,215.67973311092578,216.68056713928274,217.6814011676397,218.68223519599667,219.68306922435363,220.6839032527106,221.68473728106756,222.68557130942452,223.68640533778148,224.68723936613844,225.6880733944954,226.68890742285237,227.68974145120933,228.6905754795663,229.69140950792325,230.69224353628022,231.69307756463718,232.69391159299414,233.6947456213511,234.69557964970807,235.69641367806503,236.697247706422,237.69808173477895,238.69891576313591,239.69974979149288,240.70058381984984,241.7014178482068,242.70225187656376,243.70308590492073,244.7039199332777,245.70475396163465,246.7055879899916,247.70642201834858,248.70725604670554,249.7080900750625,250.70892410341946,251.70975813177643,252.7105921601334,253.71142618849035,254.7122602168473,255.71309424520427,256.71392827356124,257.7147623019182,258.71559633027516,259.7164303586321,260.7172643869891,261.71809841534605,262.718932443703,263.71976647206,264.72060050041705,265.721434528774,266.722268557131,267.72310258548794,268.7239366138449,269.72477064220186,270.7256046705588,271.7264386989158,272.72727272727275,273.7281067556297,274.7289407839867,275.72977481234363,276.7306088407006,277.73144286905756,278.7322768974145,279.7331109257715,280.73394495412845,281.7347789824854,282.73561301084237,283.73644703919933,284.7372810675563,285.73811509591326,286.7389491242702,287.7397831526272,288.74061718098415,289.7414512093411,290.74228523769807,291.74311926605503,292.743953294412,293.74478732276896,294.7456213511259,295.7464553794829,296.74728940783984,297.7481234361968,298.74895746455377,299.74979149291073,300.7506255212677,301.75145954962466,302.7522935779816,303.7531276063386,304.75396163469554,305.7547956630525,306.75562969140947,307.75646371976643,308.7572977481234,309.75813177648035,310.7589658048373,311.7597998331943,312.76063386155124,313.7614678899082,314.76230191826517,315.7631359466221,316.7639699749791,317.76480400333605,318.765638031693,319.76647206005,320.76730608840694,321.7681401167639,322.76897414512086,323.7698081734778,324.7706422018348,325.77147623019175,326.7723102585487,327.7731442869057,328.77397831526264,329.7748123436197,330.7756463719767,331.77648040033364,332.7773144286906,333.77814845704756,334.7789824854045,335.7798165137615,336.78065054211845,337.7814845704754,338.7823185988324,339.78315262718934,340.7839866555463,341.78482068390326,342.7856547122602,343.7864887406172,344.78732276897415,345.7881567973311,346.7889908256881,347.78982485404504,348.790658882402,349.79149291075896,350.7923269391159,351.7931609674729,352.79399499582985,353.7948290241868,354.7956630525438,355.79649708090074,356.7973311092577,357.79816513761466,358.7989991659716,359.7998331943286,360.80066722268555,361.8015012510425,362.8023352793995,363.80316930775643,364.8040033361134,365.80483736447036,366.8056713928273,367.8065054211843,368.80733944954125,369.8081734778982,370.80900750625517,371.80984153461213,372.8106755629691,373.81150959132606,374.812343619683,375.81317764804,376.81401167639694,377.8148457047539,378.81567973311087,379.81651376146783,380.8173477898248,381.81818181818176,382.8190158465387,383.8198498748957,384.82068390325264,385.8215179316096,386.82235195996657,387.82318598832353,388.8240200166805,389.82485404503745,390.8256880733944,391.8265221017514,392.82735613010846,393.8281901584654,394.8290241868224,395.82985821517934,396.8306922435363,397.83152627189327,398.83236030025023,399.8331943286072,400.83402835696415,401.8348623853211,402.8356964136781,403.83653044203504,404.837364470392,405.83819849874897,406.8390325271059,407.8398665554629,408.84070058381985,409.8415346121768,410.8423686405338,411.84320266889074,412.8440366972477,413.84487072560466,414.8457047539616,415.8465387823186,416.84737281067555,417.8482068390325,418.8490408673895,419.84987489574644,420.8507089241034,421.85154295246036,422.8523769808173,423.8532110091743,424.85404503753125,425.8548790658883,426.8557130942452,427.85654712260225,428.8573811509591,429.8582151793162,430.859049207673,431.8598832360301,432.86071726438695,433.861551292744,434.8623853211009,435.86321934945795,436.8640533778148,437.8648874061719,438.8657214345287,439.8665554628858,440.86738949124265,441.8682235195997,442.8690575479566,443.86989157631365,444.8707256046705,445.8715596330276,446.8723936613844,447.8732276897415,448.87406171809835,449.8748957464554,450.87572977481227,451.87656380316935,452.8773978315262,453.8782318598833,454.8790658882401,455.8798999165972,456.88073394495405,457.8815679733111,458.88240200166797,459.88323603002505,460.8840700583819,461.88490408673897,462.8857381150958,463.8865721434529,464.88740617180974,465.8882402001668,466.88907422852367,467.88990825688074,468.8907422852376,469.89157631359467,470.8924103419515,471.8932443703086,472.89407839866544,473.8949124270225,474.89574645537937,475.89658048373644,476.8974145120933,477.89824854045037,478.8990825688072,479.8999165971643,480.90075062552114,481.9015846538782,482.90241868223507,483.90325271059214,484.904086738949,485.90492076730607,486.9057547956629,487.90658882402,488.90742285237684,489.9082568807339,490.909090909091,491.90992493744784,492.9107589658049,493.91159299416177,494.91242702251884,495.9132610508757,496.91409507923277,497.9149291075896,498.9157631359467,499.91659716430354,500.9174311926606,501.91826522101746,502.91909924937454,503.9199332777314,504.92076730608846,505.9216013344453,506.9224353628024,507.92326939115924,508.9241034195163,509.92493744787316,510.92577147623024,511.9266055045871,512.9274395329442,513.928273561301,514.9291075896581,515.9299416180149,516.930775646372,517.9316096747289,518.9324437030859,519.9332777314428,520.9341117597999,521.9349457881567,522.9357798165138,523.9366138448706,524.9374478732277,525.9382819015846,526.9391159299416,527.9399499582985,528.9407839866556,529.9416180150124,530.9424520433695,531.9432860717263,532.9441201000834,533.9449541284403,534.9457881567973,535.9466221851542,536.9474562135113,537.9482902418681,538.9491242702252,539.949958298582,540.9507923269391,541.951626355296,542.952460383653,543.9532944120099,544.954128440367,545.9549624687238,546.9557964970809,547.9566305254377,548.9574645537948,549.9582985821517,550.9591326105087,551.9599666388656,552.9608006672227,553.9616346955797,554.9624687239366,555.9633027522937,556.9641367806505,557.9649708090076,558.9658048373644,559.9666388657215,560.9674728940784,561.9683069224354,562.9691409507923,563.9699749791494,564.9708090075062,565.9716430358633,566.9724770642201,567.9733110925772,568.974145120934,569.9749791492911,570.975813177648,571.976647206005,572.9774812343619,573.978315262719,574.9791492910758,575.9799833194329,576.9808173477898,577.9816513761468,578.9824854045037,579.9833194328608,580.9841534612176,581.9849874895747,582.9858215179315,583.9866555462886,584.9874895746455,585.9883236030025,586.9891576313594,587.9899916597165,588.9908256880733,589.9916597164304,590.9924937447872,591.9933277731443,592.9941618015011,593.9949958298582,594.9958298582151,595.9966638865722,596.997497914929,597.9983319432861,598.9991659716429,600.0)
altd  <- c(263)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('EMX1_CHANGE_seq-SRX8227890.2x36mers.hg38-male.unique.MACS-2.1.0_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'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 263',bty='n')
dev.off()