# R script for Peak Model
#  -- generated by MACS
p <- c(0.0377014152397,0.0437963322531,0.0513714433982,0.0576405008977,0.0645190500985,0.0639095583971,0.0644319798554,0.0626035047514,0.0629517857236,0.0644319798554,0.063648347668,0.0651285417998,0.0647802608276,0.0642578393693,0.0635612774249,0.0652156120429,0.0667828764177,0.0686984217648,0.06913377298,0.0686113515217,0.0693949837092,0.0667828764177,0.065389752529,0.0658251037442,0.067218227633,0.0680018598204,0.067305297876,0.0666958061747,0.0674794383621,0.0678277193343,0.0685242812787,0.0692208432231,0.0713105290562,0.0713105290562,0.0704398266257,0.0682630705495,0.0674794383621,0.067218227633,0.0666958061747,0.0661733847164,0.0651285417998,0.0671311573899,0.0661733847164,0.067218227633,0.0657380335011,0.0664345954455,0.0667828764177,0.067305297876,0.0673923681191,0.0665216656886,0.0663475252025,0.0652156120429,0.0645190500985,0.0633871369389,0.0642578393693,0.0648673310707,0.0643449096124,0.0630388559667,0.0617328023209,0.0620810832931,0.0629517857236,0.0633000666958,0.0630388559667,0.0633871369389,0.0639095583971,0.0635612774249,0.0639095583971,0.065476822772,0.0661733847164,0.0659992442303,0.0658251037442,0.0641707691263,0.0643449096124,0.0638224881541,0.0626035047514,0.0615586618348,0.0606879594044,0.0606008891613,0.0599043272169,0.0603396784322,0.0592948355156,0.0596431164878,0.0597301867308,0.0592077652726,0.05999139746,0.0609491701335,0.0606008891613,0.05999139746,0.0604267486752,0.0598172569739,0.0598172569739,0.0601655379461,0.0617328023209,0.0626035047514,0.0626905749945,0.0634742071819,0.0646061203415,0.0653026822859,0.0666087359316,0.0655638930151,0.0655638930151,0.0659992442303,0.0650414715568,0.0643449096124,0.0658251037442,0.0648673310707,0.0642578393693,0.0631259262097,0.0620810832931,0.061906942807,0.0625164345084,0.0632129964528,0.0623422940223,0.061906942807,0.0611233106196,0.0596431164878,0.060078467703,0.0592948355156,0.0583370628421,0.0608620998905,0.0597301867308,0.0585982735712,0.0585112033282,0.0601655379461,0.0607750296474,0.0615586618348,0.0615586618348,0.0622552237792,0.0633871369389,0.061819872564,0.0623422940223,0.0619940130501,0.0620810832931,0.061819872564,0.0606879594044,0.0612103808627,0.0612974511057,0.0615586618348,0.0613845213488,0.061906942807,0.061819872564,0.0624293642653,0.0639095583971,0.0625164345084,0.061819872564,0.0611233106196,0.0606879594044,0.0596431164878,0.0605138189183,0.060078467703,0.061819872564,0.0614715915918,0.0606879594044,0.0601655379461,0.0597301867308,0.060078467703,0.0597301867308,0.0603396784322,0.0595560462447,0.0598172569739,0.0583370628421,0.0592077652726,0.0573792901686,0.0587724140573,0.0597301867308,0.0588594843004,0.0594689760017,0.0602526081891,0.0592077652726,0.0593819057587,0.0587724140573,0.0578146413838,0.0573792901686,0.0567697984672,0.056421517495,0.0567697984672,0.0569439389533,0.0558990960367,0.0566827282242,0.0565956579811,0.0565085877381,0.056421517495,0.058249992599,0.0583370628421,0.05999139746,0.0612974511057,0.0606879594044,0.0614715915918,0.0615586618348,0.0612974511057,0.0622552237792,0.0627776452375,0.0633871369389,0.0649544013137,0.0630388559667,0.0634742071819,0.0631259262097,0.0622552237792,0.063648347668,0.0644319798554,0.065389752529,0.0646061203415,0.0647802608276,0.065476822772,0.0659992442303,0.0642578393693,0.0665216656886,0.0683501407926,0.0668699466608,0.0661733847164,0.065389752529,0.0664345954455,0.065389752529,0.0641707691263,0.0647802608276,0.0659121739872,0.0643449096124,0.0638224881541,0.0631259262097,0.0641707691263,0.0639095583971,0.0630388559667,0.0634742071819,0.0635612774249,0.0630388559667,0.0616457320779,0.0633000666958,0.0644319798554,0.0659121739872,0.0646931905846,0.0639095583971,0.0639966286402,0.0634742071819,0.0634742071819,0.0626905749945,0.0638224881541,0.0632129964528,0.061906942807,0.0622552237792,0.0622552237792,0.0632129964528,0.0655638930151,0.0656509632581,0.0645190500985,0.0659992442303,0.0653026822859,0.0646061203415,0.063735417911,0.0627776452375,0.0627776452375,0.0624293642653,0.0604267486752,0.0606008891613,0.0605138189183,0.0598172569739,0.0606879594044,0.0622552237792,0.0626905749945,0.0627776452375,0.0642578393693,0.0652156120429,0.0642578393693,0.0646931905846,0.0653026822859,0.065476822772,0.065389752529,0.0644319798554,0.0639966286402,0.0644319798554,0.0633871369389,0.0615586618348,0.0627776452375,0.0631259262097,0.0627776452375,0.0632129964528,0.0631259262097,0.0627776452375,0.0648673310707,0.0648673310707,0.065476822772,0.0668699466608,0.0671311573899,0.0666087359316,0.0681760003065,0.0685242812787,0.0683501407926,0.0692208432231,0.069046702737,0.0692208432231,0.0698303349244,0.0700915456535,0.0711363885701,0.0723553719728,0.0726165827019,0.0724424422158,0.0740097065907,0.074619198292,0.0729648636741,0.0732260744033,0.0731390041602,0.0744450578059,0.0760993924238,0.0779278675278,0.0790597806875,0.0806270450623,0.0807141153054,0.0841098547842,0.087331453777,0.0885504371797,0.0914237552003,0.0920332469016,0.0918591064155,0.0911625444711,0.0920332469016,0.0915978956864,0.0922944576307,0.0908142634989,0.0903789122837,0.0915978956864,0.090901333742,0.0920332469016,0.0911625444711,0.0901177015546,0.0908142634989,0.0919461766586,0.0923815278738,0.0915978956864,0.0921203171447,0.092729808846,0.0918591064155,0.0902047717976,0.0919461766586,0.0942970732209,0.0926427386029,0.0924685981168,0.0922944576307,0.0922073873877,0.0929910195751,0.0918591064155,0.0935134410334,0.0942100029778,0.0935134410334,0.0923815278738,0.0930780898182,0.0936875815195,0.0955160566235,0.0959514078388,0.0959514078388,0.0956031268666,0.0936875815195,0.092816879089,0.0929910195751,0.0930780898182,0.0932522303043,0.0936875815195,0.0933393005473,0.0935134410334,0.0930780898182,0.0943841434639,0.0956031268666,0.096473829297,0.0960384780818,0.0961255483249,0.0969962507553,0.0960384780818,0.096299688811,0.094645354193,0.0952548458944,0.0936875815195,0.0918591064155,0.0926427386029,0.0947324244361,0.0949065649222,0.0929910195751,0.0931651600612,0.0912496147142,0.0923815278738,0.0921203171447,0.0931651600612,0.0944712137069,0.0936875815195,0.0930780898182,0.0932522303043,0.09455828395,0.09455828395,0.0955160566235,0.0970833209984,0.0979540234289,0.0965608995401,0.0970833209984,0.098128163915,0.0969091805123,0.0966479697831,0.0957772673527,0.096386759054,0.0971703912414,0.0955160566235,0.09455828395,0.0970833209984,0.0969091805123,0.0947324244361,0.0942100029778,0.0956031268666,0.096386759054,0.0954289863805,0.0926427386029,0.0933393005473,0.0934263707904,0.090901333742,0.0901177015546,0.0914237552003,0.0905530527698,0.0878538752353,0.0882021562075,0.0875926645062,0.089072858638,0.0895082098532,0.0904659825267,0.0916849659294,0.0930780898182,0.092729808846,0.096299688811,0.0985635151302,0.0959514078388,0.094645354193,0.0929910195751,0.0918591064155,0.0906401230128,0.0915978956864,0.0907271932559,0.090901333742,0.0886375074227,0.0875055942631,0.0895952800963,0.0913366849572,0.0936875815195,0.0942100029778,0.0931651600612,0.0935134410334,0.0933393005473,0.0953419161374,0.0940358624917,0.0936005112765,0.0943841434639,0.094645354193,0.0942970732209,0.0950807054083,0.0955160566235,0.0942100029778,0.094645354193,0.0947324244361,0.0954289863805,0.0957772673527,0.0957772673527,0.0959514078388,0.0984764448871,0.0975186722136,0.0984764448871,0.098215234158,0.0998695687759,0.0983023044011,0.101088552179,0.102742886796,0.10370065947,0.104919642873,0.103439448741,0.105877415546,0.106661047734,0.107357609678,0.107270539435,0.108489522838,0.107096398949,0.107357609678,0.105964485789,0.105529134574,0.10483257263,0.103613589227,0.105006713116,0.10683518822,0.106138626275,0.105790345303,0.10483257263,0.104658432144,0.105442064331,0.104658432144,0.105964485789,0.104397221414,0.102481676067,0.101872184366,0.104048940442,0.104919642873,0.106486907248,0.107531750164,0.109273155025,0.113017175476,0.113713737421,0.115542212525,0.117893109087,0.120418146135,0.118067249573,0.120244005649,0.122943183184,0.124771658288,0.124510447558,0.124423377315,0.124423377315,0.127296695336,0.12712255485,0.129647591898,0.132085558704,0.134958876724,0.135829579155,0.136700281585,0.136961492314,0.13826754596,0.141576215196,0.141837425925,0.147148710751,0.147148710751,0.150631520473,0.149151326341,0.153591908736,0.154985032625,0.160905809152,0.164736899847,0.166652445194,0.171876659777,0.174575837311,0.17997419238,0.183631142588,0.19024848106,0.193905431268,0.19939085658,0.205572843836,0.212103112065,0.2216808388,0.230649073834,0.23683106109,0.247627771228,0.261733150602,0.274793687059,0.286461099628,0.299434565842,0.307445028202,0.32024435393,0.330344502124,0.340705861046,0.352721554587,0.360906157433,0.362560492051,0.363344124239,0.363518264725,0.362125140836,0.362386351565,0.356465575038,0.348368042435,0.340009299102,0.32825481629,0.312756313028,0.305355342369,0.296387107335,0.288637855704,0.279843761156,0.273139352441,0.265564241296,0.260601237442,0.252590775082,0.248759684388,0.245799296124,0.238311255222,0.232477548938,0.226208491438,0.222899822203,0.215934202759,0.212886744252,0.205834054565,0.201741753142,0.196082187344,0.189900200087,0.188594146442,0.185024266477,0.183195791373,0.179190560193,0.178406928005,0.173182713422,0.170918887103,0.165172251062,0.161167019882,0.159948036479,0.155072102868,0.152808276549,0.148106483424,0.14427539273,0.136787351828,0.135655438669,0.132172628947,0.1302570836,0.127296695336,0.127035484607,0.123900955857,0.119808654434,0.11684826617,0.114497369608,0.112233543289,0.107444679921,0.106225696518,0.105006713116,0.103265308255,0.0977798829428,0.0955160566235,0.0953419161374,0.0934263707904,0.0905530527698,0.0919461766586,0.0912496147142,0.0923815278738,0.0901177015546,0.0889857883949,0.0868090323187,0.0847193464856,0.0821072391941,0.081758958222,0.0821943094372,0.0794951319027,0.0782761485,0.0734872851324,0.0739226363476,0.0740967768337,0.0751416197503,0.0766218138821,0.0783632187431,0.0782761485,0.0784502889861,0.080017553361,0.0803658343332,0.0814977474928,0.0825425904094,0.0825425904094,0.0814977474928,0.0798434128749,0.0782761485,0.0751416197503,0.0754028304795,0.074532128049,0.0735743553755,0.0747062685351,0.0738355661046,0.0744450578059,0.0754028304795,0.0755769709656,0.0747062685351,0.076447673396,0.0748804090212,0.0748804090212,0.0738355661046,0.072790723188,0.0722683017297,0.0720941612436,0.0720941612436,0.0716588100284,0.0723553719728,0.0738355661046,0.0742709173198,0.074619198292,0.0766218138821,0.0755769709656,0.0754028304795,0.0750545495073,0.0754899007225,0.0762735329099,0.0751416197503,0.0741838470768,0.0740097065907,0.0733131446463,0.0723553719728,0.0726165827019,0.0728777934311,0.0726165827019,0.0714846695423,0.070875177841,0.0711363885701,0.070875177841,0.0716588100284,0.0713975992993,0.0712234588132,0.0716588100284,0.0724424422158,0.0720941612436,0.0724424422158,0.0719200207575,0.0718329505145,0.0710493183271,0.0695691241953,0.0697432646813,0.0707881075979,0.0704398266257,0.06913377298,0.0692208432231,0.0694820539522,0.0707010373549,0.070875177841,0.0729648636741,0.0741838470768,0.0740097065907,0.0720941612436,0.0742709173198,0.0755769709656,0.0767959543682,0.0775795865557,0.0773183758265,0.0776666567987,0.0774054460696,0.0757511114517,0.0755769709656,0.0768830246113,0.0755769709656,0.0747062685351,0.0735743553755,0.0733131446463,0.0720941612436,0.0710493183271,0.0696561944383,0.0694820539522,0.0701786158966,0.0695691241953,0.0693079134661,0.0688725622509,0.0674794383621,0.0666087359316,0.0678277193343,0.0697432646813,0.0707881075979,0.0715717397854,0.0716588100284,0.0718329505145,0.0719200207575,0.0726165827019,0.0734002148894,0.0738355661046,0.0748804090212,0.0730519339172,0.0719200207575,0.0722683017297,0.0715717397854,0.070875177841,0.0700915456535,0.0701786158966,0.0704398266257,0.0724424422158,0.0715717397854,0.0722683017297,0.072790723188,0.0722683017297,0.0722683017297,0.072790723188,0.0740967768337,0.0739226363476,0.0743579875629,0.0720941612436,0.0720070910006,0.0707010373549,0.0716588100284,0.0718329505145,0.0718329505145,0.0734002148894,0.0726165827019,0.0740967768337,0.0743579875629,0.074532128049,0.0730519339172,0.0741838470768,0.0730519339172,0.0723553719728,0.070875177841,0.0700044754105,0.0717458802715,0.0686113515217,0.0692208432231,0.0689596324939,0.0698303349244,0.069046702737,0.0697432646813,0.0705268968688,0.0707881075979,0.0695691241953,0.0677406490912,0.0693949837092,0.0683501407926,0.0679147895773,0.0666958061747,0.0680018598204,0.065389752529,0.0656509632581,0.0671311573899,0.0670440871469,0.0670440871469,0.0659121739872,0.067305297876,0.0680889300634,0.0683501407926,0.0663475252025,0.0661733847164,0.0659121739872,0.0661733847164,0.0655638930151,0.0647802608276,0.0644319798554,0.0621681535362,0.0610362403766,0.0613845213488,0.0616457320779,0.0631259262097,0.0621681535362,0.0604267486752,0.0605138189183,0.0620810832931,0.0633000666958,0.0638224881541,0.0643449096124,0.0645190500985,0.0655638930151,0.0661733847164,0.0657380335011,0.0664345954455,0.0674794383621,0.0661733847164,0.0657380335011,0.0646061203415,0.0648673310707,0.063735417911,0.0626905749945,0.0615586618348,0.0604267486752,0.0593819057587,0.058249992599,0.0561603067659,0.0556378853076,0.0565956579811,0.0560732365228,0.058162922356,0.0591206950295,0.0579887818699,0.0601655379461,0.0612103808627,0.0625164345084,0.0651285417998,0.0665216656886,0.0667828764177,0.0668699466608,0.0666958061747,0.067218227633,0.0700044754105,0.0682630705495,0.0679147895773,0.0670440871469,0.0657380335011,0.0632129964528,0.0610362403766,0.0588594843004,0.0576405008977,0.0553766745784,0.0540706209327,0.0539835506897,0.0547671828771,0.0549413233632,0.0556378853076,0.0565085877381,0.0588594843004,0.0613845213488,0.0617328023209,0.0619940130501,0.0613845213488,0.0622552237792,0.0612974511057,0.0617328023209,0.0612103808627,0.0607750296474,0.0584241330851,0.0573792901686,0.0574663604116,0.0596431164878,0.060078467703,0.0612103808627,0.0615586618348,0.0605138189183,0.0613845213488,0.0617328023209,0.0629517857236,0.0634742071819,0.0628647154806,0.0606008891613,0.0605138189183,0.0583370628421,0.0576405008977,0.0575534306546,0.0560732365228,0.0575534306546,0.0592077652726,0.0570310091964,0.0566827282242,0.0572922199255,0.0567697984672,0.0583370628421,0.0586853438143,0.060078467703,0.060078467703,0.0587724140573,0.0572051496825,0.0586853438143,0.0592948355156,0.0590336247865,0.0588594843004,0.0592948355156,0.0601655379461,0.0606879594044,0.0610362403766,0.0604267486752,0.0593819057587,0.0588594843004,0.0589465545434,0.0590336247865,0.0589465545434,0.0589465545434,0.0579017116268,0.0557249555506,0.0573792901686,0.0586853438143,0.0585982735712,0.0587724140573,0.0593819057587,0.0592948355156,0.0610362403766,0.0606008891613,0.0614715915918,0.0627776452375,0.0617328023209,0.0603396784322,0.061819872564,0.061819872564,0.0606008891613,0.0615586618348,0.0616457320779,0.0614715915918,0.0608620998905,0.05999139746,0.0610362403766,0.0624293642653,0.0622552237792,0.0631259262097,0.065476822772,0.065389752529,0.0659121739872,0.0658251037442,0.0657380335011,0.0669570169038,0.065476822772,0.0643449096124,0.063648347668,0.0619940130501,0.0603396784322,0.0590336247865,0.0579887818699,0.0577275711407,0.0586853438143,0.0578146413838,0.0575534306546,0.0579017116268,0.0597301867308,0.0597301867308,0.0609491701335,0.0619940130501,0.061819872564,0.0622552237792,0.0621681535362,0.0624293642653,0.0640836988832,0.0635612774249,0.0626905749945,0.0638224881541,0.063648347668,0.0643449096124,0.0635612774249,0.0633871369389,0.0620810832931,0.0626905749945,0.061906942807,0.0625164345084,0.0621681535362,0.0635612774249,0.0626905749945,0.0613845213488,0.0615586618348,0.0614715915918,0.0617328023209,0.0594689760017,0.0594689760017,0.0593819057587,0.0593819057587,0.0572922199255,0.0572922199255,0.0586853438143,0.0597301867308,0.0592077652726,0.0590336247865,0.0596431164878,0.0587724140573,0.0598172569739,0.0589465545434,0.05999139746,0.0598172569739,0.0592077652726,0.0596431164878,0.0605138189183,0.061819872564,0.0619940130501,0.0628647154806,0.0625164345084,0.0640836988832,0.0633000666958,0.0644319798554,0.0642578393693,0.0646931905846,0.0643449096124,0.063735417911,0.063735417911,0.0630388559667,0.0631259262097,0.0617328023209,0.0635612774249,0.061906942807,0.0622552237792,0.0622552237792,0.0628647154806,0.0627776452375,0.0647802608276,0.0655638930151,0.0655638930151,0.067218227633,0.0660863144733,0.0655638930151,0.0655638930151,0.0645190500985,0.0662604549594,0.0666087359316,0.065476822772,0.0667828764177,0.0655638930151,0.0643449096124,0.0649544013137,0.0665216656886,0.0678277193343,0.067305297876,0.0659121739872,0.0666958061747,0.0665216656886,0.0652156120429,0.0662604549594,0.0673923681191,0.0673923681191,0.0671311573899,0.0664345954455,0.0665216656886,0.0673923681191,0.0656509632581,0.0653026822859,0.0655638930151,0.0653026822859,0.0646061203415,0.0629517857236,0.0633871369389,0.0630388559667,0.0635612774249,0.0633000666958,0.0639966286402,0.0639095583971,0.0647802608276,0.0664345954455,0.0647802608276,0.0663475252025,0.0662604549594,0.0662604549594,0.0657380335011,0.0646931905846,0.0643449096124,0.065476822772,0.0646061203415,0.0624293642653,0.063735417911,0.0627776452375,0.0626035047514,0.0613845213488,0.0612103808627,0.0616457320779,0.0622552237792,0.0614715915918,0.0605138189183,0.061819872564,0.0625164345084,0.0632129964528,0.0633871369389,0.063648347668,0.0634742071819,0.0628647154806,0.0623422940223,0.0627776452375,0.0643449096124,0.0651285417998,0.0633000666958,0.0633000666958,0.0627776452375,0.0624293642653,0.0629517857236,0.063735417911,0.0633000666958,0.063735417911,0.0621681535362,0.0604267486752,0.0626905749945,0.0630388559667,0.0625164345084,0.0651285417998,0.0653026822859,0.0647802608276,0.0653026822859,0.0646061203415,0.0657380335011,0.065476822772,0.065476822772,0.0651285417998,0.0667828764177,0.065389752529,0.0646931905846,0.0631259262097,0.0635612774249,0.0643449096124,0.0641707691263,0.0661733847164,0.0661733847164,0.0659121739872,0.065389752529,0.0662604549594,0.0663475252025,0.0686984217648,0.0677406490912,0.0673923681191,0.0689596324939,0.0686984217648,0.0687854920078,0.069046702737,0.0687854920078,0.0670440871469,0.067305297876,0.067305297876,0.0687854920078,0.0692208432231,0.0671311573899,0.0661733847164,0.0675665086052,0.06913377298,0.0689596324939,0.06913377298,0.0704398266257,0.0703527563827,0.0682630705495,0.0677406490912,0.0667828764177,0.0667828764177,0.063735417911,0.0629517857236,0.0630388559667,0.0633000666958,0.0624293642653,0.0622552237792,0.0632129964528,0.0649544013137,0.0677406490912,0.0683501407926,0.0683501407926,0.0675665086052,0.0675665086052,0.0681760003065,0.0681760003065,0.0678277193343,0.0682630705495,0.0668699466608,0.0648673310707,0.0646061203415,0.065389752529,0.0666958061747,0.0664345954455,0.0665216656886,0.0655638930151,0.065389752529,0.0644319798554,0.0640836988832,0.065389752529,0.0646931905846,0.0659121739872,0.0640836988832,0.0634742071819,0.0612974511057,0.0628647154806,0.0622552237792,0.0635612774249,0.0627776452375,0.0610362403766,0.0548542531202,0.0471920717319,0.0411842249616,0.0356987996496,0.0)
m <- c(0.0367634047391,0.0431915835638,0.0496197623885,0.0559034877565,0.0624761200379,0.0628372536798,0.0636317476918,0.064065108062,0.0647873753457,0.065437415901,0.0672430841102,0.0670264039251,0.0670264039251,0.0668819504684,0.0655818693577,0.0668819504684,0.0664485900981,0.0651485089875,0.0641373347904,0.0644262417039,0.0645706951606,0.0657985495428,0.0664485900981,0.067604217752,0.068976525591,0.0678931246655,0.0679653513939,0.0690487523194,0.0689042988626,0.0688320721343,0.068976525591,0.0679653513939,0.0686153919492,0.068976525591,0.0685431652208,0.0693376592329,0.0706377403435,0.0702766067016,0.0704210601584,0.0702766067016,0.0707821938002,0.0720100481825,0.0706377403435,0.07034883343,0.0707821938002,0.0719378214541,0.0701321532449,0.0701321532449,0.07034883343,0.0694098859612,0.0685431652208,0.0685431652208,0.0693376592329,0.0684709384924,0.0680375781222,0.0672430841102,0.0686876186775,0.0682542583073,0.068976525591,0.069554339418,0.0691209790477,0.0691932057761,0.0699876997882,0.0709266472569,0.0716489145406,0.0714322343555,0.071143327442,0.0712877808988,0.0709988739853,0.0712155541704,0.0709988739853,0.0691932057761,0.0684709384924,0.0673875375669,0.0671708573818,0.0660874564563,0.0653651891726,0.0652207357159,0.0653651891726,0.0657985495428,0.0663763633698,0.0665930435549,0.0665208168265,0.0670986306535,0.06680972374,0.0667374970116,0.0664485900981,0.066231909913,0.0668819504684,0.0665930435549,0.0660874564563,0.0663041366414,0.0667374970116,0.0655818693577,0.0652207357159,0.0650040555308,0.0653651891726,0.0655818693577,0.064642921889,0.0636317476918,0.0645706951606,0.0647151486173,0.0629817071365,0.064065108062,0.0647873753457,0.0666652702833,0.0667374970116,0.0669541771967,0.0673153108386,0.0684709384924,0.0682542583073,0.068976525591,0.0696265661463,0.0697710196031,0.0704932868867,0.0699154730598,0.0707099670718,0.0699876997882,0.0699154730598,0.0691932057761,0.0687598454059,0.0694821126896,0.0709266472569,0.0708544205286,0.0696265661463,0.0689042988626,0.068976525591,0.0696265661463,0.0685431652208,0.0685431652208,0.0706377403435,0.0702043799733,0.0690487523194,0.0694821126896,0.0705655136151,0.0720100481825,0.0715766878122,0.0722267283676,0.0735268094782,0.0732379025647,0.0707821938002,0.0697710196031,0.07034883343,0.07034883343,0.0694098859612,0.0690487523194,0.069554339418,0.0699876997882,0.0700599265165,0.0686153919492,0.0692654325045,0.068976525591,0.0684709384924,0.068182031579,0.0689042988626,0.0673875375669,0.067604217752,0.0666652702833,0.0663041366414,0.0687598454059,0.0686153919492,0.0688320721343,0.0691932057761,0.0689042988626,0.0694098859612,0.0704210601584,0.0692654325045,0.0694098859612,0.069554339418,0.0688320721343,0.0684709384924,0.068976525591,0.067604217752,0.0676764444804,0.0673875375669,0.0670986306535,0.0670986306535,0.0665208168265,0.066231909913,0.0663763633698,0.0672430841102,0.0655818693577,0.0672430841102,0.0664485900981,0.0650762822592,0.0652207357159,0.0644984684322,0.0652929624443,0.064642921889,0.0644984684322,0.0639928813337,0.0647873753457,0.0637762011485,0.064642921889,0.0642817882471,0.0639206546053,0.0650762822592,0.0637762011485,0.0628372536798,0.06327061405,0.0642095615188,0.0653651891726,0.0649318288024,0.0638484278769,0.0655818693577,0.0664485900981,0.0651485089875,0.0647151486173,0.0655818693577,0.0655096426294,0.0644984684322,0.0645706951606,0.0634872942351,0.0639206546053,0.0623316665812,0.0614649458408,0.0619705329394,0.0626205734947,0.0622594398528,0.0603093181869,0.0603093181869,0.0579980628791,0.0576369292373,0.0579258361508,0.0584314232494,0.0580702896075,0.0585758767061,0.0584314232494,0.0600204112734,0.0613204923841,0.0613927191124,0.0629094804081,0.0638484278769,0.0637039744202,0.0641373347904,0.0647873753457,0.0642817882471,0.0652929624443,0.0650040555308,0.0643540149755,0.0637039744202,0.0649318288024,0.0652207357159,0.0644262417039,0.0645706951606,0.0637039744202,0.0639928813337,0.0624038933096,0.0611760389273,0.0613204923841,0.0605982251004,0.0595870509032,0.0601648647302,0.060525998372,0.0594425974465,0.0593703707181,0.0585758767061,0.0588647836196,0.0592259172614,0.0604537716436,0.0615371725692,0.0608149052855,0.0600926380018,0.0603093181869,0.0603093181869,0.0613927191124,0.0611038121989,0.0608871320138,0.0603815449153,0.0595148241749,0.0593703707181,0.0600204112734,0.0615371725692,0.0627650269514,0.0621872131245,0.0623316665812,0.0637039744202,0.0644262417039,0.0647151486173,0.0644262417039,0.0639206546053,0.0634872942351,0.062692800223,0.0615371725692,0.06327061405,0.06327061405,0.0629817071365,0.0636317476918,0.0635595209634,0.0638484278769,0.0652207357159,0.065437415901,0.0648596020741,0.0642095615188,0.0629094804081,0.0616816260259,0.0610315854706,0.0605982251004,0.0613204923841,0.0624761200379,0.0613927191124,0.0629817071365,0.0629817071365,0.0629817071365,0.0635595209634,0.0652929624443,0.0653651891726,0.0647151486173,0.0642095615188,0.0627650269514,0.0644262417039,0.0629817071365,0.0629094804081,0.0637039744202,0.0633428407783,0.0614649458408,0.0621149863961,0.0624761200379,0.0629094804081,0.0639928813337,0.0631261605932,0.0619705329394,0.0616816260259,0.0618260794826,0.0620427596677,0.0624761200379,0.0620427596677,0.0612482656557,0.0616093992975,0.0605982251004,0.0601648647302,0.0613204923841,0.0620427596677,0.0610315854706,0.0608871320138,0.0607426785571,0.0600204112734,0.0611038121989,0.0609593587422,0.0611760389273,0.0608149052855,0.0618260794826,0.0613927191124,0.0629094804081,0.0625483467663,0.0621149863961,0.0633428407783,0.0634872942351,0.0637039744202,0.0645706951606,0.0665208168265,0.0644984684322,0.0652207357159,0.0650762822592,0.0671708573818,0.0683264850357,0.0693376592329,0.0700599265165,0.0693376592329,0.0697710196031,0.0689042988626,0.0702766067016,0.0708544205286,0.0702766067016,0.0693376592329,0.0697710196031,0.0700599265165,0.0693376592329,0.069554339418,0.0694098859612,0.0686876186775,0.0684709384924,0.068182031579,0.0691932057761,0.0693376592329,0.0693376592329,0.0680375781222,0.0683264850357,0.0694821126896,0.0699154730598,0.069554339418,0.0708544205286,0.0707099670718,0.0699876997882,0.0691932057761,0.0687598454059,0.068976525591,0.0688320721343,0.0685431652208,0.0669541771967,0.0670264039251,0.0642817882471,0.0647151486173,0.0647873753457,0.0650762822592,0.0648596020741,0.0641373347904,0.0635595209634,0.0635595209634,0.0644984684322,0.0656540960861,0.0686876186775,0.0702043799733,0.07034883343,0.0712877808988,0.0713600076271,0.0712877808988,0.0741768500335,0.0733101292931,0.0733823560214,0.0733823560214,0.0716489145406,0.0699154730598,0.0709988739853,0.0701321532449,0.0720822749108,0.073093449108,0.071721141269,0.0721545016392,0.0737434896633,0.0735268094782,0.0745379836753,0.0758380647859,0.0750435707739,0.0761991984278,0.0754047044157,0.0762714251561,0.0772103726249,0.0774992795384,0.0762714251561,0.0790160408341,0.078004866637,0.0773548260816,0.0780770933653,0.0781493200937,0.0772103726249,0.0759825182427,0.0739601698484,0.0748991173172,0.0751880242306,0.0724434085527,0.0738157163916,0.0737434896633,0.0736712629349,0.0731656758363,0.0743213034902,0.075260250959,0.0765603320696,0.0751880242306,0.0765603320696,0.0780770933653,0.07742705281,0.0771381458965,0.0773548260816,0.0782215468221,0.0787271339206,0.0797383081178,0.0808217090433,0.0825551505241,0.0820495634255,0.0811106159568,0.0820495634255,0.0836385514496,0.0829885108943,0.082916284166,0.0824106970674,0.0803161219447,0.0806772555866,0.0799549883029,0.0798827615745,0.0793771744759,0.0786549071923,0.0778604131802,0.07742705281,0.07742705281,0.0777159597235,0.0796660813894,0.0777881864519,0.0776437329951,0.0779326399086,0.0779326399086,0.0790160408341,0.0786549071923,0.0798105348461,0.0790160408341,0.0780770933653,0.0770659191682,0.0769936924398,0.0767770122547,0.0764158786129,0.0782215468221,0.0771381458965,0.076632558798,0.0763436518845,0.074682437132,0.0738157163916,0.0737434896633,0.073093449108,0.0722989550959,0.071143327442,0.0707099670718,0.0702766067016,0.0712155541704,0.0713600076271,0.0733101292931,0.0737434896633,0.0740323965767,0.0743935302186,0.075260250959,0.0761269716994,0.0749713440455,0.0744657569469,0.0746102104037,0.0741768500335,0.0744657569469,0.0748991173172,0.0755491578725,0.0751880242306,0.0756936113292,0.0756936113292,0.076054744971,0.0764158786129,0.0754769311441,0.0750435707739,0.0748268905888,0.0754047044157,0.0728045421945,0.0743935302186,0.0743213034902,0.0728767689229,0.0729489956512,0.0733101292931,0.0726600887378,0.0724434085527,0.073093449108,0.0724434085527,0.0748268905888,0.0743935302186,0.0748991173172,0.0767770122547,0.0769214657114,0.0759825182427,0.0759102915143,0.076054744971,0.0753324776874,0.076054744971,0.0759825182427,0.0756936113292,0.0772103726249,0.0769936924398,0.0764158786129,0.0768492389831,0.0771381458965,0.0767047855263,0.0782215468221,0.0785826804639,0.07742705281,0.0781493200937,0.075260250959,0.0751157975023,0.075260250959,0.075260250959,0.0764881053412,0.0774992795384,0.0769214657114,0.0782937735504,0.0784382270072,0.0777159597235,0.0776437329951,0.0759825182427,0.0767047855263,0.078799360649,0.0795216279327,0.0803161219447,0.079593854661,0.0789438141057,0.0796660813894,0.0813272961419,0.0831329643511,0.0840719118198,0.0848664058319,0.0826996039808,0.0837830049064,0.0844330454617,0.085083086017,0.0855886731156,0.0868887542262,0.0870332076829,0.0861664869425,0.087249887868,0.0877554749666,0.0909334510147,0.0902834104594,0.0906445441013,0.0920168519403,0.0910056777431,0.0912945846566,0.0914390381133,0.0933891597792,0.0948336943466,0.0972894031111,0.100106245517,0.10176746027,0.105667703602,0.110073534032,0.11505717829,0.120474182917,0.124446652977,0.128635803223,0.132247139641,0.134991755319,0.137664144269,0.14069766686,0.143586735995,0.145536857661,0.148425926795,0.149870461363,0.153770704695,0.157454267841,0.161354511173,0.163882446666,0.166265928702,0.169588358207,0.171249572959,0.172405200613,0.175583176662,0.180133460549,0.181866902029,0.183817023695,0.188150627397,0.189884068878,0.192989818198,0.196962288258,0.19956245048,0.205701722391,0.210685366648,0.212779941771,0.21812471967,0.222963910471,0.224119538125,0.232208931702,0.237192575959,0.241670633118,0.248893305955,0.253371363113,0.258066100457,0.265505453479,0.271789178847,0.279734118968,0.288690233285,0.295046185381,0.304291206613,0.314980762411,0.323936876728,0.336215420551,0.345315988325,0.353188701717,0.361711455665,0.364889431713,0.368284087946,0.367200687021,0.364022710972,0.356511131222,0.348927324744,0.337732181847,0.327331532962,0.314836308954,0.301907724576,0.289918087667,0.277928450758,0.269044563169,0.258282780642,0.249615573238,0.240009418365,0.229536542752,0.218702533497,0.210757593377,0.201584798874,0.196528927888,0.191473056902,0.183672570239,0.17876115271,0.174210868823,0.171394026416,0.168938317652,0.166843742529,0.16236568537,0.161210057716,0.157670948026,0.153554024509,0.1517483563,0.149509327721,0.14820924661,0.14467013692,0.141997747971,0.140408759947,0.140408759947,0.136869650257,0.135930702788,0.134847301862,0.133980581122,0.133041633653,0.131380418901,0.130152564518,0.128419123038,0.126035641001,0.123363252052,0.122279851126,0.119101875078,0.118668514708,0.116862846499,0.115273858475,0.114262684277,0.113829323907,0.111806975513,0.11195142897,0.110723574587,0.109423493477,0.108051185638,0.104728756133,0.103139768109,0.100034018789,0.0977949902097,0.0962782289139,0.0980116703948,0.0975783100246,0.0980838971231,0.0967115892842,0.0970004961976,0.0965671358274,0.0964226823707,0.0971449496544,0.0988061644068,0.0979394436664,0.0954115081735,0.0941836537913,0.0933169330509,0.0936058399643,0.092955799409,0.0933891597792,0.0933891597792,0.0946170141615,0.0940392003346,0.0937502934211,0.0949781478033,0.0949781478033,0.0937502934211,0.0939669736062,0.0940392003346,0.0949781478033,0.0933169330509,0.092161305397,0.0905723173729,0.0910056777431,0.0896333699041,0.0896333699041,0.0902111837311,0.0889111026205,0.0881166086084,0.0865998473127,0.0890555560772,0.0884777422503,0.0884777422503,0.0891277828056,0.0896333699041,0.0886944224354,0.0896333699041,0.0893444629907,0.0902834104594,0.0897055966325,0.0885499689786,0.088622195707,0.0883332887935,0.0869609809545,0.0866720740411,0.0865276205843,0.0863831671276,0.0867443007694,0.0878999284233,0.0884055155219,0.0871054344113,0.0881888353368,0.0878999284233,0.0881166086084,0.0892000095339,0.0902834104594,0.089994503546,0.0910056777431,0.0893444629907,0.0892722362623,0.0896333699041,0.0876110215098,0.0881166086084,0.0874665680531,0.0861664869425,0.083710778178,0.0834218712645,0.0843608187333,0.0846497256468,0.0855886731156,0.0857331265723,0.0861664869425,0.0855886731156,0.0877554749666,0.0876110215098,0.0912223579282,0.0910056777431,0.0902111837311,0.0895611431758,0.0879721551517,0.0876110215098,0.0876832482382,0.089994503546,0.0892722362623,0.0900667302743,0.0895611431758,0.0909334510147,0.0909334510147,0.091366811385,0.0931724795941,0.0953392814452,0.0967115892842,0.0959170952721,0.0963504556423,0.0962782289139,0.0946170141615,0.0950503745317,0.095700415087,0.0951948279884,0.0936058399643,0.0918723984835,0.0920890786686,0.0911501311999,0.0895611431758,0.0887666491637,0.08804438188,0.0865276205843,0.0854442196588,0.0866720740411,0.0868165274978,0.0862387136709,0.0850108592886,0.0846497256468,0.0853719929304,0.0855164463872,0.0853719929304,0.085877580029,0.0855886731156,0.0842885920049,0.0838552316347,0.0843608187333,0.0842163652766,0.0840719118198,0.0830607376227,0.0820495634255,0.082916284166,0.081543976327,0.082338470339,0.0824829237957,0.0835663247213,0.0835663247213,0.0826996039808,0.0827718307092,0.0832774178078,0.0837830049064,0.0851553127453,0.0865276205843,0.0869609809545,0.0866720740411,0.0869609809545,0.0868887542262,0.0884777422503,0.088622195707,0.0889111026205,0.0898500500892,0.0871776611396,0.0863109403992,0.0844330454617,0.0858053533007,0.0849386325602,0.0852275394737,0.0842163652766,0.0837830049064,0.0839274583631,0.0825551505241,0.0832051910794,0.0827718307092,0.0821217901539,0.0811106159568,0.0816884297837,0.0813272961419,0.081543976327,0.0802438952164,0.0785826804639,0.0790882675625,0.0788715873774,0.0793771744759,0.0789438141057,0.078799360649,0.0772103726249,0.0761269716994,0.0755491578725,0.0751880242306,0.0736712629349,0.0722989550959,0.0716489145406,0.0694821126896,0.0694821126896,0.0685431652208,0.0674597642953,0.0661596831847,0.0641373347904,0.0641373347904,0.0642095615188,0.0637762011485,0.0630539338649,0.0629817071365,0.062692800223,0.0608871320138,0.0606704518287,0.0614649458408,0.0622594398528,0.0621149863961,0.0621872131245,0.0599481845451,0.0599481845451,0.0588647836196,0.0579980628791,0.0592259172614,0.0584314232494,0.0584314232494,0.0581425163359,0.0566979817685,0.0569146619536,0.0590092370763,0.0580702896075,0.0585758767061,0.0582147430642,0.0575647025089,0.0578536094224,0.0565535283118,0.0559757144849,0.0570591154104,0.0558312610281,0.0549645402877,0.0564813015834,0.056986888682,0.0582147430642,0.0574202490522,0.056986888682,0.0574924757806,0.0581425163359,0.0587925568912,0.0579980628791,0.0581425163359,0.05619239467,0.0555423541146,0.0544589531891,0.0546034066459,0.0546756333742,0.0551812204728,0.0546034066459,0.0540255928189,0.055614580843,0.0564813015834,0.05619239467,0.0566257550402,0.0569146619536,0.0564813015834,0.0569146619536,0.0566257550402,0.0571313421387,0.0569146619536,0.0566979817685,0.0568424352253,0.058359196521,0.0582869697926,0.0580702896075,0.0590814638047,0.0596592776316,0.0590814638047,0.0592259172614,0.0603093181869,0.0604537716436,0.0595870509032,0.0587203301628,0.0582147430642,0.059153690533,0.058359196521,0.0573480223238,0.0586481034345,0.0582869697926,0.0574924757806,0.0578536094224,0.0574924757806,0.058359196521,0.057781382694,0.0573480223238,0.0575647025089,0.0586481034345,0.0578536094224,0.0569146619536,0.0577091559657,0.0582869697926,0.0595870509032,0.0601648647302,0.0621872131245,0.0616816260259,0.0629817071365,0.0623316665812,0.0616093992975,0.0621149863961,0.0606704518287,0.0593703707181,0.0579980628791,0.0573480223238,0.0572035688671,0.0577091559657,0.0557590342998,0.0556868075714,0.0554701273863,0.0554701273863,0.0557590342998,0.0563368481267,0.0573480223238,0.057781382694,0.0574202490522,0.0582869697926,0.0590092370763,0.0590814638047,0.0601648647302,0.0602370914585,0.0609593587422,0.0615371725692,0.05973150436,0.0601648647302,0.0600926380018,0.0587925568912,0.0595870509032,0.0611760389273,0.0610315854706,0.0620427596677,0.0610315854706,0.0614649458408,0.0613927191124,0.0609593587422,0.0598759578167,0.0603815449153,0.0605982251004,0.0595870509032,0.05973150436,0.058359196521,0.0593703707181,0.0595148241749,0.0607426785571,0.0607426785571,0.0608149052855,0.0615371725692,0.0613927191124,0.0608149052855,0.0607426785571,0.0602370914585,0.0590092370763,0.0582869697926,0.0576369292373,0.0576369292373,0.0584314232494,0.0562646213983,0.0549645402877,0.0551812204728,0.0551089937444,0.0559757144849,0.0555423541146,0.0548923135593,0.0558312610281,0.0554701273863,0.0566979817685,0.0582147430642,0.0603815449153,0.0600926380018,0.0598037310883,0.0599481845451,0.0600204112734,0.0608871320138,0.0615371725692,0.0625483467663,0.0615371725692,0.062692800223,0.0612482656557,0.0621149863961,0.0630539338649,0.0635595209634,0.0655096426294,0.0650762822592,0.0645706951606,0.0635595209634,0.0630539338649,0.0616093992975,0.0615371725692,0.0614649458408,0.0612482656557,0.0598037310883,0.0580702896075,0.0582869697926,0.0576369292373,0.0574924757806,0.0571313421387,0.0579258361508,0.0585036499777,0.0582147430642,0.057781382694,0.059153690533,0.0598759578167,0.0606704518287,0.0617538527543,0.0617538527543,0.0623316665812,0.0611760389273,0.0614649458408,0.0611760389273,0.0614649458408,0.0617538527543,0.061898306211,0.0607426785571,0.0603815449153,0.0602370914585,0.0606704518287,0.0616816260259,0.0612482656557,0.0615371725692,0.0613927191124,0.0601648647302,0.060525998372,0.0615371725692,0.0618260794826,0.0624761200379,0.0626205734947,0.0635595209634,0.0636317476918,0.06327061405,0.0629094804081,0.064642921889,0.0649318288024,0.0643540149755,0.0639928813337,0.0636317476918,0.0629094804081,0.0611038121989,0.061898306211,0.0639206546053,0.0643540149755,0.0645706951606,0.0642817882471,0.0647873753457,0.0650040555308,0.0653651891726,0.0659430029996,0.0660874564563,0.0638484278769,0.0633428407783,0.0627650269514,0.0626205734947,0.0625483467663,0.0619705329394,0.0629817071365,0.0639206546053,0.0651485089875,0.0670264039251,0.068976525591,0.0694098859612,0.0712155541704,0.0699154730598,0.0700599265165,0.0702766067016,0.0691932057761,0.0685431652208,0.0678208979371,0.0671708573818,0.0674597642953,0.0663763633698,0.0670986306535,0.0676764444804,0.0683987117641,0.068182031579,0.0691209790477,0.0696265661463,0.0692654325045,0.0688320721343,0.0688320721343,0.0684709384924,0.0671708573818,0.068182031579,0.0679653513939,0.0687598454059,0.0677486712088,0.0683264850357,0.0694821126896,0.0691932057761,0.0686153919492,0.0683987117641,0.068182031579,0.0665208168265,0.0655096426294,0.0655818693577,0.0660874564563,0.0647873753457,0.0572035688671,0.0509198434991,0.0443472112177,0.0382801660348,0.0)
ycorr <- c(3.02776979895e-05,3.01859639841e-05,2.99051667094e-05,2.94304020599e-05,2.87620896589e-05,2.79012327692e-05,2.68416630463e-05,2.57517722739e-05,2.46299322066e-05,2.34672059187e-05,2.22622149542e-05,2.10153073213e-05,1.97339184254e-05,1.84214340124e-05,1.70869215227e-05,1.57292911795e-05,1.43453565085e-05,1.29355215356e-05,1.14820578703e-05,9.98244189789e-06,8.44292258434e-06,6.86127949111e-06,5.2311881053e-06,3.55576948424e-06,1.82319032943e-06,2.52963601694e-08,-1.84245215556e-06,-3.78519212665e-06,-5.79722298687e-06,-7.87431816822e-06,-1.00226853935e-05,-1.22465537263e-05,-1.45509094602e-05,-1.69421071163e-05,-1.94292864118e-05,-2.20073845408e-05,-2.46827335093e-05,-2.74637947026e-05,-3.03621904573e-05,-3.33813020399e-05,-3.65145655691e-05,-3.97550883138e-05,-4.30766682555e-05,-4.64609175049e-05,-4.98762115706e-05,-5.33024461213e-05,-5.67028195617e-05,-6.00407284787e-05,-6.32668057226e-05,-6.63393934159e-05,-6.92321030231e-05,-7.19198266692e-05,-7.43893445596e-05,-7.66401641713e-05,-7.86721849232e-05,-8.04875733654e-05,-8.20923255827e-05,-8.35006062956e-05,-8.47298969635e-05,-8.58009393106e-05,-8.67303266899e-05,-8.75345713816e-05,-8.82395686004e-05,-8.88574804285e-05,-8.94014414394e-05,-8.9876419015e-05,-9.02982447008e-05,-9.06763367025e-05,-9.10239787368e-05,-9.13504553073e-05,-9.16656843254e-05,-9.19796710806e-05,-9.2293091215e-05,-9.26014815938e-05,-9.29062709361e-05,-9.32203674957e-05,-9.35484123854e-05,-9.38917016179e-05,-9.42457545905e-05,-9.46100773533e-05,-9.49844885745e-05,-9.53658591896e-05,-9.57540433983e-05,-9.61563065682e-05,-9.65730124159e-05,-9.69994769554e-05,-9.74233344952e-05,-9.78398338201e-05,-9.82501663884e-05,-9.86555538088e-05,-9.90542101919e-05,-9.94488402064e-05,-9.98429886064e-05,-0.000100237050503,-0.000100628931604,-0.000101018321063,-0.000101415883118,-0.000101826479373,-0.000102247781442,-0.000102681180256,-0.000103129915774,-0.000103589029173,-0.000104053871225,-0.000104522504031,-0.000104991822939,-0.000105460775184,-0.00010592922708,-0.000106395343259,-0.000106873378574,-0.000107371267205,-0.000107889447731,-0.000108428381653,-0.000108994372695,-0.000109587549909,-0.000110212705045,-0.000110871983017,-0.000111573194828,-0.000112309000667,-0.000113064224889,-0.000113824947996,-0.000114584686331,-0.000115340818047,-0.00011609233245,-0.000116836097219,-0.000117572886727,-0.000118301531841,-0.000119012744975,-0.000119698717487,-0.000120368574408,-0.00012102557416,-0.000121670026028,-0.000122305094601,-0.000122928010785,-0.000123539175224,-0.000124128622911,-0.000124694493611,-0.000125230890121,-0.000125745557596,-0.000126234402713,-0.000126696567178,-0.000127131793416,-0.000127529994109,-0.000127887148369,-0.000128197396313,-0.000128465676746,-0.000128695943501,-0.000128887446119,-0.000129045917855,-0.000129167099275,-0.000129252207001,-0.000129301654804,-0.000129320339296,-0.000129316684727,-0.000129293996383,-0.000129258598399,-0.000129203970574,-0.000129133972574,-0.000129049561628,-0.000128952298765,-0.000128843490282,-0.000128727241615,-0.000128601321146,-0.000128469359233,-0.000128334619507,-0.000128197739751,-0.000128063824773,-0.000127937123949,-0.000127815560607,-0.000127705885077,-0.000127610400135,-0.000127530659296,-0.000127473332375,-0.000127437410332,-0.000127418210083,-0.000127411588403,-0.000127414547697,-0.000127425296644,-0.000127445003269,-0.000127477362736,-0.000127514891591,-0.000127555620761,-0.000127605772061,-0.000127664052131,-0.000127741073261,-0.00012783969433,-0.000127963111779,-0.000128116218928,-0.000128304493742,-0.000128521151939,-0.000128775171131,-0.00012907103173,-0.000129405434601,-0.000129767415847,-0.000130149031296,-0.000130545879685,-0.000130962724222,-0.000131403795607,-0.000131862209644,-0.000132337412905,-0.000132835676533,-0.000133350745642,-0.000133880887155,-0.000134431482582,-0.000135012192063,-0.000135633080469,-0.000136288859313,-0.000136972391343,-0.000137683522373,-0.000138424901489,-0.0001391831613,-0.000139959978088,-0.000140753460705,-0.000141562892736,-0.000142383178029,-0.000143207646343,-0.00014403752676,-0.00014487044161,-0.000145704950106,-0.00014653900075,-0.000147374448767,-0.000148218153971,-0.000149068047222,-0.000149928075048,-0.00015079667612,-0.000151670992992,-0.000152546339832,-0.000153417756278,-0.000154290916135,-0.000155165970956,-0.000156040405673,-0.000156913976575,-0.000157784895232,-0.000158650235454,-0.000159504179253,-0.000160351484081,-0.000161195497681,-0.00016204086383,-0.000162882498495,-0.000163717874858,-0.000164552742378,-0.000165383107685,-0.000166211158016,-0.000167032614724,-0.000167850541479,-0.000168661407491,-0.000169458088289,-0.000170242435376,-0.000171015726026,-0.000171779012958,-0.000172532320825,-0.000173268306027,-0.000173987341604,-0.000174685213442,-0.000175366541353,-0.000176027838967,-0.000176673787994,-0.000177302642223,-0.00017791220152,-0.000178502406234,-0.000179067231286,-0.000179607169311,-0.000180120906684,-0.000180617062428,-0.000181091919144,-0.000181544923026,-0.000181978602202,-0.00018239205239,-0.000182788950694,-0.000183162667015,-0.000183513167719,-0.000183845156686,-0.000184155232404,-0.000184446350043,-0.000184715703501,-0.000184970462836,-0.000185209257529,-0.000185430212286,-0.000185630784233,-0.000185817607916,-0.000186002848235,-0.000186188634582,-0.000186380465108,-0.000186582155163,-0.000186795944612,-0.000187018325133,-0.000187250622997,-0.000187492900548,-0.000187744714211,-0.000188005251431,-0.000188266288133,-0.000188520871685,-0.000188765905911,-0.000188996811109,-0.000189208552009,-0.000189397674561,-0.000189558707872,-0.000189692230936,-0.000189799431288,-0.000189885596776,-0.000189953716637,-0.000190005507429,-0.000190044480646,-0.000190067568379,-0.000190078755384,-0.000190085671721,-0.000190094631956,-0.000190110166515,-0.000190131215825,-0.000190152114184,-0.000190169316103,-0.000190180074487,-0.000190184698987,-0.0001901840467,-0.000190179691461,-0.000190170821198,-0.000190154429291,-0.000190125711304,-0.00019008785755,-0.000190042630256,-0.000189994807761,-0.000189950278611,-0.000189912454448,-0.000189882186291,-0.000189858253987,-0.000189837200851,-0.000189817497587,-0.000189803142681,-0.000189793168271,-0.000189785656093,-0.000189781463044,-0.000189779844682,-0.000189776272334,-0.000189767111499,-0.000189753182211,-0.000189736077135,-0.000189721774142,-0.000189709322562,-0.000189689612928,-0.000189666080917,-0.000189633199314,-0.000189586024224,-0.000189525028891,-0.000189449530694,-0.000189360564273,-0.000189261589596,-0.000189147488896,-0.000189015096655,-0.000188871788833,-0.000188721562537,-0.000188560505206,-0.000188394602891,-0.000188220902592,-0.000188039086272,-0.000187848266448,-0.000187645252194,-0.000187425161557,-0.000187189137283,-0.000186936878554,-0.000186664189834,-0.000186375071838,-0.000186067551076,-0.000185741040622,-0.000185401523637,-0.000185051668559,-0.0001846890758,-0.000184321090079,-0.000183953221517,-0.00018358403322,-0.000183211582843,-0.000182830687207,-0.000182440959773,-0.00018205024051,-0.000181654044712,-0.000181246006345,-0.000180827218669,-0.000180395634782,-0.000179943046364,-0.000179465883722,-0.000178964568244,-0.000178445697914,-0.000177906201598,-0.000177339463139,-0.000176744454502,-0.000176126815405,-0.00017548493364,-0.000174815540161,-0.000174123128883,-0.000173411985949,-0.000172676880483,-0.000171912386435,-0.000171118338629,-0.000170292169904,-0.000169433739433,-0.000168535249489,-0.000167589612027,-0.000166597260723,-0.00016555376005,-0.00016445598105,-0.000163307712889,-0.000162116144975,-0.000160892299847,-0.000159643467217,-0.000158378475595,-0.000157107852595,-0.000155845525116,-0.000154604716058,-0.000153399278436,-0.000152242266341,-0.000151142616974,-0.000150105821782,-0.000149129722463,-0.000148215027315,-0.000147354875955,-0.000146546353977,-0.000145784162416,-0.000145059584892,-0.000144362904141,-0.00014368215658,-0.000143001903497,-0.000142313626182,-0.000141606324426,-0.0001408717201,-0.000140106499546,-0.000139311241012,-0.00013848796015,-0.000137636458124,-0.00013675409167,-0.000135845508895,-0.000134913797227,-0.000133967088831,-0.000133006818619,-0.000132039870437,-0.00013107336938,-0.000130106109464,-0.00012913606744,-0.000128162775387,-0.000127186960106,-0.000126210301264,-0.000125228570158,-0.000124235038853,-0.000123225449689,-0.000122197937392,-0.000121144099881,-0.000120060036394,-0.000118939376886,-0.000117772169219,-0.0001165551708,-0.000115283289749,-0.00011395690247,-0.000112580992402,-0.000111165483669,-0.000109710901834,-0.000108220114427,-0.000106699097986,-0.000105153199452,-0.000103593160794,-0.000102024584544,-0.000100453497346,-9.88870600569e-05,-9.73243344944e-05,-9.57646071084e-05,-9.42085446382e-05,-9.2664307827e-05,-9.11268995739e-05,-8.95961993574e-05,-8.80709206718e-05,-8.65526712412e-05,-8.50441008649e-05,-8.3547922636e-05,-8.20651715919e-05,-8.05964025503e-05,-7.91432576711e-05,-7.77015607635e-05,-7.62744847793e-05,-7.4874169893e-05,-7.35060160956e-05,-7.21727605819e-05,-7.08711626104e-05,-6.96017472996e-05,-6.83590535891e-05,-6.71422856347e-05,-6.59563207472e-05,-6.47973713201e-05,-6.36701240943e-05,-6.2565498444e-05,-6.14742719438e-05,-6.03899846869e-05,-5.93143041457e-05,-5.8246067012e-05,-5.71877407701e-05,-5.61430648076e-05,-5.51072735051e-05,-5.40813245827e-05,-5.30659725903e-05,-5.20572124069e-05,-5.10609733876e-05,-5.00835822089e-05,-4.91291889489e-05,-4.81998279156e-05,-4.72968431919e-05,-4.64206717765e-05,-4.55705817198e-05,-4.47511611331e-05,-4.3959159158e-05,-4.31998616323e-05,-4.2479383174e-05,-4.17981808732e-05,-4.11519498119e-05,-4.05405954082e-05,-3.99591069223e-05,-3.94108011969e-05,-3.88974263416e-05,-3.84222316638e-05,-3.79867100178e-05,-3.75928096389e-05,-3.72351833184e-05,-3.69122716949e-05,-3.66244981802e-05,-3.63720129802e-05,-3.61576505866e-05,-3.59790988664e-05,-3.58340585197e-05,-3.57143222644e-05,-3.56127557821e-05,-3.55229447463e-05,-3.54444764709e-05,-3.53724464018e-05,-3.52979725497e-05,-3.52143744371e-05,-3.5118775704e-05,-3.50040761407e-05,-3.48653802884e-05,-3.47042534183e-05,-3.4527529935e-05,-3.4337168054e-05,-3.41345986445e-05,-3.39170695398e-05,-3.36902818887e-05,-3.34581615237e-05,-3.32218649545e-05,-3.29847844022e-05,-3.27469657975e-05,-3.25095907585e-05,-3.22705007189e-05,-3.20274870937e-05,-3.17807333265e-05,-3.15306207795e-05,-3.12787949544e-05,-3.10260341409e-05,-3.07737689698e-05,-3.05230284058e-05,-3.0278084702e-05,-3.00388699691e-05,-2.98096786759e-05,-2.95846789164e-05,-2.93582654351e-05,-2.91303467066e-05,-2.88949910128e-05,-2.86461146876e-05,-2.83794565224e-05,-2.80926022763e-05,-2.77823642699e-05,-2.74443946404e-05,-2.70702426308e-05,-2.66615776113e-05,-2.62176701574e-05,-2.57425080995e-05,-2.52346014212e-05,-2.47005198571e-05,-2.41448696407e-05,-2.35625844291e-05,-2.29490862865e-05,-2.2302937787e-05,-2.16215453782e-05,-2.09115993146e-05,-2.01710057338e-05,-1.93988348256e-05,-1.85917998082e-05,-1.77420584737e-05,-1.68431724343e-05,-1.58930664375e-05,-1.48940478455e-05,-1.38483821437e-05,-1.27559642155e-05,-1.16134950293e-05,-1.04177913007e-05,-9.16430056593e-06,-7.85870906075e-06,-6.50674968208e-06,-5.11229874362e-06,-3.66438283579e-06,-2.146003782e-06,-5.41934338131e-07,1.1605818982e-06,3.05049043775e-06,4.81567854451e-06,6.53795230204e-06,8.22974317998e-06,9.91023244877e-06,1.16070660497e-05,1.33398386174e-05,1.51036385923e-05,1.68912221732e-05,1.86872621558e-05,2.04883628934e-05,2.22066722032e-05,2.41640270312e-05,2.62822444504e-05,2.85623270395e-05,3.09966045825e-05,3.35739635173e-05,3.62784213696e-05,3.91082434575e-05,4.20638210696e-05,4.5150685334e-05,4.83700477794e-05,5.17277353388e-05,5.52223479014e-05,5.88518315874e-05,6.26043713109e-05,6.64784919944e-05,7.0475693574e-05,7.46057826874e-05,7.88737970707e-05,8.32854215446e-05,8.78490793694e-05,9.25664394573e-05,9.74473572315e-05,0.000102503077504,0.000107748039047,0.000113199464528,0.000118865640065,0.000124745741644,0.000130837835671,0.000137146043923,0.000143676420254,0.00015043207982,0.000157414282089,0.000164621745963,0.00017206106026,0.000179734531259,0.000187640297229,0.000195786174603,0.000204186544111,0.000212848946745,0.000221771990915,0.000230953771926,0.000240396803423,0.000250100084509,0.000260053682026,0.00027023847642,0.000280651556925,0.000291280058872,0.000302105995619,0.000313108149534,0.000324265679767,0.000335568247639,0.000346998308971,0.000358532095848,0.000370155150275,0.000381859700894,0.00039362517565,0.000405427489681,0.000417256454442,0.000429092702486,0.000440920190477,0.000452724277659,0.000464489571075,0.000476201728025,0.000487854050347,0.00049942735085,0.000510910168966,0.000522299100152,0.000533582745882,0.0005447560353,0.00055582266902,0.000566784744539,0.00057763733475,0.000588380009441,0.000599008587543,0.000609517924486,0.000619909110032,0.000630175795185,0.000640312750486,0.000650316456439,0.00066017202041,0.000669855682758,0.000679350240801,0.000688640794764,0.000697696206915,0.000706497809494,0.000715020657549,0.000723238973635,0.000731119934521,0.000738623083331,0.000745707166053,0.000752330184661,0.00075844861942,0.000764008431433,0.000768961694631,0.000773262992779,0.000776847872099,0.000779655679411,0.000781633232358,0.000782734523516,0.000782918848729,0.000782149087934,0.000780398474135,0.000777654725527,0.000773916420571,0.000769182111145,0.000763477422011,0.00075684048881,0.000749317467168,0.000740959073125,0.000731828386916,0.00072200361662,0.000711569478192,0.000700611911754,0.000689210748003,0.000677453526489,0.000665431551697,0.000653218218886,0.000640887211548,0.000628514476747,0.00061617019386,0.00060391011145,0.000591777745204,0.000579804593343,0.000568027485785,0.000556477708391,0.000545167159851,0.00053410981685,0.000523317285043,0.000512797781053,0.000502544345623,0.000492552863242,0.00048281589287,0.000473331492466,0.000464094349096,0.000455089382621,0.0004463097906,0.000437750783621,0.00042940536327,0.000421257449328,0.000413295334799,0.000405514013735,0.000397906087113,0.000390467218637,0.000383187938207,0.000376057218886,0.00036906974725,0.000362217171538,0.000355489778847,0.00034888449272,0.000342405497953,0.000336048614063,0.000329807454457,0.000323674475532,0.00031765090476,0.000311742319809,0.000305952931889,0.000300289866424,0.000294760565017,0.000289369075553,0.000284118463786,0.000279013959339,0.000274062836744,0.000269281324514,0.000264676511974,0.000260251779552,0.000256004170691,0.000251931442251,0.000248028077174,0.000244288285079,0.000240714771523,0.000237293101661,0.000234023002329,0.000230890187466,0.000227878366341,0.000224977931573,0.000222176926817,0.000219465222245,0.000216838298539,0.00021428545582,0.000211795254136,0.000209358993358,0.000206968801208,0.000204612766572,0.000202288230584,0.000199993123995,0.000197724651297,0.0001954803189,0.000193255407997,0.000191050347912,0.000188862517812,0.000186699675733,0.000184561638984,0.000182452084927,0.000180375654667,0.000178337946815,0.000176344016576,0.000174394590064,0.000172495234061,0.000170652970046,0.000168872641688,0.000167156392459,0.000165500723834,0.00016391177859,0.000162392709341,0.000160934116846,0.000159533287204,0.000158192991422,0.000156913190827,0.000155688895392,0.000154513804653,0.000153384916061,0.000152304762221,0.000151272184138,0.00015028045653,0.000149329445716,0.000148426185404,0.000147571031001,0.000146762378038,0.000146004321265,0.000145300823473,0.000144652217051,0.000144059207942,0.000143511862161,0.000143012101509,0.000142559459583,0.000142145101456,0.00014175928941,0.000141400114077,0.000141053704454,0.000140714569712,0.000140378863073,0.000140047452651,0.000139719624474,0.000139400071092,0.000139086867238,0.000138780824904,0.000138494613445,0.000138228503506,0.000137988509056,0.000137781384159,0.000137609483215,0.000137474016481,0.000137380072633,0.000137325174751,0.000137311130599,0.000137341300743,0.000137408793741,0.00013750710406,0.000137636942297,0.000137792582883,0.000137970483847,0.000138158850675,0.00013834773716,0.000138526989564,0.000138690120677,0.000138826110144,0.000138924569137,0.000138982116764,0.000138989238433,0.000138938873117,0.000138820242179,0.000138631506995,0.000138377027837,0.000138048816428,0.000137644455982,0.000137168445259,0.000136622382674,0.000136006404573,0.000135328157502,0.000134589111646,0.000133794395376,0.000132950170265,0.000132053655121,0.000131112453335,0.000130139320914,0.000129132093879,0.000128098904239,0.000127048727077,0.000125987877514,0.0001249169025,0.00012384428909,0.000122771623655,0.00012170402799,0.000120645212563,0.000119591133325,0.000118540052386,0.000117494010968,0.00011644133904,0.000115376090825,0.000114292574489,0.000113190142052,0.000112064352247,0.000110908226684,0.000109724330775,0.000108518495031,0.000107291567581,0.000106042631533,0.000104776598753,0.000103488316201,0.000102183916418,0.000100859190136,9.95089806699e-05,9.81413522522e-05,9.67552291622e-05,9.53326218636e-05,9.38675890626e-05,9.2351228132e-05,9.07795978215e-05,8.91536147506e-05,8.74717287929e-05,8.57291013626e-05,8.39271369337e-05,8.20608543232e-05,8.01165202673e-05,7.80955686221e-05,7.60006846066e-05,7.3828200077e-05,7.15814540701e-05,6.92575967643e-05,6.68494090448e-05,6.43568070853e-05,6.17771316388e-05,5.91105136259e-05,5.63635710189e-05,5.35425604342e-05,5.0651825132e-05,4.76987559799e-05,4.46855434103e-05,4.16100822796e-05,3.84797131259e-05,3.52976022072e-05,3.20678216802e-05,2.87887457794e-05,2.54560788856e-05,2.20591891978e-05,1.85899375648e-05,1.50430294278e-05,1.14109976196e-05,7.68678769235e-06,3.87276439452e-06,-3.51668274462e-08,-4.0368594935e-06,-8.12882380031e-06,-1.23022716364e-05,-1.65395492837e-05,-2.08210888175e-05,-2.51312825659e-05,-2.94575234426e-05,-3.37726782476e-05,-3.80678221197e-05,-4.23298448372e-05,-4.65413228912e-05,-5.06908781736e-05,-5.47672583972e-05,-5.87625957616e-05,-6.26802345864e-05,-6.65190486192e-05,-7.02751822045e-05,-7.39528763079e-05,-7.75565922979e-05,-8.10779644286e-05,-8.45254542911e-05,-8.78982871284e-05,-9.11986854468e-05,-9.44298726453e-05,-9.75919594137e-05,-0.000100683585009,-0.000103704411728,-0.000106653661473,-0.00010952368001,-0.000112315024807,-0.000115024781934,-0.000117647166955,-0.000120186650032,-0.000122641392827,-0.000125003995347,-0.000127276578103,-0.000129456945557,-0.000131546824013,-0.000133548342601,-0.0001354687368,-0.000137310530764,-0.000139080948701,-0.000140778644358,-0.000142408747923,-0.000143979791885,-0.000145503173716,-0.000146983240961,-0.000148420790329,-0.000149823042559,-0.000151191073814,-0.000152523815845,-0.000153823749274,-0.000155085521952,-0.000156311568868,-0.000157499480211,-0.000158638504996,-0.000159725518062,-0.000160755582645,-0.000161732122234,-0.000162648506782,-0.000163509015513,-0.000164311980868,-0.000165064835898,-0.000165768674481,-0.000166424059594,-0.000167034794293,-0.000167612591907,-0.000168164030265,-0.000168688029406,-0.000169190558889,-0.000169674097144,-0.000170143049195,-0.000170595434397,-0.000171036641345,-0.000171471625559,-0.000171899462133,-0.000172321703037,-0.000172740478655,-0.000173153397321,-0.000173567710895,-0.000173982980082,-0.000174398998059,-0.000174818450797,-0.000175238281613,-0.000175657627454,-0.000176082084219,-0.000176510949816,-0.000176940750928,-0.000177366821145,-0.000177791194603,-0.000178212055082,-0.000178628410559,-0.000179043819913,-0.000179456706006,-0.000179868391584,-0.000180273363052,-0.000180671285392,-0.000181065552513,-0.000181462045732,-0.000181861148419,-0.000182266339382,-0.000182677684639,-0.000183095596818,-0.000183520780464,-0.000183956449675,-0.000184412573142,-0.000184888398724,-0.0001853839243,-0.000185905101624,-0.000186452901895,-0.000187020782767,-0.0001876082158,-0.000188221022022,-0.000188857560484,-0.00018951733019,-0.00019019134889,-0.000190875332574,-0.000191567480474,-0.000192261284294,-0.00019294299156,-0.000193609510761,-0.000194266185177,-0.000194904703066,-0.00019552051359,-0.000196107566358,-0.000196665185802,-0.000197190331599,-0.000197682994762,-0.000198143698714,-0.000198577379731,-0.000198994413359,-0.000199386992854,-0.00019975218299,-0.000200093198558,-0.000200411912436,-0.000200711246545,-0.000200994183913,-0.000201266122372,-0.000201521987459,-0.000201760286211,-0.000201978070817,-0.000202175461812,-0.000202358553199,-0.000202530782471,-0.000202686024388,-0.000202827828366,-0.000202960756355,-0.000203079609317,-0.000203183123317,-0.000203279628148,-0.000203367982094,-0.000203450920738,-0.000203527801892,-0.000203599568324,-0.000203676665848,-0.000203760896437,-0.000203845115162,-0.000203927774325,-0.000204019670534,-0.000204122491506,-0.000204237865582,-0.00020437160267,-0.000204523071512,-0.000204688725842,-0.000204863364979,-0.000205039063916,-0.000205220919527,-0.000205408478377,-0.000205595162963,-0.00020576951504,-0.000205927828837,-0.000206063812632,-0.000206172556226,-0.000206251329055,-0.000206305238364,-0.000206333541691,-0.000206331246684,-0.000206299623706,-0.000206242652899,-0.000206168796096,-0.000206082586178,-0.000205985761556,-0.000205879002099,-0.000205767765222,-0.000205655009032,-0.000205540539565,-0.000205428833552,-0.000205322982563,-0.000205219637374,-0.000205116116909,-0.000205012034687,-0.000204908995932,-0.000204809381667,-0.000204715215461,-0.000204619240988,-0.000204525621807,-0.000204430952912,-0.000204334425628,-0.000204239608563,-0.000204148934443,-0.000204062842416,-0.000203979559252,-0.000203894450251,-0.000203803384108,-0.000203705078899,-0.000203599196319,-0.000203485483507,-0.000203362120877,-0.000203237543718,-0.000203108180036,-0.000202972376406,-0.000202834495402,-0.000202696447768,-0.000202556797254,-0.000202421267787,-0.000202290955766,-0.000202168677599,-0.000202056247256,-0.000201947292469,-0.000201827079853,-0.000201688202231,-0.000201523391352,-0.000201329173027,-0.000201102449319,-0.000200846266975,-0.00020055054873,-0.000200212162334,-0.00019982446741,-0.000199375339246,-0.000198878729389,-0.000198343459116,-0.000197778052042,-0.00019718881326,-0.000196583892203,-0.000195954425206,-0.000195303586472,-0.0001946382328,-0.000193967849235,-0.000193306025241,-0.000192651895359,-0.00019200076836,-0.000191349026527,-0.000190695742633,-0.000190037588074,-0.000189372080868,-0.00018870900757,-0.000188051194842,-0.000187395772067,-0.000186797099826,-0.000186309614319,-0.000185937273552,-0.000185685684007,-0.000185558048277)
xcorr <- c(-600.0,-598.999165972,-597.998331943,-596.997497915,-595.996663887,-594.995829858,-593.99499583,-592.994161802,-591.993327773,-590.992493745,-589.991659716,-588.990825688,-587.98999166,-586.989157631,-585.988323603,-584.987489575,-583.986655546,-582.985821518,-581.98498749,-580.984153461,-579.983319433,-578.982485405,-577.981651376,-576.980817348,-575.979983319,-574.979149291,-573.978315263,-572.977481234,-571.976647206,-570.975813178,-569.974979149,-568.974145121,-567.973311093,-566.972477064,-565.971643036,-564.970809008,-563.969974979,-562.969140951,-561.968306922,-560.967472894,-559.966638866,-558.965804837,-557.964970809,-556.964136781,-555.963302752,-554.962468724,-553.961634696,-552.960800667,-551.959966639,-550.959132611,-549.958298582,-548.957464554,-547.956630525,-546.955796497,-545.954962469,-544.95412844,-543.953294412,-542.952460384,-541.951626355,-540.950792327,-539.949958299,-538.94912427,-537.948290242,-536.947456214,-535.946622185,-534.945788157,-533.944954128,-532.9441201,-531.943286072,-530.942452043,-529.941618015,-528.940783987,-527.939949958,-526.93911593,-525.938281902,-524.937447873,-523.936613845,-522.935779817,-521.934945788,-520.93411176,-519.933277731,-518.932443703,-517.931609675,-516.930775646,-515.929941618,-514.92910759,-513.928273561,-512.927439533,-511.926605505,-510.925771476,-509.924937448,-508.92410342,-507.923269391,-506.922435363,-505.921601334,-504.920767306,-503.919933278,-502.919099249,-501.918265221,-500.917431193,-499.916597164,-498.915763136,-497.914929108,-496.914095079,-495.913261051,-494.912427023,-493.911592994,-492.910758966,-491.909924937,-490.909090909,-489.908256881,-488.907422852,-487.906588824,-486.905754796,-485.904920767,-484.904086739,-483.903252711,-482.902418682,-481.901584654,-480.900750626,-479.899916597,-478.899082569,-477.89824854,-476.897414512,-475.896580484,-474.895746455,-473.894912427,-472.894078399,-471.89324437,-470.892410342,-469.891576314,-468.890742285,-467.889908257,-466.889074229,-465.8882402,-464.887406172,-463.886572143,-462.885738115,-461.884904087,-460.884070058,-459.88323603,-458.882402002,-457.881567973,-456.880733945,-455.879899917,-454.879065888,-453.87823186,-452.877397832,-451.876563803,-450.875729775,-449.874895746,-448.874061718,-447.87322769,-446.872393661,-445.871559633,-444.870725605,-443.869891576,-442.869057548,-441.86822352,-440.867389491,-439.866555463,-438.865721435,-437.864887406,-436.864053378,-435.863219349,-434.862385321,-433.861551293,-432.860717264,-431.859883236,-430.859049208,-429.858215179,-428.857381151,-427.856547123,-426.855713094,-425.854879066,-424.854045038,-423.853211009,-422.852376981,-421.851542952,-420.850708924,-419.849874896,-418.849040867,-417.848206839,-416.847372811,-415.846538782,-414.845704754,-413.844870726,-412.844036697,-411.843202669,-410.842368641,-409.841534612,-408.840700584,-407.839866555,-406.839032527,-405.838198499,-404.83736447,-403.836530442,-402.835696414,-401.834862385,-400.834028357,-399.833194329,-398.8323603,-397.831526272,-396.830692244,-395.829858215,-394.829024187,-393.828190158,-392.82735613,-391.826522102,-390.825688073,-389.824854045,-388.824020017,-387.823185988,-386.82235196,-385.821517932,-384.820683903,-383.819849875,-382.819015847,-381.818181818,-380.81734779,-379.816513761,-378.815679733,-377.814845705,-376.814011676,-375.813177648,-374.81234362,-373.811509591,-372.810675563,-371.809841535,-370.809007506,-369.808173478,-368.80733945,-367.806505421,-366.805671393,-365.804837364,-364.804003336,-363.803169308,-362.802335279,-361.801501251,-360.800667223,-359.799833194,-358.798999166,-357.798165138,-356.797331109,-355.796497081,-354.795663053,-353.794829024,-352.793994996,-351.793160967,-350.792326939,-349.791492911,-348.790658882,-347.789824854,-346.788990826,-345.788156797,-344.787322769,-343.786488741,-342.785654712,-341.784820684,-340.783986656,-339.783152627,-338.782318599,-337.78148457,-336.780650542,-335.779816514,-334.778982485,-333.778148457,-332.777314429,-331.7764804,-330.775646372,-329.774812344,-328.773978315,-327.773144287,-326.772310259,-325.77147623,-324.770642202,-323.769808173,-322.768974145,-321.768140117,-320.767306088,-319.76647206,-318.765638032,-317.764804003,-316.763969975,-315.763135947,-314.762301918,-313.76146789,-312.760633862,-311.759799833,-310.758965805,-309.758131776,-308.757297748,-307.75646372,-306.755629691,-305.754795663,-304.753961635,-303.753127606,-302.752293578,-301.75145955,-300.750625521,-299.749791493,-298.748957465,-297.748123436,-296.747289408,-295.746455379,-294.745621351,-293.744787323,-292.743953294,-291.743119266,-290.742285238,-289.741451209,-288.740617181,-287.739783153,-286.738949124,-285.738115096,-284.737281068,-283.736447039,-282.735613011,-281.734778982,-280.733944954,-279.733110926,-278.732276897,-277.731442869,-276.730608841,-275.729774812,-274.728940784,-273.728106756,-272.727272727,-271.726438699,-270.725604671,-269.724770642,-268.723936614,-267.723102585,-266.722268557,-265.721434529,-264.7206005,-263.719766472,-262.718932444,-261.718098415,-260.717264387,-259.716430359,-258.71559633,-257.714762302,-256.713928274,-255.713094245,-254.712260217,-253.711426188,-252.71059216,-251.709758132,-250.708924103,-249.708090075,-248.707256047,-247.706422018,-246.70558799,-245.704753962,-244.703919933,-243.703085905,-242.702251877,-241.701417848,-240.70058382,-239.699749791,-238.698915763,-237.698081735,-236.697247706,-235.696413678,-234.69557965,-233.694745621,-232.693911593,-231.693077565,-230.692243536,-229.691409508,-228.69057548,-227.689741451,-226.688907423,-225.688073394,-224.687239366,-223.686405338,-222.685571309,-221.684737281,-220.683903253,-219.683069224,-218.682235196,-217.681401168,-216.680567139,-215.679733111,-214.678899083,-213.678065054,-212.677231026,-211.676396997,-210.675562969,-209.674728941,-208.673894912,-207.673060884,-206.672226856,-205.671392827,-204.670558799,-203.669724771,-202.668890742,-201.668056714,-200.667222686,-199.666388657,-198.665554629,-197.664720601,-196.663886572,-195.663052544,-194.662218515,-193.661384487,-192.660550459,-191.65971643,-190.658882402,-189.658048374,-188.657214345,-187.656380317,-186.655546289,-185.65471226,-184.653878232,-183.653044204,-182.652210175,-181.651376147,-180.650542118,-179.64970809,-178.648874062,-177.648040033,-176.647206005,-175.646371977,-174.645537948,-173.64470392,-172.643869892,-171.643035863,-170.642201835,-169.641367807,-168.640533778,-167.63969975,-166.638865721,-165.638031693,-164.637197665,-163.636363636,-162.635529608,-161.63469558,-160.633861551,-159.633027523,-158.632193495,-157.631359466,-156.630525438,-155.62969141,-154.628857381,-153.628023353,-152.627189324,-151.626355296,-150.625521268,-149.624687239,-148.623853211,-147.623019183,-146.622185154,-145.621351126,-144.620517098,-143.619683069,-142.618849041,-141.618015013,-140.617180984,-139.616346956,-138.615512927,-137.614678899,-136.613844871,-135.613010842,-134.612176814,-133.611342786,-132.610508757,-131.609674729,-130.608840701,-129.608006672,-128.607172644,-127.606338616,-126.605504587,-125.604670559,-124.60383653,-123.603002502,-122.602168474,-121.601334445,-120.600500417,-119.599666389,-118.59883236,-117.597998332,-116.597164304,-115.596330275,-114.595496247,-113.594662219,-112.59382819,-111.592994162,-110.592160133,-109.591326105,-108.590492077,-107.589658048,-106.58882402,-105.587989992,-104.587155963,-103.586321935,-102.585487907,-101.584653878,-100.58381985,-99.5829858215,-98.5821517932,-97.5813177648,-96.5804837364,-95.5796497081,-94.5788156797,-93.5779816514,-92.577147623,-91.5763135947,-90.5754795663,-89.5746455379,-88.5738115096,-87.5729774812,-86.5721434529,-85.5713094245,-84.5704753962,-83.5696413678,-82.5688073394,-81.5679733111,-80.5671392827,-79.5663052544,-78.565471226,-77.5646371977,-76.5638031693,-75.562969141,-74.5621351126,-73.5613010842,-72.5604670559,-71.5596330275,-70.5587989992,-69.5579649708,-68.5571309425,-67.5562969141,-66.5554628857,-65.5546288574,-64.553794829,-63.5529608007,-62.5521267723,-61.551292744,-60.5504587156,-59.5496246872,-58.5487906589,-57.5479566305,-56.5471226022,-55.5462885738,-54.5454545455,-53.5446205171,-52.5437864887,-51.5429524604,-50.542118432,-49.5412844037,-48.5404503753,-47.539616347,-46.5387823186,-45.5379482902,-44.5371142619,-43.5362802335,-42.5354462052,-41.5346121768,-40.5337781485,-39.5329441201,-38.5321100917,-37.5312760634,-36.530442035,-35.5296080067,-34.5287739783,-33.52793995,-32.5271059216,-31.5262718932,-30.5254378649,-29.5246038365,-28.5237698082,-27.5229357798,-26.5221017515,-25.5212677231,-24.5204336947,-23.5195996664,-22.518765638,-21.5179316097,-20.5170975813,-19.516263553,-18.5154295246,-17.5145954962,-16.5137614679,-15.5129274395,-14.5120934112,-13.5112593828,-12.5104253545,-11.5095913261,-10.5087572977,-9.50792326939,-8.50708924103,-7.50625521268,-6.50542118432,-5.50458715596,-4.50375312761,-3.50291909925,-2.50208507089,-1.50125104254,-0.500417014179,0.500417014178,1.50125104254,2.50208507089,3.50291909925,4.50375312761,5.50458715596,6.50542118432,7.50625521268,8.50708924103,9.50792326939,10.5087572977,11.5095913261,12.5104253545,13.5112593828,14.5120934112,15.5129274395,16.5137614679,17.5145954962,18.5154295246,19.516263553,20.5170975813,21.5179316097,22.518765638,23.5195996664,24.5204336947,25.5212677231,26.5221017515,27.5229357798,28.5237698082,29.5246038365,30.5254378649,31.5262718932,32.5271059216,33.52793995,34.5287739783,35.5296080067,36.530442035,37.5312760634,38.5321100917,39.5329441201,40.5337781485,41.5346121768,42.5354462052,43.5362802335,44.5371142619,45.5379482902,46.5387823186,47.539616347,48.5404503753,49.5412844037,50.542118432,51.5429524604,52.5437864887,53.5446205171,54.5454545455,55.5462885738,56.5471226022,57.5479566305,58.5487906589,59.5496246872,60.5504587156,61.551292744,62.5521267723,63.5529608007,64.553794829,65.5546288574,66.5554628857,67.5562969141,68.5571309425,69.5579649708,70.5587989992,71.5596330275,72.5604670559,73.5613010842,74.5621351126,75.562969141,76.5638031693,77.5646371977,78.565471226,79.5663052544,80.5671392827,81.5679733111,82.5688073394,83.5696413678,84.5704753962,85.5713094245,86.5721434529,87.5729774812,88.5738115096,89.5746455379,90.5754795663,91.5763135947,92.577147623,93.5779816514,94.5788156797,95.5796497081,96.5804837364,97.5813177648,98.5821517932,99.5829858215,100.58381985,101.584653878,102.585487907,103.586321935,104.587155963,105.587989992,106.58882402,107.589658048,108.590492077,109.591326105,110.592160133,111.592994162,112.59382819,113.594662219,114.595496247,115.596330275,116.597164304,117.597998332,118.59883236,119.599666389,120.600500417,121.601334445,122.602168474,123.603002502,124.60383653,125.604670559,126.605504587,127.606338616,128.607172644,129.608006672,130.608840701,131.609674729,132.610508757,133.611342786,134.612176814,135.613010842,136.613844871,137.614678899,138.615512927,139.616346956,140.617180984,141.618015013,142.618849041,143.619683069,144.620517098,145.621351126,146.622185154,147.623019183,148.623853211,149.624687239,150.625521268,151.626355296,152.627189324,153.628023353,154.628857381,155.62969141,156.630525438,157.631359466,158.632193495,159.633027523,160.633861551,161.63469558,162.635529608,163.636363636,164.637197665,165.638031693,166.638865721,167.63969975,168.640533778,169.641367807,170.642201835,171.643035863,172.643869892,173.64470392,174.645537948,175.646371977,176.647206005,177.648040033,178.648874062,179.64970809,180.650542118,181.651376147,182.652210175,183.653044204,184.653878232,185.65471226,186.655546289,187.656380317,188.657214345,189.658048374,190.658882402,191.65971643,192.660550459,193.661384487,194.662218515,195.663052544,196.663886572,197.664720601,198.665554629,199.666388657,200.667222686,201.668056714,202.668890742,203.669724771,204.670558799,205.671392827,206.672226856,207.673060884,208.673894912,209.674728941,210.675562969,211.676396997,212.677231026,213.678065054,214.678899083,215.679733111,216.680567139,217.681401168,218.682235196,219.683069224,220.683903253,221.684737281,222.685571309,223.686405338,224.687239366,225.688073394,226.688907423,227.689741451,228.69057548,229.691409508,230.692243536,231.693077565,232.693911593,233.694745621,234.69557965,235.696413678,236.697247706,237.698081735,238.698915763,239.699749791,240.70058382,241.701417848,242.702251877,243.703085905,244.703919933,245.704753962,246.70558799,247.706422018,248.707256047,249.708090075,250.708924103,251.709758132,252.71059216,253.711426188,254.712260217,255.713094245,256.713928274,257.714762302,258.71559633,259.716430359,260.717264387,261.718098415,262.718932444,263.719766472,264.7206005,265.721434529,266.722268557,267.723102585,268.723936614,269.724770642,270.725604671,271.726438699,272.727272727,273.728106756,274.728940784,275.729774812,276.730608841,277.731442869,278.732276897,279.733110926,280.733944954,281.734778982,282.735613011,283.736447039,284.737281068,285.738115096,286.738949124,287.739783153,288.740617181,289.741451209,290.742285238,291.743119266,292.743953294,293.744787323,294.745621351,295.746455379,296.747289408,297.748123436,298.748957465,299.749791493,300.750625521,301.75145955,302.752293578,303.753127606,304.753961635,305.754795663,306.755629691,307.75646372,308.757297748,309.758131776,310.758965805,311.759799833,312.760633862,313.76146789,314.762301918,315.763135947,316.763969975,317.764804003,318.765638032,319.76647206,320.767306088,321.768140117,322.768974145,323.769808173,324.770642202,325.77147623,326.772310259,327.773144287,328.773978315,329.774812344,330.775646372,331.7764804,332.777314429,333.778148457,334.778982485,335.779816514,336.780650542,337.78148457,338.782318599,339.783152627,340.783986656,341.784820684,342.785654712,343.786488741,344.787322769,345.788156797,346.788990826,347.789824854,348.790658882,349.791492911,350.792326939,351.793160967,352.793994996,353.794829024,354.795663053,355.796497081,356.797331109,357.798165138,358.798999166,359.799833194,360.800667223,361.801501251,362.802335279,363.803169308,364.804003336,365.804837364,366.805671393,367.806505421,368.80733945,369.808173478,370.809007506,371.809841535,372.810675563,373.811509591,374.81234362,375.813177648,376.814011676,377.814845705,378.815679733,379.816513761,380.81734779,381.818181818,382.819015847,383.819849875,384.820683903,385.821517932,386.82235196,387.823185988,388.824020017,389.824854045,390.825688073,391.826522102,392.82735613,393.828190158,394.829024187,395.829858215,396.830692244,397.831526272,398.8323603,399.833194329,400.834028357,401.834862385,402.835696414,403.836530442,404.83736447,405.838198499,406.839032527,407.839866555,408.840700584,409.841534612,410.842368641,411.843202669,412.844036697,413.844870726,414.845704754,415.846538782,416.847372811,417.848206839,418.849040867,419.849874896,420.850708924,421.851542952,422.852376981,423.853211009,424.854045038,425.854879066,426.855713094,427.856547123,428.857381151,429.858215179,430.859049208,431.859883236,432.860717264,433.861551293,434.862385321,435.863219349,436.864053378,437.864887406,438.865721435,439.866555463,440.867389491,441.86822352,442.869057548,443.869891576,444.870725605,445.871559633,446.872393661,447.87322769,448.874061718,449.874895746,450.875729775,451.876563803,452.877397832,453.87823186,454.879065888,455.879899917,456.880733945,457.881567973,458.882402002,459.88323603,460.884070058,461.884904087,462.885738115,463.886572143,464.887406172,465.8882402,466.889074229,467.889908257,468.890742285,469.891576314,470.892410342,471.89324437,472.894078399,473.894912427,474.895746455,475.896580484,476.897414512,477.89824854,478.899082569,479.899916597,480.900750626,481.901584654,482.902418682,483.903252711,484.904086739,485.904920767,486.905754796,487.906588824,488.907422852,489.908256881,490.909090909,491.909924937,492.910758966,493.911592994,494.912427023,495.913261051,496.914095079,497.914929108,498.915763136,499.916597164,500.917431193,501.918265221,502.919099249,503.919933278,504.920767306,505.921601334,506.922435363,507.923269391,508.92410342,509.924937448,510.925771476,511.926605505,512.927439533,513.928273561,514.92910759,515.929941618,516.930775646,517.931609675,518.932443703,519.933277731,520.93411176,521.934945788,522.935779817,523.936613845,524.937447873,525.938281902,526.93911593,527.939949958,528.940783987,529.941618015,530.942452043,531.943286072,532.9441201,533.944954128,534.945788157,535.946622185,536.947456214,537.948290242,538.94912427,539.949958299,540.950792327,541.951626355,542.952460384,543.953294412,544.95412844,545.954962469,546.955796497,547.956630525,548.957464554,549.958298582,550.959132611,551.959966639,552.960800667,553.961634696,554.962468724,555.963302752,556.964136781,557.964970809,558.965804837,559.966638866,560.967472894,561.968306922,562.969140951,563.969974979,564.970809008,565.971643036,566.972477064,567.973311093,568.974145121,569.974979149,570.975813178,571.976647206,572.977481234,573.978315263,574.979149291,575.979983319,576.980817348,577.981651376,578.982485405,579.983319433,580.984153461,581.98498749,582.985821518,583.986655546,584.987489575,585.988323603,586.989157631,587.98999166,588.990825688,589.991659716,590.992493745,591.993327773,592.994161802,593.99499583,594.995829858,595.996663887,596.997497915,597.998331943,598.999165972,600.0)
altd  <- c(105, 264)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Atac153_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) : 105,264',bty='n')
dev.off()