# R script for Peak Model
#  -- generated by MACS
p <- c(0.037612259397,0.0444308561298,0.0481700865962,0.0532290454624,0.0593877779953,0.0578480948621,0.0558685022622,0.0514694075959,0.0523492265292,0.0538889096624,0.0530090907291,0.0516893623292,0.0541088643957,0.0514694075959,0.0505895886627,0.0481700865962,0.0505895886627,0.0516893623292,0.0497097697294,0.0499297244627,0.0532290454624,0.0525691812625,0.0532290454624,0.054328819129,0.0532290454624,0.0552086380623,0.0532290454624,0.0536689549291,0.0538889096624,0.0538889096624,0.0523492265292,0.0536689549291,0.0532290454624,0.0563084117289,0.0567483211955,0.0556485475289,0.0563084117289,0.0556485475289,0.0578480948621,0.0582880043287,0.058507959062,0.0589478685287,0.0574081853954,0.0563084117289,0.0576281401288,0.0578480948621,0.0563084117289,0.0545487738623,0.0534490001958,0.0519093170625,0.0494898149961,0.046630403463,0.0472902676629,0.0461904939963,0.0457505845297,0.045970539263,0.0486099960628,0.0521292717959,0.0547687285957,0.0578480948621,0.059167823262,0.0596077327286,0.0589478685287,0.0580680495954,0.0582880043287,0.0580680495954,0.0558685022622,0.0534490001958,0.0516893623292,0.0494898149961,0.0483900413295,0.0497097697294,0.0497097697294,0.0516893623292,0.0492698602628,0.0479501318629,0.0490499055294,0.0486099960628,0.0479501318629,0.0457505845297,0.0488299507961,0.0488299507961,0.0499297244627,0.050149679196,0.050809543396,0.0503696339293,0.0516893623292,0.0527891359958,0.0532290454624,0.0547687285957,0.0523492265292,0.0525691812625,0.0516893623292,0.050149679196,0.0492698602628,0.0481700865962,0.0461904939963,0.0455306297964,0.0448707655964,0.0450907203298,0.0464104487297,0.046630403463,0.0453106750631,0.0450907203298,0.0479501318629,0.0492698602628,0.0483900413295,0.0497097697294,0.0490499055294,0.0472902676629,0.0472902676629,0.0472902676629,0.0505895886627,0.0514694075959,0.0488299507961,0.0499297244627,0.0523492265292,0.0521292717959,0.050149679196,0.0505895886627,0.0514694075959,0.0510294981293,0.0497097697294,0.0499297244627,0.0510294981293,0.0514694075959,0.050809543396,0.0490499055294,0.050809543396,0.0519093170625,0.0497097697294,0.0499297244627,0.0490499055294,0.0497097697294,0.0490499055294,0.0492698602628,0.0490499055294,0.050149679196,0.0505895886627,0.0512494528626,0.0534490001958,0.0521292717959,0.0532290454624,0.0527891359958,0.0532290454624,0.0519093170625,0.0519093170625,0.0512494528626,0.0510294981293,0.0505895886627,0.0472902676629,0.046630403463,0.0464104487297,0.0468503581963,0.0468503581963,0.0468503581963,0.0490499055294,0.050809543396,0.0512494528626,0.0499297244627,0.0527891359958,0.0534490001958,0.0532290454624,0.0532290454624,0.0534490001958,0.0532290454624,0.050809543396,0.0510294981293,0.0514694075959,0.0516893623292,0.0499297244627,0.0527891359958,0.0538889096624,0.054328819129,0.054988683329,0.0554285927956,0.0558685022622,0.0530090907291,0.0523492265292,0.0510294981293,0.0514694075959,0.0483900413295,0.0468503581963,0.0453106750631,0.0428911729966,0.0444308561298,0.0439909466632,0.0468503581963,0.0470703129296,0.0483900413295,0.0455306297964,0.0455306297964,0.0448707655964,0.0455306297964,0.0494898149961,0.0486099960628,0.0490499055294,0.0488299507961,0.0490499055294,0.0510294981293,0.0525691812625,0.0545487738623,0.0545487738623,0.0545487738623,0.0534490001958,0.0530090907291,0.0525691812625,0.0525691812625,0.0505895886627,0.0477301771295,0.0490499055294,0.0490499055294,0.0499297244627,0.0481700865962,0.0468503581963,0.0464104487297,0.0479501318629,0.0457505845297,0.0472902676629,0.0481700865962,0.0479501318629,0.0481700865962,0.0464104487297,0.0470703129296,0.0472902676629,0.0450907203298,0.0435510371965,0.0455306297964,0.0453106750631,0.0444308561298,0.0431111277299,0.04245126353,0.0439909466632,0.0450907203298,0.04245126353,0.0448707655964,0.0439909466632,0.0426712182633,0.0426712182633,0.04245126353,0.0435510371965,0.0431111277299,0.0420113540633,0.0404716709301,0.0428911729966,0.0431111277299,0.0442109013965,0.0450907203298,0.0446508108631,0.0455306297964,0.0455306297964,0.0437709919299,0.0446508108631,0.0450907203298,0.0461904939963,0.045970539263,0.046630403463,0.0461904939963,0.0472902676629,0.0479501318629,0.0464104487297,0.0477301771295,0.0481700865962,0.0486099960628,0.0490499055294,0.0490499055294,0.0479501318629,0.0499297244627,0.0505895886627,0.0497097697294,0.0512494528626,0.0514694075959,0.0512494528626,0.0516893623292,0.0514694075959,0.0510294981293,0.0516893623292,0.050149679196,0.0492698602628,0.0490499055294,0.0499297244627,0.0505895886627,0.0516893623292,0.0503696339293,0.0497097697294,0.050149679196,0.0488299507961,0.0497097697294,0.0514694075959,0.0547687285957,0.0538889096624,0.0530090907291,0.0523492265292,0.0545487738623,0.0563084117289,0.0576281401288,0.0589478685287,0.0582880043287,0.0574081853954,0.0547687285957,0.0563084117289,0.0560884569956,0.0569682759288,0.0587279137953,0.058507959062,0.059167823262,0.0587279137953,0.0602675969286,0.0631270084617,0.0642267821282,0.066866238928,0.0697256504611,0.071705243061,0.0721451525276,0.071045378861,0.0708254241277,0.0732449261942,0.0747846093274,0.0728050167276,0.0743446998608,0.0695056957278,0.071045378861,0.0695056957278,0.0681859673279,0.0688458315279,0.0701655599278,0.0695056957278,0.066866238928,0.0655465105281,0.0662063747281,0.0673061483947,0.066866238928,0.0655465105281,0.0655465105281,0.066866238928,0.0655465105281,0.0640068273949,0.063346963195,0.0666462841947,0.066866238928,0.0677460578613,0.0662063747281,0.0659864199948,0.0673061483947,0.067526103128,0.0664263294614,0.0670861936613,0.0684059220612,0.0666462841947,0.0648866463282,0.0640068273949,0.0635669179283,0.0655465105281,0.0659864199948,0.0670861936613,0.067526103128,0.0666462841947,0.067526103128,0.0686258767946,0.0697256504611,0.0708254241277,0.071705243061,0.0730249714609,0.0714852883277,0.0688458315279,0.0699456051945,0.0732449261942,0.0721451525276,0.0721451525276,0.0734648809275,0.0734648809275,0.075224518794,0.0745646545941,0.0754444735273,0.0761043377273,0.0747846093274,0.0765442471939,0.0767642019272,0.0747846093274,0.0728050167276,0.0734648809275,0.071045378861,0.071045378861,0.0721451525276,0.0725850619942,0.0732449261942,0.0714852883277,0.071705243061,0.0736848356608,0.0743446998608,0.075884382994,0.0774240661272,0.0774240661272,0.0754444735273,0.0767642019272,0.0787437945271,0.0776440208605,0.0780839303271,0.0761043377273,0.0756644282607,0.0745646545941,0.0732449261942,0.071045378861,0.0699456051945,0.0697256504611,0.0697256504611,0.0719251977943,0.0723651072609,0.075224518794,0.0798435681937,0.0827029797268,0.0846825723266,0.0871020743931,0.0906213501261,0.0915011690594,0.0921610332594,0.0910612595928,0.0921610332594,0.0893016217262,0.0857823459932,0.0849025270599,0.0829229344601,0.0838027533934,0.0833628439267,0.0811632965936,0.0831428891934,0.0840227081267,0.0833628439267,0.0853424365266,0.087761938593,0.0879818933264,0.0906213501261,0.0928208974593,0.0948004900591,0.0972199921256,0.0943605805925,0.0934807616593,0.0970000373923,0.0970000373923,0.0952403995258,0.0945805353258,0.0937007163926,0.0928208974593,0.0945805353258,0.092600942726,0.0930408521926,0.0965601279257,0.0952403995258,0.0980998110589,0.0991995847255,0.100519313125,0.100739267859,0.102058996259,0.100519313125,0.104258543592,0.107557864591,0.107117955125,0.108437683525,0.111077140325,0.110857185591,0.112176913991,0.116356053924,0.117455827591,0.118775555991,0.118995510724,0.120315239124,0.123614560124,0.124274424323,0.12405446959,0.13065311159,0.134172387323,0.134612296789,0.136811844122,0.137251753589,0.139671255656,0.135932025189,0.136151979923,0.137251753589,0.138351527256,0.134832251523,0.138131572522,0.140551074589,0.138791436722,0.141430893522,0.144730214522,0.148689399722,0.149349263921,0.151988720721,0.150888947055,0.152428630188,0.148689399722,0.148689399722,0.151328856521,0.151768765988,0.147589626055,0.151548811255,0.150449037588,0.151548811255,0.153308449121,0.154408222788,0.156827724854,0.157267634321,0.161226819521,0.164306185787,0.170684873053,0.17112478252,0.175523877186,0.178603243452,0.181242700252,0.186301659119,0.186961523319,0.190260844318,0.188941115918,0.188721161185,0.188501206452,0.190040889585,0.189820934852,0.191580572718,0.193340210585,0.194879893718,0.200158807317,0.20763726825,0.21291618185,0.220834552249,0.223693963782,0.230072651048,0.232272198382,0.236011428848,0.244589663447,0.245909391847,0.255147490646,0.25206812438,0.254267671713,0.25734703798,0.260866313713,0.261306223179,0.265485363112,0.264165634712,0.268564729379,0.271864050378,0.266805091512,0.271644095645,0.273843642978,0.275383326111,0.279562466044,0.284401470177,0.283961560711,0.28990033851,0.286820972244,0.28924047431,0.291440021644,0.293419614243,0.298698527843,0.29847857311,0.298038663643,0.296938889976,0.301118029909,0.300678120443,0.306176988776,0.316074951775,0.319594227508,0.324213276908,0.329492190507,0.337190606173,0.343129383973,0.352367482772,0.363365219438,0.377662277103,0.384480873836,0.389759787436,0.402517161968,0.407576120834,0.419013766967,0.428691775233,0.440789285565,0.461465030497,0.479061409162,0.490499055294,0.50875529816,0.524592038958,0.54064873449,0.561104524689,0.576501356021,0.592118142086,0.601136286152,0.596517236753,0.594097734686,0.58771904742,0.575621537088,0.558465067889,0.535589775624,0.50941516236,0.472022857696,0.433970688832,0.406696301901,0.379201960237,0.346868614439,0.317834589641,0.290340247977,0.267464955712,0.246349301314,0.226113465849,0.211816408183,0.199278988384,0.184761975985,0.171564691986,0.158587362721,0.148909354455,0.140771029322,0.132632704189,0.12471433379,0.123174650657,0.120975103324,0.116576008657,0.113936551858,0.107997774058,0.108877592991,0.104698453058,0.100739267859,0.0963401731924,0.0959002637257,0.0923809879927,0.0897415311929,0.0882018480597,0.0838027533934,0.0818231607935,0.0780839303271,0.079403658727,0.0761043377273,0.0767642019272,0.0730249714609,0.0697256504611,0.066866238928,0.0679660125946,0.0679660125946,0.0670861936613,0.0681859673279,0.0681859673279,0.0708254241277,0.0684059220612,0.0701655599278,0.0701655599278,0.0721451525276,0.0699456051945,0.0695056957278,0.0695056957278,0.0690657862612,0.0688458315279,0.0690657862612,0.0692857409945,0.0684059220612,0.0664263294614,0.066866238928,0.0653265557948,0.0648866463282,0.0659864199948,0.0662063747281,0.0651066010615,0.0629070537283,0.0640068273949,0.0629070537283,0.0648866463282,0.0640068273949,0.0646666915949,0.0629070537283,0.0624671442617,0.0609274611285,0.0624671442617,0.062687098995,0.0622471895284,0.0622471895284,0.0637868726616,0.0631270084617,0.062687098995,0.0631270084617,0.0635669179283,0.0613673705951,0.0604875516619,0.0622471895284,0.0635669179283,0.0657664652614,0.0651066010615,0.0651066010615,0.0686258767946,0.0677460578613,0.0655465105281,0.0686258767946,0.0657664652614,0.0677460578613,0.0677460578613,0.0662063747281,0.0655465105281,0.0653265557948,0.063346963195,0.0655465105281,0.0659864199948,0.0651066010615,0.0666462841947,0.0615873253284,0.0604875516619,0.0609274611285,0.0604875516619,0.0611474158618,0.0611474158618,0.0622471895284,0.0620272347951,0.0618072800618,0.0620272347951,0.0624671442617,0.0596077327286,0.0587279137953,0.0582880043287,0.0587279137953,0.0576281401288,0.0558685022622,0.0578480948621,0.0582880043287,0.0576281401288,0.0576281401288,0.0598276874619,0.0596077327286,0.059167823262,0.0580680495954,0.0604875516619,0.0602675969286,0.0587279137953,0.0589478685287,0.0607075063952,0.0607075063952,0.0611474158618,0.0600476421952,0.0629070537283,0.0618072800618,0.0604875516619,0.0624671442617,0.062687098995,0.0615873253284,0.0615873253284,0.0624671442617,0.0631270084617,0.0662063747281,0.0646666915949,0.0637868726616,0.0615873253284,0.0593877779953,0.0593877779953,0.0602675969286,0.059167823262,0.058507959062,0.0569682759288,0.0565283664622,0.0558685022622,0.0578480948621,0.0589478685287,0.0582880043287,0.0554285927956,0.0538889096624,0.054328819129,0.054988683329,0.0545487738623,0.0523492265292,0.0532290454624,0.0536689549291,0.054988683329,0.0552086380623,0.0574081853954,0.0598276874619,0.0587279137953,0.058507959062,0.0600476421952,0.0613673705951,0.0615873253284,0.0593877779953,0.0589478685287,0.0607075063952,0.0613673705951,0.0596077327286,0.0609274611285,0.0600476421952,0.0582880043287,0.0571882306621,0.0547687285957,0.0545487738623,0.054988683329,0.054988683329,0.0538889096624,0.0560884569956,0.0554285927956,0.0558685022622,0.0576281401288,0.0578480948621,0.0593877779953,0.0593877779953,0.0558685022622,0.0538889096624,0.0538889096624,0.0523492265292,0.050809543396,0.050809543396,0.0486099960628,0.0481700865962,0.0483900413295,0.0512494528626,0.0516893623292,0.0538889096624,0.054988683329,0.054328819129,0.0560884569956,0.0574081853954,0.0589478685287,0.0600476421952,0.0582880043287,0.0538889096624,0.0569682759288,0.0567483211955,0.0580680495954,0.0580680495954,0.0560884569956,0.0512494528626,0.0516893623292,0.0510294981293,0.0534490001958,0.0547687285957,0.0538889096624,0.0534490001958,0.0510294981293,0.0499297244627,0.0525691812625,0.0563084117289,0.0580680495954,0.0565283664622,0.0554285927956,0.0563084117289,0.0545487738623,0.0527891359958,0.0530090907291,0.0525691812625,0.0503696339293,0.0514694075959,0.0472902676629,0.0492698602628,0.0483900413295,0.0481700865962,0.0486099960628,0.0479501318629,0.0477301771295,0.0497097697294,0.0499297244627,0.0475102223962,0.0499297244627,0.050809543396,0.0486099960628,0.0481700865962,0.0486099960628,0.0497097697294,0.0510294981293,0.0514694075959,0.0519093170625,0.054328819129,0.0523492265292,0.0519093170625,0.0558685022622,0.0580680495954,0.0582880043287,0.0571882306621,0.0552086380623,0.054988683329,0.054988683329,0.0525691812625,0.0521292717959,0.0483900413295,0.0479501318629,0.0461904939963,0.046630403463,0.0481700865962,0.0481700865962,0.0483900413295,0.0490499055294,0.050149679196,0.0497097697294,0.0536689549291,0.0538889096624,0.0527891359958,0.0532290454624,0.0525691812625,0.054328819129,0.0514694075959,0.050149679196,0.0497097697294,0.0519093170625,0.0519093170625,0.0488299507961,0.0494898149961,0.0492698602628,0.0481700865962,0.0479501318629,0.0494898149961,0.0499297244627,0.0492698602628,0.0483900413295,0.0448707655964,0.0461904939963,0.0475102223962,0.0475102223962,0.046630403463,0.0461904939963,0.0477301771295,0.0492698602628,0.0514694075959,0.0488299507961,0.0512494528626,0.0527891359958,0.0525691812625,0.050809543396,0.054328819129,0.0545487738623,0.0527891359958,0.0516893623292,0.0499297244627,0.0521292717959,0.0512494528626,0.0488299507961,0.0475102223962,0.0457505845297,0.0435510371965,0.0435510371965,0.0448707655964,0.0437709919299,0.0439909466632,0.0446508108631,0.0457505845297,0.0470703129296,0.0470703129296,0.0497097697294,0.0512494528626,0.0516893623292,0.0523492265292,0.054328819129,0.0547687285957,0.0563084117289,0.0547687285957,0.0556485475289,0.0574081853954,0.0571882306621,0.0576281401288,0.0567483211955,0.0556485475289,0.054988683329,0.0558685022622,0.0558685022622,0.0576281401288,0.0574081853954,0.0563084117289,0.0554285927956,0.0536689549291,0.0536689549291,0.0523492265292,0.0505895886627,0.0499297244627,0.0461904939963,0.0455306297964,0.045970539263,0.0461904939963,0.046630403463,0.0486099960628,0.0477301771295,0.0503696339293,0.0514694075959,0.050809543396,0.0514694075959,0.050149679196,0.0492698602628,0.0479501318629,0.0470703129296,0.0472902676629,0.0494898149961,0.0488299507961,0.0483900413295,0.0497097697294,0.0514694075959,0.0530090907291,0.0521292717959,0.0521292717959,0.0530090907291,0.0503696339293,0.0488299507961,0.0497097697294,0.0499297244627,0.0497097697294,0.0492698602628,0.0499297244627,0.0494898149961,0.0503696339293,0.0512494528626,0.0532290454624,0.0523492265292,0.0521292717959,0.050809543396,0.0486099960628,0.0479501318629,0.0457505845297,0.0464104487297,0.0461904939963,0.0461904939963,0.0450907203298,0.0439909466632,0.0409115803968,0.0409115803968,0.0431111277299,0.0422313087966,0.0428911729966,0.0431111277299,0.0426712182633,0.0437709919299,0.0437709919299,0.0448707655964,0.0464104487297,0.0481700865962,0.0479501318629,0.0521292717959,0.0525691812625,0.0525691812625,0.0541088643957,0.0541088643957,0.054328819129,0.0563084117289,0.054988683329,0.0541088643957,0.0530090907291,0.0497097697294,0.0512494528626,0.050809543396,0.0492698602628,0.0457505845297,0.0461904939963,0.045970539263,0.0448707655964,0.0439909466632,0.0448707655964,0.046630403463,0.0446508108631,0.0450907203298,0.0472902676629,0.0472902676629,0.0483900413295,0.0499297244627,0.0514694075959,0.0530090907291,0.0536689549291,0.0525691812625,0.0525691812625,0.0530090907291,0.0514694075959,0.0523492265292,0.0497097697294,0.0488299507961,0.0510294981293,0.0512494528626,0.0510294981293,0.0519093170625,0.0516893623292,0.0519093170625,0.0527891359958,0.0538889096624,0.0552086380623,0.0556485475289,0.054328819129,0.0556485475289,0.0565283664622,0.0556485475289,0.0560884569956,0.0565283664622,0.054988683329,0.0556485475289,0.0536689549291,0.0541088643957,0.0527891359958,0.0516893623292,0.0523492265292,0.0530090907291,0.0534490001958,0.0516893623292,0.050809543396,0.0497097697294,0.0505895886627,0.0490499055294,0.050809543396,0.0503696339293,0.0479501318629,0.0468503581963,0.0461904939963,0.0475102223962,0.0510294981293,0.0497097697294,0.0512494528626,0.0521292717959,0.0510294981293,0.0503696339293,0.050809543396,0.0514694075959,0.0556485475289,0.054328819129,0.0512494528626,0.0536689549291,0.0521292717959,0.0503696339293,0.0516893623292,0.0534490001958,0.0525691812625,0.0530090907291,0.050149679196,0.050149679196,0.0494898149961,0.0499297244627,0.0516893623292,0.0523492265292,0.0519093170625,0.0523492265292,0.0519093170625,0.0510294981293,0.0486099960628,0.0481700865962,0.0503696339293,0.0479501318629,0.0470703129296,0.0470703129296,0.0472902676629,0.0448707655964,0.0461904939963,0.046630403463,0.0479501318629,0.0490499055294,0.0455306297964,0.0472902676629,0.0477301771295,0.0477301771295,0.0470703129296,0.0475102223962,0.0475102223962,0.0475102223962,0.046630403463,0.046630403463,0.0497097697294,0.0490499055294,0.0497097697294,0.0494898149961,0.0481700865962,0.0472902676629,0.0468503581963,0.0486099960628,0.0481700865962,0.0470703129296,0.045970539263,0.0455306297964,0.0455306297964,0.0457505845297,0.0477301771295,0.0497097697294,0.0519093170625,0.0497097697294,0.0505895886627,0.0525691812625,0.0521292717959,0.0530090907291,0.0521292717959,0.0527891359958,0.0521292717959,0.0505895886627,0.0488299507961,0.0490499055294,0.0505895886627,0.0497097697294,0.0516893623292,0.0510294981293,0.0510294981293,0.0505895886627,0.0514694075959,0.0525691812625,0.0514694075959,0.050149679196,0.0510294981293,0.0492698602628,0.0483900413295,0.0483900413295,0.0488299507961,0.0479501318629,0.0486099960628,0.0486099960628,0.050149679196,0.0536689549291,0.0534490001958,0.0556485475289,0.0560884569956,0.0556485475289,0.0552086380623,0.0571882306621,0.0556485475289,0.0554285927956,0.0532290454624,0.0512494528626,0.050149679196,0.0516893623292,0.0486099960628,0.0488299507961,0.0503696339293,0.0483900413295,0.0433310824632,0.0384920783303,0.0349728025972,0.029913843731,0.0)
m <- c(0.0300238030439,0.0360717633692,0.0414717279455,0.0479516854369,0.0531356514301,0.0535676485962,0.0518396599318,0.0498956726844,0.0492476769352,0.0490316783522,0.0522716570979,0.0509756655996,0.0533516500132,0.0516236613488,0.0509756655996,0.0518396599318,0.0557276344267,0.0555116358437,0.0563756301759,0.0548636400945,0.0531356514301,0.0548636400945,0.0516236613488,0.0520556585149,0.0546476415115,0.0535676485962,0.0507596670166,0.0509756655996,0.0503276698505,0.0509756655996,0.0494636755183,0.0468716925217,0.0473036896878,0.0470876911047,0.0460076981895,0.0470876911047,0.04816768402,0.0477356868539,0.04816768402,0.0485996811861,0.0485996811861,0.0492476769352,0.0492476769352,0.0490316783522,0.0473036896878,0.0462236967725,0.0464396953556,0.0477356868539,0.048383682603,0.0509756655996,0.0516236613488,0.0531356514301,0.0533516500132,0.0537836471793,0.0546476415115,0.0557276344267,0.0537836471793,0.0544316429284,0.0529196528471,0.0492476769352,0.0492476769352,0.0492476769352,0.0492476769352,0.0498956726844,0.0492476769352,0.0494636755183,0.0518396599318,0.0529196528471,0.0539996457623,0.0546476415115,0.0531356514301,0.0511916641827,0.0514076627657,0.052487655681,0.0533516500132,0.0542156443454,0.0507596670166,0.0490316783522,0.0485996811861,0.0503276698505,0.0533516500132,0.0537836471793,0.0533516500132,0.0501116712674,0.0496796741013,0.0498956726844,0.0516236613488,0.0520556585149,0.0509756655996,0.04816768402,0.0475196882708,0.04816768402,0.0479516854369,0.048383682603,0.0492476769352,0.04816768402,0.0485996811861,0.0488156797691,0.0496796741013,0.0503276698505,0.0501116712674,0.048383682603,0.0505436684335,0.0511916641827,0.0501116712674,0.0501116712674,0.0498956726844,0.0501116712674,0.0485996811861,0.0488156797691,0.0516236613488,0.052703654264,0.0511916641827,0.0509756655996,0.0529196528471,0.0531356514301,0.0522716570979,0.0509756655996,0.0529196528471,0.0552956372606,0.0544316429284,0.0561596315928,0.0574556230911,0.0572396245081,0.0559436330098,0.0533516500132,0.0539996457623,0.0539996457623,0.0544316429284,0.0548636400945,0.052487655681,0.0511916641827,0.0518396599318,0.0531356514301,0.0539996457623,0.0559436330098,0.0565916287589,0.0565916287589,0.0587516145894,0.0581036188403,0.0602636046708,0.0600476060877,0.0583196174233,0.0574556230911,0.0565916287589,0.0574556230911,0.0572396245081,0.0576716216742,0.056807627342,0.0559436330098,0.0539996457623,0.0561596315928,0.0546476415115,0.0542156443454,0.0533516500132,0.0522716570979,0.0537836471793,0.052703654264,0.0514076627657,0.0518396599318,0.0535676485962,0.0509756655996,0.052703654264,0.0535676485962,0.0533516500132,0.0548636400945,0.0535676485962,0.0546476415115,0.0539996457623,0.0529196528471,0.0505436684335,0.052703654264,0.0548636400945,0.0537836471793,0.0565916287589,0.0561596315928,0.0537836471793,0.0550796386776,0.056807627342,0.0581036188403,0.0604796032538,0.0593996103386,0.0537836471793,0.0542156443454,0.0529196528471,0.0518396599318,0.0535676485962,0.0516236613488,0.0492476769352,0.0473036896878,0.0455757010234,0.0455757010234,0.0470876911047,0.0464396953556,0.0457916996065,0.0468716925217,0.0466556939386,0.0470876911047,0.0501116712674,0.0505436684335,0.0514076627657,0.0507596670166,0.0498956726844,0.0507596670166,0.0501116712674,0.048383682603,0.04816768402,0.048383682603,0.0453597024404,0.0468716925217,0.0451437038573,0.0464396953556,0.048383682603,0.0477356868539,0.0473036896878,0.0501116712674,0.0501116712674,0.0498956726844,0.0494636755183,0.04816768402,0.0494636755183,0.0498956726844,0.0505436684335,0.0522716570979,0.0522716570979,0.0494636755183,0.0501116712674,0.048383682603,0.0494636755183,0.0501116712674,0.0503276698505,0.0485996811861,0.0479516854369,0.0449277052743,0.0470876911047,0.0488156797691,0.048383682603,0.0501116712674,0.0505436684335,0.0485996811861,0.0494636755183,0.0503276698505,0.0505436684335,0.0518396599318,0.0498956726844,0.04816768402,0.0488156797691,0.048383682603,0.0479516854369,0.0492476769352,0.0477356868539,0.0468716925217,0.0457916996065,0.0473036896878,0.0473036896878,0.04816768402,0.04816768402,0.0494636755183,0.0488156797691,0.0468716925217,0.0490316783522,0.0485996811861,0.0479516854369,0.0466556939386,0.0468716925217,0.048383682603,0.04816768402,0.0490316783522,0.0492476769352,0.0496796741013,0.0475196882708,0.04816768402,0.0492476769352,0.0509756655996,0.0511916641827,0.0494636755183,0.0488156797691,0.0460076981895,0.0464396953556,0.0477356868539,0.0477356868539,0.0475196882708,0.0492476769352,0.0485996811861,0.0477356868539,0.0468716925217,0.0479516854369,0.0468716925217,0.0462236967725,0.0475196882708,0.04816768402,0.0470876911047,0.0462236967725,0.0451437038573,0.0455757010234,0.0451437038573,0.0449277052743,0.0475196882708,0.0464396953556,0.0451437038573,0.0444957081082,0.0440637109421,0.0444957081082,0.0447117066912,0.0442797095251,0.0449277052743,0.0449277052743,0.0455757010234,0.0464396953556,0.0488156797691,0.0475196882708,0.0492476769352,0.0485996811861,0.0479516854369,0.0509756655996,0.052703654264,0.0520556585149,0.0503276698505,0.0514076627657,0.0477356868539,0.0507596670166,0.0520556585149,0.0507596670166,0.0522716570979,0.0507596670166,0.0503276698505,0.0529196528471,0.0542156443454,0.0535676485962,0.0542156443454,0.0552956372606,0.0529196528471,0.0542156443454,0.0546476415115,0.0539996457623,0.0522716570979,0.0496796741013,0.0507596670166,0.0518396599318,0.0516236613488,0.0488156797691,0.0496796741013,0.0485996811861,0.0479516854369,0.0492476769352,0.052703654264,0.0522716570979,0.0496796741013,0.0490316783522,0.0503276698505,0.0509756655996,0.0509756655996,0.0516236613488,0.0514076627657,0.0496796741013,0.0460076981895,0.0462236967725,0.0485996811861,0.0488156797691,0.0496796741013,0.0514076627657,0.0505436684335,0.0503276698505,0.0520556585149,0.0520556585149,0.0531356514301,0.0539996457623,0.0522716570979,0.0522716570979,0.052487655681,0.0509756655996,0.0522716570979,0.0529196528471,0.052487655681,0.0522716570979,0.0542156443454,0.0548636400945,0.0546476415115,0.0550796386776,0.0537836471793,0.0542156443454,0.0535676485962,0.0533516500132,0.052703654264,0.0552956372606,0.0539996457623,0.0522716570979,0.0529196528471,0.0535676485962,0.0555116358437,0.0535676485962,0.0535676485962,0.0539996457623,0.0509756655996,0.0496796741013,0.0505436684335,0.0514076627657,0.0520556585149,0.0522716570979,0.0501116712674,0.0522716570979,0.0537836471793,0.0539996457623,0.0572396245081,0.0581036188403,0.0561596315928,0.0555116358437,0.0565916287589,0.0548636400945,0.0557276344267,0.0548636400945,0.0537836471793,0.0529196528471,0.0537836471793,0.052487655681,0.0552956372606,0.0561596315928,0.0559436330098,0.0565916287589,0.0589676131725,0.061127599003,0.0630715862504,0.0650155734978,0.0643675777487,0.0645835763317,0.0663115649961,0.0663115649961,0.06587956783,0.0691195465758,0.0667435621622,0.0645835763317,0.0641515791656,0.0622075919182,0.0617755947521,0.0630715862504,0.0619915933351,0.0617755947521,0.0609116004199,0.0578876202572,0.0589676131725,0.056807627342,0.0542156443454,0.0544316429284,0.0539996457623,0.052703654264,0.0505436684335,0.0509756655996,0.0498956726844,0.0501116712674,0.0485996811861,0.0503276698505,0.0511916641827,0.052487655681,0.0522716570979,0.0522716570979,0.0544316429284,0.0533516500132,0.0572396245081,0.0578876202572,0.0596156089216,0.0632875848334,0.0647995749148,0.0652315720809,0.0660955664131,0.0669595607453,0.0645835763317,0.0654475706639,0.0626395890843,0.0609116004199,0.0585356160064,0.0555116358437,0.0557276344267,0.0561596315928,0.0581036188403,0.0583196174233,0.0587516145894,0.0585356160064,0.056807627342,0.0574556230911,0.0600476060877,0.0600476060877,0.0596156089216,0.0587516145894,0.056807627342,0.056807627342,0.0561596315928,0.0593996103386,0.061559596169,0.0626395890843,0.0617755947521,0.0635035834165,0.0641515791656,0.0637195819995,0.0632875848334,0.0632875848334,0.0626395890843,0.061559596169,0.0619915933351,0.0632875848334,0.0622075919182,0.0628555876673,0.0635035834165,0.0645835763317,0.0650155734978,0.0641515791656,0.0650155734978,0.0622075919182,0.0628555876673,0.061559596169,0.0626395890843,0.0619915933351,0.0622075919182,0.0637195819995,0.0632875848334,0.0654475706639,0.0678235550775,0.069983540908,0.0689035479927,0.0684715508266,0.0678235550775,0.0667435621622,0.065663569247,0.0630715862504,0.0641515791656,0.0641515791656,0.0609116004199,0.0604796032538,0.0622075919182,0.0626395890843,0.0641515791656,0.0641515791656,0.0632875848334,0.0624235905012,0.0619915933351,0.0645835763317,0.0654475706639,0.0693355451588,0.0704155380741,0.0712795324063,0.0712795324063,0.0732235196537,0.074519511152,0.0751675069012,0.0753835054842,0.069983540908,0.0717115295724,0.0684715508266,0.0689035479927,0.0684715508266,0.0682555522436,0.0652315720809,0.0630715862504,0.0624235905012,0.0617755947521,0.061343597586,0.0606956018369,0.0609116004199,0.0628555876673,0.0635035834165,0.0632875848334,0.0667435621622,0.0708475352402,0.0747355097351,0.0747355097351,0.0777594898977,0.0777594898977,0.0775434913147,0.0747355097351,0.0784074856469,0.0794874785621,0.0771114941486,0.0775434913147,0.0766794969825,0.078839482813,0.0814314658096,0.0840234488062,0.0872634275519,0.0887754176333,0.0881274218841,0.0905034062977,0.0954713737078,0.096551366623,0.0971993623722,0.103031324115,0.104543314196,0.10627130286,0.106703300026,0.106919298609,0.109727280189,0.107783292942,0.108215290108,0.107783292942,0.10907928444,0.107567294359,0.107783292942,0.11123927027,0.114479249016,0.11685523343,0.118799220677,0.127655162582,0.13175913566,0.141047074731,0.150767010968,0.157894964209,0.165238916033,0.177550835267,0.184678788507,0.201526677985,0.214702591551,0.227662506534,0.252502343585,0.276910183469,0.302830013435,0.336309793808,0.369141578431,0.398733384309,0.438045126424,0.471956903963,0.509540657413,0.543668433535,0.56807627342,0.586220154396,0.60069205946,0.606308022619,0.613003978694,0.617755947521,0.613651974443,0.603716039623,0.581900182735,0.56526829184,0.551660381108,0.534380494464,0.518828596484,0.503708695671,0.484916818946,0.465476946471,0.445605076831,0.426813200105,0.416661266702,0.408885317712,0.386205466492,0.376917527421,0.368709581265,0.360501635109,0.354021677618,0.341493759801,0.335661798059,0.32939783915,0.324645870323,0.312549949672,0.316869921333,0.310821961008,0.303046012018,0.29678205311,0.287278115456,0.290518094201,0.28619812254,0.284470133876,0.284686132459,0.285550126791,0.280150162215,0.28123015513,0.279502166466,0.273670204723,0.275830190554,0.268918235896,0.269566231646,0.267838242981,0.263734269903,0.259846295408,0.257254312412,0.253150339334,0.254446330832,0.256174319496,0.253366337917,0.250558356337,0.251638349252,0.249262364839,0.247750374758,0.244942393178,0.247534376174,0.247750374758,0.238462435686,0.236086451273,0.233494468276,0.233278469693,0.229174496615,0.2280945037,0.224854524954,0.222262541958,0.218590566046,0.210598618473,0.212110608554,0.210814617056,0.208654631226,0.202822669483,0.198718696405,0.196558710575,0.193750728995,0.191590743165,0.188998760168,0.186190778588,0.181654808344,0.175606848019,0.173662860772,0.173446862189,0.170206883443,0.16999088486,0.168046897612,0.168694893361,0.163942924534,0.161566940121,0.158326961375,0.15940695429,0.159622952873,0.156166975545,0.153358993965,0.145367046392,0.140399078982,0.136295105904,0.134135120074,0.133703122908,0.13672710307,0.134783115823,0.130679142745,0.133055127158,0.130679142745,0.132407131409,0.133487124324,0.132407131409,0.130895141328,0.130679142745,0.127871161165,0.125495176752,0.12679116825,0.126143172501,0.126575169667,0.125495176752,0.127007166833,0.125279178169,0.125495176752,0.123335190921,0.121175205091,0.120743207925,0.115991239097,0.112967258935,0.114695247599,0.112967258935,0.109511281606,0.109511281606,0.104975311362,0.104327315613,0.103679319864,0.102167329782,0.100871338284,0.0995753467857,0.0974153609552,0.0969833637891,0.0956873722908,0.0941753822095,0.0952553751247,0.0967673652061,0.0954713737078,0.0928793907112,0.0937433850434,0.0928793907112,0.0898554105485,0.0885594190502,0.0896394119655,0.0872634275519,0.087695424718,0.0848874431384,0.0825114587248,0.0853194403045,0.0851034417214,0.0846714445553,0.0851034417214,0.0851034417214,0.0825114587248,0.0829434558909,0.0812154672265,0.0829434558909,0.0846714445553,0.0840234488062,0.0840234488062,0.0812154672265,0.0812154672265,0.0825114587248,0.083159454474,0.0855354388875,0.0859674360536,0.0844554459723,0.0838074502231,0.0863994332197,0.0842394473892,0.0846714445553,0.0827274573079,0.0829434558909,0.0816474643926,0.079055481396,0.0797034771452,0.0764634983995,0.0740875139859,0.0708475352402,0.0730075210707,0.0749515083181,0.0777594898977,0.0753835054842,0.0779754884808,0.0779754884808,0.0751675069012,0.079055481396,0.0803514728943,0.0781914870638,0.0768954955655,0.0734395182368,0.0717115295724,0.0717115295724,0.0693355451588,0.0693355451588,0.0680395536605,0.0667435621622,0.0689035479927,0.0684715508266,0.070199539491,0.0714955309893,0.0704155380741,0.0684715508266,0.0689035479927,0.069983540908,0.0719275281554,0.0732235196537,0.0734395182368,0.0760315012334,0.0753835054842,0.0764634983995,0.0771114941486,0.0786234842299,0.0794874785621,0.0792714799791,0.0771114941486,0.0775434913147,0.0749515083181,0.0727915224876,0.0730075210707,0.0727915224876,0.0730075210707,0.0727915224876,0.0714955309893,0.0734395182368,0.0738715154029,0.0691195465758,0.0704155380741,0.0708475352402,0.0682555522436,0.0676075564944,0.0680395536605,0.0680395536605,0.0676075564944,0.0665275635792,0.0660955664131,0.0684715508266,0.0673915579114,0.0669595607453,0.0676075564944,0.0652315720809,0.0652315720809,0.0645835763317,0.0645835763317,0.0622075919182,0.0645835763317,0.0647995749148,0.0645835763317,0.0652315720809,0.0630715862504,0.0635035834165,0.061127599003,0.0606956018369,0.0593996103386,0.0596156089216,0.0591836117555,0.0576716216742,0.0578876202572,0.057023625925,0.0606956018369,0.0630715862504,0.0654475706639,0.0673915579114,0.0695515437419,0.0719275281554,0.0721435267385,0.0738715154029,0.074303512569,0.0747355097351,0.0719275281554,0.0749515083181,0.0710635338232,0.0706315366571,0.070199539491,0.0684715508266,0.0652315720809,0.0635035834165,0.0626395890843,0.0624235905012,0.0622075919182,0.0589676131725,0.061343597586,0.0602636046708,0.0604796032538,0.0585356160064,0.0606956018369,0.0606956018369,0.0598316075047,0.0587516145894,0.0606956018369,0.0589676131725,0.0578876202572,0.0559436330098,0.0557276344267,0.0550796386776,0.0555116358437,0.0533516500132,0.0546476415115,0.0544316429284,0.052703654264,0.0529196528471,0.0529196528471,0.0555116358437,0.0555116358437,0.0548636400945,0.0520556585149,0.0546476415115,0.0535676485962,0.0546476415115,0.0565916287589,0.0548636400945,0.0574556230911,0.0552956372606,0.0509756655996,0.0537836471793,0.0546476415115,0.0522716570979,0.0511916641827,0.0503276698505,0.0470876911047,0.0485996811861,0.0462236967725,0.0468716925217,0.0488156797691,0.0475196882708,0.0490316783522,0.0496796741013,0.0507596670166,0.0505436684335,0.0514076627657,0.0507596670166,0.0509756655996,0.0503276698505,0.0503276698505,0.0507596670166,0.0503276698505,0.0511916641827,0.0507596670166,0.0498956726844,0.0485996811861,0.04816768402,0.0496796741013,0.0492476769352,0.0501116712674,0.0485996811861,0.0475196882708,0.0468716925217,0.0460076981895,0.0475196882708,0.04816768402,0.0479516854369,0.0460076981895,0.0477356868539,0.0477356868539,0.0475196882708,0.0470876911047,0.0453597024404,0.0466556939386,0.0466556939386,0.0490316783522,0.0503276698505,0.0475196882708,0.0457916996065,0.048383682603,0.0477356868539,0.048383682603,0.0501116712674,0.04816768402,0.0473036896878,0.0451437038573,0.0434157151929,0.0457916996065,0.048383682603,0.0447117066912,0.0444957081082,0.0464396953556,0.0451437038573,0.0466556939386,0.0460076981895,0.0455757010234,0.0462236967725,0.0468716925217,0.0460076981895,0.0473036896878,0.0503276698505,0.0494636755183,0.0516236613488,0.0498956726844,0.0507596670166,0.0505436684335,0.0511916641827,0.0516236613488,0.0490316783522,0.0468716925217,0.0475196882708,0.0475196882708,0.0473036896878,0.048383682603,0.04816768402,0.0485996811861,0.0475196882708,0.0464396953556,0.0475196882708,0.0496796741013,0.0485996811861,0.0466556939386,0.0449277052743,0.0455757010234,0.0440637109421,0.0447117066912,0.0455757010234,0.0440637109421,0.043631713776,0.0429837180268,0.0416877265285,0.0434157151929,0.0449277052743,0.0447117066912,0.0464396953556,0.0464396953556,0.0492476769352,0.0507596670166,0.0522716570979,0.0516236613488,0.0531356514301,0.0518396599318,0.0503276698505,0.0509756655996,0.0509756655996,0.052487655681,0.0514076627657,0.0542156443454,0.0544316429284,0.0552956372606,0.0546476415115,0.0542156443454,0.0535676485962,0.052703654264,0.052703654264,0.0514076627657,0.0498956726844,0.0462236967725,0.0444957081082,0.0447117066912,0.0421197236946,0.0425517208607,0.0440637109421,0.0429837180268,0.0429837180268,0.0429837180268,0.0434157151929,0.0434157151929,0.0447117066912,0.0462236967725,0.0475196882708,0.048383682603,0.0464396953556,0.0479516854369,0.0477356868539,0.04816768402,0.0475196882708,0.0477356868539,0.04816768402,0.04816768402,0.0488156797691,0.0473036896878,0.0505436684335,0.0503276698505,0.0509756655996,0.0507596670166,0.0511916641827,0.0518396599318,0.0533516500132,0.0516236613488,0.0531356514301,0.0537836471793,0.0522716570979,0.0522716570979,0.0509756655996,0.0490316783522,0.048383682603,0.0492476769352,0.0449277052743,0.0444957081082,0.0427677194438,0.0421197236946,0.0414717279455,0.0427677194438,0.0431997166099,0.0434157151929,0.0453597024404,0.0431997166099,0.0449277052743,0.0444957081082,0.0451437038573,0.0468716925217,0.0475196882708,0.0462236967725,0.0460076981895,0.048383682603,0.0466556939386,0.0492476769352,0.0494636755183,0.0516236613488,0.0531356514301,0.0511916641827,0.0516236613488,0.0514076627657,0.0533516500132,0.0529196528471,0.0535676485962,0.0522716570979,0.0516236613488,0.0496796741013,0.0492476769352,0.0498956726844,0.0503276698505,0.0514076627657,0.0501116712674,0.0507596670166,0.0518396599318,0.0516236613488,0.0529196528471,0.0537836471793,0.0520556585149,0.0531356514301,0.052487655681,0.0501116712674,0.0490316783522,0.0470876911047,0.0466556939386,0.0479516854369,0.0468716925217,0.0457916996065,0.0455757010234,0.0464396953556,0.0477356868539,0.0475196882708,0.0468716925217,0.0466556939386,0.0464396953556,0.0453597024404,0.0451437038573,0.0464396953556,0.0449277052743,0.0440637109421,0.0440637109421,0.0447117066912,0.0466556939386,0.04816768402,0.0475196882708,0.0466556939386,0.0470876911047,0.0477356868539,0.0490316783522,0.0492476769352,0.0494636755183,0.0488156797691,0.0468716925217,0.0468716925217,0.04816768402,0.0488156797691,0.0488156797691,0.0479516854369,0.0466556939386,0.0449277052743,0.0416877265285,0.0431997166099,0.0427677194438,0.0423357222777,0.0414717279455,0.0416877265285,0.0419037251116,0.0416877265285,0.0434157151929,0.0451437038573,0.0464396953556,0.0466556939386,0.0477356868539,0.0488156797691,0.0477356868539,0.0427677194438,0.0382317491997,0.0332637817896,0.0285118129625,0.0)
ycorr <- c(2.34313232083e-05,2.31735239167e-05,2.23909696298e-05,2.10848685384e-05,1.92647097808e-05,1.69457491565e-05,1.41497465351e-05,1.120003519e-05,8.12102870464e-06,4.93659094896e-06,1.67105716414e-06,-1.63871798855e-06,-4.95251145551e-06,-8.23034249849e-06,-1.14379134222e-05,-1.45540194968e-05,-1.75656913686e-05,-2.04624413162e-05,-2.32397213306e-05,-2.58877474328e-05,-2.83994844123e-05,-3.07761524944e-05,-3.30359013407e-05,-3.52033445141e-05,-3.72857207695e-05,-3.92974208367e-05,-4.1253034472e-05,-4.31612153412e-05,-4.50291211442e-05,-4.68612186842e-05,-4.86698115957e-05,-5.04652730023e-05,-5.22516539104e-05,-5.40211769361e-05,-5.57793664062e-05,-5.75305222166e-05,-5.92671114606e-05,-6.09834646458e-05,-6.26756051459e-05,-6.43487655389e-05,-6.60044789e-05,-6.76428853073e-05,-6.9264960737e-05,-7.08675691293e-05,-7.24497020688e-05,-7.40047366019e-05,-7.55318796381e-05,-7.70355171354e-05,-7.85194812768e-05,-7.99826335363e-05,-8.14212749445e-05,-8.28341139e-05,-8.4217395796e-05,-8.55692808677e-05,-8.68920966008e-05,-8.81921209347e-05,-8.94715565759e-05,-9.07340487347e-05,-9.19810026662e-05,-9.32094900603e-05,-9.44283800854e-05,-9.56362546252e-05,-9.68367546203e-05,-9.80317943421e-05,-9.92298934647e-05,-0.000100429144925,-0.000101622936344,-0.000102806669988,-0.000103978519453,-0.000105139841552,-0.000106286771069,-0.000107415536509,-0.00010852488217,-0.000109612451852,-0.000110672768375,-0.000111693860529,-0.000112683041386,-0.000113646535904,-0.000114588194669,-0.000115508384195,-0.000116406876792,-0.000117291570481,-0.000118159797182,-0.000119015937471,-0.000119861170557,-0.000120700399969,-0.000121534455397,-0.000122356352734,-0.000123163088976,-0.000123952132808,-0.000124722577743,-0.000125472321924,-0.000126198207677,-0.000126900475442,-0.000127574923371,-0.000128220508569,-0.000128835764034,-0.000129424163271,-0.000129987621294,-0.000130526911328,-0.000131039521092,-0.000131522954054,-0.000131975954715,-0.000132398204645,-0.00013278996606,-0.000133156683478,-0.000133503318765,-0.000133830238224,-0.000134135913098,-0.000134422239669,-0.000134687913027,-0.000134939024354,-0.000135181576864,-0.000135420134338,-0.00013565713462,-0.000135895047887,-0.000136131731514,-0.000136364439321,-0.000136596772504,-0.000136832202699,-0.000137071863088,-0.000137315825814,-0.000137562968485,-0.000137807320499,-0.000138046171212,-0.000138274554154,-0.000138486446012,-0.000138682542433,-0.000138858356794,-0.000139008562132,-0.000139133782648,-0.000139230091299,-0.000139295980434,-0.000139331750615,-0.000139336377922,-0.000139310814353,-0.000139259054797,-0.000139182527687,-0.000139080574933,-0.000138959249253,-0.000138819295272,-0.000138659079094,-0.000138482787332,-0.000138294210926,-0.000138096003722,-0.000137896882024,-0.000137699523091,-0.000137508035246,-0.000137330551129,-0.000137168622807,-0.000137024691071,-0.0001369064329,-0.000136818982419,-0.000136763974966,-0.000136746559019,-0.000136764589654,-0.000136817398429,-0.000136905953931,-0.000137028118046,-0.000137181323163,-0.000137365973709,-0.000137578921394,-0.000137813146974,-0.000138063991168,-0.000138327266823,-0.000138600328652,-0.000138882236764,-0.000139170190046,-0.000139461443327,-0.000139752774459,-0.000140043247012,-0.000140332037132,-0.000140619189445,-0.000140906805934,-0.000141193043085,-0.000141477208358,-0.000141756545258,-0.000142031592559,-0.000142297261908,-0.0001425510099,-0.00014279072878,-0.000143015581722,-0.000143219669994,-0.000143400850844,-0.000143559980024,-0.000143695759752,-0.000143809879084,-0.00014390389149,-0.000143984806835,-0.000144065159662,-0.000144153963997,-0.000144259172293,-0.000144391170913,-0.000144558937819,-0.000144769396316,-0.000145030982283,-0.00014534954213,-0.00014572560771,-0.00014615777909,-0.000146636222776,-0.000147153152934,-0.000147699747543,-0.00014826959273,-0.000148852546649,-0.000149438969676,-0.000150019440619,-0.000150584265155,-0.000151125772699,-0.000151642683314,-0.000152133336896,-0.000152594007688,-0.000153019623916,-0.000153408717571,-0.00015376124918,-0.000154076254653,-0.000154355524969,-0.000154600514239,-0.000154811515175,-0.000154988273074,-0.000155128673299,-0.000155234152454,-0.000155310186113,-0.000155361883708,-0.000155391771654,-0.000155400624223,-0.000155391437965,-0.000155366967232,-0.000155330601924,-0.00015528715946,-0.000155242741036,-0.000155202266232,-0.000155170627265,-0.000155149597545,-0.000155143032609,-0.000155152996992,-0.000155178690803,-0.000155220605863,-0.000155281248461,-0.000155356497635,-0.000155443397485,-0.000155541358002,-0.000155647176817,-0.000155756546115,-0.00015586601095,-0.000155973192791,-0.000156079055456,-0.000156187392535,-0.000156295944764,-0.000156403615658,-0.00015651160503,-0.00015661827315,-0.000156722156643,-0.000156822280731,-0.000156915663071,-0.000157004126712,-0.000157083323954,-0.000157145351414,-0.00015718573783,-0.000157200366087,-0.000157186658328,-0.00015714481701,-0.000157072486762,-0.000156968055364,-0.000156834661134,-0.000156677032384,-0.000156494946257,-0.000156294332328,-0.00015608179328,-0.000155867422401,-0.000155658473856,-0.000155459306016,-0.000155275973905,-0.000155117031558,-0.000154989880835,-0.000154894749571,-0.0001548361396,-0.000154816806433,-0.000154840383911,-0.000154905748293,-0.00015501240734,-0.000155156457018,-0.000155338809687,-0.000155557098961,-0.000155804890559,-0.000156074610417,-0.000156364002283,-0.000156667802359,-0.000156980086627,-0.000157293363804,-0.000157604063468,-0.000157906800919,-0.000158198098898,-0.000158471573353,-0.000158721178595,-0.000158947049809,-0.000159150032268,-0.000159328796558,-0.000159481103073,-0.000159610743271,-0.000159715203116,-0.000159797343873,-0.000159856428359,-0.000159896789505,-0.000159923580743,-0.000159942670191,-0.000159952797151,-0.000159956265294,-0.000159953882947,-0.000159945567867,-0.000159932411761,-0.000159916803808,-0.000159897806727,-0.000159872386459,-0.000159834358291,-0.000159777621696,-0.000159699729679,-0.000159597367926,-0.000159469044109,-0.000159315772282,-0.000159133993138,-0.000158922086655,-0.000158678790138,-0.000158401787753,-0.000158097467914,-0.000157770001231,-0.000157420485351,-0.000157051616934,-0.000156668004972,-0.000156268314459,-0.000155856823335,-0.00015543704759,-0.000155011669926,-0.000154587117062,-0.000154167666686,-0.000153753571958,-0.000153349735972,-0.000152959939234,-0.000152584811753,-0.000152226469228,-0.000151886835702,-0.000151565212337,-0.000151262760351,-0.000150976721265,-0.000150703028956,-0.000150441729529,-0.000150189895888,-0.00014994282397,-0.000149697292119,-0.000149449380365,-0.000149197330363,-0.000148942610121,-0.000148681495079,-0.00014841679596,-0.0001481509215,-0.000147885286325,-0.000147619078295,-0.000147354104197,-0.000147095713069,-0.00014684953729,-0.000146618678399,-0.000146400509679,-0.000146196651068,-0.000146006476608,-0.000145824612333,-0.000145648728795,-0.000145477599558,-0.00014531166783,-0.000145146062322,-0.000144975027163,-0.000144792957606,-0.000144594669675,-0.000144378395811,-0.000144140706107,-0.000143879969266,-0.000143596138004,-0.000143287124173,-0.000142948481343,-0.000142576611603,-0.000142171266333,-0.000141732829486,-0.000141265032233,-0.000140775386589,-0.000140264779316,-0.000139734163709,-0.000139189676289,-0.000138633271689,-0.000138070438551,-0.000137508816676,-0.000136953069161,-0.000136408089067,-0.000135876811436,-0.000135356791247,-0.000134848260772,-0.000134357904619,-0.00013388158849,-0.000133417070273,-0.000132963346842,-0.000132515100485,-0.000132071571926,-0.000131630423731,-0.000131190897352,-0.000130747889889,-0.00013029930832,-0.000129842795503,-0.000129376394592,-0.000128906805802,-0.000128434227583,-0.000127963089948,-0.000127492625259,-0.000127021427897,-0.00012654972318,-0.000126077898356,-0.000125612960013,-0.000125155238134,-0.000124702143823,-0.000124247825384,-0.000123786486428,-0.000123313389286,-0.000122824837048,-0.000122319686169,-0.000121791206107,-0.000121236888351,-0.000120649560105,-0.000120022990826,-0.000119356688146,-0.00011865143296,-0.000117911316902,-0.000117137454463,-0.000116333101533,-0.000115503935236,-0.000114654865893,-0.000113793986288,-0.000112926872608,-0.000112061517567,-0.000111203547839,-0.000110358963747,-0.000109534196443,-0.000108735914299,-0.000107970986015,-0.000107242965636,-0.00010655796741,-0.000105920200185,-0.000105333530806,-0.000104802315706,-0.0001043282784,-0.000103914474263,-0.000103561011219,-0.000103265088128,-0.000103024188697,-0.000102832908614,-0.000102685574684,-0.000102571539489,-0.000102483939526,-0.000102410612576,-0.000102343217409,-0.000102272904362,-0.000102187927486,-0.000102078079409,-0.000101931854356,-0.000101740637139,-0.000101497062881,-0.000101197724651,-0.000100839379102,-0.000100419994014,-9.99433595603e-05,-9.94056841087e-05,-9.88093324218e-05,-9.81596065385e-05,-9.74651378911e-05,-9.67344693474e-05,-9.59746339011e-05,-9.51966736801e-05,-9.44086537328e-05,-9.36197674833e-05,-9.28353492011e-05,-9.20654365716e-05,-9.13173143909e-05,-9.05958548738e-05,-8.99035262589e-05,-8.92402946243e-05,-8.86083783197e-05,-8.80084328943e-05,-8.74356464726e-05,-8.68860522592e-05,-8.63536443939e-05,-8.58353666963e-05,-8.5326692325e-05,-8.48278538603e-05,-8.43345464401e-05,-8.38457277676e-05,-8.33595764544e-05,-8.28691240238e-05,-8.23728884807e-05,-8.18742027263e-05,-8.13758003108e-05,-8.08770947826e-05,-8.03791710013e-05,-7.98770167349e-05,-7.93687953046e-05,-7.88566212512e-05,-7.83373942347e-05,-7.78116037682e-05,-7.72818323866e-05,-7.6745222549e-05,-7.61972064134e-05,-7.56360234498e-05,-7.50595686054e-05,-7.44667208528e-05,-7.38596763813e-05,-7.3234265274e-05,-7.25917430081e-05,-7.19333087817e-05,-7.12578308995e-05,-7.05650286974e-05,-6.98549886309e-05,-6.91287511469e-05,-6.83865251301e-05,-6.76318697519e-05,-6.68642881363e-05,-6.608532132e-05,-6.52968116253e-05,-6.44976273537e-05,-6.36902233984e-05,-6.2878030673e-05,-6.20643295406e-05,-6.1253589016e-05,-6.04517400145e-05,-5.96627001746e-05,-5.88904647122e-05,-5.81394329597e-05,-5.74115601499e-05,-5.67114051628e-05,-5.60384825078e-05,-5.53906932703e-05,-5.47676118522e-05,-5.41663195306e-05,-5.3579424571e-05,-5.29997257866e-05,-5.24190466529e-05,-5.18302775312e-05,-5.12297968331e-05,-5.06135977681e-05,-4.99788699143e-05,-4.93247141765e-05,-4.86533909155e-05,-4.79647371981e-05,-4.72625561254e-05,-4.65513326555e-05,-4.58376584929e-05,-4.51285988406e-05,-4.44265577705e-05,-4.37328299967e-05,-4.30500102085e-05,-4.23787657221e-05,-4.1718467375e-05,-4.10660117862e-05,-4.04167803141e-05,-3.97662242176e-05,-3.91095007668e-05,-3.84365498375e-05,-3.77396595833e-05,-3.70110318068e-05,-3.62418493698e-05,-3.54225343271e-05,-3.45446726802e-05,-3.36031111822e-05,-3.25918224672e-05,-3.15056063754e-05,-3.0341581645e-05,-2.90997484354e-05,-2.77794896531e-05,-2.6382217345e-05,-2.49097911055e-05,-2.33653649944e-05,-2.17497091334e-05,-2.00612148644e-05,-1.83003760879e-05,-1.64662614958e-05,-1.45559310632e-05,-1.25637964463e-05,-1.04852817301e-05,-8.31439780821e-06,-6.04297200901e-06,-3.66156852594e-06,-1.16245303618e-06,1.46063121385e-06,4.2122589974e-06,7.10113903651e-06,1.01305053453e-05,1.33054211836e-05,1.66342157109e-05,2.01287188524e-05,2.37978816488e-05,2.76497995686e-05,3.17093913615e-05,3.58955699236e-05,4.02406326471e-05,4.475947412e-05,4.94697366255e-05,5.4396155036e-05,5.95616205858e-05,6.49864852461e-05,7.06920962746e-05,7.67033725543e-05,8.30543871281e-05,8.97606671514e-05,9.69523257686e-05,0.000104651219992,0.000112897359775,0.000121730477426,0.000131190948514,0.000141318144609,0.000152150610021,0.000163726581556,0.000176078320668,0.000189227093948,0.000203191484695,0.000217973946086,0.000233567329566,0.000249955052801,0.000267105443562,0.00028496846755,0.00030347840609,0.000322553458389,0.000342093912847,0.000361982869195,0.000382090059466,0.00040227306883,0.000422387871615,0.000442278727563,0.000461785147224,0.000480754360581,0.000499042375251,0.000516517445453,0.0005330609168,0.000548576688212,0.000562986184281,0.000576234357117,0.00058828477739,0.000599120540465,0.000608752260091,0.000617208406961,0.000624531238712,0.000630774842837,0.000636004917347,0.000640295076615,0.000643719019974,0.000646360750453,0.00064830142357,0.000649622791177,0.00065040076087,0.000650707065247,0.00065061279918,0.000650181058221,0.000649473549002,0.000648542431518,0.000647442333805,0.000646220433328,0.000644915853801,0.000643565267233,0.00064220224606,0.000640856272589,0.000639547670922,0.000638296099593,0.000637111343555,0.000636003255135,0.000634975905629,0.000634025023978,0.000633147081229,0.000632333959996,0.000631576297764,0.000630858607262,0.000630166481386,0.000629483204589,0.000628796499438,0.000628094987162,0.000627361872142,0.00062658474413,0.000625748844817,0.000624844521544,0.000623861000193,0.000622786518024,0.000621613077275,0.000620333235108,0.000618937030959,0.000617406519342,0.000615732156793,0.000613902805939,0.000611910202576,0.000609747080847,0.000607402681337,0.000604871627625,0.000602147948074,0.000599228785572,0.000596113041058,0.000592809172487,0.000589328187748,0.000585681064842,0.000581878862307,0.000577932239967,0.000573852738603,0.000569653925805,0.000565351142398,0.000560956624156,0.000556481704002,0.000551937618027,0.000547327951654,0.000542654983534,0.000537922993619,0.000533134924881,0.0005282988227,0.000523422208964,0.000518507050785,0.000513555310536,0.00050857509861,0.000503569763818,0.000498545992965,0.000493514291043,0.000488485570356,0.000483470213359,0.000478472797338,0.000473497070625,0.000468546333212,0.00046363008449,0.000458754359583,0.000453924218308,0.000449144045277,0.000444415580944,0.00043973948289,0.000435114404222,0.000430540658714,0.000426024640728,0.000421569911519,0.000417178635388,0.000412846723956,0.000408572439994,0.000404350604791,0.000400178994152,0.000396053918658,0.000391968824249,0.000387920306702,0.000383896113454,0.000379884519413,0.000375871307053,0.000371845854705,0.000367797549231,0.000363717105964,0.00035959537387,0.000355422418409,0.000351192782073,0.000346898885934,0.000342536809389,0.000338107943811,0.000333612646534,0.000329058050782,0.000324450695297,0.00031979771115,0.00031510527801,0.000310382163953,0.000305636065756,0.000300874074494,0.000296108050106,0.00029134625442,0.000286597762016,0.000281869357895,0.000277160804498,0.000272479812531,0.000267833563037,0.000263226392894,0.000258665973623,0.00025416073043,0.000249713133261,0.000245326518627,0.000241004853051,0.000236750380007,0.000232572596954,0.000228473203982,0.000224451159414,0.000220507912203,0.00021664188121,0.000212850856536,0.000209130501644,0.000205478608015,0.000201895128318,0.000198373629541,0.000194909984841,0.000191501275356,0.00018814673132,0.000184843086893,0.000181588610049,0.000178383567404,0.000175226715063,0.000172122102166,0.000169070463196,0.000166072395013,0.000163127606071,0.000160231404768,0.000157376648741,0.000154560116649,0.00015177491309,0.000149012447125,0.000146266936011,0.000143528611728,0.000140785816784,0.000138030740021,0.000135253339979,0.000132452900129,0.000129631650906,0.000126792348667,0.00012393977516,0.000121084725569,0.000118234448799,0.000115394791835,0.000112574538745,0.000109782486697,0.000107030137293,0.000104325670318,0.000101671157935,9.9069088251e-05,9.65192448019e-05,9.4017816536e-05,9.15604948762e-05,8.91468818119e-05,8.67752323202e-05,8.444585461e-05,8.21566503317e-05,7.99029594593e-05,7.7685966107e-05,7.55050887531e-05,7.33629450259e-05,7.12647274381e-05,6.92153268466e-05,6.72190078142e-05,6.52785546941e-05,6.3397135238e-05,6.15779266805e-05,5.98251835636e-05,5.81384065922e-05,5.65179711383e-05,5.49613358866e-05,5.34589401464e-05,5.20050243401e-05,5.05919212454e-05,4.92099131107e-05,4.78500919736e-05,4.65022424546e-05,4.51543170718e-05,4.37995749999e-05,4.2431448516e-05,4.10432953401e-05,3.96334476881e-05,3.82017643435e-05,3.67462932598e-05,3.52693840605e-05,3.37693136129e-05,3.22499852748e-05,3.07132236587e-05,2.91629347382e-05,2.7597699305e-05,2.60211328834e-05,2.44363658217e-05,2.28442762216e-05,2.12480226024e-05,1.96478515791e-05,1.80473723975e-05,1.64485784382e-05,1.48535168628e-05,1.32644968581e-05,1.16840910471e-05,1.01163297862e-05,8.56305914699e-06,7.02651744695e-06,5.50720718481e-06,4.00651285657e-06,2.52705951793e-06,1.06826244153e-06,-3.65515965531e-07,-1.77524694425e-06,-3.15650929381e-06,-4.50875915456e-06,-5.83237572067e-06,-7.1268687578e-06,-8.390535353e-06,-9.61940134881e-06,-1.08101812937e-05,-1.19581208544e-05,-1.30598127899e-05,-1.41135611362e-05,-1.51161133588e-05,-1.60646880104e-05,-1.69558707608e-05,-1.77873513703e-05,-1.85605032784e-05,-1.92770927959e-05,-1.99406992701e-05,-2.05607017757e-05,-2.11519931737e-05,-2.17216282922e-05,-2.22828592407e-05,-2.28520316121e-05,-2.34471456587e-05,-2.4082708928e-05,-2.47724295108e-05,-2.55276722922e-05,-2.63609944486e-05,-2.7283377358e-05,-2.82946959498e-05,-2.9395815145e-05,-3.05904960453e-05,-3.18740276541e-05,-3.32398066941e-05,-3.46801427605e-05,-3.61888430892e-05,-3.77571387742e-05,-3.93791969545e-05,-4.1044044582e-05,-4.2739890467e-05,-4.44657472466e-05,-4.62144474468e-05,-4.79808638656e-05,-4.97597270268e-05,-5.15482132562e-05,-5.33412696516e-05,-5.51368157704e-05,-5.69323679711e-05,-5.87188837423e-05,-6.05013679926e-05,-6.22768687733e-05,-6.40384526048e-05,-6.57826242501e-05,-6.75042954817e-05,-6.92023836966e-05,-7.08742211764e-05,-7.25185482817e-05,-7.41317409139e-05,-7.57163996977e-05,-7.72714407115e-05,-7.87930105027e-05,-8.02837317287e-05,-8.17451341603e-05,-8.31803021929e-05,-8.45923823048e-05,-8.59829251542e-05,-8.73556778745e-05,-8.87124809068e-05,-9.00610403155e-05,-9.14014857526e-05,-9.27379174944e-05,-9.40717377163e-05,-9.54053853728e-05,-9.6742594052e-05,-9.80836766471e-05,-9.94296518109e-05,-0.000100778692369,-0.000102129379897,-0.000103477575018,-0.000104820309126,-0.000106158823474,-0.000107492661326,-0.000108822352064,-0.000110146688444,-0.000111463358107,-0.000112772766261,-0.000114076898678,-0.000115378747863,-0.000116677419468,-0.000117978922614,-0.000119278932985,-0.000120576503509,-0.000121870283005,-0.000123159136388,-0.000124443157987,-0.000125720364044,-0.000126986730809,-0.000128238348386,-0.000129473322266,-0.000130688150763,-0.000131878222316,-0.000133047029269,-0.000134193219197,-0.000135316478406,-0.000136413386371,-0.00013748080483,-0.00013851583063,-0.00013951899638,-0.000140491246209,-0.000141429531103,-0.000142336824438,-0.000143210215076,-0.000144045573441,-0.000144840758067,-0.000145596274168,-0.000146313703018,-0.000146999564009,-0.000147656825105,-0.000148285741577,-0.000148887423162,-0.000149465350943,-0.000150020608717,-0.000150558296439,-0.000151078958837,-0.000151584912328,-0.000152077125587,-0.00015255544839,-0.000153016269365,-0.000153459339182,-0.000153886433216,-0.000154295692173,-0.000154685903777,-0.000155057059626,-0.000155409025929,-0.000155746218833,-0.000156069105677,-0.000156379076794,-0.00015667893902,-0.000156972109165,-0.000157262465027,-0.000157553967023,-0.000157852825854,-0.000158162586822,-0.000158488126201,-0.000158831450924,-0.000159194708062,-0.000159576217512,-0.000159978192292,-0.000160398879205,-0.000160834040674,-0.000161282174975,-0.000161736449482,-0.000162191105123,-0.000162638935205,-0.000163071877608,-0.000163486246645,-0.000163878367508,-0.00016424475668,-0.000164583038759,-0.000164894819655,-0.000165178265782,-0.000165432885038,-0.000165659872893,-0.000165863564342,-0.000166050115975,-0.000166221730152,-0.000166380032671,-0.000166523976685,-0.000166657487257,-0.000166777161613,-0.000166880496489,-0.00016697041191,-0.000167048115812,-0.000167113411754,-0.000167163053277,-0.000167195699781,-0.000167214594983,-0.00016722483655,-0.000167225907236,-0.000167220284491,-0.000167213823688,-0.000167208513448,-0.000167204953726,-0.000167205830707,-0.000167213206186,-0.000167228550462,-0.000167252267826,-0.000167282418739,-0.000167318253626,-0.000167364247693,-0.000167420623114,-0.000167489250742,-0.000167572590186,-0.000167672084658,-0.00016778888317,-0.000167929054623,-0.000168093357392,-0.000168283360846,-0.000168501038852,-0.000168744399449,-0.000169011997896,-0.000169299928763,-0.000169603733204,-0.000169919085593,-0.000170239458779,-0.000170555987894,-0.00017086173819,-0.000171150708882,-0.000171418567453,-0.000171658773571,-0.000171868125259,-0.000172045240837,-0.000172189861102,-0.000172302678048,-0.000172386720813,-0.000172445671225,-0.000172483491988,-0.000172503415356,-0.000172510362895,-0.000172508876057,-0.000172502835186,-0.000172495312138,-0.000172489755876,-0.000172489653923,-0.000172497674424,-0.000172515096911,-0.000172545560589,-0.000172591160953,-0.000172652407372,-0.000172732814752,-0.000172833633036,-0.000172955450194,-0.000173099709548,-0.000173263800312,-0.000173446837084,-0.000173649207753,-0.000173867415893,-0.000174100766943,-0.000174346325784,-0.000174597500314,-0.000174848454354,-0.000175093361026,-0.000175326435529,-0.000175544925683,-0.00017574372947,-0.000175917025052,-0.000176060621229,-0.000176170689112,-0.000176242101637,-0.000176276077427,-0.000176275333019,-0.000176243037887,-0.000176179765777,-0.000176089021571,-0.000175969926188,-0.000175827620878,-0.000175667585088,-0.000175491057049,-0.000175303086232,-0.000175106545046,-0.000174900913771,-0.000174687165955,-0.000174466967402,-0.000174242095851,-0.00017401521782,-0.000173784094333,-0.000173547576853,-0.000173303090902,-0.000173053342117,-0.00017279735688,-0.000172538741832,-0.00017227788118,-0.000172017808773,-0.000171756693768,-0.000171499231047,-0.000171248852618,-0.000171011702649,-0.000170794999311,-0.000170604153957,-0.000170440909986,-0.000170307246087,-0.000170203447437,-0.000170129288127,-0.000170083480411,-0.000170065090762,-0.000170071107314,-0.000170093839266,-0.0001701287294,-0.000170166663578,-0.0001702035213,-0.00017023119503,-0.000170248130833,-0.000170250115134,-0.000170236212225,-0.000170204036131,-0.000170152910021,-0.000170083615574,-0.000169999467467,-0.000169900161052,-0.000169784948675,-0.000169659086932,-0.000169522353759,-0.000169377027744,-0.000169224970599,-0.000169068621701,-0.000168908327846,-0.000168744804933,-0.000168578035915,-0.000168409353917,-0.000168245478752,-0.000168088413804,-0.000167937178088,-0.00016779654855,-0.000167667297505,-0.000167546491338,-0.000167435472154,-0.000167336321481,-0.000167248029874,-0.000167173836074,-0.00016711817912,-0.000167075738707,-0.000167048731748,-0.000167036515269)
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(51, 459, 500, 561)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('test_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) : 51,459,500,561',bty='n')
dev.off()