# R script for Peak Model
#  -- generated by MACS
p <- c(0.0408657657601,0.0476178215026,0.0544728710304,0.0612151694668,0.0680040861429,0.0679195228244,0.0678360436509,0.0677764156699,0.0677102828182,0.0676235512095,0.0679563837581,0.0681265945403,0.0680528726728,0.0681710444898,0.0682371773415,0.0683228248051,0.0683835369313,0.0681688761996,0.0681623713289,0.0682772907105,0.0681981481175,0.0681265945403,0.0681656237642,0.0681905591018,0.0681092482185,0.0680366104962,0.0679986654174,0.0681591188936,0.0680561251082,0.0679715617896,0.0677850888308,0.0676918523514,0.0677688266541,0.0677200401242,0.0676506548372,0.0678739887298,0.0678555582629,0.0679021765026,0.0679975812723,0.0681385201365,0.0682848797263,0.0684193137199,0.0682371773415,0.0683358345464,0.0685873562119,0.068460511234,0.0683889576568,0.0683824527862,0.0683846210764,0.068400883253,0.0682491029377,0.0682360931964,0.0683835369313,0.0682859638714,0.0682198310197,0.0680366104962,0.0682089895686,0.0683130674991,0.0682989736127,0.0682144102942,0.0683098150638,0.0683488442878,0.0683932942373,0.0683499284329,0.0683900418019,0.0685060453286,0.0685125501993,0.0683206565149,0.0683249930954,0.0682599443888,0.0681591188936,0.0679932446918,0.0679531313228,0.0678707362944,0.0677135352536,0.067648486547,0.0673991331718,0.067470686749,0.0674663501686,0.0674663501686,0.0676517389823,0.0676213829192,0.0675780171149,0.0677991827172,0.0679054289379,0.0678804936004,0.0679964971272,0.0680311897707,0.0678555582629,0.0680105910136,0.0679563837581,0.0678783253102,0.0679596361934,0.0677449754617,0.06753031473,0.0676127097584,0.0676506548372,0.0676202987741,0.067816529039,0.0677135352536,0.0675541659224,0.0677341340106,0.0676311402252,0.067658243853,0.06767884261,0.0676278877899,0.0675953634366,0.06757910126,0.0675519976322,0.0676452341117,0.0678089400232,0.0678544741178,0.0677525644775,0.0679238594048,0.0680691348495,0.068212242004,0.0681916432469,0.0681558664583,0.0683011419029,0.0684832782813,0.068559168439,0.0685526635684,0.06866758295,0.0685071294738,0.0684778575558,0.0683553491584,0.0684941197324,0.0686003659532,0.0686318061614,0.0684713526851,0.0683651064644,0.0683304138209,0.0683965466726,0.0684572587987,0.0683835369313,0.068430155171,0.0683325821111,0.068420397865,0.0683282455307,0.0682924687421,0.0684821941362,0.068736968237,0.068736968237,0.068786838912,0.0689386192274,0.0691175031704,0.069221581101,0.0690546227541,0.0691988140537,0.0691240080411,0.0692085713597,0.0689830691769,0.0689060948741,0.0688540559088,0.0689136838898,0.0689017582936,0.0688345412968,0.0690112569497,0.0689483765334,0.0690351081421,0.0687402206723,0.0689765643062,0.0691109982998,0.0693267431766,0.0693278273217,0.0693570992397,0.0694611771702,0.0695836855676,0.0696021160344,0.0696584915801,0.0699176022613,0.0698633950058,0.0700054180152,0.0700260167723,0.0701160008164,0.0703219883872,0.0704520858003,0.0703805322231,0.0703729432073,0.070577846633,0.070745889125,0.0707252903679,0.0707068599011,0.0707317952386,0.0708857438442,0.0706602416614,0.0708326207338,0.0709876534845,0.0711622008471,0.0710906472699,0.0708391256044,0.0708293682985,0.0709052584561,0.0709572974214,0.0708749023931,0.0710321034339,0.0707111964815,0.070607118551,0.0706840928538,0.0707892549294,0.0710006632258,0.0712456800205,0.071388787175,0.0713779457239,0.0716088686322,0.0717096941274,0.072031685225,0.0722224947643,0.0723710226443,0.0724848578808,0.0726127870037,0.072645311357,0.0725108773634,0.0727331271109,0.0727331271109,0.0727352954011,0.0729868170665,0.0730648755144,0.0729987426627,0.0729445354072,0.0729401988268,0.0731938887824,0.07351587988,0.0736654919051,0.0739029196841,0.0741945547186,0.0741913022832,0.0743463350339,0.0744872738981,0.0747409638538,0.0748602198158,0.074920931942,0.0751626963014,0.0750922268693,0.0750976475948,0.0750922268693,0.0751312560932,0.0752234084275,0.0754077130962,0.0755605775566,0.0758261931085,0.0759085881368,0.075812099222,0.0759595429569,0.0760224233733,0.0761644463827,0.0763671815181,0.0765579910574,0.0764430716758,0.0763476669062,0.0763520034866,0.076266356023,0.0762815340545,0.0764441558209,0.0765189618335,0.0766056934423,0.0765254667041,0.0766024410069,0.0769016650572,0.0771694488992,0.0771694488992,0.0772811158455,0.0775684142995,0.0776334630061,0.0779218456053,0.0781061502739,0.0784704230307,0.0787143556804,0.0787588056299,0.0788650518506,0.0793019623298,0.0796141961213,0.0798722226574,0.0801443430799,0.0801985503354,0.0803308160387,0.0803221428779,0.0805227097231,0.0808327752245,0.0810875493252,0.0809151702528,0.0808999922213,0.0808035033065,0.0808295227891,0.0809823872496,0.0810506883915,0.0811558504671,0.0810842968899,0.0811775333693,0.0813000417667,0.0816274535898,0.0819841373308,0.082262762624,0.0824915172421,0.0826996731031,0.0828698838853,0.0832655968503,0.0837610511654,0.0842163921114,0.0846283672531,0.0850761191833,0.0856593892523,0.0863445689615,0.0873072898188,0.0880781169917,0.089119980442,0.0900967951857,0.0907808907499,0.0913272998851,0.0920872856069,0.0927941482184,0.0934587291705,0.0937048301104,0.0938837140535,0.0941395722993,0.0942956891951,0.0944810780088,0.0945938291002,0.0947835544944,0.0950296554343,0.0952128759578,0.0952985234215,0.0957625375284,0.095838427686,0.0961289785754,0.0962222150548,0.09632304055,0.0967100803541,0.0970580909343,0.0970580909343,0.0972283017165,0.0972890138426,0.0971773468964,0.0975372830727,0.0976532865995,0.0979134814257,0.0981986115896,0.0982040323151,0.0985845672486,0.0987656194819,0.0989878692293,0.0991840994942,0.0996426928755,0.0996925635506,0.100015638793,0.100345218907,0.100236804396,0.100669378294,0.100765867209,0.101044492502,0.101181094786,0.101340464117,0.101482487126,0.101933491492,0.102078766937,0.10220669606,0.102536276173,0.102557959075,0.102491826223,0.102692393069,0.103026309762,0.103427443453,0.103628010298,0.103553204286,0.103927234349,0.104138642645,0.104245973011,0.104539776335,0.105015716039,0.105346380297,0.105461299679,0.105638015331,0.105744261552,0.10601746612,0.106031560006,0.106125880631,0.106563875255,0.106691804378,0.106699393394,0.106962840655,0.10705932957,0.107149313614,0.107489735179,0.107565625336,0.107807389696,0.107915804207,0.108046985765,0.108362471992,0.108685547234,0.108684463089,0.108896955531,0.109115952843,0.109253639272,0.109553947467,0.109588640111,0.109994110382,0.11022936987,0.110192508937,0.110282492981,0.110511247599,0.110808303359,0.111172576116,0.111441444103,0.11160623416,0.111632253642,0.111766687636,0.111790538828,0.112072416557,0.112457288071,0.112674117093,0.112972256998,0.112999360625,0.113116448297,0.113280154209,0.113739831735,0.114091094751,0.114453199217,0.114658102643,0.114493312586,0.114608231968,0.114658102643,0.114816387829,0.115112359444,0.115477716346,0.115576373551,0.115634917387,0.115717312415,0.115950403614,0.116470793266,0.116676780837,0.116866506231,0.117088755979,0.117179824168,0.117305585001,0.11764275413,0.117917042842,0.118023289063,0.118164227927,0.118124114558,0.118342027725,0.118529584829,0.118707384627,0.119099845157,0.119354619258,0.119538923926,0.119606140923,0.11981754922,0.11992379544,0.120353116904,0.120378052241,0.120767260335,0.120955901585,0.120826888317,0.120938555263,0.121035044178,0.121181403767,0.121448103464,0.121770094562,0.121831890833,0.122041130839,0.121741906789,0.121813460366,0.122093169804,0.12224495012,0.122263380587,0.122382636549,0.122674271583,0.122568025362,0.122563688782,0.122787022675,0.123153463722,0.123659759488,0.123565438863,0.123790941046,0.123807203223,0.12397632986,0.123794193481,0.123852737317,0.123992592036,0.123950310377,0.12392971162,0.123678189955,0.123915617734,0.123593626636,0.123687947261,0.123808287368,0.123906944573,0.124276638055,0.12417798085,0.124303741683,0.124364453809,0.124185569866,0.124463111014,0.124819794755,0.124825215481,0.124734147291,0.124781849676,0.124560684074,0.124804616724,0.124978079941,0.124788354547,0.124803532578,0.124347107487,0.124206168623,0.124348191632,0.124329761166,0.12427555391,0.124292900232,0.123954646958,0.123733481355,0.123977414005,0.124102090693,0.124116184579,0.124053304163,0.123828886125,0.123770342289,0.123812623948,0.123626150989,0.123767089854,0.123451603627,0.123110097917,0.122921456668,0.123050469936,0.122848818946,0.122793527545,0.122367458517,0.121776599433,0.121439430303,0.121029623452,0.120823635881,0.120548263023,0.120336854727,0.119650590873,0.119332936356,0.119097676867,0.11922994257,0.119237531586,0.119319926614,0.118990346501,0.118767012608,0.118860249088,0.118626073744,0.118621737164,0.118511154362,0.118370215498,0.117707802836,0.117623239518,0.117356539821,0.117218853392,0.117087671834,0.116848075764,0.1166518455,0.116326601967,0.116105436364,0.115907037809,0.11566527345,0.115342198207,0.115136210636,0.115065741204,0.114801209798,0.114368635899,0.114069411849,0.114160480038,0.114124703249,0.113839573085,0.113764767073,0.113586967275,0.113210768922,0.113143551925,0.113202095761,0.113222694518,0.113208600632,0.112899619275,0.112578712323,0.112449699055,0.112605815951,0.112566786727,0.112656770771,0.112585217194,0.112347789415,0.112070248267,0.111748257169,0.111602981724,0.111504324519,0.111355796639,0.11101862751,0.110481975681,0.110135049246,0.109879191,0.109623332754,0.109539853581,0.109565873063,0.109265564868,0.108857926307,0.108507747436,0.10819876608,0.108071921102,0.107625253317,0.107099442939,0.106443535148,0.105768112745,0.10488236619,0.103912056317,0.103127135258,0.102000708489,0.100949087733,0.0997391817903,0.0985932404094,0.0975372830727,0.0966667145497,0.0957842204306,0.0951738467339,0.0948431824754,0.0942978574853,0.0940593455612,0.0939693615171,0.0939303322932,0.0938403482491,0.0936462862745,0.0935183571515,0.0935367876184,0.0932039550698,0.09286028107,0.0927442775433,0.09256322531,0.092187026957,0.0921794379412,0.0922412342125,0.091930084566,0.0918487736828,0.0917034982381,0.091484500926,0.0913598242384,0.0911668464089,0.0910963769768,0.0912286426801,0.0907234310591,0.090415533848,0.0905098544725,0.0903006144663,0.0899569404666,0.0898864710345,0.0896284444984,0.0895503860505,0.0894343825238,0.0890776987827,0.0890581841708,0.088911824581,0.0886212736916,0.0884738299567,0.0883632471555,0.0882103826951,0.08820929855,0.0880867901526,0.0877474527333,0.0873419824623,0.0871576777937,0.0870102340588,0.087012402349,0.0867478709423,0.0864562359078,0.0865386309361,0.0863077080278,0.0861841154853,0.0862188081288,0.0861537594222,0.0860583546526,0.0859911376558,0.085746120861,0.085646379511,0.0856702307034,0.0854262980537,0.0854826735994,0.0850772033284,0.0847530439407,0.0846359562688,0.084509111291,0.0843334797833,0.0842944505593,0.0842922822691,0.0841047251651,0.0839269253672,0.0837263585219,0.0837751450518,0.0834943514685,0.0834162930206,0.0831799493867,0.082984803267,0.0826823267814,0.0824232161002,0.0822465004473,0.0819375190911,0.0818811435454,0.0817217742143,0.0816534730724,0.081658893798,0.0816675669588,0.081569993899,0.0813575014575,0.0812599283976,0.0811753650791,0.0810636981328,0.0808197654832,0.0805823377042,0.0804825963541,0.079927514058,0.0797779020329,0.0796402156039,0.0796922545692,0.0793529171499,0.0791978843992,0.0791415088535,0.0788878188979,0.0788151811756,0.07880976045,0.0789257639767,0.0786471386836,0.0785300510117,0.0781917977376,0.0783663451002,0.0780714576304,0.0778741432204,0.0777733177253,0.0776540617632,0.077632378861,0.0774057925331,0.0774524107728,0.0772279927351,0.0770968111769,0.0768127651582,0.0765590752025,0.0764875216253,0.0762067280419,0.0761525207864,0.0759270186037,0.0758630540422,0.0755139593169,0.0754445740299,0.0754901081245,0.0752895412792,0.0754781825283,0.0754337325788,0.0754695093674,0.0751204146421,0.0748407052039,0.0748775661376,0.0749534562953,0.0748179381566,0.0745783420874,0.0745707530716,0.0744894421884,0.0742465936838,0.074139263318,0.0741923864283,0.0741858815577,0.0740037451793,0.0737196991606,0.0736611553247,0.0735473200882,0.0734237275457,0.0732611057792,0.0732903776972,0.0732676106499,0.0730399401769,0.0730713803851,0.0729781439056,0.0731754583156,0.0728166062843,0.0728892440066,0.0728621403789,0.0727309588206,0.0724599225433,0.0724013787073,0.0724512493824,0.0722214106191,0.0720381900956,0.0718788207645,0.0719633840831,0.0719568792124,0.0718050988971,0.0717855842851,0.0718007623166,0.0715394833452,0.0714104700772,0.0715058748468,0.0716544027268,0.0716099527773,0.0717118624176,0.0715210528784,0.0714473310109,0.0714115542223,0.0714289005441,0.0714191432381,0.07143865785,0.071240259295,0.0710386083046,0.0707393842544,0.0706060344059,0.0705193027971,0.0705160503618,0.0704596748161,0.0704596748161,0.07039896269,0.0703339139834,0.0704249821726,0.0704672638319,0.0704108882862,0.07035017616,0.0704748528476,0.0705691734722,0.0704575065259,0.0703274091127,0.0702634445513,0.0702851274535,0.0700737191571,0.0699197705515,0.070062877706,0.0702330884882,0.0700943179142,0.0698373755232,0.0698146084759,0.0696845110628,0.0697538963498,0.0695034588295,0.0695348990376,0.0695858538578,0.0694774393468,0.0691652055553,0.0692204969559,0.0693538468043,0.0691944774732,0.0692139920852,0.0692410957129,0.069538151473,0.0695934428735,0.0693896235929,0.0692367591325,0.0693332480473,0.0691597848297,0.0690676324954,0.0689711435807,0.06896463871,0.0688074376691,0.0684876148618,0.068302226048,0.0685212233602,0.0684919514422,0.068391125947,0.0685017087482,0.0684919514422,0.0687011914484,0.0686654146598,0.0688573083441,0.0690036679339,0.0690741373661,0.0690166776753,0.0690838946721,0.0691619531199,0.0689754801611,0.0687228743506,0.0687196219152,0.0687987645082,0.0688009327985,0.0685754306157,0.0684767734107,0.0683629381742,0.0684052198335,0.0684063039786,0.0684355758965,0.0686242171456,0.0684594270889,0.0682827114361,0.0682263358904,0.0683401711269,0.0682263358904,0.0682263358904,0.0683076467736,0.0681482774425,0.0682566919534,0.0680810604457,0.0682458505024,0.0683347504013,0.0681558664583,0.0682870480165,0.0684529222183,0.068460511234,0.0684041356883,0.0684442490574,0.0683369186916,0.0684886990069,0.0684485856378,0.0684561746536,0.0686361427418,0.0684843624265,0.0685060453286,0.0685244757955,0.0685570001488,0.0685635050195,0.068756482849,0.0687347999468,0.0686838451266,0.0685656733097,0.0685049611835,0.0685808513412,0.068648068338,0.0688182791202,0.0686892658522,0.0686209647103,0.0684420807672,0.068707696319,0.0686719195304,0.0687814181865,0.0686892658522,0.0687521462685,0.0687011914484,0.0685656733097,0.0687456413979,0.0688312888615,0.068777081606,0.0686079549689,0.068578683051,0.0686003659532,0.068549411133,0.0685158026346,0.0685927769374,0.0684160612846,0.0683000577578,0.0683304138209,0.0683184882247,0.0683174040796,0.0685830196314,0.0687846706218,0.0690567910443,0.0690979885585,0.0690351081421,0.0692942188233,0.0693722772712,0.0694535881544,0.0695576660849,0.0696715013214,0.0695056271197,0.069251937164,0.0691554482493,0.0690231825459,0.0690296874166,0.068935366792,0.0690025837888,0.0690578751894,0.0691055775742,0.0689624704198,0.0690893153976,0.069281209082,0.0691207556058,0.0693148175804,0.069370108981,0.0693852870125,0.0694470832838,0.0693549309494,0.0694015491892,0.0696042843246,0.0695348990376,0.0695663392458,0.0697473914791,0.0697972621541,0.0698091877504,0.0700314374978,0.0699620522108,0.0702460982295,0.0701767129425,0.0701550300403,0.0703035579203,0.0701853861034,0.070221162892,0.0701073276555,0.0700466155293,0.0698601425705,0.0698991717944,0.069736550028,0.0697137829807,0.0695273100219,0.0694904490881,0.0696996890943,0.0697105305454,0.0697809999775,0.069964220501,0.0699382010184,0.069885077908,0.0698677315863,0.0700097545956,0.0700802240277,0.0702450140844,0.0702775384377,0.0701897226838,0.070132262993,0.0699360327282,0.0702417616491,0.0701756287974,0.0701810495229,0.0701886385387,0.0701105800908,0.0699121815358,0.069894835214,0.070082392318,0.0701983958447,0.0703751114975,0.0702059848605,0.0703111469361,0.0703133152263,0.0703512603051,0.0704260663177,0.0705247235227,0.0703957102546,0.0704997881851,0.070429318753,0.070518218652,0.0705149662167,0.0706288014532,0.0705529112955,0.0705605003113,0.0707404683995,0.0707133647717,0.0706775879831,0.0706385587592,0.0706927660147,0.0708206951376,0.0709247730681,0.0707632354468,0.0708011805256,0.0707632354468,0.0706916818695,0.0707697403174,0.0709095950366,0.0706981867402,0.0708000963805,0.0706689148222,0.0707578147212,0.0709442876801,0.0709648864372,0.0709898217747,0.071091731415,0.0710245144182,0.0708976694404,0.0710754692383,0.0710613753519,0.0711340130742,0.0710646277872,0.0708564719262,0.0709648864372,0.0709995790807,0.0709887376296,0.0710212619829,0.071151359396,0.0711144984623,0.0709030901659,0.0707393842544,0.0707003550304,0.0709670547274,0.0710418607399,0.0709226047779,0.0709605498567,0.0708196109925,0.0707708244625,0.0709280255034,0.0709984949356,0.0710180095475,0.0709865693393,0.0707079440462,0.0705268918129,0.0706819245636,0.0705388174091,0.0706092868412,0.0707719086077,0.0706331380336,0.0707870866392,0.070963802292,0.0710689643677,0.0711893044748,0.0712738677934,0.0712033983613,0.0711903886199,0.0712413434401,0.0710407765948,0.0709844010491,0.0710255985633,0.0709497084056,0.0708564719262,0.071002831516,0.0708749023931,0.0708423780398,0.0709052584561,0.0709551291312,0.0709692230176,0.0711481069607,0.0710364400144,0.0710115046769,0.0710798058188,0.0708033488158,0.0709941583551,0.0711177508976,0.071170874008,0.0710440290302,0.0710852265443,0.0709605498567,0.0708510512007,0.0707892549294,0.0706526526456,0.0706905977244,0.0706016978254,0.0704575065259,0.070340418854,0.0703957102546,0.0703783639329,0.0704705162672,0.07049870404,0.070527975958,0.070676503838,0.0707567305761,0.0708933328599,0.0708803231186,0.070973559598,0.0710234302731,0.0709854851942,0.0708889962795,0.0709572974214,0.0709551291312,0.0707892549294,0.0707502257055,0.0706472319201,0.0706721672576,0.0705789307781,0.0704813577183,0.070686261144,0.0707979280903,0.0705984453901,0.0704748528476,0.0704596748161,0.0705203869422,0.0703284932578,0.0703176518067,0.0704130565764,0.0704466650748,0.0701268422675,0.0699924082739,0.0701506934599,0.0700379423685,0.0701539458952,0.0701398520088,0.0701994799898,0.0701257581223,0.0699327802928,0.0699154339711,0.0700531204,0.0700813081729,0.0698276182172,0.0698774888923,0.0697820841226,0.0696931842236,0.0696942683687,0.0696162099208,0.0697311293025,0.0696584915801,0.0696801744823,0.0695348990376,0.0696498184192,0.069696436659,0.0696563232899,0.0695847697127,0.0696313879524,0.0697853365579,0.0696151257757,0.0695554977947,0.0694015491892,0.0695630868105,0.0694806917822,0.0693354163375,0.0693018078391,0.069489364943,0.0692638627602,0.0692530213091,0.0692974712586,0.0694026333343,0.0693397529179,0.06911316659,0.0693646882554,0.069400465044,0.0693842028674,0.0692822932271,0.0694091382049,0.0691782152966,0.0691185873156,0.0691099141547,0.0691456909433,0.0691055775742,0.0690188459655,0.0690795580916,0.0690947361231,0.06896463871,0.0690817263818,0.0691348494922,0.0691814677319,0.0691294287667,0.0692736200662,0.0692660310505,0.069370108981,0.0693299956119,0.0691868884575,0.0623535218318,0.0553109152001,0.0484753802842,0.04160623687,0.0)
m <- c(0.0410041680787,0.0477638482925,0.0544670893008,0.0613287942319,0.0682458529991,0.0681503404977,0.0682436822605,0.0682892677725,0.0683196581139,0.0684553292807,0.0685627808447,0.0686778299942,0.0690305750278,0.0690967825572,0.0690718190625,0.0690620507385,0.0690142944878,0.0692020633826,0.0690935264492,0.0691054655119,0.0690056115331,0.0689958432091,0.0689296356797,0.0687603180636,0.0689643674984,0.0689969285784,0.0690685629545,0.069261758696,0.0693952591241,0.0693529297201,0.0692270268773,0.06925524648,0.0692693562813,0.0695634913709,0.0693572711974,0.0693985152321,0.0694071981868,0.0694592959148,0.0693768078454,0.0696296989003,0.0699607365473,0.0700790418047,0.0699411998992,0.0699368584219,0.0699129802966,0.0697534310044,0.0699042973419,0.069674199043,0.0696503209177,0.0694451861135,0.0694701496082,0.0694375885281,0.0694788325629,0.0694234787268,0.0695146497509,0.0697838213458,0.0698706508925,0.0701582737661,0.0703840305876,0.0705978483465,0.0705424945104,0.0705739702211,0.0706716534612,0.070833373492,0.0708811297427,0.0707953855653,0.0706380070118,0.0705869946531,0.0705490067264,0.0705294700784,0.0706184703638,0.0707280926666,0.0707584830079,0.0706054459318,0.0705207871237,0.0707606537466,0.0707161536039,0.0706749095692,0.0706597143985,0.0706206411025,0.0705283847091,0.0704003111276,0.0703568963543,0.0703037132569,0.0703829452183,0.0703438719223,0.070492567521,0.0703927135423,0.070385115957,0.0704480673783,0.0704068233436,0.0704187624063,0.070486055305,0.0707606537466,0.0709126054534,0.0707389463599,0.070781275764,0.0708984956521,0.0708474832933,0.0709538494881,0.0709733861361,0.0711611550309,0.071223021083,0.0709592763348,0.0708930688054,0.0709842398295,0.0709473372721,0.0708605077254,0.0709614470734,0.0709364835788,0.0709647031814,0.0709777276135,0.0709495080108,0.0710341668188,0.0709918374148,0.0711166548882,0.0711654965083,0.0713293872778,0.0713760581591,0.0712512406857,0.0710840938082,0.0710037764775,0.071196972219,0.071284887135,0.0714162168245,0.071252326055,0.0711926307416,0.0711231671042,0.0711589842923,0.071196972219,0.0714921926779,0.0715084732179,0.0713196189537,0.0713326433858,0.0713641190964,0.0714097046085,0.0713749727898,0.0714650584445,0.0714379242112,0.0714693999219,0.0715247537579,0.071606156458,0.0715421196673,0.0715117293259,0.0715041317406,0.071596388134,0.0718829256382,0.0718178034782,0.0718134620008,0.0717016689594,0.0714368388418,0.0714400949498,0.0714563754899,0.0715290952353,0.0714542047512,0.0713977655458,0.0712729480724,0.0713673752045,0.0714509486432,0.0712859725044,0.0714552901205,0.0713076798911,0.0713554361418,0.0714520340125,0.0714422656885,0.0713836557445,0.0713424117098,0.0713217896924,0.0712241064523,0.0714802536152,0.0713706313125,0.0714498632739,0.0713055091524,0.0712946554591,0.0714151314552,0.0715073878486,0.0714943634166,0.0712892286124,0.0710721547455,0.0710732401149,0.0710385082962,0.0710797523309,0.0713402409711,0.0711177402576,0.0709082639761,0.0708442271853,0.0707422024679,0.0709994350001,0.0711633257696,0.0712371308843,0.0712436431003,0.0711752648323,0.0710764962229,0.0710830084389,0.0713239604311,0.0713217896924,0.0712740334417,0.0709571055961,0.0711025450869,0.070839885708,0.0708322881227,0.0709820690908,0.0710233131255,0.0711448744909,0.0709158615614,0.0707932148266,0.0707628244853,0.0711405330136,0.0709929227841,0.0711090573029,0.0709538494881,0.07085291014,0.07088547122,0.0708214344293,0.070865934572,0.0708702760494,0.0709180323001,0.0706412631198,0.0706770803079,0.0707584830079,0.0710851791775,0.0708366296,0.0707335195132,0.0707139828652,0.0705316408171,0.0703655793089,0.0705207871237,0.0705403237718,0.0704610918104,0.0703178230582,0.0700714442194,0.0703308474902,0.0702125422328,0.0701832372608,0.0704849699357,0.0707823611333,0.0706488607052,0.0705978483465,0.0705153602771,0.0706238972105,0.0707335195132,0.0704936528904,0.0705034212144,0.0704100794516,0.07010291993,0.0699336023139,0.0698196385338,0.0698521996138,0.0698749923699,0.0696535770257,0.0695678328483,0.0695027106882,0.0694495275908,0.0695385278762,0.0696394672243,0.0696145037296,0.0697013332764,0.0698576264605,0.0697968457778,0.0697914189311,0.069693735691,0.0698869314325,0.0697566871124,0.0696242720536,0.0695841133883,0.0695211619669,0.0695298449216,0.0693963444934,0.0694169665108,0.0696492355483,0.0697317236177,0.0695678328483,0.0696796258897,0.0696470648097,0.0695548084162,0.069661174611,0.0695591498936,0.069700247907,0.0695450400922,0.069219429292,0.0690826727558,0.0689958432091,0.0688026474676,0.0686550372382,0.0686789153635,0.0685801467541,0.0685595247367,0.0681362306964,0.0681991821178,0.0681829015778,0.068092815923,0.068060254843,0.0683326825459,0.0685649515834,0.0683728412112,0.0683077190512,0.0682393407831,0.0682903531418,0.0683022922045,0.068459670758,0.0685758052768,0.0684705244513,0.0680721939057,0.0680027302683,0.068060254843,0.0680591694736,0.0681492551284,0.0680884744457,0.0680124985923,0.0679647423416,0.068043974303,0.0683120605285,0.0684878903607,0.0685204514407,0.068518280702,0.0685421588274,0.0685595247367,0.0686506957608,0.0686365859595,0.0685964272941,0.0684846342527,0.06842385357,0.0687017081195,0.0686072809874,0.0687548912169,0.0687429521542,0.0684911464687,0.0685540978901,0.0687961352516,0.0687071349662,0.0688015620983,0.0689307210491,0.068813501161,0.0688156718996,0.068865598889,0.0689773919304,0.0690533677838,0.0690620507385,0.068829781701,0.0689589406517,0.068868854997,0.0685747199074,0.0685725491688,0.0686376713288,0.0684509878033,0.0683489630859,0.0684249389393,0.0683826095353,0.0685410734581,0.068433621894,0.0684705244513,0.0686919397955,0.0685258782874,0.068511768486,0.0686061956181,0.0687342691996,0.068852574457,0.0687429521542,0.0687255862449,0.0686615494542,0.0685920858168,0.068469439082,0.0686615494542,0.0688797086903,0.0688873062757,0.0686387566981,0.0685367319807,0.0687147325515,0.0687809400809,0.0688341231783,0.0689578552824,0.0691054655119,0.0690956971879,0.0688959892304,0.0691575632399,0.0695602352629,0.0696275281616,0.069612332991,0.0695917109736,0.0698044433631,0.0697360650951,0.0696340403776,0.0696242720536,0.0697024186457,0.0694734057162,0.069248734264,0.0694050274481,0.0695461254616,0.0694744910855,0.0696264427923,0.0697024186457,0.069706760123,0.0698033579938,0.0699184071432,0.0699835293033,0.0701094321461,0.0700812125434,0.0701832372608,0.0702776643929,0.0701387371181,0.0701398224874,0.0703818598489,0.0704035672356,0.070411164821,0.0705316408171,0.0704220185143,0.0705251286011,0.0706130435171,0.0707085560186,0.0707226658199,0.0708344588613,0.0708681053107,0.0708312027533,0.0707867026106,0.070862678464,0.0710211423868,0.0708898126974,0.0708583369867,0.0707932148266,0.0710092033241,0.0711036304562,0.0710504473588,0.071249069947,0.0713196189537,0.071183947787,0.0712045698043,0.0713510946644,0.0714270705178,0.071671278618,0.0716919006354,0.0717505105794,0.0718254010635,0.0719089745022,0.0720196821743,0.0722562926892,0.0725026715281,0.0726785013602,0.0726654769282,0.0727707577536,0.0726535378655,0.0728228554817,0.072820684743,0.0727305990883,0.072849989715,0.0728890630111,0.0728651848857,0.0728988313351,0.0729921730978,0.0729096850284,0.0731126490939,0.0730464415645,0.0731343564806,0.0733731377341,0.0734187232462,0.0735174918556,0.0736520776531,0.0736868094717,0.0738463587639,0.0742067013829,0.0743771043683,0.0746462759632,0.0748644351994,0.0748818011088,0.0749078499728,0.0748807157394,0.0750131307982,0.0752725340691,0.0752095826477,0.0751281799476,0.0752768755464,0.075122753101,0.0753050951491,0.0755308519706,0.0758336700149,0.0760778781151,0.07631448863,0.0763785254207,0.0767996487224,0.0768582586664,0.0768582586664,0.0772175159161,0.0772978332468,0.0772880649228,0.0775604926257,0.077876335102,0.0778741643633,0.0780489088261,0.0780250307008,0.078344129285,0.0784743736051,0.0785308128105,0.0785416665039,0.0789215457708,0.0787858746041,0.0787945575587,0.0790072899483,0.0790897780177,0.0791353635297,0.0790593876763,0.0791093146657,0.0791603270244,0.0794957061487,0.0795955601274,0.0796324626848,0.0797703045902,0.0798495365516,0.0797768168062,0.0801230496239,0.08022724508,0.0804996727829,0.0808155152591,0.0809056009139,0.0809218814539,0.0811248455194,0.0813158705222,0.0815492249291,0.0819942263561,0.0820723729482,0.0824186057658,0.0826769236674,0.0826910334687,0.0828049972488,0.0831132421397,0.0831946448398,0.0835408776574,0.0835528167201,0.0836689512389,0.083786171127,0.0839750253911,0.0840683671539,0.0842745873274,0.0844558440062,0.084555697985,0.0848194427332,0.0848270403185,0.084994187196,0.0851884683068,0.0854370178844,0.0855498962951,0.0857289822353,0.0859590805341,0.086163129969,0.086208715481,0.0864995944626,0.0864583504279,0.0867828758588,0.0868979250083,0.0868773029909,0.0870683279938,0.0872126821152,0.0873038531393,0.0874601463234,0.0875751954728,0.0875404636542,0.0879355380918,0.0880158554226,0.088186258408,0.0883468930695,0.0883110758815,0.0885444302883,0.0888298824232,0.0890545538754,0.0892249568609,0.0894952138251,0.0894735064385,0.089712287692,0.0896677875493,0.0898002026081,0.0902441186658,0.0903656800312,0.0902983871325,0.090543680602,0.0907618398382,0.0909539502104,0.0911134995025,0.0912166095893,0.0915226837415,0.0917527820404,0.0916909159883,0.0919568314752,0.0924322232436,0.0924137719649,0.0926634069118,0.0928468343293,0.0930367739628,0.0932028354709,0.0934437874632,0.0937075322114,0.0939549964196,0.094047252813,0.0941720702864,0.0941764117638,0.0943609245506,0.094482485916,0.0946648279642,0.0947635965736,0.0950479633392,0.0953203910421,0.095670965337,0.0961658937535,0.0965392608044,0.0974726784319,0.0981021926458,0.0990453785972,0.100292467962,0.101400630053,0.102277608475,0.103285916586,0.104297480806,0.10499211718,0.106079657253,0.106822049877,0.107737016226,0.108151627312,0.108290554586,0.108571665244,0.108939605448,0.108998215392,0.109406314262,0.109854571797,0.10965486384,0.109778595944,0.109719986,0.110140023932,0.110410280896,0.110887843403,0.111212368834,0.111701870404,0.111962359044,0.112221762315,0.112701495561,0.113004313605,0.113156265312,0.113096569998,0.113154094573,0.113193167869,0.113235497273,0.113355973269,0.113511181084,0.113544827534,0.113803145435,0.113695693871,0.114127670866,0.114261171294,0.114629111498,0.114584611356,0.114804941331,0.115074112925,0.115114271591,0.115335686935,0.115296613639,0.115429028698,0.115482211795,0.115820847027,0.116014042769,0.116455788088,0.116514398032,0.116630532551,0.116669605847,0.116706508404,0.117128717075,0.117662718788,0.117825524188,0.118084927459,0.117983988111,0.117872195069,0.118167415528,0.118235793796,0.118422477322,0.118742661275,0.118617843802,0.118685136701,0.118909808153,0.119017259717,0.119328760716,0.119690188704,0.119935482174,0.120241556326,0.120558484171,0.120567167126,0.120917741421,0.121214047249,0.121632999812,0.121770841718,0.122143123399,0.122362368005,0.122555563746,0.122733564317,0.122965833355,0.123509603391,0.123780945725,0.123777689617,0.123795055526,0.123989336637,0.124036007518,0.124220520305,0.124184703117,0.124085934508,0.12413152002,0.124319288915,0.124256337493,0.124300837636,0.124255252124,0.124060971013,0.1242454838,0.124263935079,0.124339910932,0.124631875283,0.124488606531,0.124243313061,0.12452225298,0.124749095171,0.124682887642,0.124888022446,0.124776229404,0.124804449007,0.124838095456,0.124634046022,0.124851119888,0.12471870483,0.124517911503,0.12435944758,0.12442456974,0.124340996301,0.12426176434,0.123961117034,0.123774433509,0.123802653112,0.123556274273,0.123555188903,0.123575810921,0.123713652826,0.123555188903,0.123468359357,0.123368505378,0.123409749413,0.123526969301,0.123567127966,0.123568213335,0.123626823279,0.123418432367,0.123053748271,0.122868150115,0.122785662045,0.122636966447,0.122553393008,0.122381904653,0.122057379222,0.121949927658,0.121641682767,0.121364913587,0.121275913301,0.121337779353,0.121117449379,0.120947046393,0.120645313718,0.120611667269,0.120477081471,0.120561740279,0.120541118262,0.120375056754,0.120048360584,0.119880128338,0.119928969958,0.119650030039,0.119609871373,0.119291858158,0.118927174062,0.118450696924,0.117991585696,0.117898243933,0.117896073195,0.11757697461,0.11748037674,0.117604108844,0.117311059123,0.117245936963,0.117401144778,0.117090729149,0.116896448038,0.116659837523,0.116591459255,0.116475324736,0.116119323594,0.115806737226,0.115655870889,0.115258625712,0.114833160933,0.114873319599,0.114955807668,0.114677953118,0.114339317886,0.114075573138,0.113934475125,0.113796633219,0.113650108359,0.113475363896,0.113573047136,0.113290851109,0.112791581216,0.112874069285,0.112595129366,0.112426897119,0.112218506207,0.111876614867,0.111758309609,0.111613955488,0.111237332329,0.11118740534,0.111054990281,0.110891099511,0.110627354763,0.110433073652,0.110179097228,0.110184524075,0.109986986856,0.109819839978,0.109612534436,0.109268472357,0.109283667527,0.109126288974,0.109031861842,0.108568409136,0.108422969645,0.108044175748,0.107677320913,0.107613284122,0.107249685395,0.106904537947,0.106716769052,0.106319523875,0.106318438506,0.106467134105,0.106110047594,0.105803973442,0.105690009662,0.105440374715,0.105504411505,0.105731253696,0.105345947583,0.10492699502,0.10440493237,0.104066297137,0.103894808783,0.103707039888,0.10352361247,0.103192574823,0.102804012602,0.102483828648,0.102377462453,0.102403511317,0.10226892552,0.102195120405,0.101962851368,0.101843460741,0.101739265285,0.101533045111,0.101348532325,0.100926323653,0.100583346944,0.100529078477,0.100396663418,0.100103613698,0.100081906311,0.100014613413,0.0997584662498,0.0994317700802,0.0992331474921,0.099161513116,0.0990844518933,0.0987154263196,0.098391986258,0.0983203518819,0.0980479241791,0.097586642212,0.0973684829758,0.097154665217,0.0969256522874,0.0968974326847,0.0967389687619,0.0966402001525,0.0966043829645,0.0965555413445,0.0962516379309,0.0963113332442,0.0961854304015,0.0962017109415,0.0962462110842,0.0956980995704,0.0954745134875,0.0951716954433,0.0950110607818,0.0945237299507,0.094391314892,0.0940483381823,0.0937889349114,0.0935284462712,0.0930845302135,0.0930172373148,0.092488662449,0.0921815029274,0.0913870125747,0.090897511005,0.0901193011923,0.089358457289,0.0884858203443,0.0874851098181,0.086565801992,0.085426164191,0.0847575766811,0.0840184401645,0.0835604143054,0.0829678026489,0.0827680946914,0.0824294594592,0.0821787391429,0.0821168730909,0.0820951657042,0.0819258480881,0.0819106529174,0.0817413353012,0.0816349691065,0.0816121763505,0.0814298343023,0.081490614985,0.0813560291876,0.081094455178,0.0808100884124,0.0809023448059,0.0806114658243,0.080302135564,0.0799928053038,0.0797323166635,0.0794132180793,0.0790007777323,0.0789823264536,0.0789106920775,0.0788868139522,0.0786089594026,0.0784092514451,0.0784255319851,0.0784114221838,0.0783962270131,0.078334360961,0.0783235072677,0.0779946403594,0.0779761890807,0.0778253227433,0.0777916762939,0.0776668588205,0.0775496389324,0.0774226507202,0.0771209180453,0.0770047835266,0.0767866242904,0.0766683190329,0.0764208548247,0.076311232522,0.0762048663272,0.0762645616406,0.0759107312376,0.0758141333669,0.0757197062348,0.0757370721442,0.0754635590719,0.0753463391838,0.0753300586438,0.0751694239823,0.0750163869062,0.0747613251127,0.0747993130394,0.0746332515312,0.074346714027,0.0741198718361,0.0741187864668,0.0741752256722,0.0739082248159,0.0738235660079,0.0737530170011,0.0738669807812,0.0736770411477,0.0737280535065,0.0737345657225,0.0735891262317,0.073557650521,0.0733948451208,0.0734892722529,0.0734849307756,0.0734816746676,0.073203820118,0.0731929664247,0.0729661242338,0.0729932584672,0.0728760385791,0.0728413067604,0.0728065749417,0.0726665622976,0.0724527445387,0.0721662070345,0.0720587554704,0.0720403041917,0.0719849503556,0.0718503645582,0.0717711325968,0.0717016689594,0.0713923386991,0.0712534114244,0.0712979115671,0.0714704852912,0.0714097046085,0.0714444364272,0.071262094379,0.0712154234977,0.0712468992083,0.0709505933801,0.0711394476443,0.0710688986375,0.0708539955093,0.0707074706492,0.0705717994824,0.0702765790235,0.0703199937969,0.0702472740515,0.0701593591354,0.0705186163851,0.0703590670929,0.0702581277448,0.0701376517487,0.0698391751818,0.0698022726245,0.0698934436485,0.0699791878259,0.0698370044432,0.0698228946418,0.0695841133883,0.0692867221907,0.069294319776,0.0693648687828,0.0692986612534,0.0691369412226,0.0691163192052,0.0689621967597,0.0689969285784,0.0687907084049,0.0688210987463,0.0689969285784,0.0687581473249,0.0686854275795,0.0689155258784,0.0690218920731,0.0689437454811,0.0690077822718,0.0689676236064,0.0689470015891,0.0689470015891,0.0690132091185,0.0691879535813,0.0692107463373,0.0689513430664,0.0689502576971,0.0689415747424,0.0687245008755,0.0686941105342,0.0686745738862,0.0685258782874,0.0683858656433,0.0682263163511,0.068105840355,0.0682089504418,0.0681014988777,0.0679766814042,0.0679224129375,0.067712936656,0.0678171321121,0.0678051930494,0.0678420956068,0.0679940473136,0.0680211815469,0.0680081571149,0.0680233522856,0.0679799375122,0.0680656816897,0.0681763893617,0.0680711085363,0.0679441203242,0.0679148153522,0.0679962180523,0.0680678524283,0.0680190108083,0.0680939012923,0.068089559815,0.0681829015778,0.0682501944765,0.068109096463,0.0681970113791,0.0680776207523,0.0677487538441,0.0676684365133,0.0676228510013,0.0675479605172,0.0674958627892,0.0675284238692,0.0675305946079,0.0677715466001,0.0677379001507,0.0678529493001,0.0677596075374,0.0677487538441,0.067686887792,0.0677216196107,0.0677444123667,0.0674589602318,0.0674633017091,0.0674122893504,0.0674155454584,0.0674839237265,0.0677444123667,0.0676847170533,0.0676239363706,0.0675826923359,0.0676206802626,0.0677726319694,0.0677726319694,0.0677335586734,0.0676141680466,0.0675555581026,0.0672994109397,0.0671235811075,0.0672038984383,0.0671963008529,0.0671094713062,0.0671224957382,0.0670454345155,0.0670693126408,0.0670389222995,0.0669694586621,0.067261423013,0.0674741554025,0.0675620703186,0.0674263991518,0.0675772654892,0.06767386336,0.067651070604,0.0676337046946,0.0678312419135,0.0679734252962,0.0678952787042,0.0679734252962,0.0679538886482,0.0681459990204,0.0680645963203,0.0679234983069,0.0679571447562,0.0679083031362,0.0680190108083,0.0679647423416,0.0679962180523,0.0678312419135,0.0677433269974,0.0677943393561,0.0678127906348,0.0679300105229,0.0678388394988,0.0678095345268,0.0675078018518,0.0674654724478,0.0673601916224,0.0675002042665,0.0675349360852,0.0672657644903,0.0672787889223,0.0671431177555,0.067271191337,0.0673547647757,0.0675088872212,0.0674122893504,0.0676076558306,0.06764130228,0.0677585221681,0.0679213275682,0.0680038156376,0.068096072031,0.0680743646443,0.068122120895,0.0681004135084,0.0681655356684,0.0681590234524,0.0681644502991,0.0681232062644,0.0682046089644,0.0679875350976,0.0679701691882,0.0680613402123,0.0681427429124,0.0682393407831,0.0683337679152,0.0682078650724,0.0682491091071,0.0682990360965,0.06842385357,0.0685758052768,0.0684846342527,0.0684813781447,0.0684162559846,0.0684455609566,0.0685465003047,0.0617824786137,0.0548871272332,0.04804495895,0.0410920829948,0.0)
ycorr <- c(5.36125541882e-05,5.34623330866e-05,5.30031198934e-05,5.22324913107e-05,5.11568945628e-05,4.97702422309e-05,4.80693920952e-05,4.63801389023e-05,4.46953296122e-05,4.30026494145e-05,4.12984638203e-05,3.95806414978e-05,3.78485192386e-05,3.61078388416e-05,3.43572348566e-05,3.25872550074e-05,3.07998649059e-05,2.89974637519e-05,2.71885319701e-05,2.53764323588e-05,2.35699776448e-05,2.17680892235e-05,1.99699772065e-05,1.81722919541e-05,1.63723047564e-05,1.45794192656e-05,1.27891605938e-05,1.10019372184e-05,9.20744493943e-06,7.40723069927e-06,5.59801571161e-06,3.7755863861e-06,1.94508470126e-06,1.09564999278e-07,-1.72926327036e-06,-3.57285345939e-06,-5.42668387617e-06,-7.28938983146e-06,-9.16262323459e-06,-1.10459273078e-05,-1.29404914267e-05,-1.48443576561e-05,-1.675394317e-05,-1.86727391042e-05,-2.06052055461e-05,-2.25569653893e-05,-2.45215211752e-05,-2.64993395436e-05,-2.84830890652e-05,-3.04694950175e-05,-3.24606295331e-05,-3.44569892325e-05,-3.64592859925e-05,-3.84703178579e-05,-4.04857335803e-05,-4.25000211361e-05,-4.45118572735e-05,-4.65253125716e-05,-4.85411336025e-05,-5.05651738991e-05,-5.25991096288e-05,-5.46382222233e-05,-5.66877780447e-05,-5.87477173183e-05,-6.08198270908e-05,-6.29090621698e-05,-6.50183923167e-05,-6.71434523562e-05,-6.92870034389e-05,-7.14492795279e-05,-7.36291903954e-05,-7.58262576076e-05,-7.80382161374e-05,-8.0264083488e-05,-8.25027367716e-05,-8.47493125047e-05,-8.7003165641e-05,-8.92614854492e-05,-9.15239306633e-05,-9.37868461648e-05,-9.60462358795e-05,-9.83009531965e-05,-0.00010055370712,-0.000102805714527,-0.000105050884362,-0.000107288557934,-0.000109521015319,-0.000111747753354,-0.000113972903371,-0.000116197117093,-0.000118420406562,-0.000120646966236,-0.000122874012569,-0.000125100643575,-0.000127329762905,-0.000129567098136,-0.000131808542017,-0.000134054087798,-0.000136302337148,-0.000138549625195,-0.000140797387501,-0.00014304208329,-0.000145282941977,-0.000147518178521,-0.000149747740781,-0.00015196619934,-0.000154173653679,-0.000156375034463,-0.000158566600381,-0.000160746495652,-0.000162914329826,-0.000165071382587,-0.000167221026903,-0.000169362743303,-0.000171504569082,-0.000173648835597,-0.000175793182316,-0.000177934413234,-0.000180071465638,-0.000182210172441,-0.000184354248337,-0.000186504420607,-0.000188656955683,-0.000190813243231,-0.000192965645392,-0.000195105265282,-0.000197229701252,-0.000199343773273,-0.000201449868366,-0.000203548572068,-0.000205635807433,-0.000207708566042,-0.000209767247712,-0.000211809602256,-0.000213833319872,-0.00021584991752,-0.000217866628055,-0.00021988127067,-0.000221889673967,-0.000223886602509,-0.000225874910879,-0.000227855325208,-0.000229833969182,-0.000231811789691,-0.000233789927587,-0.000235763450557,-0.000237728593439,-0.000239683658745,-0.000241628333411,-0.000243566976699,-0.000245500816224,-0.000247425013279,-0.000249335451658,-0.000251224866789,-0.000253095005549,-0.000254951110321,-0.000256795602476,-0.000258631596988,-0.000260462541117,-0.000262286695889,-0.000264102270981,-0.000265913694378,-0.000267718693745,-0.000269521981052,-0.000271325805512,-0.00027312790846,-0.000274925165922,-0.000276714626359,-0.000278491038739,-0.000280253236712,-0.000282003196681,-0.000283739221671,-0.000285462889397,-0.000287180482173,-0.000288888265737,-0.000290586735926,-0.00029227431849,-0.000293954478077,-0.000295632275361,-0.000297306940006,-0.000298974423666,-0.000300638522354,-0.00030229746132,-0.000303944130217,-0.000305583945883,-0.000307215977511,-0.000308841241654,-0.000310457892837,-0.000312060294935,-0.000313652429424,-0.000315236577919,-0.000316812390897,-0.000318381249516,-0.000319945086453,-0.000321505548277,-0.000323053303791,-0.000324592612427,-0.000326123036502,-0.000327651170182,-0.000329177546818,-0.000330697279165,-0.000332210112478,-0.000333714466009,-0.000335211213199,-0.000336700204231,-0.000338183748309,-0.000339660715293,-0.000341131933459,-0.000342593538128,-0.000344039888712,-0.000345476645921,-0.000346902349103,-0.000348316715589,-0.000349723509865,-0.000351116815476,-0.000352502645372,-0.000353883734293,-0.000355259842358,-0.0003566291212,-0.000357995270324,-0.000359358097919,-0.000360718571407,-0.000362083202293,-0.000363446254222,-0.000364804287314,-0.000366155734265,-0.000367494107211,-0.00036881552866,-0.000370123634992,-0.000371420947851,-0.000372706422489,-0.000373978568979,-0.000375234315366,-0.000376472443022,-0.000377699913928,-0.000378918713475,-0.000380133696294,-0.000381347081661,-0.000382561630229,-0.000383776072913,-0.000384987854605,-0.000386197878695,-0.000387403169155,-0.000388601929676,-0.00038979526504,-0.000390982359749,-0.000392162377301,-0.000393337733448,-0.000394506338361,-0.000395666054325,-0.000396814755766,-0.000397952798838,-0.000399083437154,-0.000400210793126,-0.00040133216686,-0.000402443388286,-0.000403546213788,-0.000404639339204,-0.000405717035151,-0.000406781689568,-0.000407833117048,-0.000408875060682,-0.000409909282257,-0.000410935011265,-0.000411955071842,-0.0004129733903,-0.00041399248003,-0.000415005064627,-0.000416016718216,-0.000417029004341,-0.000418043436749,-0.000419061218649,-0.000420075559935,-0.000421083956135,-0.000422083776559,-0.000423074892733,-0.000424051480439,-0.000425015298265,-0.000425969439766,-0.000426911852055,-0.000427842880642,-0.000428756218592,-0.000429654436641,-0.000430538087837,-0.000431405741016,-0.000432247359237,-0.000433059300806,-0.000433840226601,-0.00043458277978,-0.000435281460356,-0.000435928131384,-0.000436519518712,-0.000437051538461,-0.000437523538147,-0.000437940724143,-0.000438309976012,-0.000438641619203,-0.000438942851743,-0.000439218524856,-0.00043947344515,-0.000439718909111,-0.000439965233491,-0.000440214893493,-0.000440477209085,-0.000440746415413,-0.000441022297541,-0.000441302359569,-0.000441585952339,-0.000441872673938,-0.000442162347112,-0.000442452044992,-0.000442735726776,-0.000443015559668,-0.000443289975221,-0.000443556651554,-0.000443818928026,-0.000444075499037,-0.00044432108932,-0.000444554145634,-0.000444775447162,-0.000444987286493,-0.000445193754482,-0.000445392927186,-0.000445579033473,-0.000445755642296,-0.000445922285074,-0.000446079924349,-0.000446231970578,-0.000446382054357,-0.00044652705779,-0.000446664053427,-0.000446789841101,-0.000446904725672,-0.000447011034908,-0.000447110334638,-0.000447202087159,-0.000447283659617,-0.000447353192162,-0.000447408284575,-0.000447450923537,-0.000447485098741,-0.00044750999247,-0.000447527201272,-0.000447537293436,-0.000447538440539,-0.000447532452549,-0.000447519869571,-0.000447507263603,-0.000447490233612,-0.000447469545127,-0.00044744388456,-0.000447413489157,-0.000447376319515,-0.000447332931505,-0.00044728313155,-0.00044722691209,-0.00044715917428,-0.000447077474619,-0.000446981740857,-0.000446878903296,-0.000446766261029,-0.000446644410162,-0.000446515261461,-0.000446379833625,-0.000446234906193,-0.000446079448663,-0.000445915459519,-0.000445743485381,-0.000445564946467,-0.000445376282286,-0.000445176441712,-0.000444966953323,-0.000444746411244,-0.000444508877658,-0.000444255167805,-0.000443986770814,-0.000443705479607,-0.000443412401999,-0.00044310997646,-0.000442796073357,-0.000442470272325,-0.000442129688161,-0.000441772173566,-0.000441400079322,-0.000441019341655,-0.000440627764429,-0.000440225526673,-0.000439808362285,-0.00043937576145,-0.000438922239044,-0.00043845042495,-0.000437963031558,-0.000437465307532,-0.000436958612503,-0.000436440713753,-0.000435907337363,-0.000435359552189,-0.000434799780904,-0.000434225667362,-0.000433645340505,-0.000433060857878,-0.000432469325116,-0.000431868141582,-0.00043125219765,-0.000430620366405,-0.000429977125484,-0.000429325783299,-0.000428664188456,-0.000427996204278,-0.000427318775631,-0.000426625505868,-0.000425917224268,-0.000425192077342,-0.000424452928897,-0.00042370348598,-0.000422946895965,-0.000422174484866,-0.000421387498681,-0.000420584971118,-0.000419758833541,-0.000418916014286,-0.000418056734511,-0.00041718270458,-0.000416295430191,-0.00041539459916,-0.000414473823743,-0.000413534395616,-0.000412577303062,-0.000411602662957,-0.000410615081354,-0.000409613395775,-0.000408596828383,-0.000407566155431,-0.000406521207517,-0.000405460835587,-0.000404387494444,-0.000403303175578,-0.000402206426106,-0.000401098394036,-0.000399978719845,-0.000398847147899,-0.000397706290094,-0.000396551887612,-0.000395382896182,-0.000394200905551,-0.000393004707708,-0.000391791281894,-0.000390560966585,-0.000389312744035,-0.000388046321238,-0.000386757931717,-0.000385444139454,-0.000384108979612,-0.000382754962483,-0.000381378148288,-0.000379976667926,-0.00037855322334,-0.0003771106389,-0.000375649149655,-0.000374171106899,-0.000372679652651,-0.000371176834418,-0.000369662283517,-0.000368132343936,-0.000366587112726,-0.000365030768303,-0.00036346542954,-0.000361889208678,-0.00036029506545,-0.000358682448439,-0.000357051211439,-0.000355400457237,-0.000353730408834,-0.000352042767335,-0.000350337085022,-0.000348614130243,-0.000346870567237,-0.000345101208465,-0.000343311823195,-0.000341503426665,-0.000339672866282,-0.000337818573391,-0.000335938919165,-0.000334034574937,-0.00033210584263,-0.000330154541421,-0.000328180240232,-0.000326188200256,-0.000324180154794,-0.000322155160142,-0.000320112247517,-0.000318055602121,-0.000315983664228,-0.000313898685096,-0.000311798248851,-0.000309678715375,-0.000307542016299,-0.000305386152144,-0.000303207685106,-0.0003010089691,-0.000298791426738,-0.000296556273424,-0.000294303886953,-0.000292033882771,-0.000289745294359,-0.000287441085049,-0.000285121547415,-0.000282784361535,-0.000280429512066,-0.000278055176707,-0.000275657264582,-0.000273231245108,-0.000270779792587,-0.000268303123783,-0.000265802247407,-0.000263276290161,-0.000260723090807,-0.000258146270394,-0.000255544545343,-0.000252921445484,-0.000250283019249,-0.000247634181098,-0.000244975689171,-0.000242302611797,-0.000239617910595,-0.000236922097047,-0.000234213818476,-0.000231492923799,-0.000228762174643,-0.000226022147962,-0.000223267828573,-0.00022049543086,-0.000217702168336,-0.000214890571261,-0.000212061053374,-0.000209207946253,-0.000206333141889,-0.000203437355132,-0.00020052247412,-0.000197582300998,-0.000194619477192,-0.000191635356589,-0.000188629669096,-0.000185603867354,-0.000182555947368,-0.000179491399093,-0.000176410190584,-0.000173310412293,-0.000170188508427,-0.000167045293635,-0.000163883016043,-0.000160700471968,-0.000157499100841,-0.000154275797869,-0.000151031387239,-0.00014776364645,-0.000144472375682,-0.000141160131094,-0.000137829141902,-0.000134481715431,-0.000131118316168,-0.000127738978403,-0.00012434424768,-0.000120935654536,-0.000117516183792,-0.000114085735152,-0.000110645288884,-0.000107193218114,-0.000103726517842,-0.000100243820525,-9.67465525722e-05,-9.32328162804e-05,-8.97017398949e-05,-8.61524898822e-05,-8.25808949133e-05,-7.89881554321e-05,-7.53739585262e-05,-7.17403971947e-05,-6.80891315845e-05,-6.44231599614e-05,-6.07384675534e-05,-5.70363595476e-05,-5.33160993989e-05,-4.95811055911e-05,-4.5830976608e-05,-4.20646640727e-05,-3.82817546963e-05,-3.44810655957e-05,-3.06630472785e-05,-2.68269881086e-05,-2.2875317853e-05,-1.87117495555e-05,-1.42540330768e-05,-9.43408799152e-06,-3.7122889575e-06,1.0759861886e-06,5.47172144529e-06,9.54198857086e-06,1.33674988214e-05,1.70518454312e-05,2.06929334795e-05,2.41960972194e-05,2.74636363378e-05,3.04124491519e-05,3.29758256396e-05,3.4614382513e-05,3.71652998038e-05,4.00851049054e-05,4.33082462512e-05,4.67503743793e-05,5.03105012827e-05,5.38920670948e-05,5.74922380189e-05,6.11088619558e-05,6.47442522289e-05,6.83947374409e-05,7.20614259901e-05,7.57414225606e-05,7.94348604793e-05,8.31397693714e-05,8.68599455965e-05,9.05941217304e-05,9.43440954375e-05,9.81051388263e-05,0.000101878862934,0.000105664219139,0.00010946090651,0.000113267697299,0.000117085844622,0.000120915037814,0.000124753058322,0.000128597074081,0.000132447028433,0.000136301445862,0.000140162173715,0.000144031189813,0.000147908868152,0.000151799127203,0.000155701713023,0.000159614666618,0.000163535030657,0.000167468108339,0.000171413776296,0.000175368043855,0.000179330736415,0.000183303077954,0.000187281811718,0.000191263326899,0.000195244146321,0.000199224664154,0.000203207737644,0.000207195035584,0.000211183201937,0.000215178576126,0.000219185409137,0.000223199491581,0.000227220029014,0.000231248676868,0.000235290886448,0.000239346634926,0.000243416635019,0.000247494759759,0.000251580710041,0.000255671194411,0.000259760117324,0.000263851044797,0.000267948012148,0.000272050829946,0.000276153793056,0.000280256029755,0.000284359182516,0.000288462818207,0.000292571935653,0.00029668884728,0.000300817433352,0.000304954551278,0.000309094434504,0.00031323678864,0.000317381192802,0.000321531534278,0.000325683964051,0.00032984025014,0.000334000038248,0.000338160320433,0.000342317873382,0.000346472262897,0.0003506265427,0.00035477941576,0.000358932400541,0.000363086560001,0.000367238309668,0.000371386620886,0.000375527859249,0.000379660868147,0.000383785956858,0.000387901870456,0.000392007850947,0.000396104908729,0.000400193357702,0.000404270299087,0.000408334140976,0.000412386718037,0.000416428389834,0.000420460094997,0.000424484290729,0.000428500195748,0.000432508868704,0.000436509482142,0.000440499397755,0.000444473097876,0.000448434783989,0.00045238466931,0.000456322861318,0.00046025304175,0.000464169544644,0.000468068570712,0.00047194980783,0.000475811150885,0.000479653433658,0.00048348097566,0.000487294599616,0.000491088635415,0.000494863695851,0.000498617270752,0.00050234552117,0.000506057379225,0.000509753557999,0.000513433588973,0.000517098964133,0.000520749113036,0.000524379705319,0.000527994014545,0.000531590683429,0.000535165539507,0.000538722180901,0.000542258654382,0.000545767118316,0.000549249199958,0.000552701597042,0.000556122316683,0.000559515311695,0.000562883861184,0.00056622837962,0.000569549792862,0.000572847843977,0.000576117136916,0.000579361782467,0.000582582798044,0.000585780872522,0.000588959503354,0.000592112973711,0.00059523433578,0.000598321608344,0.000601378084492,0.000604403546581,0.00060740052206,0.000610368990016,0.00061330622011,0.000616213394645,0.000619085117439,0.000621923587443,0.000624734768036,0.000627519046422,0.000630274733255,0.000632996448246,0.000635684381755,0.000638341070393,0.000640965826722,0.000643558140926,0.000646118595842,0.000648648472428,0.000651143527516,0.000653603323736,0.000656024420378,0.000658410165804,0.000660759980536,0.000663071821326,0.000665346445743,0.000667585114708,0.000669784689976,0.000671945363161,0.000674066228463,0.000676149366632,0.000678193728025,0.000680204883509,0.000682179347027,0.000684119688014,0.000686023718034,0.00068788797539,0.000689716908086,0.000691512349489,0.000693272587418,0.000694995284893,0.00069668297407,0.00069833089429,0.000699940123492,0.000701510465143,0.000703040635955,0.000704534096706,0.000705990129016,0.000707401267774,0.000708771828433,0.000710102385559,0.000711395254477,0.000712645191493,0.000713854384319,0.000715022077355,0.000716148967423,0.000717234703104,0.000718278664463,0.000719284116116,0.000720248793144,0.000721169312237,0.000722044916651,0.000722879509139,0.000723678706194,0.000724441287966,0.000725165181279,0.000725847069735,0.000726486264992,0.000727082937266,0.000727637878048,0.000728155188382,0.000728633556432,0.000729072464507,0.000729463746866,0.000729804156095,0.000730097543948,0.000730342388064,0.000730544887142,0.000730706131082,0.000730827129483,0.000730904143296,0.000730939884599,0.000730935621655,0.000730895457565,0.000730822094141,0.000730716502365,0.000730581343595,0.000730412618183,0.000730208108227,0.000729964521575,0.000729681854873,0.000729361890272,0.00072899965885,0.0007285940572,0.00072814291391,0.000727645860078,0.000727100941397,0.000726507279332,0.000725870100024,0.000725188730762,0.000724468399649,0.000723703994222,0.00072289793682,0.0007220514558,0.00072116467494,0.000720237506012,0.000719272342157,0.000718269192777,0.000717222803492,0.000716134254209,0.00071499944905,0.000713817466996,0.000712594019317,0.000711328920051,0.000710027373145,0.000708691156516,0.000707317730749,0.000705907874995,0.000704465305406,0.000702989857183,0.000701485622276,0.000699957346763,0.000698400531446,0.000696812570146,0.000695185934699,0.000693516921993,0.000691804602655,0.00069004899469,0.000688250769814,0.000686410608929,0.000684527145811,0.000682596178482,0.000680616058235,0.000678588640864,0.000676513565663,0.000674398749269,0.000672248498514,0.000670061036775,0.000667832073516,0.000665560961989,0.000663244680073,0.000660885748343,0.000658486370192,0.000656044639841,0.000653562764082,0.000651032495332,0.000648450243332,0.000645812629675,0.000643123951634,0.000640387295107,0.000637600820881,0.000634760620098,0.000631867489184,0.000628920497525,0.000625924108866,0.000622881347171,0.000619799490613,0.000616678452406,0.000613518758547,0.000610318538533,0.000607080489453,0.000603810935084,0.000600511421135,0.000597182343091,0.000593823669152,0.000590432925409,0.000587009005002,0.000583555567739,0.000580074290748,0.000576565253802,0.00057302743777,0.000569459899774,0.000565862036491,0.000562237373429,0.000558585226821,0.000554907327327,0.000551201799188,0.000547470799196,0.000543713764445,0.000539929628507,0.000536122205332,0.000532289901675,0.000528434871099,0.000524556335346,0.000520655799612,0.000516733626054,0.000512787881603,0.000508819692325,0.000504823311209,0.000500800464551,0.000496750533746,0.000492674740451,0.000488576018552,0.000484452492268,0.000480302418517,0.000476124951877,0.000471926151464,0.000467706727299,0.00046346908736,0.000459219470207,0.000454957053237,0.000450682816394,0.000446389889158,0.000442080340906,0.000437752076709,0.000433408273809,0.000429047201642,0.000424666840997,0.000420266238918,0.000415838901074,0.000411382507001,0.000406900517796,0.000402395653096,0.000397871108712,0.000393326790835,0.000388765763188,0.000384186781124,0.00037959014364,0.000374978509424,0.000370356622281,0.000365732344952,0.000361100776638,0.000356459793651,0.000351805370387,0.000347140397009,0.000342462446178,0.000337769843495,0.000333063772726,0.000328345276938,0.000323611032893,0.000318855884046,0.000314081370851,0.000309290805356,0.000304485697483,0.000299666658411,0.000294834847156,0.000289996233257,0.000285152442009,0.00028029925569,0.000275437619922,0.000270571449252,0.000265702785778,0.000260828470716,0.000255951135396,0.000251073247224,0.000246196692058,0.000241316393919,0.000236430055864,0.000231539740676,0.000226648719815,0.000221755652256,0.000216858625725,0.000211958695832,0.000207057150032,0.000202153855929,0.000197243430269,0.000192325875611,0.000187404254319,0.000182481915633,0.000177559773949,0.000172640664508,0.000167724858758,0.000162813186973,0.000157905608043,0.000153001998717,0.000148103848755,0.000143217207266,0.000138339546301,0.000133471689597,0.000128608748768,0.000123747791547,0.000118887736752,0.000114033883048,0.000109184021698,0.000104337155204,9.94954373913e-05,9.46577847832e-05,8.98189181373e-05,8.49848395682e-05,8.01564524604e-05,7.53381485695e-05,7.05322825747e-05,6.57352803914e-05,6.0948093268e-05,5.61733564511e-05,5.14125730684e-05,4.66621845379e-05,4.1928855994e-05,3.72104601892e-05,3.25065725834e-05,2.78141685538e-05,2.31322934951e-05,1.84631177582e-05,1.38064842501e-05,9.15950348805e-06,4.52280261489e-06,-1.0306858589e-07,-4.71657946886e-06,-9.32141439685e-06,-1.3911999105e-05,-1.84893258113e-05,-2.30516114643e-05,-2.76003788514e-05,-3.21325297082e-05,-3.66425446038e-05,-4.11334413245e-05,-4.5604798346e-05,-5.0055418195e-05,-5.44845655036e-05,-5.88953270484e-05,-6.32880918047e-05,-6.76586610454e-05,-7.20069490681e-05,-7.63336429739e-05,-8.06471800888e-05,-8.49465612388e-05,-8.92302936392e-05,-9.3501462784e-05,-9.77562264891e-05,-0.000101995240925,-0.000106213213444,-0.000110412808351,-0.000114596299201,-0.000118762504837,-0.000122909273434,-0.00012703030094,-0.000131127023991,-0.000135193606593,-0.000139232293886,-0.000143245164674,-0.000147232124224,-0.000151195696862,-0.000155133808674,-0.000159048032151,-0.000162934856578,-0.00016679777452,-0.00017063612931,-0.000174452098746,-0.000178244308801,-0.000182010824821,-0.000185755862225,-0.000189479998272,-0.000193182557646,-0.00019686467876,-0.000200525259259,-0.000204163689661,-0.000207780500307,-0.000211377768722,-0.000214957446366,-0.000218520594958,-0.00022206463072,-0.00022558695371,-0.000229081824211,-0.000232549227278,-0.000235987757341,-0.00023939985267,-0.000242787522735,-0.000246146342467,-0.000249476803858,-0.00025277504169,-0.000256047136463,-0.000259291420226,-0.000262509948548,-0.000265704948347,-0.000268878925279,-0.00027202957509,-0.000275153216649,-0.000278249736702,-0.000281318560445,-0.000284360579747,-0.000287373047194,-0.00029035641141,-0.000293311947803,-0.000296236596915,-0.000299128263503,-0.00030198753244,-0.00030481715962,-0.000307619060894,-0.000310395301935,-0.000313147978433,-0.000315872869227,-0.000318567811148,-0.000321233297111,-0.000323865940815,-0.000326468349889,-0.000329044459775,-0.000331588645572,-0.000334101612018,-0.000336581158921,-0.000339026899327,-0.000341441390371,-0.000343826940822,-0.000346185573041,-0.000348518893661,-0.00035082939363,-0.000353113651695,-0.000355374365252,-0.000357613931639,-0.000359831872774,-0.000362027070121,-0.000364196520902,-0.000366337758037,-0.000368452665165,-0.000370543151328,-0.000372604798299,-0.000374639461708,-0.000376645773905,-0.000378620198373,-0.00038056712813,-0.000382483512062,-0.000384372917959,-0.000386237882897,-0.000388075270124,-0.000389887614892,-0.000391673080805,-0.00039342879017,-0.000395158568054,-0.000396865516355,-0.000398542223553,-0.000400188694772,-0.000401807207486,-0.000403398326848,-0.000404962965823,-0.000406499234224,-0.000408003391386,-0.000409479756983,-0.000410927278011,-0.000412343800168,-0.000413733621631,-0.000415099984562,-0.000416438436637,-0.000417749037311,-0.000419028777717,-0.000420273291913,-0.000421489364805,-0.000422676133716,-0.000423831752409,-0.000424960765764,-0.000426064152601,-0.000427140900389,-0.000428198926812,-0.000429238992801,-0.000430264478749,-0.000431187750915,-0.00043192356587,-0.00043247303011,-0.000432835240287,-0.000433015239665)
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(233)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Callithrix_jacchus-male-liver-H3K27Ac-ERR572209.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) : 233',bty='n')
dev.off()
