# R script for Peak Model
#  -- generated by MACS
p <- c(0.0339334261186,0.039748971693,0.0443788235095,0.0490651369335,0.0561228378733,0.0548806825079,0.055219452153,0.0551629905455,0.055219452153,0.0553888369756,0.0558405298357,0.0553323753681,0.0565745307335,0.0569697619861,0.0549936057229,0.0555017601906,0.0544289896478,0.0539772967876,0.05346914232,0.0541466816102,0.0540337583951,0.0549371441154,0.0549371441154,0.0550500673305,0.0545419128628,0.0547677592929,0.0546548360778,0.0543725280402,0.0547677592929,0.0543160664327,0.0542031432177,0.0538079119651,0.0542596048252,0.0545983744703,0.0558405298357,0.0556711450132,0.0568568387711,0.0574779164538,0.0573649932387,0.0572520700237,0.0573649932387,0.0577037628838,0.0570826852011,0.0577602244914,0.0573085316312,0.0580425325289,0.0575908396688,0.0578731477064,0.058155455744,0.0573649932387,0.0563486843034,0.0548242209004,0.0545419128628,0.0545419128628,0.0548806825079,0.0535256039275,0.0540337583951,0.0538643735726,0.0531303726748,0.0540337583951,0.0551629905455,0.0562922226959,0.0568568387711,0.0558405298357,0.0555017601906,0.0554452985831,0.0563486843034,0.056743915556,0.0580989941365,0.0574214548462,0.0577602244914,0.0565180691259,0.056743915556,0.0580989941365,0.0586071486041,0.0593976111094,0.0576473012763,0.0577037628838,0.0568003771635,0.056743915556,0.056630992341,0.0582119173515,0.0573085316312,0.0566874539485,0.0564051459109,0.0555582217981,0.0562922226959,0.0564616075184,0.0565180691259,0.0570826852011,0.0579296093139,0.0580425325289,0.0584377637816,0.0574214548462,0.0572520700237,0.0580425325289,0.0564616075184,0.0573649932387,0.0575908396688,0.0573085316312,0.0558969914432,0.0561228378733,0.0573085316312,0.0588894566417,0.0598493039695,0.0594540727169,0.0617125370176,0.0601316120071,0.0609785361199,0.0610914593349,0.0617125370176,0.0608091512973,0.0607526896898,0.059679919147,0.0587200718192,0.0593411495019,0.0590023798568,0.0594540727169,0.0589459182492,0.0590023798568,0.0591717646793,0.0600186887921,0.0587765334267,0.0591153030718,0.0591153030718,0.0590588414643,0.0595669959319,0.0587765334267,0.0589459182492,0.0595669959319,0.0602445352222,0.0606962280823,0.0605833048673,0.0606962280823,0.0617125370176,0.0618254602327,0.0616560754101,0.0630111539906,0.0635193084582,0.0624465379154,0.0610349977274,0.0603009968297,0.0605833048673,0.0603574584372,0.0599057655771,0.0596234575395,0.0592282262868,0.0588894566417,0.0582119173515,0.0588894566417,0.0591717646793,0.0592846878943,0.0599057655771,0.0615996138026,0.0626159227379,0.0634628468507,0.064366232571,0.0644226941785,0.0649308486462,0.0651002334687,0.0665117736567,0.0667940816943,0.066003619189,0.0665682352642,0.065777772759,0.0660600807966,0.0644226941785,0.0641403861409,0.0647050022161,0.0637451548883,0.0640274629259,0.0636322316733,0.0640274629259,0.0637451548883,0.0633499236357,0.0645920790011,0.0651566950763,0.0652696182913,0.0661730040116,0.0675845441996,0.0682620834898,0.0692783924251,0.070464086183,0.070464086183,0.0716497799409,0.0711980870807,0.0723273192311,0.0721579344086,0.071988549586,0.0722143960161,0.0713110102958,0.0714803951183,0.0711416254732,0.0699559317153,0.0702382397529,0.0683185450973,0.0688831611725,0.0709157790431,0.0693348540326,0.0693913156401,0.0691654692101,0.0691654692101,0.0711416254732,0.0731742433439,0.0729483969138,0.0737953210266,0.0728354736988,0.071875626371,0.0726660888762,0.0726660888762,0.0740776290642,0.0743599371018,0.0736823978115,0.0728354736988,0.0741340906717,0.0746422451394,0.0758279388972,0.0758279388972,0.0762231701499,0.0778605567679,0.0765054781875,0.0768442478326,0.0762231701499,0.0763925549724,0.0765054781875,0.0774653255153,0.0767877862251,0.0775217871228,0.0774653255153,0.0762796317574,0.07667486301,0.0769007094401,0.0769571710476,0.0778605567679,0.0767313246175,0.076561939795,0.0782557880205,0.0790462505258,0.0802319442837,0.0808530219664,0.0825468701919,0.0823210237619,0.0827162550145,0.081135330004,0.081135330004,0.0806836371438,0.0792720969559,0.0777476335529,0.0768442478326,0.0767313246175,0.07667486301,0.0771830174777,0.0769571710476,0.0780299415905,0.0801190210686,0.0804577907138,0.0820387157243,0.0835067175198,0.0855393353904,0.0867250291483,0.0860474898581,0.0868379523633,0.0876848764761,0.0870637987934,0.0869508755784,0.087233183616,0.0882494925513,0.0877977996912,0.0860474898581,0.085708720213,0.0864991827182,0.085821643428,0.0860474898581,0.0876848764761,0.0883059541588,0.088983493449,0.0884188773739,0.0894916479167,0.0914678041799,0.091806573825,0.092032420255,0.0923711899001,0.0936133452656,0.0932745756204,0.0923147282926,0.0936698068731,0.0947990390234,0.0954765783137,0.0954765783137,0.0960976559964,0.0965493488565,0.0970010417167,0.096605810464,0.0966622720715,0.0981867354745,0.0985255051197,0.0983561202971,0.0995982756625,0.102760125684,0.103381203366,0.105018589984,0.10761582393,0.109817826623,0.112076290924,0.11399598558,0.114617063262,0.116819065956,0.118851683826,0.118399990966,0.120545532052,0.120997224912,0.122352303492,0.123142765998,0.124723691008,0.125344768691,0.127716156207,0.128958311572,0.128901849965,0.130934467835,0.131442622303,0.132797700883,0.132063699986,0.134604472324,0.135112626792,0.13697585984,0.137484014307,0.137371091092,0.1374275527,0.137314629485,0.13720170627,0.136467705372,0.138443861635,0.137709860737,0.139403708963,0.139403708963,0.140194171468,0.142283250946,0.143920637564,0.143412483097,0.145727409005,0.148606950989,0.148437566166,0.149002182241,0.147026025978,0.146461409903,0.147251872408,0.145953255435,0.14651787151,0.146179101865,0.14584033222,0.146404948295,0.146235563473,0.145219254537,0.147534180446,0.149510336709,0.150187875999,0.151034800112,0.150187875999,0.150187875999,0.149453875101,0.148606950989,0.149115105456,0.149453875101,0.148663412596,0.147308334016,0.145501562575,0.145953255435,0.145670947398,0.146122640258,0.146630794725,0.147138949193,0.14629202508,0.147929411698,0.149453875101,0.151147723327,0.154309573348,0.152841571552,0.155100035853,0.157923116229,0.159221733202,0.161931890363,0.164359739486,0.164754970739,0.164980817169,0.164867893954,0.164133893056,0.166279434142,0.167126358255,0.167295743077,0.166561742179,0.165263125206,0.164359739486,0.164698509131,0.165432510029,0.163286968943,0.160576811782,0.159221733202,0.157358500154,0.155608190321,0.155212959068,0.15289803316,0.152785109945,0.151938185832,0.151486492972,0.15267218673,0.153914342095,0.155551728713,0.155382343891,0.155269420676,0.156455114434,0.156793884079,0.156906807294,0.155438805498,0.152954494767,0.152615725122,0.151938185832,0.149340951886,0.149171567064,0.149171567064,0.148550489381,0.149397413494,0.147251872408,0.147703565268,0.147760026876,0.147590642053,0.149171567064,0.150921876897,0.149397413494,0.147364795623,0.14516279293,0.142339712554,0.141944481301,0.138895554495,0.137596937522,0.134435087501,0.131160314265,0.128337233889,0.127772617814,0.126643385664,0.125401230298,0.12331215082,0.12150537938,0.121166609735,0.121110148127,0.119529223117,0.118795222219,0.117835374891,0.115972141843,0.115181679338,0.115859218628,0.117044912386,0.118399990966,0.117383682031,0.114504140047,0.114617063262,0.113092599859,0.111455213241,0.110100134661,0.109253210548,0.10626074535,0.103155356936,0.0999370453076,0.0986384283347,0.09965473727,0.0986384283347,0.0983561202971,0.0969445801091,0.095081347061,0.0928793443678,0.0927099595453,0.0923147282926,0.0916936506099,0.0909031881047,0.0884188773739,0.0864991827182,0.0849182577077,0.0851441041378,0.0857651818205,0.0868944139709,0.0858781050355,0.0852005657453,0.0855393353904,0.0846924112776,0.0840713335949,0.0844665648476,0.08418425681,0.0832244094822,0.082772716622,0.0819822541168,0.0819257925092,0.0820387157243,0.0815870228641,0.0813611764341,0.0806836371438,0.0816434844716,0.0809659451814,0.0805142523213,0.0801754826762,0.0785945576657,0.0786510192732,0.0788204040957,0.0794979433859,0.0801190210686,0.0810224067889,0.0807400987514,0.0822081005468,0.0824339469769,0.0823774853694,0.0841277952025,0.0854828737829,0.0876284148686,0.0866121059333,0.0863297978957,0.087233183616,0.0876284148686,0.0871767220085,0.0884753389814,0.0898868791693,0.0903385720295,0.088757647019,0.0865556443257,0.0876848764761,0.0896610327393,0.0902256488144,0.0904514952445,0.0899998023844,0.0880801077287,0.0897739559543,0.090395033637,0.0896610327393,0.090282110422,0.0912419577498,0.0916371890024,0.0916371890024,0.091806573825,0.0930487291904,0.096379964034,0.0953636550986,0.095081347061,0.0977915042219,0.100445199775,0.0998805837001,0.100388738168,0.10055812299,0.101122739066,0.101856739963,0.102364894431,0.102985972114,0.105413821237,0.10626074535,0.10626074535,0.107898131968,0.109874288231,0.112302137354,0.113036138252,0.114165370402,0.114729986477,0.115520448983,0.11557691059,0.116875527563,0.116931989171,0.118230606144,0.119529223117,0.121618302595,0.123876766895,0.125401230298,0.127095078524,0.129748774077,0.133531701781,0.136637090195,0.138726169673,0.141041095581,0.142000942909,0.144202945602,0.148550489381,0.153236802805,0.156568037649,0.159899272492,0.162440044831,0.164698509131,0.170739901136,0.174861598485,0.179322065479,0.182201607462,0.184911764623,0.186097458381,0.187847768214,0.188864077149,0.188299461074,0.189089923579,0.188525307504,0.186549151241,0.186097458381,0.185024687838,0.183556686042,0.182145145854,0.181411144957,0.181241760134,0.179491450301,0.17565206099,0.172998365436,0.171586825249,0.166448818964,0.160463888567,0.154366034955,0.149849106354,0.142960790237,0.134830318754,0.129805235685,0.126361077626,0.120093839192,0.116310911488,0.114560601655,0.11377013915,0.112471522177,0.110495365914,0.110947058774,0.111455213241,0.112866753429,0.112019829317,0.112753830214,0.110156596268,0.108688594473,0.106430130172,0.104962128377,0.102760125684,0.102251971216,0.101461508711,0.098130273867,0.0973962729693,0.0963235024264,0.0973962729693,0.0966622720715,0.0973962729693,0.0973962729693,0.0969445801091,0.0955895015287,0.094855500631,0.0956459631362,0.0953636550986,0.094968423846,0.0911854961423,0.0901127255994,0.0883624157663,0.0870073371859,0.0852570273528,0.0836196407348,0.0828856398371,0.0818128692942,0.0806271755363,0.0793285585634,0.0803448674987,0.0794979433859,0.0789333273108,0.0785945576657,0.0794979433859,0.078086403198,0.07667486301,0.0752633228221,0.0741905522792,0.0736823978115,0.0730048585213,0.0731177817364,0.0728354736988,0.0723837808386,0.0715933183334,0.071988549586,0.0720450111935,0.0709722406507,0.0705205477905,0.0706899326131,0.0709157790431,0.0702947013604,0.0695042388552,0.068826699565,0.0679797754522,0.0678668522372,0.0675845441996,0.067302236162,0.067302236162,0.0658342343665,0.0655519263289,0.0645356173936,0.0639710013184,0.0630111539906,0.0625594611304,0.0616560754101,0.0619383834477,0.0621642298778,0.06120438255,0.0619383834477,0.0610349977274,0.0622206914853,0.0618819218402,0.0615996138026,0.0615996138026,0.0621077682703,0.06143022898,0.0615431521951,0.0615431521951,0.0619383834477,0.0621077682703,0.0605833048673,0.0613737673725,0.0611479209425,0.0617689986252,0.0615996138026,0.0610349977274,0.0610349977274,0.0610349977274,0.059679919147,0.059792842362,0.0602445352222,0.0608091512973,0.0617689986252,0.0607526896898,0.0598493039695,0.0604703816522,0.0592282262868,0.0596234575395,0.0599622271846,0.0585506869966,0.0566874539485,0.0557276066207,0.0557276066207,0.0565745307335,0.058268378959,0.0582119173515,0.0582119173515,0.0579296093139,0.0580425325289,0.0600186887921,0.0615431521951,0.0614866905876,0.0618819218402,0.0618254602327,0.0622771530928,0.0622206914853,0.062954692383,0.0634063852432,0.0626159227379,0.0622206914853,0.062954692383,0.0640274629259,0.0640274629259,0.064253309356,0.0631805388131,0.0639710013184,0.0656083879364,0.0670199281244,0.0684879299199,0.067415159377,0.0679797754522,0.0683750067048,0.0685443915274,0.0698430085003,0.0711980870807,0.0709722406507,0.070577009398,0.0695042388552,0.0695042388552,0.070577009398,0.070351162968,0.0698430085003,0.0699559317153,0.06893962278,0.0686573147424,0.0682620834898,0.0682056218823,0.0682620834898,0.0687702379574,0.0689960843875,0.0683750067048,0.0679797754522,0.0691090076026,0.0694477772477,0.069052545995,0.0696171620702,0.0700688549304,0.0706899326131,0.0710851638657,0.0723273192311,0.0728919353063,0.073625936204,0.071875626371,0.0721579344086,0.0736823978115,0.0742470138867,0.0742470138867,0.0746422451394,0.0741340906717,0.0740211674567,0.0741340906717,0.0750939379995,0.075150399607,0.0747551683544,0.0745293219243,0.0737388594191,0.0747551683544,0.0760537853273,0.0763925549724,0.0766184014025,0.0772394790852,0.0767877862251,0.0776347103378,0.0786510192732,0.0787074808807,0.0794414817784,0.0782557880205,0.0766184014025,0.0771830174777,0.0772959406927,0.0775217871228,0.0782557880205,0.0785945576657,0.0788768657032,0.0783687112356,0.0786510192732,0.0798931746386,0.0801754826762,0.0794414817784,0.0789897889183,0.0781428648055,0.0783122496281,0.0780299415905,0.0769571710476,0.0771830174777,0.0771830174777,0.0750939379995,0.075150399607,0.0756020924672,0.0752068612145,0.0760537853273,0.0759408621123,0.0762796317574,0.0766184014025,0.0759408621123,0.0759973237198,0.0768442478326,0.0770136326551,0.0761102469348,0.07667486301,0.0759973237198,0.0742470138867,0.0740776290642,0.0745857835318,0.0744163987093,0.0737953210266,0.0739647058491,0.0730613201288,0.0723837808386,0.0722708576236,0.0731177817364,0.0739647058491,0.0736823978115,0.0732871665589,0.0739647058491,0.0743599371018,0.0748116299619,0.0752633228221,0.0771830174777,0.0763360933649,0.0761667085424,0.0767877862251,0.07667486301,0.0763360933649,0.0752633228221,0.0753762460371,0.0746987067469,0.0752633228221,0.0746422451394,0.0758844005048,0.0752633228221,0.0747551683544,0.0748680915694,0.0745857835318,0.0758844005048,0.0758279388972,0.0754891692521,0.0757714772897,0.0749810147845,0.0745857835318,0.0755456308597,0.0755456308597,0.0754327076446,0.0765054781875,0.0758844005048,0.074924553177,0.0740776290642,0.0720450111935,0.073400089774,0.0733436281664,0.0723273192311,0.072101472801,0.0724967040537,0.071875626371,0.071988549586,0.0732871665589,0.0742470138867,0.0750939379995,0.0744163987093,0.0742470138867,0.0744163987093,0.0740211674567,0.0739647058491,0.0743034754943,0.0745293219243,0.0732871665589,0.0739082442416,0.0739647058491,0.0737388594191,0.0741905522792,0.0737953210266,0.0752068612145,0.0739647058491,0.0731177817364,0.0729483969138,0.073400089774,0.0728354736988,0.071875626371,0.0718191647634,0.0709157790431,0.070464086183,0.068826699565,0.0693348540326,0.0697300852853,0.068826699565,0.0678668522372,0.0671893129469,0.0672457745544,0.0676974674146,0.0667940816943,0.0667376200868,0.0671328513394,0.067415159377,0.0669634665169,0.0671328513394,0.0665682352642,0.0667940816943,0.0669634665169,0.066003619189,0.0671893129469,0.0672457745544,0.0676410058071,0.0678103906296,0.0679233138447,0.0676410058071,0.0683750067048,0.0679233138447,0.0671328513394,0.0667376200868,0.065777772759,0.0657213111514,0.0647050022161,0.0654954647214,0.0652696182913,0.0649873102537,0.0651566950763,0.0659471575815,0.0671893129469,0.0680926986672,0.0686008531349,0.0686573147424,0.0678668522372,0.0662859272266,0.0663988504417,0.0667376200868,0.0669634665169,0.0665682352642,0.0654390031139,0.0643097709635,0.0637451548883,0.0634628468507,0.0651002334687,0.0662859272266,0.0667376200868,0.0664553120492,0.0668505433018,0.0660600807966,0.065890695974,0.0657213111514,0.0652696182913,0.066003619189,0.0645920790011,0.0649308486462,0.0636886932808,0.0635757700657,0.0632934620282,0.0637451548883,0.0647614638236,0.0653825415063,0.0661165424041,0.0650437718612,0.0647614638236,0.0625594611304,0.0625594611304,0.0626159227379,0.0615431521951,0.0622771530928,0.0625594611304,0.0615996138026,0.0622206914853,0.0619383834477,0.0632370004206,0.0640274629259,0.0637451548883,0.0635757700657,0.062841769168,0.062954692383,0.0623900763079,0.0631805388131,0.0627853075605,0.0626159227379,0.0613737673725,0.0593976111094,0.0605833048673,0.0606397664748,0.0619383834477,0.06120438255,0.0605833048673,0.0607526896898,0.0603009968297,0.0610914593349,0.0601880736146,0.0617689986252,0.0599622271846,0.0591153030718,0.0591153030718,0.0587765334267,0.0586071486041,0.0576473012763,0.056743915556,0.0561792994808,0.0578166860989,0.0577602244914,0.0587765334267,0.0587200718192,0.058155455744,0.0579860709214,0.0579860709214,0.058155455744,0.0594540727169,0.0597363807545,0.0601316120071,0.0604139200447,0.0599622271846,0.0595669959319,0.0601316120071,0.0601880736146,0.0608091512973,0.0607526896898,0.0595669959319,0.059792842362,0.058268378959,0.0592846878943,0.0596234575395,0.0604703816522,0.06120438255,0.0611479209425,0.0607526896898,0.0614866905876,0.0619948450552,0.0608091512973,0.0615996138026,0.0603574584372,0.0599057655771,0.0601316120071,0.0580989941365,0.0582119173515,0.0586071486041,0.0572520700237,0.0568003771635,0.0574214548462,0.056743915556,0.0564051459109,0.0561792994808,0.0558405298357,0.0565745307335,0.0552759137605,0.0539772967876,0.0548806825079,0.0543160664327,0.0540337583951,0.0527916030297,0.052057602132,0.0516059092718,0.0513236012343,0.0518317557019,0.0523399101696,0.0528480646372,0.0525092949921,0.0527351414222,0.0526222182072,0.0544854512553,0.0542596048252,0.0547677592929,0.0560099146583,0.0557276066207,0.0555582217981,0.0555582217981,0.0557840682282,0.0562922226959,0.0558969914432,0.0562357610884,0.0573649932387,0.0579860709214,0.0561792994808,0.0547112976854,0.055106528938,0.0557276066207,0.0552759137605,0.0551629905455,0.0557840682282,0.0547112976854,0.0544854512553,0.0530174494598,0.0533562191049,0.0540902200027,0.0543160664327,0.0542596048252,0.0540902200027,0.0536385271425,0.0545983744703,0.0553323753681,0.0542031432177,0.0544289896478,0.0545983744703,0.0548806825079,0.0539208351801,0.0538643735726,0.0542596048252,0.0549371441154,0.05346914232,0.0527916030297,0.0540902200027,0.0537514503575,0.05346914232,0.0532432958899,0.0532997574974,0.0536385271425,0.0531303726748,0.0525092949921,0.0527351414222,0.0522834485621,0.0514929860568,0.0522834485621,0.0527351414222,0.0526786798147,0.053582065535,0.0530174494598,0.0539772967876,0.0540902200027,0.0538643735726,0.0541466816102,0.0536385271425,0.0547677592929,0.0542596048252,0.055219452153,0.055106528938,0.0540337583951,0.0524528333846,0.0535256039275,0.0543725280402,0.0548242209004,0.055219452153,0.0544854512553,0.0543725280402,0.0540337583951,0.05346914232,0.0541466816102,0.0543160664327,0.0538643735726,0.0538079119651,0.0523399101696,0.0521140637395,0.0518882173094,0.0523399101696,0.0514365244493,0.0514365244493,0.0509283699816,0.0518317557019,0.0513800628418,0.0504766771215,0.0514929860568,0.0522269869545,0.0518317557019,0.0530174494598,0.0542596048252,0.0547112976854,0.0556146834057,0.0556711450132,0.055219452153,0.0553323753681,0.0549371441154,0.0548242209004,0.0555582217981,0.0547677592929,0.0539772967876,0.0540337583951,0.0531868342824,0.0522269869545,0.0522834485621,0.0521140637395,0.052057602132,0.051944678917,0.0513236012343,0.0455080556599,0.0401442029456,0.0346674270163,0.0298681903772,0.0)
m <- c(0.0313435695636,0.0362052546236,0.0418104915164,0.0470725506402,0.0523918060588,0.0525061986485,0.0525633949433,0.0527349838277,0.051991431995,0.0521058245847,0.0515910579313,0.0533641430708,0.0529065727122,0.0532497504812,0.0534785356605,0.0545080689673,0.0545080689673,0.0547940504414,0.0558235837482,0.0557663874534,0.0562811541068,0.0542220874932,0.0544508726725,0.0543936763776,0.0545652652621,0.0531925541863,0.0543364800828,0.0531353578915,0.0539933023139,0.0534213393656,0.0538217134294,0.0545080689673,0.0539933023139,0.0530781615967,0.0527921801226,0.0535929282501,0.0529065727122,0.0531353578915,0.0522202171743,0.0526777875329,0.0517054505209,0.0519342357002,0.0527921801226,0.054279283788,0.0547940504414,0.0535929282501,0.0538217134294,0.0542220874932,0.0538217134294,0.053306946776,0.0535929282501,0.0535929282501,0.0529065727122,0.0522774134692,0.0519342357002,0.0534213393656,0.0537645171346,0.0543364800828,0.0549084430311,0.0550228356207,0.0548512467362,0.0545652652621,0.0543936763776,0.054279283788,0.0538789097242,0.0525061986485,0.051991431995,0.0522202171743,0.0517054505209,0.0522774134692,0.0533641430708,0.0534785356605,0.0530781615967,0.0531353578915,0.0527921801226,0.0529065727122,0.0525061986485,0.0517626468157,0.0523918060588,0.0519342357002,0.0507903098037,0.049074420959,0.050046757971,0.0495319913176,0.0499895616762,0.0501039542658,0.0507903098037,0.0509047023934,0.0505615246244,0.0512478801623,0.0518198431106,0.0534785356605,0.0530209653019,0.0538217134294,0.0530209653019,0.0537645171346,0.052963769007,0.0527349838277,0.0536501245449,0.0531353578915,0.0531353578915,0.0534785356605,0.0535929282501,0.0537073208398,0.0549084430311,0.0539361060191,0.054279283788,0.0535929282501,0.0526777875329,0.0525061986485,0.0522202171743,0.0511906838675,0.05038993574,0.0498751690865,0.0493032061383,0.0509047023934,0.05038993574,0.0516482542261,0.0515910579313,0.0511334875727,0.0511334875727,0.0516482542261,0.0522774134692,0.0525633949433,0.0525633949433,0.0518198431106,0.0524490023536,0.0514766653416,0.0518198431106,0.0515910579313,0.0517626468157,0.0512478801623,0.0514766653416,0.0504471320348,0.0502755431503,0.0495891876124,0.0495319913176,0.0505615246244,0.0506759172141,0.0507903098037,0.0521630208795,0.053306946776,0.0530209653019,0.053306946776,0.0528493764174,0.0531925541863,0.0540504986087,0.0537645171346,0.0539933023139,0.0543364800828,0.0531925541863,0.0534785356605,0.0549084430311,0.0547368541466,0.0547940504414,0.0537073208398,0.0536501245449,0.0539361060191,0.0534213393656,0.0532497504812,0.0529065727122,0.0515338616364,0.0503327394451,0.0510762912779,0.0522202171743,0.0535929282501,0.0538789097242,0.0541076949035,0.0555376022741,0.0562811541068,0.056567135581,0.0590837725532,0.0586833984894,0.0582258281309,0.0586833984894,0.058168631836,0.0575966688878,0.0570247059395,0.0563955466965,0.0558235837482,0.0566815281706,0.0553660133897,0.0560523689275,0.0558235837482,0.0554804059793,0.0557091911586,0.0555947985689,0.0561095652224,0.0556519948638,0.0561667615172,0.0563383504017,0.056567135581,0.0568531170551,0.0571390985292,0.0563955466965,0.057539472593,0.058168631836,0.0583402207205,0.057539472593,0.057539472593,0.057539472593,0.0573678837085,0.0578826503619,0.0586833984894,0.059484146617,0.0586833984894,0.058511809605,0.0586833984894,0.0597701280911,0.0606280725135,0.0603420910393,0.0603992873342,0.0599989132704,0.059140968848,0.0595413429118,0.0598273243859,0.0590837725532,0.0586833984894,0.059484146617,0.0594269503222,0.0598845206808,0.0598845206808,0.0606280725135,0.0617148021151,0.0609712502824,0.0620007835892,0.0618291947048,0.0630303168961,0.0626299428323,0.0622867650634,0.062744335422,0.0633162983702,0.0635450835495,0.0634306909598,0.0641742427926,0.063716672434,0.0636594761391,0.0621151761789,0.062744335422,0.0625155502427,0.0623439613582,0.0617148021151,0.061428820641,0.0621723724737,0.0620007835892,0.0617719984099,0.0620579798841,0.0629159243064,0.0613144280514,0.0613144280514,0.0613144280514,0.0628015317168,0.0625155502427,0.0616576058203,0.0623439613582,0.0630303168961,0.063716672434,0.0638882613184,0.0640026539081,0.0644030279718,0.0633162983702,0.0616004095255,0.0612572317565,0.0622867650634,0.0618291947048,0.0613716243462,0.0626871391271,0.0626871391271,0.0629731206012,0.0620007835892,0.0630875131909,0.062744335422,0.0634306909598,0.0626871391271,0.0620007835892,0.0613144280514,0.0609140539876,0.0597701280911,0.0605136799238,0.0617148021151,0.0611428391669,0.0620007835892,0.0621151761789,0.0612572317565,0.0628015317168,0.062744335422,0.0628587280116,0.0625727465375,0.0638882613184,0.0640026539081,0.0652037760994,0.0653753649839,0.0660617205217,0.0669196649441,0.0660617205217,0.0673200390079,0.0660045242269,0.0684067686095,0.0681779834302,0.0684067686095,0.0674916278923,0.0677776093665,0.0667480760596,0.0670912538286,0.0678348056613,0.067606020482,0.0689215352629,0.0682923760199,0.0681207871354,0.0688071426733,0.0704658352232,0.0704086389284,0.0706374241077,0.0704086389284,0.0704658352232,0.0697222833905,0.0696078908008,0.0700082648646,0.0693791056215,0.0686927500836,0.0669768612389,0.0672056464182,0.0670912538286,0.067606020482,0.0674916278923,0.0682923760199,0.0680063945458,0.0679491982509,0.0682351797251,0.0684639649044,0.0693791056215,0.0703514426335,0.0706946204025,0.0709806018766,0.0719529388886,0.0720101351834,0.0725249018369,0.07149536853,0.0708090129921,0.0706374241077,0.0716097611197,0.0704658352232,0.0702370500439,0.070866209287,0.0694934982112,0.0698366759801,0.0693791056215,0.0694934982112,0.0713809759404,0.0717241537093,0.070523031518,0.0712093870559,0.0713237796456,0.0708090129921,0.0707518166973,0.0715525648249,0.071838546299,0.0719529388886,0.0712665833507,0.0723533129524,0.0720673314783,0.0717813500041,0.0733828462592,0.0743551832712,0.0749843425143,0.0742407906816,0.0750987351039,0.0767574276538,0.0755563054625,0.0754419128729,0.0768718202435,0.0774437831917,0.076700231359,0.0754419128729,0.0755563054625,0.0755563054625,0.0754991091677,0.0754419128729,0.0781873350244,0.0781301387296,0.0777869609607,0.0777869609607,0.077043409128,0.0775581757814,0.07801574614,0.0773865868969,0.0765858387694,0.0766430350642,0.0753275202832,0.0750987351039,0.0761854647056,0.0772721943073,0.0785877090882,0.0793884572157,0.0795600461002,0.0788164942675,0.0791596720364,0.0795028498054,0.078988083152,0.0789308868571,0.0777869609607,0.0759566795263,0.0749843425143,0.0744695758609,0.0739548092075,0.0759566795263,0.0749271462195,0.0736116314385,0.0739548092075,0.0731540610799,0.0728680796058,0.0736688277333,0.0737260240282,0.073783220323,0.0731540610799,0.0731540610799,0.0736688277333,0.0738404166178,0.073440042554,0.0730396684903,0.073440042554,0.0735544351437,0.0741263980919,0.0722389203627,0.0722389203627,0.0712665833507,0.0725249018369,0.0710377981714,0.0703514426335,0.0714381722352,0.0709806018766,0.0707518166973,0.0688643389681,0.070523031518,0.0704086389284,0.0702942463387,0.0686927500836,0.0692075167371,0.0689787315578,0.0683495723147,0.0670912538286,0.0664048982907,0.0669196649441,0.0654897575735,0.0654897575735,0.0652609723942,0.0648605983304,0.0654325612787,0.0664048982907,0.0661761131114,0.0669768612389,0.0664620945855,0.0677776093665,0.0677204130716,0.0664048982907,0.0659473279321,0.0664620945855,0.0651465798046,0.0652609723942,0.065318168689,0.0637738687288,0.0630875131909,0.0621723724737,0.063373494665,0.0652037760994,0.0652037760994,0.0648034020356,0.0650893835097,0.0638310650236,0.0617719984099,0.0613144280514,0.0626299428323,0.0623439613582,0.0609140539876,0.0593697540273,0.0594269503222,0.0594269503222,0.0591981651429,0.0586833984894,0.0587405947843,0.0586833984894,0.057539472593,0.057196294824,0.0576538651826,0.0590265762584,0.0586833984894,0.0582830244257,0.0578254540671,0.0587405947843,0.0605136799238,0.0616576058203,0.0620579798841,0.0641170464977,0.0637738687288,0.0621151761789,0.0613716243462,0.0621151761789,0.0624583539478,0.0629159243064,0.0619435872944,0.0616004095255,0.0610856428721,0.0586833984894,0.0582258281309,0.0600561095652,0.0607996613979,0.0607996613979,0.0610284465772,0.0610284465772,0.0610856428721,0.0618291947048,0.0625155502427,0.0630303168961,0.0636022798443,0.0632019057805,0.0644030279718,0.0638882613184,0.064345831677,0.063716672434,0.065661346458,0.0654897575735,0.0657185427528,0.0662333094062,0.066290505701,0.0653753649839,0.0642886353822,0.066290505701,0.0668052723545,0.067606020482,0.0678348056613,0.0694363019164,0.0697222833905,0.0688071426733,0.0689787315578,0.0699510685698,0.0721245277731,0.0702942463387,0.0709806018766,0.0712093870559,0.0717813500041,0.0719529388886,0.0734972388489,0.0749843425143,0.0769862128331,0.0779013535503,0.0769862128331,0.0785305127934,0.080932757176,0.0820194867776,0.0816191127139,0.0828202349052,0.0823626645466,0.0826486460207,0.081905094188,0.0828202349052,0.083220608969,0.0833350015586,0.0831062163793,0.0833350015586,0.0833921978534,0.0833921978534,0.0845933200447,0.0859660311205,0.0864807977739,0.0874531347859,0.0882538829135,0.0893978088099,0.0878535088497,0.0871671533118,0.0893978088099,0.0893406125151,0.0915712680133,0.091971642077,0.0936303346269,0.0946598679338,0.097519682675,0.0983204308025,0.100436693711,0.102152582556,0.10243856403,0.103239312157,0.102953330683,0.104440434349,0.104840808412,0.105469967655,0.104669219528,0.105870341719,0.107071463911,0.109073334229,0.109874082357,0.109874082357,0.111475578612,0.111933148971,0.113935019289,0.114564178533,0.11547931925,0.115422122955,0.115078945186,0.1171380118,0.120055022836,0.124516333832,0.125717456023,0.128806055944,0.134754470605,0.140073726024,0.147394851762,0.154944762678,0.163295421723,0.168214303077,0.171531688177,0.176278980648,0.181369450887,0.185030013756,0.185144406345,0.188576184035,0.191321606186,0.190692446943,0.190406465469,0.190463661764,0.192007961724,0.191779176545,0.192236746904,0.192637120967,0.192065158019,0.1900632877,0.186459921126,0.185487584114,0.184000480449,0.181769824951,0.178852813915,0.175992999174,0.173075988137,0.170273369691,0.168385891962,0.163924580966,0.159577662559,0.156775044113,0.153286070128,0.151227003515,0.145964944391,0.142018400048,0.138758211243,0.134754470605,0.130636337378,0.12840568188,0.126575400446,0.125831848613,0.122457267218,0.119883433951,0.121828107975,0.121484930206,0.12022661172,0.119711845067,0.121027359848,0.122114089449,0.12188530427,0.119368667298,0.119883433951,0.118968293234,0.117652778453,0.117538385863,0.116394459967,0.114792963712,0.112619504508,0.110160063831,0.109016137935,0.107929408333,0.105813145424,0.105584360245,0.104211649169,0.10232417144,0.102095386261,0.103525293631,0.10232417144,0.100436693711,0.0983776270973,0.0979200567387,0.0970621123164,0.0962613641888,0.0940879049855,0.0928295864994,0.090999305065,0.0893406125151,0.0901413606427,0.0901985569375,0.0904845384116,0.0885398643876,0.0888258458617,0.0883682755031,0.089054631041,0.0891690236306,0.0880250977342,0.0872243496066,0.0855084607619,0.0866523866584,0.0856228533516,0.0859660311205,0.0859660311205,0.0849364978137,0.0843073385706,0.0839069645068,0.0845933200447,0.0840213570965,0.0837925719172,0.0821910756621,0.0813903275346,0.0820766830725,0.081905094188,0.0814475238294,0.0816763090087,0.0817907015984,0.0827630386104,0.0818478978932,0.0837353756224,0.0840785533913,0.0856228533516,0.084192945981,0.0831062163793,0.0839641608017,0.0841357496861,0.0844789274551,0.0847077126344,0.0866523866584,0.0852224792878,0.0841357496861,0.083849768212,0.0853940681723,0.0869383681325,0.0854512644671,0.085165282993,0.0853940681723,0.0852796755826,0.0863092088894,0.0872243496066,0.0885970606824,0.0897409865789,0.0903129495271,0.090026968053,0.0927151939097,0.09425949387,0.0944882790493,0.0934015494476,0.0930011753839,0.0933443531528,0.0955750086509,0.0970049160215,0.0976912715594,0.0995787492886,0.0990067863404,0.100150712237,0.101180245544,0.1038684714,0.106385108373,0.108501371281,0.109816886062,0.11204754156,0.114163804469,0.116108478493,0.117995956222,0.118281937696,0.119826237656,0.120455396899,0.121141752437,0.121427733911,0.122628856103,0.121656519091,0.122342874629,0.122400070923,0.123486800525,0.125488670844,0.127032970804,0.127376148573,0.129606804071,0.131551478095,0.132924189171,0.134754470605,0.138415033474,0.140531296383,0.142475970407,0.144706625905,0.145964944391,0.149453918375,0.149339525786,0.149568310965,0.150769433156,0.15116980722,0.150655040566,0.150483451682,0.151570181284,0.151112610925,0.15259971459,0.153343266423,0.154029621961,0.15437279973,0.152428125706,0.153343266423,0.153915229371,0.155116351563,0.153686444192,0.154658781204,0.156431866344,0.156203081164,0.156546258933,0.156431866344,0.158090558894,0.159177288495,0.159291681085,0.159692055149,0.160835981045,0.159005699611,0.158605325547,0.158490932957,0.159177288495,0.160607195866,0.161808318057,0.162094299531,0.162208692121,0.163810188376,0.164782525388,0.167928321603,0.16564046981,0.16564046981,0.164610936504,0.164668132798,0.162494673595,0.16421056244,0.164038973555,0.162952243954,0.162895047659,0.163066636543,0.162837851364,0.162265888416,0.164324955029,0.164496543914,0.164954114272,0.162265888416,0.160950373635,0.158662521842,0.157003829292,0.156889436702,0.157232614471,0.157918970009,0.156088688575,0.155688314511,0.156489062639,0.155688314511,0.156260277459,0.1591200922,0.161407943993,0.158147755188,0.158548129252,0.157404203356,0.15603149228,0.156088688575,0.155116351563,0.156889436702,0.156374670049,0.155459529332,0.153343266423,0.154944762678,0.154029621961,0.154201210846,0.153915229371,0.153743640487,0.153572051602,0.152142144232,0.151570181284,0.148996348017,0.149453918375,0.148881955427,0.148481581363,0.147452048056,0.146708496224,0.144477840725,0.143333914829,0.143619896303,0.141961203753,0.142189988933,0.140760081562,0.137728677936,0.135898396502,0.136699144629,0.137614285347,0.138300640884,0.136985126104,0.135154844669,0.135669611323,0.137614285347,0.13801465941,0.138529426064,0.137671481641,0.134640078016,0.133896526183,0.131837459569,0.131780263275,0.131437085506,0.130865122557,0.128005307816,0.125603063434,0.125774652318,0.125831848613,0.125545867139,0.12365838941,0.122228482039,0.12011221913,0.116566048851,0.113134271162,0.1105032416,0.109016137935,0.106213519488,0.105069593592,0.103639686221,0.101695012197,0.100551086301,0.0987780011611,0.0993499641093,0.0985492159818,0.0998647307627,0.0990639826352,0.0978628604439,0.0977484678543,0.0964901493681,0.0966617382526,0.0955750086509,0.0950602419975,0.0947170642286,0.0963185604837,0.093287156858,0.0928295864994,0.0922576235511,0.090370145822,0.090370145822,0.0891690236306,0.0895122013996,0.0893978088099,0.0885398643876,0.0868239755429,0.0873959384911,0.0873387421963,0.0883682755031,0.0879107051445,0.0881966866186,0.0889402384514,0.0896265939892,0.0900841643478,0.0900841643478,0.0901985569375,0.0892834162203,0.0889402384514,0.087109957017,0.0884826680928,0.088082294029,0.0878535088497,0.0870527607222,0.0866523866584,0.0862520125946,0.0865379940687,0.0875103310808,0.0868811718377,0.0877963125549,0.0866523866584,0.0856228533516,0.0835065904431,0.0824198608414,0.0828202349052,0.0819622904828,0.0812187386501,0.0800176164588,0.0792168683313,0.0796744386899,0.079617242395,0.0805323831122,0.0823054682518,0.0833921978534,0.0823626645466,0.0816763090087,0.0807611682915,0.0797888312795,0.0802464016381,0.0784161202037,0.0769862128331,0.0758994832315,0.0766430350642,0.0754419128729,0.0754419128729,0.0767574276538,0.0768146239487,0.07801574614,0.0778441572555,0.0778441572555,0.077043409128,0.0764714461797,0.0744695758609,0.0748699499246,0.0751559313988,0.0728680796058,0.0721817240679,0.0718957425938,0.0721245277731,0.0720673314783,0.0724105092472,0.0733828462592,0.0733828462592,0.0712665833507,0.0706374241077,0.0715525648249,0.0725249018369,0.0711521907611,0.0702370500439,0.0696078908008,0.0693219093267,0.0688643389681,0.0674916278923,0.0682923760199,0.0685211611992,0.0684067686095,0.0686355537888,0.0684639649044,0.0688071426733,0.0693219093267,0.0710949944663,0.0703514426335,0.0697794796853,0.0700654611594,0.069550694506,0.0704086389284,0.0693219093267,0.0691503204422,0.0688643389681,0.0687499463785,0.0673772353027,0.0670912538286,0.0676632167768,0.0673772353027,0.0667480760596,0.0651465798046,0.0650893835097,0.0652609723942,0.0640598502029,0.064345831677,0.0648034020356,0.0641742427926,0.0649177946253,0.0642886353822,0.064689009446,0.0651465798046,0.065661346458,0.0656041501632,0.0661189168166,0.0659473279321,0.065318168689,0.0651465798046,0.065318168689,0.0661761131114,0.0657757390476,0.0654325612787,0.0652037760994,0.0658901316373,0.0658901316373,0.066290505701,0.0661189168166,0.0665764871752,0.0658901316373,0.0654325612787,0.0661189168166,0.0664620945855,0.0650893835097,0.0637738687288,0.0632019057805,0.0617148021151,0.0606852688083,0.0612572317565,0.0605708762186,0.0601705021549,0.0595985392066,0.0590265762584,0.0597129317963,0.0599989132704,0.0614860169358,0.0623439613582,0.0629159243064,0.0626299428323,0.062744335422,0.0626871391271,0.0621151761789,0.062401157653,0.0622295687685,0.0625155502427,0.0603992873342,0.0600561095652,0.0611428391669,0.0597129317963,0.0596557355015,0.0595985392066,0.0603992873342,0.0603992873342,0.0609712502824,0.0599989132704,0.0602848947445,0.0599417169756,0.0583974170153,0.0605136799238,0.0605136799238,0.0595413429118,0.0588549873739,0.0584546133101,0.0581114355412,0.0586833984894,0.0600561095652,0.0602848947445,0.0607424651031,0.0595413429118,0.0592553614377,0.0591981651429,0.0584546133101,0.0583974170153,0.057196294824,0.0566243318758,0.0551944245052,0.0546224615569,0.0539933023139,0.0534785356605,0.053306946776,0.0535357319553,0.0534785356605,0.0530781615967,0.0542220874932,0.0545652652621,0.0549084430311,0.0551944245052,0.0558807800431,0.0561667615172,0.0566815281706,0.0572534911188,0.0572534911188,0.0574250800033,0.0566243318758,0.0559379763379,0.0557091911586,0.0547368541466,0.0540504986087,0.0531353578915,0.052963769007,0.0524490023536,0.0526777875329,0.053306946776,0.0538789097242,0.0546224615569,0.0547368541466,0.0554804059793,0.0564527429913,0.0575966688878,0.0578826503619,0.0586833984894,0.0584546133101,0.0574822762981,0.0567959207603,0.0558807800431,0.0566243318758,0.0561667615172,0.0553088170948,0.0545080689673,0.052963769007,0.0517626468157,0.0511334875727,0.0521630208795,0.0533641430708,0.0534785356605,0.0527921801226,0.0524490023536,0.0523918060588,0.0530781615967,0.0527921801226,0.0526777875329,0.0537645171346,0.0522202171743,0.0518770394054,0.0525061986485,0.0525061986485,0.0529065727122,0.0538217134294,0.0534213393656,0.0544508726725,0.0548512467362,0.0549656393259,0.056223957812,0.0553088170948,0.0552516208,0.0554804059793,0.0559379763379,0.0546796578518,0.0549656393259,0.0554804059793,0.0561095652224,0.0556519948638,0.0554232096845,0.0564527429913,0.0568531170551,0.0554804059793,0.0547368541466,0.0553088170948,0.0554232096845,0.0549656393259,0.0541076949035,0.0541648911983,0.0535357319553,0.0472441395246,0.0413529211578,0.037063199046,0.0321443176911,0.0)
ycorr <- c(1.94651025506e-05,1.90930183046e-05,1.79748683336e-05,1.60956586305e-05,1.34595801807e-05,1.00706414465e-05,5.92284759362e-06,1.79671026818e-06,-2.30521041212e-06,-6.3577961916e-06,-1.03579832515e-05,-1.43088368895e-05,-1.82047147856e-05,-2.2032141672e-05,-2.57749600426e-05,-2.94159247537e-05,-3.29487105132e-05,-3.63757065381e-05,-3.96841752859e-05,-4.28745338356e-05,-4.59552443917e-05,-4.89122409961e-05,-5.17526594285e-05,-5.44713480371e-05,-5.70754859249e-05,-5.95707359741e-05,-6.1962689594e-05,-6.42409914263e-05,-6.64050412876e-05,-6.84698706567e-05,-7.04522004662e-05,-7.23477373185e-05,-7.41645633012e-05,-7.59194820203e-05,-7.76230157495e-05,-7.92824440374e-05,-8.09007083166e-05,-8.24997407595e-05,-8.40955419075e-05,-8.56875202634e-05,-8.72615390723e-05,-8.88193490527e-05,-9.03633775905e-05,-9.18896937948e-05,-9.33832764651e-05,-9.48451839727e-05,-9.62714841152e-05,-9.76533879907e-05,-9.89766040621e-05,-0.00010024063974,-0.000101447991268,-0.000102606258198,-0.000103716478396,-0.000104787800874,-0.000105826802775,-0.000106830149172,-0.00010780373872,-0.000108748129156,-0.000109672326486,-0.000110567162642,-0.00011143237252,-0.000112270179096,-0.000113087572723,-0.000113870944485,-0.000114621967588,-0.000115338222125,-0.000116022785539,-0.00011668081776,-0.000117315174047,-0.000117939135169,-0.00011856141555,-0.000119184853898,-0.000119806510531,-0.00012042375063,-0.000121039566505,-0.000121657122742,-0.00012228396926,-0.000122909990118,-0.000123529470779,-0.000124133270904,-0.000124714729999,-0.000125278987005,-0.000125814270844,-0.00012632417287,-0.000126813740735,-0.000127284387336,-0.000127726135228,-0.000128132053459,-0.000128505248725,-0.000128840172036,-0.000129148812273,-0.000129426620642,-0.000129668726241,-0.000129882130166,-0.000130064041299,-0.000130215002125,-0.000130332458896,-0.000130441950317,-0.000130549709242,-0.000130670470379,-0.000130798801422,-0.000130928426563,-0.000131070452256,-0.000131231308727,-0.000131415853312,-0.000131627698909,-0.000131874714327,-0.000132152619581,-0.000132439498839,-0.00013273916837,-0.00013305224712,-0.000133389753125,-0.000133748592876,-0.000134123786373,-0.000134514514458,-0.000134917177693,-0.000135335189947,-0.0001357560979,-0.000136193274126,-0.000136650156259,-0.000137124465204,-0.000137607873691,-0.00013811335616,-0.000138647872131,-0.000139200334117,-0.00013976151172,-0.000140327921769,-0.000140899091802,-0.000141487964279,-0.000142094617487,-0.000142717151264,-0.000143356037693,-0.000143997384043,-0.00014463009711,-0.000145262871629,-0.000145916305416,-0.000146606335967,-0.00014733777623,-0.000148101910585,-0.000148891900369,-0.000149707159418,-0.000150551590585,-0.000151429902117,-0.000152351647052,-0.000153311948809,-0.000154296408903,-0.000155292449303,-0.000156294943368,-0.000157314971458,-0.000158352899155,-0.000159411062639,-0.000160488610727,-0.000161587908801,-0.000162708356945,-0.0001638611417,-0.000165051121622,-0.000166293925777,-0.000167592950013,-0.000168946522207,-0.000170352494432,-0.000171834780941,-0.000173396637046,-0.000175040957207,-0.00017677520606,-0.000178589463434,-0.000180492201963,-0.000182474702572,-0.000184531298823,-0.000186663920707,-0.000188863995746,-0.000191107968504,-0.000193374304186,-0.000195656980757,-0.00019794436445,-0.000200237580395,-0.000202535764186,-0.000204825132394,-0.000207104856372,-0.00020935931521,-0.000211593589653,-0.00021381931178,-0.000216051597944,-0.000218288354541,-0.000220536637206,-0.000222808214001,-0.000225084353742,-0.000227364877416,-0.000229649940883,-0.000231951990106,-0.000234279065878,-0.000236612501984,-0.000238946816481,-0.000241284088774,-0.000243617680566,-0.000245936111564,-0.000248241081882,-0.000250542465198,-0.000252850962552,-0.000255170908038,-0.000257496445953,-0.000259838635794,-0.000262213189052,-0.000264619259175,-0.000267059511692,-0.000269528642848,-0.000272032208847,-0.000274558337516,-0.000277104043123,-0.000279649972898,-0.000282195947208,-0.000284738754642,-0.000287269676807,-0.000289782156674,-0.000292280859868,-0.000294749471057,-0.000297191816087,-0.000299611317815,-0.000302004286656,-0.000304364904628,-0.000306697548169,-0.000308984910148,-0.000311217150272,-0.000313389512887,-0.000315500258741,-0.000317558768306,-0.000319580151873,-0.0003215683075,-0.00032351646588,-0.000325443165979,-0.000327350574161,-0.000329258622313,-0.000331194190886,-0.000333177039662,-0.000335194493157,-0.00033724880668,-0.000339323690079,-0.000341409666958,-0.000343516161105,-0.000345639746945,-0.000347777526261,-0.000349928619376,-0.000352073840834,-0.000354183574812,-0.000356263876434,-0.00035832973259,-0.000360383307366,-0.000362430669764,-0.00036447730808,-0.000366519522295,-0.000368556138711,-0.000370575178659,-0.000372571433242,-0.0003745633792,-0.000376560827483,-0.000378549976812,-0.000380521338741,-0.000382463471679,-0.000384370200189,-0.000386234619215,-0.00038806075635,-0.00038984526111,-0.000391600703041,-0.000393328280702,-0.000395007627898,-0.000396632863509,-0.000398215828671,-0.000399774691197,-0.0004013191892,-0.000402849079891,-0.000404361634934,-0.000405856507767,-0.000407339811697,-0.000408801947265,-0.000410247560946,-0.000411685024095,-0.000413104418869,-0.000414491657035,-0.000415824650431,-0.000417101666943,-0.000418321371139,-0.000419480446185,-0.000420563337582,-0.000421557382062,-0.000422463842721,-0.000423281925162,-0.00042400952254,-0.000424652176923,-0.000425211605181,-0.000425689979935,-0.000426068252069,-0.000426345061848,-0.000426521884739,-0.000426607410388,-0.000426603982244,-0.000426507171019,-0.000426316213673,-0.000426028629966,-0.000425651150528,-0.000425179300368,-0.000424636451756,-0.000424036544157,-0.000423392662901,-0.000422708424531,-0.000421987219092,-0.000421243726958,-0.000420479407845,-0.000419704708463,-0.000418922867903,-0.000418143127999,-0.000417369614281,-0.000416604363141,-0.000415843029427,-0.00041509079809,-0.000414348861793,-0.000413607805061,-0.000412868109224,-0.000412128120718,-0.000411381483593,-0.000410627197351,-0.000409864427622,-0.000409084738242,-0.00040827853527,-0.000407445529853,-0.000406582180946,-0.00040569502243,-0.000404794843299,-0.000403881083439,-0.000402964842223,-0.000402047676865,-0.000401126837687,-0.000400197416087,-0.00039926625527,-0.000398334981737,-0.000397399106777,-0.000396460060567,-0.000395514752702,-0.000394559042222,-0.000393581667446,-0.000392573968991,-0.000391530053113,-0.000390461902681,-0.00038937341488,-0.000388262237846,-0.000387136688596,-0.000386001207034,-0.000384845016902,-0.000383663469902,-0.000382462163456,-0.000381258164458,-0.000380057383615,-0.000378863065223,-0.000377664333317,-0.000376462275608,-0.000375263772787,-0.000374059938766,-0.000372859382117,-0.000371669643329,-0.000370496401273,-0.000369325795081,-0.00036814123274,-0.000366938534794,-0.000365720431578,-0.000364493117936,-0.000363242285031,-0.000361960542874,-0.000360643113563,-0.000359299125813,-0.000357916256803,-0.000356499611591,-0.00035506728497,-0.00035362072136,-0.000352165604633,-0.000350699000741,-0.000349226071944,-0.000347754629254,-0.000346291396572,-0.000344827068556,-0.00034335754579,-0.000341889855639,-0.000340409213228,-0.000338911633821,-0.00033740303167,-0.000335885223549,-0.000334365565354,-0.000332842434678,-0.000331324036661,-0.000329809831225,-0.000328305880976,-0.000326815629154,-0.000325351294136,-0.000323930013464,-0.000322547725549,-0.000321202656255,-0.000319884396551,-0.000318593078091,-0.000317331439615,-0.000316099884575,-0.000314911126585,-0.000313769485665,-0.000312667490342,-0.000311600775444,-0.000310560027057,-0.000309553423988,-0.000308587875065,-0.000307677274893,-0.000306812831302,-0.000305982200867,-0.000305189125599,-0.000304420823945,-0.000303684874345,-0.00030298027497,-0.000302304501266,-0.000301664065653,-0.000301052111943,-0.000300455419217,-0.000299864973006,-0.000299289833081,-0.000298731203089,-0.00029818222968,-0.000297635903927,-0.000297088418135,-0.000296543915894,-0.000295995730592,-0.000295446095032,-0.000294902068561,-0.000294371343739,-0.000293862064488,-0.000293365927119,-0.000292890956101,-0.000292445551041,-0.000292035412489,-0.000291659174108,-0.000291312507544,-0.000290997043575,-0.000290704736857,-0.000290425783441,-0.000290160068613,-0.00028990073866,-0.000289646222307,-0.000289387764162,-0.000289115458433,-0.00028883030277,-0.000288526264276,-0.000288202732841,-0.000287856692044,-0.000287490658091,-0.000287103836336,-0.000286697134192,-0.000286275401473,-0.000285844813464,-0.000285403442722,-0.000284948466278,-0.000284477101749,-0.000283989289379,-0.000283487565991,-0.000282983881984,-0.000282474343439,-0.000281960925841,-0.000281434816316,-0.000280886534031,-0.000280317614254,-0.00027973520192,-0.000279152738527,-0.00027857516809,-0.000278004390605,-0.000277434302893,-0.000276857072214,-0.000276274274835,-0.000275689666952,-0.000275112413485,-0.000274544488745,-0.00027398157855,-0.000273410268638,-0.000272823928832,-0.000272223528613,-0.000271602396888,-0.000270961548484,-0.000270299857315,-0.000269617018248,-0.000268908645272,-0.000268168350151,-0.000267388821792,-0.000266569073676,-0.000265713738429,-0.000264809628626,-0.000263855817886,-0.000262854749239,-0.000261794196815,-0.000260671757526,-0.000259475518461,-0.000258204047388,-0.000256858519823,-0.000255443646839,-0.000253953735313,-0.000252392383339,-0.000250762389641,-0.0002490574958,-0.000247280333951,-0.000245435128896,-0.000243523244722,-0.000241545405342,-0.000239500752514,-0.000237388976567,-0.00023520831362,-0.000232964726292,-0.00023065901345,-0.000228293963367,-0.000225875231402,-0.00022340467004,-0.000220890095172,-0.000218340362053,-0.000215768042081,-0.000213176933309,-0.000210569097518,-0.00020793739335,-0.00020527910815,-0.000202596162867,-0.000199892084439,-0.000197158815469,-0.000194399132835,-0.00019160216018,-0.000188750543821,-0.000185834898193,-0.000182849691133,-0.000179798424592,-0.000176681357715,-0.000173499741222,-0.000170240515188,-0.000166900858041,-0.000163480218421,-0.000159976880487,-0.00015640245628,-0.000152764652466,-0.000149066629021,-0.000145308713015,-0.000141489322056,-0.000137613733244,-0.000133689356815,-0.000129723430698,-0.000125713412267,-0.00012166588441,-0.000117574792167,-0.000113441292854,-0.000109263433961,-0.000105048404316,-0.000100798604185,-9.65074036627e-05,-9.21756865188e-05,-8.78003201442e-05,-8.33939720752e-05,-7.89639771475e-05,-7.4510815728e-05,-7.00401799983e-05,-6.55522952821e-05,-6.10465987091e-05,-5.65233487488e-05,-5.19842017801e-05,-4.74334437216e-05,-4.28752119322e-05,-3.82933349048e-05,-3.36826304946e-05,-2.90430830005e-05,-2.43686733998e-05,-1.96642141175e-05,-1.493494443e-05,-1.01839834171e-05,-5.41474343661e-06,-6.28103158646e-07,4.17440713471e-06,8.98540256134e-06,1.37988167579e-05,1.8614849037e-05,2.34321041563e-05,2.82459801906e-05,3.30668371169e-05,3.78981215611e-05,4.27355721975e-05,4.75772516646e-05,5.24183980158e-05,5.72524579172e-05,6.20794375874e-05,6.68827211874e-05,7.16653212552e-05,7.64304356543e-05,8.11687699799e-05,8.58662105314e-05,9.05239229116e-05,9.51476542157e-05,9.97440220869e-05,0.000104319089108,0.000108901683168,0.000113536201526,0.000118258103576,0.000123088982802,0.000128178391456,0.000132971106968,0.000137609168731,0.000142118814595,0.000146527354901,0.00015087131456,0.000155179008771,0.000159430310489,0.000163585699893,0.00016761677703,0.000171495502293,0.000175062084954,0.000178882797494,0.00018281587918,0.000186824746861,0.000190870205448,0.000194912925605,0.000198907668837,0.000202839723999,0.000206697691862,0.000210465183083,0.000214130993302,0.00021767977674,0.000221084023306,0.000224326507271,0.00022738712308,0.000230232527396,0.000232840779967,0.000235188482076,0.000237253941312,0.000239020537021,0.000240475576174,0.000241600387483,0.000242389810663,0.000242832383899,0.000242923739957,0.000242665609985,0.000242068968285,0.00024113105363,0.000239866789168,0.000238283455917,0.000236385752253,0.000234179752678,0.000231678207835,0.000228901342906,0.000225876223591,0.000222617899379,0.000219151892624,0.000215501682944,0.000211685671328,0.000207718850742,0.000203620716889,0.000199419534406,0.000195137703274,0.000190794609112,0.000186390307297,0.000181940197142,0.000177451272981,0.000172929644629,0.000168383555541,0.000163825765201,0.000159266373953,0.000154709987193,0.000150162566307,0.000145621977359,0.000141095001303,0.000136586502223,0.000132085496178,0.0001276020355,0.000123136874935,0.000118689495822,0.000114259518791,0.000109848490454,0.000105453912624,0.000101069672867,9.66997961844e-05,9.23435083901e-05,8.80092579375e-05,8.3698702153e-05,7.94128176947e-05,7.51597843576e-05,7.09412713328e-05,6.6752495529e-05,6.25992755178e-05,5.84950645734e-05,5.44415259295e-05,5.04437233058e-05,4.65056942445e-05,4.26382408221e-05,3.88517249551e-05,3.5143223157e-05,3.15133784688e-05,2.79739135155e-05,2.45339970175e-05,2.11942309504e-05,1.79505070714e-05,1.48084962177e-05,1.17750944913e-05,8.84738536204e-06,6.02602095875e-06,3.31301264988e-06,7.12047425414e-07,-1.77532771516e-06,-4.15635015857e-06,-6.4315241498e-06,-8.59288547322e-06,-1.06310439692e-05,-1.25460260266e-05,-1.43422701642e-05,-1.60164046899e-05,-1.75723069091e-05,-1.90074359411e-05,-2.03201461411e-05,-2.15131942795e-05,-2.25829856325e-05,-2.35235002571e-05,-2.43397791968e-05,-2.50351212823e-05,-2.56012750433e-05,-2.60425671448e-05,-2.63556724181e-05,-2.654127744e-05,-2.65948561315e-05,-2.65127022858e-05,-2.62912606292e-05,-2.59296287746e-05,-2.54283837505e-05,-2.4785534985e-05,-2.39987904878e-05,-2.30668061144e-05,-2.19778532743e-05,-2.07249307915e-05,-1.93097046971e-05,-1.77260293533e-05,-1.59691470182e-05,-1.40427740856e-05,-1.19453220549e-05,-9.67723682425e-06,-7.23994345276e-06,-4.6306912046e-06,-1.86102383697e-06,1.07086715558e-06,4.17002926656e-06,7.43864841216e-06,1.08670622581e-05,1.44600669594e-05,1.82236760569e-05,2.21655696012e-05,2.62984419845e-05,3.06200096935e-05,3.51344767443e-05,3.98443346136e-05,4.47407483673e-05,4.98151897338e-05,5.50705392788e-05,6.05039478443e-05,6.60935944154e-05,7.18276181041e-05,7.76868628858e-05,8.36612070897e-05,8.97468501831e-05,9.59323044451e-05,0.000102208005817,0.00010856591492,0.000114997623065,0.000121494836786,0.000128059106765,0.000134703414412,0.00014142687929,0.000148234369781,0.000155118189491,0.000162071370965,0.000169101915649,0.000176213263757,0.000183408015815,0.000190688225348,0.00019805301326,0.00020548798176,0.000212983560733,0.000220526082634,0.000228108428933,0.000235726405376,0.00024337330366,0.000251028883893,0.000258683269734,0.00026632400145,0.000273939372364,0.000281526030196,0.000289072932657,0.000296572134415,0.000304020753566,0.00031141481122,0.000318740575295,0.000325997986811,0.000333186674469,0.00034028986988,0.000347304807297,0.000354213953785,0.00036101077368,0.000367701189605,0.000374273906246,0.000380728684484,0.000387052076974,0.000393243365992,0.000399295492362,0.000405206532468,0.000410984866103,0.00041663180481,0.000422153580469,0.00042753942911,0.000432795127372,0.000437922017311,0.000442926705043,0.000447819082728,0.000452593486842,0.000457259635896,0.000461815512847,0.00046625978154,0.000470601282836,0.000474845889167,0.000479003768864,0.000483066050148,0.000487033342922,0.000490894230105,0.000494643350837,0.000498280337634,0.000501791861112,0.000505172376711,0.000508418170064,0.000511517586639,0.000514454694258,0.000517216230749,0.000519797130422,0.000522191756772,0.000524402489201,0.000526426313655,0.00052826639513,0.000529925808874,0.000531394095222,0.000532669503214,0.000533749843677,0.000534649276618,0.000535378111984,0.00053594658794,0.000536368775992,0.00053664726785,0.000536783981045,0.000536780915942,0.000536652530888,0.00053641342318,0.000536075954786,0.000535644596726,0.000535122487739,0.000534505180831,0.000533786957562,0.000532970093858,0.000532067345303,0.00053109327447,0.000530051361678,0.000528942842214,0.000527775170329,0.000526553460508,0.00052527870035,0.000523955407278,0.000522594381972,0.000521194326812,0.000519751439627,0.000518259005184,0.000516707998768,0.000515092403575,0.000513396258235,0.000511607849616,0.00050972430223,0.000507746900973,0.000505664770631,0.000503472219281,0.000501168499174,0.000498755681727,0.00049622950179,0.00049359648207,0.000490868311549,0.000488053785716,0.000485162001922,0.000482190431918,0.000479142351019,0.00047603145219,0.000472867497828,0.000469658195333,0.000466396371098,0.000463094659324,0.000459750760126,0.000456371523318,0.000452953527045,0.000449503645294,0.000446031435794,0.000442534458355,0.000439006910311,0.000435439251367,0.000431847491725,0.000428234949426,0.00042459867902,0.000420933586188,0.000417231218235,0.000413489727321,0.000409695561243,0.000405848619953,0.000401950465962,0.000398002188964,0.000394004434265,0.000389944052573,0.000385829355641,0.000381665049562,0.000377470035064,0.000373249230344,0.000369012647364,0.000364769394441,0.000360521022077,0.000356284220387,0.000352069370701,0.000347888081063,0.000343754163361,0.000339673100621,0.000335638973726,0.000331662245335,0.000327758244546,0.000323941518445,0.000320230229902,0.000316625710121,0.000313128484061,0.000309746101284,0.000306478284966,0.000303328314413,0.000300310542705,0.000297437331131,0.000294699502655,0.00029209751014,0.000289623917504,0.00028727885603,0.000285067905351,0.000282991478665,0.00028105284775,0.000279257702746,0.000277604998313,0.000276082881775,0.000274701239214,0.00027345651858,0.000272346572165,0.000271372721807,0.000270522493867,0.000269794432511,0.000269185933167,0.000268689409282,0.000268292232146,0.000267984054778,0.000267757990241,0.000267595166663,0.000267493593246,0.000267445904858,0.000267458821872,0.000267529096555,0.000267650620137,0.000267818321926,0.000268029105267,0.000268302984563,0.000268642617136,0.000269058036311,0.000269550738232,0.000270120221374,0.000270762573334,0.000271470033965,0.000272247733089,0.000273094081073,0.000274014580231,0.000275001104935,0.000276032462227,0.00027710291969,0.000278206197729,0.000279340755451,0.000280501956728,0.000281698468063,0.000282922781186,0.000284174584968,0.000285453528551,0.00028674552967,0.000288065379412,0.000289421513602,0.00029081296604,0.000292238244811,0.000293699751484,0.000295193744012,0.000296709048439,0.000298245246582,0.000299800996662,0.000301379381795,0.000302979587858,0.000304585035886,0.000306190319655,0.000307793833689,0.000309390505444,0.000310968144953,0.000312529418413,0.000314071566837,0.000315582879395,0.000317058802324,0.00031849738934,0.000319896689066,0.000321263810118,0.000322593854262,0.000323880973844,0.000325132406585,0.000326349942262,0.000327533815165,0.000328687901902,0.000329821640713,0.000330931245037,0.000332016579488,0.000333087416365,0.000334140573695,0.000335181798583,0.000336209384256,0.000337213491278,0.000338198859922,0.000339169355914,0.000340118927811,0.000341040692617,0.000341931783781,0.000342775967915,0.000343568497755,0.000344309436979,0.000344992582033,0.000345627969477,0.00034620871677,0.000346728650449,0.000347172110401,0.000347539309938,0.000347833982542,0.000348058541324,0.000348214697406,0.000348294340776,0.000348288225182,0.000348195768429,0.000348006599062,0.000347721835505,0.000347345175261,0.000346881978552,0.000346327675877,0.000345677394357,0.000344931636087,0.000344096721266,0.00034318229538,0.000342191657221,0.000341123139964,0.000339978420808,0.000338768485226,0.000337495620906,0.000336163479945,0.000334772187797,0.000333325414922,0.000331816980886,0.000330250117217,0.000328620087739,0.00032692897576,0.000325172381652,0.000323348011648,0.000321443587976,0.00031945782174,0.000317397224025,0.0003152616597,0.000313056977182,0.000310779981496,0.000308415936453,0.000305963999334,0.00030343030209,0.000300820018861,0.000298130878003,0.000295363744469,0.000292512279156,0.000289570361986,0.000286536165228,0.000283404053438,0.00028017832524,0.000276863755987,0.000273457687942,0.000269952850787,0.000266356174849,0.000262685820716,0.000258942317457,0.000255128519966,0.000251247137965,0.00024730959324,0.000243330435597,0.000239326034286,0.00023530808311,0.000231285767256,0.000227265494519,0.000223232809457,0.000219180294472,0.000215121250062,0.000211054226983,0.00020698044394,0.000202894324846,0.000198780725537,0.000194632092778,0.000190440332049,0.000186198233453,0.000181909510187,0.000177592187899,0.000173243165297,0.000168857927143,0.00016443171366,0.000159967439634,0.000155468004434,0.000150937656254,0.000146373414633,0.000141781435953,0.000137167249775,0.000132518247129,0.000127825297405,0.000123093152437,0.00011832306744,0.000113522624756,0.00010869408506,0.000103835950801,9.89576056951e-05,9.40644564099e-05,8.91555791894e-05,8.42347702159e-05,7.93149978866e-05,7.44091493324e-05,6.95225032812e-05,6.46620987297e-05,5.98364065403e-05,5.50481236175e-05,5.02981571647e-05,4.55790606609e-05,4.08897314918e-05,3.62384281904e-05,3.16224310608e-05,2.70388906123e-05,2.24845591153e-05,1.79593112264e-05,1.34560853227e-05,8.97277134656e-06,4.50498848184e-06,6.56015460768e-08,-4.33931901489e-06,-8.71672515644e-06,-1.3067839279e-05,-1.73876136547e-05,-2.16779936705e-05,-2.59455253024e-05,-3.01907392736e-05,-3.44155510516e-05,-3.86165590212e-05,-4.27947482656e-05,-4.69546418855e-05,-5.1090623897e-05,-5.51994274947e-05,-5.92815736096e-05,-6.33381891316e-05,-6.73668704072e-05,-7.1372722345e-05,-7.5351478486e-05,-7.92990056984e-05,-8.32184957128e-05,-8.71094686377e-05,-9.09752727941e-05,-9.48188072742e-05,-9.86407867789e-05,-0.000102443308882,-0.000106226134168,-0.000109978284701,-0.000113686335141,-0.000117352432682,-0.000120978934896,-0.00012456415318,-0.000128095620522,-0.000131571348062,-0.000134993128065,-0.000138356755312,-0.000141656907993,-0.000144901331621,-0.000148102643596,-0.000151263245526,-0.000154372094356,-0.000157425451765,-0.000160430394211,-0.000163390458203,-0.000166301103074,-0.000169151925314,-0.000171936481817,-0.000174645018753,-0.000177272044838,-0.000179813499867,-0.000182271444222,-0.000184662472582,-0.000186996292816,-0.000189267796692,-0.000191491946154,-0.000193679351732,-0.000195847102563,-0.000197801525985,-0.000199356672473,-0.000200514751773,-0.000201284383013,-0.000201669986377)
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(29, 240, 432)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Oct4-DamID.dedup.merged.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) : 29,240,432',bty='n')
dev.off()