# R script for Peak Model
#  -- generated by MACS
p <- c(0.0209927176052,0.0244864840933,0.0283717933774,0.0314137797162,0.0360219372393,0.0359014625328,0.0366544294484,0.0365640734185,0.0368351415081,0.0370459722444,0.0357809878263,0.0364134800354,0.0356002757666,0.0361424119458,0.0356605131198,0.0363532426821,0.0362628866523,0.0368351415081,0.0371664469509,0.0374375150405,0.038672380782,0.0382206006327,0.0391241609313,0.0396060597573,0.0392446356378,0.0401180772598,0.0408108068221,0.0410517562351,0.0407505694689,0.0399072465235,0.0389434488716,0.0388229741651,0.038431431369,0.0381904819561,0.0382507193093,0.0369857348912,0.0364134800354,0.0359014625328,0.0352689703238,0.036443598712,0.0369254975379,0.037317040334,0.0374375150405,0.0382507193093,0.0390639235781,0.0396060597573,0.0399976025533,0.0399976025533,0.0407204507923,0.0407204507923,0.0405698574091,0.0407505694689,0.0406903321156,0.0405698574091,0.0396361784339,0.0400578399066,0.0394253476975,0.0401180772598,0.0402987893196,0.0402084332897,0.0406300947624,0.0401481959364,0.0410517562351,0.0408108068221,0.0414131803546,0.0411119935883,0.0411722309416,0.0419553165337,0.0419553165337,0.0429191141856,0.0431901822752,0.0433407756583,0.0430998262454,0.0444250480167,0.0437323184544,0.0446057600764,0.0443949293401,0.0434010130116,0.0433708943349,0.0424974527129,0.0422565033,0.0430697075687,0.0438226744843,0.0420456725636,0.0420757912402,0.0422866219766,0.0428287581558,0.0434913690414,0.0435817250713,0.0433708943349,0.0440335052206,0.0438527931609,0.0440937425739,0.0448467094894,0.0456900324348,0.0455695577283,0.0463225246439,0.0463225246439,0.0467140674399,0.0469248981763,0.0467140674399,0.0467140674399,0.0462622872906,0.0459008631712,0.0459611005244,0.0452683709621,0.0449069468426,0.0446659974297,0.0446961161063,0.0452683709621,0.0455996764049,0.046473118027,0.0461719312607,0.047346559649,0.0471357289126,0.0479188145048,0.0479188145048,0.0489127308333,0.049334392306,0.049093442893,0.0491536802463,0.0487621374502,0.0492139175995,0.0491837989229,0.0496958164255,0.0496656977488,0.0497259351021,0.0488223748034,0.0484007133307,0.0483705946541,0.0484308320074,0.0480694078879,0.0480694078879,0.0483103573009,0.0483103573009,0.0481597639178,0.0490030868632,0.0496355790722,0.0494849856891,0.0498765284852,0.0500572405449,0.0502680712813,0.0496355790722,0.0486115440671,0.0485814253905,0.0493042736294,0.0483404759775,0.0486115440671,0.0483705946541,0.0486115440671,0.0488223748034,0.0495151043657,0.0501777152514,0.0511415129033,0.051804123789,0.051322224963,0.0522860226149,0.0512619876098,0.0532799389434,0.0537618377694,0.0540630245356,0.0542738552719,0.0547557540979,0.0549364661576,0.0555689583667,0.0557195517498,0.055147296894,0.056020738516,0.0551171782173,0.0549665848342,0.0545750420381,0.0548461101277,0.0553280089537,0.0552075342472,0.0551774155706,0.0560809758692,0.0562918066056,0.0564725186653,0.0565026373419,0.0568038241081,0.0578278591133,0.0574965536704,0.0572857229341,0.0576170283769,0.0576170283769,0.0577375030834,0.0590627248547,0.0593036742677,0.0596650983872,0.0598156917703,0.0600867598599,0.0612613882481,0.0618035244273,0.0620444738403,0.061351744278,0.0611710322182,0.0606590147157,0.0611409135416,0.0614722189845,0.0618637617805,0.0613818629546,0.0611409135416,0.0612011508949,0.0618336431039,0.0628877967857,0.0630685088454,0.0634600516415,0.0638515944376,0.0643334932635,0.0645142053232,0.0646045613531,0.0645443239999,0.064694917383,0.064694917383,0.0646346800297,0.0650262228258,0.0649659854726,0.0649057481193,0.064694917383,0.065086460179,0.065568359005,0.0650563415024,0.0651768162089,0.065327409592,0.0663815632738,0.0670742928361,0.0673754796023,0.0683091585775,0.0693030749061,0.06891153211,0.069544024319,0.0710800768267,0.0719535184487,0.0727968413941,0.072646248011,0.0720438744786,0.0718932810955,0.0715920943293,0.0718029250656,0.0724052985981,0.0721342305085,0.072254705215,0.0717426877124,0.0709596021202,0.0702367538813,0.0707186527073,0.0721041118319,0.0723149425682,0.0721342305085,0.071772806389,0.0724956546279,0.0730377908071,0.0728570787474,0.0739112324291,0.0747846740512,0.0757183530264,0.0756882343498,0.0760195397926,0.0766520320017,0.0771339308276,0.0777664230367,0.0777965417133,0.078459152599,0.0780374911263,0.0786699833353,0.0782784405393,0.0789109327483,0.079573543634,0.0796036623106,0.0795434249574,0.0781579658328,0.0772845242107,0.0777363043601,0.0786398646587,0.0794229502509,0.0798747304002,0.0796940183405,0.0790615261314,0.079332594221,0.0810794774651,0.0830673101221,0.0831877848286,0.0829468354156,0.082916716739,0.0825552926195,0.0821035124702,0.0830371914455,0.0838202770376,0.0832480221818,0.0831877848286,0.0825251739429,0.0840612264506,0.0847539560129,0.0849346680726,0.0846937186596,0.085537041605,0.0848443120427,0.086259889844,0.0877055863218,0.0866213139634,0.0889103333866,0.0933678975266,0.0971327321043,0.101018041388,0.105325012145,0.111047560703,0.116830346615,0.121227673402,0.125715356218,0.131889684926,0.133154669344,0.134961789941,0.136588198478,0.137792945543,0.139057929961,0.138214607016,0.137582114807,0.137341165394,0.137341165394,0.138214607016,0.141015643942,0.139509710111,0.139419354081,0.139509710111,0.139841015554,0.141497542768,0.143244426012,0.143515494101,0.14478047852,0.143666087485,0.144931071903,0.145202139992,0.146617717793,0.148515194421,0.149117567953,0.149448873396,0.14860555045,0.148726025157,0.148906737217,0.150623501784,0.150141602958,0.15324382665,0.153183589297,0.153816081506,0.154538929745,0.155412371367,0.156586999755,0.158514595059,0.158815781825,0.158845900502,0.16002052889,0.157580916084,0.159207324621,0.159357918004,0.159960291537,0.158665188442,0.159719342124,0.159086849915,0.160351834333,0.160592783746,0.161104801248,0.162670972433,0.164267262294,0.166044264214,0.166134620244,0.169417555996,0.169809098792,0.171766812772,0.172610135718,0.173363102633,0.172881203807,0.174718443081,0.174266662932,0.173543814693,0.173784764106,0.172941441161,0.174929273818,0.174477493668,0.175923190146,0.177459242654,0.180230160903,0.180471110316,0.181284314585,0.181103602525,0.182007162824,0.183814283421,0.183031197829,0.184115470187,0.183543215331,0.184687725043,0.185470810635,0.185922590784,0.186223777551,0.18649484564,0.188964577123,0.188151372854,0.189386238596,0.188844102417,0.190410273601,0.189627188009,0.187910423441,0.187820067412,0.187488761969,0.190319917571,0.189807900069,0.191434308606,0.192428224935,0.195560567303,0.195108787154,0.196735195692,0.198211010846,0.198512197612,0.201493946598,0.200168724826,0.201463827921,0.202668574986,0.201855370717,0.200349436886,0.201403590568,0.201584302628,0.203451660578,0.206102104121,0.207668275305,0.208752547664,0.209083853106,0.209656107962,0.21119216047,0.212125839445,0.212547500918,0.213210111804,0.211794534002,0.210890973704,0.208903141047,0.210529549584,0.211704177972,0.211734296649,0.212848687684,0.21333058651,0.214173909455,0.216432810202,0.218390524182,0.220679543606,0.222095121407,0.220950611695,0.220408475516,0.220679543606,0.220649424929,0.222787850969,0.221191561108,0.21983622066,0.220739780959,0.219625389924,0.220227763456,0.223661292591,0.225257582452,0.225558769218,0.226462329517,0.225859955985,0.227817669965,0.228269450114,0.227877907318,0.228600755557,0.228239331438,0.225890074661,0.227004465696,0.22902241703,0.22875134894,0.228691111587,0.229082654383,0.231733097926,0.231040368363,0.231582504543,0.230769300274,0.232907726314,0.231672860573,0.231281317776,0.231040368363,0.231763216602,0.232727014254,0.232516183518,0.233148675727,0.232636658224,0.2335703372,0.232335471458,0.23302820102,0.231913809985,0.231853572632,0.231672860573,0.230317520125,0.228389924821,0.230136808065,0.229474197179,0.230166926741,0.229624790562,0.228570636881,0.227787551288,0.227124940403,0.22670327893,0.227185177756,0.227124940403,0.223420343178,0.224414259507,0.223028800382,0.223932360681,0.223239631118,0.22215535876,0.222034884054,0.221703578611,0.219775983307,0.219263965804,0.221010849049,0.218812185655,0.216071386083,0.214354621515,0.211523465913,0.209505514579,0.208270648838,0.206041866768,0.205891273385,0.203270948518,0.199988012767,0.198963977762,0.19986753806,0.19772911202,0.201132522478,0.200198843503,0.200409674239,0.201644539981,0.200831335712,0.19977718203,0.199204927175,0.198843503055,0.198512197612,0.198602553642,0.195440092597,0.196042466129,0.193813684059,0.19113312184,0.188783865064,0.190169324188,0.191976444785,0.190289798895,0.188783865064,0.188452559621,0.187247812556,0.186344252257,0.18676591373,0.185621404018,0.185621404018,0.183573334008,0.181284314585,0.1820372815,0.180471110316,0.179236244574,0.17998921149,0.179597668694,0.17803149751,0.177700192067,0.17767007339,0.177007462505,0.176073783529,0.174658205728,0.173995594842,0.172549898365,0.17125479527,0.172459542335,0.17107408321,0.171796931449,0.171857168802,0.170953608504,0.170019929528,0.170110285558,0.169297081289,0.170140404235,0.170019929528,0.169236843936,0.169748861439,0.169718742762,0.17125479527,0.17553164735,0.182639655033,0.18685626976,0.193060717144,0.198753147025,0.202156557483,0.204023915434,0.206704477653,0.207216495156,0.204355220877,0.199325401881,0.191735495372,0.185139505192,0.179206125898,0.170923489827,0.164990110533,0.15983981683,0.154177505625,0.148936855893,0.146949023236,0.145864750878,0.141467424091,0.136829147891,0.130745175214,0.126016542984,0.120986723989,0.115685836903,0.109300677459,0.10457204523,0.0984880725523,0.0920727944319,0.0885489092672,0.0863201271972,0.0848443120427,0.0834588529182,0.0821637498234,0.0814107829079,0.081802325704,0.0819830377637,0.0821637498234,0.0821035124702,0.0813806642313,0.081561376291,0.0814107829079,0.0807782906988,0.0801759171664,0.0795434249574,0.0794530689275,0.0793928315743,0.0789711701016,0.0793627128976,0.079332594221,0.0792121195145,0.0791217634847,0.0789109327483,0.0788506953951,0.0790314074548,0.0784290339224,0.0770435747978,0.0763508452355,0.0748449114044,0.0743027752252,0.0733088588967,0.0721041118319,0.0710198394735,0.0696644990255,0.0680682091646,0.0673754796023,0.0670742928361,0.0668935807763,0.0674357169555,0.0670441741594,0.0671044115127,0.0671646488659,0.066923699453,0.0667429873932,0.0672851235724,0.0686103453438,0.0677067850451,0.0671646488659,0.0665923940101,0.0671947675425,0.0662912072439,0.0648756294427,0.0653876469453,0.0651466975323,0.0648756294427,0.0637311197311,0.0638817131142,0.064213018557,0.0631588648753,0.0615324563377,0.0609300828053,0.0605686586858,0.0602674719196,0.0602975905962,0.0594843863274,0.0587916567652,0.0587013007353,0.05776762176,0.056894180138,0.0572857229341,0.0570748921977,0.0580386898496,0.0572254855808,0.0564423999887,0.0556291957199,0.0550870595407,0.0541232618888,0.0542136179187,0.0546051607148,0.0541232618888,0.0546955167446,0.0544545673317,0.0536112443863,0.0538220751226,0.0541834992421,0.0539124311525,0.0550268221875,0.0540027871823,0.0531293455603,0.0540630245356,0.0530992268837,0.0526173280577,0.0530691082071,0.0529787521772,0.0528582774707,0.0534907696798,0.0521053105552,0.0526474467344,0.0536413630629,0.0527679214409,0.0526173280577,0.052436615998,0.0525570907045,0.0513824623163,0.0512017502565,0.050207833928,0.0505090206942,0.0497861724553,0.0490030868632,0.0491536802463,0.0486416627437,0.0484308320074,0.0473766783256,0.048460950684,0.0480694078879,0.0481898825944,0.0477079837684,0.0481296452411,0.0481597639178,0.0480694078879,0.0483705946541,0.0480694078879,0.0487320187736,0.0481296452411,0.0485513067138,0.0484308320074,0.049334392306,0.0488524934801,0.0485513067138,0.0484007133307,0.0489729681865,0.0496054603956,0.0489729681865,0.0488524934801,0.0479489331814,0.0482501199476,0.0474670343555,0.0477079837684,0.0480392892113,0.0475573903853,0.0477682211217,0.0470453728828,0.0478886958282,0.0481898825944,0.0486717814203,0.0477381024451,0.0481597639178,0.0477682211217,0.047105610236,0.0475573903853,0.0467743047932,0.0463827619971,0.0449973028725,0.0441238612505,0.0440636238972,0.0441840986037,0.0443949293401,0.0443648106635,0.0448467094894,0.0435817250713,0.0434010130116,0.0433407756583,0.0440335052206,0.0441238612505,0.0434612503648,0.044244335957,0.0438527931609,0.0437323184544,0.0435817250713,0.0443045733102,0.0437021997778,0.0438226744843,0.0430094702155,0.0434913690414,0.0430094702155,0.0428287581558,0.0427685208025,0.0438226744843,0.0437323184544,0.0432203009518,0.0434913690414,0.0430395888921,0.0436118437479,0.0434010130116,0.0435516063947,0.0422263846233,0.0411119935883,0.0396964157871,0.039545822404,0.039304872991,0.0392747543144,0.0399373652001,0.0401783146131,0.039786771817,0.0404493827027,0.0413830616779,0.0411722309416,0.0413228243247,0.0415035363844,0.0416541297675,0.0413830616779,0.0413228243247,0.0414432990312,0.0411722309416,0.0404795013793,0.0402686706429,0.041533655061,0.0414734177078,0.0406300947624,0.040901162852,0.0414131803546,0.0412927056481,0.0405999760858,0.0413529430013,0.0421661472701,0.0424974527129,0.0416240110909,0.041774604474,0.0431600635986,0.0430094702155,0.0430697075687,0.0433407756583,0.0429492328622,0.0427685208025,0.0422866219766,0.0418649605039,0.0418047231506,0.0416240110909,0.0405999760858,0.0408409254987,0.0402385519663,0.0398168904936,0.0403289079962,0.0399674838767,0.0396662971105,0.0398470091702,0.039545822404,0.0390338049015,0.0390036862248,0.0385820247521,0.0383410753392,0.03779893916,0.0374073963639,0.0378591765132,0.0383711940158,0.0389735675482,0.0394554663742,0.0402686706429,0.0403590266728,0.0394855850508,0.0401180772598,0.0402385519663,0.0399072465235,0.0388530928417,0.0386422621054,0.0378892951898,0.0379796512197,0.0376182271002,0.0379495325431,0.0387627368119,0.0383410753392,0.0382507193093,0.0390639235781,0.038913330195,0.0388832115183,0.0388229741651,0.0389735675482,0.0389434488716,0.0390639235781,0.0381302446028,0.0386422621054,0.0390639235781,0.0387326181352,0.0393952290209,0.0391241609313,0.0390940422547,0.0385820247521,0.038431431369,0.0380700072496,0.0383410753392,0.0376784644535,0.0377688204834,0.0370158535678,0.0368953788613,0.0370158535678,0.0368652601847,0.0369254975379,0.0367447854782,0.0365640734185,0.0371363282743,0.0373772776873,0.0369556162146,0.0374676337171,0.0371062095977,0.0369857348912,0.0363231240055,0.0365038360652,0.0359315812094,0.0356303944432,0.0352388516471,0.035329207677,0.0356002757666,0.0353894450303,0.0356906317965,0.0357809878263,0.0360520559159,0.0356906317965,0.0364737173886,0.0363231240055,0.0368953788613,0.0363833613588,0.0363532426821,0.0366544294484,0.0364737173886,0.0363833613588,0.0370760909211,0.0370459722444,0.0372869216574,0.0374676337171,0.0368652601847,0.0368351415081,0.0363833613588,0.0363231240055,0.0362930053289,0.0365038360652,0.0359014625328,0.0365339547419,0.0359918185627,0.0355099197367,0.0362930053289,0.0369254975379,0.0379194138665,0.0381904819561,0.0382206006327,0.0378591765132,0.0387928554885,0.0382507193093,0.0383711940158,0.0388530928417,0.0389434488716,0.0386422621054,0.0378892951898,0.0375881084236,0.0376182271002,0.03779893916,0.0367447854782,0.0369556162146,0.0368652601847,0.0370760909211,0.0361725306224,0.036443598712,0.0363532426821,0.0365941920951,0.036202649299,0.0360219372393,0.0360520559159,0.0364134800354,0.036684548125,0.0359315812094,0.0364737173886,0.0364737173886,0.0367749041548,0.0357809878263,0.0358412251796,0.0356906317965,0.0359616998861,0.0355400384134,0.0345160034082,0.0347268341446,0.0352087329705,0.0349979022342,0.034696715468,0.0356605131198,0.0359315812094,0.0360821745925,0.0357508691497,0.0352087329705,0.0355400384134,0.0353593263536,0.0350280209108,0.035088258264,0.0351484956173,0.0351786142939,0.0352087329705,0.0348774275277,0.035329207677,0.0357809878263,0.0355400384134,0.0365038360652,0.0359014625328,0.0358713438562,0.0354496823835,0.0351484956173,0.0348774275277,0.0361122932692,0.0358412251796,0.0359014625328,0.0368351415081,0.0361122932692,0.0359918185627,0.035811106503,0.0359014625328,0.0361122932692,0.035811106503,0.0346665967913,0.0352990890004,0.035088258264,0.0349376648809,0.0356002757666,0.0355400384134,0.0357508691497,0.0355099197367,0.0348473088511,0.0352087329705,0.0352388516471,0.035088258264,0.0349979022342,0.0349075462043,0.034455766055,0.0343051726719,0.034214816642,0.0343352913485,0.0351786142939,0.0352689703238,0.0354496823835,0.0350581395874,0.0348774275277,0.0349677835576,0.0351484956173,0.0357207504731,0.0359014625328,0.0359616998861,0.0358713438562,0.0361725306224,0.0359014625328,0.0360219372393,0.0362628866523,0.0352990890004,0.0351786142939,0.0354195637069,0.0347870714978,0.0350280209108,0.0347569528212,0.0337027991394,0.0337027991394,0.0334919684031,0.03334137502,0.0337931551693,0.0334016123732,0.0331305442836,0.0338232738459,0.0332510189901,0.0330401882538,0.0335220870797,0.0336124431096,0.0336726804628,0.0334618497265,0.0332209003135,0.0327691201642,0.0326486454577,0.0318053225123,0.0325884081045,0.0320161532486,0.0323173400149,0.0321366279551,0.0321366279551,0.0328293575174,0.0340341045823,0.035088258264,0.0348774275277,0.0357207504731,0.0352689703238,0.0360821745925,0.0357809878263,0.0361424119458,0.0360219372393,0.0352388516471,0.0344256473784,0.0341846979654,0.0345160034082,0.0332811376667,0.0332209003135,0.033100425607,0.0338533925226,0.0338835111992,0.033582324433,0.0340642232589,0.0343654100251,0.0336425617862,0.0340943419355,0.0346665967913,0.0352990890004,0.035811106503,0.0348473088511,0.0343051726719,0.0345461220849,0.0349376648809,0.0352388516471,0.0359616998861,0.035329207677,0.0351484956173,0.0350581395874,0.0340341045823,0.0344256473784,0.0347569528212,0.0348774275277,0.0350581395874,0.0342449353186,0.0346665967913,0.0346665967913,0.0348171901744,0.0342750539953,0.034696715468,0.0345160034082,0.0348473088511,0.0352388516471,0.0347569528212,0.0356002757666,0.03557015709,0.0359918185627,0.0364134800354,0.0368351415081,0.0369857348912,0.0376483457769,0.0369254975379,0.0369254975379,0.0370760909211,0.0366243107717,0.0366243107717,0.0365038360652,0.0361424119458,0.0365038360652,0.0365038360652,0.0357508691497,0.0358713438562,0.0363231240055,0.0357207504731,0.0360219372393,0.0359315812094,0.035329207677,0.0355099197367,0.0351484956173,0.0355400384134,0.0356605131198,0.0363231240055,0.0355099197367,0.0358412251796,0.0356002757666,0.0351183769407,0.0355400384134,0.0354798010601,0.0354195637069,0.0355099197367,0.035811106503,0.0349376648809,0.034455766055,0.0344858847316,0.0351183769407,0.0347268341446,0.0345762407615,0.0345461220849,0.0343051726719,0.0332811376667,0.0327992388408,0.0334317310499,0.0341244606122,0.03334137502,0.0326787641343,0.0334618497265,0.0334618497265,0.0325582894278,0.0322872213382,0.0334317310499,0.0340039859057,0.0339437485524,0.0340039859057,0.0346063594381,0.0345762407615,0.0346364781147,0.035329207677,0.0367447854782,0.0370760909211,0.036684548125,0.036443598712,0.0366243107717,0.0364134800354,0.0368351415081,0.0368953788613,0.0365640734185,0.0365941920951,0.0362930053289,0.0365339547419,0.0359014625328,0.0362930053289,0.0369254975379,0.03334137502,0.0296367777955,0.0260526552776,0.0226191261427,0.0)
m <- c(0.0198863374407,0.0232058497183,0.0264024170967,0.030060027847,0.0327648156288,0.0326111345048,0.0330414416519,0.0328877605279,0.0327648156288,0.03258039828,0.0319656737842,0.0319042013346,0.0321193549081,0.0310435870404,0.0306747523429,0.0305210712189,0.0298756104983,0.0295989844751,0.0293838309016,0.0291379411032,0.0295682482503,0.0295067758008,0.0290764686537,0.0293530946768,0.0300292916222,0.0299985553974,0.0305825436685,0.0307054885677,0.0305210712189,0.0308284334668,0.0303981263197,0.0299370829478,0.0296297206999,0.0297834018239,0.0298448742735,0.0300292916222,0.0295682482503,0.0296604569247,0.0299985553974,0.0292916222272,0.029322358452,0.0295682482503,0.0297526655991,0.029322358452,0.0288920513049,0.0289842599793,0.0288920513049,0.0292608860024,0.0290764686537,0.0292301497776,0.0299370829478,0.0295067758008,0.0291994135528,0.0297219293743,0.0299678191726,0.0301522365214,0.0300292916222,0.0295375120255,0.0290457324289,0.0292301497776,0.0290457324289,0.0297219293743,0.0302751814206,0.0297219293743,0.0295375120255,0.0292608860024,0.0297834018239,0.029476039576,0.0299678191726,0.030213708971,0.0302444451958,0.0296297206999,0.0291994135528,0.0299063467231,0.0301522365214,0.029476039576,0.0293530946768,0.0288613150801,0.0285232166074,0.0281851181347,0.0277855472124,0.0279084921115,0.0280007007859,0.0279699645611,0.0279699645611,0.0286154252818,0.0279699645611,0.0282773268091,0.0285539528322,0.0284924803826,0.028431007933,0.0283695354834,0.028431007933,0.0283080630338,0.0276011298636,0.0270478778174,0.026955669143,0.0271093502669,0.0267405155694,0.0265253619959,0.0263716808719,0.0270171415926,0.0269864053678,0.026801988019,0.0270171415926,0.0274474487397,0.0276626023132,0.027539657414,0.027539657414,0.027539657414,0.0280007007859,0.0274474487397,0.0275703936388,0.0275703936388,0.0275089211892,0.026955669143,0.0269249329182,0.0267405155694,0.0268634604686,0.0262794721975,0.0259413737248,0.026064318624,0.0252651767794,0.0249270783067,0.025326649229,0.0253573854538,0.0257876926009,0.026064318624,0.0260028461744,0.0263716808719,0.0267405155694,0.0265253619959,0.0268941966934,0.0272322951661,0.0271708227165,0.0274474487397,0.0272322951661,0.0272630313909,0.0268941966934,0.0269864053678,0.0266483068951,0.0265868344455,0.0265560982207,0.0258184288257,0.0257262201513,0.0255418028025,0.0256647477017,0.0257262201513,0.0258491650505,0.0259106375,0.0260028461744,0.0259721099496,0.0264024170967,0.0270478778174,0.0263716808719,0.0264946257711,0.0264024170967,0.0264946257711,0.0264638895463,0.0270171415926,0.0270478778174,0.0269249329182,0.0262487359728,0.0257876926009,0.0268327242438,0.0264331533215,0.0262487359728,0.0264331533215,0.0268327242438,0.0265560982207,0.0265253619959,0.0264331533215,0.0266790431198,0.0271093502669,0.0267405155694,0.0273859762901,0.0272015589413,0.0263716808719,0.0269249329182,0.0268634604686,0.0264024170967,0.0268634604686,0.0271708227165,0.0268327242438,0.0276626023132,0.0283387992586,0.0284617441578,0.0294145671264,0.0280314370107,0.0279699645611,0.0281236456851,0.0286461615066,0.0286154252818,0.0289227875297,0.0285539528322,0.0279392283363,0.0277855472124,0.0273859762901,0.0285232166074,0.0289227875297,0.0290764686537,0.0286768977314,0.0288613150801,0.0291072048785,0.0290149962041,0.0290149962041,0.0297526655991,0.0297834018239,0.0295375120255,0.029168677328,0.0294145671264,0.0297219293743,0.030213708971,0.0303981263197,0.0304595987693,0.0299985553974,0.0300292916222,0.0299985553974,0.030213708971,0.0304903349941,0.0309206421412,0.0308284334668,0.0302751814206,0.0297526655991,0.0298141380487,0.0306747523429,0.0303673900949,0.0299985553974,0.0298448742735,0.0299063467231,0.0293838309016,0.0298756104983,0.0303673900949,0.0303981263197,0.0297219293743,0.0298141380487,0.0301522365214,0.0303059176454,0.0301829727462,0.0296911931495,0.0296911931495,0.0286154252818,0.0287383701809,0.0287691064057,0.029168677328,0.0297834018239,0.029476039576,0.0297834018239,0.0298141380487,0.0301829727462,0.0304595987693,0.0305825436685,0.0305210712189,0.030951378366,0.0316583115362,0.0309206421412,0.030951378366,0.03110505949,0.03110505949,0.030951378366,0.0307362247925,0.0311972681643,0.0312894768387,0.0313202130635,0.0313816855131,0.0310128508156,0.0313202130635,0.0311972681643,0.0311357957148,0.0318119926602,0.0324881896056,0.0326418707296,0.0319964100089,0.0316583115362,0.0316583115362,0.0320271462337,0.0321193549081,0.0327955518535,0.0334102763494,0.0336561661477,0.0338098472717,0.0341172095196,0.0347011977907,0.0353159222865,0.0349163513642,0.0352544498369,0.0350700324882,0.0350392962634,0.0350392962634,0.0353159222865,0.0352237136122,0.0350085600386,0.035100768713,0.0347626702403,0.0346704615659,0.0347319340155,0.0347011977907,0.034209418194,0.0346089891163,0.0338405834965,0.0339020559461,0.0336254299229,0.0336561661477,0.0337483748221,0.0340250008452,0.0333795401246,0.033318067675,0.0342401544188,0.034363099318,0.0352237136122,0.0353773947361,0.0355618120849,0.0351929773874,0.0353773947361,0.0355925483097,0.0363609539295,0.0369756784253,0.0375596666964,0.037467458022,0.0370064146501,0.0364531626039,0.0371600957741,0.0376518753708,0.0378362927195,0.0380821825179,0.0382665998666,0.0380514462931,0.0369449422005,0.0368527335262,0.0369449422005,0.0370986233245,0.0370986233245,0.0371293595493,0.0370064146501,0.0369142059757,0.0374059855724,0.0378670289443,0.0386661707889,0.0396804662071,0.0395575213079,0.0405410805012,0.0405103442765,0.0410328600979,0.0414016947954,0.0424467264384,0.0424159902136,0.0428155611359,0.0428770335855,0.0433073407326,0.0453359315689,0.0451822504449,0.0458584473903,0.0461965458631,0.0462580183126,0.0455818213672,0.0450900417705,0.0442294274763,0.0440142739028,0.0430307147094,0.0412787498963,0.0408484427492,0.0402337182533,0.0392808952848,0.0395575213079,0.039834147331,0.0401722458037,0.0411558049971,0.0412172774467,0.0415861121442,0.0416475845938,0.0418320019425,0.0415861121442,0.0427540886863,0.0434610218565,0.0431843958334,0.0431229233838,0.0428155611359,0.0431843958334,0.0431229233838,0.0433995494069,0.0433688131822,0.0436761754301,0.0431843958334,0.0428155611359,0.0429077698103,0.0429999784846,0.0436147029805,0.0435224943061,0.0436454392053,0.0433688131822,0.0437069116549,0.0438605927788,0.0435839667557,0.0431229233838,0.0433073407326,0.0437069116549,0.0427848249111,0.0429385060351,0.0426311437871,0.0436761754301,0.0438913290036,0.0436761754301,0.0442908999259,0.0446597346234,0.0449670968714,0.0443523723755,0.0446597346234,0.0444138448251,0.0442908999259,0.0436454392053,0.0430307147094,0.0437683841045,0.0435224943061,0.043829856554,0.0435224943061,0.0442294274763,0.0449056244218,0.0449978330962,0.0451822504449,0.0454896126928,0.0462887545374,0.0465961167854,0.0467497979093,0.0465961167854,0.0474874673043,0.04739525863,0.04739525863,0.0478870382266,0.047979246901,0.0478870382266,0.0481636642498,0.0483788178233,0.0486861800712,0.0488091249704,0.0479485106762,0.0479177744514,0.0482558729242,0.0485939713969,0.0488091249704,0.0489935423192,0.0495160581406,0.0485324989473,0.0484710264977,0.0489320698696,0.049761947939,0.0501922550861,0.0504381448844,0.0503766724348,0.0502844637605,0.0506225622332,0.0493316407919,0.050653298458,0.0511758142794,0.051237286729,0.0509606607059,0.0499463652877,0.0493623770167,0.0494853219159,0.0497312117142,0.0499771015125,0.0506840346828,0.0504381448844,0.050499617334,0.0498848928382,0.0504688811092,0.0516061214265,0.0521901096976,0.0522208459224,0.0531736688909,0.0530814602166,0.0535732398132,0.0533273500149,0.0540035469603,0.0553252046264,0.055386677076,0.0550178423785,0.0549256337041,0.0548641612545,0.0544031178826,0.0541879643091,0.0545567990066,0.0551100510529,0.0545567990066,0.0540342831851,0.0543723816579,0.0551100510529,0.0551715235025,0.0552022597272,0.0557862479983,0.0574460041371,0.0570464332148,0.0569849607652,0.05701569699,0.0570464332148,0.0565546536181,0.0564624449437,0.0570464332148,0.0579377837338,0.0585832444544,0.0572001143388,0.0570464332148,0.0568312796412,0.0565546536181,0.0572001143388,0.0577841026098,0.0577841026098,0.0577226301602,0.0576918939354,0.0570464332148,0.0574152679123,0.0582451459817,0.0589520791519,0.060120055694,0.0598741658957,0.0598741658957,0.060427417942,0.0612572960114,0.0610421424378,0.0608269888643,0.0613495046857,0.0618105480576,0.0621793827551,0.0623330638791,0.0624560087783,0.0621486465303,0.0618412842824,0.0611036148874,0.0617798118328,0.0625789536774,0.0631629419485,0.0631629419485,0.0635932490956,0.0638084026691,0.0640542924675,0.0647304894129,0.065007115436,0.0661136195286,0.0665746629005,0.0669127613732,0.0667590802492,0.0675889583186,0.0681422103649,0.0681422103649,0.0689106159847,0.0703244823251,0.0715539313168,0.0716154037664,0.0714309864177,0.0717076124408,0.0723223369366,0.072568226735,0.0722608644871,0.0723530731614,0.0730907425565,0.0734288410292,0.0735825221531,0.0740128293002,0.0759184752374,0.0760106839117,0.0759492114622,0.0756418492142,0.0764409910588,0.077301605353,0.0772093966786,0.0775167589266,0.0784695818951,0.0784388456703,0.0775474951514,0.0788076803679,0.0797297671116,0.0803444916075,0.0800986018091,0.0812358421265,0.0811436334521,0.0812665783512,0.0816661492735,0.0828955982652,0.0835410589859,0.0837869487842,0.0855081773726,0.0849241891015,0.0853544962486,0.0853237600239,0.0865532090155,0.0863073192172,0.0863995278916,0.0868913074883,0.0877519217825,0.0874752957593,0.0862458467676,0.0875982406585,0.0888276896502,0.0889813707742,0.0893809416965,0.0890121069989,0.0891657881229,0.0888891620998,0.0887354809758,0.0896575677196,0.0914402687575,0.0923623555013,0.0959892300268,0.100784081094,0.104626109194,0.109820531183,0.115230106747,0.121100725682,0.126325883897,0.132780491103,0.137544605946,0.143845532029,0.147533879004,0.14950099739,0.153619651513,0.159428797998,0.163977759268,0.169541015955,0.178024213998,0.184970600801,0.193146436596,0.200000614724,0.204949146916,0.211096391875,0.214047069455,0.214323695478,0.212879092913,0.211127128099,0.205656080086,0.20215215046,0.196711838672,0.193023491697,0.189089254923,0.185247226824,0.182880537515,0.180513848206,0.180974891578,0.179561025238,0.179591761462,0.179991332385,0.180913419128,0.18072900178,0.182757592616,0.183556734461,0.184755447227,0.185892687545,0.186445939591,0.187245081436,0.187829069707,0.18733729011,0.188013487055,0.187767597257,0.187060664087,0.187091400312,0.186384467141,0.186968455412,0.188013487055,0.188505266652,0.189550298295,0.188781892675,0.187122136536,0.188013487055,0.190503121264,0.191425208007,0.194406621812,0.195052082533,0.194867665184,0.197787606539,0.199478098903,0.201168591267,0.202551721382,0.202797611181,0.201537425964,0.202797611181,0.202428776483,0.204580312219,0.205287245389,0.2036889617,0.203443071901,0.204979883141,0.207438781124,0.208576021442,0.210727557177,0.210143568906,0.209836206658,0.211403754122,0.213862652106,0.214292959253,0.214999892423,0.215614616919,0.216321550089,0.217520262856,0.217581735306,0.219241491445,0.220286523088,0.220317259312,0.220839775134,0.223483090466,0.22440517721,0.22440517721,0.224651067008,0.224958429256,0.225235055279,0.22652597672,0.227601744588,0.227017756317,0.226280086922,0.225265791504,0.22581904355,0.22806278796,0.228984874704,0.229107819603,0.23024505992,0.230798311967,0.233072792601,0.234240769143,0.235009174763,0.236699667127,0.23697629315,0.236054206406,0.236115678856,0.238205742142,0.239189301335,0.239435191133,0.239558136032,0.239066356436,0.240449486551,0.241433045745,0.242662494736,0.241924825341,0.242232187589,0.240879793698,0.24140230952,0.239281510009,0.237191446723,0.23774469877,0.236884084475,0.235992733956,0.235162855887,0.23614641508,0.235716107933,0.237406600297,0.235039910988,0.236084942631,0.235593163034,0.235869789057,0.235132119662,0.234855493639,0.235132119662,0.234179296694,0.233994879345,0.230798311967,0.232611749229,0.232826902803,0.232888375252,0.232212178307,0.231474508912,0.231566717586,0.230644630843,0.22953812675,0.22883119358,0.229261500727,0.226280086922,0.22440517721,0.224651067008,0.222714684846,0.22145449963,0.220163578188,0.220225050638,0.220347995537,0.218780448073,0.217397317957,0.216167868965,0.215215045997,0.213463081184,0.21466179395,0.214569585276,0.214508112827,0.212079951068,0.212172159742,0.211157864324,0.211096391875,0.211342281673,0.2110041832,0.210666084727,0.208299395418,0.207131418876,0.206332277032,0.20657816683,0.204856938242,0.20510282804,0.204918410691,0.203012764754,0.201998469336,0.202121414235,0.201568162189,0.202797611181,0.201875524437,0.201199327491,0.20073828412,0.197910551439,0.196343003974,0.195881960602,0.195759015703,0.193853369766,0.193207909045,0.19105637331,0.189919132993,0.189242936047,0.188013487055,0.190042077892,0.189119991148,0.188197904404,0.18875115645,0.188966310024,0.188843365125,0.187890542156,0.185954159994,0.18444808498,0.184355876305,0.182358021694,0.182542439042,0.183034218639,0.181558879849,0.181927714547,0.17996059616,0.180329430857,0.179991332385,0.178700410943,0.176856237456,0.177071391029,0.176641083882,0.174735437945,0.173628933853,0.171262244544,0.169448807281,0.168557456762,0.16803494094,0.168342303188,0.169172181258,0.167481688894,0.16591414143,0.166467393476,0.165360889383,0.165114999585,0.166221503678,0.165944877654,0.16655960215,0.165330153159,0.163977759268,0.16443880264,0.163916286818,0.163024936299,0.163485979671,0.160596774541,0.159398061774,0.158045667883,0.156017077046,0.155648242349,0.15552529745,0.155740451023,0.154418793357,0.153742596412,0.15251314742,0.154511002032,0.153527442838,0.153773332637,0.152974190792,0.152820509668,0.152605356095,0.149716150964,0.149285843817,0.149316580042,0.146919154508,0.145689705516,0.145474551943,0.14372258713,0.143814795804,0.142677555487,0.141294425371,0.142493138138,0.141970622316,0.141386634045,0.142339457014,0.140556755976,0.141386634045,0.140372338627,0.139573196783,0.139204362085,0.140064976379,0.139204362085,0.138896999837,0.137267979923,0.137636814621,0.138251539116,0.137790495745,0.137944176869,0.137421661047,0.13692988145,0.135024235513,0.133579632948,0.134286566118,0.131182207414,0.127401651765,0.124297293061,0.119963485365,0.115199370522,0.110988507726,0.106039975534,0.100814817319,0.0978641397392,0.0919320483542,0.0900571386419,0.0879978115808,0.085446704923,0.083817685009,0.0840328385826,0.0829570707148,0.0827111809165,0.0828955982652,0.0812051059017,0.0812665783512,0.0808055349794,0.0811743696769,0.0809284798785,0.080559645181,0.079084306391,0.0788076803679,0.0781622196472,0.0783159007712,0.0787462079183,0.0787769441431,0.0788691528174,0.0784081094455,0.0783159007712,0.0786539992439,0.0794531410885,0.0788998890422,0.0794224048637,0.0787769441431,0.0775782313762,0.0765946721828,0.0769942431051,0.0765946721828,0.0758877390126,0.0741665104242,0.0735517859283,0.0738284119515,0.0732751599052,0.0735210497035,0.073152215006,0.073152215006,0.0717998211152,0.0708777343714,0.0707547894722,0.0712158328441,0.0705088996739,0.0710006792706,0.0701093287516,0.0687569348607,0.0685417812872,0.0684495726128,0.0680807379153,0.0685110450624,0.0688491435351,0.0690950333334,0.0690950333334,0.068265155264,0.0683573639384,0.0677733756674,0.0686339899615,0.0680807379153,0.0678655843417,0.0676504307682,0.0665746629005,0.0658062572806,0.0654066863583,0.0646690169633,0.0644538633898,0.0648534343121,0.063531776646,0.0632551506229,0.0634088317468,0.0629477883749,0.0625482174526,0.0625789536774,0.0620257016312,0.0617183393832,0.0613495046857,0.0606425715155,0.0596282760974,0.0595668036478,0.0592594413999,0.0586754531288,0.0587369255784,0.0583988271057,0.0586754531288,0.0588906067023,0.0591672327255,0.0592287051751,0.0600278470197,0.0594131225238,0.0594745949734,0.0590135516015,0.0591979689503,0.0594745949734,0.0594745949734,0.0593209138494,0.0595668036478,0.0596590123222,0.0599356383453,0.060120055694,0.0596590123222,0.0594438587486,0.0599049021205,0.0591364965007,0.0585832444544,0.057907047509,0.0566161260677,0.057169378114,0.0567083347421,0.0559706653471,0.0550485786033,0.055232995952,0.0541572280843,0.0542801729835,0.0543109092083,0.0545260627818,0.0546182714562,0.0534502949141,0.0522515821472,0.052866306643,0.0533888224645,0.0528355704182,0.0529892515422,0.0523130545968,0.0524667357207,0.0524974719455,0.0520364285736,0.0514217040778,0.0524052632711,0.0512680229538,0.0510221331555,0.0511143418299,0.0512680229538,0.0514524403026,0.0508069795819,0.0508991882563,0.0504074086596,0.051237286729,0.0508991882563,0.0520979010232,0.0523745270463,0.0524974719455,0.0520056923488,0.0526511530695,0.0520979010232,0.0520364285736,0.0530507239918,0.052282318372,0.0516675938761,0.051237286729,0.0510836056051,0.0505918260084,0.0508069795819,0.050653298458,0.0514524403026,0.0508377158067,0.0501307826365,0.0504688811092,0.0507147709075,0.0499771015125,0.0496390030398,0.0497926841638,0.0494238494663,0.0484095540481,0.0476718846531,0.04739525863,0.0484710264977,0.048132928025,0.0482558729242,0.0485939713969,0.0486554438465,0.0486554438465,0.0489013336448,0.0485939713969,0.0487476525208,0.0486861800712,0.047979246901,0.0477026208779,0.0469034790333,0.0470571601572,0.0472108412812,0.0464731718862,0.0463194907622,0.0462887545374,0.0461965458631,0.0459506560647,0.0460736009639,0.0458277111655,0.0462887545374,0.0462580183126,0.0462272820879,0.0466575892349,0.0458277111655,0.0459199198399,0.0455818213672,0.0449670968714,0.0439220652284,0.0438913290036,0.0440757463524,0.0435224943061,0.0424159902136,0.0416475845938,0.0414939034698,0.0416475845938,0.04220083664,0.0430307147094,0.0429692422599,0.0425696713375,0.0422930453144,0.0421393641905,0.0428770335855,0.0438605927788,0.0433995494069,0.0423852539888,0.0419856830665,0.0418934743921,0.0418627381673,0.0433380769574,0.0428462973607,0.043092187159,0.0420471555161,0.0415246396946,0.0424774626632,0.0437069116549,0.0438605927788,0.0437991203292,0.0437069116549,0.042354517764,0.0421393641905,0.0418934743921,0.0424774626632,0.0423852539888,0.0428770335855,0.0423237815392,0.0415553759194,0.0417090570434,0.0420471555161,0.0421393641905,0.0420164192913,0.0416475845938,0.04220083664,0.042354517764,0.0422623090896,0.0416783208186,0.0418320019425,0.0418012657177,0.0415861121442,0.0416783208186,0.0422315728648,0.042508198888,0.0419549468417,0.0415553759194,0.0404488718269,0.0405410805012,0.0411250687723,0.0413094861211,0.0409099151988,0.0412172774467,0.0407562340748,0.040879178974,0.0410328600979,0.0407869702996,0.0409713876483,0.0408484427492,0.0397419386566,0.0387891156881,0.0394345764087,0.0398034111062,0.0399570922302,0.03925015906,0.03925015906,0.0392194228352,0.0386661707889,0.0385432258897,0.0390350054864,0.038942796812,0.0391886866104,0.038358808541,0.0384202809906,0.0385432258897,0.0388813243625,0.0394960488583,0.0403259269277,0.0405410805012,0.0409099151988,0.0417397932682,0.0410021238731,0.0405103442765,0.040571816726,0.0410635963227,0.039834147331,0.0397419386566,0.0397112024319,0.0398956197806,0.0393731039591,0.0348856151394,0.03110505949,0.0276318660884,0.0235746844158,0.0)
ycorr <- c(0.000128502172495,0.000128327530495,0.000127804336936,0.000126930212298,0.000125703524556,0.000124125404544,0.000122192359479,0.000120168206808,0.000118060535413,0.000115884246363,0.000113650731975,0.000111377602092,0.000109083978642,0.000106790793866,0.000104513376869,0.000102268568902,0.000100069346295,9.79243692996e-05,9.58354406194e-05,9.37967308e-05,9.18022926146e-05,8.98466858006e-05,8.79204996269e-05,8.60147808261e-05,8.41206096027e-05,8.22302205953e-05,8.03348265163e-05,7.84285787783e-05,7.65106889023e-05,7.4580184945e-05,7.2640595878e-05,7.06909993715e-05,6.87328731088e-05,6.67652885898e-05,6.47898836048e-05,6.28064951756e-05,6.08180969407e-05,5.88271133144e-05,5.68336850593e-05,5.48355463838e-05,5.28335563257e-05,5.08267850358e-05,4.88167933751e-05,4.68045438651e-05,4.47906307377e-05,4.27707771159e-05,4.07426321556e-05,3.87035453692e-05,3.66516463799e-05,3.45890547605e-05,3.25140760718e-05,3.04249908664e-05,2.83207094483e-05,2.61987567832e-05,2.40575664853e-05,2.19017122183e-05,1.97355785369e-05,1.75599270581e-05,1.53726849444e-05,1.317245072e-05,1.09608933384e-05,8.73948428902e-06,6.50848350897e-06,4.26649941274e-06,2.01463993884e-06,-2.49059949171e-07,-2.52798914744e-06,-4.82212336763e-06,-7.13081238291e-06,-9.45120037979e-06,-1.17820104355e-05,-1.412421637e-05,-1.64779571619e-05,-1.88415366019e-05,-2.1214739296e-05,-2.35993578059e-05,-2.59969663826e-05,-2.84089558913e-05,-3.08365745998e-05,-3.32808695488e-05,-3.57444424044e-05,-3.82291958545e-05,-4.07384467622e-05,-4.32720893867e-05,-4.58321167282e-05,-4.84148607241e-05,-5.10193004448e-05,-5.3643514459e-05,-5.62859209293e-05,-5.89444903557e-05,-6.16171536434e-05,-6.4300612782e-05,-6.699360143e-05,-6.96964731698e-05,-7.24053948535e-05,-7.5122682727e-05,-7.78498086024e-05,-8.05871413038e-05,-8.33332336914e-05,-8.6089555776e-05,-8.88593128664e-05,-9.16432610464e-05,-9.44388889183e-05,-9.72443538233e-05,-0.00010006115186,-0.00010288936448,-0.000105726587365,-0.000108573641544,-0.000111427624062,-0.000114289214917,-0.000117159001476,-0.000120034806838,-0.00012291609363,-0.00012580344741,-0.000128695898438,-0.000131590906601,-0.000134487337748,-0.000137380973216,-0.000140272053502,-0.000143161037563,-0.000146046361499,-0.000148927583872,-0.000151803878482,-0.000154675504081,-0.000157544799505,-0.000160410638633,-0.000163271772627,-0.00016612933061,-0.000168986065315,-0.000171840031054,-0.000174689782865,-0.000177534813945,-0.00018037541765,-0.000183212696035,-0.000186042337799,-0.000188866131659,-0.000191686399293,-0.000194502297916,-0.000197315306565,-0.000200123837684,-0.000202928889849,-0.000205729773258,-0.000208523016977,-0.00021130646304,-0.000214081289734,-0.000216847057737,-0.000219599694339,-0.00022234169584,-0.000225069733508,-0.00022778243058,-0.000230479367408,-0.000233161343808,-0.000235831892957,-0.000238491829529,-0.000241138632782,-0.000243767737137,-0.000246381488629,-0.000248977976445,-0.000251557065675,-0.000254122429138,-0.000256675550649,-0.000259214095216,-0.000261736393208,-0.000264241969492,-0.000266735358936,-0.000269221895467,-0.000271703033321,-0.000274180360076,-0.000276652587914,-0.000279115457233,-0.000281568946456,-0.000284013068887,-0.000286449236176,-0.00028887783236,-0.000291295608449,-0.000293697589596,-0.000296081408652,-0.000298448272248,-0.000300800115145,-0.000303143275237,-0.000305477539416,-0.000307802465497,-0.000310118302518,-0.000312421549205,-0.000314711440097,-0.000316988931752,-0.000319256402084,-0.000321512535806,-0.000323753970157,-0.000325976456508,-0.000328175243586,-0.000330353030834,-0.000332507851017,-0.000334642463556,-0.000336761535737,-0.000338867481011,-0.000340963454558,-0.000343049317354,-0.000345127266842,-0.000347198017564,-0.000349263339246,-0.000351321747677,-0.000353373241671,-0.00035541885817,-0.000357455507347,-0.00035948415629,-0.000361500984992,-0.000363506029167,-0.000365497228019,-0.000367476512465,-0.000369444456412,-0.000371399993913,-0.000373344946761,-0.000375279322585,-0.000377205396615,-0.000379118685666,-0.000381017453534,-0.000382900686371,-0.000384766321478,-0.000386615570568,-0.000388446843469,-0.000390263027629,-0.000392068391819,-0.000393862868965,-0.000395642723512,-0.000397409561854,-0.000399165358737,-0.000400911548564,-0.000402651507675,-0.000404384993676,-0.000406112276459,-0.000407830806868,-0.000409536895552,-0.000411228074809,-0.000412903938711,-0.000414566662968,-0.000416215434709,-0.000417847582353,-0.000419463500086,-0.000421061077708,-0.000422640093362,-0.000424202205595,-0.0004257490813,-0.00042728214246,-0.000428802515545,-0.000430310454679,-0.000431805625087,-0.000433289669142,-0.000434763324462,-0.000436226024985,-0.000437677810223,-0.000439118746816,-0.000440547862634,-0.000441962103399,-0.000443360428823,-0.000444743034592,-0.000446107368843,-0.000447454301511,-0.000448782089356,-0.000450093346775,-0.000451389239144,-0.000452669997009,-0.000453933725537,-0.000455182053605,-0.000456416816479,-0.000457638450634,-0.000458848682182,-0.000460047976895,-0.000461238176329,-0.000462415779698,-0.0004635802452,-0.000464730771923,-0.000465870436955,-0.000467000895404,-0.000468122971722,-0.000469233866829,-0.000470335501114,-0.000471426125988,-0.000472508824748,-0.000473583376653,-0.000474652080652,-0.000475714929491,-0.000476768586265,-0.000477809185629,-0.000478837668637,-0.000479847710741,-0.000480834881072,-0.000481793388802,-0.000482715244028,-0.000483592920549,-0.000484419224019,-0.000485188318804,-0.000485895936792,-0.000486542289888,-0.000487121464355,-0.000487632975238,-0.000488082148863,-0.000488474735716,-0.000488815216458,-0.000489112646094,-0.000489372953601,-0.000489602510309,-0.000489807662363,-0.00048999122031,-0.000490155551779,-0.000490308406807,-0.000490450420951,-0.000490580763515,-0.000490700079669,-0.000490806476016,-0.000490897939054,-0.000490975774889,-0.000491039819043,-0.000491090840839,-0.000491131264902,-0.000491160546083,-0.000491177131897,-0.000491180606008,-0.000491172545745,-0.00049115579927,-0.000491131744202,-0.00049110034842,-0.000491060335002,-0.000491009711851,-0.000490947893176,-0.000490877438959,-0.000490799202176,-0.000490714669616,-0.000490621315812,-0.000490517058975,-0.000490402332266,-0.000490277489481,-0.000490143818339,-0.000490002132674,-0.000489854194736,-0.000489697515777,-0.000489528992167,-0.000489348306665,-0.00048915672555,-0.000488956148598,-0.00048874717589,-0.000488526540534,-0.000488293038343,-0.00048804612651,-0.000487786710084,-0.000487513916286,-0.000487231349492,-0.000486941344467,-0.000486644489097,-0.000486338813553,-0.000486023853814,-0.000485700956301,-0.000485371994632,-0.000485041084958,-0.000484706641836,-0.000484369546615,-0.00048403035719,-0.000483687055446,-0.00048333937699,-0.000482988363016,-0.000482636180578,-0.000482284915243,-0.000481933938679,-0.000481581204214,-0.000481223913868,-0.000480862553505,-0.000480496281158,-0.000480123529273,-0.000479743795244,-0.000479354460345,-0.00047895255257,-0.000478535039739,-0.000478099945979,-0.000477644900604,-0.000477172492905,-0.000476682938039,-0.000476175440989,-0.000475650596913,-0.000475109678976,-0.000474555075161,-0.000473989248686,-0.000473415240996,-0.000472835032246,-0.000472251367482,-0.000471665217518,-0.000471076624171,-0.000470486061005,-0.000469895228355,-0.000469304400634,-0.000468713718892,-0.000468121684571,-0.000467527444037,-0.000466930247437,-0.000466330634302,-0.000465728004911,-0.000465123183715,-0.000464515209846,-0.000463904700193,-0.000463289493379,-0.000462669023722,-0.000462043488145,-0.000461412232418,-0.000460776056865,-0.000460133436886,-0.000459481914222,-0.000458819188581,-0.000458145632691,-0.000457459907205,-0.000456762114227,-0.000456052877536,-0.000455332187239,-0.000454600520651,-0.00045385733984,-0.000453101173738,-0.00045233457679,-0.000451558891242,-0.000450773938148,-0.000449979304142,-0.00044917496045,-0.000448360199742,-0.000447534582073,-0.000446697261058,-0.000445846659006,-0.00044498472626,-0.00044410997848,-0.000443221424889,-0.00044231987369,-0.000441407706331,-0.000440484791986,-0.000439552260316,-0.000438610794174,-0.000437659951326,-0.000436701992886,-0.000435737240476,-0.000434767271637,-0.000433794339889,-0.000432818412704,-0.000431837133275,-0.000430851000474,-0.000429858892638,-0.000428861854155,-0.000427860736821,-0.000426854942401,-0.000425842421398,-0.000424822850273,-0.000423794130987,-0.000422755638282,-0.000421707901949,-0.000420652961643,-0.000419591251728,-0.00041852256219,-0.000417445701756,-0.000416360878289,-0.000415270570066,-0.000414174145172,-0.000413072644492,-0.000411965569299,-0.000410853614891,-0.000409734578413,-0.000408607632916,-0.000407471132168,-0.000406328227069,-0.000405179525446,-0.000404024185926,-0.000402863004912,-0.000401696728524,-0.000400525909615,-0.000399351279709,-0.000398173610655,-0.000396993986948,-0.000395813320978,-0.000394629830057,-0.000393441340849,-0.000392246946108,-0.000391047013984,-0.000389841098142,-0.000388629077292,-0.000387411012772,-0.000386185313686,-0.00038495201524,-0.000383710724014,-0.000382462571153,-0.000381207805982,-0.000379947921098,-0.000378683086546,-0.000377412345641,-0.000376135169097,-0.000374850443024,-0.000373558778988,-0.000372261023913,-0.000370956332091,-0.000369644021396,-0.000368323965474,-0.000366997846515,-0.00036566348164,-0.000364320039237,-0.000362966704424,-0.000361603117589,-0.000360230491878,-0.000358847548639,-0.000357455822432,-0.000356054171516,-0.000354642347348,-0.000353219051298,-0.000351784324447,-0.000350339898529,-0.00034888887944,-0.000347431325565,-0.000345966331793,-0.000344493797584,-0.000343013172272,-0.000341523024414,-0.000340027897869,-0.000338527423492,-0.000337020999185,-0.000335506642481,-0.000333983200255,-0.000332450031269,-0.000330909469527,-0.000329362150702,-0.000327807527161,-0.000326246526872,-0.000324676112716,-0.000323092832762,-0.000321498106076,-0.000319893271035,-0.000318278390757,-0.000316653708881,-0.000315016223146,-0.000313362790258,-0.000311693793409,-0.000310009025734,-0.000308308020125,-0.000306592255988,-0.00030486111098,-0.000303114223258,-0.000301350547833,-0.000299570742532,-0.000297772900842,-0.000295959226116,-0.000294130108502,-0.000292286370337,-0.000290428471666,-0.000288556611463,-0.000286671847159,-0.000284773876553,-0.00028286289632,-0.000280937193484,-0.000278997561562,-0.000277046665926,-0.00027508364358,-0.000273107743359,-0.000271118328075,-0.000269115787941,-0.000267099710655,-0.000265070303372,-0.000263026868315,-0.000260970652061,-0.000258904015662,-0.000256825258316,-0.000254733723076,-0.000252630607509,-0.000250517536556,-0.000248393658362,-0.00024625789434,-0.000244110813307,-0.000241952898347,-0.000239784590712,-0.000237604138663,-0.000235410767945,-0.000233204307624,-0.00023098460888,-0.000228748224181,-0.00022649390704,-0.000224222239253,-0.000221933467616,-0.000219627051601,-0.000217302795182,-0.000214961097878,-0.000212603419709,-0.000210230356749,-0.000207842893786,-0.000205440862204,-0.000203028666751,-0.000200607770192,-0.000198177788755,-0.000195739011713,-0.000193291160505,-0.000190833072772,-0.000188362191218,-0.000185870814133,-0.000183348953872,-0.000180788942718,-0.000178181098258,-0.000175491457393,-0.00017287918051,-0.000170313431176,-0.000167785238365,-0.000165285421384,-0.000162804934371,-0.000160338174473,-0.000157887709887,-0.000155458721317,-0.000153052126747,-0.000150670907291,-0.000148340103609,-0.000145892414572,-0.000143350507096,-0.000140716086694,-0.000137992202448,-0.000135181103487,-0.00013228586022,-0.00012930570998,-0.000126240995391,-0.000123096927028,-0.000119879903654,-0.000116597271026,-0.000113257102363,-0.00010986821309,-0.000106438497192,-0.000102975745131,-9.94874573517e-05,-9.59799017795e-05,-9.24612437787e-05,-8.89361425715e-05,-8.540789177e-05,-8.18800431372e-05,-7.83574969616e-05,-7.48437524446e-05,-7.13433091218e-05,-6.78625797574e-05,-6.44084835208e-05,-6.09879654929e-05,-5.76048867995e-05,-5.42630967239e-05,-5.09666056888e-05,-4.77168882066e-05,-4.45120977607e-05,-4.13493148306e-05,-3.82250547407e-05,-3.51326483418e-05,-3.2062375358e-05,-2.90032574032e-05,-2.59457590158e-05,-2.28813021801e-05,-1.97994705447e-05,-1.66941152552e-05,-1.35593957368e-05,-1.03903613381e-05,-7.1828006194e-06,-3.93316291823e-06,-6.42696845944e-07,2.68603988513e-06,6.04986246066e-06,9.44698571589e-06,1.28737986389e-05,1.63286570916e-05,1.98105453284e-05,2.33149701834e-05,2.68396541665e-05,3.0382554169e-05,3.39414398006e-05,3.75175049688e-05,4.11119325825e-05,4.47259656346e-05,4.83605855747e-05,5.20164190667e-05,5.56928777871e-05,5.93932923368e-05,6.31205821696e-05,6.68734788105e-05,7.06545411775e-05,7.44624617483e-05,7.82958159265e-05,8.21531860029e-05,8.60330449369e-05,8.99332785359e-05,9.38538331242e-05,9.77920303452e-05,0.000101744816283,0.000105712182711,0.000109693298863,0.000113687307313,0.000117695616068,0.000121719454508,0.000125759415193,0.00012981729565,0.000133892745682,0.000137986281272,0.000142099370296,0.000146230589874,0.000150378962824,0.000154545406873,0.000158729618652,0.000162931358087,0.000167150347299,0.000171388495216,0.000175646126883,0.000179925128353,0.000184224969673,0.000188547056978,0.000192893548963,0.000197265906338,0.000201663856585,0.000206085075098,0.000210527613189,0.00021498834947,0.0002194640649,0.000223951777734,0.000228448254558,0.000232951233251,0.000237457983756,0.000241964802212,0.000246469132147,0.000250970206828,0.000255469904524,0.000259968179924,0.000264465470632,0.000268961881843,0.000273459263106,0.000277958651087,0.000282459943499,0.000286963190872,0.000291467898792,0.000295974051927,0.000300480439212,0.000304984818871,0.000309485912812,0.000313981878601,0.000318469928967,0.00032294739166,0.000327412870452,0.000331864817467,0.00033630175313,0.000340721408742,0.000345121154432,0.000349499716484,0.000353855560269,0.000358188135375,0.000362498071218,0.000366785358619,0.000371049508519,0.000375290094571,0.00037950795923,0.000383704322783,0.000387881292369,0.000392039792037,0.000396181976607,0.000400307750405,0.000404416855305,0.000408509595932,0.000412585787028,0.000416645864392,0.000420689568278,0.000424716620836,0.000428725661221,0.00043271590004,0.000436685183609,0.00044063177281,0.000444555169615,0.000448454024248,0.000452327703873,0.000456175821814,0.000459997949485,0.000463792460767,0.000467558975379,0.000471296286063,0.000475005204933,0.0004786879813,0.000482345336333,0.000485979511136,0.000489591591107,0.000493181180898,0.000496748465733,0.000500293352149,0.000503815766068,0.000507315216201,0.000510792786396,0.000514247184553,0.000517677886526,0.000521084777502,0.000524466359543,0.000527823126403,0.000531154723323,0.000534461754185,0.000537744419187,0.00054100467238,0.000544241313149,0.000547454024864,0.000550642214346,0.000553802325749,0.000556932752179,0.000560031707296,0.000563098355094,0.000566131906542,0.000569131923997,0.000572097121916,0.00057502781263,0.000577923911795,0.000580785718155,0.000583615137968,0.000586414861185,0.000589185112271,0.00059192649458,0.000594639163522,0.000597322711424,0.00059997737225,0.00060260191455,0.000605195069804,0.000607756492165,0.000610284226396,0.00061277685905,0.000615235467526,0.000617661409974,0.000620056000691,0.000622420071305,0.000624755288406,0.000627061261074,0.00062933818589,0.000631586048885,0.00063380612881,0.000635998602636,0.0006381613891,0.000640289947214,0.000642381780007,0.00064443432857,0.000646445662283,0.000648413763017,0.000650338622576,0.000652220540428,0.000654058064626,0.0006558506107,0.000657597813605,0.000659302091897,0.000660963983425,0.000662583563165,0.000664158289873,0.00066568900282,0.000667175208618,0.000668615347694,0.00067001034384,0.000671360529919,0.00067266707656,0.000673930537771,0.000675151533612,0.000676331772507,0.000677473769365,0.000678580441147,0.000679652441325,0.000680690955775,0.000681696878736,0.000682668704361,0.000683605914997,0.000684506243537,0.0006853696906,0.000686194626668,0.00068698108564,0.000687725975853,0.000688428590029,0.000689088664881,0.000689704185472,0.000690275685929,0.000690803651646,0.000691289471957,0.000691733382576,0.000692135248652,0.000692494473333,0.000692811212832,0.000693086561036,0.000693320181856,0.000693512297548,0.000693663828691,0.000693774284727,0.00069384358479,0.000693871700719,0.00069385969158,0.000693808342402,0.00069371852873,0.000693591209484,0.000693426571585,0.000693225675524,0.000692988749626,0.00069271787154,0.000692413621806,0.000692077786729,0.000691710434945,0.000691311085874,0.000690879921416,0.000690415287347,0.000689915597408,0.00068937867024,0.000688801708526,0.00068817922867,0.000687506492678,0.000686776412776,0.000685982883202,0.00068511974174,0.00068418219772,0.000683164980345,0.00068206452741,0.00068087604363,0.000679596268718,0.00067822516488,0.000676760945935,0.000675203686089,0.00067355357112,0.000671808732023,0.000669968694807,0.000668032143107,0.00066599767643,0.000663867049112,0.000661642180369,0.000659325186678,0.000656919465838,0.000654429990028,0.000651862543408,0.000649227098863,0.000646534325422,0.000643795958525,0.000641024885506,0.000638233231532,0.000635431195782,0.000632626385076,0.000629826601292,0.000627036075391,0.000624259312099,0.000621497996433,0.000618751644807,0.000616017884376,0.00061329269354,0.00061057097149,0.00060784788857,0.000605119093812,0.000602382630944,0.000599635214375,0.000596874881641,0.000594098341762,0.000591302303389,0.000588485914646,0.000585649294819,0.000582793267067,0.000579917868462,0.000577024263682,0.000574111473725,0.00057117995367,0.000568228941094,0.000565259299378,0.000562273141112,0.00055926993666,0.000556246953612,0.000553201680373,0.000550131329292,0.000547034456938,0.000543909118741,0.000540754406767,0.000537567668909,0.00053434911627,0.000531095162107,0.000527806435926,0.000524484737097,0.000521132083579,0.000517752006467,0.000514346803581,0.00051091734024,0.000507464446653,0.000503990903705,0.000500497421103,0.000496987141684,0.000493462263474,0.000489922005079,0.000486366401989,0.000482795142364,0.000479207808715,0.000475604737273,0.000471987153559,0.000468354994004,0.000464708006801,0.000461044893371,0.000457361518887,0.000453658074954,0.000449934088876,0.000446188802604,0.00044242008007,0.000438627193371,0.000434808639067,0.000430962806346,0.000427088731616,0.000423185964094,0.00041925732349,0.000415302932913,0.000411322937092,0.000407317957399,0.000403290030627,0.000399241897324,0.000395175043031,0.000391092371878,0.000386996081018,0.000382888332241,0.000378770163778,0.000374643550555,0.000370509409181,0.000366367589394,0.000362218871948,0.000358062586719,0.000353898035961,0.000349723192717,0.000345536622291,0.000341337626406,0.000337126871101,0.000332903996899,0.000328669481024,0.000324424549391,0.000320169741079,0.000315903571769,0.000311627142947,0.000307341829061,0.000303050641499,0.00029875443392,0.000294452540885,0.000290144889642,0.000285831431433,0.000281511712811,0.000277186253641,0.00027285683349,0.000268524301966,0.000264190296738,0.000259854206598,0.00025551610852,0.000251176597885,0.000246837588724,0.00024249844241,0.00023816107774,0.000233826217157,0.000229494435921,0.000225165532882,0.000220840968396,0.00021652119787,0.000212206748484,0.000207897952016,0.000203595852131,0.000199301179487,0.000195015485129,0.000190737728557,0.000186468779483,0.000182210612503,0.000177963269667,0.000173727284935,0.000169503642426,0.000165294319798,0.000161098327576,0.000156915689211,0.000152745285825,0.000148587739444,0.000144442367093,0.000140308589651,0.000136185964209,0.000132074740422,0.000127973732593,0.000123879960401,0.00011979411501,0.000115716973006,0.000111649530616,0.000107593038781,0.000103548679903,9.95167140222e-05,9.54955379092e-05,9.14850496482e-05,8.74860377438e-05,8.35019135558e-05,7.95329685513e-05,7.55788344671e-05,7.16391786354e-05,6.77133892539e-05,6.38007662416e-05,5.9900339165e-05,5.6013309313e-05,5.21408059833e-05,4.82823606406e-05,4.4435475881e-05,4.05989268859e-05,3.67734497928e-05,3.29595648304e-05,2.9156306887e-05,2.53642376597e-05,2.15859624342e-05,1.78218272563e-05,1.40716177873e-05,1.03361900208e-05,6.61737258012e-06,2.91544222795e-06,-7.69421159494e-07,-4.43684773413e-06,-8.08575303216e-06,-1.17136242508e-05,-1.53227685758e-05,-1.89156274636e-05,-2.24920399489e-05,-2.60537027981e-05,-2.9602741394e-05,-3.31385739221e-05,-3.66609831835e-05,-4.01717148729e-05,-4.36707604902e-05,-4.71622461935e-05,-5.06471451556e-05,-5.41226427368e-05,-5.75889414824e-05,-6.10452493925e-05,-6.44884154928e-05,-6.79184764311e-05,-7.13369157465e-05,-7.47420697645e-05,-7.81349207614e-05,-8.15150791689e-05,-8.48792976302e-05,-8.82275748121e-05,-9.15612183063e-05,-9.48794260494e-05,-9.81842151215e-05,-0.000101476122404,-0.000104752716943,-0.000108014309201,-0.000111259232971,-0.000114483615235,-0.000117689110423,-0.000120876627584,-0.000124045490995,-0.000127195827883,-0.000130325878006,-0.000133435008945,-0.000136524025008,-0.000139592339342,-0.000142639949482,-0.000145668512251,-0.000148679636341,-0.000151671625166,-0.000154642893073,-0.000157592037395,-0.000160519198197,-0.000163425036071,-0.000166307151496,-0.000169164900569,-0.00017199980194,-0.000174813283913,-0.000177604293537,-0.000180372091414,-0.000183119262437,-0.000185847118718,-0.00018855701417,-0.000191248176039,-0.000193923298817,-0.000196585983625,-0.000199235841872,-0.000201872429198,-0.000204495240548,-0.00020710606784,-0.000209704982111,-0.000212290887268,-0.000214864281092,-0.000217425078975,-0.000219972940736,-0.000222504717376,-0.000225018921002,-0.000227515223107,-0.000229991929461,-0.000232447776909,-0.000234882690738,-0.000237295386964,-0.000239685293603,-0.000242051352521,-0.000244393727763,-0.000246713333545,-0.00024901092931,-0.000251286486156,-0.000253540154801,-0.000255774222419,-0.000257988604294,-0.000260183575878,-0.000262359953628,-0.000264517723764,-0.000266657990026,-0.000268780047667,-0.000270883191851,-0.000272967518084,-0.000275034733084,-0.000277085323109,-0.000279117592859,-0.000281132177366,-0.000283128303453,-0.000285107769269,-0.000287071028916,-0.000289017643068,-0.000290948025985,-0.000292862042012,-0.000294757763324,-0.000296472700256,-0.000297846197578,-0.000298877643419,-0.000299565827224,-0.000299910239029)
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(274)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('BCL6_UV-ChIP-seq_merged-vs-minusUV_control_ChIP-GSM2754206.dedup.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) : 274',bty='n')
dev.off()