# R script for Peak Model
#  -- generated by MACS
p <- c(0.0347930652188,0.0406828271164,0.0467260126235,0.0528629570031,0.0585311070204,0.0581731185982,0.0585055364188,0.058190165666,0.0584032540125,0.0587101012315,0.0582242598014,0.0581731185982,0.0578577478454,0.0575082829571,0.057636135965,0.0582413068691,0.0580623126581,0.0584543952156,0.0584117775463,0.0584117775463,0.0587953365701,0.0588123836378,0.0593323192033,0.0592811780001,0.0590254719843,0.0584117775463,0.0581731185982,0.0579515067179,0.0579941243872,0.0580537891242,0.0579515067179,0.0580111714549,0.057636135965,0.0579344596501,0.0584543952156,0.0593067486017,0.0595624546175,0.0598181606333,0.0595624546175,0.0592641309324,0.0594857428128,0.0590766131875,0.0590254719843,0.0589402366457,0.0586674835622,0.0584117775463,0.0587697659685,0.0592641309324,0.0598693018365,0.0598778253703,0.0597073546931,0.0603807138681,0.0605000433422,0.0609347435691,0.0609858847722,0.0612756849235,0.0609773612384,0.0601931961232,0.0597670194302,0.0601335313862,0.0603721903343,0.0602613843941,0.0606364198839,0.0600994372507,0.0602017196571,0.0598096370995,0.0600482960476,0.0606278963501,0.060696084621,0.0604915198083,0.060329572665,0.0603551432665,0.0605170904099,0.0606364198839,0.0602187667248,0.0603721903343,0.0604062844697,0.0597670194302,0.0595795016852,0.0594772192789,0.060022725446,0.0599886313105,0.0596476899561,0.0596135958207,0.0600653431153,0.0596988311593,0.0597073546931,0.0600994372507,0.0602613843941,0.0599204430397,0.0594175545419,0.060022725446,0.0599715842428,0.059963060709,0.0604148080036,0.0610029318399,0.0610285024415,0.0612586378558,0.0613609202621,0.0621365618434,0.0622473677836,0.0615910556763,0.0615910556763,0.0617530028197,0.0615143438716,0.0617274322181,0.061608102744,0.061608102744,0.0610285024415,0.0607642728918,0.0604915198083,0.0606790375532,0.0605426610115,0.0605597080792,0.0601846725893,0.0598522547688,0.059775542964,0.0595795016852,0.0603125255972,0.0602869549957,0.0606108492824,0.0601335313862,0.060755749358,0.0610540730431,0.061429108533,0.0615995792102,0.0616421968795,0.0619490440985,0.0617700498874,0.0624178384608,0.0623666972576,0.0631252917712,0.0628269680861,0.062528644401,0.0626991150782,0.062647973875,0.0630911976358,0.0632360977114,0.0632531447791,0.0627161621459,0.0632531447791,0.0630656270342,0.0628099210184,0.0630741505681,0.06332133305,0.0639605980896,0.0641651629022,0.0643782512487,0.064974898619,0.0650004692205,0.0648299985433,0.0646595278661,0.0655885930569,0.0655459753876,0.0655544989215,0.0651112751607,0.0651453692962,0.0647191926031,0.064787380874,0.0652476517025,0.0654181223797,0.0657590637341,0.0653158399734,0.0659295344113,0.0660573874192,0.0660147697499,0.0661426227579,0.0666455112556,0.0662875228335,0.0660829580208,0.0661426227579,0.0666966524588,0.0666966524588,0.066619940654,0.0664238993753,0.0666284641879,0.0663471875705,0.0665773229847,0.0669608820085,0.0670972585502,0.0672251115581,0.0671398762195,0.0675319587771,0.0672762527613,0.0674722940401,0.0680518943426,0.0687082064499,0.0686655887806,0.0686144475774,0.069432706828,0.0694668009635,0.0693389479556,0.0693645185571,0.0700293541983,0.0700890189353,0.0702594896125,0.0703447249511,0.0701998248755,0.0703447249511,0.0700890189353,0.0704470073574,0.0706686192378,0.071572113827,0.0713675490144,0.0717170139027,0.0719897669862,0.0721772847311,0.0721005729264,0.0728762145077,0.0727398379659,0.0723562789422,0.072671649695,0.0723307083406,0.0733109147346,0.0732768205991,0.0727739321014,0.0727142673643,0.0732171558621,0.07285916744,0.0731319205235,0.0739160856387,0.0743507858656,0.074325215264,0.0737626620292,0.0741206504513,0.0744701153396,0.0748366272956,0.0749900509051,0.075424751132,0.0761833456456,0.076157775044,0.0761833456456,0.0768140871513,0.0765157634661,0.0770101284301,0.0776493934696,0.0777857700114,0.0785273174572,0.0786210763297,0.0784846997879,0.0788000705408,0.0790728236243,0.0788853058794,0.0800445064844,0.0803087360341,0.0803087360341,0.0805644420499,0.0802916889664,0.080436589042,0.0808883363366,0.0811610894201,0.080922430472,0.0815105543084,0.0818003544597,0.0818344485951,0.0819708251369,0.0819196839337,0.0821157252125,0.0828913667938,0.0829851256663,0.0828998903277,0.0836670083751,0.0840761380004,0.0838033849169,0.0837778143153,0.0841187556697,0.0846216441675,0.0844341264226,0.0844511734903,0.0848943972511,0.0860365507884,0.085934268382,0.0857126565017,0.0860876919915,0.0863860156767,0.0861473567286,0.0867354805649,0.0874940750785,0.0879202517716,0.0877668281621,0.0870764219194,0.0876815928235,0.0884231402693,0.0885254226757,0.0891902583168,0.0902471765155,0.0902471765155,0.0907585885471,0.0911165769693,0.0919604068215,0.0924888659208,0.0927445719366,0.0928468543429,0.0933582663746,0.0937333018644,0.0937759195337,0.0940827667527,0.0945259905135,0.0948669318679,0.0950629731467,0.095472102772,0.0962818384888,0.0977137921773,0.099077557595,0.100407228877,0.101745423693,0.102853483095,0.10416610731,0.105188931373,0.106518602655,0.107430620778,0.108172168224,0.107976126945,0.10880290973,0.109007474543,0.109391033566,0.110345669359,0.110499092968,0.110831510789,0.110678087179,0.111240640414,0.111931046657,0.112561788162,0.112425411621,0.112928300118,0.112987964855,0.112749305907,0.112885682449,0.113158435533,0.113797700572,0.114360253807,0.114130118393,0.114454012679,0.115135895388,0.11542569554,0.116448519603,0.117454296598,0.118315173518,0.11867316194,0.118741350211,0.119482897657,0.120215921569,0.120795521872,0.120232968637,0.120096592095,0.119695986004,0.119951692019,0.120463104051,0.12076995127,0.121690492927,0.121869487138,0.122125193154,0.122397946237,0.123437817368,0.124025941205,0.125679506774,0.125841453917,0.125918165722,0.126847230913,0.127665490163,0.128270661067,0.128782073099,0.128978114378,0.129267914529,0.129898656035,0.129642950019,0.129770803027,0.129625902951,0.129864561899,0.129523620545,0.130324832728,0.131177186114,0.131910210026,0.132430145591,0.13289041642,0.133248404842,0.133759816874,0.13505539402,0.135046870487,0.135848082669,0.135072441088,0.13461217026,0.134561029056,0.135080964622,0.135566806052,0.135745800263,0.13595888861,0.135600900187,0.136649294852,0.137484601171,0.137978966135,0.138200578015,0.139419443357,0.139896761253,0.140118373134,0.140058708397,0.1411923384,0.14216402126,0.142666909758,0.143050468782,0.14474665202,0.145360346458,0.144942693299,0.146170082175,0.146783776612,0.147942977218,0.149536878049,0.150295472563,0.150457419706,0.150440372639,0.149988625344,0.151181920085,0.152579779638,0.152349644223,0.153065621068,0.154028780394,0.152588303172,0.153227568211,0.153551462498,0.153824215581,0.154608380696,0.154736233704,0.154957845585,0.155060127991,0.154591333629,0.154574286561,0.15563120476,0.155665298895,0.15607442852,0.156918258373,0.157966653038,0.158946859431,0.159884448156,0.160745325076,0.162407414179,0.162782449669,0.163029632151,0.163916079672,0.164828097795,0.164785480126,0.164742862457,0.165467362835,0.165066756743,0.165151992082,0.164546821178,0.164623532983,0.16468319772,0.164623532983,0.164410444636,0.16430816223,0.163677420724,0.162893255609,0.16296144388,0.162160231697,0.161231166506,0.161444254853,0.160770895678,0.1600463953,0.159620218606,0.159560553869,0.159995254096,0.159483842065,0.158034841308,0.157872894165,0.158631488679,0.158605918077,0.159620218606,0.159458271463,0.159637265674,0.159236659583,0.157915511834,0.157548999878,0.158179741384,0.157514905743,0.156969399576,0.156577317018,0.155469257616,0.155239122202,0.154472004155,0.155017510322,0.15503455739,0.154531668892,0.153977639191,0.154420862952,0.153696362573,0.152724679713,0.152366691291,0.152017226403,0.151258631889,0.150269901961,0.150167619555,0.149971578276,0.149852248802,0.149724395794,0.149630636922,0.148965801281,0.147721365337,0.14728666511,0.147593512329,0.146869011951,0.146084846836,0.146187129242,0.145471152398,0.144252287056,0.143553357279,0.14410738698,0.145547864203,0.144763699088,0.143894298634,0.144465375402,0.143945439837,0.14339993367,0.143493692542,0.143519263144,0.1438857751,0.14242825081,0.141627038627,0.142522009682,0.141908315244,0.140672402834,0.140689449902,0.139521725763,0.139078502003,0.139410919823,0.139300113883,0.139726290576,0.138822795987,0.137510171772,0.137535742374,0.137680642449,0.1368879538,0.137450507035,0.136632247785,0.135873653271,0.134842305674,0.133444446121,0.13322283424,0.132967128225,0.131995445364,0.131458462731,0.131782357018,0.131143091978,0.130503826939,0.129890132501,0.129199726258,0.128935496709,0.127656966629,0.127401260614,0.127759249036,0.127043272191,0.126872801514,0.126727901439,0.126583001363,0.126122730535,0.12653186016,0.126676760235,0.126889848582,0.125798836248,0.124903865192,0.123821376392,0.122457610974,0.122150763756,0.121929151875,0.122201904959,0.121358075106,0.121511498716,0.121613781122,0.12114498676,0.120744380669,0.120863710143,0.121392169242,0.120855186609,0.120710286533,0.120190350968,0.120429009916,0.119551085928,0.119022626829,0.11915900337,0.120164780366,0.120403439314,0.120028403824,0.119141956303,0.118860679685,0.118178796976,0.117309396523,0.116712749152,0.1158689193,0.115962678173,0.114513677416,0.113490853353,0.112783400043,0.113141388465,0.112723735306,0.111973664326,0.111786146581,0.111794670115,0.111726481844,0.111257687482,0.110439428231,0.11003882214,0.108828480331,0.107626662057,0.10708115589,0.107174914763,0.106356655512,0.105325307915,0.104097919039,0.103049524374,0.103100665577,0.102572206478,0.102384688733,0.101711329558,0.100509511284,0.100066287523,0.0997082991007,0.0990008457903,0.0992480282722,0.0986428573681,0.0969551976637,0.0967591563849,0.0961625090147,0.0960431795407,0.0956510969831,0.0950118319435,0.0944663257765,0.0944492787087,0.0940401490834,0.0929406132154,0.0931025603588,0.0923951070483,0.0924036305822,0.0921990657695,0.0920967833632,0.0912018123079,0.090400600125,0.0897613350854,0.0892669701215,0.0895311996712,0.0896420056114,0.089786905687,0.0891987818506,0.0885424697434,0.0879969635763,0.0884231402693,0.0883293813969,0.0879372988393,0.0870082336485,0.0871787043257,0.0865309157523,0.0859598389836,0.0858831271789,0.0861303096608,0.0860791684577,0.0850904385299,0.0853290974779,0.0856615152985,0.0857723212387,0.0849881561235,0.0850392973267,0.0847835913109,0.0848773501833,0.0846045970998,0.0844256028887,0.0846045970998,0.0840335203311,0.0834794906302,0.0833516376223,0.0827720373198,0.0827123725828,0.0821327722802,0.0817747838581,0.0810332364122,0.0809394775398,0.0802746418986,0.0801467888907,0.0797717534009,0.0793455767078,0.0794904767835,0.0792262472338,0.079277388437,0.0784420821186,0.0781181878319,0.0774107345215,0.0775130169278,0.0769930813623,0.0764816693307,0.0764816693307,0.076404957526,0.0757997866219,0.0751690451162,0.0748792449649,0.0744530682719,0.0738393738339,0.073592191352,0.0737797090969,0.0736603796229,0.0738138032323,0.0730296381172,0.0728421203722,0.0728506439061,0.0728932615754,0.0729529263124,0.0733791030055,0.0729955439817,0.0722113788666,0.0721431905957,0.0713078842773,0.0711800312694,0.070839089915,0.0704384838236,0.0703788190865,0.0700208306644,0.0696628422423,0.0694838480312,0.0693559950233,0.0688531065255,0.0684013592309,0.068273506223,0.0682479356214,0.0681627002828,0.0674552469724,0.0674978646417,0.067659811785,0.067480817574,0.0671398762195,0.0671569232873,0.0672251115581,0.0669523584746,0.0667563171958,0.0665858465186,0.0666625583233,0.0664665170446,0.0658613461405,0.0652050340332,0.0648981868142,0.064608386663,0.0645061042566,0.064847045611,0.064361204181,0.0642589217747,0.0640202628266,0.0639094568864,0.0634406625241,0.0633980448548,0.0636793214722,0.0635599919981,0.0629377740263,0.0627587798152,0.0630911976358,0.0629718681617,0.0635003272611,0.0631508623728,0.0631082447035,0.0628013974845,0.0629462975601,0.0626905915443,0.0629718681617,0.0624348855285,0.0621877030466,0.0617700498874,0.0607813199596,0.0605341374776,0.0607216552225,0.0609006494336,0.0602528608602,0.06014205492,0.0595027898805,0.0598522547688,0.0599971548444,0.0603466197327,0.0603551432665,0.060022725446,0.0600994372507,0.0599715842428,0.0601250078523,0.0601505784539,0.0604403786051,0.0596306428884,0.0591277543906,0.0585992952913,0.0586845306299,0.0587782895023,0.0586419129606,0.0582072127337,0.0577639889729,0.0577384183714,0.0576617065666,0.057883318447,0.0579856008533,0.0579088890486,0.0574230476185,0.0569968709255,0.0568264002483,0.0567070707742,0.0566047883679,0.0562894176151,0.0564598882923,0.0560848528024,0.0557012937787,0.0559314291929,0.0563064646828,0.0565621706986,0.0560763292685,0.0560337115992,0.0558547173882,0.0556331055078,0.0550875993407,0.0556331055078,0.0556075349062,0.0554200171613,0.0549938404683,0.0552239758825,0.0553603524243,0.0549682698667,0.0548318933249,0.0550535052053,0.0554029700936,0.0548659874603,0.0543460518949,0.0545079990382,0.0548659874603,0.0546614226477,0.0544994755043,0.0550620287391,0.0555990113724,0.0554541112967,0.055010887536,0.0546614226477,0.0550790758069,0.0548659874603,0.0544398107673,0.0539880634727,0.0540818223452,0.0536556456521,0.0531953748237,0.053178327756,0.0536385985844,0.0540392046759,0.0539198752018,0.0534851749749,0.0533147042977,0.0535363161781,0.0534936985088,0.0537323574569,0.0538431633971,0.0540051105404,0.0532891336961,0.0530334276803,0.0532209454253,0.0529993335449,0.0532806101623,0.0533487984332,0.0533743690348,0.0532038983575,0.0531868512898,0.0530249041465,0.0532550395607,0.053178327756,0.052624298055,0.0522918802345,0.05195093888,0.0519935565493,0.0517037563981,0.0517378505335,0.0515418092547,0.0510900619601,0.0506638852671,0.0506297911317,0.0511838208326,0.0519083212107,0.0520873154218,0.0519594624139,0.0521640272266,0.0523004037683,0.052445303844,0.0530760453496,0.0533914161025,0.0534084631702,0.0529226217401,0.0530078570787,0.0531868512898,0.0533317513654,0.05329765723,0.0529055746724,0.0531868512898,0.0529822864772,0.0534255102379,0.0534681279072,0.05329765723,0.0530078570787,0.0529652394094,0.0525731568519,0.0529567158756,0.0533743690348,0.0530760453496,0.052871480537,0.0525987274534,0.0527010098598,0.0532550395607,0.0534340337718,0.0538090692616,0.0540562517436,0.0535277926442,0.0535618867797,0.0536215515167,0.0536215515167,0.0537153103892,0.0539624928711,0.0538602104648,0.0537920221939,0.0536471221183,0.0532720866284,0.0533828925686,0.0532720866284,0.0533914161025,0.0534169867041,0.053357321967,0.0533999396363,0.0537067868553,0.0537408809908,0.0534510808395,0.0541670576838,0.0542863871578,0.0542096753531,0.053664169186,0.0541755812176,0.0539283987357,0.0535789338474,0.0533658455009,0.0530504747481,0.0535533632458,0.0530760453496,0.0531698042221,0.0538175927955,0.0542693400901,0.0542693400901,0.0540392046759,0.0545761873091,0.0545932343768,0.05513021701,0.0549086051297,0.0554541112967,0.0554882054322,0.0554882054322,0.055437064229,0.055437064229,0.0563746529537,0.0563661294198,0.0564598882923,0.0563576058859,0.0562638470135,0.0558291467866,0.0560081409977,0.0558547173882,0.0558888115236,0.0558291467866,0.0557780055834,0.055684246711,0.0556501525755,0.0558120997189,0.0561871352087,0.056170088141,0.056417270623,0.056170088141,0.0561786116749,0.0562723705473,0.0562041822765,0.056110423404,0.0561274704717,0.0560251880654,0.0556586761094,0.0563746529537,0.0563831764875,0.0564598882923,0.0567923061128,0.0568264002483,0.0564343176907,0.0565451236309,0.0568264002483,0.0575338535587,0.057695800702,0.0573889534831,0.056903112053,0.0572270063397,0.0571332474673,0.0568519708499,0.0574315711524,0.0578151301761,0.0577384183714,0.0573974770169,0.0577384183714,0.0580111714549,0.0579856008533,0.057636135965,0.0582327833353,0.0584288246141,0.0588209071716,0.0588464777732,0.0586930541637,0.0586078188251,0.0583521128093,0.0580452655903,0.0584203010802,0.0590936602552,0.0588720483748,0.0594942663466,0.0595027898805,0.0591107073229,0.0594175545419,0.0592811780001,0.0594857428128,0.0599801077767,0.0600994372507,0.059775542964,0.0588379542394,0.0583180186739,0.0579941243872,0.0584117775463,0.0582072127337,0.0582668774707,0.0580793597258,0.0575935182957,0.0575679476941,0.0579003655147,0.0584373481479,0.0589061425102,0.0585992952913,0.0580367420565,0.0586248658928,0.0592811780001,0.0591959426615,0.0595624546175,0.0596221193545,0.0598266841672,0.0599971548444,0.059775542964,0.0604148080036,0.0606193728162,0.0600142019121,0.0597925900317,0.0605938022146,0.0605852786808,0.0607301787564,0.0609262200352,0.0611393083817,0.061122261314,0.0605000433422,0.0606108492824,0.0614802497361,0.0616336733456,0.0613864908637,0.0609688377045,0.0612927319912,0.061062596577,0.0612671613896,0.0614035379314,0.0616592439472,0.0617700498874,0.0609262200352,0.0606619904855,0.0607046081548,0.0616933380826,0.0615825321425,0.0612245437203,0.0607301787564,0.0605682316131,0.0606108492824,0.0609944083061,0.0614546791346,0.0614717262023,0.0612842084573,0.0609858847722,0.0602869549957,0.0604829962744,0.0607301787564,0.0607983670273,0.0613353496605,0.0610029318399,0.060815414095,0.0612330672542,0.0614632026684,0.0611989731187,0.0612842084573,0.0612927319912,0.061429108533,0.0617359557519,0.0615058203377,0.061429108533,0.0617870969551,0.061855285226,0.0618041440228,0.0615313909393,0.0615910556763,0.0614802497361,0.0615228674054,0.060755749358,0.0605682316131,0.0612756849235,0.0606193728162,0.0602528608602,0.0599460136412,0.0603636668004,0.0607301787564,0.0609176965013,0.0606449434178,0.0613694437959,0.0615825321425,0.0611393083817,0.0617785734213,0.062341126656,0.062468979664,0.0620257559032,0.0620939441741,0.0617189086842,0.0619490440985,0.0620683735725,0.0623496501899,0.0624775031978,0.0625456914687,0.061914949963,0.0620939441741,0.0624860267317,0.0624519325962,0.0624860267317,0.0627502562814,0.062528644401,0.0618723322937,0.0618041440228,0.062162132445,0.0621365618434,0.0618808558276,0.0618723322937,0.0618979028953,0.0620768971064,0.0624519325962,0.0624434090624,0.0627246856798,0.062528644401,0.0621195147757,0.062281461919,0.0625797856041,0.0626053562057,0.0628440151538,0.0626053562057,0.0620598500386,0.0620768971064,0.0622644148513,0.0631338153051,0.0628525386877,0.0629633446279,0.0631593859067,0.0630400564326,0.0626820680105,0.0629036798908,0.0627673033491,0.063014485831,0.0629462975601,0.0626309268073,0.0623070325206,0.0620257559032,0.0623581737238,0.0627758268829,0.0630997211696,0.0632787153807,0.0636963685399,0.0636537508706,0.0635003272611,0.0631764329744,0.0640287863604,0.0641651629022,0.06332133305,0.0630826741019,0.0630826741019,0.062588309138,0.0624434090624,0.0618638087599,0.0618297146244,0.0617785734213,0.0618126675567,0.0620854206402,0.0623752207915,0.0622644148513,0.0619916617678,0.0622303207159,0.061855285226,0.0624434090624,0.0625030737994,0.0621450853773,0.0612671613896,0.0609688377045,0.0609262200352,0.0606705140194,0.0605426610115,0.0605938022146,0.0607301787564,0.0602699079279,0.06014205492,0.0606449434178,0.0610285024415,0.0606790375532,0.0605256139438,0.0605597080792,0.0607727964257,0.0610455495092,0.0610540730431,0.0613523967282,0.0552836406195,0.0489336078934,0.04278813998,0.0369836134209,0.0)
m <- c(0.0342487615573,0.0398356232681,0.0460634582605,0.0518582031977,0.0575923155272,0.0579561111735,0.0580600527867,0.0582592742121,0.058588422654,0.0588829238914,0.059012850908,0.0591514397256,0.0587443350738,0.0588656002892,0.0586577170628,0.0580946999912,0.0584584956374,0.0588569384881,0.058423848433,0.0589608801014,0.0590041891069,0.0591947487311,0.059523897173,0.0594026319576,0.0597317803994,0.0601128996479,0.0598443838138,0.059272704941,0.0595585443774,0.0589089092947,0.0589262328969,0.0591341161234,0.0587183496705,0.0586230698584,0.0587963058804,0.0590821453168,0.0594026319576,0.0592553813388,0.0590821453168,0.0594979117697,0.059861707416,0.0596538241895,0.060121561449,0.0604420480898,0.0602255030622,0.059948325427,0.0601562086534,0.0604766952942,0.0607452111284,0.0606152841118,0.0600522670402,0.0601908558578,0.0602255030622,0.0604507098909,0.060459371692,0.0606585931174,0.0604074008854,0.0605113424986,0.0603034592722,0.0606499313162,0.0611176685758,0.0612389337912,0.0606759167196,0.060459371692,0.0605546515041,0.0606759167196,0.0610137269625,0.0609790797581,0.0612735809956,0.0608404909405,0.0609011235482,0.0612562573934,0.0616720238463,0.0621744083102,0.062494894951,0.0628846760006,0.0627201017796,0.063005941216,0.0628586905973,0.0628153815917,0.0628760141995,0.0625382039565,0.0623996151389,0.0620184958904,0.0614554788187,0.0609097853493,0.0609271089515,0.0605892987085,0.0604333862887,0.0605633133052,0.0601735322556,0.0600002962336,0.0605286661008,0.0605892987085,0.0609444325537,0.0610050651614,0.0609877415592,0.0614901260231,0.0618712452716,0.0623389825311,0.0626508073708,0.062754748984,0.0621744083102,0.061905892476,0.0625295421554,0.0627634107851,0.0627634107851,0.0619232160782,0.0620964521003,0.0612042865868,0.0611176685758,0.0612909045978,0.0612995663989,0.0612995663989,0.0607798583328,0.0605719751063,0.0608145055372,0.0612389337912,0.0611523157802,0.0614121698132,0.061559420432,0.0610743595702,0.0613342136033,0.0619751868849,0.062243702719,0.0624689095477,0.0620531430948,0.0620877902992,0.0618279362661,0.0617586418573,0.0616633620452,0.0620271576915,0.0626074983653,0.0625728511609,0.0621051139014,0.0616373766419,0.0619925104871,0.0614294934154,0.0612649191945,0.0615854058353,0.061057035968,0.0610916831725,0.0602601502667,0.0596278387862,0.0598183984105,0.0604247244876,0.0606412695151,0.0608318291394,0.0613255518022,0.0617153328518,0.0617239946529,0.0614901260231,0.0613515372055,0.0612389337912,0.061394846211,0.0608058437361,0.0605113424986,0.0607711965317,0.0603900772832,0.0598703692171,0.0604766952942,0.0610050651614,0.0610223887636,0.0614294934154,0.0612735809956,0.0609011235482,0.060710563924,0.0604420480898,0.0603814154821,0.0599916344325,0.0598357220127,0.059272704941,0.0593939701565,0.0594459409631,0.0594112937587,0.0602601502667,0.0603121210733,0.0607798583328,0.0609530943548,0.0608318291394,0.0606412695151,0.0604766952942,0.0605806369074,0.0601302232501,0.0598530456149,0.0595152353719,0.0596711477917,0.0594632645653,0.0593679847532,0.0598010748083,0.0599656490292,0.0602514884656,0.0599743108303,0.0601995176589,0.0600522670402,0.0600002962336,0.0599916344325,0.0606672549185,0.0604247244876,0.0607192257251,0.0605633133052,0.0608318291394,0.0610743595702,0.0606932403218,0.0610050651614,0.0608578145427,0.0599310018248,0.0589002474936,0.0589435564992,0.0589608801014,0.0588309530848,0.0582159652066,0.0582419506099,0.0581120235934,0.0578781549636,0.0579214639691,0.058501804643,0.0588656002892,0.0592207341344,0.0590648217146,0.0591601015267,0.0595931915818,0.0593333375487,0.059523897173,0.0599569872281,0.0597231185983,0.0596191769851,0.059437279162,0.0589608801014,0.0584498338363,0.0582073034055,0.0573064760909,0.0571852108754,0.057150563671,0.0566221938038,0.0568127534281,0.0568733860358,0.0569340186435,0.0571765490743,0.0572978142898,0.0569600040468,0.0580513909856,0.0587443350738,0.0589782037036,0.059272704941,0.059437279162,0.0591947487311,0.0592640431399,0.0587703204771,0.0590215127091,0.0594459409631,0.058761658676,0.0581293471956,0.0583545540242,0.0583545540242,0.0579301257702,0.0577049189416,0.0575576683228,0.0575923155272,0.0569080332402,0.0565875465994,0.0568127534281,0.0567954298259,0.0564922667873,0.056639517406,0.056977327649,0.0573757704997,0.0570466220578,0.0573671086986,0.0574797121129,0.0577049189416,0.0570119748534,0.0569686658479,0.0572458434832,0.0570292984556,0.0572111962788,0.0571245782677,0.0573671086986,0.0571592254721,0.0572978142898,0.0571592254721,0.0577309043449,0.0574710503118,0.0570292984556,0.0566914882126,0.0560072059256,0.056128471141,0.0561024857377,0.0560851621355,0.0556434102793,0.0557993226991,0.0557560136936,0.0559379115168,0.0556520720804,0.0561111475388,0.0566914882126,0.0563536779697,0.0563363543674,0.0563276925663,0.0569859894501,0.0570033130523,0.0571245782677,0.0572718288865,0.05706394566,0.0566914882126,0.0558512935057,0.0560851621355,0.0557386900914,0.0557300282903,0.0555394686661,0.0555914394727,0.0554788360584,0.0553922180473,0.0556001012738,0.0550457460033,0.055530806865,0.0551583494176,0.0552882764341,0.0551583494176,0.0550717314066,0.0548118773735,0.0545953323459,0.0547772301691,0.0552103202242,0.0557993226991,0.0554355270528,0.0555481304672,0.0556001012738,0.0551756730198,0.0548118773735,0.0547165975614,0.0546299795504,0.0545693469426,0.0542142130975,0.0535732398159,0.0536945050313,0.0531834587663,0.053322047584,0.0537811230424,0.0537551376391,0.0538937264567,0.0536338724236,0.0531747969652,0.0528802957277,0.0534692982027,0.0537811230424,0.0545087143349,0.0544134345228,0.0546213177493,0.0550197605999,0.0550457460033,0.0551496876165,0.0552709528319,0.0559032643123,0.055530806865,0.0553229236385,0.0549331425889,0.0544480817272,0.0542488603019,0.0541449186886,0.0542488603019,0.0547425829647,0.0546213177493,0.0544827289316,0.0546473031526,0.0543701255173,0.0548465245779,0.0553835562462,0.0556693956826,0.0557819990969,0.0561457947432,0.0558599553068,0.0560851621355,0.055790660898,0.0558079845002,0.0559379115168,0.0555048214617,0.0557819990969,0.0553922180473,0.0551496876165,0.054517376136,0.0542228748986,0.0543614637162,0.0549851133955,0.0550890550088,0.0551496876165,0.0554788360584,0.0552622910308,0.0553922180473,0.0554008798484,0.0552622910308,0.0555654540694,0.0554961596606,0.0549851133955,0.0548205391746,0.0545953323459,0.054681950357,0.0541102714842,0.0543787873184,0.0545606851415,0.0549071571856,0.0548465245779,0.0550457460033,0.0550977168099,0.055366232644,0.0560765003344,0.0558079845002,0.056639517406,0.0565269139917,0.0567174736159,0.0571419018699,0.0577655515493,0.057315137892,0.0575836537261,0.0576789335383,0.0575663301239,0.057826184157,0.0578175223559,0.0580080819801,0.0582073034055,0.0577828751515,0.0577828751515,0.0582592742121,0.0583199068198,0.0585537754496,0.0587096878694,0.0591427779245,0.0592467195377,0.05918608693,0.0589002474936,0.0589955273058,0.0587183496705,0.0588049676815,0.0588136294826,0.0587963058804,0.0591427779245,0.0588742620903,0.0585364518474,0.0585364518474,0.0586923642672,0.0586230698584,0.0590301745102,0.05918608693,0.059359322952,0.0597491040016,0.0596365005873,0.0597231185983,0.0600089580347,0.060883799946,0.0610830213713,0.0616980092496,0.0617673036584,0.0619751868849,0.0619751868849,0.0618106126639,0.0618712452716,0.0624515859455,0.062668130973,0.0622090555146,0.0625641893598,0.0622610263212,0.0623389825311,0.0616547002441,0.0621484229069,0.0624256005422,0.0626248219675,0.0627201017796,0.0632744570502,0.0633783986634,0.0637335325086,0.0641146517571,0.0646863306298,0.0655005399334,0.0655438489389,0.0655005399334,0.0657170849609,0.0654745545301,0.0652406859003,0.0659856007951,0.0656304669499,0.0659163063863,0.0656564523532,0.0659856007951,0.0661415132149,0.066150175016,0.0661068660105,0.0669297371152,0.0673281799659,0.066912413513,0.0676659902089,0.067934506043,0.0679258442419,0.0680297858552,0.0680730948607,0.0679778150485,0.0675447249934,0.0676486666067,0.0678738734353,0.0680211240541,0.0680297858552,0.0683156252915,0.0684195669047,0.0683416106948,0.0686880827389,0.0693983504293,0.0704291047604,0.0701865743296,0.0700739709152,0.0702731923406,0.0704031193571,0.0704464283626,0.0712346522629,0.071667742318,0.0720488615665,0.0724386426161,0.0721701267819,0.0723693482073,0.0729496888811,0.0733481317318,0.073538691356,0.0738418543946,0.0738245307924,0.0742229736431,0.0741536792343,0.0739717814111,0.0744048714662,0.0744048714662,0.0744481804717,0.0748726087257,0.0750458447478,0.0753143605819,0.0754356257974,0.0754529493996,0.0761805406921,0.0766049689461,0.0774711490563,0.0777050176861,0.0777050176861,0.0772372804266,0.077523119863,0.0775750906696,0.0785365505919,0.0793507598955,0.0794113925032,0.0800090567792,0.0798444825583,0.0806846772652,0.0807799570773,0.0813776213533,0.0815508573754,0.0815941663809,0.0819059912206,0.0816547989886,0.0815855045798,0.0816721225908,0.0820792272426,0.082200492458,0.0834651154189,0.0839155290762,0.0846777675732,0.0853533880592,0.0853880352636,0.0861935827661,0.0869471594619,0.0876834125556,0.0880385464008,0.0884283274504,0.0883590330416,0.0887574758923,0.0885755780691,0.0886102252735,0.0883503712405,0.0889740209198,0.0890259917264,0.0888614175055,0.0896496414058,0.0900220988532,0.0905418069193,0.0911481329964,0.0918497388857,0.0926466245871,0.0928631696146,0.0928285224102,0.0930797146422,0.0942230723876,0.0941018071722,0.0935041428962,0.0937033643215,0.0939892037579,0.0943529994042,0.0946475006416,0.0951152379011,0.0959294472047,0.096293242851,0.096120006829,0.0968389363204,0.0981382064857,0.09832876611,0.0986579145519,0.0990736810047,0.0994028294466,0.101039909855,0.101923413567,0.102564386849,0.103352610749,0.103846333412,0.105292854196,0.106271637721,0.107718158505,0.108532367808,0.109502489532,0.1100395212,0.110169448216,0.111425409376,0.112655385133,0.112975871773,0.112456163707,0.112707355939,0.112568767122,0.113201078602,0.11412789132,0.114162538524,0.114543657773,0.114457039762,0.114119229519,0.115678353717,0.116518548424,0.117549302755,0.118406821064,0.118813925716,0.119385604589,0.120156504887,0.121152612014,0.121680981881,0.121914850511,0.12151640766,0.121854217903,0.121975483118,0.122053439328,0.12246054398,0.122200689947,0.12159436387,0.121065994003,0.121395142445,0.121559716666,0.12151640766,0.121932174113,0.122235337152,0.12253850019,0.122729059814,0.122893634035,0.123820446753,0.124452758234,0.124418111029,0.125249643935,0.125734704797,0.1265489141,0.127085945769,0.127380447006,0.127700933647,0.128463172144,0.128852953193,0.129632515293,0.130576651613,0.130749887635,0.131382199115,0.131174315889,0.131997186993,0.132317673634,0.13307125033,0.133123221137,0.133642929203,0.133798841623,0.134431153103,0.134751639744,0.134855581357,0.134604389125,0.134613050926,0.135522540042,0.135392613025,0.13668322139,0.137107649644,0.136986384428,0.136960399025,0.137930520748,0.138865995267,0.140364486858,0.139706189974,0.140139280029,0.140762929709,0.14061567909,0.141273975974,0.142451980924,0.143222881222,0.143456749851,0.144452856978,0.144357577166,0.144911932437,0.14517178647,0.14564818553,0.146332467817,0.14651436564,0.145830083353,0.146782881475,0.14737188395,0.147319913143,0.148506579894,0.149450716214,0.149450716214,0.149580643231,0.14973655565,0.149753879253,0.150871251595,0.149649937639,0.149727893849,0.149303465595,0.149017626159,0.149632614037,0.150247601915,0.150273587319,0.150031056888,0.150576750357,0.15051611775,0.151633490092,0.151867358721,0.152750862434,0.153331203108,0.153998161793,0.153998161793,0.154656458676,0.155496653383,0.1556265804,0.156198259272,0.156830570753,0.157973928498,0.158294415139,0.158190473526,0.158251106134,0.159125948045,0.159385802078,0.158814123205,0.159264536863,0.159619670708,0.159541714498,0.1595590381,0.15971495052,0.160936264475,0.160555145227,0.16050317442,0.161404001735,0.162252858243,0.161707164773,0.161915048,0.162140254828,0.161975680608,0.162633977491,0.162235534641,0.162893831524,0.162746580906,0.163006434939,0.163214318165,0.163933247657,0.163985218463,0.164487602927,0.164565559137,0.164071836474,0.163976556662,0.164089160076,0.164158454485,0.163136361955,0.163474172198,0.164357675911,0.165041958198,0.164470279325,0.164764780562,0.164556897336,0.16356945201,0.162408770663,0.16199300421,0.161300060122,0.160754366652,0.159628332509,0.15751485304,0.15688254156,0.155531300588,0.154543855262,0.154907650908,0.155436020776,0.156042346853,0.156631349328,0.155617918599,0.154361957439,0.154301324831,0.154249354025,0.153625704345,0.153720984157,0.153010716467,0.152534317406,0.151529548478,0.151261032644,0.151269694445,0.150975193208,0.150957869606,0.150117674899,0.149857820866,0.148489256292,0.148134122447,0.147856944811,0.146401762226,0.144894608834,0.144002443321,0.143898501708,0.143101616006,0.142885070979,0.142547260736,0.142460642725,0.141862978449,0.140710958902,0.140563708283,0.140953489333,0.14140390299,0.140719620703,0.140840885919,0.140485752073,0.139723513576,0.13967154277,0.139299085322,0.139316408925,0.139039231289,0.13849353782,0.137012369832,0.137220253058,0.136691883191,0.135635143456,0.135600496252,0.135236700606,0.134578403722,0.133686238208,0.132932661512,0.133244486352,0.133703561811,0.133590958396,0.133131882938,0.133097235733,0.132707454684,0.132664145678,0.132525556861,0.132880690706,0.133738209015,0.133131882938,0.132135775811,0.130490033602,0.130256164972,0.12984906032,0.129519911878,0.129268719646,0.129208087039,0.127995434884,0.126462296089,0.125223658532,0.124825215681,0.125769352001,0.124937819095,0.124833877482,0.124478743637,0.123335385891,0.122893634035,0.12269441261,0.122365264168,0.121862879704,0.120996699594,0.119099765153,0.11900448534,0.118614704291,0.117679229772,0.116839035065,0.115886236944,0.115141322049,0.114509010569,0.114379083552,0.114734217397,0.114638937585,0.11349557984,0.112819959354,0.112343560293,0.111919132039,0.111468718382,0.111156893542,0.111122246338,0.110420640448,0.110204095421,0.110611200073,0.110619861874,0.1100395212,0.109467842327,0.109277282703,0.108618985819,0.107960688935,0.106730713179,0.105613340837,0.10390696602,0.102668328462,0.10210531139,0.101100542463,0.100398936573,0.0993681822422,0.0985279875353,0.0979389850604,0.0974712478009,0.0975232186075,0.0967523183094,0.0960940214257,0.0952105177133,0.0947254568515,0.0943443376031,0.0938766003435,0.093408863084,0.0930710528411,0.0930277438355,0.0921615637253,0.0921962109298,0.0919969895044,0.0919363568967,0.0918064298802,0.0914166488306,0.0910701767865,0.0912347510074,0.0908103227534,0.0904811743116,0.0903339236928,0.0899008336377,0.088904726511,0.0885755780691,0.0879259429865,0.0878220013732,0.0871030718818,0.0864014659925,0.0855352858823,0.0854746532746,0.0851541666338,0.0851888138382,0.0855872566889,0.0850155778162,0.0854746532746,0.085336064457,0.0859423905341,0.0862802007771,0.0866353346223,0.0857864781143,0.0857691545121,0.0852234610426,0.0854573296724,0.085258108247,0.0844438989435,0.0840541178939,0.0834477918167,0.0826595679164,0.0823910520823,0.0825902735076,0.0822871104691,0.0817674024029,0.0807626334751,0.0801129983925,0.0801649691991,0.0797751881495,0.0796712465363,0.0794027307021,0.0792987890889,0.0790649204591,0.0787097866139,0.0790389350558,0.0785105651886,0.0785798595974,0.0779995189236,0.0779908571225,0.0774278400508,0.0775144580619,0.0774798108574,0.0771939714211,0.076249835101,0.0757994214437,0.0759206866591,0.0756694944271,0.0763277913109,0.0759553338635,0.0763797621175,0.0761545552888,0.0756348472227,0.0753576695875,0.0757301270348,0.0760159664712,0.0754442875985,0.0752537279742,0.0742229736431,0.074387547864,0.073876501599,0.0738418543946,0.0735560149582,0.0731835575109,0.0733394699307,0.0724732898205,0.0727937764613,0.0732182047153,0.0730016596877,0.0725079370249,0.0720748469698,0.071754360329,0.070992121832,0.0708621948155,0.0707755768045,0.0711913432574,0.0711740196552,0.0705763553791,0.0700393237108,0.0698401022855,0.0699960147053,0.0695715864513,0.0699353820976,0.0696495426612,0.0691731436006,0.0690605401863,0.0681077420651,0.0683502724959,0.0685668175235,0.0684975231147,0.0677179610155,0.0679604914463,0.0678565498331,0.0681337274684,0.0682809780871,0.0675187395901,0.0679778150485,0.0673195181648,0.067336841767,0.0667998100987,0.066999031524,0.0664793234579,0.0665053088612,0.0667045302866,0.0665139706623,0.0666179122755,0.0662194694248,0.066063557005,0.0660895424083,0.0664706616568,0.0667218538888,0.0667565010932,0.0667651628943,0.0657690557675,0.0647383014364,0.0646863306298,0.0645304182099,0.0643052113813,0.0640453573482,0.0636555762986,0.063603605492,0.0630319266193,0.0621224375036,0.0617153328518,0.0621744083102,0.0615767440342,0.061394846211,0.0614208316143,0.0609530943548,0.0605633133052,0.0601995176589,0.059948325427,0.0595325589741,0.0598876928193,0.0598097366094,0.0604333862887,0.0605892987085,0.0602341648634,0.0600089580347,0.0602341648634,0.0600869142446,0.0601302232501,0.0611176685758,0.0611523157802,0.0607885201339,0.0600695906424,0.0596711477917,0.0595152353719,0.0599656490292,0.0597924130071,0.0599656490292,0.0601128996479,0.0592207341344,0.0587789822782,0.0591514397256,0.0591254543223,0.0592986903443,0.059359322952,0.0589089092947,0.0592900285432,0.0591774251289,0.0591514397256,0.0595672061785,0.0596538241895,0.0597577658027,0.0599569872281,0.0597924130071,0.0597577658027,0.0599569872281,0.0590561599135,0.0583805394275,0.0581120235934,0.0588656002892,0.058675040665,0.0579214639691,0.057150563671,0.0567607826214,0.0567088118148,0.0563276925663,0.0569513422457,0.0576702717372,0.0579387875713,0.0572458434832,0.0576702717372,0.0581639944,0.0582765978143,0.0590474981124,0.0593246757476,0.0597057949961,0.0592293959355,0.0582852596154,0.0579474493724,0.0580340673834,0.0578781549636,0.0576702717372,0.0581986416044,0.0576875953394,0.0574970357151,0.056977327649,0.0569166950413,0.0573324614942,0.057401755903,0.0570119748534,0.0569513422457,0.0568647242347,0.0567954298259,0.0569426804446,0.0566828264115,0.0570899310633,0.0576183009305,0.0573497850964,0.0574450649085,0.0572718288865,0.0576183009305,0.0578001987537,0.057574991925,0.0575230211184,0.0575143593173,0.056977327649,0.0567521208203,0.0573671086986,0.0575056975162,0.0580080819801,0.0574710503118,0.057574991925,0.0579041403669,0.0578781549636,0.0575836537261,0.0583718776264,0.0579647729746,0.0576269627316,0.057574991925,0.0572891524887,0.0570033130523,0.0564836049862,0.0558339699035,0.0559379115168,0.0560505149311,0.0558859407101,0.0563363543674,0.0564229723785,0.0560678385333,0.0558599553068,0.0561891037487,0.0563190307652,0.0562237509531,0.0557733372958,0.055877278909,0.0552709528319,0.054855186379,0.0547339211636,0.0550544078044,0.0551410258154,0.0556260866771,0.0554441888539,0.0559465733179,0.0564056487763,0.056726135417,0.0571159164666,0.0574537267096,0.0577222425438,0.0578954785658,0.0578521695603,0.0571592254721,0.0578175223559,0.0581466707978,0.0578521695603,0.0570812692622,0.0568647242347,0.0568733860358,0.056804091627,0.0508101252644,0.0452492489569,0.0398182996659,0.0337637006956,0.0)
ycorr <- c(0.00012424329873,0.000124146319408,0.000123857069272,0.000123367619537,0.00012267373469,0.00012177782474,0.000120681893833,0.000119575672589,0.000118467824424,0.000117352138553,0.00011622482032,0.000115077497235,0.000113908732777,0.000112719417053,0.000111511418071,0.000110284913585,0.000109039073406,0.000107780897983,0.000106512875959,0.000105233242693,0.000103946180285,0.000102654164679,0.000101360068459,0.000100064779212,9.87677059707e-05,9.74746213608e-05,9.61886642439e-05,9.49068686093e-05,9.3624428787e-05,9.2341043378e-05,9.10541348938e-05,8.9765466982e-05,8.84744595285e-05,8.71815260941e-05,8.58877435881e-05,8.45855998393e-05,8.32681870224e-05,8.19341099393e-05,8.05819061514e-05,7.92149303901e-05,7.78314398711e-05,7.64336558388e-05,7.50233458848e-05,7.35994639191e-05,7.21598446761e-05,7.07050170937e-05,6.9237911094e-05,6.77604935893e-05,6.62737634304e-05,6.47776080656e-05,6.32729824106e-05,6.17564417202e-05,6.02266885299e-05,5.86814515575e-05,5.71223482653e-05,5.55523802132e-05,5.39711362747e-05,5.2378125551e-05,5.07744523674e-05,4.91594932909e-05,4.75370545712e-05,4.59020323837e-05,4.4253937949e-05,4.25939083627e-05,4.09213370783e-05,3.92341037359e-05,3.75352996912e-05,3.5826282149e-05,3.4103571474e-05,3.2362957917e-05,3.06008554046e-05,2.8825423063e-05,2.70378432406e-05,2.52411378426e-05,2.34336960831e-05,2.16164658289e-05,1.97834093945e-05,1.79302400977e-05,1.60606181418e-05,1.41774531836e-05,1.22848228392e-05,1.03852811957e-05,8.47299368486e-06,6.54818263992e-06,4.61052446255e-06,2.66047249458e-06,7.06357246694e-07,-1.25269631402e-06,-3.21782978102e-06,-5.18809569987e-06,-7.16287138528e-06,-9.14606997135e-06,-1.11381067949e-05,-1.31414451234e-05,-1.51549459853e-05,-1.71765597352e-05,-1.9212149129e-05,-2.12583438199e-05,-2.33110629911e-05,-2.53684079065e-05,-2.74366791874e-05,-2.95146346399e-05,-3.16003064874e-05,-3.36915261768e-05,-3.57856456713e-05,-3.78862538054e-05,-3.99936807921e-05,-4.21083474344e-05,-4.42378904877e-05,-4.63822895653e-05,-4.85429980543e-05,-5.07218082909e-05,-5.29119095521e-05,-5.51149087202e-05,-5.73348280798e-05,-5.9570586656e-05,-6.18190177908e-05,-6.40826647755e-05,-6.63596032983e-05,-6.86527717579e-05,-7.09579120857e-05,-7.32739296105e-05,-7.56025810562e-05,-7.79443400782e-05,-8.0293075297e-05,-8.2652527511e-05,-8.50263330007e-05,-8.74123142615e-05,-8.98067980054e-05,-9.22027868667e-05,-9.46039049182e-05,-9.7004818032e-05,-9.94058838835e-05,-0.000101811331246,-0.00010422763457,-0.000106651327895,-0.000109077625995,-0.000111506196689,-0.000113939629373,-0.000116383055935,-0.000118835180618,-0.000121296585124,-0.000123773107275,-0.000126264121213,-0.000128763137085,-0.00013127112382,-0.000133792445498,-0.000136327960478,-0.000138875500911,-0.000141431973421,-0.00014399232188,-0.000146562553259,-0.000149136687213,-0.000151711423845,-0.000154288246008,-0.000156868590153,-0.000159450320085,-0.000162028781625,-0.000164602035521,-0.000167169208306,-0.000169728791116,-0.000172274479558,-0.000174804168732,-0.000177315329395,-0.000179810125058,-0.000182283266135,-0.000184724341115,-0.000187134538023,-0.000189518070211,-0.000191872410161,-0.000194205922355,-0.000196528576909,-0.000198849815004,-0.000201171401218,-0.000203490128668,-0.000205801187267,-0.000208110006353,-0.000210423607568,-0.000212736593479,-0.000215058363831,-0.00021738601196,-0.000219710805656,-0.000222025370585,-0.000224324969462,-0.000226606909708,-0.000228878725699,-0.000231149012436,-0.000233412803109,-0.000235668867588,-0.000237911080753,-0.000240132154828,-0.000242337722951,-0.000244522931981,-0.000246689613983,-0.000248839796386,-0.000250973421105,-0.00025308690824,-0.000255180252254,-0.000257255350644,-0.000259312461759,-0.000261359695411,-0.000263394414634,-0.000265418377397,-0.000267439071478,-0.000269458632421,-0.000271473931366,-0.000273486807613,-0.000275495504347,-0.000277497060316,-0.000279494599995,-0.000281487949894,-0.000283478140401,-0.000285466340736,-0.000287449861092,-0.000289425270482,-0.000291397089007,-0.000293364815834,-0.000295324985903,-0.000297281128175,-0.000299232813064,-0.000301177493147,-0.000303113797389,-0.000305040315924,-0.000306961302994,-0.000308877994579,-0.000310791743231,-0.000312696439485,-0.000314596970164,-0.000316495493739,-0.000318393346557,-0.000320291910107,-0.000322192927433,-0.000324101826171,-0.000326015275503,-0.000327926615251,-0.000329828803012,-0.000331724692373,-0.000333611755459,-0.000335490339412,-0.000337362116099,-0.000339223725101,-0.000341069596286,-0.000342892949173,-0.000344689519455,-0.000346466013733,-0.00034823337067,-0.000349992177902,-0.000351743291473,-0.000353486800608,-0.000355216876311,-0.00035693472574,-0.000358644351737,-0.00036035207525,-0.000362061234354,-0.0003637691739,-0.000365465794105,-0.000367148640036,-0.000368823044617,-0.000370483968619,-0.000372130903503,-0.000373765070489,-0.000375384076356,-0.000376986187525,-0.000378572542683,-0.000380150158385,-0.000381721978895,-0.000383290217535,-0.000384850031658,-0.000386401243051,-0.000387947582371,-0.000389491183085,-0.000391034147644,-0.000392577775574,-0.000394118119693,-0.000395652127052,-0.000397176963749,-0.000398694723407,-0.000400208012031,-0.000401716625164,-0.000403219872049,-0.000404714697852,-0.000406200681565,-0.000407674322575,-0.000409133820965,-0.000410577552792,-0.000412003584013,-0.000413408638545,-0.000414788717056,-0.00041614509145,-0.000417475574611,-0.000418778952432,-0.000420056051645,-0.00042130542243,-0.000422532532611,-0.000423735100881,-0.00042491864714,-0.000426084961982,-0.000427235467906,-0.000428372352029,-0.00042949631184,-0.000430610539937,-0.000431716956842,-0.000432817707501,-0.000433911220403,-0.000434998450948,-0.000436081252583,-0.000437158699719,-0.000438231625729,-0.000439298713547,-0.000440361013329,-0.000441418775894,-0.000442468786873,-0.000443511594528,-0.000444546041491,-0.000445574138941,-0.000446592895702,-0.000447605074339,-0.000448609288545,-0.000449604812453,-0.000450589496536,-0.000451563200653,-0.000452524472405,-0.000453478389107,-0.000454425219348,-0.000455367161167,-0.00045630535899,-0.00045723697402,-0.000458164190205,-0.00045908946032,-0.000460015297619,-0.000460944429616,-0.000461877531586,-0.000462811998591,-0.000463746052979,-0.000464675203856,-0.000465600858705,-0.000466522433517,-0.00046743801903,-0.000468343337254,-0.000469237684769,-0.000470117458748,-0.000470984636398,-0.000471840013465,-0.000472685015907,-0.000473518321404,-0.000474339838434,-0.000475144585405,-0.000475936276758,-0.000476719950278,-0.000477495189356,-0.000478262703065,-0.000479024168096,-0.000479774211786,-0.000480511630723,-0.000481241936069,-0.000481962713575,-0.000482680431094,-0.000483393777436,-0.000484099821221,-0.000484797426952,-0.000485486549548,-0.000486165689355,-0.000486835469941,-0.00048749446589,-0.00048814216409,-0.000488778733833,-0.000489404629811,-0.000490020516926,-0.000490626315383,-0.000491223393755,-0.000491811220051,-0.000492387316116,-0.00049295410403,-0.000493513724986,-0.000494070599109,-0.000494618204985,-0.000495153012236,-0.000495674747995,-0.000496182212854,-0.000496677081285,-0.000497160832299,-0.000497634772032,-0.000498098750401,-0.000498553916433,-0.000498992756508,-0.000499421256582,-0.000499847933648,-0.000500269444569,-0.000500686894425,-0.000501096692108,-0.000501498594481,-0.000501886387041,-0.000502262284642,-0.000502627080347,-0.000502980048795,-0.000503324249219,-0.000503652408181,-0.000503959959158,-0.000504251109844,-0.000504528402986,-0.000504790955608,-0.000505042505474,-0.000505282622829,-0.000505507999903,-0.000505722402072,-0.000505919536257,-0.000506101965014,-0.000506273677053,-0.000506436734715,-0.000506585542328,-0.000506720426454,-0.000506842853415,-0.000506952833554,-0.000507053271166,-0.000507141589824,-0.000507219422986,-0.000507286414766,-0.000507340904143,-0.000507377616772,-0.000507399704462,-0.000507408504242,-0.000507403940234,-0.0005073877801,-0.000507356228674,-0.000507308793284,-0.00050724682534,-0.000507167407275,-0.000507076532062,-0.000506974509644,-0.000506863603987,-0.000506740643571,-0.000506608654347,-0.000506459396574,-0.000506290041324,-0.00050610316986,-0.000505899315217,-0.000505679824621,-0.000505443684334,-0.000505189934582,-0.000504919214731,-0.00050463028186,-0.000504319583765,-0.000503987522896,-0.00050364079651,-0.000503278124719,-0.000502899212015,-0.000502504426266,-0.000502090696592,-0.000501656677027,-0.000501200712289,-0.000500720539398,-0.000500216386487,-0.000499693976766,-0.000499154085649,-0.000498599493549,-0.000498030722129,-0.000497446346813,-0.00049684569382,-0.000496233188576,-0.000495607109313,-0.000494968738143,-0.00049432312017,-0.000493670410925,-0.000493005940309,-0.000492323984047,-0.000491620585821,-0.000490895267238,-0.000490150834643,-0.000489385785051,-0.000488600887782,-0.000487798560813,-0.000486972413331,-0.000486117236728,-0.000485235137389,-0.000484328798751,-0.000483403472159,-0.000482460488521,-0.000481498152472,-0.000480516261906,-0.000479515585725,-0.000478495606662,-0.000477459839273,-0.000476413037824,-0.000475356632485,-0.000474289242916,-0.000473208878871,-0.000472114967366,-0.000471008435659,-0.000469888296395,-0.000468750367788,-0.000467594781054,-0.00046642474832,-0.000465234199467,-0.000464020851419,-0.000462783353487,-0.00046152042801,-0.000460231437775,-0.000458915021155,-0.000457572759634,-0.000456211938356,-0.000454832136068,-0.000453429128777,-0.000452001293854,-0.00045055223973,-0.000449083075205,-0.00044759926346,-0.000446102288913,-0.000444593626072,-0.000443069294927,-0.000441521498862,-0.000439948717788,-0.000438352033155,-0.000436736286936,-0.000435099816986,-0.000433444789528,-0.000431768447764,-0.000430066031075,-0.000428335314324,-0.000426578883227,-0.000424802870394,-0.000423009996329,-0.000421198066662,-0.000419367329027,-0.000417516005499,-0.000415641738983,-0.000413742270203,-0.000411821164925,-0.000409880151054,-0.000407920674633,-0.000405937651068,-0.000403932104461,-0.000401904488301,-0.000399858169783,-0.000397792740294,-0.000395708514405,-0.000393605407117,-0.000391481724765,-0.000389337173393,-0.000387172238218,-0.000384990864007,-0.000382793159743,-0.000380577880082,-0.000378341825789,-0.000376082976945,-0.000373801596495,-0.000371499109856,-0.000369174951392,-0.000366832527239,-0.000364468256211,-0.000362078088404,-0.000359660373699,-0.000357217099814,-0.000354745960376,-0.000352249636168,-0.000349726636348,-0.000347178285296,-0.000344605771682,-0.000342010677196,-0.000339391877838,-0.000336752841918,-0.000334090710913,-0.000331401877148,-0.00032868802058,-0.000325951828701,-0.000323194413144,-0.000320415034253,-0.000317613659563,-0.000314785865434,-0.000311931685437,-0.000309050623393,-0.000306147267853,-0.000303226713546,-0.000300292863654,-0.000297339900764,-0.000294368158502,-0.000291378510119,-0.000288373022392,-0.000285350806958,-0.000282313805117,-0.000279262591784,-0.000276194036345,-0.000273103661032,-0.000269988666576,-0.000266852406673,-0.000263699132252,-0.000260525108802,-0.000257325813718,-0.000254101131236,-0.000250852578942,-0.000247579842767,-0.000244256842067,-0.000240857129374,-0.000237355422433,-0.000233729101134,-0.000229828507063,-0.000226236767847,-0.000222795412617,-0.000219484242492,-0.000216275194552,-0.000213134387902,-0.000210034780162,-0.000207003473917,-0.000204068485249,-0.000201255661908,-0.000198589618934,-0.000196214642417,-0.000193547848372,-0.000190748817911,-0.000187842567911,-0.000184859725718,-0.000181834094197,-0.00017879112398,-0.000175729100556,-0.000172651194775,-0.000169556951349,-0.000166445772524,-0.00016331707482,-0.000160170256607,-0.000157002793471,-0.000153811598099,-0.000150591863205,-0.00014734573854,-0.000144074992078,-0.00014078049168,-0.000137459860846,-0.000134113369861,-0.000130742662725,-0.000127350935989,-0.000123940320804,-0.000120514246157,-0.000117075977679,-0.000113625393829,-0.000110161015944,-0.000106682798869,-0.000103190353776,-9.9683356253e-05,-9.61598893685e-05,-9.26172999281e-05,-8.90562200525e-05,-8.54746878654e-05,-8.18733067157e-05,-7.82495359563e-05,-7.46058962791e-05,-7.09402022566e-05,-6.72555522665e-05,-6.35550713542e-05,-5.98412670683e-05,-5.61176276602e-05,-5.23857527462e-05,-4.86409706494e-05,-4.48824605565e-05,-4.11123075422e-05,-3.73312882462e-05,-3.35419004227e-05,-2.97417862919e-05,-2.59272170453e-05,-2.20946062593e-05,-1.82433420307e-05,-1.43706754326e-05,-1.04814719271e-05,-6.57827065353e-06,-2.66284048973e-06,1.26847793069e-06,5.2172470292e-06,9.18297344676e-06,1.31629447978e-05,1.71534966286e-05,2.11527667107e-05,2.51649275237e-05,2.91897632825e-05,3.32307324423e-05,3.72887955443e-05,4.13635970696e-05,4.54514232709e-05,4.9549313072e-05,5.36600807433e-05,5.77844335574e-05,6.1924011019e-05,6.6076976253e-05,7.02383098788e-05,7.44072099012e-05,7.85857432922e-05,8.27717807235e-05,8.69658804093e-05,9.11710621746e-05,9.53836289741e-05,9.96001807483e-05,0.000103824307033,0.000108055000362,0.000112294850195,0.000116543620651,0.00012079823138,0.000125054985712,0.0001293175162,0.000133585392538,0.000137861137154,0.000142148611955,0.000146446775299,0.000150746535403,0.000155052362891,0.000159365793888,0.000163685386697,0.000168012257699,0.000172347543138,0.000176685249802,0.000181021742249,0.000185353911409,0.000189681220555,0.000194010438038,0.000198339994986,0.000202663335329,0.000206981795459,0.000211298606775,0.000215613780833,0.000219927252712,0.00022424356565,0.000228564373643,0.000232889573467,0.000237218588612,0.000241548657605,0.000245887256386,0.000250234017711,0.000254584591964,0.000258938174586,0.000263292032547,0.000267647328236,0.00027200359686,0.000276361635418,0.000280721074703,0.000285083020421,0.000289443075442,0.000293800028984,0.000298153355945,0.000302500553786,0.00030684624918,0.000311192127359,0.000315537883596,0.000319879948715,0.00032421418462,0.000328537484415,0.000332848445775,0.000337149860358,0.000341441933042,0.000345729336777,0.000350017974443,0.000354298341814,0.000358568799977,0.000362827818711,0.000367081385034,0.000371333999071,0.000375584756955,0.000379831750722,0.000384074223998,0.000388310166546,0.00039253250428,0.000396740812801,0.000400941803108,0.000405137096824,0.000409323485035,0.000413494199555,0.000417650268248,0.000421794222449,0.000425925385907,0.000430043461015,0.000434145653234,0.000438236076581,0.000442305112709,0.000446349380833,0.000450370794947,0.00045437168109,0.000458352394769,0.000462311337829,0.000466248793636,0.000470165605706,0.000474062260566,0.000477938281479,0.000481793910557,0.000485633274916,0.000489451616703,0.000493246910699,0.000497020548001,0.000500772758302,0.000504499074575,0.00050819586652,0.000511863104272,0.000515502048972,0.000519116199697,0.000522702388246,0.000526262992678,0.000529798040214,0.000533305198561,0.000536782545383,0.00054023610002,0.000543669319798,0.000547085355703,0.000550481437987,0.000553853996132,0.000557202278476,0.000560525347422,0.000563826286304,0.000567110499265,0.000570373280804,0.000573614083154,0.000576825053523,0.000580002557804,0.000583146158404,0.000586258650637,0.000589342862108,0.000592397814992,0.000595425125298,0.000598418640652,0.000601378638112,0.000604307127687,0.000607206319865,0.000610078631294,0.00061292537771,0.00061574375987,0.000618533024315,0.00062129314329,0.00062402325905,0.000626719750626,0.000629384414548,0.000632016692683,0.000634616323673,0.000637181681813,0.000639714632087,0.000642214772082,0.000644680093329,0.000647109095461,0.000649497999439,0.000651849218887,0.000654167563509,0.000656450779281,0.000658697904727,0.000660912648995,0.000663087515945,0.000665223750148,0.000667325172453,0.000669394630596,0.000671433941357,0.00067344651452,0.000675428024328,0.000677376795955,0.000679293669781,0.000681177888867,0.000683030601994,0.000684854254885,0.000686641947662,0.000688391533205,0.000690103231533,0.000691774159795,0.000693402751957,0.000694989358616,0.00069653463688,0.000698034615051,0.000699490312946,0.000700900556541,0.000702269037587,0.000703597232438,0.000704886022923,0.000706131415014,0.000707334754676,0.000708494979074,0.000709615392549,0.000710696348948,0.000711739306465,0.000712742283497,0.000713701416697,0.000714617706561,0.000715488335988,0.000716312820165,0.000717095970374,0.000717837397559,0.000718532704719,0.00071917878564,0.000719776884041,0.00072032887129,0.000720835993634,0.00072129961066,0.000721719073816,0.000722098692431,0.000722433916704,0.00072272564361,0.000722975199592,0.000723185894167,0.000723354878281,0.000723479736537,0.000723560651986,0.000723594163207,0.000723581244878,0.000723521834667,0.000723413379178,0.000723257087737,0.000723049800579,0.000722790953457,0.000722482189853,0.000722127907882,0.000721728881515,0.000721285358633,0.000720798050845,0.000720264337616,0.000719683835049,0.000719056404083,0.000718382857036,0.000717666340428,0.000716907010863,0.000716102491989,0.000715251185578,0.000714350831174,0.00071339820914,0.000712396466645,0.000711347186966,0.000710252961963,0.000709113765217,0.00070792718487,0.000706690661769,0.000705402248291,0.00070406442304,0.000702678685792,0.000701248189605,0.000699772763388,0.000698252877361,0.000696687121276,0.000695073469323,0.000693413149017,0.000691709147281,0.000689960837141,0.000688169252267,0.000686335661103,0.000684458773075,0.000682536701198,0.000680569158806,0.000678555113811,0.000676498076409,0.000674397202927,0.000672255119311,0.000670072123766,0.000667845292663,0.000665571161927,0.000663248275844,0.000660879736561,0.00065846928183,0.00065602108145,0.00065353408433,0.00065100877825,0.000648444502691,0.000645840820725,0.000643198722238,0.000640527271986,0.000637830981821,0.000635107406088,0.00063235389667,0.000629565984121,0.000626744456072,0.000623889830268,0.000621000700396,0.000618078315123,0.000615122944814,0.000612132168388,0.000609101376687,0.000606034177823,0.000602933892951,0.000599801651011,0.000596637812278,0.000593443023818,0.000590218234704,0.000586963017116,0.000583680460619,0.000580370096121,0.000577033152178,0.000573667285883,0.00057026747622,0.000566836317136,0.000563375403905,0.000559884546574,0.000556362303829,0.000552809134382,0.000549227474709,0.000545614351331,0.000541971338234,0.000538302337166,0.000534613251374,0.000530904256201,0.00052717022941,0.000523409665799,0.000519625618234,0.000515819047419,0.000511988717456,0.000508133956451,0.000504258515321,0.000500359405338,0.000496432998769,0.000492474633962,0.000488489091343,0.000484479672875,0.000480445599061,0.000476386613514,0.000472304356973,0.000468200950712,0.000464073293659,0.000459922716206,0.000455751541105,0.000451564425238,0.00044736247062,0.000443146604659,0.000438917736612,0.000434677846959,0.000430423060723,0.000426153882712,0.000421871353773,0.000417576569691,0.000413266811778,0.000408941847997,0.000404599718799,0.000400241788308,0.000395864465333,0.000391469047155,0.00038705662075,0.000382630389732,0.000378188240944,0.000373729438939,0.000369257456537,0.000364773168603,0.000360278379209,0.000355772685128,0.000351256057556,0.000346727098182,0.000342186117699,0.000337633503074,0.00033307435342,0.000328509258112,0.000323937495486,0.000319356884876,0.000314766970706,0.000310166736312,0.000305558086167,0.00030094299742,0.00029632275833,0.000291695431365,0.000287058372088,0.000282410120823,0.000277750134069,0.000273082535197,0.000268410313111,0.000263730551204,0.000259044443985,0.000254354949747,0.000249662546452,0.000244969184413,0.000240277655719,0.000235588170214,0.000230901987333,0.00022622018297,0.000221540393853,0.000216863615423,0.00021219358424,0.000207526653793,0.000202858793354,0.00019818811659,0.000193514879422,0.0001888399103,0.000184166175847,0.000179490838161,0.000174813930107,0.000170137617856,0.000165462546097,0.000160790928147,0.000156128080912,0.00015147791838,0.000146840085913,0.000142215666025,0.000137602564425,0.000132999457952,0.000128410761103,0.000123839362615,0.000119284748793,0.000114744495814,0.00011021729232,0.000105702091929,0.000101196465055,9.67011574888e-05,9.22165851859e-05,8.77452822016e-05,8.32883768683e-05,7.88433055838e-05,7.44077352307e-05,6.99827381181e-05,6.55701204646e-05,6.11689507427e-05,5.67793920082e-05,5.24013436481e-05,4.80385810744e-05,4.36909288998e-05,3.93563538459e-05,3.50359888332e-05,3.07310306699e-05,2.64426196844e-05,2.21690002911e-05,1.79111595159e-05,1.36694782224e-05,9.45015105333e-06,5.25119483885e-06,1.07322087324e-06,-3.0813210318e-06,-7.21479531032e-06,-1.13287628179e-05,-1.54242896117e-05,-1.95007760885e-05,-2.35583718123e-05,-2.75942380594e-05,-3.16107073869e-05,-3.56128814568e-05,-3.95995582293e-05,-4.35733221942e-05,-4.75348943236e-05,-5.14802532442e-05,-5.54087318276e-05,-5.93187767095e-05,-6.32080399472e-05,-6.7076577743e-05,-7.09290238948e-05,-7.47625908363e-05,-7.85759367344e-05,-8.23691742066e-05,-8.61400515539e-05,-8.98900993623e-05,-9.36174477498e-05,-9.73233740996e-05,-0.000101007973086,-0.000104674782174,-0.000108320081775,-0.000111941610032,-0.000115541806125,-0.000119122675449,-0.000122683802732,-0.000126225925756,-0.000129746988349,-0.000133246215975,-0.000136723126939,-0.000140176875199,-0.000143608361448,-0.000147017809921,-0.000150403285768,-0.000153761573261,-0.000157092334008,-0.000160392870647,-0.000163664627116,-0.000166909545385,-0.000170134178703,-0.000173333882566,-0.000176511092455,-0.000179665034312,-0.000182799154009,-0.000185912552623,-0.000189004377352,-0.000192075988106,-0.000195130886491,-0.000198166208899,-0.000201177665525,-0.000204163530475,-0.000207122611759,-0.000210053262309,-0.00021295349359,-0.00021582487708,-0.000218670657256,-0.000221490590137,-0.000224282191827,-0.000227043375096,-0.000229777518564,-0.000232492749471,-0.00023518616972,-0.000237860752372,-0.000240515951052,-0.000243147767454,-0.000245753655563,-0.000248332235455,-0.000250886497139,-0.000253415070983,-0.000255920970491,-0.000258396377344,-0.000260836969209,-0.000263248181397,-0.000265630564673,-0.00026798452878,-0.000270312878437,-0.00027261711552,-0.000274897523665,-0.000277153798801,-0.000279381937898,-0.000281578089726,-0.000283750632315,-0.000285894933919,-0.000288007399228,-0.000290089726438,-0.000292139998102,-0.000293990428229,-0.00029547051147,-0.000296578178293,-0.000297313535467,-0.000297683305972)
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(288)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Canis_familiaris-male-liver-H3K4me3-ERR572260.50mers.unique.MACS2_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) : 288',bty='n')
dev.off()