# R script for Peak Model
#  -- generated by MACS
p <- c(0.01972199917,0.0230138976901,0.0266291076721,0.0294213430241,0.0323017542292,0.0323017542292,0.0325368898378,0.033036553006,0.0325662817889,0.0323899300824,0.0323017542292,0.0322723622781,0.0322429703271,0.0328014173974,0.0334480403211,0.0335362161743,0.0332716886146,0.0328308093485,0.0331835127614,0.03341864837,0.0335068242232,0.0338889195871,0.0340358793425,0.0338007437339,0.0338007437339,0.0336243920275,0.0339770954404,0.034623718364,0.0350939895811,0.0347706781193,0.0349764217768,0.0351821654344,0.0351527734833,0.035858180309,0.0362696676241,0.0368281146944,0.0369162905477,0.0368575066455,0.037063250303,0.0376216973734,0.0378274410309,0.0374159537159,0.0373865617648,0.0365341951837,0.037063250303,0.0369750744498,0.0372396020095,0.0375923054223,0.0377980490799,0.0377098732266,0.0384446720035,0.038268320297,0.038238928346,0.0389737271228,0.0377686571288,0.0379156168841,0.0369750744498,0.0364166273794,0.0360639239665,0.0359169642112,0.0349764217768,0.0354173010429,0.0356524366515,0.0352703412876,0.0355936527494,0.0353585171408,0.0366223710369,0.0372102100584,0.0374159537159,0.0374747376181,0.0378862249331,0.0383858881013,0.038238928346,0.0387091995631,0.0393558224867,0.0396203500464,0.0388855512696,0.039061902976,0.0393558224867,0.0393558224867,0.0394146063889,0.0392382546824,0.0396497419975,0.0397967017528,0.039855485655,0.0402375810189,0.0407372441872,0.0406490683339,0.0412662993065,0.0417953544258,0.0416777866215,0.0410311636979,0.0410899476,0.0414426510129,0.0411193395511,0.0412075154043,0.0413544751597,0.0415896107683,0.0412956912575,0.0414426510129,0.0419423141811,0.0425007612515,0.0427652888112,0.0428534646644,0.043500087588,0.0437646151477,0.0436176553923,0.0433237358816,0.042706504909,0.0429122485666,0.0434119117348,0.0433237358816,0.0431767761262,0.0435882634412,0.0435882634412,0.043088600273,0.043088600273,0.0431473841751,0.0442054944138,0.0439997507563,0.0434119117348,0.043911574903,0.0441467105116,0.0436470473434,0.0437352231966,0.0441173185605,0.0450284690438,0.045498740261,0.0453223885545,0.0457044839185,0.0459984034292,0.0468213780593,0.047526784885,0.0475561768361,0.0481146239065,0.0486730709769,0.0477619204936,0.0479970561022,0.0485848951236,0.0487612468301,0.0492315180472,0.049525437558,0.0490845582919,0.0490845582919,0.0485261112215,0.0479676641511,0.0485555031726,0.0489375985365,0.0484379353683,0.0487024629279,0.0490551663408,0.0487612468301,0.0489375985365,0.0500838846284,0.0506717236498,0.0514946982799,0.0516416580352,0.0512007787691,0.0513183465734,0.0509656431606,0.050759899503,0.0511126029159,0.0519061855949,0.0517886177906,0.0517592258395,0.0523176729099,0.0519061855949,0.0525822004696,0.052758552176,0.0536990946103,0.0543163255829,0.0543163255829,0.0538460543657,0.0538460543657,0.0548453807022,0.0541399738764,0.0552274760661,0.0549629485065,0.0556389633812,0.0556977472833,0.0549335565554,0.0550217324086,0.0546690289957,0.054757204849,0.0548747726533,0.0558740989897,0.0566676816687,0.057990319467,0.0576963999563,0.0577551838584,0.058401806782,0.05998897214,0.0601947157975,0.0602534996996,0.0597244445803,0.0597538365314,0.0595480928739,0.0589602538524,0.0592835653142,0.0594599170206,0.0598420123846,0.0589014699503,0.0599595801889,0.0610470823786,0.0608413387211,0.0614585696936,0.0620464087151,0.0625460718833,0.0622815443237,0.062428504079,0.0627224235897,0.0631633028558,0.063633574073,0.0633690465134,0.0634866143176,0.0638393177305,0.0638981016327,0.0642801969966,0.0655146589417,0.0662788496696,0.0664258094249,0.0657204025992,0.0661024979631,0.0667785128378,0.0684244620979,0.06766027137,0.0686302057554,0.0682481103915,0.0681011506361,0.0678954069786,0.0687183816086,0.0697470998962,0.0701291952601,0.0709815618413,0.0710109537923,0.0715694008627,0.070481898673,0.0713048733031,0.0716281847649,0.0724217674438,0.0734210937803,0.0738619730464,0.0735386615846,0.0740089328018,0.0739207569486,0.074920083285,0.0764778566919,0.0776535347348,0.0785646852181,0.0791525242395,0.0787704288756,0.0794464437503,0.0810042171571,0.0804751620378,0.0821211112979,0.082150503249,0.0825325986129,0.082973477879,0.0827677342215,0.0825913825151,0.0839728042155,0.0841197639709,0.0842667237262,0.0839434122644,0.0831792215365,0.0827383422704,0.082973477879,0.0824150308086,0.0827971261726,0.0834731410473,0.0821211112979,0.0826795583683,0.0824444227597,0.0835025329983,0.0841491559219,0.0856187534756,0.0853542259159,0.0852072661606,0.0861184166438,0.0860008488395,0.0865299039589,0.0876467980996,0.088616732485,0.0900569380876,0.0915559275923,0.0919968068584,0.0930843090481,0.0944069468464,0.0949653939168,0.0973755339048,0.100138377306,0.100138377306,0.100579256572,0.100138377306,0.099491754382,0.100755608278,0.101284663397,0.102137029979,0.102372165587,0.101255271446,0.101872502419,0.102960004609,0.105370144597,0.107897852389,0.110307992377,0.110748871643,0.112130293343,0.113746850652,0.115921855032,0.119448889161,0.121388757931,0.123387410604,0.124416128892,0.125327279375,0.126150254005,0.1287367457,0.129618504232,0.130647222519,0.131881684464,0.132763442997,0.131999252269,0.131969860318,0.13341006592,0.133703985431,0.134468176159,0.135261758838,0.13587898981,0.136672572489,0.137436763217,0.13723101956,0.138700617113,0.139788119303,0.138583049309,0.139758727352,0.139729335401,0.139406023939,0.140346566373,0.141169541004,0.141140149052,0.141757380025,0.140846229542,0.140464134178,0.140728661737,0.140375958325,0.142550962704,0.143961776355,0.144226303915,0.144696575132,0.14463779123,0.146195564637,0.147136107071,0.148929016087,0.150721925102,0.152896929482,0.153837471916,0.153896255818,0.155101325812,0.155365853372,0.15695301873,0.156982410681,0.159950997739,0.161185459684,0.162419921629,0.161538163097,0.16050944481,0.161303027489,0.160127349446,0.161949650412,0.162919584798,0.16353681577,0.161949650412,0.162067218216,0.161508771146,0.163595599672,0.164447966253,0.165976347709,0.168768583061,0.168562839404,0.16929763818,0.172648320603,0.175528731808,0.177057113264,0.178379751062,0.177938871796,0.179202725692,0.179937524469,0.181524689827,0.182876719576,0.185404427368,0.183288206891,0.183758478108,0.184875372249,0.185228075662,0.187256120286,0.189195989057,0.189460516616,0.190077747589,0.19066558661,0.190459842953,0.192429103675,0.191988224409,0.19148856124,0.192605455381,0.194280796592,0.195191947076,0.197337559504,0.199630131688,0.200923377535,0.200629458024,0.200805809731,0.201393648752,0.20215783948,0.202833854355,0.202833854355,0.201452432654,0.200805809731,0.200482498269,0.200041619003,0.201187905095,0.200893985584,0.202951422159,0.203421693376,0.204509195566,0.204950074832,0.207007511407,0.207007511407,0.207536566526,0.20927069164,0.211328128215,0.213297388937,0.211827791383,0.212445022356,0.212621374062,0.21338556479,0.214032187713,0.215384217463,0.216795031114,0.217676789647,0.218705507934,0.219116995249,0.220586592803,0.222085582307,0.224554506198,0.22408423498,0.22490720961,0.225024777415,0.224143018883,0.224730857904,0.224113626931,0.224466330344,0.226905862283,0.22790518862,0.22681768643,0.228875123005,0.227934580571,0.230961951531,0.231637966406,0.232225805428,0.232960604204,0.234812297122,0.234812297122,0.235958583214,0.237633924425,0.23860385881,0.240602511483,0.239720752951,0.241307918309,0.242806907814,0.243100827325,0.242395420499,0.242130892939,0.240955214896,0.241307918309,0.240279200022,0.240955214896,0.240367375875,0.239926496609,0.239573793196,0.239485617343,0.239309265636,0.23995588856,0.241131566603,0.240925822945,0.241895757331,0.241690013673,0.241983933184,0.240132240266,0.23913291393,0.238016019789,0.238398115153,0.239279873685,0.238162979544,0.237281221012,0.236281894676,0.236252502725,0.236810949795,0.23778088418,0.236840341746,0.236869733697,0.236428854431,0.233783578835,0.232167021525,0.230197760804,0.229404178125,0.228140324228,0.226406199115,0.225024777415,0.224289978638,0.223202476448,0.222114974259,0.220645376705,0.222555853525,0.223143692546,0.221027472069,0.218734899885,0.216471719653,0.216383543799,0.215736920876,0.214708202588,0.213209213083,0.212445022356,0.208124405548,0.20571426556,0.205038250685,0.206302104581,0.206478456288,0.204950074832,0.203598045083,0.202775070453,0.20133486485,0.199924051198,0.199512563883,0.199659523639,0.198836549009,0.196308841216,0.196161881461,0.195485866586,0.194780459761,0.192869982941,0.193722349522,0.192047008311,0.193016942696,0.192517279528,0.192958158794,0.192487887577,0.191106465877,0.191929440507,0.19093011417,0.192811199039,0.191811872702,0.193898701228,0.193105118549,0.191841264653,0.191782480751,0.192517279528,0.192958158794,0.19010713954,0.191224033681,0.190577410757,0.191106465877,0.190048355638,0.189578084421,0.189254772959,0.189989571736,0.188255446622,0.187667607601,0.188696325889,0.187226728335,0.185962874439,0.185139899809,0.184610844689,0.184816588347,0.184875372249,0.182053744946,0.181260162267,0.180613539343,0.179643604958,0.181407122022,0.184581452738,0.188931461497,0.195280122929,0.201129121192,0.207977445792,0.21558996112,0.22270281328,0.227170389843,0.231373438847,0.232167021525,0.228346067886,0.221174431824,0.21338556479,0.20353926118,0.194192620739,0.183229422989,0.173441903282,0.164418574302,0.157070586534,0.148870232185,0.145607725616,0.142374610998,0.138112778092,0.135202974936,0.131587764954,0.127825595216,0.124592480598,0.121800245246,0.117303276732,0.115716111374,0.110778263594,0.107486365074,0.105605280205,0.103724195337,0.102225205832,0.101225879495,0.0996974980396,0.0981103326816,0.0977282373177,0.0956414087915,0.0960822880576,0.0947008663571,0.0931430929503,0.0923789022224,0.0904978173537,0.0902626817451,0.0891163956533,0.0888812600447,0.0885285566318,0.0877643659039,0.0874704463932,0.0879701095614,0.0879113256593,0.0857363212799,0.0858538890842,0.0853542259159,0.0840609800687,0.0832673973898,0.0812099608147,0.0813275286189,0.0795052276524,0.0781825898541,0.0773890071752,0.0780944140009,0.0773890071752,0.076536640594,0.0770656957134,0.0766248164473,0.0769481279091,0.0757724498661,0.0755960981597,0.0745967718232,0.07450859597,0.0743910281657,0.0734798776825,0.0732741340249,0.071686968667,0.070070411358,0.069276828679,0.0694237884344,0.0686595977065,0.068453854049,0.0673075679571,0.0661906738164,0.0665727691803,0.0649562118713,0.0651325635777,0.0659849301588,0.0649268199202,0.0640744533391,0.0638687096816,0.0637805338284,0.063222086758,0.063222086758,0.0626342477365,0.0626048557855,0.0618994489597,0.0609001226232,0.0613116099382,0.0622227604215,0.0608413387211,0.0605180272593,0.06081194677,0.0591366055588,0.0589014699503,0.0586663343417,0.0581078872713,0.0574024804455,0.0569028172773,0.055580179479,0.056373762158,0.0557565311854,0.0546690289957,0.0548159887511,0.0539342302189,0.0538460543657,0.0533169992464,0.052758552176,0.0529936877846,0.0520237533992,0.0514653063288,0.0514359143777,0.0517886177906,0.0514653063288,0.0510538190138,0.050759899503,0.0516416580352,0.0528761199803,0.0511713868181,0.0509656431606,0.0506129397477,0.0507011156009,0.0502014524327,0.0509656431606,0.0507892914541,0.0506423316987,0.0498487490198,0.0493784778026,0.0505247638945,0.0509950351116,0.0502602363348,0.0497899651176,0.0501426685305,0.0489375985365,0.0489082065854,0.0486436790258,0.0482321917108,0.0476149607382,0.0474680009829,0.0466156344018,0.047908880249,0.0481440158575,0.0477913124447,0.0486730709769,0.049113950243,0.0483791514661,0.0489082065854,0.0478500963468,0.0468507700103,0.0476737446404,0.0470859056189,0.0466744183039,0.0465568504996,0.0455869161142,0.0448815092884,0.0452636046524,0.0444994139245,0.0452342127013,0.0454399563588,0.0448521173374,0.0444994139245,0.0443230622181,0.0436764392945,0.0439997507563,0.0435882634412,0.0431767761262,0.0430004244198,0.0426477210069,0.042295017594,0.0424713693005,0.0423244095451,0.041883530279,0.0419423141811,0.0422656256429,0.0424419773494,0.0422362336919,0.0425007612515,0.0425889371048,0.0430298163708,0.0428828566155,0.0430298163708,0.0428828566155,0.0431179922241,0.0424419773494,0.043088600273,0.0437646151477,0.0431179922241,0.0434413036859,0.0429416405176,0.0427358968601,0.0428240727133,0.0434413036859,0.0429122485666,0.0423244095451,0.0416483946704,0.0417659624747,0.0427358968601,0.0427946807623,0.0425007612515,0.0416190027193,0.0410311636979,0.0406196763829,0.0399730534593,0.0402375810189,0.0396203500464,0.0393264305357,0.0383271041992,0.0372689939605,0.0375335215202,0.0384740639545,0.0385916317588,0.0387385915142,0.0400024454103,0.0405021085786,0.0410311636979,0.0411487315022,0.0420892739365,0.0420598819854,0.0424713693005,0.0418541383279,0.0421480578387,0.0421186658876,0.0414132590618,0.041060555649,0.0409723797957,0.0407666361382,0.0398260937039,0.0402081890678,0.0395027822421,0.0395615661442,0.0392970385846,0.0392676466335,0.0391206868781,0.0381801444438,0.0383271041992,0.0378274410309,0.038268320297,0.0379450088352,0.0387091995631,0.0387091995631,0.0385622398078,0.0377980490799,0.0380625766395,0.0388267673674,0.0382095363949,0.0384446720035,0.0382095363949,0.0382977122481,0.0375923054223,0.037856832982,0.0379450088352,0.0385034559056,0.0389443351717,0.039061902976,0.0390031190738,0.0391206868781,0.0393852144378,0.0392676466335,0.0392970385846,0.0389443351717,0.0389737271228,0.038650415661,0.0381213605417,0.0380919685906,0.0384740639545,0.0383271041992,0.0377098732266,0.0382977122481,0.0383564961502,0.0381801444438,0.0376804812756,0.0377098732266,0.0376510893245,0.0372396020095,0.0373865617648,0.0369456824987,0.0367693307923,0.0356818286026,0.0357112205537,0.0357112205537,0.036240275673,0.0356818286026,0.0355642607983,0.0357700044558,0.0356230447005,0.0352997332387,0.0353879090919,0.0355348688472,0.0351527734833,0.0351233815322,0.034241623,0.0346825022661,0.034653110315,0.034653110315,0.0340358793425,0.0341828390979,0.0353291251897,0.0362108837219,0.0364460193305,0.0364754112816,0.0375923054223,0.0378274410309,0.0378862249331,0.0380037927374,0.0379156168841,0.0380625766395,0.0372689939605,0.0367399388412,0.0366811549391,0.0367987227434,0.0361227078687,0.0359757481133,0.0363578434773,0.0356524366515,0.0350939895811,0.0361520998198,0.0357406125047,0.0355054768962,0.0356230447005,0.0351233815322,0.035858180309,0.0351233815322,0.0346825022661,0.0352997332387,0.0365635871348,0.0357700044558,0.0359463561623,0.0356524366515,0.0350645976301,0.0352409493365,0.0344473666575,0.0352409493365,0.0349764217768,0.0351527734833,0.034212231049,0.0339477034893,0.0343885827554,0.0341828390979,0.0348882459236,0.0353585171408,0.035446692994,0.0350939895811,0.0350645976301,0.0343591908043,0.0345943264129,0.0342710149511,0.0337419598318,0.034212231049,0.0335362161743,0.0331247288593,0.0325956737399,0.0331541208103,0.0337125678807,0.0337713517829,0.0337713517829,0.0336243920275,0.0335068242232,0.0335656081253,0.0336831759296,0.0332716886146,0.0333598644678,0.0333892564189,0.0326544576421,0.0325662817889,0.0325662817889,0.0331835127614,0.03341864837,0.032625065691,0.0328308093485,0.0333010805657,0.0339183115382,0.0334774322721,0.0338007437339,0.0333304725168,0.0331835127614,0.032625065691,0.0325368898378,0.033007161055,0.0332716886146,0.0333892564189,0.0330953369082,0.0327720254464,0.032625065691,0.0329777691039,0.0329777691039,0.0338595276361,0.0333304725168,0.0331835127614,0.0325074978867,0.0323311461803,0.0318608749631,0.0323311461803,0.0324487139846,0.0325956737399,0.0323899300824,0.0315669554524,0.0320372266696,0.0324781059356,0.0329189852017,0.0329777691039,0.0336831759296,0.0325074978867,0.0324487139846,0.0325368898378,0.0324193220335,0.0327132415442,0.0323605381314,0.0325074978867,0.0317433071588,0.0318902669142,0.0321841864249,0.0335656081253,0.0326838495932,0.0325368898378,0.0332716886146,0.033036553006,0.0334774322721,0.0331541208103,0.033830135685,0.0335656081253,0.0325368898378,0.0316845232567,0.0323605381314,0.0323311461803,0.0321547944738,0.0325368898378,0.0324487139846,0.0321841864249,0.0317139152077,0.0316845232567,0.0318608749631,0.0319490508163,0.0314787795992,0.0314493876481,0.0310379003331,0.0312142520395,0.0312142520395,0.0313318198438,0.0319784427674,0.0323017542292,0.0325368898378,0.0327720254464,0.033007161055,0.0329483771528,0.0329189852017,0.0329189852017,0.0324193220335,0.0326838495932,0.0320960105717,0.0319784427674,0.0319490508163,0.0316551313056,0.0323899300824,0.0323017542292,0.0324487139846,0.0325368898378,0.0330659449571,0.03341864837,0.0336243920275,0.0327720254464,0.033007161055,0.0341828390979,0.034241623,0.034623718364,0.0348294620215,0.0340946632447,0.0335656081253,0.032625065691,0.0328308093485,0.0336243920275,0.0337419598318,0.0329189852017,0.0323605381314,0.0319784427674,0.031802091061,0.0316845232567,0.031802091061,0.0320372266696,0.0320372266696,0.0319196588653,0.0321547944738,0.0317139152077,0.0311848600884,0.0313906037459,0.031419995697,0.0315669554524,0.0317139152077,0.0313906037459,0.0313024278927,0.0316551313056,0.0309791164309,0.0312142520395,0.031419995697,0.0316551313056,0.031831483012,0.0315081715502,0.0314493876481,0.0320960105717,0.0319196588653,0.0314493876481,0.0315081715502,0.0313318198438,0.0314787795992,0.0308909405777,0.0304206693605,0.0304794532627,0.030626413018,0.0308027647245,0.0310379003331,0.0314493876481,0.0316257393545,0.0319490508163,0.0321254025228,0.0329189852017,0.0337713517829,0.0343004069022,0.034212231049,0.0335950000764,0.0339183115382,0.0336537839786,0.0337419598318,0.0338889195871,0.033830135685,0.0327426334953,0.032213578376,0.0319196588653,0.0319490508163,0.0318608749631,0.0309203325288,0.0308027647245,0.0302737096052,0.029803438388,0.0295389108283,0.0299797900944,0.0297446544859,0.0303031015562,0.0303912774095,0.0309497244799,0.0312730359417,0.0312436439906,0.0313612117949,0.0314787795992,0.031831483012,0.0323605381314,0.0325368898378,0.0326544576421,0.033007161055,0.0326838495932,0.0328308093485,0.0331541208103,0.0333598644678,0.0328602012996,0.0326838495932,0.0325074978867,0.0332129047125,0.0325956737399,0.0325074978867,0.0321841864249,0.0325956737399,0.0325662817889,0.0324781059356,0.0333304725168,0.0330953369082,0.0328014173974,0.0331247288593,0.033036553006,0.0328014173974,0.0333010805657,0.0323899300824,0.0323311461803,0.0319784427674,0.0317139152077,0.0317726991099,0.0322429703271,0.031419995697,0.0315963474035,0.0320372266696,0.0317726991099,0.0325662817889,0.0322429703271,0.0324781059356,0.0317433071588,0.0326544576421,0.0325662817889,0.032625065691,0.0325368898378,0.0324487139846,0.0329189852017,0.0323017542292,0.0325074978867,0.0327720254464,0.0335362161743,0.0326838495932,0.0323605381314,0.0321841864249,0.0319490508163,0.0312730359417,0.0310379003331,0.0311848600884,0.0313906037459,0.0315669554524,0.0312730359417,0.0320078347185,0.0319196588653,0.0320666186206,0.0321547944738,0.0324193220335,0.0323017542292,0.0323311461803,0.0319784427674,0.0312142520395,0.0316551313056,0.0311260761863,0.0315963474035,0.0316845232567,0.0323605381314,0.0323605381314,0.0327426334953,0.0296858705837,0.02657032377,0.023778088418,0.0204274059957,0.0)
m <- c(0.0190799419803,0.0225030204947,0.0260451626096,0.0295873047245,0.0328020219381,0.0332782763401,0.0328317878382,0.0330996809393,0.0330401491391,0.0324448311366,0.0326531924374,0.0326829583376,0.0318197472339,0.0320281085348,0.0319388108344,0.0313137269318,0.0314327905323,0.0314327905323,0.0318792790342,0.0321471721353,0.0313732587321,0.0313137269318,0.0326234265373,0.0317899813338,0.0322364698357,0.0322067039356,0.0323257675361,0.0319983426347,0.0309267702302,0.0311946633313,0.0314625564324,0.0314327905323,0.0307184089293,0.0307779407295,0.029706368325,0.0300337932264,0.0296170706247,0.0290217526222,0.0293491775235,0.0285752641203,0.0283669028194,0.0277715848169,0.0277418189168,0.0277418189168,0.0278906484174,0.0280990097183,0.028753859521,0.0290812844224,0.0288729231215,0.0296170706247,0.0299147296259,0.0302421545273,0.029944495526,0.0297361342252,0.0298551978257,0.0303314522277,0.0296766024249,0.0293491775235,0.0293491775235,0.0294087093238,0.0292598798232,0.0288431572214,0.0285454982201,0.0286943277208,0.0286943277208,0.0281585415185,0.0283669028194,0.0286347959205,0.0288729231215,0.0283966687195,0.028039477918,0.0284562005198,0.0284264346196,0.0283966687195,0.0286943277208,0.0283669028194,0.0279799461178,0.0276227553163,0.0277715848169,0.0274143940154,0.0279204143175,0.0272357986146,0.0274739258156,0.0276525212164,0.0275929894161,0.0275334576159,0.0282478392189,0.0286347959205,0.0280097120179,0.0286645618206,0.0279799461178,0.0283073710191,0.0290515185223,0.0290515185223,0.028277605119,0.0289026890217,0.028277605119,0.0280692438181,0.0286050300204,0.0288729231215,0.0292896457233,0.028991986722,0.0283669028194,0.0281883074186,0.0288133913213,0.0282478392189,0.0281287756184,0.0284562005198,0.0282180733188,0.0278906484174,0.028039477918,0.0286347959205,0.028753859521,0.0288133913213,0.0286943277208,0.0287240936209,0.0291110503225,0.0290217526222,0.029468241124,0.0292896457233,0.029468241124,0.0291705821228,0.0286645618206,0.0286347959205,0.0283371369193,0.0283371369193,0.0284859664199,0.0286645618206,0.0284859664199,0.0292598798232,0.0289324549218,0.0288133913213,0.0292896457233,0.028991986722,0.0294980070242,0.0294087093238,0.028991986722,0.0285752641203,0.0281287756184,0.0273548622151,0.0278906484174,0.0285454982201,0.028039477918,0.0283073710191,0.0279799461178,0.028277605119,0.0288729231215,0.0293491775235,0.0293491775235,0.0288729231215,0.0284562005198,0.0281585415185,0.0289622208219,0.0287836254212,0.0293194116234,0.0288729231215,0.0282180733188,0.0275334576159,0.027801350717,0.0287836254212,0.0291408162227,0.0291110503225,0.0288729231215,0.0294980070242,0.0291110503225,0.0295873047245,0.0302421545273,0.030420749928,0.0303612181278,0.0300337932264,0.0291408162227,0.0287836254212,0.0284859664199,0.0276227553163,0.027801350717,0.0271465009143,0.0262535239105,0.0267893101128,0.0269679055135,0.0266404806121,0.0272060327145,0.0274143940154,0.0269083737133,0.0272953304149,0.0267000124124,0.0274739258156,0.027325096315,0.0269381396134,0.0265511829118,0.0264023534111,0.0262832898106,0.0265214170116,0.0269976714136,0.0267297783125,0.0273548622151,0.0275334576159,0.0281883074186,0.0283966687195,0.0289622208219,0.0287240936209,0.0289622208219,0.0283371369193,0.0280097120179,0.0280692438181,0.0277715848169,0.027563223516,0.0275334576159,0.0272655645148,0.0268786078131,0.0275334576159,0.0271167350141,0.0279799461178,0.0286645618206,0.0289026890217,0.0293194116234,0.0296170706247,0.029230113923,0.0291408162227,0.0292598798232,0.0291408162227,0.0294980070242,0.0294384752239,0.028991986722,0.0294384752239,0.030182622727,0.0299742614262,0.0304802817283,0.030658877129,0.0305398135285,0.0309565361303,0.0311946633313,0.0310755997308,0.031135131531,0.0310458338307,0.030182622727,0.0297659001253,0.0292598798232,0.0291110503225,0.0289324549218,0.0281883074186,0.0280692438181,0.0277715848169,0.0284859664199,0.0277418189168,0.0275334576159,0.0278906484174,0.0280097120179,0.0282180733188,0.0288729231215,0.028991986722,0.028991986722,0.0288431572214,0.0279204143175,0.0283966687195,0.0283669028194,0.0286050300204,0.0288431572214,0.0292003480229,0.0291705821228,0.0294384752239,0.0293789434237,0.029706368325,0.0298254319255,0.0297659001253,0.0297956660254,0.0297361342252,0.0296468365248,0.0292896457233,0.0294384752239,0.0290515185223,0.0296766024249,0.0293789434237,0.0296170706247,0.0298254319255,0.0300933250267,0.0302123886272,0.0308077066297,0.0306291112289,0.0303314522277,0.0308374725298,0.0302421545273,0.0310755997308,0.0309863020304,0.0308077066297,0.0311946633313,0.030658877129,0.0303909840279,0.0306291112289,0.0312541951315,0.0311946633313,0.0311648974312,0.030182622727,0.0305100476284,0.0304802817283,0.0301528568269,0.030658877129,0.0305100476284,0.0308374725298,0.0302123886272,0.0307481748294,0.0310160679305,0.0312839610317,0.0316113859331,0.0316113859331,0.0315816200329,0.0310458338307,0.0312244292314,0.0313732587321,0.0314030246322,0.0313732587321,0.0308077066297,0.030420749928,0.0297361342252,0.030182622727,0.0310755997308,0.0322364698357,0.0319388108344,0.0318792790342,0.0323852993363,0.0320876403351,0.0317602154337,0.0330699150392,0.0334866376409,0.0331294468394,0.0323555334362,0.0316411518332,0.0319388108344,0.0313137269318,0.0315518541328,0.0319685767346,0.0322364698357,0.0314327905323,0.0316411518332,0.0319983426347,0.0325341288369,0.0326829583376,0.0331592127396,0.0339628920429,0.0337545307421,0.0333973399406,0.0345582100455,0.034915400847,0.0349451667471,0.0349451667471,0.0345582100455,0.0350344644475,0.0351237621478,0.035867909651,0.0356595483501,0.0364036958532,0.0367608866547,0.0372371410567,0.0373264387571,0.0372669069569,0.0372073751566,0.0368799502552,0.0369692479556,0.0361655686522,0.0363143981528,0.0360167391516,0.0359869732515,0.0359274414512,0.0356000165498,0.0356000165498,0.0359572073513,0.0362251004525,0.0369692479556,0.0371478433564,0.0370287797559,0.0369692479556,0.0365525253538,0.0367013548545,0.036820418455,0.0374157364575,0.0372669069569,0.0369097161554,0.036106036852,0.0365525253538,0.0362251004525,0.0361655686522,0.036582291254,0.0364929935536,0.0368799502552,0.0359572073513,0.0367311207546,0.0373264387571,0.0374157364575,0.0367311207546,0.0373264387571,0.0382194157609,0.0379515226597,0.0382789475611,0.0383384793614,0.0391719245649,0.0387552019631,0.0383087134612,0.0383384793614,0.0392612222653,0.039201690465,0.0388742655636,0.039439817666,0.0392909881654,0.0393802858658,0.0394993494663,0.0401244333689,0.0400351356685,0.040154199269,0.0398267743676,0.0399756038683,0.0392612222653,0.0393802858658,0.0392612222653,0.0392909881654,0.0391123927646,0.0391123927646,0.0391123927646,0.0394993494663,0.0394100517659,0.0397672425674,0.0404816241704,0.0396184130668,0.0405411559706,0.0405113900705,0.0403327946698,0.0397077107671,0.0404220923701,0.0404220923701,0.0407197513714,0.0407197513714,0.0408983467721,0.0416127283751,0.0417317919756,0.042297344078,0.043249852882,0.0444702547872,0.0453036999907,0.0455418271917,0.0453036999907,0.0450358068896,0.0448869773889,0.0453334658908,0.0445893183877,0.0445595524876,0.0451251045899,0.0440832980855,0.043487980083,0.0433391505824,0.0433986823827,0.0439940003852,0.0441725957859,0.0433093846823,0.043487980083,0.0433391505824,0.0425950030793,0.0426247689794,0.0426545348795,0.0426247689794,0.0432200869819,0.0434284482828,0.0440237662853,0.0443809570868,0.0447083819882,0.0453929976911,0.0452144022903,0.0449465091892,0.0447083819882,0.0450358068896,0.0449167432891,0.0447381478883,0.0446190842878,0.0451846363902,0.0449762750893,0.0447976796886,0.0451548704901,0.0456013589919,0.0453929976911,0.0453036999907,0.0454822953914,0.0453632317909,0.0454227635912,0.0455418271917,0.0464050382953,0.0458990179932,0.0461073792941,0.0464943359957,0.0467622290968,0.0464645700956,0.0463157405949,0.0470301221979,0.0462562087947,0.0462562087947,0.0464645700956,0.0478338015013,0.0472384834988,0.0476254402005,0.0475361425001,0.0483100559033,0.0486374808047,0.0489649057061,0.0492030329071,0.0495602237086,0.049173267007,0.0485184172042,0.0493816283078,0.0500364781106,0.0512866459159,0.0521200911194,0.0528047068223,0.0525368137211,0.0539655769271,0.0537274497261,0.053935811027,0.054173938228,0.0542930018285,0.054412065429,0.0547692562305,0.054412065429,0.0544715972293,0.0555729355339,0.0559301263354,0.0564659125377,0.0575970167424,0.057269591841,0.0585197596463,0.0592341412493,0.0587281209472,0.0591746094491,0.0597699274516,0.0595615661507,0.0593829707499,0.0598294592518,0.0597401615514,0.0607224362556,0.0600973523529,0.0595913320508,0.0608712657562,0.0614368178586,0.0615558814591,0.0623595607625,0.0626572197637,0.0627465174641,0.0631334741657,0.0634608990671,0.0648003645727,0.065812405177,0.0665565526801,0.0673899978836,0.0686103997888,0.0695926744929,0.0702475242957,0.070574949197,0.0704558855965,0.0711702671996,0.0717060534018,0.0721525419037,0.0721823078038,0.0724204350048,0.0728966894068,0.0726883281059,0.0733134120086,0.0746231116141,0.0757542158188,0.0770341495242,0.0772722767252,0.0777187652271,0.0788498694319,0.0785224445305,0.0782843173295,0.0787605717315,0.0794451874344,0.0799809736366,0.0815585663433,0.0819157571448,0.0821241184457,0.0826003728477,0.0827194364482,0.0839100724532,0.0850114107578,0.0860829831623,0.086946194266,0.0876010440687,0.087422448668,0.0879284689701,0.0890298072747,0.0900716137791,0.0910836543834,0.091708738286,0.0918278018865,0.0916194405856,0.0928398424908,0.0930779696918,0.0937328194945,0.0944769669977,0.0951318168004,0.0959057302037,0.0965010482062,0.0973642593098,0.0986739589153,0.100072956221,0.100251551622,0.102603057732,0.105668945445,0.108496705957,0.110639850766,0.113229484077,0.115372628886,0.119748216204,0.124361930723,0.128112434139,0.13299404176,0.137637522179,0.139631837488,0.14484087001,0.150555922834,0.158354588667,0.168861951411,0.178863293853,0.189102763496,0.19958036034,0.211278359089,0.219970001926,0.230894087272,0.236162651594,0.23991315501,0.239139241607,0.234793420188,0.229822514867,0.223095421439,0.216993411913,0.207021835371,0.19961012624,0.192257948909,0.186691725586,0.183923496874,0.182613797269,0.182286372367,0.180857609161,0.181065970462,0.181095736362,0.182822158569,0.185173664679,0.186185705284,0.187941893391,0.188180020592,0.188388381893,0.188358615993,0.188269318292,0.18773353209,0.188805104495,0.188358615993,0.188626509094,0.188180020592,0.188507445493,0.188209786492,0.188566977294,0.189489720198,0.190352931301,0.192019821708,0.191900758108,0.194282030118,0.193746243915,0.193984371116,0.194371327818,0.194311796018,0.194966645821,0.195264304822,0.195919154625,0.197318151931,0.200175678343,0.200235210143,0.200979357646,0.200532869144,0.201277016647,0.202169993651,0.20205093005,0.202199759551,0.203182034255,0.203033204755,0.200949591746,0.200384039643,0.200860294045,0.20428337256,0.204104777159,0.205682369866,0.207111133072,0.209194746081,0.210087723084,0.210236552585,0.212082038393,0.213034547197,0.214522842203,0.213540567499,0.215118160205,0.216785050612,0.219404449823,0.220624851729,0.221904785434,0.221904785434,0.222708464737,0.224732545946,0.225000439047,0.227798433659,0.227619838258,0.228363985761,0.225923181951,0.226339904553,0.227798433659,0.229643919467,0.230834555472,0.231548937075,0.23294793438,0.232680041279,0.234406463487,0.234912483789,0.237174692198,0.238543923604,0.239049943906,0.239049943906,0.240329877612,0.241460981816,0.241580045417,0.243187404024,0.244437571829,0.244467337729,0.245032889831,0.245449612433,0.245657973734,0.24717603464,0.245866335035,0.244854294431,0.243395765324,0.242740915522,0.24232419292,0.24229442702,0.242532554221,0.241758640818,0.241014493314,0.24000245271,0.239377368808,0.238990412106,0.240478707112,0.23997268681,0.238424860004,0.23991315501,0.239436900608,0.238008137402,0.237889073801,0.237710478401,0.238067669202,0.238335562303,0.236251949294,0.235716163092,0.235597099492,0.233513486483,0.233513486483,0.233305125182,0.231995425576,0.231697766575,0.230149939769,0.229405792266,0.229078367364,0.227649604158,0.227649604158,0.226518499953,0.226548265854,0.226518499953,0.226875690755,0.226072011452,0.226310138653,0.225238566248,0.225238566248,0.224911141347,0.224673014146,0.224196759744,0.222648932937,0.221130872031,0.219999767826,0.220714149429,0.219642577024,0.219047259022,0.219047259022,0.218719834121,0.216576689312,0.215415819207,0.214493076303,0.214403778602,0.2138084606,0.21145695449,0.209313809681,0.208837555279,0.207051601271,0.206366985569,0.206009794767,0.205384710864,0.205563306265,0.204878690562,0.204015479459,0.203033204755,0.204461967961,0.202199759551,0.20196163235,0.200473337344,0.201723505149,0.200056614742,0.197764640432,0.197347917831,0.196216813626,0.195770325124,0.193656946215,0.193537882615,0.191990055808,0.191781694507,0.187316809488,0.187465638989,0.187376341289,0.187138214088,0.186394066585,0.185114132879,0.185828514482,0.185501089581,0.18541179188,0.183655603773,0.18520343058,0.184578346677,0.185590387281,0.183655603773,0.182078011066,0.182375670068,0.180143227558,0.178744230252,0.176988042145,0.177345232946,0.174725833735,0.174874663236,0.171868307323,0.171511116522,0.170856266719,0.169665630714,0.169308439913,0.167790379006,0.169606098914,0.167492720005,0.167284358704,0.165170979795,0.165587702397,0.163385025788,0.161986028482,0.160081010874,0.159307097471,0.158949906669,0.156985357261,0.156241209758,0.156092380257,0.156003082557,0.153651576447,0.154068299048,0.153621810547,0.154574319351,0.153949235448,0.152996726644,0.152460940442,0.151746558839,0.149841541231,0.148204416724,0.146984014819,0.146091037815,0.145614783413,0.143620468104,0.142846554701,0.143054916002,0.143590702204,0.143233511403,0.144394381508,0.142906086501,0.142816788801,0.142757257001,0.1426679593,0.141655918696,0.14028668729,0.138828158184,0.136387354374,0.136178993073,0.133529827962,0.134303741365,0.134333507265,0.132636850958,0.132815446359,0.133678657463,0.134065614164,0.134660932167,0.133232168961,0.132160596556,0.132368957857,0.132041532956,0.131595044454,0.130821131051,0.129451899645,0.127338520736,0.126445543732,0.124272633023,0.123826144521,0.121742531512,0.120581661408,0.117247880593,0.11412246108,0.112068613972,0.109121789859,0.108050217455,0.105698711345,0.10456760714,0.102722121332,0.10212680333,0.101471953527,0.101829144329,0.101858910229,0.101204060426,0.101084996825,0.100162253922,0.0996562336195,0.0991799792174,0.0995669359191,0.0987632566157,0.0976916842112,0.0965308141063,0.0963224528054,0.096471282306,0.0960545597043,0.0961140915045,0.0953997099015,0.0938221171949,0.0923338221886,0.0924826516893,0.0917980359864,0.0910836543834,0.0909050589826,0.0893572321761,0.089327466276,0.0884940210725,0.0876903417691,0.0880177666705,0.0873926827678,0.0870950237666,0.0870652578665,0.0874819804682,0.0854281333596,0.0858746218614,0.0844458586554,0.0839100724532,0.0834338180512,0.0830766272497,0.0820943525455,0.0804572280386,0.079355889734,0.0785224445305,0.0787308058314,0.0784926786304,0.0786712740311,0.0776592334269,0.077688999327,0.0778080629275,0.07840338093,0.0782545514294,0.0786117422309,0.0780461901285,0.0775699357265,0.076736490523,0.0762007043207,0.075783981719,0.0747421752146,0.0734622415092,0.0719739465029,0.0721525419037,0.0712297989998,0.0709321399986,0.069622440393,0.0695926744929,0.0698010357938,0.0695629085928,0.0697117380934,0.0692950154917,0.0711107353993,0.0710512035991,0.070336821996,0.0699498652944,0.0701879924954,0.0690568882907,0.068669931589,0.0685508679885,0.0681341453868,0.0688187610897,0.067717422785,0.0668542116814,0.0675983591845,0.0670328070821,0.0673304660834,0.0674197637838,0.0667053821808,0.0659910005778,0.0660207664779,0.0644729396714,0.0635799626676,0.0627762833642,0.0625679220633,0.0623595607625,0.0621214335615,0.0623595607625,0.0625679220633,0.0628060492644,0.0618535404603,0.0617344768598,0.060811733956,0.0617047109597,0.0606926703555,0.0601568841532,0.0589067163479,0.0581625688448,0.0571802941407,0.0575970167424,0.0581923347449,0.0589364822481,0.0595913320508,0.0591746094491,0.0587281209472,0.0587876527474,0.0593532048498,0.0596806297512,0.0598592251519,0.0581328029447,0.0579244416438,0.0566445079384,0.0567040397387,0.0564956784378,0.0571802941407,0.0567635715389,0.0560194240358,0.0552455106325,0.0550966811319,0.0552752765327,0.0553943401332,0.0557515309347,0.0549776175314,0.0551859788323,0.0551859788323,0.0556919991344,0.0553348083329,0.0553348083329,0.05465019263,0.0550966811319,0.0544715972293,0.0537869815264,0.0540251087274,0.0535190884253,0.0519712616187,0.0508996892142,0.0504532007124,0.0504532007124,0.0506913279134,0.0500662440107,0.050125775811,0.0500364781106,0.0497983509096,0.0492625647073,0.0494411601081,0.050840157414,0.0522093888197,0.0519117298185,0.051792666218,0.0526261114215,0.0521200911194,0.0528344727224,0.0528642386225,0.0524177501206,0.0519414957186,0.0508699233141,0.0505127325126,0.0501555417111,0.0500960099109,0.0490542034065,0.0489946716062,0.047982631002,0.0478338015013,0.047982631002,0.0485779490045,0.0484886513041,0.0477742697011,0.0474170788996,0.0465241018958,0.0467919949969,0.0460776133939,0.0460776133939,0.0457799543927,0.0460180815937,0.0458097202928,0.0456906566923,0.0454525294913,0.0457204225924,0.0463752723952,0.0451251045899,0.0455418271917,0.0454525294913,0.0452441681904,0.0443214252865,0.0445595524876,0.0446488501879,0.0445297865874,0.0443511911867,0.0441428298858,0.0443511911867,0.0433391505824,0.0435772777834,0.0431605551817,0.0436665754838,0.0436665754838,0.0436070436835,0.0432200869819,0.0428926620805,0.042297344078,0.04277359848,0.0438154049844,0.0439344685849,0.0449762750893,0.0439047026848,0.043249852882,0.0431605551817,0.043249852882,0.0437856390843,0.0437856390843,0.043964234485,0.0433391505824,0.0436665754838,0.0428926620805,0.0433986823827,0.0439940003852,0.0438154049844,0.0436070436835,0.0432200869819,0.0431605551817,0.0425950030793,0.0426843007797,0.0416424942753,0.0409281126723,0.0407792831716,0.0403625605699,0.0403030287696,0.0399756038683,0.039916072068,0.0398565402678,0.0396481789669,0.0397970084675,0.0400351356685,0.0405709218708,0.040630453671,0.040154199269,0.0392909881654,0.0398267743676,0.0388742655636,0.038725436063,0.039677944867,0.0389933291641,0.0388444996635,0.0386361383626,0.0388444996635,0.0392314563651,0.0401244333689,0.0401839651691,0.0403327946698,0.0409876444725,0.0402434969694,0.0408983467721,0.0405411559706,0.0405113900705,0.0402434969694,0.0400351356685,0.0397970084675,0.0397077107671,0.0400946674688,0.0391123927646,0.0391719245649,0.038963563264,0.038963563264,0.0390528609644,0.0388444996635,0.0384575429619,0.0383980111616,0.038487308862,0.0387849678632,0.0390528609644,0.0385468406622,0.0384277770617,0.0380408203601,0.0371776092565,0.037534800058,0.0366418230542,0.0368501843551,0.0362251004525,0.0355107188495,0.0356595483501,0.0363143981528,0.0363143981528,0.0367906525549,0.0372073751566,0.0364036958532,0.0373264387571,0.0365525253538,0.0366715889544,0.0367608866547,0.0329210855386,0.0287240936209,0.0247949948044,0.0210742572887,0.0)
ycorr <- c(0.000132708228522,0.000132518455252,0.000131948404584,0.000130997329636,0.00012966788224,0.000127960109102,0.00012587476621,0.00012366322526,0.000121337102875,0.000118919469735,0.000116433351536,0.000113904720822,0.00011135854794,0.000108823495335,0.000106322670421,0.000103876653895,0.000101503787711,9.92115687124e-05,9.70029742638e-05,9.48703035345e-05,9.28035345645e-05,9.07921698443e-05,8.88217666987e-05,8.68804029483e-05,8.49530644453e-05,8.30306254045e-05,8.11019194939e-05,7.91609995785e-05,7.72050248156e-05,7.52353110399e-05,7.32542013351e-05,7.12608030711e-05,6.92562685123e-05,6.72436288789e-05,6.52236852876e-05,6.31978056322e-05,6.11666250323e-05,5.91319307036e-05,5.70945103772e-05,5.50516830819e-05,5.30015094623e-05,5.09429616105e-05,4.88770819842e-05,4.68006712923e-05,4.47137949449e-05,4.26191435436e-05,4.05162602031e-05,3.84075245242e-05,3.62921624935e-05,3.41708435823e-05,3.20458013417e-05,2.99164403627e-05,2.77823313523e-05,2.56440769448e-05,2.35063592647e-05,2.13682672805e-05,1.92281039411e-05,1.70846287707e-05,1.49352425497e-05,1.2780333113e-05,1.06178229293e-05,8.44739364316e-06,6.27156184244e-06,4.09207350392e-06,1.90657394643e-06,-2.91013086655e-07,-2.50044893661e-06,-4.72450686365e-06,-6.96303285501e-06,-9.21852017391e-06,-1.14900920591e-05,-1.37751252249e-05,-1.60740096976e-05,-1.83905435497e-05,-2.07295378894e-05,-2.30881706963e-05,-2.54643263546e-05,-2.7859787519e-05,-3.0274583086e-05,-3.27071536905e-05,-3.51574230907e-05,-3.76268871734e-05,-4.01194154739e-05,-4.26339682552e-05,-4.51660689371e-05,-4.77150657911e-05,-5.02820557438e-05,-5.28653901392e-05,-5.546052529e-05,-5.80666277864e-05,-6.06858394183e-05,-6.33174135743e-05,-6.59608336458e-05,-6.86150843766e-05,-7.12806308905e-05,-7.3960258789e-05,-7.66510783049e-05,-7.93525348673e-05,-8.20653602156e-05,-8.47915881361e-05,-8.75283769256e-05,-9.02728065845e-05,-9.30247530721e-05,-9.57847782812e-05,-9.85521811401e-05,-0.000101326108426,-0.000104106603051,-0.000106893198943,-0.00010968886591,-0.000112493703448,-0.000115308665421,-0.000118136782435,-0.000120976124956,-0.000123824682678,-0.000126679196545,-0.000129538787002,-0.000132403055409,-0.000135271770282,-0.000138144620614,-0.000141018705484,-0.000143891261507,-0.000146760035512,-0.000149623022603,-0.000152481526637,-0.000155338046333,-0.000158193320974,-0.000161046238806,-0.000163898003866,-0.000166745917664,-0.00016958677664,-0.000172422566178,-0.000175252211058,-0.000178077448416,-0.000180897165428,-0.000183709245729,-0.000186511326271,-0.000189303182334,-0.000192083618156,-0.000194851295216,-0.000197607982912,-0.000200352651415,-0.000203085081061,-0.000205803759208,-0.000208509682741,-0.000211203029203,-0.000213883418095,-0.000216550806287,-0.000219205605018,-0.000221849919249,-0.000224484052384,-0.000227108371652,-0.000229724672592,-0.000232332396309,-0.000234931057819,-0.000237518712461,-0.000240094752817,-0.000242662459795,-0.000245220724275,-0.000247768493257,-0.000250303933012,-0.000252824915188,-0.000255332543683,-0.000257827509644,-0.000260309192656,-0.000262781337314,-0.000265246201071,-0.00026770139649,-0.000270145004313,-0.000272576300186,-0.000274997457691,-0.000277410894279,-0.000279814660221,-0.000282206170284,-0.000284586408913,-0.000286953919122,-0.000289307369334,-0.000291646252626,-0.000293973420552,-0.000296292073323,-0.000298603706446,-0.000300907606223,-0.000303203627551,-0.000305496718098,-0.000307784750163,-0.000310067278598,-0.000312343343449,-0.000314616120881,-0.000316882897195,-0.000319141722643,-0.000321389635749,-0.000323624229042,-0.000325845156346,-0.000328049076844,-0.00033023395027,-0.000332402146341,-0.000334554937995,-0.000336687468302,-0.000338799016937,-0.000340890302786,-0.000342963460282,-0.000345018959493,-0.000347056417324,-0.000349075456075,-0.000351078769424,-0.000353066115333,-0.00035503663993,-0.000356994352784,-0.000358943452533,-0.000360883226652,-0.000362811219803,-0.000364726774391,-0.000366631277947,-0.000368526462855,-0.000370411358196,-0.000372284095553,-0.000374144027161,-0.000375987299443,-0.000377809915985,-0.000379612097969,-0.000381391525474,-0.000383150091103,-0.000384887397152,-0.000386601371739,-0.000388292939537,-0.000389966542074,-0.000391623407685,-0.000393264925676,-0.000394893761846,-0.000396508649823,-0.000398111004605,-0.000399701336818,-0.000401281143897,-0.000402853139113,-0.000404417882642,-0.000405972758134,-0.000407512527921,-0.000409038831582,-0.00041055105013,-0.000412050429633,-0.000413538364094,-0.000415016080651,-0.000416485366897,-0.000417943870104,-0.000419388546952,-0.000420819454659,-0.000422238677301,-0.000423645818728,-0.000425039162328,-0.000426417766302,-0.000427782579088,-0.000429131148058,-0.000430459755946,-0.000431767822792,-0.000433058357536,-0.000434333894486,-0.000435595688021,-0.000436845594304,-0.000438084765698,-0.000439314153158,-0.000440534428142,-0.000441746897975,-0.000442952081363,-0.000444151672618,-0.000445345316858,-0.000446529860296,-0.000447704434775,-0.000448866616764,-0.000450016340425,-0.000451154969757,-0.000452280573898,-0.000453394163326,-0.000454495852168,-0.000455586829232,-0.000456668551078,-0.00045773915522,-0.000458801099029,-0.000459854072542,-0.000460899067439,-0.000461933561533,-0.00046295646406,-0.0004639660302,-0.000464959312246,-0.000465934613247,-0.00046688927328,-0.000467822873489,-0.000468733803298,-0.000469619239016,-0.000470475295153,-0.000471300294284,-0.000472094008706,-0.0004728562436,-0.000473589447226,-0.000474292779961,-0.000474965177451,-0.000475607249656,-0.000476220116344,-0.000476808406698,-0.000477375775198,-0.00047792577775,-0.000478460333611,-0.00047897983694,-0.000479485420416,-0.000479978290076,-0.000480461371108,-0.000480937256218,-0.000481404315225,-0.000481859208626,-0.00048229939182,-0.000482723736485,-0.000483132766095,-0.000483527309883,-0.00048390807632,-0.000484274129252,-0.000484623198065,-0.000484953923987,-0.000485266167111,-0.000485563150311,-0.000485847080795,-0.000486119742983,-0.000486380117073,-0.000486627195763,-0.000486859516849,-0.00048707615983,-0.00048728010927,-0.00048747301907,-0.000487658781893,-0.000487837172852,-0.000488009157594,-0.00048817429467,-0.000488334022649,-0.000488489439342,-0.000488642883121,-0.000488796042521,-0.000488949914472,-0.000489101510554,-0.000489248082764,-0.000489386501617,-0.000489515732291,-0.000489634352007,-0.000489742065389,-0.00048983660749,-0.000489914905047,-0.000489976437226,-0.000490019514301,-0.000490044617933,-0.000490053106043,-0.000490048084641,-0.000490028936411,-0.000489995305577,-0.000489945862071,-0.000489880986384,-0.000489801486361,-0.000489709279206,-0.000489603050293,-0.000489482907586,-0.000489348931394,-0.00048919997102,-0.000489036576608,-0.000488858826646,-0.000488670005928,-0.000488472524875,-0.000488267873036,-0.000488056010258,-0.000487838167102,-0.000487616741432,-0.000487392259263,-0.000487164175938,-0.000486933584095,-0.000486701125672,-0.000486466157979,-0.000486227497234,-0.000485983247447,-0.00048573193215,-0.0004854742159,-0.000485209831745,-0.000484936554443,-0.000484656125084,-0.000484367399049,-0.000484070936908,-0.000483766358498,-0.000483454677304,-0.000483134485876,-0.000482808175994,-0.000482474450986,-0.000482131432348,-0.000481778959855,-0.000481417346753,-0.000481046069655,-0.000480665932245,-0.000480275633481,-0.000479874187464,-0.000479462678879,-0.000479038947841,-0.000478601270974,-0.000478151685122,-0.000477691397725,-0.000477219727158,-0.000476735939486,-0.000476239042778,-0.000475729720881,-0.000475207954813,-0.000474675669161,-0.000474133741228,-0.000473585481086,-0.000473031046326,-0.000472470427004,-0.000471902898389,-0.000471330975823,-0.000470755511256,-0.000470177664127,-0.000469597500659,-0.000469014874892,-0.000468429518095,-0.000467840616156,-0.000467248562121,-0.000466654726152,-0.000466060444787,-0.000465464483349,-0.000464864874734,-0.000464259164275,-0.000463646813562,-0.000463025962159,-0.000462396618189,-0.000461756940985,-0.000461104983364,-0.000460438603424,-0.000459755769103,-0.00045905572564,-0.000458338587107,-0.000457605596583,-0.000456858192674,-0.00045609741804,-0.000455324569683,-0.000454539896871,-0.000453744256933,-0.000452939403506,-0.000452125127727,-0.000451301985618,-0.000450470473131,-0.000449632519356,-0.000448787442992,-0.000447935500013,-0.000447075620345,-0.000446208578342,-0.000445336067351,-0.000444457832251,-0.000443575185455,-0.000442691971621,-0.000441810330793,-0.000440928830907,-0.000440047883642,-0.000439169436598,-0.00043829347746,-0.000437421193586,-0.000436551452648,-0.000435681962893,-0.000434811371519,-0.000433936660833,-0.0004330540318,-0.000432161934134,-0.000431259803298,-0.000430344323161,-0.00042941290404,-0.000428464338065,-0.000427496609667,-0.000426510104509,-0.000425506416085,-0.000424486357967,-0.000423450990104,-0.000422400197174,-0.00042133320452,-0.000420251858142,-0.000419158812842,-0.000418054682507,-0.000416940824771,-0.000415818915119,-0.000414689222058,-0.000413550555791,-0.00041240272737,-0.000411247085447,-0.000410085809602,-0.00040891840618,-0.000407744556228,-0.000406564292599,-0.0004053775585,-0.000404184161404,-0.000402983563988,-0.000401776478559,-0.000400563893259,-0.000399346393297,-0.000398122767697,-0.000396891422217,-0.000395652219856,-0.000394404272614,-0.000393145800837,-0.000391876246889,-0.000390595871853,-0.000389304029075,-0.000387999239991,-0.00038668025657,-0.000385346345744,-0.000383998664562,-0.000382637983446,-0.000381265808597,-0.000379884191616,-0.000378493177897,-0.000377091939573,-0.000375680206668,-0.00037425758734,-0.000372824911235,-0.00037138197367,-0.000369929355672,-0.000368465219484,-0.000366988731321,-0.000365498428839,-0.000363992640249,-0.000362472965473,-0.000360939840632,-0.00035939358493,-0.000357834116877,-0.00035626038972,-0.000354671325013,-0.000353065925722,-0.00035144350371,-0.000349802776399,-0.000348144056995,-0.00034646618182,-0.000344767635233,-0.00034304766533,-0.000341305261031,-0.000339541072097,-0.000337755303258,-0.000335950813184,-0.000334128543375,-0.000332290411221,-0.000330438968909,-0.000328574292539,-0.000326696976449,-0.000324809069252,-0.000322911395887,-0.000321004414145,-0.000319089692677,-0.000317165020311,-0.000315228750678,-0.000313279896174,-0.000311316719014,-0.00030933747262,-0.000307342436244,-0.000305330551716,-0.000303299415657,-0.000301249711294,-0.000299179540635,-0.000297088268028,-0.000294976989681,-0.000292845992435,-0.000290694954727,-0.000288524698102,-0.000286334927174,-0.000284125637616,-0.000281898496122,-0.000279652474495,-0.000277387025351,-0.000275103184381,-0.00027279970589,-0.000270477822889,-0.00026813693123,-0.000265777221881,-0.000263398773933,-0.000261001800039,-0.000258586278024,-0.000256151915435,-0.000253700166688,-0.000251231145671,-0.000248745216262,-0.00024624017788,-0.000243716110448,-0.000241171807499,-0.000238606965459,-0.000236020141741,-0.000233410065766,-0.000230776314892,-0.000228117450074,-0.000225432407543,-0.000222720736745,-0.000219983164251,-0.000217220294564,-0.000214433037801,-0.000211622277073,-0.000208788555921,-0.000205933009214,-0.000203051732586,-0.000200138244514,-0.000197186976468,-0.000194192679175,-0.000191129476174,-0.000188148453747,-0.00018522435394,-0.000182347882843,-0.000179512073647,-0.000176708070271,-0.000173929128075,-0.000171177513567,-0.000168455586569,-0.000165765773174,-0.000163110131875,-0.000160509975784,-0.000157807978471,-0.000155026215747,-0.000152165583522,-0.000149228014194,-0.000146217183256,-0.000143134234206,-0.000139977111739,-0.000136744589231,-0.0001334356332,-0.000130050083213,-0.000126588455653,-0.000123050390514,-0.000119436284752,-0.000115748385097,-0.000111988297433,-0.000108157196673,-0.000104257787733,-0.000100295123553,-9.62755045484e-05,-9.22072235988e-05,-8.80998696926e-05,-8.39677468947e-05,-7.98280431284e-05,-7.56982191729e-05,-7.15959300047e-05,-6.75407323511e-05,-6.35507630037e-05,-5.96409479341e-05,-5.5822513137e-05,-5.21022046786e-05,-4.84839309146e-05,-4.49637955775e-05,-4.153208729e-05,-3.81751205374e-05,-3.48758141893e-05,-3.16151618554e-05,-2.8372696184e-05,-2.51296759526e-05,-2.18678956966e-05,-1.85726840142e-05,-1.52330748907e-05,-1.18406887705e-05,-8.39343588341e-06,-4.89118273178e-06,-1.33623796373e-06,2.26547355661e-06,5.90621925566e-06,9.57979034754e-06,1.32800690383e-05,1.69996911475e-05,2.07341054996e-05,2.4478319919e-05,2.82307104039e-05,3.19901018681e-05,3.57554744806e-05,3.95265109638e-05,4.33057770823e-05,4.70952361549e-05,5.08938631986e-05,5.47026730791e-05,5.85226841435e-05,6.23551180541e-05,6.62012586894e-05,7.00609991241e-05,7.39343388782e-05,7.78226265683e-05,8.17252070863e-05,8.56423011505e-05,8.95741557162e-05,9.35231257373e-05,9.74890886549e-05,0.000101472054367,0.000105472020641,0.000109490139921,0.000113526413865,0.000117581825328,0.000121657176026,0.000125752776274,0.000129869654128,0.000134006445986,0.000138164256671,0.000142346183988,0.000146554125807,0.000150788202333,0.000155050375409,0.000159341445358,0.000163661019975,0.000168009361343,0.000172388038051,0.000176798634122,0.000181242550276,0.0001857179596,0.000190221916918,0.000194753410893,0.000199311253998,0.000203892951649,0.000208498046545,0.000213124686552,0.000217769198534,0.000222427698458,0.000227095900911,0.000231771658517,0.000236454686415,0.00024114364565,0.000245836189689,0.000250532318513,0.000255230992137,0.00025993156338,0.000264634882406,0.000269343155405,0.000274057099968,0.000278776027865,0.000283498614492,0.000288223296592,0.000292949438384,0.000297675077592,0.000302397901837,0.000307115991643,0.000311827677778,0.000316530259902,0.000321220652236,0.000325897544499,0.000330560377182,0.000335209037561,0.00033984237473,0.000344458666963,0.000349057067928,0.000353635995625,0.000358193001784,0.00036272608797,0.000367235440873,0.000371720354584,0.000376180094836,0.0003806128668,0.000385018157301,0.000389397094613,0.000393750579448,0.000398079535876,0.000402385248155,0.000406669169481,0.000410931931153,0.000415174069111,0.000419394639733,0.000423592653086,0.000427766908332,0.000431915458552,0.000436034984165,0.000440124745513,0.000444183320186,0.000448209105653,0.000452201007258,0.000456156827151,0.000460075352951,0.000463958034594,0.000467805594598,0.000471620399633,0.000475404223929,0.000479159292315,0.000482886110994,0.000486585680811,0.000490259096309,0.000493908107637,0.000497534687062,0.000501139177571,0.000504722128191,0.000508282409612,0.000511820048855,0.000515334109163,0.000518822912957,0.000522286077522,0.00052572221416,0.000529129611442,0.000532506186619,0.00053585054973,0.000539161440909,0.000542437066104,0.000545677794394,0.000548882245291,0.000552051383891,0.00055518545745,0.000558284817328,0.0005613505091,0.000564383419456,0.000567384528082,0.000570354816918,0.000573295355752,0.000576206978466,0.000579090037271,0.000581944910464,0.00058477203107,0.000587571355668,0.000590343546,0.000593090533157,0.000595814119704,0.000598514785851,0.000601194154626,0.000603851495251,0.00060648656469,0.000609098675244,0.000611686200977,0.000614248213068,0.000616782803266,0.000619286707945,0.00062175582983,0.000624187305925,0.000626577754388,0.000628923987055,0.000631224627556,0.00063347841342,0.000635685430915,0.000637846764466,0.000639962570165,0.000642034392824,0.000644064210845,0.000646053729816,0.000648003912079,0.000649916584037,0.000651793051632,0.000653634580402,0.000655441606073,0.000657212987732,0.000658947074699,0.000660642256111,0.000662296999015,0.000663908685888,0.000665475030666,0.000666994543265,0.000668464963339,0.000669883168391,0.000671245902782,0.00067255140687,0.000673800688726,0.000674993729586,0.000676130257245,0.000677212134508,0.000678240793011,0.000679218968721,0.000680149243305,0.000681035874134,0.000681883514906,0.000682695878899,0.00068347455209,0.000684219993513,0.00068493241431,0.000685612122588,0.000686259235346,0.00068687276698,0.000687450218746,0.000687988611825,0.000688484811269,0.000688935844417,0.000689340586955,0.000689697550827,0.00069000686518,0.000690268326193,0.000690481488678,0.000690645655649,0.000690761763338,0.000690830841879,0.00069085417123,0.000690832541656,0.000690765401783,0.00069065389332,0.00069049929432,0.000690303075238,0.000690067347152,0.000689794498838,0.000689486500321,0.00068914495507,0.000688772725007,0.000688371852106,0.000687944273766,0.000687491593847,0.000687013999157,0.000686509930371,0.000685977059427,0.000685413078165,0.000684815757265,0.000684183249717,0.00068351193141,0.000682797817089,0.00068203781114,0.000681231047519,0.000680375927568,0.000679472124364,0.000678521402866,0.000677523706445,0.000676480704953,0.000675391444785,0.000674254597063,0.000673071706192,0.0006718436972,0.000670568884015,0.000669244562842,0.000667868931122,0.000666438093657,0.000664949510323,0.000663398975882,0.000661783606789,0.000660102966465,0.000658354977288,0.000656536897633,0.000654648091122,0.000652690996909,0.000650667150727,0.000648580234905,0.000646434942968,0.000644235855109,0.000641989483375,0.00063970051904,0.00063737525861,0.000635021357471,0.000632644491566,0.00063024831133,0.000627835881883,0.000625409101074,0.000622967535456,0.000620510095349,0.000618036560889,0.000615545108075,0.000613033059263,0.000610495140695,0.000607927864536,0.00060532916487,0.000602697403638,0.00060003100251,0.000597329769834,0.000594594934711,0.000591826535332,0.000589025347119,0.000586192525878,0.000583331691659,0.000580445396207,0.000577534887926,0.000574602031438,0.000571649453316,0.000568679252598,0.000565692909584,0.000562692832881,0.000559681257797,0.000556659575037,0.000553628423937,0.000550587632847,0.0005475379474,0.000544479408042,0.000541411136027,0.000538331233479,0.000535238485685,0.000532129897406,0.000529002810736,0.000525855169281,0.000522684478455,0.000519489727807,0.000516270354125,0.000513025523257,0.000509755885778,0.000506461791311,0.000503143577201,0.000499801499531,0.000496437497149,0.000493052339698,0.000489646223997,0.000486219687549,0.000482771999564,0.000479303127184,0.000475811916037,0.000472298159771,0.000468760729782,0.000465200820976,0.000461617843391,0.000458012036235,0.000454384955415,0.00045073773005,0.000447072301837,0.000443390847799,0.000439694575117,0.000435984784289,0.000432263277805,0.000428532402669,0.000424792471628,0.000421044108133,0.000417288132205,0.000413524006429,0.000409751161318,0.000405967757787,0.000402172592209,0.000398365878283,0.000394547990396,0.000390716516811,0.00038687163271,0.000383013522144,0.000379142409046,0.000375257779594,0.000371360192533,0.000367450319442,0.000363529107443,0.00035959682806,0.000355652743235,0.000351696664984,0.000347729180033,0.000343748638052,0.000339754031558,0.000335745888115,0.000331724218788,0.000327687943322,0.000323638851141,0.000319577583826,0.00031550603585,0.000311425554374,0.000307336527763,0.000303241102755,0.000299141956009,0.000295040365066,0.00029093771588,0.000286836193085,0.000282737598593,0.000278641023864,0.000274546174318,0.000270453874405,0.000266364110144,0.000262278585319,0.000258195505135,0.000254114674558,0.000250036029975,0.000245960173609,0.000241885573973,0.000237812092499,0.000233739187432,0.000229666343862,0.000225594551711,0.00022152284465,0.000217451868959,0.000213383443298,0.00020931770076,0.000205253842802,0.000201191006859,0.000197129851495,0.000193071319957,0.000189016722618,0.000184966211495,0.000180918541059,0.00017687452019,0.000172832863422,0.000168792508258,0.000164754080995,0.000160718845301,0.000156687435714,0.000152660656337,0.000148638616004,0.000144620906842,0.000140609436143,0.000136604730772,0.000132606962005,0.000128617116724,0.00012463529905,0.000120660370057,0.000116693518924,0.000112734132371,0.000108782653305,0.000104840569879,0.000100908929407,9.69883054974e-05,9.3080409902e-05,8.91856803778e-05,8.53052269841e-05,8.14415286731e-05,7.75946403611e-05,7.37639883573e-05,6.99496722269e-05,6.61494144107e-05,6.23614394454e-05,5.85836708349e-05,5.48122446695e-05,5.10451251816e-05,4.72817341546e-05,4.35205547078e-05,3.97598736457e-05,3.60007429538e-05,3.22411748725e-05,2.84826690327e-05,2.47264541861e-05,2.09737440988e-05,1.72268561816e-05,1.34888681077e-05,9.75837476016e-06,6.03671210263e-06,2.32572794454e-06,-1.37303623276e-06,-5.05853400144e-06,-8.72941986915e-06,-1.23858596886e-05,-1.60270222616e-05,-1.96528198924e-05,-2.32626812359e-05,-2.68532979264e-05,-3.04229335498e-05,-3.39730335481e-05,-3.75053538271e-05,-4.1019635346e-05,-4.45166715904e-05,-4.79961222224e-05,-5.14592003062e-05,-5.49057276306e-05,-5.83365962608e-05,-6.17528035818e-05,-6.51583041142e-05,-6.85523191458e-05,-7.19334403842e-05,-7.52999616431e-05,-7.86535127316e-05,-8.1992655711e-05,-8.53165729846e-05,-8.86244279483e-05,-9.19135645622e-05,-9.51844136449e-05,-9.84350132998e-05,-0.000101663745044,-0.000104870712582,-0.000108056692606,-0.000111219916298,-0.000114361010752,-0.000117480987921,-0.000120580100536,-0.000123661093067,-0.00012672672559,-0.000129776161894,-0.000132810494965,-0.000135830914146,-0.00013883755532,-0.000141831436534,-0.000144814514801,-0.000147785799882,-0.000150744814733,-0.000153690515757,-0.000156618908911,-0.000159530623314,-0.000162426617427,-0.000165305283725,-0.000168167019602,-0.000171011027998,-0.000173835509878,-0.000176640932531,-0.000179426251217,-0.00018219234892,-0.00018493992521,-0.000187668608234,-0.000190374972694,-0.000193058323358,-0.00019571863264,-0.000198353354921,-0.000200962066452,-0.000203542933703,-0.000206095796885,-0.000208619582202,-0.000211113712712,-0.000213578623123,-0.000216017849716,-0.00021843371383,-0.000220825796335,-0.000223197770941,-0.000225550290796,-0.000227883962066,-0.000230199329108,-0.00023249794556,-0.000234780573141,-0.00023704685848,-0.000239295024243,-0.000241522301673,-0.000243729896533,-0.000245916491662,-0.000248081690585,-0.000250228054687,-0.000252356777733,-0.000254469308917,-0.000256564154763,-0.000258643216344,-0.000260707212629,-0.000262759236812,-0.000264797710663,-0.000266821062529,-0.00026882949662,-0.000270819801687,-0.000272791101945,-0.00027474016792,-0.000276667277854,-0.000278570915213,-0.000280448546601,-0.000282299268033,-0.000284121627753,-0.00028576582536,-0.000287080127858,-0.000288066091979,-0.000288724700356,-0.000289053472438)
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(265)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('BCL6_UV-ChIP-seq_merged-vs-minusUV_control_ChIP-GSM2754206.pseudoRep2.MACS-2.1.0.p1e-1_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) : 265',bty='n')
dev.off()