# R script for Peak Model
#  -- generated by MACS
p <- c(0.0310736021476,0.0363138249949,0.0423814514498,0.0477136080313,0.0521264272712,0.0520344935371,0.0510232224612,0.0520344935371,0.053137698347,0.0518506260687,0.0523102947396,0.0512070899296,0.0494603489805,0.0494603489805,0.0495522827146,0.0490926140438,0.0496442164488,0.0499200176513,0.049184547778,0.0484490779046,0.0483571441705,0.0492764815121,0.0493684152463,0.0489087465755,0.0506554875246,0.0511151561954,0.0512070899296,0.0512990236637,0.0513909573979,0.0529538308787,0.0516667586004,0.0511151561954,0.0520344935371,0.0524022284737,0.0505635537904,0.0493684152463,0.049184547778,0.0489087465755,0.0508393549929,0.0517586923346,0.0520344935371,0.052586095942,0.0526780296762,0.053689300752,0.0540570356887,0.0547005718278,0.0537812344862,0.0534134995495,0.0509312887271,0.0493684152463,0.0489087465755,0.048081342968,0.0490006803096,0.0483571441705,0.0487248791071,0.0484490779046,0.0498280839171,0.0500119513854,0.0504716200563,0.0517586923346,0.053137698347,0.0537812344862,0.0520344935371,0.0517586923346,0.0512990236637,0.053689300752,0.0521264272712,0.0526780296762,0.0537812344862,0.0535973670179,0.053137698347,0.0546086380937,0.0545167043595,0.0539651019545,0.054792505562,0.0512070899296,0.0512990236637,0.0511151561954,0.0509312887271,0.0506554875246,0.0506554875246,0.0490926140438,0.0492764815121,0.0494603489805,0.048081342968,0.0494603489805,0.0497361501829,0.0495522827146,0.0503796863221,0.0502877525879,0.0523102947396,0.0532296320812,0.0550683067645,0.0550683067645,0.0572747163844,0.0584698549286,0.0604923970802,0.0600327284094,0.0591133910677,0.0597569272069,0.056447312777,0.0571827826503,0.0556199091695,0.0563553790428,0.0545167043595,0.0550683067645,0.0538731682203,0.054792505562,0.0559876441061,0.0539651019545,0.0555279754353,0.0568150477136,0.0578263187894,0.0572747163844,0.0590214573336,0.0596649934727,0.0594811260044,0.0594811260044,0.0593891922702,0.0607681982827,0.060952065751,0.0574585838528,0.0566311802453,0.0586537223969,0.0590214573336,0.0577343850553,0.0600327284094,0.0608601320168,0.0604923970802,0.060400463346,0.0614117344218,0.062055270561,0.0622391380293,0.0602165958777,0.060952065751,0.0591133910677,0.0569069814478,0.0556199091695,0.0545167043595,0.0545167043595,0.0537812344862,0.0554360417011,0.0555279754353,0.0557118429036,0.0532296320812,0.054792505562,0.0559876441061,0.0563553790428,0.0573666501186,0.0581940537261,0.0584698549286,0.0569989151819,0.0581021199919,0.0593891922702,0.0605843308143,0.063158475371,0.0634342765734,0.063158475371,0.0635262103076,0.0638020115101,0.0643536139151,0.0656406861934,0.0646294151176,0.0636181440418,0.0644455476493,0.0626988067001,0.0619633368268,0.0621472042951,0.0629746079026,0.0642616801809,0.0646294151176,0.0651810175226,0.066560023535,0.0679390295475,0.0672035596742,0.0662842223325,0.0674793608767,0.0672954934084,0.0661922885984,0.0642616801809,0.0633423428393,0.0624230054976,0.060952065751,0.0611359332193,0.061503668156,0.062606872966,0.063158475371,0.0639858789784,0.0655487524592,0.0663761560667,0.0678470958133,0.068766433155,0.0695019030283,0.0674793608767,0.0672954934084,0.0673874271425,0.06711162594,0.0673874271425,0.0648132825859,0.0649052163201,0.062606872966,0.0638020115101,0.0638020115101,0.0661003548642,0.0662842223325,0.0662842223325,0.0669277584717,0.0679390295475,0.069869637965,0.0720760475849,0.0746501921415,0.0746501921415,0.0742824572048,0.0737308547999,0.0740066560024,0.0744663246732,0.073822788534,0.0733631198632,0.0730873186607,0.0706051078383,0.0695019030283,0.0705131741041,0.0722599150532,0.0728115174582,0.0740066560024,0.0728115174582,0.0746501921415,0.075477595749,0.076580800559,0.0786033427106,0.0793388125839,0.0778678728373,0.0764888668248,0.0744663246732,0.073822788534,0.0772243366981,0.0742824572048,0.073822788534,0.0756614632173,0.0739147222682,0.0746501921415,0.0750179270782,0.0763049993565,0.0785114089764,0.0790630113814,0.0774082041664,0.0793388125839,0.0797984812547,0.0768566017615,0.0786033427106,0.0782356077739,0.0786033427106,0.079982348723,0.0806258848622,0.080533951128,0.082188758343,0.0817290896722,0.0822806920772,0.0830161619505,0.0825564932796,0.0832000294188,0.0824645595455,0.0809936197988,0.0808097523305,0.0806258848622,0.0793388125839,0.0797065475205,0.0782356077739,0.0782356077739,0.0791549451156,0.0786033427106,0.0780517403056,0.0784194752422,0.0783275415081,0.0792468788497,0.0828322944821,0.082740360748,0.0839354992921,0.0843951679629,0.0833838968871,0.0841193667604,0.0846709691654,0.0856822402412,0.0860499751779,0.0852225715704,0.0825564932796,0.0848548366338,0.087245113722,0.0874289811904,0.0881644510637,0.088348318532,0.089451523342,0.0902789269495,0.0902789269495,0.0918418004302,0.0941401437844,0.0940482100502,0.0930369389744,0.0945998124552,0.0959788184676,0.0971739570118,0.0975416919484,0.0979094268851,0.100391637708,0.102781914796,0.106367330428,0.107102800302,0.110504348466,0.112159155681,0.11657197492,0.117491312262,0.119789655616,0.123834739919,0.127144354349,0.130453968779,0.129902366374,0.132844245868,0.13422325188,0.136705462702,0.136613528968,0.138084468715,0.141210215677,0.141577950613,0.139647342196,0.138728004854,0.137440932576,0.138452203652,0.13753286631,0.13532645669,0.135602257893,0.136705462702,0.136797396437,0.136245794032,0.139371540993,0.141026348208,0.143324691562,0.14415209517,0.144887565043,0.149576185486,0.150403589093,0.15297773365,0.154356739662,0.154264805928,0.152885799915,0.152242263776,0.15077132403,0.150311655359,0.149851986688,0.149024583081,0.148381046941,0.146082703587,0.146174637321,0.145714968651,0.147921378271,0.148105245739,0.149116516815,0.151139058966,0.153989004725,0.152058396308,0.152518064979,0.153621269789,0.15343740232,0.155735745675,0.154816408333,0.155276077004,0.156471215548,0.155551878206,0.154908342067,0.157206685421,0.155735745675,0.157666354092,0.159872763712,0.159045360104,0.160424366117,0.161435637193,0.161987239598,0.160148564914,0.161067902256,0.158401823965,0.161067902256,0.160884034788,0.158217956497,0.158401823965,0.15895342637,0.158769558902,0.158034089029,0.157114751687,0.158217956497,0.160240498649,0.161067902256,0.161803372129,0.161711438395,0.162814643205,0.162998510674,0.162446908269,0.162722709471,0.16336624561,0.158861492636,0.15895342637,0.158769558902,0.157206685421,0.159596962509,0.161803372129,0.159688896244,0.159505028775,0.159780829978,0.162722709471,0.164745251623,0.165112986559,0.164377516686,0.16446945042,0.164285582952,0.161067902256,0.159964697446,0.158677625168,0.156930884219,0.155827679409,0.156471215548,0.154724474599,0.152609998713,0.150219721625,0.1474617096,0.148289113207,0.14856491441,0.147185908397,0.148381046941,0.147369775866,0.145347233714,0.14635850479,0.145347233714,0.145990769853,0.14304889036,0.140198944601,0.136981263905,0.136613528968,0.134039384412,0.131465239855,0.130545902513,0.128247559159,0.126868553147,0.125213745932,0.125121812198,0.124570209793,0.124937944729,0.123467004983,0.121720264034,0.119146119477,0.115836505047,0.114825233971,0.114549432769,0.112159155681,0.111423685807,0.108573740048,0.106091529226,0.104712523213,0.103057715998,0.102230312391,0.102230312391,0.100299703973,0.0984610292901,0.0974497582143,0.0966223546068,0.0960707522018,0.0954272160627,0.0936804751135,0.0918418004302,0.0911063305569,0.0909224630886,0.0890837884053,0.0889918546712,0.087245113722,0.0850387041021,0.0843032342288,0.0850387041021,0.0845790354313,0.0845790354313,0.0846709691654,0.0848548366338,0.0858661077096,0.0846709691654,0.0866015775829,0.0887160534687,0.0888079872028,0.088899920937,0.0911982642911,0.0904627944178,0.0916579329619,0.0886241197345,0.088899920937,0.0901869932153,0.0887160534687,0.0882563847978,0.0877047823929,0.086693511317,0.0859580414437,0.087796716127,0.0878886498612,0.0906466618861,0.0877047823929,0.0874289811904,0.0892676558736,0.0878886498612,0.0900950594811,0.0902789269495,0.0902789269495,0.0899111920128,0.0899111920128,0.0899111920128,0.093404673911,0.0926692040377,0.0911063305569,0.0921176016327,0.0907385956203,0.0920256678986,0.0935885413794,0.0965304208726,0.0980013606193,0.0987368304926,0.0992884328976,0.0999319690367,0.103793185872,0.104804456947,0.105539926821,0.106551197897,0.105631860555,0.104712523213,0.10508025815,0.10508025815,0.105356059352,0.10618346296,0.106551197897,0.106459264162,0.108757607517,0.108481806314,0.107194734036,0.106551197897,0.106367330428,0.107470535238,0.108022137643,0.10838987258,0.10728666777,0.108665673782,0.107746336441,0.108757607517,0.110872083402,0.113078493022,0.113262360491,0.113813962896,0.115101035174,0.115836505047,0.115560703845,0.116020372515,0.118134848401,0.120157390553,0.121536396565,0.121260595363,0.123007336312,0.123742806185,0.124570209793,0.127144354349,0.130453968779,0.132384577197,0.135969992829,0.137624800044,0.139463474727,0.141394083145,0.144244028904,0.147553643334,0.15012778789,0.15297773365,0.155092209535,0.156838950484,0.15564381194,0.156838950484,0.161895305864,0.165296854028,0.168146799787,0.171272546748,0.175869233457,0.17991431776,0.186073877949,0.19361244415,0.200047805542,0.206483166933,0.210620184971,0.216228142755,0.219997425855,0.22275543788,0.222387702944,0.22165223307,0.220365160792,0.217607148767,0.215860407818,0.212734660856,0.210987919907,0.207678305477,0.203081618769,0.199312335668,0.197657528453,0.196646257378,0.191681835733,0.186073877949,0.180465920165,0.173570890102,0.16446945042,0.154172872194,0.148197179473,0.140015077132,0.131373306121,0.124202474856,0.11767517973,0.114641366503,0.112894625554,0.110320480997,0.108849541251,0.10949307739,0.109033408719,0.110688215934,0.110780149668,0.110872083402,0.111883354478,0.109676944858,0.109125342453,0.109860812326,0.109860812326,0.109860812326,0.10838987258,0.105172191884,0.104896390682,0.103701252137,0.103885119606,0.103701252137,0.10177064372,0.100391637708,0.0987368304926,0.0991045654292,0.0981852280876,0.0993803666317,0.0989206979609,0.0962546196701,0.0930369389744,0.0924853365694,0.0915659992278,0.0903708606836,0.0897273245445,0.089451523342,0.0882563847978,0.0873370474562,0.0858661077096,0.0851306378362,0.0855903065071,0.0838435655579,0.0828322944821,0.0820048908747,0.0819129571405,0.0800742824572,0.0784194752422,0.0773162704323,0.0768566017615,0.0755695294831,0.0725357162557,0.0728115174582,0.0725357162557,0.0715244451799,0.069869637965,0.0695938367625,0.0708809090408,0.0715244451799,0.0722599150532,0.0746501921415,0.0758453306856,0.0763969330906,0.0748340596098,0.0763049993565,0.0776840053689,0.0766727342931,0.0751098608123,0.0733631198632,0.0718002463824,0.0695019030283,0.06931803556,0.0673874271425,0.0675712946108,0.0663761560667,0.0638939452443,0.0632504091051,0.0639858789784,0.0649971500542,0.0657326199276,0.0661922885984,0.0662842223325,0.0670196922059,0.0672035596742,0.0669277584717,0.0668358247375,0.0674793608767,0.0662842223325,0.0655487524592,0.0638020115101,0.0628826741685,0.0619633368268,0.0618714030927,0.0601246621435,0.0601246621435,0.0608601320168,0.0604923970802,0.0601246621435,0.0595730597385,0.0607681982827,0.0611359332193,0.0610439994852,0.0610439994852,0.0608601320168,0.0608601320168,0.0610439994852,0.060400463346,0.0605843308143,0.0593891922702,0.0585617886627,0.0576424513211,0.0581021199919,0.0570908489161,0.0592053248019,0.0585617886627,0.0584698549286,0.0580101862577,0.0581940537261,0.0580101862577,0.0580101862577,0.0584698549286,0.0583779211944,0.0593891922702,0.0584698549286,0.0601246621435,0.059848860941,0.0597569272069,0.0613198006877,0.0630665416368,0.0636181440418,0.0644455476493,0.0646294151176,0.0640778127126,0.0637100777759,0.0632504091051,0.0635262103076,0.0662842223325,0.067663228345,0.0679390295475,0.0686744994208,0.0679390295475,0.0672954934084,0.0667438910034,0.0685825656867,0.0683067644842,0.0685825656867,0.0656406861934,0.0624230054976,0.0619633368268,0.0636181440418,0.0664680898009,0.0680309632817,0.0701454391674,0.0709728427749,0.0699615716991,0.0702373729016,0.0718921801166,0.0729953849265,0.0739147222682,0.0723518487874,0.0702373729016,0.06931803556,0.0692261018258,0.0697777042308,0.0729034511924,0.0739147222682,0.0739147222682,0.0741905234707,0.0742824572048,0.0745582584073,0.0752937282807,0.0784194752422,0.0763969330906,0.0746501921415,0.0733631198632,0.0723518487874,0.0740985897365,0.0750179270782,0.0741905234707,0.0737308547999,0.0750179270782,0.0744663246732,0.0770404692298,0.0778678728373,0.0777759391031,0.0771324029639,0.0741905234707,0.0733631198632,0.0741905234707,0.0742824572048,0.0726276499899,0.0699615716991,0.0695938367625,0.0688583668891,0.0683986982183,0.0696857704966,0.0706970415724,0.0713405777116,0.0722599150532,0.0729034511924,0.0733631198632,0.0737308547999,0.0723518487874,0.0726276499899,0.074374390939,0.0736389210657,0.074374390939,0.074374390939,0.0741905234707,0.0737308547999,0.0741905234707,0.0759372644198,0.0783275415081,0.0779598065714,0.076580800559,0.0768566017615,0.0757533969515,0.0763049993565,0.075477595749,0.0757533969515,0.0756614632173,0.0740066560024,0.0721679813191,0.0722599150532,0.0722599150532,0.0727195837241,0.073271186129,0.0726276499899,0.0722599150532,0.0725357162557,0.0707889753066,0.0706970415724,0.0707889753066,0.073271186129,0.073271186129,0.0728115174582,0.0753856620148,0.0745582584073,0.0758453306856,0.0762130656223,0.0775920716348,0.0794307463181,0.0794307463181,0.0782356077739,0.0781436740398,0.0764888668248,0.0724437825216,0.0726276499899,0.0726276499899,0.0706051078383,0.0699615716991,0.068766433155,0.0703293066358,0.06821483075,0.0661003548642,0.0683986982183,0.0701454391674,0.0699615716991,0.069869637965,0.0702373729016,0.0689503006233,0.0683986982183,0.0651810175226,0.0664680898009,0.0679390295475,0.0666519572692,0.0661922885984,0.0657326199276,0.0636181440418,0.0637100777759,0.0651810175226,0.0656406861934,0.0679390295475,0.06711162594,0.0669277584717,0.0675712946108,0.0684906319525,0.0686744994208,0.0690422343575,0.0695019030283,0.068766433155,0.0667438910034,0.06711162594,0.0666519572692,0.0670196922059,0.0663761560667,0.0662842223325,0.0668358247375,0.0674793608767,0.0686744994208,0.0708809090408,0.0723518487874,0.0712486439774,0.0725357162557,0.0735469873315,0.0730873186607,0.0717083126482,0.0703293066358,0.0695938367625,0.06711162594,0.0658245536617,0.0659164873959,0.0649052163201,0.0649052163201,0.0636181440418,0.0632504091051,0.0648132825859,0.0661003548642,0.0677551620792,0.0692261018258,0.0677551620792,0.06711162594,0.0680309632817,0.0653648849909,0.06600842113,0.0681228970158,0.0657326199276,0.0653648849909,0.0643536139151,0.0636181440418,0.0642616801809,0.0656406861934,0.0647213488517,0.0683986982183,0.0684906319525,0.0662842223325,0.0669277584717,0.0655487524592,0.0652729512567,0.0646294151176,0.0636181440418,0.0642616801809,0.0650890837884,0.0617794693585,0.0605843308143,0.0613198006877,0.0611359332193,0.0616875356243,0.0618714030927,0.062055270561,0.0630665416368,0.0618714030927,0.0613198006877,0.0614117344218,0.0614117344218,0.0612278669535,0.0617794693585,0.0608601320168,0.0606762645485,0.0595730597385,0.0603085296119,0.0601246621435,0.0601246621435,0.061503668156,0.0617794693585,0.060952065751,0.0601246621435,0.0605843308143,0.059848860941,0.061503668156,0.0599407946752,0.0600327284094,0.0603085296119,0.0592053248019,0.0603085296119,0.0610439994852,0.062606872966,0.0649052163201,0.0669277584717,0.0655487524592,0.0663761560667,0.0661922885984,0.0666519572692,0.0672035596742,0.0668358247375,0.0659164873959,0.0652729512567,0.0640778127126,0.0626988067001,0.0621472042951,0.0618714030927,0.059848860941,0.0588375898652,0.0592053248019,0.0571827826503,0.0576424513211,0.0573666501186,0.0567231139794,0.0552521742328,0.0563553790428,0.0570908489161,0.0580101862577,0.0581940537261,0.0582859874602,0.0592053248019,0.059848860941,0.0589295235994,0.0590214573336,0.0588375898652,0.0593891922702,0.0586537223969,0.0581940537261,0.0577343850553,0.0570908489161,0.0575505175869,0.0571827826503,0.056447312777,0.0552521742328,0.0555279754353,0.0558037766378,0.0547005718278,0.0560795778403,0.0565392465111,0.056447312777,0.0555279754353,0.056447312777,0.0572747163844,0.0577343850553,0.0577343850553,0.0567231139794,0.0576424513211,0.0575505175869,0.0569069814478,0.0566311802453,0.0571827826503,0.0543328368912,0.0546086380937,0.0545167043595,0.0558037766378,0.0567231139794,0.0552521742328,0.055344107967,0.0543328368912,0.0534134995495,0.0537812344862,0.0560795778403,0.0561715115745,0.0560795778403,0.0551602404986,0.0556199091695,0.0581021199919,0.0581021199919,0.0594811260044,0.060400463346,0.059848860941,0.0585617886627,0.0592053248019,0.0602165958777,0.0606762645485,0.0604923970802,0.059848860941,0.0590214573336,0.0592053248019,0.0599407946752,0.060400463346,0.0616875356243,0.0614117344218,0.0603085296119,0.059848860941,0.0601246621435,0.0589295235994,0.0594811260044,0.0582859874602,0.0580101862577,0.0570908489161,0.056447312777,0.0572747163844,0.0577343850553,0.0576424513211,0.055895710372,0.0565392465111,0.0560795778403,0.0558037766378,0.0548844392962,0.0537812344862,0.0543328368912,0.0530457646129,0.053689300752,0.0526780296762,0.0523102947396,0.0532296320812,0.0532296320812,0.0543328368912,0.0543328368912,0.0548844392962,0.0540570356887,0.0529538308787,0.0528618971445,0.0530457646129,0.0535973670179,0.0517586923346,0.0530457646129,0.0537812344862,0.053137698347,0.0540570356887,0.0543328368912,0.0548844392962,0.0551602404986,0.0567231139794,0.0551602404986,0.0558037766378,0.055895710372,0.0550683067645,0.0558037766378,0.0547005718278,0.0544247706253,0.0530457646129,0.0529538308787,0.052586095942,0.0544247706253,0.054792505562,0.0535054332837,0.053689300752,0.0546086380937,0.0552521742328,0.0546086380937,0.0582859874602,0.0577343850553,0.0574585838528,0.0562634453086,0.0562634453086,0.0559876441061,0.0552521742328,0.0544247706253,0.0555279754353,0.0557118429036,0.0540570356887,0.0534134995495,0.0532296320812,0.0544247706253,0.054240903157,0.0544247706253,0.0558037766378,0.0555279754353,0.055344107967,0.0562634453086,0.0565392465111,0.0574585838528,0.0581940537261,0.0583779211944,0.0581021199919,0.0587456561311,0.0572747163844,0.0569989151819,0.0562634453086,0.055895710372,0.054240903157,0.0541489694228,0.0535973670179,0.0530457646129,0.053137698347,0.0517586923346,0.0515748248662,0.0524022284737,0.0519425598029,0.0521264272712,0.0526780296762,0.0526780296762,0.0520344935371,0.0533215658154,0.0532296320812,0.0540570356887,0.0551602404986,0.054792505562,0.0562634453086,0.0562634453086,0.0555279754353,0.0554360417011,0.0565392465111,0.0546086380937,0.0537812344862,0.0524022284737,0.0522183610054,0.0526780296762,0.0513909573979,0.0522183610054,0.0540570356887,0.0534134995495,0.0529538308787,0.0524941622079,0.0545167043595,0.0565392465111,0.0567231139794,0.055344107967,0.0552521742328,0.0549763730303,0.053689300752,0.0532296320812,0.0518506260687,0.0522183610054,0.0510232224612,0.0506554875246,0.0500119513854,0.0505635537904,0.0494603489805,0.0473458730947,0.0478974754997,0.0434846562598,0.0393476382224,0.03465901778,0.0294187949326,0.0)
m <- c(0.0329013642976,0.0400176706204,0.0447310683147,0.0498141442595,0.0551744788923,0.0560986745186,0.0553593180176,0.0548048006418,0.0536033463275,0.0535109267649,0.053233668077,0.0521246333254,0.0526791507012,0.0531412485144,0.0530488289517,0.0519397942001,0.0523094724507,0.0525867311386,0.0524943115759,0.0525867311386,0.0536033463275,0.0525867311386,0.0515701159496,0.0518473746375,0.0518473746375,0.0527715702638,0.0528639898265,0.0519397942001,0.0524018920133,0.051200437699,0.0500914029474,0.0496293051343,0.0500914029474,0.0487051095079,0.0487051095079,0.0473188160684,0.0469491378179,0.0474112356311,0.0482430116948,0.0480581725695,0.0486126899453,0.0481505921321,0.0472263965058,0.0471339769432,0.0467642986926,0.0470415573805,0.0470415573805,0.0471339769432,0.0461173617542,0.0472263965058,0.04667187913,0.0461173617542,0.0474112356311,0.0481505921321,0.0486126899453,0.0500914029474,0.050461081198,0.050461081198,0.0506459203232,0.0500914029474,0.0500914029474,0.0524943115759,0.0516625355122,0.0515701159496,0.0511080181364,0.0499989833848,0.0487975290706,0.0481505921321,0.04667187913,0.0471339769432,0.0467642986926,0.0450083270026,0.0448234878773,0.0441765509389,0.0438068726884,0.0435296140005,0.0440841313763,0.0442689705015,0.045655263941,0.0451007465652,0.0450083270026,0.0463022008795,0.0468567182553,0.0465794595674,0.0474112356311,0.0467642986926,0.047688494319,0.0480581725695,0.0475036551937,0.0472263965058,0.0477809138816,0.0472263965058,0.0481505921321,0.0493520464464,0.0485202703827,0.0487051095079,0.0485202703827,0.0486126899453,0.0486126899453,0.0490747877585,0.04842785082,0.0488899486332,0.0474112356311,0.0480581725695,0.0477809138816,0.0473188160684,0.0473188160684,0.0477809138816,0.0483354312574,0.0488899486332,0.0496293051343,0.049444466009,0.0500914029474,0.0492596268837,0.0503686616353,0.0527715702638,0.0517549550749,0.050461081198,0.0515701159496,0.0508307594485,0.0510155985738,0.0507383398859,0.0513852768243,0.0512928572617,0.0498141442595,0.0480581725695,0.0499065638222,0.0490747877585,0.0462097813168,0.0458401030663,0.0467642986926,0.0468567182553,0.0475036551937,0.04667187913,0.0487051095079,0.0492596268837,0.0488899486332,0.0512928572617,0.0530488289517,0.0540654441407,0.0530488289517,0.0535109267649,0.0544351223912,0.0566531918944,0.0568380310197,0.0568380310197,0.0567456114571,0.0562835136439,0.0572077092702,0.0575773875208,0.0588712613976,0.0589636809603,0.0566531918944,0.0553593180176,0.0538806050154,0.0537881854528,0.0534185072023,0.0530488289517,0.0517549550749,0.0511080181364,0.0499989833848,0.0497217246969,0.050461081198,0.0500914029474,0.0530488289517,0.0535109267649,0.0537881854528,0.0548972202044,0.0560986745186,0.057022870145,0.0566531918944,0.0557289962681,0.0546199615165,0.0554517375802,0.0527715702638,0.0536957658902,0.0533260876396,0.0514776963869,0.0520322137628,0.0516625355122,0.0510155985738,0.0525867311386,0.053233668077,0.0531412485144,0.0544351223912,0.0529564093891,0.0533260876396,0.0541578637033,0.0536957658902,0.0534185072023,0.0553593180176,0.0548972202044,0.0544351223912,0.0548048006418,0.0543427028286,0.0554517375802,0.0556365767055,0.057022870145,0.0564683527692,0.057022870145,0.0567456114571,0.0582243244592,0.0589636809603,0.0585940027097,0.0581319048966,0.057762226646,0.0575773875208,0.0569304505823,0.0567456114571,0.0567456114571,0.0558214158307,0.0535109267649,0.0545275419539,0.0547123810791,0.0551744788923,0.0555441571428,0.0571152897076,0.0580394853339,0.0590561005229,0.0585940027097,0.0583167440218,0.059795457024,0.0599802961492,0.0586864222724,0.0597030374613,0.0585015831471,0.0576698070834,0.0574849679581,0.056006254956,0.056006254956,0.0559138353934,0.0554517375802,0.0555441571428,0.0578546462087,0.0566531918944,0.0575773875208,0.0565607723318,0.0563759332065,0.0575773875208,0.0569304505823,0.0582243244592,0.0573925483955,0.0573925483955,0.0575773875208,0.0572077092702,0.058778841835,0.058778841835,0.0579470657713,0.0575773875208,0.0585940027097,0.0593333592108,0.0596106178987,0.059795457024,0.0585940027097,0.0595181983361,0.0581319048966,0.0586864222724,0.0585940027097,0.057762226646,0.0564683527692,0.0536033463275,0.0536033463275,0.0530488289517,0.0526791507012,0.0528639898265,0.0535109267649,0.0533260876396,0.0552668984549,0.0568380310197,0.0593333592108,0.0614590091514,0.0620135265272,0.0611817504635,0.0622907852151,0.0621059460898,0.0610893309009,0.062568043903,0.0603499743998,0.0607196526503,0.0591485200855,0.0593333592108,0.0602575548371,0.0607196526503,0.0623832047777,0.0616438482767,0.0619211069646,0.0614590091514,0.0612741700261,0.0613665895888,0.0628453025909,0.0630301417162,0.0633998199667,0.0631225612788,0.0616438482767,0.0628453025909,0.0644164351557,0.0633074004041,0.064324015593,0.0646012742809,0.0647861134062,0.0656178894699,0.0645088547183,0.0666345046589,0.0667269242215,0.0661724068457,0.0670041829094,0.0671890220347,0.0671890220347,0.0674662807226,0.067096602472,0.0670041829094,0.0688525741621,0.0687601545994,0.0696843502258,0.0696843502258,0.0668193437841,0.0673738611599,0.0682056372236,0.0672814415973,0.067096602472,0.0667269242215,0.065340630782,0.0647861134062,0.0642315960304,0.0646012742809,0.0658951481578,0.0671890220347,0.0662648264083,0.0664496655336,0.0658951481578,0.0673738611599,0.0700540284763,0.0704237067269,0.0707933849774,0.0709782241027,0.0707009654148,0.0700540284763,0.0706085458521,0.0707009654148,0.07088580454,0.06912983285,0.0670041829094,0.0657103090325,0.0646936938436,0.0659875677204,0.0665420850962,0.0675587002852,0.0682056372236,0.0692222524126,0.069869189351,0.0733811327311,0.0737508109817,0.0749522652959,0.0754143631091,0.0740280696696,0.0751371044212,0.0753219435464,0.0758764609222,0.0744901674827,0.0743053283575,0.0727341957927,0.0731962936059,0.0735659718564,0.0738432305443,0.0741204892322,0.0732887131685,0.072919034918,0.0734735522938,0.0741204892322,0.0748598457333,0.0751371044212,0.0745825870454,0.0731962936059,0.073658391419,0.0745825870454,0.0755067826717,0.075691621797,0.0748598457333,0.0771703347991,0.0783717891133,0.0773551739244,0.0780021108628,0.0799429216781,0.0808671173045,0.0807746977418,0.0817913129308,0.0816064738055,0.0829003476824,0.0804974390539,0.0786490478012,0.078464208676,0.0778172717375,0.0768930761112,0.075691621797,0.0753219435464,0.0732887131685,0.0738432305443,0.0727341957927,0.0738432305443,0.0743053283575,0.0755992022343,0.0755067826717,0.0754143631091,0.0761537196101,0.0777248521749,0.0763385587354,0.0755992022343,0.074675006608,0.0731962936059,0.0734735522938,0.0722720979795,0.0722720979795,0.0731038740432,0.0720872588543,0.0700540284763,0.07088580454,0.0713479023532,0.0712554827906,0.0718100001664,0.0711630632279,0.0704237067269,0.0690374132873,0.0689449937247,0.0680207980984,0.0682980567863,0.0684828959115,0.0674662807226,0.0669117633468,0.0675587002852,0.0667269242215,0.0668193437841,0.0676511198478,0.0669117633468,0.0665420850962,0.0655254699073,0.0651557916567,0.065340630782,0.0652482112194,0.0647861134062,0.0660799872831,0.0661724068457,0.0670041829094,0.066357245971,0.066357245971,0.0671890220347,0.0675587002852,0.0675587002852,0.0673738611599,0.0668193437841,0.0667269242215,0.0683904763489,0.0669117633468,0.068113217661,0.0677435394105,0.0702388676016,0.069869189351,0.0692222524126,0.0702388676016,0.0697767697884,0.0682980567863,0.0659875677204,0.0659875677204,0.0642315960304,0.0647861134062,0.0609044917756,0.0612741700261,0.0618286874019,0.0626604634656,0.0631225612788,0.0647861134062,0.0644164351557,0.0654330503446,0.065340630782,0.0662648264083,0.0667269242215,0.0668193437841,0.0658027285952,0.0639543373425,0.0628453025909,0.0626604634656,0.0633998199667,0.0614590091514,0.0621983656525,0.0623832047777,0.0627528830283,0.0610893309009,0.0609969113382,0.0609969113382,0.0616438482767,0.0596106178987,0.0588712613976,0.0602575548371,0.0601651352745,0.0585940027097,0.0580394853339,0.0590561005229,0.0588712613976,0.0581319048966,0.0582243244592,0.0595181983361,0.0599802961492,0.0600727157119,0.0613665895888,0.0636770786546,0.065340630782,0.0668193437841,0.0661724068457,0.068113217661,0.0674662807226,0.0679283785357,0.0693146719752,0.0697767697884,0.0673738611599,0.0657103090325,0.0658027285952,0.0655254699073,0.0676511198478,0.0672814415973,0.0674662807226,0.0662648264083,0.065340630782,0.0647861134062,0.0664496655336,0.0667269242215,0.0661724068457,0.0649709525315,0.0648785329688,0.0655254699073,0.0673738611599,0.068113217661,0.0682056372236,0.0677435394105,0.067096602472,0.0669117633468,0.0674662807226,0.0678359589731,0.0686677350368,0.0699616089137,0.0694070915379,0.0721796784169,0.0735659718564,0.074675006608,0.0765233978607,0.0773551739244,0.0779096913002,0.0787414673639,0.078464208676,0.0779096913002,0.0773551739244,0.0766158174233,0.0766158174233,0.077447593487,0.0768930761112,0.0789263064891,0.0791111456144,0.080220180366,0.0810519564297,0.0819761520561,0.0845638998098,0.082992767245,0.084009382434,0.0853956758735,0.0871516475635,0.0880758431899,0.0884455214404,0.0876137453767,0.0887227801283,0.0892772975041,0.0881682627525,0.0904787518184,0.0903863322557,0.0914029474447,0.0927892408842,0.0935285973853,0.0952845690753,0.0959315060137,0.0964860233895,0.0982419950796,0.0998131276444,0.103325071024,0.104618944901,0.105912818778,0.104896203589,0.103694749275,0.104618944901,0.106837014405,0.10914750347,0.107761210031,0.108408146969,0.105912818778,0.106374916591,0.107114273092,0.109702020846,0.112197349037,0.112844285976,0.112567027288,0.112197349037,0.114322998978,0.119128816235,0.124858829118,0.129941905063,0.131050939815,0.136780952698,0.141494350392,0.146577426337,0.15544970435,0.161549395484,0.16912779962,0.175874427692,0.17827733632,0.183452831828,0.189737362087,0.191400914214,0.196021892346,0.201382226979,0.204801750796,0.208590952864,0.210439344117,0.211455959306,0.215984517875,0.217278391752,0.219404041692,0.219126783004,0.21792532869,0.214598224435,0.210162085429,0.206188044236,0.203415457357,0.19897931835,0.193618983718,0.188905586023,0.185208803518,0.183452831828,0.176428945068,0.174488134252,0.174303295127,0.171900386499,0.169035380057,0.165523436677,0.162011493297,0.15720567604,0.152769537033,0.146300167649,0.146485006774,0.143620000333,0.139738378702,0.138444504825,0.135024981008,0.132529652817,0.131050939815,0.129387387687,0.12947980725,0.130496422439,0.128463192061,0.127446576872,0.124304311742,0.120884787925,0.120422690112,0.120145431424,0.118481879296,0.117927361921,0.115616872855,0.115524453292,0.115709292417,0.113398803352,0.11441541854,0.114877516354,0.113768481602,0.112567027288,0.112751866413,0.115247194604,0.114600257666,0.113583642477,0.112012509912,0.110626216472,0.110071699097,0.109609601284,0.108962664345,0.109517181721,0.109517181721,0.107576370906,0.106559755717,0.104434105776,0.104711364464,0.105543140528,0.104711364464,0.105358301402,0.106190077466,0.106097657903,0.105173462277,0.104526525339,0.105358301402,0.105543140528,0.104803784027,0.103417490587,0.102308455835,0.0975950581411,0.0966708625148,0.0946376321369,0.0938058560732,0.0921423039458,0.0922347235084,0.0909408496315,0.0919574648205,0.0918650452579,0.0916802061326,0.0935285973853,0.0941755343237,0.0921423039458,0.0932513386974,0.0928816604468,0.0911256887568,0.0926044017589,0.0918650452579,0.0925119821963,0.0920498843831,0.0904787518184,0.0886303605657,0.0882606823151,0.0859501932493,0.0862274519372,0.0848411584977,0.085025997623,0.0841018019966,0.082992767245,0.0819761520561,0.0841018019966,0.0846563193724,0.0853956758735,0.0847487389351,0.0839169628714,0.0865971301877,0.0871516475635,0.0858577736867,0.0863198714998,0.0881682627525,0.0866895497504,0.0873364866888,0.087798584502,0.0888151996909,0.0897393953173,0.0902014931305,0.0909408496315,0.0941755343237,0.0957466668885,0.0969481212027,0.099905547207,0.099905547207,0.102308455835,0.105820399216,0.108500566532,0.109239923033,0.109239923033,0.110995894723,0.112012509912,0.1122897686,0.113491222914,0.113398803352,0.113306383789,0.109979279534,0.110441377347,0.111920090349,0.114969935916,0.11441541854,0.115709292417,0.116541068481,0.117834942358,0.122271081364,0.125320926931,0.131328198502,0.134193204944,0.13474772232,0.136411274447,0.140847413454,0.141864028643,0.144636615522,0.145375972023,0.147686461089,0.147686461089,0.149350013216,0.150736306656,0.152861956596,0.152677117471,0.149534852341,0.152122600095,0.153046795721,0.155634543475,0.153231634847,0.155357284787,0.156373899976,0.155357284787,0.156189060851,0.15720567604,0.16071761942,0.161364556358,0.160440360732,0.158776808605,0.162935688923,0.164414401925,0.163767464987,0.167094569242,0.169589897433,0.170051995246,0.170144414809,0.169220219182,0.173563938626,0.173286679938,0.170791351747,0.171345869123,0.170976190872,0.166909730116,0.164414401925,0.164599241051,0.165431017114,0.16561585624,0.164321982363,0.166170373615,0.16737182793,0.165800695365,0.166170373615,0.168758121369,0.168388443119,0.166170373615,0.163120528048,0.161456975921,0.161272136796,0.162011493297,0.162196332422,0.161641815046,0.162288751985,0.161734234609,0.160070682482,0.159978262919,0.16247359111,0.165338597552,0.162288751985,0.159701004231,0.157945032541,0.159423745543,0.158129871666,0.159978262919,0.164414401925,0.164876499738,0.16247359111,0.161549395484,0.163490206299,0.164691660613,0.163582625862,0.160810038983,0.158499549917,0.15896164773,0.153416473972,0.153046795721,0.152954376159,0.153324054409,0.152677117471,0.148980334965,0.151845341407,0.151290824031,0.154617928286,0.149165174091,0.150643887093,0.149534852341,0.150274208842,0.147963719776,0.1466698459,0.148887915403,0.144636615522,0.14842581759,0.144451776396,0.143989678583,0.143897259021,0.143897259021,0.140939833016,0.139461120014,0.138536924388,0.137427889636,0.1382596657,0.133823526694,0.134562883195,0.135394659258,0.134378044069,0.134932561445,0.137797567887,0.138814183076,0.139091441764,0.138999022201,0.137612728762,0.137889987449,0.138444504825,0.136780952698,0.137520309199,0.137427889636,0.135579498384,0.133823526694,0.131420618065,0.130958520252,0.132067555004,0.130404002876,0.12772383556,0.127908674685,0.124396731305,0.11931365536,0.116541068481,0.113768481602,0.111088314286,0.108315727407,0.103602329712,0.100737323271,0.0987040928928,0.0954694082006,0.0937134365105,0.0944527930116,0.0918650452579,0.0913105278821,0.0930664995721,0.09158778657,0.0922347235084,0.092327143071,0.0914953670073,0.0919574648205,0.0903863322557,0.0887227801283,0.0893697170668,0.0887227801283,0.0858577736867,0.0860426128119,0.084009382434,0.0833624454956,0.0816064738055,0.0800353412408,0.0839169628714,0.0841018019966,0.084009382434,0.0834548650582,0.0851184171856,0.0841018019966,0.0847487389351,0.0861350323746,0.0878910040646,0.0874289062514,0.0827155085571,0.0831776063703,0.0831776063703,0.082253410744,0.0823458303066,0.0826230889945,0.0821609911813,0.0785566282386,0.0765233978607,0.0773551739244,0.0789263064891,0.0783717891133,0.0776324326123,0.0786490478012,0.0781869499881,0.0771703347991,0.0785566282386,0.0791111456144,0.0801277608034,0.0791111456144,0.0791111456144,0.0787414673639,0.0785566282386,0.0771703347991,0.076430978298,0.0766158174233,0.0744901674827,0.0763385587354,0.0752295239838,0.0785566282386,0.0786490478012,0.0781869499881,0.0793884043023,0.0804050194913,0.0799429216781,0.0799429216781,0.0805898586166,0.0792959847397,0.0808671173045,0.0779096913002,0.0775400130496,0.0763385587354,0.0730114544806,0.073658391419,0.0734735522938,0.073658391419,0.0726417762301,0.0721796784169,0.0705161262895,0.0689449937247,0.0682056372236,0.0678359589731,0.0672814415973,0.0659875677204,0.0657103090325,0.0647861134062,0.0634922395293,0.0628453025909,0.0645088547183,0.0651557916567,0.0650633720941,0.0657103090325,0.0690374132873,0.0694070915379,0.07088580454,0.0699616089137,0.0719948392916,0.0739356501069,0.0728266153553,0.0721796784169,0.0723645175422,0.0727341957927,0.0701464480389,0.0707933849774,0.0684828959115,0.0688525741621,0.0686677350368,0.0675587002852,0.0682056372236,0.0682056372236,0.0684828959115,0.0678359589731,0.06912983285,0.0682980567863,0.0671890220347,0.0678359589731,0.0680207980984,0.0673738611599,0.0674662807226,0.0684828959115,0.0670041829094,0.0687601545994,0.06912983285,0.0689449937247,0.0682056372236,0.0683904763489,0.0669117633468,0.0678359589731,0.0657103090325,0.0649709525315,0.0641391764678,0.0624756243404,0.0621059460898,0.0597030374613,0.0609044917756,0.0597030374613,0.0606272330877,0.0602575548371,0.0606272330877,0.0611817504635,0.0614590091514,0.0619211069646,0.0629377221535,0.0651557916567,0.0658951481578,0.0662648264083,0.0646936938436,0.0640467569051,0.0637694982172,0.0620135265272,0.0623832047777,0.0621059460898,0.0596106178987,0.0595181983361,0.0583167440218,0.0585015831471,0.0596106178987,0.0609044917756,0.059795457024,0.0609044917756,0.0628453025909,0.0606272330877,0.0604423939624,0.0591485200855,0.0604423939624,0.0607196526503,0.0609044917756,0.059795457024,0.0606272330877,0.0622907852151,0.0597030374613,0.0609044917756,0.0611817504635,0.0619211069646,0.0610893309009,0.0612741700261,0.0621983656525,0.0609044917756,0.0613665895888,0.058778841835,0.0593333592108,0.0597030374613,0.0599802961492,0.060534813525,0.0594257787734,0.0590561005229,0.0574849679581,0.0585015831471,0.0586864222724,0.0598878765866,0.0595181983361,0.059795457024,0.0601651352745,0.0590561005229,0.0603499743998,0.0613665895888,0.0607196526503,0.0595181983361,0.0598878765866,0.0594257787734,0.0609044917756,0.0603499743998,0.0595181983361,0.0599802961492,0.0593333592108,0.0589636809603,0.0609044917756,0.0604423939624,0.0592409396482,0.0584091635845,0.0578546462087,0.0564683527692,0.0569304505823,0.0552668984549,0.056006254956,0.0544351223912,0.0524943115759,0.0540654441407,0.0541578637033,0.0557289962681,0.0561910940813,0.0571152897076,0.0584091635845,0.0594257787734,0.0588712613976,0.0601651352745,0.0600727157119,0.0607196526503,0.059795457024,0.0585940027097,0.058778841835,0.0584091635845,0.057762226646,0.0573001288329,0.0571152897076,0.0566531918944,0.0560986745186,0.0543427028286,0.056006254956,0.054989639767,0.0548972202044,0.0556365767055,0.0538806050154,0.0557289962681,0.056006254956,0.0545275419539,0.0557289962681,0.0566531918944,0.054989639767,0.0543427028286,0.0523094724507,0.0533260876396,0.0552668984549,0.0546199615165,0.0530488289517,0.0530488289517,0.0513852768243,0.0508307594485,0.0526791507012,0.0536033463275,0.0535109267649,0.0523094724507,0.0512928572617,0.0509231790111,0.0529564093891,0.0539730245781,0.0555441571428,0.0559138353934,0.0552668984549,0.054989639767,0.0556365767055,0.0567456114571,0.0559138353934,0.0554517375802,0.0561910940813,0.0556365767055,0.0544351223912,0.0536033463275,0.0523094724507,0.0525867311386,0.0537881854528,0.0517549550749,0.0517549550749,0.0523094724507,0.0503686616353,0.0500914029474,0.0505535007606,0.0509231790111,0.0519397942001,0.0525867311386,0.0510155985738,0.0514776963869,0.0531412485144,0.0524943115759,0.0528639898265,0.0483354312574,0.0433447748752,0.0380768598051,0.032531686047,0.0)
ycorr <- c(1.85026407684e-05,1.80872368903e-05,1.68400809256e-05,1.47571679024e-05,1.18509439419e-05,8.13528735203e-06,3.62976639687e-06,-9.26646376114e-07,-5.49723293091e-06,-1.00430862946e-05,-1.45310142581e-05,-1.89413906121e-05,-2.32575186828e-05,-2.7457249373e-05,-3.15080579946e-05,-3.53984228214e-05,-3.91252727417e-05,-4.26717101397e-05,-4.60540870601e-05,-4.93020293604e-05,-5.24283299724e-05,-5.54415964836e-05,-5.83458648872e-05,-6.11593785331e-05,-6.38940895593e-05,-6.65624075206e-05,-6.91561385279e-05,-7.16859627392e-05,-7.41665294636e-05,-7.65807129903e-05,-7.89274094882e-05,-8.12077594884e-05,-8.34299636785e-05,-8.5597056666e-05,-8.77044400162e-05,-8.97580438334e-05,-9.17681340779e-05,-9.37462191006e-05,-9.5678217613e-05,-9.75609856063e-05,-9.93964731631e-05,-0.000101183243032,-0.000102925669617,-0.000104615435823,-0.000106254946338,-0.000107841458688,-0.000109378379429,-0.000110860588072,-0.000112287312671,-0.000113666564369,-0.0001150078795,-0.000116306393668,-0.000117553811075,-0.000118759291621,-0.00011994077631,-0.00012109826716,-0.00012223568019,-0.000123347568875,-0.00012443086019,-0.00012549731789,-0.000126544361511,-0.000127579432312,-0.000128622283011,-0.000129672913953,-0.00013072124422,-0.000131760387615,-0.000132782953954,-0.000133798954195,-0.000134820015809,-0.000135847002935,-0.000136884810038,-0.000137936575399,-0.000138994824757,-0.000140050235672,-0.000141105426482,-0.000142160394941,-0.000143218809273,-0.000144283403431,-0.000145339576439,-0.000146375968027,-0.000147372019694,-0.00014831814336,-0.000149199038412,-0.000150021035505,-0.000150779046351,-0.000151483652775,-0.000152132966,-0.000152721061238,-0.000153253788263,-0.000153737950444,-0.000154189017251,-0.000154634319313,-0.000155067524402,-0.000155500978524,-0.000155932642539,-0.00015635780401,-0.000156779920785,-0.000157209044515,-0.000157642983633,-0.000158078967776,-0.000158506743877,-0.000158911807275,-0.000159293989619,-0.000159651497616,-0.000159988435037,-0.000160302492112,-0.000160603094564,-0.000160874138393,-0.000161115681785,-0.000161326848452,-0.000161519631359,-0.000161699065242,-0.000161873808646,-0.000162039753838,-0.000162197709299,-0.000162348808848,-0.000162496563892,-0.000162637327733,-0.000162779756634,-0.000162926118065,-0.000163075002941,-0.000163220105176,-0.000163361581166,-0.000163500735179,-0.000163645301614,-0.0001638046717,-0.000163969502482,-0.000164148303233,-0.000164344411574,-0.000164553997906,-0.000164777278818,-0.000165017507439,-0.000165277631739,-0.000165566080626,-0.000165879216875,-0.000166206798023,-0.000166548085013,-0.000166909106414,-0.000167277435074,-0.000167653498516,-0.000168044598303,-0.000168440667056,-0.000168851993464,-0.000169264468387,-0.000169679625811,-0.000170108174724,-0.000170564926118,-0.000171049173535,-0.000171572426522,-0.000172144258142,-0.000172777431224,-0.000173485699509,-0.000174273585397,-0.000175158876757,-0.000176155913366,-0.000177260944755,-0.000178469678706,-0.000179789572008,-0.000181220081108,-0.000182761327526,-0.000184408403014,-0.00018615981201,-0.000187999165717,-0.000189932517511,-0.000191942388637,-0.000194024688044,-0.000196173925763,-0.000198367412672,-0.000200600922351,-0.00020287473333,-0.000205175754821,-0.000207488690407,-0.000209814803917,-0.000212148492928,-0.000214484141643,-0.00021682274388,-0.000219169258061,-0.000221541662485,-0.000223949741537,-0.000226375201722,-0.000228814932527,-0.000231283220602,-0.000233791953955,-0.000236330801918,-0.000238907192005,-0.000241519994931,-0.000244153765352,-0.000246789690124,-0.000249399560465,-0.000251995289536,-0.000254572622101,-0.00025712697611,-0.00025964844775,-0.000262130816797,-0.000264555977186,-0.000266919889378,-0.000269229422577,-0.000271502107433,-0.000273764174128,-0.00027602643857,-0.000278288985338,-0.00028056145496,-0.000282847143467,-0.000285137476255,-0.000287447233533,-0.000289787179103,-0.000292143173234,-0.000294493595258,-0.000296821477644,-0.000299113068372,-0.000301380393331,-0.000303617591102,-0.000305817029166,-0.000307988800402,-0.000310137395775,-0.000312248014012,-0.000314324962982,-0.00031639615211,-0.000318484501371,-0.000320589342934,-0.000322699127899,-0.000324802297376,-0.000326903158594,-0.000329001914028,-0.000331098621201,-0.000333203060258,-0.000335326528646,-0.000337459311753,-0.000339585934635,-0.000341709151468,-0.000343839372221,-0.000345980020769,-0.000348133464871,-0.000350285143427,-0.000352452064554,-0.000354607912542,-0.000356743741586,-0.000358862816216,-0.000360976154143,-0.000363076818652,-0.000365139600639,-0.000367180008274,-0.000369191182844,-0.000371192567943,-0.000373165280057,-0.000375116243093,-0.000377064878861,-0.000379013820909,-0.000380948819888,-0.000382871478247,-0.00038480298388,-0.000386741205302,-0.000388691594522,-0.000390647397611,-0.000392591029341,-0.000394542432362,-0.000396481042598,-0.000398384027475,-0.000400240690838,-0.000402057208652,-0.000403824042852,-0.000405522436858,-0.000407145193411,-0.000408677373531,-0.000410140499433,-0.000411529535481,-0.000412848985379,-0.000414112335117,-0.000415339818709,-0.00041652402438,-0.000417666108717,-0.000418771266731,-0.000419843087577,-0.000420900543442,-0.000421917272717,-0.000422886713568,-0.000423816058928,-0.00042470045177,-0.000425524687711,-0.000426283280443,-0.000426985761133,-0.000427632661771,-0.000428220248776,-0.000428737660932,-0.000429192067123,-0.000429591691903,-0.000429919235588,-0.000430165679915,-0.00043032986371,-0.000430411350015,-0.000430412902703,-0.000430318259435,-0.000430115308128,-0.000429808286926,-0.000429399405122,-0.00042888539335,-0.000428279211652,-0.000427592472556,-0.000426832606178,-0.000426017673174,-0.000425142100202,-0.000424215210861,-0.00042326027056,-0.000422287304699,-0.000421305394619,-0.000420313568908,-0.000419309962095,-0.000418299298107,-0.000417292860856,-0.000416278979081,-0.000415261104349,-0.000414248889091,-0.000413241430537,-0.000412227578278,-0.000411206773428,-0.000410196558526,-0.000409209133029,-0.00040824462649,-0.000407285900679,-0.000406343540991,-0.000405417199168,-0.000404493958437,-0.000403579534637,-0.000402676110672,-0.000401786615587,-0.000400897432587,-0.000399988941849,-0.000399061865923,-0.00039811995629,-0.00039717005178,-0.000396205031311,-0.000395237181461,-0.000394254252034,-0.000393252945288,-0.000392232372984,-0.000391192135503,-0.000390144953647,-0.000389079174969,-0.000387996049808,-0.000386888123619,-0.000385745141631,-0.000384566519454,-0.000383346701449,-0.000382095221402,-0.000380808158649,-0.000379489934532,-0.00037813609061,-0.000376754606332,-0.000375344312001,-0.000373896251627,-0.000372420357006,-0.000370918263027,-0.000369391593841,-0.000367834894021,-0.00036626163821,-0.000364663599584,-0.000363035340487,-0.000361386554826,-0.000359717261055,-0.000358041753769,-0.000356362609858,-0.000354684468256,-0.000353019554184,-0.000351379038613,-0.000349766240252,-0.000348178494792,-0.000346621378472,-0.000345082590147,-0.000343567756256,-0.000342070227262,-0.000340590891361,-0.000339125253548,-0.000337664582398,-0.000336197975449,-0.000334706074106,-0.00033319699625,-0.00033167183858,-0.00033013674928,-0.000328601797891,-0.000327060258241,-0.000325513425883,-0.000323955512912,-0.000322400987274,-0.000320862916117,-0.000319357121214,-0.000317883849121,-0.000316442236744,-0.000315036178071,-0.000313665069299,-0.00031234595856,-0.000311075841158,-0.000309868473097,-0.00030872843578,-0.0003076437477,-0.000306600262669,-0.000305606264635,-0.000304671696086,-0.000303797788593,-0.000302978759305,-0.000302201695286,-0.000301459881495,-0.000300756793043,-0.000300075659473,-0.00029941754679,-0.00029878690067,-0.000298181149083,-0.000297582679194,-0.00029698454882,-0.000296384152152,-0.000295776867383,-0.000295172838843,-0.000294564089535,-0.000293952704491,-0.000293345861966,-0.000292742963807,-0.000292139509542,-0.000291548495484,-0.000290976724221,-0.000290417196678,-0.000289861736821,-0.000289317547053,-0.000288786890495,-0.000288272861011,-0.0002877665573,-0.000287268039312,-0.000286775142567,-0.000286290620837,-0.000285808726486,-0.000285325906749,-0.000284864412541,-0.000284433053728,-0.000284020520897,-0.000283627153164,-0.000283252047041,-0.000282898392629,-0.000282561185863,-0.000282240452613,-0.000281940458345,-0.000281662092763,-0.000281402649363,-0.00028113890954,-0.000280865626554,-0.00028057995274,-0.000280278710679,-0.000279954200013,-0.000279609901021,-0.000279240228237,-0.000278830057079,-0.000278380375794,-0.000277881593235,-0.000277338043912,-0.000276770472588,-0.000276187819941,-0.000275586757094,-0.000274972209038,-0.000274355681959,-0.000273726038747,-0.000273094387359,-0.000272473237032,-0.0002718676379,-0.000271286953965,-0.00027072629046,-0.000270172140148,-0.000269628183539,-0.000269108086466,-0.000268598565859,-0.000268102778002,-0.00026763016935,-0.000267174938833,-0.000266729618745,-0.000266286943844,-0.000265840156808,-0.000265383464673,-0.000264917928728,-0.000264430270558,-0.000263917774723,-0.000263385489741,-0.000262826615203,-0.000262241657275,-0.000261627340261,-0.000260992798427,-0.000260330714078,-0.000259649023087,-0.000258954978004,-0.000258250968109,-0.00025753085372,-0.000256794454884,-0.000256037304398,-0.000255245268955,-0.000254420474506,-0.000253556694277,-0.000252643502486,-0.000251671900305,-0.000250633432768,-0.000249513960995,-0.000248317946887,-0.000247045312484,-0.000245685854339,-0.000244243304366,-0.000242713578448,-0.000241088787534,-0.000239380230767,-0.000237588271549,-0.000235716358685,-0.000233766072819,-0.000231744220462,-0.000229634042223,-0.000227448338676,-0.000225188134887,-0.000222858743314,-0.000220460266729,-0.000217991550293,-0.000215456511365,-0.00021286136557,-0.000210216122414,-0.000207519859131,-0.000204784715015,-0.000202019920295,-0.000199222605099,-0.000196397200895,-0.000193554851598,-0.000190701804766,-0.000187846812657,-0.000184975146752,-0.00018208478501,-0.000179176332812,-0.000176242496367,-0.000173270026085,-0.000170253741187,-0.000167190681534,-0.000164074516851,-0.00016089021695,-0.000157633798775,-0.000154311552806,-0.000150918662583,-0.000147456732179,-0.000143929617081,-0.000140336904824,-0.000136697010855,-0.000133010628616,-0.000129268229553,-0.000125480976131,-0.0001216565683,-0.000117792874646,-0.000113879649795,-0.000109914960951,-0.000105903510735,-0.000101851244043,-9.77567217304e-05,-9.36040912029e-05,-8.94006386095e-05,-8.51509727341e-05,-8.0848503769e-05,-7.6496646355e-05,-7.21096906427e-05,-6.76897556594e-05,-6.32491777359e-05,-5.87790090376e-05,-5.42678205351e-05,-4.97331758808e-05,-4.51827202302e-05,-4.06182890052e-05,-3.60383002387e-05,-3.14382615643e-05,-2.68078062214e-05,-2.21466115529e-05,-1.7444888408e-05,-1.26944421202e-05,-7.90239508356e-06,-3.07094652939e-06,1.81282976773e-06,6.75567427744e-06,1.17562151267e-05,1.68071862776e-05,2.1898275157e-05,2.70165658566e-05,3.21665147813e-05,3.73308474003e-05,4.24952202043e-05,4.76639421015e-05,5.28310108427e-05,5.79914737952e-05,6.31323174134e-05,6.82501558142e-05,7.33347884894e-05,7.83967079328e-05,8.3432222834e-05,8.84323646688e-05,9.34099244927e-05,9.83645190893e-05,0.00010331190482,0.000108274374225,0.000113286923188,0.000118387323606,0.000123715658451,0.000128804520488,0.000133776736214,0.000138680711521,0.000143559707652,0.000148447330809,0.000153381557709,0.00015835764514,0.000163376347739,0.000168411862108,0.000173442105472,0.000178346007127,0.000183600137289,0.000189079024675,0.000194744725654,0.000200558782997,0.000206473647972,0.000212447416438,0.000218451887192,0.000224453455608,0.00023042284439,0.000236332502406,0.000242134227589,0.000247786899918,0.000253252926713,0.000258499701614,0.000263497450329,0.000268214710934,0.000272615148783,0.000276681597312,0.000280388962915,0.000283716344779,0.000286651514471,0.000289194257262,0.000291350288741,0.00029311250212,0.000294476444502,0.0002954347371,0.000295998259675,0.000296174058971,0.000295964586946,0.000295375241977,0.000294412440635,0.000293083918855,0.000291405586494,0.000289392910159,0.000287070621047,0.000284466392918,0.000281598611413,0.000278485010785,0.000275150990883,0.000271617571473,0.00026791874408,0.000264084596215,0.00026012784134,0.000256065519278,0.000251910943495,0.000247678680263,0.000243387043987,0.000239058405332,0.000234705792627,0.000230351359791,0.000226005074988,0.000221674956629,0.000217377140469,0.000213130910072,0.000208945918214,0.000204830611954,0.00020078159142,0.000196797290895,0.000192887156582,0.000189048061102,0.000185272973901,0.000181565733937,0.000177916844724,0.000174315961219,0.000170756486389,0.000167249982435,0.000163795923519,0.000160398405003,0.000157050846878,0.000153749020772,0.00015050529073,0.0001473168058,0.000144188561339,0.000141131615831,0.000138154073979,0.000135243737921,0.000132395038096,0.000129603374237,0.00012686954315,0.000124195447965,0.000121575850335,0.000119005507551,0.000116475289084,0.000113974182188,0.000111495871617,0.000109036123694,0.000106607273115,0.000104208234035,0.000101841289785,9.95070790739e-05,9.72123164198e-05,9.49521665499e-05,9.2734181759e-05,9.05629385237e-05,8.8436157905e-05,8.63539394911e-05,8.43159331588e-05,8.23207303296e-05,8.03683313243e-05,7.8464715862e-05,7.66041085117e-05,7.47935000893e-05,7.30432233288e-05,7.1351667069e-05,6.97418268756e-05,6.82287947571e-05,6.68228919298e-05,6.55295639706e-05,6.43556181925e-05,6.33003351063e-05,6.23662176252e-05,6.15654198607e-05,6.08867933969e-05,6.03289332494e-05,5.98800126261e-05,5.95351556902e-05,5.92836348376e-05,5.91195661851e-05,5.90469866418e-05,5.90662696582e-05,5.91840713887e-05,5.93942108218e-05,5.97084613604e-05,6.01466631111e-05,6.07094712395e-05,6.14098981944e-05,6.22568157035e-05,6.32674742668e-05,6.44521570876e-05,6.58207088678e-05,6.73796692109e-05,6.91450166367e-05,7.11350510498e-05,7.33477894524e-05,7.57899881252e-05,7.84730361084e-05,8.13925265971e-05,8.45490287245e-05,8.79351370245e-05,9.15502923878e-05,9.53853510628e-05,9.94367184243e-05,0.000103686932565,0.000108119109028,0.000112721850172,0.000117475272815,0.000122377497526,0.000127432935488,0.000132631638881,0.000137966165385,0.000143441350566,0.00014904385649,0.000154769250023,0.000160630970056,0.000166638673685,0.000172798667331,0.000179111092757,0.000185566113716,0.000192167756897,0.000198912888509,0.000205795699544,0.000212808935457,0.00021995870156,0.000227232136045,0.00023460867875,0.00024207468546,0.000249622816816,0.000257247347312,0.000264936224996,0.000272676168365,0.000280462590683,0.000288291183495,0.00029614736304,0.000304021685527,0.000311911569044,0.000319800427153,0.000327678025253,0.000335530217029,0.000343346431971,0.000351124356161,0.000358843866421,0.000366490498671,0.000374057614646,0.000381532649265,0.00038891105328,0.000396192605556,0.000403380453045,0.000410465543616,0.000417447951111,0.000424322727305,0.000431086168664,0.000437746097914,0.000444294490318,0.000450728109228,0.000457045529171,0.00046323892574,0.000469300029729,0.000475222770446,0.000481003709327,0.000486631975886,0.000492092947833,0.000497381392497,0.000502485247823,0.00050740432787,0.000512134893935,0.000516684775094,0.000521045526202,0.000525224542262,0.00052921800209,0.000533031821493,0.000536681658025,0.000540181371461,0.000543522785878,0.000546723690083,0.000549790114337,0.000552722326635,0.000555519963921,0.000558187174463,0.000560719023566,0.000563118739671,0.000565391024893,0.000567525441674,0.000569544764604,0.000571455555413,0.000573248572894,0.00057492291746,0.000576486762164,0.000577940888749,0.000579298147376,0.000580563938311,0.000581736982698,0.000582819657819,0.000583805833629,0.000584674831159,0.000585428402175,0.000586063558558,0.00058657718256,0.000586964504467,0.000587217773986,0.000587336327847,0.000587319174885,0.000587169565922,0.000586883001761,0.000586475252773,0.000585951880251,0.000585318714001,0.00058458682843,0.000583757069127,0.00058282596547,0.000581786282874,0.000580638641452,0.000579375443551,0.000577999069244,0.00057650099489,0.000574865148759,0.000573084437252,0.000571150137609,0.000569062748475,0.000566845943359,0.000564509562715,0.000562068979872,0.000559520103681,0.000556875486783,0.000554141912767,0.000551345994906,0.000548502243216,0.000545624344762,0.000542730227363,0.000539801357832,0.00053683063552,0.000533809549582,0.000530738354246,0.000527626787429,0.000524473767193,0.000521271344731,0.000518017834242,0.000514705671739,0.00051131919989,0.000507865412083,0.000504356475661,0.000500789897635,0.000497182997937,0.000493523599096,0.000489798851718,0.000486003391135,0.000482124112204,0.000478136419893,0.000474040513836,0.000469832610708,0.000465492672116,0.000461004629062,0.000456356679546,0.00045154624167,0.000446580323832,0.000441462761128,0.000436202231734,0.000430825063068,0.000425346822994,0.000419768220259,0.00041411381329,0.000408399797636,0.000402646175757,0.000396859624665,0.000391041655838,0.000385203396312,0.000379357108497,0.000373518120217,0.000367685782618,0.000361877649845,0.000356109512227,0.000350392752766,0.000344742615563,0.000339181214697,0.000333728035116,0.000328400131541,0.00032321677956,0.00031818287512,0.000313306420143,0.000308610752434,0.000304093573087,0.000299770952681,0.000295628913844,0.00029165874488,0.000287868543204,0.000284259757674,0.000280827313276,0.000277573822022,0.000274498651601,0.000271579051143,0.000268811972797,0.000266196268615,0.000263729297123,0.000261416642199,0.000259259077728,0.0002572460188,0.000255370252549,0.000253621772962,0.000251994641608,0.000250500634887,0.000249148112194,0.000247925825464,0.000246834187775,0.000245866539185,0.0002450181905,0.000244279721673,0.000243654682941,0.000243141677222,0.000242738749767,0.00024244337465,0.000242238375411,0.000242119444039,0.000242076525119,0.000242108746596,0.00024220091648,0.000242360197823,0.000242580189511,0.000242857400214,0.000243193578358,0.000243582644978,0.000244017432706,0.000244486082109,0.000244988830376,0.000245526323846,0.000246097148039,0.000246707318937,0.000247339597288,0.000247987706266,0.000248640641052,0.000249285484102,0.000249928886883,0.000250577600068,0.000251249447284,0.000251935900305,0.000252634732001,0.000253335274553,0.000254041561534,0.000254762606311,0.000255508000536,0.000256274706544,0.000257053901303,0.000257834584249,0.000258594456696,0.000259323639566,0.000260028917822,0.000260710371571,0.000261367099412,0.000261990162617,0.00026257581557,0.000263126611826,0.00026365794502,0.000264183796184,0.000264715427895,0.000265268207388,0.000265848359139,0.000266450531362,0.000267072488353,0.000267716841126,0.000268379442765,0.000269057726578,0.000269739195285,0.000270409826631,0.000271073217958,0.00027172255135,0.000272338180744,0.00027291218809,0.000273459173682,0.000273979400162,0.00027447658652,0.000274961193429,0.000275423255169,0.00027588265309,0.000276336006662,0.000276772830124,0.000277201360251,0.00027763272215,0.000278057067538,0.000278462774323,0.000278855210762,0.000279226993091,0.000279585950597,0.000279923265427,0.000280216158131,0.000280462179601,0.000280655969361,0.000280787052959,0.000280852454059,0.000280854583626,0.000280771676492,0.00028059592619,0.000280319355402,0.000279930759499,0.00027945019061,0.000278889826243,0.000278250606014,0.000277537329521,0.000276742996329,0.000275867715571,0.000274917419973,0.000273906762178,0.000272832936753,0.00027168984307,0.000270462887524,0.000269138203199,0.00026771148229,0.000266180500705,0.000264555908631,0.000262844151309,0.000261047266866,0.000259146801862,0.000257139251218,0.000255029892494,0.000252827150183,0.000250533168782,0.000248147107659,0.000245670436357,0.000243090218749,0.000240392465732,0.000237580643452,0.000234660743614,0.00023165421307,0.000228571622856,0.000225413928345,0.000222194945402,0.000218921646381,0.000215600657567,0.000212232167038,0.000208835260207,0.000205408546146,0.000201959745998,0.000198479867589,0.000194962752908,0.000191404388111,0.000187805574674,0.000184160285169,0.00018046380914,0.000176723922751,0.000172939235983,0.000169109956417,0.00016522239251,0.00016127174311,0.00015725979404,0.000153192403747,0.000149064859084,0.000144877860269,0.000140631702263,0.000136336370903,0.000131985111347,0.000127583792519,0.000123138250413,0.000118668363526,0.000114175100114,0.000109664137611,0.000105134712784,0.00010059927884,9.60640249604e-05,9.15272207557e-05,8.69934864625e-05,8.24602961403e-05,7.79322590234e-05,7.34077305239e-05,6.88905206497e-05,6.43732440616e-05,5.98546600904e-05,5.5336992301e-05,5.08193991736e-05,4.62998330115e-05,4.17757017525e-05,3.72454364838e-05,3.27148929036e-05,2.81693334558e-05,2.36018848709e-05,1.90151308734e-05,1.44161982047e-05,9.79790378872e-06,5.14824010667e-06,4.60946339426e-07,-4.25989125655e-06,-8.9987074303e-06,-1.3761623261e-05,-1.85339525973e-05,-2.33066237641e-05,-2.80724527513e-05,-3.28305445813e-05,-3.757058091e-05,-4.22751175701e-05,-4.69216318547e-05,-5.14996614027e-05,-5.60257439804e-05,-6.04926603871e-05,-6.48927335831e-05,-6.92331704408e-05,-7.35125821313e-05,-7.77352833674e-05,-8.19018808216e-05,-8.60259027312e-05,-9.01213477599e-05,-9.42008012069e-05,-9.82673196761e-05,-0.000102310337136,-0.000106354709528,-0.000110397664688,-0.000114443670024,-0.000118486791268,-0.000122529290647,-0.000126569267555,-0.000130593963249,-0.00013459425947,-0.000138563173925,-0.000142513508349,-0.000146437512796,-0.000150322711442,-0.000154170972827,-0.000157979361287,-0.000161750413895,-0.000165476573932,-0.000169157087566,-0.000172799261077,-0.000176402331458,-0.000179956487498,-0.000183451464131,-0.000186887558478,-0.000190251517947,-0.000193537847147,-0.000196748655006,-0.00019988529411,-0.000202959295323,-0.000205971231458,-0.000208923139223,-0.000211808674876,-0.000214642358891,-0.000217420645549,-0.00022015418786,-0.000222868407373,-0.000225561111601,-0.000228219800545,-0.000230836109114,-0.000233400337081,-0.000235912114819,-0.000238375207629,-0.000240787974006,-0.000243154039556,-0.000245468086833,-0.000247718072795,-0.0002499012043,-0.000252028508053,-0.000254122285609,-0.000256194665645,-0.000258240614652,-0.000260257137158,-0.000262069934537,-0.000263523242617,-0.000264605573167,-0.00026531755204,-0.000265671509318)
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(33, 245, 432)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Oct4-DamID-r1-GSM1562327.36mers.unique.dedup.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) : 33,245,432',bty='n')
dev.off()
