# R script for Peak Model
#  -- generated by MACS
p <- c(0.0414378180744,0.0484226605899,0.0553642358342,0.0622418507647,0.0691730794876,0.0689736738031,0.06878461464,0.0690432776741,0.0691693171162,0.0692012972732,0.0692520892872,0.0692614952157,0.0692003566803,0.0691533270378,0.0690837231667,0.0691890695661,0.0692859506298,0.0689840203245,0.0689642678746,0.0688175353898,0.0686312980052,0.0686077831839,0.0685974366625,0.0685654565055,0.0685099615273,0.0684450606206,0.068340654814,0.0684149616493,0.068340654814,0.0685955554768,0.0687705057472,0.0685917931054,0.0686463474908,0.0685842683626,0.0686284762266,0.0685250110129,0.0683020905071,0.0683209023641,0.0684064963136,0.0682729321287,0.0682569420502,0.0683011499143,0.0681939223292,0.0681544174294,0.0680161502803,0.0679587741163,0.068208031222,0.0682306054504,0.0681892193649,0.0680264968016,0.0679973384232,0.0679916948661,0.067859071274,0.0679089226952,0.0678816455025,0.0679456058164,0.0678280317099,0.0677367942033,0.0675703092686,0.0674621410907,0.0672580324419,0.0672505076991,0.0672853096346,0.0672853096346,0.0673897154411,0.0672871908203,0.0673718441769,0.0673718441769,0.0674612004978,0.0676126359469,0.0677593684318,0.0676869427822,0.0676493190682,0.0676399131396,0.0676173389112,0.067561843933,0.0674386262694,0.0673069432702,0.0673868936626,0.0672505076991,0.0671968939066,0.0670210030433,0.0671263494427,0.0670934286929,0.0671517454497,0.0672110027993,0.0672119433922,0.0670426366789,0.0666983796952,0.0667491717092,0.0666156075243,0.0666701619097,0.0665516472104,0.0665704590674,0.0663494197473,0.0663484791545,0.0663014495119,0.0664557067396,0.0666334787885,0.0666109045601,0.0667425875593,0.0667764489019,0.0668253597302,0.0669184784225,0.0669673892508,0.0669260031653,0.0671724384924,0.0671461018926,0.0671978344994,0.0672467453277,0.067244864142,0.0672072404279,0.067175260271,0.0670379337147,0.0671216464784,0.0670322901575,0.0668714487799,0.066978676365,0.0669269437582,0.0668676864085,0.0667510528949,0.0668432309944,0.0667585776377,0.0669034289369,0.0668206567659,0.0669109536797,0.0668874388584,0.066807488466,0.0669843199221,0.0670369931218,0.067194072128,0.0672542700705,0.0673022403059,0.0673248145344,0.0675119925118,0.0675449132616,0.06758723994,0.0677132793821,0.0676088735755,0.0675355073331,0.067441448048,0.0674320421194,0.0675467944473,0.0674480321979,0.0674480321979,0.0675787746043,0.0678449623813,0.0677584278389,0.0677922891816,0.0679785265662,0.0681045660083,0.0682748133144,0.0682992687286,0.0683557042997,0.0682371896004,0.0683566448925,0.068321842957,0.068448822992,0.068416842835,0.0684507041777,0.0686077831839,0.0685240704201,0.068461050699,0.0684751595918,0.0684281299492,0.0683933280137,0.0682381301932,0.0683171399927,0.0683763973424,0.0683378330355,0.0683839220852,0.0683989715708,0.0686867929834,0.0687441691473,0.0689463966104,0.0688946640036,0.0690583271598,0.0689398124605,0.0690931290953,0.0690959508738,0.0689670896532,0.0690743172382,0.0689539213532,0.0691354557736,0.0693010001154,0.0694618414931,0.0695041681714,0.0698239697409,0.0698202073695,0.0701324841962,0.0704080779017,0.0705510480151,0.0707175329499,0.0706893151643,0.0706705033073,0.0707777308924,0.0708351070563,0.070672384493,0.0707523348854,0.0707288200641,0.0704870877012,0.0705858499506,0.0705811469864,0.0708031268994,0.0710241662195,0.0712273342754,0.0713148094106,0.0715245616165,0.0717634722008,0.0718791651215,0.0722384715908,0.0722779764906,0.0723899070399,0.0723052536833,0.0722873824191,0.0722337686265,0.0722920853833,0.0725488672318,0.0726523324455,0.0727746095162,0.072877134137,0.0728592628728,0.0729345103009,0.0731602525853,0.0733380246342,0.0734132720624,0.0735703510686,0.0737048558463,0.0737763409031,0.0739691624376,0.0740274791944,0.0742466373288,0.074498716213,0.0748561414966,0.0750235670242,0.0752314380444,0.0753744081578,0.0755098535284,0.0756763384632,0.0756509424562,0.0758146056123,0.0758465857693,0.0760459914538,0.0758766847405,0.0760074271469,0.0759839123256,0.0763789613233,0.0763140604165,0.0764043573302,0.0765727234507,0.0768172775921,0.0771370791616,0.0772010394755,0.0774117322742,0.0776506428585,0.0779920780636,0.0778547515073,0.0780588601561,0.0781689095197,0.0785075229463,0.0785329189533,0.0787680671662,0.0788809383083,0.0791706409066,0.0791649973495,0.0793183139843,0.0796381155538,0.079852570724,0.0799635606805,0.0799795507589,0.080334154264,0.0803802433137,0.0806558370192,0.0806991042904,0.0808749951536,0.0811026186237,0.0811016780308,0.0811562324162,0.0815559843781,0.0817544494698,0.0818090038552,0.081987716497,0.0821664291388,0.0824476664014,0.0826263790432,0.0826404879359,0.0829809825482,0.0831465268901,0.0832725663322,0.083451278974,0.0836807836297,0.083900882357,0.0840880603344,0.0842912283904,0.0844633568822,0.0848668712155,0.0851010788355,0.0855563257757,0.0858638996381,0.0864649384703,0.0870452842597,0.0875992934492,0.088335777652,0.0890938954903,0.090065527906,0.0908038932944,0.0914726548118,0.0924160694419,0.092998296417,0.0934911670712,0.0938946814046,0.0944355222942,0.0946603239857,0.0949142840556,0.095000818598,0.095406214117,0.0958934412141,0.0957918571861,0.0960533419988,0.0963176485901,0.0966308660097,0.0967879450159,0.0971312614067,0.0974520035691,0.097743587353,0.0979025475449,0.0980379929156,0.0983624974493,0.0988327938751,0.0990387837096,0.0992381893941,0.0995222484353,0.0996501690631,0.0998270005192,0.100065911103,0.100218287145,0.100069673475,0.100344326588,0.100482593737,0.100398880973,0.10049011848,0.100640613336,0.100939721863,0.101015909884,0.101496552831,0.101727938672,0.102254670669,0.102444670425,0.10262432366,0.103153877435,0.103283679249,0.10358090659,0.104026747601,0.104384172885,0.104334321464,0.104529024184,0.104951350374,0.105303132101,0.105570260471,0.105621993077,0.105922042197,0.106094170689,0.106194814124,0.106286051631,0.106493922651,0.106510853322,0.106553180001,0.10661243735,0.106760110428,0.10728213946,0.107586891544,0.107650851858,0.107668723122,0.107860604064,0.108292336183,0.108661989174,0.109010949122,0.109210354806,0.109365552627,0.10935332492,0.109537681118,0.110099215051,0.110455699742,0.110839461625,0.110935402096,0.111242035365,0.111329510501,0.111674708077,0.111970994825,0.112435647694,0.112947330205,0.113121339883,0.113401636553,0.113691339151,0.114045002063,0.114356338297,0.114520942046,0.11474668433,0.114851090137,0.114909406894,0.115121040285,0.115146436292,0.115374059762,0.115518911061,0.115628019832,0.115822722552,0.1161716825,0.116442573242,0.116823513346,0.116971186424,0.117284403844,0.117607027192,0.117843115998,0.118158214603,0.118260739224,0.118434748901,0.118758312842,0.118981233348,0.118877768134,0.119177817254,0.119250242903,0.119601084037,0.119915242049,0.120150390262,0.120439152268,0.120682765816,0.120755191466,0.121003507979,0.121534002347,0.121563160725,0.121866031624,0.121910239488,0.122099298651,0.122174546079,0.122477416977,0.122313753821,0.122349496349,0.122415337849,0.122598753455,0.122777466097,0.12275207009,0.123033307352,0.123029544981,0.123370039593,0.123540286899,0.124263602802,0.124768701163,0.124959641512,0.12527568071,0.12554280908,0.125798650336,0.125848501757,0.126127857834,0.126153253841,0.126442015846,0.126389342647,0.126395926797,0.12672043133,0.126743005559,0.126666817538,0.126622609674,0.126783451051,0.126699738288,0.126853995515,0.126869985594,0.126952757765,0.126851173737,0.126663995759,0.126473996003,0.126758995637,0.12680602528,0.127032708157,0.127258450441,0.127308301863,0.127253747477,0.127297955341,0.127499242211,0.127558499561,0.127839736824,0.127992112866,0.127953548559,0.127735331017,0.12766384596,0.127780479474,0.12774285576,0.127618697504,0.127558499561,0.127740974574,0.127546271854,0.127315826605,0.127500182804,0.127601766832,0.127445628419,0.127003549779,0.126822955951,0.126643302716,0.126494689046,0.126224738898,0.126299045733,0.126118451905,0.125946323413,0.125514591295,0.12534152221,0.125268155968,0.125071572062,0.125069690876,0.124839245627,0.124481820344,0.124207167231,0.124192117745,0.123926870561,0.124000236804,0.12393627649,0.123985187318,0.123878900326,0.123612712549,0.123568504685,0.12337568315,0.123146178494,0.122864941232,0.122531971362,0.122242268764,0.121867912809,0.121466279662,0.121098507857,0.120658310402,0.120334746461,0.120193657533,0.119751578893,0.119697024508,0.119559697952,0.119163708361,0.118987817498,0.118582421979,0.11857301605,0.118673659485,0.118610639764,0.118287075823,0.11829930353,0.117912719869,0.117576928221,0.117373760165,0.117249601908,0.117212918787,0.116541335491,0.11605598958,0.115512326911,0.115216040163,0.115065545307,0.114708120023,0.114661090381,0.114345991775,0.113918022028,0.113712972786,0.113754358872,0.11343361671,0.113272775332,0.113237973396,0.112744162149,0.112676439464,0.112316192402,0.112061291739,0.11183084649,0.111368074808,0.111241094773,0.111168669123,0.110934461503,0.110663570762,0.110512135313,0.110155650622,0.109893225216,0.109721096724,0.109621393882,0.109514166297,0.109231047849,0.108966741258,0.108721246523,0.108523722024,0.108366643018,0.10829797974,0.108151247255,0.108051544413,0.1078295645,0.107499416409,0.107173971283,0.10718619899,0.106911545877,0.106630308614,0.106361299059,0.105957784725,0.105623874263,0.10527961728,0.104812142632,0.104449073792,0.104341846207,0.103868728002,0.103693777732,0.103233827827,0.102740957173,0.102113581741,0.101681849622,0.101020612848,0.100604870807,0.100043336875,0.0990472490453,0.0982910123926,0.0972384889918,0.0963994801682,0.0956375999584,0.0952190361395,0.0946819576213,0.09417685926,0.0935701768708,0.0931553754232,0.0928252273324,0.0924358218918,0.0924207724062,0.0923492873495,0.0921235450651,0.0918206741669,0.0914585459191,0.0914256251693,0.0912440907489,0.0909572099292,0.0908876060582,0.0907474577233,0.0904982006177,0.090216963355,0.0901304288127,0.0901200822913,0.0899564191352,0.0894588455167,0.0893666674173,0.0892716675393,0.0889970144266,0.0886715693,0.0883423618019,0.0881185007033,0.0877864714267,0.0874177590289,0.0871713237018,0.0871468682876,0.0867207797259,0.0866445917049,0.0865082057414,0.0864291959419,0.0863238495425,0.0862391961859,0.0860031073802,0.0858309788883,0.0858046422885,0.0856287514253,0.0855318703615,0.0851452866996,0.084952465165,0.0847991485302,0.0845244954176,0.0842865254261,0.0842526640835,0.0840184564634,0.0838077636647,0.0835359323306,0.0834221205956,0.0830731606476,0.0828841014845,0.0826028642219,0.0825436068722,0.0824335575086,0.0823244487378,0.0822821220595,0.0820413302895,0.0818560334977,0.0817083604201,0.0815973704636,0.081429944936,0.0813039054939,0.0810414800883,0.0805862331482,0.0803623720495,0.0800585605585,0.0798629172453,0.0797208877248,0.0794349474979,0.0794829177333,0.0794283633479,0.0792383635919,0.0790822251786,0.0790239084218,0.0787887602089,0.0785733644459,0.0783504439401,0.0782338104265,0.0780880185345,0.0779704444281,0.0776769794584,0.0775086133379,0.0773694055959,0.0773289601033,0.077108861376,0.0770411386907,0.0767994063279,0.0766141095361,0.0764269315587,0.0762491595097,0.0761202982891,0.0760027241826,0.0759124272689,0.0756998532844,0.0756321305991,0.0755916851065,0.0753593586722,0.0752417845657,0.0751157451236,0.0748034682969,0.0746840130048,0.0745100033273,0.0742974293428,0.074239112586,0.0741591621936,0.073998320816,0.0741215384796,0.074081092987,0.073928716945,0.0738704001882,0.0735336679474,0.0733361434485,0.0733464899699,0.0731442625068,0.0729589657151,0.0726438671098,0.0724736198037,0.0722770358977,0.0722920853833,0.0722384715908,0.0722807982691,0.0722892636048,0.0722158973624,0.0720475312419,0.0718688186001,0.0717042148511,0.0716458980943,0.0714511953741,0.0713411460104,0.0711868887828,0.0710429780765,0.0709743147983,0.0707476319211,0.0708106516422,0.0708257011278,0.070957384127,0.0710486216336,0.0709272851558,0.0706874339786,0.0705867905435,0.0706074835862,0.0704889688869,0.0702914443881,0.0701353059748,0.0698409004122,0.0697571876484,0.069551197814,0.0696809996275,0.0696198610921,0.0694966434286,0.0694524355645,0.0694411484503,0.0694844157215,0.0693884752506,0.0694223365933,0.069278425887,0.0689755549888,0.068657634605,0.0685588723556,0.0684253081707,0.0682418925646,0.0680565957729,0.0680509522158,0.0679634770806,0.0679813483447,0.0677904079959,0.0677838238459,0.0678797643168,0.0677377347962,0.0677979327387,0.0676681309252,0.067466844055,0.0672392205849,0.0673558540985,0.0672947155631,0.0673229333487,0.0671018940286,0.0670097159291,0.0671470424854,0.0671931315352,0.0673257551272,0.0673878342554,0.0675674874901,0.0674442698265,0.06733327987,0.0673323392772,0.0672570918491,0.0674216955981,0.0673295174986,0.0672617948133,0.0671470424854,0.0670652109073,0.0669523397652,0.0668404092158,0.0667858548304,0.0665892709245,0.0668488745515,0.0665582313604,0.0663475385616,0.066167885327,0.066015509285,0.0660653607062,0.0658123412291,0.0657671927722,0.0656910047513,0.0657982323363,0.065547094045,0.0655903613161,0.0658339748647,0.0659383806712,0.0659769449781,0.0658010541149,0.0658734797645,0.0658349154575,0.0659600143068,0.0659750637924,0.0661462516914,0.0660794695989,0.0659158064428,0.065762489808,0.0657803610722,0.0660108063208,0.0659854103138,0.0659477865997,0.0659496677854,0.0659656578639,0.066098281456,0.066244073348,0.0662751129121,0.0663287267046,0.0661923407411,0.0660192716564,0.0660691230776,0.0661029844202,0.0660907567132,0.0660766478204,0.0658170441934,0.0657022918655,0.0657333314296,0.0656091731732,0.0655160544809,0.065547094045,0.0655264010022,0.0654934802524,0.0655122921095,0.0654163516386,0.0655301633736,0.0655903613161,0.065565905902,0.0658396184218,0.0660926378989,0.0661114497559,0.0661406081343,0.0661669447341,0.0662487763122,0.0664049147256,0.0663682316044,0.0663221425546,0.0664143206541,0.0663870434614,0.0662544198693,0.0661914001483,0.0661039250131,0.0661518952485,0.0659449648212,0.0659129846642,0.0658593708717,0.0659844697209,0.0660371429206,0.0659383806712,0.0660437270706,0.0661246180558,0.0661848159983,0.0662083308196,0.0664368948825,0.0663249643332,0.0663334296689,0.0662807564692,0.066434073104,0.0665619937318,0.0665431818747,0.066642884717,0.0666729836883,0.0668526369229,0.0666739242811,0.0668846170799,0.0671592701925,0.0673031808988,0.0671272900355,0.0672561512562,0.0676041706113,0.0674762499835,0.0676239230612,0.0676897645608,0.0678985761738,0.0678741207597,0.0677875862173,0.0677631308032,0.0678364970456,0.0678647148312,0.0676624873681,0.068004863166,0.068018031466,0.0679973384232,0.0680377839158,0.0680387245087,0.0679888730876,0.0680029819803,0.0680565957729,0.0678872890596,0.0680453086586,0.068030259173,0.0680453086586,0.0680961006726,0.0681525362437,0.0682926845786,0.0684695160347,0.0684572883276,0.0685250110129,0.0686341197837,0.0686557534193,0.0685983772554,0.0687328820331,0.0687658027829,0.0687225355118,0.0686566940121,0.0687676839686,0.0690244658171,0.0689454560176,0.0689990698101,0.0691194656951,0.0692614952157,0.0692859506298,0.0692718417371,0.0694195148147,0.0694317425218,0.069348029758,0.0693000595226,0.0694543167502,0.0696095145708,0.0694289207433,0.0694552573431,0.0696170393136,0.0698098608481,0.0698324350766,0.0700280783897,0.0701710485031,0.0702340682242,0.0701625831675,0.0701607019818,0.0701663455389,0.0701494148675,0.0700346625396,0.0700120883112,0.0699537715544,0.070019613054,0.070241592967,0.0702199593314,0.0702980285381,0.0702839196453,0.070501196594,0.070551988608,0.0706968399071,0.0706046618077,0.0707184735427,0.0706996616857,0.0704372362801,0.0704852065155,0.0706046618077,0.0706413449289,0.0707852556352,0.0709649088698,0.070855800099,0.0710655523049,0.071045799855,0.0708539189133,0.0710091167338,0.0711163443189,0.0710900077191,0.0711530274401,0.0709018891488,0.0708285229063,0.0709047109273,0.0708858990703,0.0708153546064,0.071077780012,0.0712696609537,0.0711756016686,0.0713656014246,0.0714606013026,0.0716421357229,0.0717183237439,0.0718086206576,0.0718293137004,0.0719374818783,0.0719628778853,0.0718415414074,0.0719845115209,0.0719196106141,0.0719167888356,0.0719515907711,0.0718970363857,0.0720776302132,0.0721180757058,0.0721321845986,0.072173570684,0.0722412933693,0.0721011450345,0.0721585211984,0.0722140161767,0.0722695111549,0.0722168379552,0.0722779764906,0.0721754518697,0.0722412933693,0.0722224815123,0.072281738862,0.0725469860461,0.0725197088534,0.0724181248254,0.0726222334742,0.072763322402,0.0725582731603,0.0726570354097,0.0728536193157,0.0728714905799,0.0728348074587,0.0729251043724,0.0730135201005,0.0730633715216,0.0729034707368,0.0729109954796,0.0729834211292,0.0730135201005,0.0729307479295,0.0730840645643,0.0730295101789,0.0728893618441,0.0729994112077,0.0730407972932,0.0733888166482,0.0734593611121,0.0736841628036,0.0737029746606,0.0737594102317,0.0737086182177,0.0738478259598,0.0739127268665,0.073884509081,0.0740227762302,0.0737095588106,0.0738421824027,0.0736851033965,0.0737415389675,0.0737791626816,0.0737490637104,0.0736277272325,0.0735308461688,0.07356752929,0.0735966876684,0.0736013906327,0.0734697076335,0.0734377274765,0.0734998066047,0.0734518363693,0.0735524798044,0.0736239648611,0.0737358954104,0.0736559450181,0.0736042124112,0.0736089153755,0.0737377765961,0.0737048558463,0.0737462419318,0.0738976773809,0.0738355982527,0.0738355982527,0.0739776277733,0.0740086673374,0.073998320816,0.0740848553584,0.0741149543296,0.0741817364221,0.0740397069015,0.0740397069015,0.0741046078082,0.073979508959,0.0737706973459,0.0737754003102,0.0738036180957,0.0736568856109,0.0735872817399,0.0737951527601,0.0738261923242,0.0738440635884,0.0738327764741,0.0738948556023,0.0738732219668,0.0736738162822,0.0736785192465,0.0738901526381,0.0738562912954,0.0737001528821,0.0738478259598,0.0736032718184,0.0736775786536,0.0737650537888,0.0738704001882,0.0739851525161,0.0740782712084,0.0739870337018,0.0739973802232,0.0740067861517,0.0738600536668,0.0739061427166,0.0737904497958,0.0737104994034,0.0735901035185,0.0736484202752,0.0734179750266,0.0733615394555,0.073212925785,0.0731771832566,0.073231737642,0.0733004009202,0.073180945628,0.0731762426638,0.0732157475635,0.0731527278425,0.0734885194905,0.0735562421758,0.0736672321323,0.0737556478603,0.0736136183397,0.0735618857329,0.0737152023677,0.0737979745386,0.0736662915394,0.0736992122892,0.0734424304408,0.0733718859769,0.0735214402403,0.0734546581478,0.0735750540328,0.0736220836754,0.0736305490111,0.07356752929,0.0736126777469,0.0736568856109,0.0736615885752,0.0735628263258,0.0733032226987,0.0731988168922,0.0732148069707,0.0731301536141,0.0729599063079,0.0728686688013,0.0729091142939,0.0728442133872,0.0728348074587,0.0729175796296,0.0728301044944,0.0727840154447,0.0726015404315,0.0725639167174,0.0726683225239,0.0728206985659,0.0729006489583,0.0727068868309,0.0724435208324,0.0725789662031,0.0725253524105,0.0724087188969,0.0725996592458,0.072585550353,0.0725065405535,0.0724529267609,0.0722836200477,0.0725244118177,0.0725874315387,0.0723541645115,0.072490550475,0.0725968374672,0.0724811445465,0.0726372829598,0.0724877286965,0.0724331743111,0.0724538673538,0.0723776793328,0.0724491643895,0.0724068377112,0.0723964911899,0.0651482826759,0.0578709157836,0.0504778559705,0.0433886076485,0.0)
m <- c(0.0427721404384,0.0498818449393,0.057122408673,0.0643592066733,0.0715056270741,0.0716101261736,0.0715178657074,0.0717748770062,0.0718850247057,0.0720516584049,0.0720695456382,0.0722051120376,0.0720940229048,0.0720808428381,0.0722418279374,0.0722841924372,0.072624049869,0.0722785438372,0.0723519756369,0.0722568908707,0.0724075202033,0.0724884834696,0.072629698469,0.0726419371023,0.0725675638693,0.0727520848018,0.0726033383358,0.0728857683345,0.0728217508681,0.0730119204006,0.0730439291338,0.0730467534337,0.0731738469332,0.0731211266667,0.0731051223001,0.0729563758342,0.0729469615009,0.0727859764016,0.0729733216341,0.0728264580347,0.0729196599343,0.0729742630674,0.0728980069678,0.0730166275672,0.0731295995667,0.0731681983332,0.0731211266667,0.0732896432326,0.0732322157996,0.0733866108655,0.0733856694322,0.0734798127651,0.0735174700983,0.0736897523975,0.073722702564,0.0737321168973,0.0739900696294,0.0739260521631,0.0738554446634,0.0738215530635,0.0737509455639,0.0736671579976,0.0736266763644,0.0735626588981,0.0736087891312,0.0736276177978,0.0736831623642,0.0737048153307,0.0736812794975,0.0737556527305,0.073797075797,0.0738234359302,0.0739655923629,0.0740644428624,0.0741303431955,0.0742649681615,0.0741755319953,0.0742178964951,0.074375115861,0.0742169550617,0.0743026254947,0.0743713501277,0.0741350503621,0.0740512627958,0.0739815967295,0.0738243773635,0.0739072234965,0.074014546896,0.0739891281961,0.0740409070292,0.0740249026626,0.0740493799292,0.0741444646954,0.0742150721951,0.0742649681615,0.0742216622284,0.0741745905619,0.0741115145289,0.0740813886624,0.0741256360288,0.0741444646954,0.0739580608963,0.074077622929,0.0740004253961,0.07385732753,0.0739552365963,0.0739448808297,0.0740183126293,0.074014546896,0.0741463475621,0.0741642347953,0.0741680005286,0.0742480223616,0.0742386080283,0.074300742628,0.0742254279617,0.0742207207951,0.0742753239281,0.0742837968281,0.0741915363619,0.0741943606618,0.0744014759942,0.0742941525947,0.0742197793617,0.074303566928,0.0745078579604,0.0745040922271,0.074455137694,0.0743798230277,0.0744071245942,0.0743393413945,0.074226369395,0.0743788815943,0.0745342180936,0.0746368343265,0.0744146560608,0.0745172722937,0.0744570205606,0.0745473981602,0.0746161227933,0.0747121489928,0.0746876717263,0.074666960193,0.074443840494,0.0742339008617,0.0744155974942,0.0742301351284,0.0743054497947,0.074226369395,0.0740908029957,0.0740955101623,0.0742047164285,0.0739985425294,0.0739900696294,0.0740380827292,0.0739495879963,0.0739938353628,0.0738799219299,0.0739147549631,0.0739185206964,0.0738196701969,0.0737801299971,0.0737867200304,0.0738610932634,0.0739590023296,0.0740032496961,0.0740154883293,0.0742084821618,0.0740079568627,0.0740041911294,0.0740324341293,0.0738488546301,0.0739448808297,0.073797075797,0.0736172620311,0.0734798127651,0.073290584666,0.0730542849004,0.0730759378669,0.0729977989006,0.0728895340678,0.0729827359674,0.0729149527677,0.0729676730341,0.0729337814343,0.072764323435,0.0728923583678,0.0729008312677,0.0728462281347,0.0728942412344,0.0729196599343,0.072918718501,0.0727935078682,0.0727285489685,0.0727972736015,0.0729601415675,0.0726824187354,0.0726306399023,0.0727332561352,0.0726165184024,0.0724451775365,0.0722776024039,0.0721674547044,0.0723463270369,0.0721081444047,0.0718596060058,0.0719349206721,0.0718548988392,0.0717136838398,0.0715423429739,0.071611067607,0.07167979224,0.0718379530393,0.0717795841729,0.0719782266053,0.0719622222387,0.0721458017379,0.0720140010718,0.0721128515713,0.0722371207708,0.0723105525704,0.0721222659046,0.0719979967052,0.0717880570728,0.0714726769076,0.0714519653743,0.0712617958419,0.0712147241754,0.0709002854435,0.0707826062774,0.0705434822118,0.0705585451451,0.0704521631789,0.0705227706786,0.0705048834453,0.0705519551118,0.0703683756126,0.0704116815458,0.0705481893785,0.0707477732442,0.0707835477107,0.0707826062774,0.0707553047109,0.0705679594784,0.0705171220786,0.0702431649799,0.0703363668794,0.0702638765131,0.0701772646468,0.070074648414,0.0699061318481,0.0698148128151,0.0696510034159,0.0695257927831,0.0695116712832,0.0697545610821,0.0696293504493,0.0696519448492,0.0697696240153,0.0695389728497,0.0695502700497,0.0695775716162,0.0696095803494,0.0697150208823,0.0697969255819,0.0696491205492,0.0696086389161,0.0694429466502,0.0692894930175,0.0693506861839,0.0693356232507,0.0690701390519,0.0690484860853,0.0690870848518,0.0689891757856,0.0689505770191,0.0689411626858,0.0689430455524,0.0689421041191,0.0686954485869,0.068675678487,0.0687905333531,0.0688065377197,0.0686615569871,0.0684845675212,0.0684365544214,0.0684092528549,0.0684798603546,0.0683904241883,0.0684535002213,0.0683471182552,0.0683273481553,0.0682275562224,0.0681861331559,0.0682303805224,0.0681616558893,0.0680580982231,0.0678519243241,0.0675817329587,0.0674433422593,0.067359554693,0.0672559970268,0.0671985695937,0.0671750337605,0.0671100748608,0.0670517059944,0.0668888380285,0.0669330853949,0.0672352854936,0.0673840319596,0.0673830905262,0.067508301159,0.0676306874918,0.067648574725,0.067714475058,0.067728596558,0.0676617547916,0.0676297460584,0.067356730393,0.0672334026269,0.0671712680272,0.0669255539283,0.066764568829,0.06655557063,0.0665132061302,0.0664689587637,0.0666177052297,0.0666195880964,0.0667532716291,0.0666412410629,0.0666346510296,0.0666826641294,0.0666864298627,0.0666402996296,0.0666045251631,0.0665546291967,0.0664529543971,0.0662947935979,0.0662081817316,0.0663211537311,0.0663945855307,0.0663945855307,0.0661046240654,0.0662251275315,0.0662872621312,0.0664058827307,0.0665405076967,0.0666788983961,0.0666035837298,0.0666129980631,0.0664482472305,0.066621470963,0.0667608030957,0.0666939613294,0.0665772235966,0.0664247113973,0.0663663425309,0.0662882035645,0.0664360085972,0.0663070322311,0.0664115313307,0.0660302508324,0.0660509623656,0.0660368408657,0.0660641424322,0.0661036826321,0.0660650838656,0.0660453137657,0.0659784719993,0.0660942682988,0.0660236607991,0.0661008583321,0.0662853792646,0.0662411318981,0.066178055865,0.0662213617982,0.0662947935979,0.0663738739975,0.0663870540641,0.0662853792646,0.0663785811641,0.0664633101637,0.0664171799306,0.0664746073637,0.0665696921299,0.0665245033301,0.0664105898973,0.0664793145303,0.06654427343,0.066707141396,0.0666544211295,0.0667259700626,0.0665753407299,0.0666610111628,0.0666544211295,0.0667165557293,0.0667391501292,0.0666939613294,0.0666600697295,0.0664943774636,0.0665885207965,0.0665885207965,0.0667156142959,0.0667617445291,0.066693019896,0.0666817226961,0.0669745084614,0.0671091334275,0.0672418755269,0.0674028606261,0.0673793247929,0.0676043273585,0.0675836158253,0.0675958544586,0.0677455423579,0.0678575729241,0.0675412513255,0.067642926125,0.0677850825577,0.0677295379913,0.0678848744906,0.0676532818917,0.0677728439244,0.0678180327242,0.0679197075238,0.0679262975571,0.0681315300228,0.0679846664235,0.0678594557907,0.0680270309233,0.0679884321568,0.0680665711231,0.0681070527563,0.0682934565554,0.0682991051554,0.0683706540884,0.0685033961878,0.0687076872202,0.0688366635863,0.0688771452194,0.069190642518,0.0693939921171,0.0695709815829,0.0696491205492,0.0698364657817,0.0702026833467,0.070146197347,0.0702695251131,0.0703373083128,0.0705463065118,0.0704549874789,0.0705519551118,0.0706216211781,0.0705500722451,0.0705086491786,0.0704465145789,0.0707393003443,0.0708277950772,0.0707995520773,0.070878632477,0.0710838649427,0.0710951621426,0.0712128413088,0.0714190152078,0.0715404601073,0.0715404601073,0.07167696794,0.0716910894399,0.0719622222387,0.0720017624385,0.0721109687047,0.0723162011704,0.0723604485369,0.0725007221029,0.0725967483025,0.0727935078682,0.0728038636349,0.072915894201,0.0728980069678,0.0731135952001,0.0730373391005,0.0730185104339,0.0732915260993,0.0734609840985,0.0737518869972,0.0740023082627,0.0741425818287,0.0741011587623,0.0744391333274,0.0744758492272,0.0746434243598,0.0747479234593,0.0748166480923,0.0748477153922,0.0748486568255,0.0747752250259,0.0749550387917,0.0752045186239,0.0752901890569,0.0754483498561,0.0757618471547,0.0760292142202,0.0760951145532,0.0763257657188,0.0765441782511,0.0770365478822,0.0773086221143,0.077459251447,0.0775515119132,0.0777322671124,0.0778490048452,0.0781126061773,0.0783008928431,0.0784797651756,0.0786661689748,0.078397860476,0.0784129234093,0.0786247459083,0.0788149154408,0.0789693105068,0.0790728681729,0.079210317439,0.0793543567383,0.0793440009717,0.0796622054369,0.0800434859352,0.0801969395678,0.0804567751666,0.0805217340663,0.0807985154651,0.0807975740318,0.0809001902646,0.0811402557635,0.0814603430954,0.0814170371623,0.0813492539626,0.0815008247285,0.0815573107283,0.0818256192271,0.0818745737602,0.0821664180922,0.0823980106911,0.0825599372237,0.0826832649898,0.0828470743891,0.0833177910536,0.0836501170188,0.0838459351512,0.083808277818,0.0838845339177,0.0841613153164,0.0843138275157,0.0843091203491,0.0845943746478,0.0847459454138,0.084901281913,0.0850462626457,0.0853192783111,0.085710914576,0.0859952274414,0.0861420910407,0.0863539135398,0.0865309030056,0.0866165734386,0.0867775585378,0.0869310121705,0.0869686695036,0.0871560147361,0.0872972297355,0.0876389700339,0.0877425277001,0.0878376124663,0.0882377216312,0.0884683727968,0.088646303696,0.0888882520615,0.0891076060272,0.089161267727,0.0893128384929,0.0893947431926,0.0897251862911,0.0899134729569,0.0900038505565,0.0900480979229,0.0904849229876,0.0905837734871,0.0910337786184,0.0914338877833,0.0916551246156,0.091707844882,0.0918660056813,0.0922331646796,0.092517477545,0.0929448882764,0.0929326496431,0.0929655998096,0.0928507449435,0.093023968676,0.0935012753739,0.0938900873387,0.0943193809368,0.0947853904347,0.0954603981316,0.0961043385287,0.096972340058,0.0982103248857,0.0994285396135,0.100160974743,0.100879288374,0.101929927969,0.102609642832,0.103221574496,0.103729007061,0.104032148593,0.104356943091,0.104377654624,0.104627134456,0.105112914054,0.105345448087,0.105372749653,0.105637292419,0.105772858818,0.106159787916,0.106658747581,0.10684797568,0.107171828745,0.107261264911,0.10748438461,0.107823300609,0.108166923774,0.108244121307,0.108628226105,0.108659293405,0.108639523305,0.108992560803,0.109220387669,0.109435975901,0.1097127573,0.110057321898,0.110107217865,0.110671136429,0.110645717729,0.110929089161,0.111252942226,0.111555142325,0.111854518124,0.112028683289,0.112068223489,0.112135065256,0.112430675321,0.112515404321,0.112926810685,0.113168759051,0.113282672484,0.113316564084,0.11343424325,0.113576399682,0.113852239648,0.114106426647,0.114359672212,0.114553607478,0.114713651144,0.115044094242,0.115489392207,0.115905505738,0.116111679637,0.116476955769,0.116718904135,0.116894010734,0.117157612066,0.117427803431,0.117753539363,0.117914524463,0.118158355695,0.118230846061,0.118540577626,0.118858782092,0.11920899529,0.119504605355,0.119795508254,0.11996402482,0.120072289653,0.120268107785,0.120542064884,0.120869683682,0.121218955448,0.121412890713,0.121558812879,0.121831828545,0.122177334576,0.122503070508,0.122954017073,0.123050984706,0.123088642039,0.123321176071,0.123259041472,0.123585718837,0.123970765068,0.124003715235,0.124094092834,0.124425477366,0.124631651265,0.125140966696,0.125340550562,0.125524130061,0.125895054793,0.126018382559,0.126050391292,0.126321524091,0.126276335291,0.126370478624,0.126487216357,0.126372361491,0.12657006249,0.126860965388,0.127236597287,0.127052076354,0.127020067621,0.127227182953,0.127592459085,0.127804281584,0.127624467818,0.127707313951,0.127596224818,0.127445595486,0.127145278254,0.127619760652,0.127666832318,0.127739322684,0.127823110251,0.127722376885,0.127963383817,0.128066941483,0.128323952782,0.128148846183,0.128168616283,0.127834407451,0.12794737945,0.127738381251,0.127452185519,0.127250718787,0.126974878821,0.126826132355,0.126694331689,0.126962640188,0.126790357889,0.126832722389,0.126718808956,0.126504162157,0.126412843124,0.126378951524,0.126433554657,0.126466504824,0.126449559024,0.126216083558,0.126243385125,0.12582633016,0.125421513828,0.125493062761,0.125376325029,0.125320780462,0.125177682596,0.12504588193,0.124712614532,0.124502674899,0.124240015,0.124062084101,0.124088444234,0.123807897102,0.123636556237,0.123442620971,0.123228915605,0.12279491484,0.122634871174,0.122433404442,0.122256414976,0.122187690343,0.122092605577,0.121882665944,0.121439250847,0.121099393415,0.12075859455,0.12056654215,0.120243630519,0.12005157812,0.119964966253,0.119757850921,0.119498015322,0.119356800323,0.119243828323,0.119105437624,0.119100730457,0.118666729692,0.11852739756,0.118166828595,0.117597261431,0.117519122464,0.117118071866,0.116703841201,0.116644530902,0.116283020503,0.115870672705,0.116071198004,0.115793475172,0.115752052106,0.115692741806,0.115398073174,0.115250268141,0.115212610808,0.114957482376,0.114810618777,0.114624214978,0.114209984313,0.114058413547,0.113743974815,0.113467193416,0.113135808884,0.112830784486,0.112555885954,0.112281928855,0.112025858989,0.111612569758,0.111302838193,0.110829297228,0.110449899597,0.110240901398,0.110358580564,0.110141109465,0.109894453932,0.109728761667,0.109274990802,0.109209090469,0.109034925303,0.108936074804,0.108862643004,0.108644230472,0.108045478874,0.107881669475,0.10761147811,0.10743919581,0.107490974643,0.107286683611,0.106984483512,0.10684797568,0.106577784314,0.106447866515,0.106300061482,0.10605623025,0.105812399018,0.105317205087,0.105077139588,0.104916154488,0.104924627388,0.104592301423,0.104316461458,0.10394365386,0.10374877716,0.103647102361,0.103173561396,0.103113309663,0.102893955698,0.102716024799,0.102465603533,0.102121038935,0.101927103669,0.101778357203,0.101688921037,0.101218204372,0.101478039971,0.101271866072,0.100924477173,0.100617569908,0.100251352343,0.10010919591,0.0997570998453,0.0996394206792,0.0990303133153,0.0987064602501,0.0982743423521,0.0979175391204,0.0976718250215,0.0976181633218,0.097341381923,0.0970937849575,0.0969365655915,0.0964074800606,0.0963622912608,0.0962257834281,0.0958783945297,0.0957729539968,0.0956468019307,0.0951911481995,0.0950904148333,0.0948851823675,0.0947364359016,0.0946065181021,0.0945020190026,0.0941499229376,0.0938157141058,0.0934193706742,0.0928168533436,0.0922877678127,0.0915063781496,0.0909443424522,0.0900791652228,0.0893476715261,0.0885069715633,0.0878187837998,0.0871390689362,0.0863322605732,0.0856600771763,0.0851968919784,0.0848080800135,0.0843524262822,0.0840361046837,0.083673652852,0.0833931057199,0.0831831660875,0.0830259467216,0.0828489572557,0.0827378681229,0.0824366094576,0.082354704758,0.0821626523589,0.0820035501263,0.0819188211266,0.0817493631274,0.0815959094948,0.081247579163,0.0809745634976,0.0808578257648,0.0805763371994,0.0802939072007,0.0800679632017,0.0799474597356,0.0796716197702,0.0794974546043,0.0792291461056,0.0791114669394,0.0792489162055,0.0790935797062,0.0792395018722,0.0792009031057,0.0792178489056,0.0790860482396,0.0791519485726,0.0790992283062,0.0790596881063,0.0790182650399,0.0785767328085,0.0784882380756,0.0779666840113,0.0778160546787,0.0775618676798,0.0774140626472,0.0772182445147,0.0768633241497,0.0766731546172,0.0764811022181,0.0763012884522,0.0760809930532,0.0761252404197,0.0760320385201,0.075776910088,0.0756564066218,0.0755038944225,0.075247824557,0.0751555640908,0.0750981366577,0.075101902391,0.0750322363247,0.0750350606247,0.0747846393592,0.07459823556,0.0744005345609,0.0742084821618,0.0742781482281,0.0741840048952,0.0741228117288,0.0739646509296,0.0737876614637,0.0735956090646,0.0734638083985,0.0735466545315,0.0736144377312,0.0735673660647,0.0735061728983,0.0733065890326,0.0730307490672,0.0729620244341,0.0728612910679,0.0726570000355,0.0724743619697,0.0723839843701,0.0720563655716,0.0718850247057,0.0716440177735,0.0715809417404,0.0714171323412,0.0713540563081,0.0712476743419,0.0710433833095,0.0708437994438,0.0704192130124,0.0705048834453,0.0703297768461,0.0703260111128,0.0701113643138,0.0700915942139,0.0700840627472,0.0698665916482,0.0699447306145,0.0699532035145,0.0701763232135,0.0699795636477,0.0698901274815,0.0697159623156,0.069908956148,0.0700049823476,0.0697790383486,0.0698628259149,0.0697649168487,0.0696387647826,0.0695286170831,0.0694730725167,0.0695888688162,0.0695973417161,0.0693007902175,0.0689505770191,0.0687754704199,0.0686267239539,0.0684864503879,0.0684657388546,0.0684968061545,0.0683640640551,0.0682284976557,0.0679498333903,0.0680279723566,0.0680355038233,0.0681032870229,0.0678321542242,0.0677060021581,0.0676090345252,0.0673821490929,0.0673096587266,0.0672334026269,0.0673284873931,0.0670818318609,0.0670338187611,0.0668869551618,0.0670827732943,0.0671514979273,0.067348257493,0.0673906219929,0.0673990948928,0.0674715852592,0.0675723186254,0.0676918806581,0.0676288046251,0.0677540152579,0.0676843491915,0.0677248308247,0.0673755590596,0.0674150992594,0.0672785914267,0.0673200144932,0.0672710599601,0.0671948038604,0.0673397845931,0.0672098667937,0.0671016019608,0.0670244044279,0.0670639446277,0.0669679184281,0.0670855975942,0.0668963694951,0.0667683345624,0.0668201133955,0.0667061999626,0.0666412410629,0.0666591282962,0.0666572454295,0.066770217429,0.0667570373624,0.0667269114959,0.0667240871959,0.0668982523618,0.0667325600959,0.0666421824963,0.0667080828293,0.0667881046623,0.0668568292953,0.0668963694951,0.0669001352284,0.0668276448621,0.0667504473291,0.0665386248301,0.0666666597628,0.0666393581963,0.0666158223631,0.0666412410629,0.0664793145303,0.0663832883308,0.0664454229305,0.0663701082642,0.0665358005301,0.0665706335633,0.066484021697,0.0665951108298,0.0666252366963,0.0665292104968,0.0665979351298,0.0665678092633,0.0665518048967,0.0666600697295,0.0665856964965,0.0666459482296,0.066781514629,0.0667438572958,0.0667080828293,0.0669321439616,0.0668351763287,0.066844590662,0.0667033756627,0.0666497139629,0.0665254447635,0.0664830802637,0.0664407157639,0.0663795225975,0.0664548372638,0.0662571362647,0.0663343337977,0.066338099531,0.0663060907978,0.0663606939309,0.0665028503636,0.0664162384973,0.0665084989635,0.0665226204635,0.0665009674969,0.0665132061302,0.0663616353642,0.066329626631,0.0664943774636,0.0665188547302,0.0663927026641,0.0664670758971,0.066403999864,0.0664463643638,0.0665310933634,0.0665838136299,0.0666883127294,0.0667542130624,0.0667523301958,0.0667513887624,0.0669415582949,0.0670432330944,0.0669585040948,0.0670921876275,0.0671176063274,0.0672701185267,0.0673360188598,0.0674951210924,0.0674838238924,0.0675186569256,0.0675035939923,0.0676156245585,0.0679244146904,0.0678180327242,0.0677041192914,0.0677361280246,0.0677267136913,0.0674188649927,0.0673783833596,0.0675327784255,0.0675318369922,0.0674988868257,0.0672644699268,0.0674038020595,0.067648574725,0.0675101840256,0.0676353946584,0.0678434514241,0.0679601891569,0.0679366533237,0.0680420938566,0.0680034950901,0.0681174085229,0.0681352957561,0.0678971131239,0.0680430352899,0.0682727450222,0.0685043376211,0.0687218087201,0.0687199258535,0.0686794442203,0.0687980648198,0.0687171015535,0.0689053882193,0.0690974406184,0.0690531932519,0.0689741128523,0.0688752623528,0.0687010971869,0.0688705551861,0.0690240088187,0.0621101224503,0.0553525140144,0.048341660013,0.041477669611,0.0)
ycorr <- c(8.77343494406e-05,8.7648348671e-05,8.739314198e-05,8.69716597192e-05,8.63755870264e-05,8.56048032493e-05,8.46529640731e-05,8.36993499518e-05,8.27431653526e-05,8.17819347119e-05,8.08139596506e-05,7.98395137182e-05,7.88581530626e-05,7.7867760463e-05,7.6870210078e-05,7.58649508137e-05,7.48553665738e-05,7.38467494067e-05,7.28376823993e-05,7.18255973417e-05,7.08108089466e-05,6.97870896798e-05,6.87548950065e-05,6.77204024257e-05,6.66791065038e-05,6.56325914953e-05,6.4579892472e-05,6.35158805658e-05,6.24377450399e-05,6.1349195861e-05,6.02528134423e-05,5.91520515762e-05,5.80477630617e-05,5.69383634862e-05,5.58214894199e-05,5.4698082833e-05,5.35651927691e-05,5.24259984532e-05,5.12843029976e-05,5.01411767004e-05,4.89959808139e-05,4.7846440505e-05,4.6688657247e-05,4.55208696191e-05,4.43451651326e-05,4.31613510466e-05,4.19712430636e-05,4.07711750124e-05,3.95598347136e-05,3.83334483636e-05,3.70889182082e-05,3.58259908599e-05,3.454832787e-05,3.32582554863e-05,3.19582220524e-05,3.06468633186e-05,2.93227812388e-05,2.79895801461e-05,2.66503231114e-05,2.53054918272e-05,2.39563934432e-05,2.26049259296e-05,2.12499924918e-05,1.98871216609e-05,1.85152549498e-05,1.71364084853e-05,1.57530046027e-05,1.43622391708e-05,1.29624265196e-05,1.15501302988e-05,1.01263788003e-05,8.69094655621e-06,7.24285089309e-06,5.78253113958e-06,4.3104254077e-06,2.82390306342e-06,1.32443065545e-06,-1.86576919383e-07,-1.70719989478e-06,-3.23189031102e-06,-4.76292590115e-06,-6.30208736732e-06,-7.84559317424e-06,-9.39103204688e-06,-1.09383689039e-05,-1.24878725018e-05,-1.40407365988e-05,-1.55997923574e-05,-1.71683993761e-05,-1.87478589113e-05,-2.0339246041e-05,-2.19362343096e-05,-2.353842107e-05,-2.5146920113e-05,-2.67647555846e-05,-2.83904834047e-05,-3.0020366985e-05,-3.16514510502e-05,-3.3287184503e-05,-3.49290093916e-05,-3.65692956895e-05,-3.8211735235e-05,-3.98620748746e-05,-4.15211828379e-05,-4.31900270004e-05,-4.48594137087e-05,-4.65313964967e-05,-4.82071128467e-05,-4.98822813398e-05,-5.15511359316e-05,-5.32201697509e-05,-5.48925872167e-05,-5.65679502246e-05,-5.82431763884e-05,-5.99145106301e-05,-6.15870231149e-05,-6.32655458529e-05,-6.49478307501e-05,-6.66309215836e-05,-6.83180358068e-05,-7.00071565988e-05,-7.16935513929e-05,-7.33759610945e-05,-7.50512785684e-05,-7.67172889883e-05,-7.83739414741e-05,-8.0017532856e-05,-8.16521355713e-05,-8.32845245036e-05,-8.49166945427e-05,-8.65498904471e-05,-8.81865951317e-05,-8.98190894031e-05,-9.1451804255e-05,-9.30878989606e-05,-9.4730731988e-05,-9.63828593239e-05,-9.80447993237e-05,-9.97092741799e-05,-0.000101371554178,-0.000103029687489,-0.000104678867876,-0.000106326331364,-0.000107973186511,-0.000109619749042,-0.000111264821038,-0.000112905456947,-0.000114536224197,-0.000116157433567,-0.000117770761197,-0.000119371326868,-0.000120967507915,-0.000122559999912,-0.000124146250766,-0.000125727565282,-0.000127303096882,-0.000128870130841,-0.000130431033823,-0.000131989884435,-0.000133547303336,-0.000135109708877,-0.000136678518437,-0.00013824857792,-0.000139818416645,-0.000141385297016,-0.000142947902988,-0.000144507857911,-0.000146065253038,-0.000147619721318,-0.000149173863571,-0.000150725891408,-0.000152271082118,-0.000153811418744,-0.000155347796298,-0.000156883557694,-0.000158421864135,-0.000159959262028,-0.000161497554801,-0.000163037255788,-0.000164571926159,-0.000166102960892,-0.000167628823596,-0.000169148657444,-0.000170665381201,-0.000172176039533,-0.000173679223125,-0.000175179772088,-0.000176678613031,-0.000178173805681,-0.000179668717721,-0.000181166260561,-0.000182663773061,-0.00018416587869,-0.000185672245385,-0.000187180651769,-0.000188693616469,-0.000190210840329,-0.000191726518294,-0.000193242902752,-0.000194757641407,-0.000196268656536,-0.000197777133503,-0.000199281072718,-0.000200777986112,-0.000202271173325,-0.000203755323501,-0.000205230147666,-0.000206695823751,-0.000208149898107,-0.000209597926562,-0.000211044932301,-0.000212491978093,-0.000213938728083,-0.000215385401411,-0.000216826369107,-0.000218264661703,-0.000219705939782,-0.00022115320064,-0.000222609978748,-0.00022407425729,-0.000225535802695,-0.000226991501401,-0.000228441874986,-0.000229891244089,-0.000231344633956,-0.000232805832809,-0.000234266882804,-0.000235727427318,-0.000237185076603,-0.00023864099392,-0.000240098953514,-0.000241564107869,-0.000243034357903,-0.000244506501736,-0.000245978867846,-0.000247446830901,-0.000248916415285,-0.000250388321503,-0.00025185967636,-0.000253327833597,-0.000254792131641,-0.000256254813829,-0.000257712991192,-0.000259169518041,-0.000260626468493,-0.000262083771206,-0.000263538577217,-0.00026498626147,-0.00026643184243,-0.000267875414854,-0.000269321664312,-0.000270763229861,-0.00027220572094,-0.000273650439422,-0.000275093327927,-0.000276536088582,-0.00027797787037,-0.000279422974555,-0.000280869007489,-0.000282318824694,-0.000283767607717,-0.000285214275045,-0.000286662429137,-0.000288102991761,-0.000289539667577,-0.000290977212391,-0.000292413706312,-0.000293847277825,-0.000295276791224,-0.000296701284204,-0.000298120944981,-0.000299541772162,-0.000300960402973,-0.000302380267196,-0.000303802410745,-0.000305221865445,-0.000306638302737,-0.000308052732498,-0.000309469595852,-0.000310887096977,-0.000312308921597,-0.000313728152584,-0.000315143254245,-0.000316555531269,-0.000317957468839,-0.00031934555444,-0.00032071867549,-0.000322072766547,-0.000323400218614,-0.000324696402977,-0.000325958550103,-0.00032718478947,-0.000328376149207,-0.000329531205869,-0.000330652279054,-0.000331747793411,-0.000332821021015,-0.000333878708687,-0.000334923766194,-0.000335965384191,-0.000337005798393,-0.00033805107009,-0.000339104997039,-0.00034016916224,-0.00034124753929,-0.000342336933791,-0.000343437009528,-0.000344546208463,-0.000345663526748,-0.000346786921365,-0.000347915882011,-0.000349049637142,-0.000350182785611,-0.000351313383905,-0.000352442241716,-0.000353567395435,-0.000354690351551,-0.000355807761562,-0.000356922340566,-0.000358033405168,-0.000359141393372,-0.000360244391864,-0.000361344250964,-0.000362446992115,-0.000363551587459,-0.000364658762012,-0.000365769104235,-0.000366884122164,-0.000368002300998,-0.000369122043157,-0.000370242710274,-0.000371365165488,-0.000372489906584,-0.000373610148361,-0.000374724435692,-0.000375829133994,-0.000376923389773,-0.000378006587421,-0.000379079100513,-0.00038014531105,-0.000381201076302,-0.000382247659566,-0.000383283238435,-0.000384309130285,-0.000385328917551,-0.000386344045618,-0.000387358710593,-0.000388369912136,-0.000389380370221,-0.000390386146109,-0.00039138436689,-0.000392379216824,-0.000393372790107,-0.000394365931526,-0.000395357760483,-0.000396349677976,-0.000397336059869,-0.000398316284055,-0.0003992904691,-0.000400255456535,-0.000401216166228,-0.000402172469958,-0.000403122313878,-0.000404061477661,-0.000404988314386,-0.000405902967888,-0.000406805289876,-0.000407701007061,-0.000408592092943,-0.000409479033055,-0.000410362578105,-0.000411237603072,-0.000412102095354,-0.00041295857398,-0.000413809275288,-0.000414653711194,-0.000415491091939,-0.000416321691014,-0.00041713786928,-0.000417939400865,-0.000418726919032,-0.000419502599462,-0.000420268946623,-0.000421029126649,-0.00042178072102,-0.000422519436554,-0.000423245743864,-0.000423955758111,-0.000424652954088,-0.000425340120843,-0.000426017450176,-0.00042668220235,-0.00042733328464,-0.000427971790618,-0.000428594967843,-0.000429208019051,-0.000429814555865,-0.000430417514456,-0.00043101823408,-0.000431611740965,-0.000432196788407,-0.000432776027717,-0.000433352039753,-0.000433919086413,-0.000434477838433,-0.000435027403253,-0.000435560316547,-0.000436076911737,-0.000436574025843,-0.000437057319762,-0.000437526891188,-0.000437980778178,-0.000438411988559,-0.000438822025823,-0.000439214493182,-0.000439588351365,-0.000439948342201,-0.00044029722185,-0.000440633446487,-0.000440955955082,-0.000441259668378,-0.000441546957074,-0.000441821886025,-0.000442086863639,-0.00044233668656,-0.00044257236636,-0.000442792730842,-0.000442993470809,-0.000443174756389,-0.000443338377928,-0.000443488308705,-0.000443623111439,-0.000443741547305,-0.000443842414558,-0.000443929911504,-0.000444005731465,-0.000444071204591,-0.000444125352652,-0.000444168783509,-0.000444201347175,-0.000444221087337,-0.000444226658573,-0.000444218729361,-0.000444197335178,-0.000444160154638,-0.000444102619874,-0.000444019961874,-0.000443912781062,-0.000443780629156,-0.000443625216118,-0.00044344483348,-0.000443239912218,-0.000443012558187,-0.000442762267453,-0.000442487331746,-0.00044219124823,-0.000441875821073,-0.000441546229982,-0.000441200898807,-0.000440837012426,-0.000440453290653,-0.000440051056975,-0.00043962874751,-0.000439182736672,-0.000438716487364,-0.00043822971134,-0.000437723113018,-0.000437193117329,-0.000436640601059,-0.00043606424854,-0.000435469152132,-0.000434852864813,-0.000434213079099,-0.000433552765944,-0.000432871851651,-0.000432170295781,-0.000431449057902,-0.000430706358322,-0.000429941746248,-0.000429154850018,-0.000428343227255,-0.000427507530794,-0.000426650661975,-0.000425774181473,-0.000424876784641,-0.000423955960824,-0.000423009697132,-0.000422038530679,-0.000421041454167,-0.000420021571323,-0.000418978747751,-0.000417913238422,-0.000416823845286,-0.000415709844243,-0.000414568923202,-0.000413400965106,-0.000412207597808,-0.000410988434566,-0.000409743041236,-0.000408471729328,-0.000407174607557,-0.000405854462965,-0.000404510948154,-0.000403142519642,-0.000401752173514,-0.00040033933476,-0.000398903289784,-0.000397444487458,-0.000395964822329,-0.00039446109295,-0.000392933611607,-0.00039137999952,-0.00038979708973,-0.000388187782311,-0.00038655044456,-0.000384885191078,-0.00038319466402,-0.000381477479816,-0.000379735019097,-0.000377968681584,-0.000376178246021,-0.000374365435764,-0.000372530096527,-0.000370671605594,-0.000368789108155,-0.000366881016863,-0.00036494423672,-0.000362980852217,-0.00036099171617,-0.000358973384509,-0.000356926492748,-0.000354851546704,-0.000352748169071,-0.000350617974726,-0.000348462018253,-0.000346282115768,-0.000344081893414,-0.00034186146161,-0.000339618129279,-0.000337354481268,-0.00033507112722,-0.000332762641194,-0.000330432098889,-0.000328078381959,-0.000325701897544,-0.000323301833935,-0.000320878157835,-0.00031842845068,-0.000315952608182,-0.000313448250853,-0.000310914883919,-0.000308358018838,-0.000305777067017,-0.000303170199172,-0.000300537870805,-0.000297878283179,-0.000295188421467,-0.00029246734343,-0.000289719699711,-0.000286946486328,-0.000284150885136,-0.000281327987413,-0.00027847683865,-0.000275602205935,-0.000272702278762,-0.000269777949283,-0.000266830208728,-0.00026386286918,-0.000260872481919,-0.000257858659495,-0.000254819377124,-0.000251755667941,-0.000248670096826,-0.000245555732674,-0.000242414317089,-0.000239251461776,-0.0002360680104,-0.000232864506481,-0.000229640458913,-0.000226395433517,-0.000223127096578,-0.000219834880281,-0.000216520228712,-0.000213185629319,-0.000209832516404,-0.000206455738852,-0.000203050693972,-0.000199612641742,-0.000196142677419,-0.00019264385402,-0.000189027943938,-0.000185209023925,-0.000181114469795,-0.000176685529473,-0.000171421431603,-0.00016703311769,-0.000162995872889,-0.000159250493791,-0.000155718515506,-0.000152302926381,-0.000148904491189,-0.00014561550754,-0.000142519973958,-0.000139693519628,-0.00013719008968,-0.000135509341072,-0.000132942078434,-0.000130013454673,-0.000126787176767,-0.000123341157533,-0.000119770995677,-0.000116173857935,-0.000112547614557,-0.00010889389907,-0.000105217329389,-0.000101517425117,-9.77935301927e-05,-9.40445574426e-05,-9.02714482536e-05,-8.64761730981e-05,-8.26607255882e-05,-7.88255092954e-05,-7.49721582546e-05,-7.11004139605e-05,-6.7207033106e-05,-6.32873033906e-05,-5.93458311123e-05,-5.53840415987e-05,-5.14051053821e-05,-4.74080977573e-05,-4.33895072514e-05,-3.93497485317e-05,-3.52914339502e-05,-3.12122143977e-05,-2.71142416959e-05,-2.30030098976e-05,-1.88786922425e-05,-1.4739610807e-05,-1.05839024775e-05,-6.41159373267e-06,-2.22512698055e-06,1.97838644957e-06,6.19943295428e-06,1.04401084032e-05,1.46999107862e-05,1.89775974371e-05,2.3275500914e-05,2.75937846519e-05,3.19326177077e-05,3.62884214057e-05,4.06628567354e-05,4.50549969077e-05,4.94616733282e-05,5.3883956284e-05,5.83209542589e-05,6.27741749472e-05,6.72442481975e-05,7.17270289211e-05,7.62220956664e-05,8.07317794197e-05,8.52581004694e-05,8.97993488343e-05,9.43574744234e-05,9.8927455681e-05,0.00010350675287,0.000108095647926,0.000112690742902,0.000117294887102,0.000121909718932,0.000126533905277,0.000131163975546,0.000135800080076,0.000140441208334,0.000145090466179,0.000149750404875,0.000154421321814,0.000159104840095,0.000163802123968,0.000168508466688,0.000173225959805,0.000177954489165,0.000182693728787,0.000187445975996,0.000192211207488,0.000196983905714,0.000201765087218,0.000206551668466,0.000211340147545,0.000216134519519,0.000220933713706,0.000225737272163,0.000230547294508,0.000235360052847,0.000240170511057,0.000244982075331,0.000249796270328,0.000254612086877,0.000259431250526,0.000264254621521,0.000269076804092,0.000273896746545,0.000278711768704,0.000283522303626,0.000288330419837,0.000293136441595,0.000297938917755,0.000302738227492,0.000307535797516,0.000312329310418,0.000317121948226,0.000321912802088,0.000326705052853,0.000331497948344,0.000336289277238,0.000341079539233,0.000345867325691,0.000350651273516,0.000355429900055,0.000360200552656,0.000364963159901,0.00036971708123,0.000374461197833,0.000379194427207,0.000383917308131,0.000388630634905,0.000393331967299,0.000398021207599,0.000402695754325,0.000407355806942,0.000412002841492,0.000416634259074,0.000421248553917,0.000425845849525,0.000430425975034,0.000434988022982,0.000439531306733,0.000444058819375,0.000448572281409,0.000453070823235,0.00045754900441,0.00046201138772,0.000466455695242,0.000470885671729,0.000475299553213,0.000479697145405,0.000484078929984,0.000488442329735,0.000492785750469,0.000497108115348,0.000501412885334,0.000505700291195,0.000509967013537,0.000514211889733,0.000518429007327,0.000522617680446,0.000526777900214,0.000530909837446,0.000535010844602,0.000539081640809,0.000543122311546,0.000547129403919,0.000551104462009,0.000555049908286,0.000558969562667,0.000562862843359,0.000566731573905,0.000570574957375,0.000574394412211,0.000578190392273,0.000581958222402,0.000585700748753,0.000589417121913,0.000593103027962,0.00059675551634,0.000600376646908,0.000603961862742,0.000607511115807,0.000611023984755,0.000614496310419,0.00061793162015,0.000621330016257,0.000624689376372,0.000628010451442,0.000631296928234,0.000634545718404,0.000637757819311,0.000640936333713,0.000644080114189,0.000647188672671,0.000650263598309,0.000653301738182,0.000656304528874,0.000659269156639,0.000662196572026,0.000665088457545,0.000667942479549,0.000670757071346,0.000673532978029,0.000676271708532,0.00067897307172,0.000681634330541,0.000684257929617,0.000686843110718,0.000689389581783,0.000691891916342,0.000694351209302,0.000696769431035,0.000699141171951,0.000701465819625,0.000703743795586,0.000705972752787,0.000708154472808,0.000710289464072,0.000712378386024,0.00071442414119,0.000716431546636,0.000718394252516,0.000720315601566,0.000722199962994,0.000724042538869,0.000725845301665,0.000727608326425,0.000729329837741,0.000731005772301,0.000732634321795,0.00073420905803,0.000735732429073,0.000737208649623,0.000738633944617,0.000740009656169,0.000741338820219,0.000742617139681,0.00074384364485,0.000745021243864,0.00074615194252,0.000747239900964,0.000748286829892,0.000749287901442,0.000750241765246,0.000751148968205,0.000752007040088,0.000752818713539,0.000753584770005,0.000754307771984,0.000754987672262,0.000755623798429,0.000756213043711,0.000756754118065,0.000757248288633,0.000757693981629,0.000758091271951,0.000758437882837,0.000758735933087,0.000758984980162,0.000759181001915,0.000759322251417,0.000759410386433,0.000759447502514,0.000759436164681,0.000759378035942,0.000759275498749,0.000759128136992,0.000758936572183,0.00075869562346,0.000758408950298,0.00075807829638,0.000757700115177,0.000757273291291,0.000756797954609,0.000756274644737,0.000755699469978,0.000755073546635,0.000754398507413,0.000753675414292,0.000752903745987,0.000752081690438,0.000751211413022,0.000750295939711,0.000749333542953,0.000748321448934,0.00074725941263,0.000746150618127,0.000744991008604,0.000743781941157,0.000742524204069,0.00074121882007,0.000739865227012,0.000738463411293,0.000737013442908,0.000735517820631,0.000733979935861,0.000732393893453,0.000730760252618,0.000729079619058,0.00072734737258,0.000725562660845,0.000723726787264,0.000721840066411,0.000719900350629,0.000717907369406,0.000715856350076,0.000713747828874,0.000711584252712,0.000709363309345,0.000707091373804,0.000704770559553,0.000702400312329,0.000699977885827,0.000697506101126,0.000694986638064,0.000692421687944,0.000689814074724,0.000687163493281,0.000684472539037,0.000681740298142,0.000678964340692,0.000676143802202,0.000673283015989,0.000670381334528,0.000667434951912,0.00066444484621,0.000661411107003,0.000658333317406,0.000655212651727,0.000652050685461,0.000648847690092,0.000645603412223,0.000642319095087,0.000638995393104,0.000635635708781,0.000632241397868,0.000628812611961,0.000625349568075,0.000621855333678,0.000618326999099,0.000614766893091,0.000611179407115,0.000607560552344,0.000603911491181,0.000600230316564,0.000596519122251,0.000592780494664,0.000589015066731,0.000585218047109,0.000581389937448,0.000577530280014,0.000573637072284,0.000569711336352,0.00056575622046,0.000561771165941,0.00055775504253,0.000553704991344,0.000549617654939,0.000545496468157,0.000541343852037,0.000537159929003,0.00053294696902,0.000528705975218,0.000524434573084,0.000520133734736,0.00051580305725,0.000511445345298,0.000507065729109,0.000502663862307,0.000498238398778,0.000493790093416,0.000489317365636,0.000484821247883,0.000480301628858,0.000475758365653,0.000471193429349,0.000466605768438,0.000461992868519,0.00045735386045,0.000452691490399,0.00044800737502,0.000443301717877,0.000438575893555,0.000433827109366,0.000429058105287,0.000424267439189,0.000419455334816,0.00041462548962,0.000409779723819,0.00040491488723,0.000400027230091,0.000395118794766,0.000390188346933,0.000385237080435,0.000380265440518,0.000375275304395,0.000370267391327,0.000365240507381,0.00036019472064,0.000355129140477,0.000350051687523,0.00034496030539,0.000339853434754,0.000334734263878,0.000329601563948,0.000324457417147,0.000319300710434,0.000314135251351,0.00030896227608,0.000303784834781,0.000298601013875,0.000293407946487,0.000288210830299,0.000283009013707,0.000277807792874,0.000272607507197,0.000267405929003,0.000262200695622,0.000256991513996,0.000251774946757,0.000246549073631,0.000241318483632,0.000236080548154,0.000230837396893,0.000225585498144,0.000220322648555,0.000215053652715,0.00020978231312,0.000204507146484,0.000199230905846,0.000193954851626,0.000188677611722,0.000183400715721,0.000178124823986,0.000172849127855,0.000167574736141,0.00016230067403,0.000157025220079,0.000151748492389,0.000146471772023,0.000141195819124,0.000135926649748,0.000130668408443,0.000125418140974,0.000120178816092,0.000114952094727,0.000109739635581,0.000104541518077,9.93576750152e-05,9.41903756692e-05,8.90373828004e-05,8.38977737922e-05,7.876751221e-05,7.36461108053e-05,6.85350244559e-05,6.34332697555e-05,5.83425112991e-05,5.3263226125e-05,4.81949983735e-05,4.31398442209e-05,3.8098951824e-05,3.30763533817e-05,2.80685339625e-05,2.30774459619e-05,1.80992954696e-05,1.3135959851e-05,8.18717174188e-06,3.25036271457e-06,-1.67145401163e-06,-6.57792228827e-06,-1.14697896795e-05,-1.63500681941e-05,-2.12171575705e-05,-2.60675485835e-05,-3.08997681024e-05,-3.57094646587e-05,-4.04983007371e-05,-4.52671698376e-05,-5.00163221494e-05,-5.47489545938e-05,-5.94646693904e-05,-6.41665306292e-05,-6.88512015896e-05,-7.351811336e-05,-7.81655343185e-05,-8.27959878724e-05,-8.74102736312e-05,-9.20047557095e-05,-9.65766480439e-05,-0.000101123543936,-0.000105641995603,-0.000110133818977,-0.000114595875746,-0.000119031281992,-0.000123442564982,-0.000127833170277,-0.000132201258242,-0.000136547692184,-0.00014087281402,-0.000145177782571,-0.000149463354687,-0.000153728390634,-0.000157971605414,-0.000162195061019,-0.000166396563025,-0.000170571872357,-0.000174719353524,-0.00017883973075,-0.000182932394156,-0.000186998581748,-0.00019103808181,-0.000195047656464,-0.000199030121178,-0.000202980949384,-0.00020689897189,-0.000210788149382,-0.000214651407526,-0.000218486361127,-0.000222292458431,-0.000226068597656,-0.00022981614253,-0.000233534354248,-0.000237225882603,-0.000240889425275,-0.000244527472303,-0.000248137873048,-0.000251716312154,-0.000255260556423,-0.000258777284679,-0.000262264122489,-0.000265723585276,-0.000269155436541,-0.000272557847536,-0.000275930360339,-0.000279271229508,-0.000282579939328,-0.00028585864103,-0.000289109111025,-0.000292332011824,-0.000295524341115,-0.000298687180225,-0.000301816473251,-0.000304912914629,-0.00030797999049,-0.000311018730328,-0.0003140314466,-0.000317015731151,-0.00031997131522,-0.000322895870773,-0.000325791033198,-0.000328653519431,-0.00033148369946,-0.00033428287482,-0.000337050793796,-0.000339786122156,-0.000342487424131,-0.000345155187123,-0.000347792263648,-0.000350393093154,-0.000352959286626,-0.000355487862936,-0.000357982036117,-0.000360441912334,-0.000362866602627,-0.000365254984319,-0.000367607168879,-0.000369926093879,-0.000372210992285,-0.000374465264533,-0.000376689027789,-0.000378886000404,-0.000381059112161,-0.000383204669007,-0.00038532118694,-0.000387410459027,-0.000389470318656,-0.000391498758924,-0.000393492775184,-0.000395452913147,-0.000397378888533,-0.000399270090575,-0.000401121663085,-0.000402934277351,-0.000404713663261,-0.000406459243564,-0.000408170062625,-0.000409845755451,-0.000411488672618,-0.00041309820549,-0.000414674225813,-0.000416216551323,-0.000417727542499,-0.000419205708794,-0.000420645214207,-0.000422045180115,-0.000423413812841,-0.000424753982224,-0.000426069686102,-0.000427360646389,-0.000428626871395,-0.000429765686862,-0.000430671497378,-0.000431345877088,-0.000431791941519,-0.000432015038916)
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(257)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Canis_familiaris-male-liver-H3K27Ac-ERR572275.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) : 257',bty='n')
dev.off()
