# R script for Peak Model
#  -- generated by MACS
p <- c(0.0428898272156,0.0500257831364,0.0572682458621,0.0641803831352,0.0710894332546,0.0710045365261,0.0708563531456,0.0707637385327,0.0707930664934,0.0705167662317,0.0704118030038,0.0703871057737,0.0701231541271,0.0704380438108,0.0705630735382,0.0705893143452,0.0703485163517,0.0705337455774,0.0703346241598,0.0704735460791,0.0703716700049,0.0701833536255,0.07007221609,0.069839135981,0.0697557828294,0.0697773929057,0.0698206130584,0.0698020901358,0.0697758493289,0.0697897415208,0.0697557828294,0.0696647117934,0.0696616246397,0.0694980054903,0.0693698886092,0.0692448588818,0.0692726432657,0.0689947994271,0.0690164095034,0.0688080266245,0.0689469485438,0.0690935883475,0.0690889576168,0.0690858704631,0.0689870815427,0.0692309666899,0.0689099026986,0.0688929233529,0.0689284256212,0.0691043933856,0.0686984326659,0.0686058180531,0.068840441739,0.0689006412373,0.068982450812,0.0688373545852,0.0692803611501,0.0693143198414,0.0694146523387,0.0690488246179,0.0691105676932,0.0690225838109,0.0687771550869,0.0687076941272,0.0688975540836,0.068801852317,0.0684777011719,0.0685440749778,0.0682893847925,0.0682816669081,0.0682862976387,0.0682971026769,0.0682816669081,0.068307907715,0.0681165041818,0.068022345992,0.0680933505286,0.0680995248361,0.0681905958721,0.0683665636365,0.068554880016,0.0685703157848,0.068581120823,0.0685996437455,0.0685054855558,0.0685718593617,0.0685749465154,0.0683773686747,0.0682384467554,0.0682847540618,0.0680516739528,0.0681381142581,0.0680563046834,0.0680161716845,0.06798375657,0.067892685534,0.0679853001469,0.0680701968754,0.0680717404522,0.067945167148,0.0678865112265,0.0676812155013,0.067841747497,0.0677228920771,0.0679791258394,0.0678818804959,0.0676271903105,0.0674635711611,0.0677846351524,0.0677228920771,0.0680069102232,0.0680208024152,0.0677985273443,0.0677614814992,0.0675268578132,0.0675392064283,0.0677908094599,0.0680408689146,0.0678942291109,0.0680038230695,0.0678834240728,0.0679590593399,0.068165898642,0.068360389329,0.0685193777477,0.0685132034402,0.0682399903323,0.0679822129931,0.0680146281076,0.068204488064,0.0681489192963,0.0681489192963,0.0679899308775,0.0679173827641,0.067880336919,0.0678247681513,0.0677707429604,0.0678093323825,0.0678818804959,0.0677259792309,0.0678355731894,0.0676904769626,0.0678679883039,0.0677923530368,0.0677028255777,0.0679235570717,0.0678340296126,0.0680424124915,0.0676904769626,0.0675422935821,0.0673709565483,0.0675438371589,0.0674357867773,0.0673292799725,0.0673493464719,0.0674743761993,0.0679251006485,0.0678510089583,0.0679004034184,0.067854096112,0.068165898642,0.068425219558,0.0685487057085,0.0687478271261,0.0688466160465,0.0685795772461,0.0684560910956,0.0684854190563,0.0685857515536,0.0688342674315,0.0683881737128,0.0682014009102,0.0681828779877,0.0681967701796,0.0683850865591,0.0685209213246,0.0684113273661,0.0682446210629,0.0683835429822,0.068113417028,0.068360389329,0.0684699832875,0.068490049787,0.0686104487837,0.0686058180531,0.0685487057085,0.0685610543235,0.0688388981621,0.0688867490454,0.0693127762646,0.0692263359592,0.0692448588818,0.0692788175732,0.0692155309211,0.0691630493071,0.0692494896124,0.0695288770279,0.069436262415,0.0695180719897,0.0694748518371,0.0696508196015,0.0694841132984,0.069579815065,0.0698499410192,0.0697403470606,0.0698900740181,0.0699348377476,0.0701030876276,0.0701910715099,0.0702234866244,0.0704272387727,0.0706664931892,0.0706587753048,0.0707266926876,0.071161981368,0.0711326534073,0.071149632753,0.0713364055556,0.0713055340179,0.071408953669,0.0713009032873,0.0714459995141,0.0715972700485,0.0714830453593,0.0712731189034,0.0714984811281,0.0717963914661,0.0716019007791,0.0715602242033,0.0716914282382,0.0719028982709,0.0720232972676,0.0721853728401,0.0724138222185,0.0726654252501,0.0728429365914,0.0730266222403,0.0732473537342,0.0736795552609,0.0736193557626,0.0737536469512,0.0738755895248,0.0739157225237,0.07408088525,0.0742259814768,0.0744112107025,0.0742244378999,0.0743618162423,0.0744683230471,0.0746350293503,0.0747893870384,0.0746936852717,0.074885088805,0.0748063663841,0.0749051553044,0.0749082424582,0.0752323936032,0.0754546686741,0.0754839966348,0.0757880812804,0.0759918334287,0.0762048470382,0.0762526979216,0.0766246999499,0.0768840208659,0.0772282385104,0.0770661629378,0.0770985780523,0.0773548118146,0.0776805065365,0.0776496349989,0.0778611050316,0.0778966072998,0.077933653145,0.0778996944536,0.0779907654896,0.078140492447,0.0785248430904,0.0786004783576,0.0785572582049,0.0787208773543,0.0789987211929,0.0792441499169,0.0797133972888,0.0800653328176,0.0799835232429,0.0804218990771,0.0804280733847,0.0806210204948,0.080540754497,0.0809173872559,0.0811226829811,0.0811257701349,0.0812446255547,0.0811859696332,0.0815764945841,0.0816181711599,0.0819145379211,0.0821707716833,0.0828128996658,0.0833608694586,0.0838115939078,0.0848180060342,0.0855388564377,0.0866780161759,0.087506916961,0.0885889643545,0.0897281240927,0.0907407105267,0.0914245150849,0.0920573816061,0.0926485715516,0.0932258693051,0.0935268667969,0.0938031670586,0.0941566461643,0.0944823408862,0.0947324003409,0.0949701111806,0.095626131355,0.0958298835033,0.0964102684106,0.0965167752154,0.0969181052044,0.0972530613876,0.0973827218456,0.0974243984214,0.0978488820637,0.0981529667092,0.0981776639393,0.0984493334704,0.0983845032414,0.0986993929251,0.0989648881486,0.099128507298,0.0992859521399,0.0994742685194,0.0993862846372,0.0995560780941,0.0997953325106,0.100036130504,0.100480680646,0.10086966202,0.100885097789,0.101159854473,0.101575076654,0.102064390526,0.102328342172,0.102584575935,0.102717323546,0.103149525073,0.103354820798,0.103533875716,0.103820981016,0.104157480776,0.104606661649,0.104821218835,0.105262681823,0.105253420362,0.105653206774,0.105555961431,0.105748908541,0.105929507036,0.106162587145,0.106287616872,0.106406472292,0.106671967515,0.106553112096,0.107076384658,0.107260070307,0.107522478377,0.107659856719,0.108055012401,0.108325138355,0.108442450198,0.108701771114,0.108990419991,0.10958469709,0.109575435629,0.109925827581,0.110271588802,0.110418228606,0.110711508213,0.111092771703,0.111418466425,0.111520342499,0.111775032684,0.112035897177,0.112531385356,0.112860167231,0.11320747203,0.113726113862,0.11378631336,0.114247842847,0.114822053447,0.115280495781,0.115623169848,0.115623169848,0.115987453992,0.116180401102,0.116323953752,0.116347107406,0.116692868627,0.116719109434,0.116844139161,0.117285602149,0.117748675214,0.118193225355,0.118594555344,0.119204268212,0.119585531702,0.120298664221,0.120579595213,0.121183133774,0.121737277874,0.121970357983,0.122323837089,0.122481281931,0.122445779662,0.122203438092,0.122561547929,0.122756038616,0.123117235606,0.123078646184,0.123263875409,0.123529370633,0.123503129826,0.123850434624,0.124599069411,0.12499576867,0.125329181276,0.125231935933,0.125341529891,0.125321463392,0.125323006969,0.125614742999,0.125838561647,0.126275393904,0.126380357132,0.12672766193,0.126556324897,0.126860409542,0.127079597459,0.127246303762,0.12730187253,0.127474753141,0.127524147601,0.127768032748,0.127710920404,0.127723269019,0.12816318843,0.128842362257,0.129092421712,0.129719113926,0.129916691767,0.129902799575,0.130030916456,0.129733006118,0.129888907383,0.130271714449,0.130358154754,0.13011272603,0.130285606641,0.130480097328,0.13087525301,0.131054307928,0.131373828342,0.131795224831,0.13190944952,0.131838444983,0.131727307448,0.131819922061,0.13171650241,0.131688718026,0.131762809716,0.131676369411,0.131555970414,0.131596103413,0.131576036914,0.131708784525,0.132094678746,0.132125550283,0.13234010747,0.132281451548,0.13222125205,0.132195011243,0.132349368931,0.132119375976,0.132517618811,0.132534598157,0.132546946772,0.132548490349,0.13248366012,0.132474398658,0.132638017808,0.132901969454,0.132969886837,0.133403631941,0.133006932682,0.133110352333,0.13308719868,0.133244643522,0.13323075133,0.133266253598,0.132684325114,0.132466680774,0.132432722083,0.132284538702,0.13220118555,0.132068437939,0.131944951788,0.131549796107,0.131514293838,0.13116698904,0.131106789542,0.130958606161,0.130348893293,0.129665088735,0.129448987972,0.128896387448,0.128441032268,0.128207952159,0.127835950131,0.127720181865,0.127417640796,0.126903629695,0.126301634711,0.126144189869,0.125665681036,0.125315289084,0.12499576867,0.124579002912,0.123896741931,0.123013815955,0.122703557002,0.122428800317,0.122399472356,0.121717211375,0.121126021429,0.120545636522,0.120119609303,0.119678146315,0.119117827907,0.118701062149,0.118522007231,0.117787264636,0.117280971419,0.117350432378,0.117148223807,0.116938297351,0.11662186409,0.1162606671,0.116012151222,0.115938059532,0.115272777896,0.115052046402,0.114897688714,0.114303411615,0.114010132008,0.113841882128,0.113505382368,0.113301630219,0.112952781844,0.112766009042,0.112474273011,0.111909323873,0.111534234691,0.11097545986,0.110444469413,0.109836300122,0.109578522782,0.109240479445,0.108971897068,0.108569023502,0.108207826512,0.108303528279,0.108104406861,0.108414665814,0.108269569587,0.10828809251,0.107865152445,0.107244634538,0.1069467242,0.106662706054,0.10619963299,0.105785954386,0.10519476444,0.104151306469,0.103864201169,0.103279185531,0.103478306949,0.103503004179,0.103310057069,0.103134089304,0.102905639926,0.10276980516,0.102816112467,0.102501222783,0.101942447952,0.101363606622,0.100173508846,0.0990312619545,0.0982286019764,0.0973148044628,0.0966371742121,0.0957233766985,0.0945919348448,0.0939760476692,0.0928831952375,0.0923259639834,0.0916020264263,0.0913890128167,0.0909969442889,0.0905369583784,0.0900538188146,0.0895598742127,0.0892619638747,0.0889810328823,0.0892233744526,0.0890149915737,0.0891106933403,0.0888853311157,0.0886630560448,0.0883960172444,0.0881382399053,0.087934487757,0.0876720796872,0.0875084605378,0.0873031648127,0.0868817683241,0.0865576171791,0.0863677572228,0.0861454821519,0.0856160352817,0.0854122831334,0.085313494213,0.0851807466013,0.0848951848783,0.0845278135806,0.084444460429,0.083952059404,0.083627908259,0.0832867777683,0.0833608694586,0.0833145621521,0.0828916220868,0.0826199525557,0.0827048492842,0.0825690145186,0.0823683495241,0.0823359344096,0.0821970124903,0.081928430113,0.081772528848,0.0814931414326,0.0813511323595,0.0810377862527,0.0806873943007,0.0802690849659,0.0799109751295,0.0796531977904,0.0795574960238,0.079542060255,0.0792750214546,0.0791438174197,0.0791191201896,0.0792580421089,0.0789230859257,0.0789230859257,0.0788706043117,0.0786606778559,0.0784430335157,0.0780802929487,0.077907412338,0.0775894355005,0.0773640732759,0.0769303281723,0.0767728833305,0.0765382596445,0.0763437689575,0.0763622918801,0.0760690122727,0.0761801498081,0.0761461911168,0.0760582072346,0.0758050606261,0.0758081477798,0.0756707694374,0.0756398978998,0.0753419875618,0.0750224671474,0.0747770384233,0.0745810041594,0.0742259814768,0.0741133003645,0.0742090021311,0.0739913577909,0.0739203532544,0.0735730484561,0.0736239864932,0.0737459290668,0.0736471401464,0.0734125164605,0.0734480187288,0.0730405144322,0.0728136086307,0.0726175743668,0.0721776549557,0.0723273819132,0.0721004761117,0.071966184923,0.0719445748467,0.0718087400811,0.0715015682818,0.0715355269732,0.0713194262099,0.071123391946,0.0712052015207,0.0708486352612,0.0707328669951,0.0704287823495,0.0703516035055,0.0702975783146,0.0702342916625,0.0701648307029,0.0701463077803,0.0699919500922,0.06990396621,0.069774305752,0.0695520306811,0.0694378059919,0.0691028498088,0.0690009737346,0.0687648064718,0.0686119923606,0.0683171691763,0.0684036094817,0.0681736165264,0.0682137495253,0.0682399903323,0.0680840890673,0.0683387792527,0.0681797908339,0.0682631439855,0.0681427449888,0.0681334835275,0.068048586799,0.0679883873007,0.0677707429604,0.0678139631131,0.067698194847,0.0675098784676,0.0673323671262,0.0674110895472,0.0674589404305,0.0674743761993,0.0676009495035,0.0674357867773,0.0673863923171,0.0671563993618,0.0671810965919,0.066881642677,0.0668492275625,0.0665559479551,0.0663784366138,0.0661592486967,0.0658613383586,0.0661129413902,0.0661577051198,0.0660311318156,0.0660172396236,0.0661345514666,0.0660064345855,0.0658613383586,0.0659138199726,0.0659493222409,0.0660234139311,0.0659338864721,0.0656159096346,0.0657548315539,0.065662216941,0.0656791962867,0.0657347650544,0.0657965081296,0.0657748980533,0.0657733544764,0.0656869141711,0.0655186642911,0.0656514119028,0.0655618844437,0.0654383982932,0.0653627630261,0.0654430290239,0.0654569212158,0.065234646145,0.0652099489149,0.0651605544547,0.0652454511831,0.0653550451417,0.0651945131461,0.0651590108778,0.0650247196891,0.0648487519247,0.0648117060796,0.064870362001,0.0647005685441,0.06459869247,0.0645909745856,0.0645492980098,0.0645693645092,0.0647113735823,0.0648163368102,0.0649814995365,0.0649182128844,0.0648533826553,0.0648873413467,0.0649537151526,0.0647993574645,0.0649074078462,0.0649336486532,0.064884254193,0.0649336486532,0.0649691509214,0.0651775338004,0.065155923724,0.0652655176826,0.0652331025681,0.0652053181842,0.0651080728407,0.0652562562213,0.0654769877153,0.0653951781406,0.0651744466466,0.0651404879552,0.0654013524481,0.0653565887186,0.0654445726008,0.0656020174426,0.0655495358287,0.0654754441384,0.0653735680642,0.0655094028298,0.0654955106378,0.0654708134077,0.0653041071046,0.0653488708342,0.0654600083696,0.0655649715975,0.065674565556,0.065753287977,0.0657116114012,0.0656606733641,0.065960127279,0.0660064345855,0.0662796476934,0.0663398471918,0.0663599136912,0.0661916638112,0.0662410582714,0.0663460214993,0.0663552829606,0.0661993816956,0.0661932073881,0.0661360950435,0.0660311318156,0.0659894552398,0.0659940859704,0.066233340387,0.0662009252725,0.0663166935385,0.0664031338439,0.066634670376,0.066557491532,0.066531250725,0.0666516497217,0.0667010441819,0.0667303721426,0.0667072184894,0.0670035852506,0.0669186885221,0.0667581565265,0.06668715199,0.0668121817173,0.0670869384022,0.0670004980968,0.0670514361339,0.0671178099398,0.0671702915537,0.0670529797108,0.0671656608231,0.067465114738,0.0675268578132,0.0674928991219,0.0673447157413,0.0675392064283,0.0676040366573,0.0676426260793,0.0678293988819,0.0678062452287,0.067712087039,0.0679281878023,0.0681905958721,0.0682631439855,0.0685363570934,0.0684159580967,0.0686011873224,0.0684020659048,0.0682091187946,0.0683681072134,0.0684221324042,0.0683542150215,0.0682662311392,0.0682415339092,0.0681412014119,0.0682230109866,0.0681844215646,0.0683897172897,0.0686382331676,0.0686567560901,0.068696889089,0.0685332699397,0.0687061505503,0.0689237948906,0.0692371409974,0.0693220377259,0.0692572074969,0.0693498221097,0.0693884115317,0.0693961294161,0.0694686775295,0.0697141062536,0.0697249112918,0.0696878654467,0.0695504871042,0.0696168609101,0.0698607460573,0.0699024226331,0.0699024226331,0.069995037246,0.0702049637018,0.0699857757847,0.0701355027421,0.0701740921642,0.070163287126,0.0703299934291,0.0701432206265,0.0703546906592,0.070345429198,0.0704133465807,0.0702481838545,0.0706016629602,0.0705105919242,0.0708362866461,0.0710662796014,0.070890311837,0.0710508438326,0.0709227269515,0.0710246030256,0.0711527199067,0.0711974836363,0.0712870110954,0.0713626463625,0.0712391602121,0.0711604377911,0.071253052404,0.0714074100921,0.0713873435926,0.0714923068205,0.0713009032873,0.071538614127,0.0713456670168,0.0711897657519,0.0711542634836,0.0712885546723,0.0715447884345,0.0716127058173,0.0717655199285,0.0719245083472,0.0717655199285,0.071939944116,0.0720757788816,0.0723335562207,0.0723628841814,0.0722177879546,0.0721822856864,0.0719553798848,0.0719476620004,0.0718149143887,0.0721035632654,0.0718488730801,0.0720649738434,0.0718643088489,0.0721653063407,0.0721406091106,0.0720927582273,0.0722424851847,0.0722471159154,0.0722857053374,0.0723613406045,0.0724107350647,0.0722810746067,0.0725249597539,0.0723644277583,0.0724354322948,0.072446237333,0.0725774413679,0.0727209940178,0.0729046796667,0.0727333426329,0.0728336751301,0.0725805285217,0.0723844942578,0.0724601295249,0.0726114000593,0.0724601295249,0.0723628841814,0.0724539552174,0.0720973889579,0.072264095261,0.0721035632654,0.0725295904846,0.0727503219786,0.0727225375947,0.0726623380963,0.0729108539742,0.0732319179654,0.0731038010843,0.0732164821966,0.0731161496994,0.0731393033526,0.0729617920113,0.0727827370931,0.0725867028292,0.0727256247485,0.0728460237452,0.0727781063624,0.0729108539742,0.0731393033526,0.0733245325783,0.07360083284,0.0735977456862,0.0737057960679,0.0739929013678,0.0740561880199,0.0739666605608,0.074016055021,0.0742460479763,0.0740145114441,0.0740669930581,0.073898743178,0.0741102132107,0.0742445043994,0.0741379975946,0.0740206857516,0.0739666605608,0.0738200207571,0.0736085507244,0.0739064610624,0.0738431744103,0.0738971996011,0.0736826424147,0.0735514383798,0.073627073647,0.0736193557626,0.0736178121857,0.0735174796884,0.0732319179654,0.0729695098957,0.0731269547375,0.0732133950429,0.0732257436579,0.0732720509643,0.0733276197321,0.0734387572675,0.0735637869948,0.0737382111824,0.0739311582925,0.074028403636,0.0741379975946,0.0742429608225,0.0744899331235,0.0746149628508,0.0744760409315,0.0744343643557,0.074340206166,0.0742445043994,0.0744096671256,0.0745038253154,0.0743988620875,0.0743309447047,0.0742028278236,0.0741781305935,0.074313965359,0.0741858484779,0.074366446973,0.0744158414332,0.0742336993612,0.0741488026327,0.0739002867549,0.0736116378782,0.0735992892631,0.0735236539959,0.0733986242686,0.0734464751519,0.0730590373548,0.0730513194704,0.0730713859698,0.0730312529709,0.0730142736252,0.0729741406263,0.0727626705936,0.0728691773984,0.0729772277801,0.0729509869731,0.0733955371148,0.0734819774202,0.073509761804,0.0735082182271,0.0736610323384,0.0740052499828,0.0742522222838,0.0741287361333,0.0741225618258,0.0742599401682,0.0740531008661,0.0738894817167,0.0739157225237,0.0740345779436,0.0741302797102,0.0742506787069,0.0742568530144,0.0743571855117,0.074145715479,0.0741518897865,0.0743047038977,0.0743232268203,0.0743479240504,0.0744683230471,0.0742985295902,0.0742599401682,0.0741518897865,0.0740052499828,0.0742028278236,0.0741966535161,0.0741210182489,0.0741626948247,0.0739929013678,0.0736702937996,0.0736965346066,0.0734958696121,0.0735792227637,0.0736733809534,0.0736332479545,0.0736208993394,0.0735514383798,0.0736023764169,0.0738153900265,0.073860153756,0.073691903876,0.0735823099174,0.0734619109207,0.0734557366132,0.0732519844649,0.0731176932762,0.073029709394,0.0728799824366,0.0727534091323,0.0726299229818,0.0728753517059,0.0731377597757,0.0730667552392,0.0729725970494,0.0732288308117,0.073147021237,0.0731346726219,0.0730960831999,0.0731022575074,0.0732813124256,0.0732535280418,0.0731686313133,0.0731454776601,0.0730080993177,0.0729046796667,0.0731393033526,0.0731501083907,0.0731439340832,0.0730652116623,0.0729633355881,0.0729957507026,0.0729139411279,0.0730281658171,0.0730513194704,0.0727487784017,0.072484826755,0.0723104025675,0.0723258383363,0.0720202101138,0.0718519602338,0.0717423662753,0.0717130383145,0.0715880085872,0.0715910957409,0.0717408226984,0.0716173365479,0.0716281415861,0.0717639763516,0.0647900960032,0.0577328625033,0.0503962415879,0.043092035787,0.0)
m <- c(0.0431082825112,0.0503007002238,0.057653360319,0.0647980134752,0.0720952050533,0.0720243286148,0.0721876525818,0.0722646921888,0.0721876525818,0.0723617620937,0.0723062935766,0.0724988925942,0.0722939672395,0.0725019741785,0.0724773215042,0.0724264753636,0.0725728506169,0.0724480464535,0.0728979577586,0.0730042724163,0.0731645147989,0.0729164472643,0.0730427922198,0.0728486524101,0.0728671419158,0.0728856314215,0.072694573196,0.0728286221123,0.0725774729933,0.0725204636841,0.0722723961495,0.072420312195,0.0724988925942,0.0726529718082,0.0725867177462,0.0728455708258,0.073044333012,0.073033547467,0.0729056617193,0.0729072025114,0.0731521884618,0.0733201348051,0.0732246056924,0.0730027316242,0.0731645147989,0.0730967199447,0.0731475660854,0.0732045753946,0.0733648177772,0.0734249086707,0.0733093492602,0.0731614332146,0.0730181395456,0.0732076569789,0.0731198318269,0.0731583516304,0.07293493677,0.073142943709,0.0733031860916,0.0733016452994,0.0734588060978,0.0732708294566,0.0736236708568,0.0736621906604,0.0737222815538,0.0735204377834,0.0734310718393,0.0732169017317,0.073427990255,0.0733802256986,0.0735604983791,0.0739950017627,0.0738178106666,0.073734607891,0.0738563304701,0.0740011649313,0.0741937639489,0.0741444586004,0.0737762092788,0.0738178106666,0.0733817664908,0.0732153609396,0.073230768861,0.0735358457048,0.073449561345,0.0734634284742,0.0737376894753,0.0738270554194,0.0741413770161,0.0740982348362,0.0743108641516,0.0743493839551,0.0743062417752,0.0741768152353,0.0742785075166,0.0742076310782,0.0740458479034,0.0743293536573,0.0741660296904,0.0743124049437,0.0742892930616,0.0742014679096,0.0743632510844,0.0744048524722,0.0742584772188,0.074184519196,0.0740735821619,0.0738578712622,0.0735296825363,0.0733648177772,0.0735697431319,0.0736575682839,0.073614426104,0.0735604983791,0.0735574167948,0.0739148805714,0.0741860599882,0.0742122534546,0.0743617102922,0.0746467568382,0.074545064557,0.0746544607989,0.0746482976304,0.0747499899117,0.0749441297214,0.0749718639799,0.0747854281309,0.0747854281309,0.0748624677379,0.074589747529,0.074501922377,0.0743524655394,0.0745389013884,0.0744449130678,0.0744834328713,0.0744094748486,0.0744664841578,0.0744680249499,0.0746452160461,0.0746390528775,0.074589747529,0.0744418314835,0.0742584772188,0.0743879037586,0.0742030087017,0.0742738851402,0.0741798968196,0.0741105611733,0.0740689597855,0.0740350623584,0.0742600180109,0.0745835843605,0.0747037661474,0.0745989922819,0.0747607754566,0.0746159409954,0.0746513792147,0.0747392043667,0.0747053069396,0.0751105352726,0.0749549152664,0.0747376635745,0.0747561530802,0.074819325558,0.0746375120854,0.0744973000006,0.0743724958372,0.0742892930616,0.0740335215663,0.0737561789809,0.0738131882901,0.073888687105,0.0740597150327,0.0740982348362,0.0741706520668,0.0740443071112,0.0740612558248,0.0738378409644,0.0740211952291,0.0742615588031,0.0742261205838,0.074129050679,0.0739780530492,0.0738517080937,0.0739056358186,0.0739272069086,0.0739364516614,0.0741660296904,0.0743909853429,0.0739934609706,0.0739903793863,0.0740443071112,0.0738409225487,0.0739472372064,0.0738578712622,0.073931829285,0.0740997756283,0.0740874492912,0.0737931579923,0.0738039435373,0.0738131882901,0.0736313748175,0.0735558760027,0.0735111930306,0.0733324611423,0.0732631254959,0.0730566593491,0.0729441815228,0.072836326073,0.0726961139882,0.0727223074546,0.0729441815228,0.0729688341971,0.0729256920171,0.0731830043046,0.0733370835187,0.0733232163894,0.0733648177772,0.0733802256986,0.0736390787783,0.0735343049127,0.0735281417441,0.0735990181826,0.073603640559,0.0732538807431,0.0732153609396,0.0732646662881,0.0732924005466,0.073297022923,0.0729734565735,0.0729472631071,0.0725697690326,0.0724326385321,0.0721445104018,0.0721737854525,0.0719996759406,0.0719626969292,0.0717716387038,0.0717793426645,0.0720489812891,0.0718810349458,0.0719118507886,0.0717161701867,0.0715913660233,0.0714758066128,0.0712832075952,0.0710813638248,0.0709719675828,0.071007405802,0.0707670422281,0.0708040212394,0.0710413032291,0.0711861376903,0.0713417576965,0.0716113963212,0.0717069254339,0.0714942961185,0.0715821212705,0.0715466830512,0.0713987670057,0.0713571656179,0.0709735083749,0.0708795200543,0.0708348370823,0.0705066483563,0.0703957113222,0.0703987929065,0.0704126600357,0.0700829305176,0.0701168279447,0.06993347368,0.0700490330905,0.0700582778434,0.0698949538765,0.069648427134,0.0698425669437,0.0698903315,0.0697131404039,0.0697778536738,0.069834862983,0.0700551962591,0.069944259225,0.0699827790285,0.070152266164,0.0703741402322,0.0700243804163,0.070109123984,0.0701014200233,0.0700813897255,0.0700659818041,0.0699180657586,0.0698209958537,0.0695929586169,0.0694465833635,0.0693572174194,0.0695236229706,0.0693602990037,0.069210842166,0.0694126859364,0.0693510542508,0.0691076090926,0.0693109936552,0.0693710845486,0.0692786370202,0.0694851031671,0.0694712360378,0.0696114481226,0.0698471893201,0.0695929586169,0.06938649247,0.0697008140667,0.069495888712,0.0693556766272,0.0695051334649,0.0691476696882,0.0690536813677,0.0688564599737,0.0689412035414,0.068837970468,0.069035191862,0.0690475181991,0.0691276393904,0.0690999051319,0.0689242548279,0.0689720193842,0.0687855835352,0.0686022292705,0.0683156419323,0.0683279682694,0.0680999310326,0.0679104135993,0.0675914696262,0.0676746724018,0.0676453973511,0.067611499924,0.0677131922053,0.0678534042901,0.0674728286314,0.06745742071,0.0672879335745,0.0670799266355,0.0670552739612,0.0669628264328,0.0667301668196,0.0667255444431,0.0666931878082,0.0664127636386,0.0666947286003,0.0665098335434,0.0665591388919,0.0667656050388,0.0668780828651,0.0668857868258,0.0669705303935,0.0669489593035,0.0670075094049,0.0670568147534,0.0670830082198,0.0671014977255,0.0670290804948,0.0667840945445,0.0668179919716,0.0666654535497,0.0666315561226,0.0668472670223,0.0665637612684,0.0666099850326,0.0664636097792,0.0662247869974,0.0663881109643,0.0663911925486,0.0661770224411,0.0662124606603,0.0660599222384,0.0657640901474,0.0658457521308,0.065858078468,0.0658950574793,0.0661200131319,0.066055299862,0.0658164770802,0.0659150877772,0.0659551483728,0.0659751786706,0.0659120061929,0.0658873535186,0.0657440598495,0.0654636356799,0.0653234235951,0.0652879853759,0.0655452976634,0.0653927592415,0.0651678035889,0.0650075612063,0.0649952348692,0.0650306730884,0.065004479622,0.0652402208196,0.0654328198371,0.065497533107,0.0653773513201,0.0654513093428,0.065551460832,0.0658503745072,0.0659058430243,0.0657101624224,0.0657964467823,0.0656562346975,0.0657070808382,0.0656254188547,0.0656562346975,0.0658241810409,0.0660368103563,0.0662294093738,0.0661955119468,0.0662494396717,0.0662694699695,0.0663973557172,0.0662078382839,0.0661878079861,0.0662124606603,0.0662787147224,0.0663264792787,0.0661677776882,0.0661631553118,0.0662586844245,0.0663141529416,0.0661385026376,0.0662062974917,0.0662633068009,0.0663203161101,0.0661724000646,0.0659489852043,0.0658596192601,0.0660167800584,0.0662340317503,0.0663434279923,0.0667917985052,0.0666700759261,0.0665653020605,0.0667733089995,0.066998264652,0.0671492622818,0.067206271591,0.0670706818826,0.0670706818826,0.0670737634669,0.0671430991133,0.06745742071,0.0676854579468,0.0677039474525,0.0677840686438,0.0679319846893,0.0680691151898,0.0683079379716,0.0683002340109,0.0683048563873,0.0682401431174,0.0684466092643,0.0683402946065,0.0682678773759,0.0682124088589,0.0681091757854,0.0681107165776,0.0680691151898,0.0680999310326,0.0683356722301,0.0684928330285,0.0686623201639,0.0689442851257,0.0691507512725,0.0692663106831,0.0692647698909,0.0694943479199,0.0696946508982,0.0698286998144,0.0698995762529,0.0698795459551,0.0697855576345,0.0698795459551,0.0697870984266,0.0699750750678,0.0702909374566,0.0703309980523,0.0704080376593,0.0705066483563,0.0705698208341,0.0707593382674,0.0708949279757,0.0710166505549,0.071084445409,0.0710166505549,0.0710443848134,0.071204627196,0.0714388276014,0.0716745687989,0.0718748717772,0.07188411653,0.0718625454401,0.0720628484184,0.0726082888362,0.0728748458765,0.0731506476697,0.0732816150016,0.0733987152043,0.0736652722446,0.0736159668961,0.0737946987845,0.074008868892,0.0741198059261,0.0739611043356,0.0740843677069,0.0738671160151,0.0739703490885,0.0742738851402,0.0741876007803,0.0745281158434,0.0747592346645,0.0749240994236,0.0751582998289,0.075520385982,0.075783861438,0.0759887867927,0.076122835709,0.0760226842198,0.0763631992829,0.0763354650244,0.0764263717607,0.0766867656325,0.0767545604867,0.0769456187121,0.0768839870265,0.0772799706066,0.077612781709,0.0778069215187,0.0778623900358,0.0779794902385,0.0780642338062,0.0781335694525,0.0785141451113,0.0784324831278,0.0787668350223,0.0789517300792,0.0790118209727,0.0793138162323,0.0794987112892,0.0798453895208,0.080275270528,0.0804216457814,0.0804293497421,0.0808099254009,0.0810040652106,0.0813954264143,0.0815248529541,0.0816511979097,0.0818422561351,0.0819608971299,0.0819300812871,0.0821673632768,0.0823568807101,0.0823353096201,0.082322983283,0.0822366989231,0.0825602652726,0.0828144959758,0.0831318991568,0.0833506916408,0.0837112370017,0.0838822649293,0.0839747124578,0.0843290946501,0.0845386423812,0.084678854466,0.0850917867597,0.0854538729128,0.0854954743006,0.0857913063916,0.0862966862137,0.0865000707763,0.0866264157318,0.0868020660359,0.0870562967391,0.0875000448756,0.0874368723978,0.0874908001227,0.0877604387473,0.0878282336015,0.0876833991403,0.0881918605467,0.088501559767,0.088578599374,0.0887280562117,0.0888097181951,0.0889391447349,0.0890593265219,0.0891656411796,0.0896032261476,0.0896540722882,0.0898913542779,0.0906001186626,0.0913705147329,0.0923766520007,0.0931763231217,0.0943041829687,0.0951285067639,0.0963857931507,0.0974967042841,0.0988556829522,0.0996122118932,0.100418046183,0.100988139275,0.101353307012,0.101844819705,0.102060530605,0.102758509444,0.103066667873,0.103185308867,0.103296245902,0.103565884526,0.103760024336,0.104111324944,0.10433165822,0.104635194272,0.105001902801,0.105276163802,0.105746105405,0.106231454929,0.106852394162,0.10737626349,0.107730645682,0.108023396189,0.108658202551,0.109118899401,0.109444006543,0.109664339819,0.109812255864,0.110000232506,0.110272952714,0.110359237074,0.110635038867,0.111266763645,0.111670451186,0.111852264659,0.112223595564,0.112243625862,0.112316043093,0.1125302132,0.112497856566,0.112812178162,0.113087979955,0.113197376197,0.113377648878,0.113664236216,0.113973935436,0.114451581,0.114964664783,0.115366811531,0.115619501442,0.115929200663,0.116146452355,0.116536272766,0.116855216739,0.117147967246,0.117527002113,0.118090932036,0.11826658234,0.118625586909,0.118941449298,0.119725712497,0.120351274106,0.120523842826,0.121004569974,0.121628590791,0.121950616348,0.122281886659,0.122774940144,0.123249504123,0.123707119389,0.123785699788,0.12419709129,0.124978272905,0.125155464001,0.12557918184,0.126095347207,0.126617675742,0.127175442497,0.127894992427,0.128438892053,0.128888803358,0.129277082977,0.129284786938,0.129827145771,0.130008959244,0.130415728369,0.130637602437,0.130996607006,0.130820956702,0.131337122069,0.131270868007,0.131669933172,0.131800900504,0.131991958729,0.132155282696,0.132258515769,0.13263292826,0.132505042512,0.13296419857,0.132773140344,0.133261571453,0.133016585503,0.133161419964,0.132905648468,0.13327389779,0.132840935199,0.132548184692,0.132492716175,0.132162986657,0.132198424876,0.132092110218,0.13202893774,0.132295494781,0.132284709236,0.132004285066,0.132293953989,0.132110599724,0.132133711606,0.132084406258,0.132001203482,0.131938031004,0.132078243089,0.131797818919,0.131837879515,0.131734646442,0.131850205852,0.131897970409,0.131716156936,0.131961142886,0.132087487842,0.132280086859,0.1321152221,0.132126007645,0.131837879515,0.131753135947,0.131415702468,0.131226185035,0.130881047596,0.130545154909,0.130193854301,0.129739320619,0.129554425563,0.12948046754,0.129423458231,0.12924318555,0.129281705354,0.129058290493,0.129347959416,0.128995118016,0.128611460772,0.128505146115,0.128351066901,0.128132274417,0.128016715006,0.127639220932,0.127237074183,0.127187768835,0.126683929805,0.126434321478,0.126660817922,0.126332629196,0.126492871579,0.126331088404,0.126471300489,0.126454351776,0.126440484646,0.126281783056,0.126130785426,0.12591045215,0.125674710952,0.125415857873,0.124947457062,0.124449781201,0.123910503951,0.123435939972,0.123137026297,0.122996814212,0.1228227047,0.122794970442,0.122323488046,0.122087746849,0.121608560493,0.121607019701,0.121636294752,0.121516112965,0.121284994144,0.121206413745,0.120955264626,0.120738012934,0.120751880063,0.120779614322,0.120406742624,0.119922933891,0.119221873467,0.118995377023,0.118442232644,0.117936852822,0.117983076586,0.117630235186,0.117178783089,0.116505456923,0.1166472098,0.116095606214,0.115861405809,0.115593307976,0.115292853509,0.114750494675,0.114146504156,0.113733571862,0.113111091838,0.112924655988,0.111967824069,0.112114199323,0.111798336934,0.111185101662,0.110957064425,0.110930870958,0.110647365205,0.110391593709,0.110382348956,0.110325339647,0.110445521434,0.110055701023,0.10985231646,0.109838449331,0.109608871302,0.109215969306,0.108941708305,0.108907810878,0.108632009085,0.107977172425,0.107807685289,0.107447139928,0.107323876557,0.107365477945,0.107240673782,0.107103543281,0.106806170398,0.106467196127,0.106377830183,0.106226832553,0.105992632148,0.10608816126,0.105796951546,0.105265378257,0.104858609132,0.104613623182,0.104709152295,0.104350147726,0.104014255039,0.103739994038,0.103213043126,0.102793947664,0.102562828843,0.102454973393,0.102330169229,0.101760076137,0.101236206809,0.100906477291,0.100507412127,0.100431913312,0.100533605593,0.100046715277,0.0997478016016,0.0993764706957,0.0991114544475,0.0991561374196,0.0989281001828,0.0985351981869,0.0984550769956,0.0982486108488,0.0980082472748,0.0981207251011,0.0977971587516,0.0975028674527,0.0972255248674,0.0970221403048,0.0966107488033,0.0964566695892,0.0961824085882,0.0959682384806,0.0954890521249,0.0951885976574,0.0948480825943,0.0948804392293,0.0948080219987,0.0945214346605,0.0944397726771,0.0943365396037,0.0940160548384,0.0933458102572,0.0929837241042,0.0921763490225,0.0918558642572,0.0908651349108,0.0898281818001,0.088709566706,0.0876387161682,0.0863275020565,0.0852181317153,0.0845078265384,0.0836295750182,0.0829177290493,0.0820317735684,0.081403130375,0.0810811048176,0.0806743356925,0.0804108602364,0.0805140933098,0.0804663287535,0.0802120980503,0.0799732752685,0.0797036366439,0.0796450865425,0.0796235154526,0.0792675924681,0.0791304619675,0.0788484970058,0.0788623641351,0.0783985857007,0.0781227839076,0.0779209401371,0.0779394296428,0.077524956557,0.0772522363481,0.0770396070327,0.0768701198972,0.0767977026666,0.0763878519572,0.076341628193,0.0762861596759,0.0761798450182,0.0760319289727,0.0760981830347,0.0759780012478,0.0759225327307,0.0759502669892,0.0758917168879,0.0756929547017,0.0756344046004,0.0754448871671,0.0753277869644,0.0750720154691,0.0749194770471,0.0747792649623,0.0747145516924,0.0744295051464,0.0743555471237,0.0742846706852,0.0741598665218,0.0740104096841,0.0739087174029,0.0738609528465,0.0735789878848,0.0734695916428,0.0730504961805,0.0729380183543,0.0726791652746,0.0726529718082,0.0723725476386,0.0723679252622,0.07192725871,0.071796291378,0.0719072284122,0.0715620909727,0.0717331189003,0.0715374382984,0.0715358975063,0.0712200351174,0.0712169535331,0.071095230954,0.0711630258082,0.0709288254028,0.0708271331216,0.0708826016386,0.0708225107451,0.0709072543129,0.0706514828175,0.0706222077669,0.0705004851877,0.0702061938889,0.0704850772663,0.0706360748961,0.0705328418227,0.0705420865755,0.0703417835973,0.0701753780461,0.0702878558723,0.0700166764556,0.070218520226,0.0701538069561,0.0698780051629,0.0698703012022,0.0697162219881,0.069703895651,0.0696191520833,0.0693803293015,0.0693048304866,0.0693710845486,0.0690197839406,0.0691769447389,0.0690860380026,0.0689412035414,0.0688179401701,0.0685375160005,0.0686099332312,0.0688502968051,0.0686499938268,0.0687624716531,0.0685714134276,0.0683587841122,0.0682971524266,0.0682201128196,0.0682216536117,0.0683063971795,0.0682447654938,0.0680090242963,0.067995157167,0.0679905347906,0.0683464577751,0.0683618656965,0.0682524694545,0.0680675743976,0.0681846746003,0.0681939193532,0.0680413809313,0.0680752783584,0.0678272108237,0.0676469381433,0.0673880850636,0.0672293834731,0.067337238923,0.0674836141763,0.0673202902094,0.0670706818826,0.0670722226748,0.0671585070347,0.0673618915972,0.0674789917999,0.0675806840812,0.0675791432891,0.0674666654628,0.0669998054442,0.0670337028713,0.0672108939674,0.067096875349,0.0668981131629,0.0667779313759,0.0666623719654,0.0666300153304,0.0667702274152,0.0666515864204,0.066822614348,0.0666639127575,0.0667055141453,0.0670783858433,0.0669951830678,0.0670660595062,0.0671030385176,0.0671739149561,0.067009050197,0.0669951830678,0.0670768450512,0.0670629779219,0.0670182949499,0.0669027355393,0.0669566632642,0.0666931878082,0.0665129151277,0.0662740923459,0.0664035188857,0.0665622204762,0.0666423416675,0.066614607409,0.0664682321557,0.0661354210533,0.0661693184804,0.0664605281949,0.0665021295827,0.0666408008754,0.0666084442405,0.0665668428527,0.0666069034483,0.0667055141453,0.0669196842529,0.0671338543604,0.0672463321867,0.0671122832704,0.0671569662425,0.067096875349,0.0670152133656,0.066854970983,0.0666931878082,0.0665514349312,0.0663341832394,0.0661816448175,0.0660737893676,0.0660707077834,0.0660630038227,0.0660460551091,0.0662386541267,0.0664374163128,0.066537567802,0.0667779313759,0.0666161482012,0.0665822507741,0.066614607409,0.0668595933594,0.0667748497916,0.0670136725734,0.066899653955,0.0670259989106,0.066998264652,0.0670275397027,0.0673557284287,0.0675529498227,0.0675621945755,0.0673588100129,0.0674759102156,0.0672417098103,0.0672771480295,0.0672463321867,0.067315667833,0.0671908636696,0.067238628226,0.0672047307989,0.0673233717937,0.0675205931877,0.0677147329974,0.0678641898351,0.0678580266665,0.067907332015,0.0678980872622,0.0680783599426,0.0681215021226,0.0681892969768,0.0681939193532,0.068049084892,0.0679412294421,0.0677332225031,0.0679920755828,0.067710110621,0.0677517120088,0.0676854579468,0.0676068775476,0.067633071014,0.0676269078454,0.06789654647,0.0677686607224,0.0678842201329,0.0675205931877,0.0676423157668,0.0678210476551,0.0678765161722,0.0679304438971,0.0678241292394,0.0677825278516,0.0676792947782,0.067797935773,0.0680922270719,0.068640749074,0.0686284227368,0.0685036185735,0.068707003136,0.0687424413553,0.0689751009685,0.0690105391877,0.0690490589912,0.0692354948403,0.0691029867162,0.06892579562,0.0689381219571,0.0687778795745,0.0685436791691,0.0683510801515,0.0683310498537,0.0686022292705,0.0685821989726,0.0684851290678,0.0682863668816,0.0683141011402,0.0686746465011,0.0689828049292,0.0691091498847,0.0693002081102,0.0693710845486,0.0691076090926,0.0690999051319,0.0694357978185,0.0696838653532,0.0694881847513,0.0694157675207,0.069517459802,0.0694527465321,0.069440420195,0.0695267045548,0.0697886392188,0.0699057394214,0.0626948322032,0.0557643491545,0.0489848637357,0.0419172501865,0.0)
ycorr <- c(8.71118654395e-05,8.70429511727e-05,8.68339093528e-05,8.64820393172e-05,8.59809271899e-05,8.53355288578e-05,8.45380693402e-05,8.37466199657e-05,8.29526582839e-05,8.21548947227e-05,8.13468078947e-05,8.05222613535e-05,7.96804715592e-05,7.8823909671e-05,7.79513435152e-05,7.70594509483e-05,7.61479871825e-05,7.52226223315e-05,7.42895374831e-05,7.33540829712e-05,7.24211286553e-05,7.14890381167e-05,7.05604757698e-05,6.96324670388e-05,6.86977165987e-05,6.77572051531e-05,6.68148920071e-05,6.58654103429e-05,6.49096130078e-05,6.39443386087e-05,6.29671631368e-05,6.19799838527e-05,6.09831684654e-05,5.99758559558e-05,5.89620609275e-05,5.79464196004e-05,5.69276996903e-05,5.59047907341e-05,5.48759248296e-05,5.38372733899e-05,5.27877053272e-05,5.17279650896e-05,5.06562552968e-05,4.95758366311e-05,4.84856556304e-05,4.73836939174e-05,4.6270784744e-05,4.51469221722e-05,4.401210961e-05,4.28721042244e-05,4.17235894415e-05,4.05671706925e-05,3.93974696752e-05,3.82111423016e-05,3.70102892914e-05,3.57943236108e-05,3.45601663437e-05,3.33093764214e-05,3.20414492717e-05,3.07580319207e-05,2.94581341786e-05,2.81459024092e-05,2.68208746384e-05,2.54848663534e-05,2.41349343407e-05,2.27728880853e-05,2.13999986364e-05,2.0016862429e-05,1.86221403404e-05,1.7214035205e-05,1.57878523442e-05,1.43440145955e-05,1.28846389257e-05,1.14098572758e-05,9.92919032904e-06,8.44200325927e-06,6.94431404159e-06,5.43615970754e-06,3.91933309996e-06,2.39097808686e-06,8.61566180564e-07,-6.68874689733e-07,-2.1962093138e-06,-3.72501051883e-06,-5.25547849276e-06,-6.79268509211e-06,-8.33049483581e-06,-9.86908016799e-06,-1.14099287225e-05,-1.29470853187e-05,-1.44838447252e-05,-1.60245970042e-05,-1.75697825371e-05,-1.91167282361e-05,-2.06632345674e-05,-2.22047191549e-05,-2.37460784225e-05,-2.5282388167e-05,-2.68105796189e-05,-2.83285865852e-05,-2.98368097061e-05,-3.13310892151e-05,-3.28146868297e-05,-3.42841794283e-05,-3.57508783686e-05,-3.72124760241e-05,-3.86699546091e-05,-4.01210416897e-05,-4.15690989027e-05,-4.30182783446e-05,-4.44673242777e-05,-4.59205145071e-05,-4.73753770923e-05,-4.88322525058e-05,-5.02856965598e-05,-5.17317636767e-05,-5.31706414415e-05,-5.46090460713e-05,-5.60446111639e-05,-5.74784506091e-05,-5.89148775569e-05,-6.03540054788e-05,-6.17976813751e-05,-6.32435445075e-05,-6.46908096226e-05,-6.61404264045e-05,-6.75932364003e-05,-6.90467184225e-05,-7.0495777994e-05,-7.19365168827e-05,-7.33689528068e-05,-7.47862688478e-05,-7.61868992524e-05,-7.75712157209e-05,-7.89463356047e-05,-8.03136567414e-05,-8.16737135772e-05,-8.30272154972e-05,-8.43779171611e-05,-8.57325969266e-05,-8.70895892886e-05,-8.84464437525e-05,-8.98033333753e-05,-9.11612484081e-05,-9.2514452015e-05,-9.38589228542e-05,-9.51924302404e-05,-9.65179999311e-05,-9.78366838294e-05,-9.91447434691e-05,-0.00010043815013,-0.000101727887345,-0.000103013177012,-0.000104299949868,-0.00010558614867,-0.00010688050489,-0.000108180831713,-0.000109488390471,-0.000110799453085,-0.000112110361821,-0.000113423348355,-0.000114738380287,-0.000116050153325,-0.000117360325985,-0.000118664348969,-0.000119961301138,-0.00012124352159,-0.000122510988025,-0.000123765023067,-0.000125011950004,-0.000126255226241,-0.000127492804549,-0.000128726117566,-0.000129949719688,-0.000131169967479,-0.000132388311063,-0.00013361102664,-0.000134840741453,-0.000136080384037,-0.000137324583105,-0.000138569006682,-0.000139811188202,-0.000141054180611,-0.000142292484527,-0.000143526247157,-0.000144747232548,-0.000145956202688,-0.000147147327248,-0.000148319848667,-0.000149478201655,-0.00015062350144,-0.000151756868345,-0.000152876174542,-0.000153988938668,-0.000155093893304,-0.000156198276034,-0.000157306206894,-0.000158414904739,-0.000159525558221,-0.000160636032789,-0.000161739887342,-0.000162835003865,-0.000163924730549,-0.000165005159736,-0.0001660781746,-0.000167146135562,-0.000168203168852,-0.000169250756652,-0.000170293566257,-0.00017133194129,-0.000172370085921,-0.000173411512402,-0.000174460277764,-0.000175515817942,-0.00017658030321,-0.000177645132154,-0.000178713949847,-0.000179790136197,-0.000180868177347,-0.000181945251873,-0.000183025982555,-0.000184108048475,-0.000185184330685,-0.000186257776731,-0.000187324927147,-0.000188391744321,-0.000189461532492,-0.000190531356073,-0.000191603584363,-0.000192680355556,-0.000193760305912,-0.000194843253743,-0.000195929684985,-0.000197023553449,-0.000198126000295,-0.000199236661448,-0.000200348194402,-0.000201457689023,-0.000202565992992,-0.000203675014254,-0.000204782535889,-0.000205888456094,-0.00020699055565,-0.000208086841064,-0.000209178109343,-0.000210261486631,-0.000211341157804,-0.000212423196613,-0.000213502713525,-0.000214577615409,-0.000215643925964,-0.000216705532828,-0.00021776872123,-0.000218836583572,-0.000219906236985,-0.000220978478221,-0.000222051731708,-0.000223124302464,-0.000224201019588,-0.000225285346561,-0.000226378069745,-0.000227481476838,-0.000228594569458,-0.000229710699653,-0.000230831900887,-0.000231959825172,-0.000233093433318,-0.000234232454171,-0.000235374599071,-0.000236512738846,-0.000237650458641,-0.000238788523089,-0.000239924019246,-0.000241056214658,-0.000242185513502,-0.000243306246565,-0.000244424512375,-0.000245541432404,-0.000246657458804,-0.000247775318607,-0.00024889667622,-0.000250016472831,-0.000251131049979,-0.000252240103131,-0.000253338389526,-0.000254428548052,-0.000255502384454,-0.00025655139579,-0.000257567241255,-0.000258546278528,-0.00025948139219,-0.000260369985979,-0.000261218189194,-0.00026202866524,-0.000262805596198,-0.000263555430832,-0.000264277525512,-0.000264985391643,-0.000265686693295,-0.000266393030197,-0.000267113959612,-0.000267857446223,-0.000268625003047,-0.000269413547205,-0.000270224351469,-0.000271054237571,-0.000271907530835,-0.00027278020955,-0.000273669972914,-0.000274572564553,-0.000275487729593,-0.000276405135115,-0.000277321421462,-0.00027823816349,-0.000279156961691,-0.000280076104566,-0.000280997245359,-0.000281918038186,-0.000282840358788,-0.000283762726445,-0.000284685491381,-0.000285608778066,-0.000286539377492,-0.000287478785927,-0.000288425708862,-0.000289381191968,-0.000290345732489,-0.000291317307354,-0.000292297159545,-0.000293287803028,-0.000294284970862,-0.000295291268314,-0.000296299786991,-0.000297309745197,-0.000298318752334,-0.000299327931791,-0.000300333412502,-0.000301339398864,-0.000302343565734,-0.000303344424448,-0.000304341946709,-0.00030533898522,-0.000306336316534,-0.000307336578602,-0.000308340587454,-0.000309346882803,-0.000310355453403,-0.000311363366422,-0.000312370286544,-0.000313379177609,-0.000314391209108,-0.000315402392317,-0.000316415030937,-0.000317424294748,-0.00031843229313,-0.000319440540933,-0.000320449303468,-0.000321460514989,-0.000322474891495,-0.000323492123629,-0.000324508053271,-0.000325523016035,-0.00032653802851,-0.00032755301186,-0.000328569228323,-0.000329584934076,-0.000330598668364,-0.000331613843207,-0.000332631039745,-0.00033364831339,-0.000334664478636,-0.000335683304979,-0.000336700878353,-0.000337723310364,-0.000338748469156,-0.000339777356067,-0.000340809833988,-0.000341842028289,-0.000342871382998,-0.000343897175162,-0.000344921271757,-0.000345945693339,-0.00034696885561,-0.000347989980927,-0.000349004913027,-0.000350011461205,-0.000351012197631,-0.000352006195823,-0.000352993042343,-0.000353975546962,-0.000354951873848,-0.000355921125847,-0.000356883765387,-0.000357839280099,-0.000358790254966,-0.000359734883353,-0.000360673424777,-0.000361607064274,-0.000362540001812,-0.000363469827663,-0.000364398122717,-0.000365322132123,-0.000366244407347,-0.000367162712629,-0.000368078365338,-0.000368991998439,-0.000369903642975,-0.000370813798711,-0.000371716062195,-0.000372608419836,-0.000373496612973,-0.000374382516663,-0.000375265808142,-0.000376145415956,-0.000377017974659,-0.000377884524329,-0.000378744960744,-0.000379597541772,-0.000380445597862,-0.000381290063993,-0.000382126841817,-0.000382951590326,-0.000383759219978,-0.000384554541864,-0.000385342078526,-0.000386124103056,-0.000386895221597,-0.000387654353197,-0.000388404385904,-0.000389145044723,-0.000389880652972,-0.000390612238851,-0.000391339745521,-0.000392060550077,-0.000392764847361,-0.000393451099211,-0.000394122425264,-0.000394781109686,-0.000395425957909,-0.000396053827079,-0.000396661098707,-0.000397246743172,-0.000397814807317,-0.000398366887445,-0.000398906933175,-0.00039943961385,-0.000399965053657,-0.000400485596413,-0.000400997804122,-0.000401503023846,-0.000402001719984,-0.000402495179779,-0.000402980014014,-0.000403452076019,-0.000403914103056,-0.000404362842771,-0.00040479983561,-0.000405221150159,-0.000405621317356,-0.000406001790788,-0.000406360594578,-0.000406697619716,-0.000407015538468,-0.000407318577578,-0.000407606909021,-0.000407877289764,-0.000408127895792,-0.000408354678754,-0.000408563086808,-0.00040875719558,-0.000408938894752,-0.000409108928241,-0.000409265745634,-0.000409403334467,-0.000409519307991,-0.000409615320126,-0.000409693574817,-0.00040975910401,-0.000409813388297,-0.000409847783156,-0.000409857942293,-0.000409844648925,-0.000409806743573,-0.000409746666492,-0.000409665310412,-0.000409559807752,-0.000409427050077,-0.00040926318727,-0.000409067516791,-0.000408844886081,-0.0004086003365,-0.000408331471349,-0.000408041156467,-0.000407729857776,-0.000407398309213,-0.000407049493144,-0.000406682130133,-0.000406296880315,-0.000405895074563,-0.000405476837661,-0.000405036895194,-0.000404577731272,-0.000404097934763,-0.000403596659149,-0.000403071618255,-0.000402523590868,-0.000401953487451,-0.000401365542978,-0.000400759055113,-0.000400130798053,-0.000399480040334,-0.000398805063475,-0.00039810344665,-0.000397376992838,-0.000396624510453,-0.000395845029956,-0.00039503707413,-0.000394196461801,-0.000393324225178,-0.00039242252822,-0.00039149680844,-0.000390546698629,-0.000389573770317,-0.000388576354476,-0.000387553309481,-0.000386504436197,-0.000385431751666,-0.000384336191347,-0.000383216943045,-0.000382071344438,-0.000380896707074,-0.00037968736139,-0.000378446679961,-0.00037717308032,-0.000375869609844,-0.000374536669258,-0.000373174244349,-0.000371782762464,-0.000370360190849,-0.000368908625997,-0.000367426437887,-0.000365916702894,-0.000364377724457,-0.000362807217204,-0.000361210551001,-0.000359587087023,-0.000357936871195,-0.00035625662431,-0.000354546424725,-0.000352807038801,-0.000351038506927,-0.00034924605391,-0.000347432144919,-0.000345598083699,-0.000343738224216,-0.000341851835466,-0.000339936506192,-0.000337994836616,-0.000336028896751,-0.000334037952814,-0.000332023050556,-0.000329980559066,-0.000327905500553,-0.000325793552494,-0.000323646742286,-0.000321466055728,-0.000319249330837,-0.000316998084567,-0.000314714350482,-0.000312396262644,-0.000310043554389,-0.000307653422715,-0.000305231452117,-0.000302783884846,-0.000300312542892,-0.000297818722788,-0.00029530374093,-0.000292767979989,-0.000290204131562,-0.000287610742012,-0.000284993078978,-0.000282352158969,-0.000279683797269,-0.000276986934047,-0.000274258658243,-0.000271495661857,-0.000268700162245,-0.000265873266634,-0.00026301778366,-0.000260139504744,-0.000257149676556,-0.000253967070354,-0.000250528539255,-0.000246785258456,-0.000242286838978,-0.000238545661434,-0.000235099568439,-0.00023189106835,-0.000228849174564,-0.00022588768967,-0.000222923921244,-0.000220044958783,-0.000217328875617,-0.000214837054205,-0.000212624926184,-0.00021114286788,-0.000208874924291,-0.000206286625629,-0.000203432968774,-0.000200385851628,-0.000197227071482,-0.000194040720675,-0.000190827328234,-0.000187582457025,-0.000184303456009,-0.00018098784296,-0.000177637407588,-0.000174251975813,-0.000170831201092,-0.000167374601764,-0.000163879360565,-0.000160348006287,-0.000156776941519,-0.00015317038561,-0.000149532437577,-0.000145868067972,-0.00014217838956,-0.000138459381228,-0.000134711521474,-0.000130935826534,-0.000127132595468,-0.000123302370129,-0.000119445269206,-0.000115561995996,-0.000111651010747,-0.000107710110517,-0.000103736089774,-9.97323713386e-05,-9.57058383095e-05,-9.16577088101e-05,-8.75863473647e-05,-8.34923958537e-05,-7.93773868771e-05,-7.5239866911e-05,-7.10795002615e-05,-6.68944146277e-05,-6.26870481979e-05,-5.84609774658e-05,-5.42099986944e-05,-4.99286668366e-05,-4.56200605672e-05,-4.12861678262e-05,-3.69262510193e-05,-3.25402097277e-05,-2.81290963525e-05,-2.36957303556e-05,-1.92426099648e-05,-1.47655381429e-05,-1.02658962327e-05,-5.74350552314e-06,-1.19701914024e-06,3.37418476208e-06,7.97151852552e-06,1.25950341693e-05,1.72406313919e-05,2.19095615868e-05,2.66054501675e-05,3.1330238259e-05,3.60813747448e-05,4.08597499305e-05,4.56623056859e-05,5.04901333205e-05,5.53436161509e-05,6.02213680914e-05,6.51252840761e-05,7.00556612104e-05,7.50102959953e-05,7.99843366629e-05,8.49802088414e-05,8.99929985528e-05,9.50210849554e-05,0.000100065033097,0.000105125700199,0.000110203893358,0.000115301227673,0.000120417783847,0.000125555850507,0.000130712192087,0.000135884946864,0.000141073826131,0.000146280903974,0.000151507765712,0.00015674792309,0.000161996706275,0.000167252700609,0.000172512941894,0.00017777392357,0.00018303654679,0.000188303331541,0.000193575952959,0.000198851601532,0.000204126658344,0.000209403165228,0.000214680177524,0.000219956318996,0.000225232046623,0.000230507189222,0.000235780259468,0.000241050677013,0.000246316643807,0.000251581592975,0.000256847218443,0.000262112396662,0.000267375924386,0.000272641004125,0.000277906867709,0.000283173777489,0.000288443446159,0.000293717022888,0.000298993605718,0.00030427151111,0.00030954623788,0.000314817587309,0.00032008955499,0.000325360797161,0.000330631239183,0.000335899183031,0.00034116373783,0.000346423709351,0.000351676713021,0.000356919932905,0.000362154373118,0.000367378964734,0.000372592134667,0.000377792018446,0.000382975768716,0.000388141674676,0.000393289857421,0.00039841539292,0.000403518654484,0.000408601808043,0.000413665881754,0.00041870978846,0.000423732906915,0.00042873179554,0.00043370737653,0.000438664817612,0.000443604682919,0.000448529984255,0.00045343928545,0.000458331988322,0.00046320576546,0.000468060809027,0.000472898652886,0.000477723808817,0.000482537012676,0.000487331978104,0.000492105833395,0.000496857252514,0.000501588200348,0.000506300345627,0.000510992467129,0.000515664681274,0.000520315882902,0.000524941059867,0.000529534974705,0.000534100622303,0.000538641164625,0.000543153187342,0.000547635415901,0.000552079856567,0.000556488526262,0.000560858354661,0.000565184148874,0.000569467820201,0.000573713411518,0.00057792274543,0.000582091857573,0.000586222510619,0.000590312888091,0.000594368082559,0.000598389263552,0.000602373824233,0.000606327534572,0.000610251672499,0.000614142867169,0.000617993698724,0.000621802294346,0.000625565002424,0.000629283573564,0.000632957522334,0.000636583230799,0.000640164321119,0.000643697871658,0.000647178424732,0.000650607205834,0.000653987289722,0.000657322229209,0.000660614931655,0.000663867545984,0.000667075541788,0.000670237950548,0.000673353392828,0.000676416882108,0.000679433984276,0.000682402553572,0.000685323849637,0.000688194140573,0.000691013400208,0.000693778353529,0.000696491228232,0.000699149999774,0.000701756927787,0.000704313878078,0.000706819437552,0.00070927479845,0.000711679557708,0.000714036178375,0.000716340600489,0.000718593569598,0.000720793195603,0.000722941483341,0.00072504176429,0.000727096774997,0.000729105472286,0.000731069496826,0.00073298349004,0.000734848170072,0.000736660382329,0.000738424101396,0.000740137542865,0.000741802214971,0.000743411011219,0.000744960766026,0.000746449430562,0.000747876504728,0.000749248049056,0.000750562216192,0.000751824810025,0.000753032123465,0.000754184918336,0.000755283277075,0.000756324431825,0.000757312590907,0.000758250048114,0.000759134456919,0.000759965519369,0.000760739056076,0.000761458534067,0.00076212114621,0.000762732087016,0.000763287118724,0.00076379345216,0.00076425282019,0.000764660175708,0.000765019079968,0.000765323653027,0.000765576077238,0.000765775673537,0.00076592266429,0.000766012936676,0.000766046579507,0.00076602548152,0.000765943756458,0.00076580247634,0.000765602623502,0.000765345386261,0.000765036329113,0.000764670992789,0.0007642484328,0.000763770625407,0.000763239363412,0.000762648543167,0.000762001347566,0.00076129993238,0.000760546126843,0.000759740484935,0.000758877421633,0.000757960137197,0.000756992792324,0.000755974211505,0.000754904938684,0.000753788628105,0.000752625939224,0.00075141440286,0.000750150091206,0.000748832504863,0.000747463664812,0.000746044565778,0.000744570687768,0.000743037510743,0.000741446742325,0.000739792289923,0.000738074170695,0.000736292466095,0.000734445687573,0.000732538076146,0.000730566636108,0.000728527733937,0.000726422999668,0.00072425862893,0.000722035264954,0.000719758967163,0.000717429805008,0.000715046585059,0.000712612273533,0.00071012638633,0.000707589638744,0.000705006594607,0.00070237919608,0.000699705918152,0.000696983722704,0.000694212741739,0.000691389307336,0.000688519875572,0.000685606324557,0.000682645936614,0.000679640736998,0.000676591287833,0.000673495887848,0.000670357485086,0.000667175127213,0.000663951060675,0.000660686762394,0.00065737947507,0.000654027009322,0.000650628514426,0.00064718995549,0.000643710157453,0.000640188522277,0.000636626232529,0.00063302672579,0.000629389141037,0.000625712831157,0.000622001786787,0.000618255824815,0.000614475874429,0.000610660838662,0.000606808144578,0.00060291833501,0.000598990122328,0.000595019747126,0.000591007470798,0.00058695558561,0.000582862840655,0.000578730373461,0.000574562550695,0.00057035909335,0.00056612095436,0.000561850993994,0.000557553720505,0.000553232104252,0.000548886615258,0.000544517381365,0.000540121659874,0.000535699966522,0.000531250936588,0.000526772244701,0.000522263665176,0.000517727067253,0.000513156871787,0.000508550883874,0.000503908680951,0.00049923129137,0.000494519117754,0.000489774327729,0.0004849980763,0.000480190596595,0.000475354816319,0.000470488435403,0.000465590124579,0.000460665236979,0.000455712165613,0.000450730522671,0.000445724038073,0.000440691914096,0.000435634899762,0.000430551578403,0.000425442541947,0.000420307806219,0.000415152849021,0.000409977436306,0.000404780186337,0.000399562481584,0.000394324592285,0.000389066454215,0.000383788178438,0.000378490840511,0.000373173538636,0.000367837304106,0.000362481462221,0.000357103924585,0.000351709076504,0.000346300287617,0.00034087961053,0.000335445986626,0.000329997342646,0.000324534000431,0.000319060173089,0.000313579608385,0.000308090330292,0.000302596928341,0.000297099350835,0.000291595954545,0.000286085023502,0.000280569861633,0.000275053229037,0.000269540742009,0.000264033151675,0.000258527047283,0.000253023893049,0.000247523973839,0.000242027933903,0.000236537188626,0.000231050863938,0.000225568939021,0.000220091587762,0.000214620663536,0.000209149543711,0.000203680315279,0.000198216620552,0.000192758437086,0.000187306929826,0.000181858977644,0.000176415871261,0.000170979270303,0.000165550362652,0.000160123305843,0.000154698692402,0.000149281854866,0.000143871636325,0.000138466755646,0.000133068064002,0.000127676358941,0.000122293456002,0.000116919722084,0.000111556254499,0.00010620502201,0.00010087156003,9.55477581778e-05,9.02333089566e-05,8.49287129706e-05,7.96337917809e-05,7.43520005584e-05,6.90824669354e-05,6.3826685855e-05,5.85835966141e-05,5.33559894241e-05,4.81424960711e-05,4.29471942571e-05,3.77754731378e-05,3.26267188875e-05,2.75004926566e-05,2.23969939181e-05,1.73132902921e-05,1.22519916163e-05,7.21206227753e-06,2.19285829208e-06,-2.80650151074e-06,-7.78713542419e-06,-1.27524949455e-05,-1.77009794654e-05,-2.26305969538e-05,-2.75423204912e-05,-3.24313690171e-05,-3.73013495458e-05,-4.21516047428e-05,-4.69845734387e-05,-5.17988202507e-05,-5.6592339183e-05,-6.13668662706e-05,-6.61197617563e-05,-7.08508538893e-05,-7.55608705073e-05,-8.02490447461e-05,-8.49175070931e-05,-8.95624096208e-05,-9.41819893591e-05,-9.87739751994e-05,-0.00010333671789,-0.000107872150648,-0.000112378482376,-0.000116857593843,-0.000121309214559,-0.000125733795447,-0.000130131639814,-0.000134503061199,-0.000138849806957,-0.000143170497651,-0.000147467286769,-0.000151738143704,-0.000155981397469,-0.000160199249493,-0.000164390409669,-0.000168553636079,-0.00017268737856,-0.000176789517711,-0.000180857466477,-0.000184894381744,-0.000188901205539,-0.00019287455803,-0.000196816505274,-0.000200723843539,-0.000204593637922,-0.000208424386287,-0.000212216672929,-0.000215972342122,-0.000219696372182,-0.000223388900032,-0.000227044500604,-0.000230665404563,-0.000234254762386,-0.000237813742212,-0.000241345975055,-0.000244850323441,-0.000248327580873,-0.000251775679639,-0.000255190256294,-0.000258567171801,-0.000261909724073,-0.000265218912813,-0.000268494365539,-0.000271733733343,-0.000274934304957,-0.000278102461769,-0.000281235914153,-0.000284340697654,-0.000287417880957,-0.000290469127749,-0.000293494869039,-0.000296492503475,-0.000299461387566,-0.000302401358462,-0.000305314103642,-0.000308196818073,-0.000311045623982,-0.000313860055731,-0.000316636014731,-0.000319378002621,-0.000322083447787,-0.000324753755506,-0.000327391967773,-0.000329997248709,-0.000332569485039,-0.000335110476079,-0.000337624814315,-0.000340112321059,-0.000342573713471,-0.000345006904173,-0.00034740659444,-0.000349774694707,-0.000352108866556,-0.000354407443696,-0.000356670219577,-0.000358895694183,-0.000361080714528,-0.000363227037481,-0.000365335257886,-0.000367405666735,-0.000369443971376,-0.000371451215602,-0.000373426180139,-0.00037536783494,-0.000377281232738,-0.000379167506891,-0.000381028801975,-0.000382861008038,-0.000384664305883,-0.000386435494351,-0.00038817416223,-0.000389878416908,-0.000391550198301,-0.000393193590903,-0.000394806042125,-0.00039638342909,-0.000397926547884,-0.000399435124957,-0.000400908412393,-0.00040234393417,-0.00040374525882,-0.000405113193941,-0.000406446470233,-0.000407745074792,-0.000409004830806,-0.000410226789018,-0.000411408301453,-0.000412551337072,-0.000413655097295,-0.00041473088992,-0.000415778843159,-0.000416799485304,-0.000417792279233,-0.000418757891668,-0.00041969645214,-0.000420610988872,-0.000421432987292,-0.000422094390597,-0.000422591376212,-0.000422927084284,-0.000423096228241)
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(261)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Mus_musculus_domesticus-male-liver-H3K27Ac-ERR572141.50mers.unique.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) : 261',bty='n')
dev.off()