# R script for Peak Model
#  -- generated by MACS
p <- c(0.0406709139258,0.0476166802143,0.0544561337535,0.0613756076417,0.0682402104334,0.0681967708154,0.0681876256327,0.0682607870946,0.0683716724352,0.0683762450266,0.0684391181579,0.0682607870946,0.068207059146,0.0679978630909,0.0677955259228,0.0676800679908,0.0677235076088,0.0676834974343,0.067605763381,0.0678286772102,0.0676560618861,0.0676972152084,0.0678286772102,0.0677909533315,0.0680058651258,0.0679978630909,0.0680275849348,0.0680458753002,0.0681510449017,0.0677372253829,0.0677829512966,0.0677909533315,0.0676560618861,0.0677337959394,0.0678046711056,0.0680081514215,0.0678389655408,0.0679018386721,0.0678435381322,0.0681121778751,0.068076740292,0.0680824560312,0.0680630225179,0.0680927443618,0.0678583990541,0.0678309635059,0.0678263909146,0.0676560618861,0.0675657532066,0.0676251968944,0.0678092436969,0.0678583990541,0.0677818081487,0.067801241662,0.067750943157,0.0677555157484,0.0678492538714,0.0679978630909,0.0680881717704,0.0679624255078,0.0679692843948,0.0677177918696,0.0676091928246,0.0675600374674,0.0676377715206,0.0674274323177,0.0672788230982,0.0672936840202,0.0672376697759,0.067279966246,0.0671244981395,0.0673714180734,0.0676309126336,0.0675783278328,0.0676229105987,0.0677006446519,0.0677246507566,0.067707503539,0.0676834974343,0.0674800171184,0.0674480089788,0.0673634160385,0.0672879682809,0.0671622220183,0.0671084940697,0.0671690809054,0.0672902545766,0.0673394099338,0.0672388129237,0.0673657023342,0.0673531277079,0.0672422423673,0.0671256412874,0.0670593387125,0.0669781752157,0.0669233041193,0.0669233041193,0.0669941792855,0.0671736534967,0.0672445286629,0.0670936331478,0.0672376697759,0.0672593895849,0.0673999967695,0.0677086466868,0.0678846914545,0.0678949797851,0.0677623746354,0.0678686873847,0.0678126731405,0.0679018386721,0.0678938366372,0.0681567606409,0.0681441860147,0.067822961471,0.0676514892947,0.0675074526666,0.0674182871349,0.067403426213,0.067497164336,0.067750943157,0.0677600883397,0.0676434872598,0.0678652579412,0.0679235584811,0.0678698305326,0.0679327036639,0.0681453291625,0.0681910550762,0.068076740292,0.0679224153333,0.0678538264628,0.0678732599761,0.0678949797851,0.0679715706905,0.0680824560312,0.0681007463967,0.0679178427419,0.0677898101836,0.067757802044,0.0678309635059,0.0680710245528,0.067866401089,0.0677863807401,0.0678904071937,0.0680138671607,0.0681841961891,0.0682322083985,0.0682905089385,0.0685317131331,0.0687957802847,0.0685420014637,0.0688929478512,0.0690255530009,0.0690769946538,0.0691490129679,0.0690872829844,0.0692290333168,0.0693959329017,0.0693776425363,0.0691512992635,0.0694039349366,0.0693056242222,0.0692804749697,0.0691593012984,0.0691330088981,0.0692747592305,0.0693502069881,0.0692964790395,0.0695708345216,0.0695776934086,0.0697731716896,0.0699777951534,0.0700040875537,0.0702658684096,0.0702738704445,0.0702910176621,0.0704030461506,0.0705173609348,0.0704224796639,0.070675115337,0.070479637056,0.0704819233517,0.0707448473554,0.0707722829036,0.0710523541249,0.0712364009275,0.0712295420405,0.0712592638844,0.0714261634693,0.0713381410855,0.0714958954877,0.071587347315,0.0715953493499,0.071732527091,0.0717576763435,0.0715416214013,0.0718399829881,0.0718354103968,0.0717508174564,0.0718525576144,0.0720034531295,0.0721120521745,0.0722217943674,0.0722709497246,0.072145203462,0.072514440215,0.0724252746833,0.0724367061617,0.0724572828229,0.072579599642,0.0726161803729,0.0727647895924,0.072933975473,0.0728539551241,0.0729396912122,0.0729808445345,0.0729351186209,0.0731797522591,0.0733317909221,0.0735798540038,0.0735981443693,0.073701027675,0.0737924795024,0.073976526305,0.074258883822,0.0742908919616,0.074569820035,0.074765298316,0.0749299116053,0.0749241958661,0.0751688295043,0.0754351829515,0.0755643586577,0.0758352846962,0.0759678898459,0.0760159020553,0.0759918959506,0.076111926474,0.0764685886007,0.0765383206191,0.0765486089497,0.0764548708266,0.076654921699,0.0766069094896,0.0765588972803,0.0768446842408,0.0772276387679,0.0772367839506,0.0770378762261,0.0769601421728,0.0771567636017,0.0771853422977,0.0772333545071,0.0774985648065,0.0779192432124,0.078051848362,0.0779283883951,0.0780335579966,0.0784713836201,0.0788234731554,0.0790178082886,0.079224718048,0.0793321739452,0.0795447994438,0.0796111020186,0.0797437071683,0.0800409256073,0.0802272587055,0.0802558374016,0.0804090192124,0.080375867925,0.0805439106578,0.0806456508157,0.0807210985733,0.0808114072528,0.0808617057579,0.0811955049278,0.0815441650196,0.0815670279765,0.0816813427607,0.0820654404356,0.0821054506101,0.0823535136918,0.0824563969976,0.0826541615743,0.0828073433851,0.0828827911427,0.0830668379453,0.0831834390252,0.0835423874476,0.0835561052217,0.0838304607038,0.0838258881124,0.0839367734531,0.084161973578,0.0846363799325,0.0849347415192,0.0852513934715,0.0859121329242,0.0864368377837,0.0871124381584,0.087882919804,0.0887871497471,0.0898239848398,0.0906664847995,0.0913009318518,0.0919376651999,0.0925972615048,0.0932099887481,0.0938730144965,0.0944800260007,0.0948869866325,0.0951956365498,0.095505429615,0.0956540388345,0.0958906704378,0.0960895781623,0.0962999173653,0.0965788454387,0.0966268576481,0.0966417185701,0.0967583196499,0.0971058365939,0.0970658264195,0.0973378956059,0.0976945577326,0.0979471934057,0.098155246313,0.0981300970605,0.0983747306987,0.0986879532074,0.0989840284985,0.0990171797859,0.099262956572,0.0995658907501,0.0997545101441,0.0999294117639,0.100223200759,0.100629018243,0.100595866956,0.100850788925,0.100973105744,0.101137719033,0.101447512098,0.101708149806,0.101823607738,0.102180269865,0.102169981534,0.102368889259,0.102683254915,0.102803285439,0.103103933321,0.103209102923,0.103334849185,0.103337135481,0.103580625972,0.103682366129,0.104200212102,0.104287091338,0.104563733116,0.104951260234,0.104907820616,0.105361650309,0.105684018001,0.105959516631,0.106138990842,0.106361904671,0.106512800186,0.106774581042,0.1071941163,0.107454754008,0.107923444624,0.108233237689,0.108535028719,0.108665347573,0.109098600605,0.109294078886,0.109655313604,0.109834787816,0.11000740314,0.11027718603,0.110488668381,0.110486382086,0.110789316264,0.111024804719,0.111027091015,0.111275154097,0.111290015019,0.111646677145,0.111683257876,0.111669540102,0.111878736157,0.112069641847,0.11208907536,0.112302844007,0.112677796499,0.112851554971,0.113037888069,0.113194499323,0.113619750321,0.113883817472,0.114207328312,0.114267915147,0.11457885136,0.114941229226,0.115098983628,0.115420208172,0.115693420506,0.115741432716,0.115732287533,0.115816880473,0.115958630806,0.116196405557,0.116383881803,0.116743973373,0.116566785458,0.117019472003,0.117355557469,0.117699644969,0.117954566938,0.118359241274,0.118395822005,0.119040557388,0.119353779897,0.119461235794,0.120102541733,0.119863623834,0.119969936584,0.120325455562,0.120749563412,0.120900458927,0.12125369161,0.121234258097,0.121419448047,0.121531476536,0.121662938538,0.121898426993,0.122204790615,0.122609464951,0.12306558094,0.123177609428,0.123634868565,0.123858925542,0.1239080809,0.124276174505,0.124480797968,0.12481345399,0.124750580859,0.124609973675,0.12471285698,0.124832887504,0.124736863085,0.124948345436,0.125110672429,0.125162114082,0.125149539456,0.125267283684,0.125405604573,0.125407890868,0.125167829822,0.125355306068,0.125436469564,0.12555535694,0.12567195802,0.125614800628,0.125628518402,0.125645665619,0.125856004822,0.126022904407,0.126198949175,0.126210380653,0.126112069939,0.126133789748,0.126224098428,0.12629154415,0.126602480363,0.126627629616,0.126370421351,0.12633384062,0.126246961384,0.126241245645,0.126405858934,0.126366991908,0.126541893528,0.126362419316,0.12623324361,0.126290401002,0.126561327041,0.126604766659,0.126509885388,0.126739658104,0.126617341285,0.126437867074,0.126292687298,0.12633955636,0.126355560429,0.126354417282,0.126256106567,0.126150936966,0.126178372514,0.125893728701,0.125836571309,0.125998898303,0.125843430196,0.125745119482,0.125628518402,0.125651381359,0.125681103203,0.125658240246,0.125556500088,0.125503915287,0.125378169024,0.125174688709,0.125125533351,0.125099240951,0.124983783019,0.124788304738,0.124664844771,0.124577965535,0.124412209098,0.124283033392,0.124219017113,0.12428417654,0.124133281024,0.124121849546,0.123829203698,0.123561707103,0.1230072804,0.122654047717,0.12242999074,0.122332823173,0.122018457517,0.121611496885,0.121355431768,0.120934753362,0.120993053902,0.120899315779,0.120821581726,0.12055980087,0.120422623129,0.120105971177,0.120028237123,0.119830472547,0.119352636749,0.118951391856,0.118566151033,0.118114607636,0.117897409546,0.117728223665,0.117347555434,0.117057195882,0.11696803035,0.116698247459,0.116641090067,0.116522202692,0.115984923206,0.115835170839,0.115601968679,0.115287603022,0.115297891353,0.115086409002,0.114682877814,0.114455391393,0.114425669549,0.114461107133,0.114463393428,0.114337647166,0.114007277439,0.113931829682,0.11360946199,0.113455137031,0.113050462695,0.112614923368,0.112114224613,0.112070784995,0.112054780925,0.111734699529,0.111677542137,0.111533505509,0.111266008914,0.110879624943,0.110856761986,0.110995082875,0.110896772161,0.110230316969,0.109801636528,0.109376385531,0.109167189476,0.109108888936,0.109052874692,0.109034584326,0.108842535489,0.108448149483,0.10839670783,0.10849730484,0.108372701726,0.108297253968,0.107707389681,0.106702562728,0.105757179463,0.104992413557,0.104195639511,0.103513180249,0.102157406908,0.100938811308,0.0998619660412,0.0989074375931,0.098285565167,0.0976293983056,0.0972361554479,0.0967160231798,0.0963342118005,0.0956391779125,0.0954482722229,0.0952516507941,0.0948641236756,0.0944937437748,0.0940959283257,0.0939438896627,0.0935609351356,0.0932785776186,0.0930042221365,0.0928133164469,0.092646416862,0.0923789202669,0.0923023293615,0.092190300873,0.0919719596351,0.0921091373762,0.0918599311466,0.0914746903238,0.0913009318518,0.0912369155727,0.0912094800245,0.0910803043183,0.0908573904891,0.0907659386617,0.0906321903642,0.0901143443917,0.0899851686856,0.0899725940593,0.0896959522815,0.0894147379124,0.0891975398224,0.0889117528619,0.0888340188086,0.0882407250786,0.088078398085,0.0879355046047,0.0879812305184,0.0877617461327,0.087629140983,0.087346783466,0.0870747142796,0.0871695955505,0.0869146735817,0.0870232726267,0.0869432522778,0.0866220277342,0.0861910609977,0.0862070650675,0.0860184456735,0.0860721736221,0.0859418547681,0.0855394667277,0.0854571600831,0.0853234117856,0.0849530318847,0.0850079029811,0.0849416004063,0.0847083982465,0.0846340936368,0.084270572623,0.0840202232456,0.0836978555541,0.0835709661436,0.0833594837928,0.0834829437598,0.0832726045568,0.0831754369903,0.0830496907276,0.082743327106,0.0827010306358,0.0826210102869,0.0825878589994,0.0821911866982,0.0820277165568,0.0816893447956,0.0816504777689,0.0813624045127,0.0810983373612,0.0808285544705,0.0806170721197,0.080404446621,0.0802684120278,0.080288988689,0.0800226352418,0.0797517092032,0.0795676624006,0.0794750674254,0.0794144805898,0.0794945009387,0.0793961902243,0.079333317093,0.079159558621,0.0788977777652,0.0789629371922,0.0790703930893,0.079044100689,0.0787880355723,0.0785091074989,0.078175308329,0.0779169569167,0.0776654643914,0.0774791312931,0.0774276896403,0.0773408104043,0.0771956306283,0.0767143653868,0.0767978151793,0.0764720180443,0.0764560139745,0.0762068077449,0.0760433376035,0.0760764888909,0.0757872724869,0.0756020825364,0.0751322487733,0.0752671402187,0.0748510344042,0.0748487481085,0.0746909937063,0.0747470079506,0.074656699271,0.0746395520534,0.0745812515135,0.0744486463638,0.0745949692876,0.0743594808321,0.0744463600681,0.0743434767623,0.0742748878918,0.0741617162554,0.0740279679579,0.0737799048762,0.0737056002664,0.0736495860222,0.0735935717779,0.0734541077412,0.073296353339,0.0731488872673,0.0728425236456,0.0726904849826,0.072644759069,0.0726241824078,0.0726470453646,0.0725281579891,0.0722092197411,0.0721577780882,0.0719840196162,0.071775966709,0.0719257190763,0.0719600135116,0.0716685108118,0.0715073269661,0.0711975339009,0.0709048880533,0.0709391824886,0.0707894301213,0.0708145793738,0.0710397794987,0.070907174349,0.070914033236,0.0711129409606,0.0710386363508,0.0709563297062,0.0710740739339,0.0710900780037,0.0710683581947,0.0710889348559,0.0707848575299,0.0706705427457,0.0704659192819,0.0704636329863,0.0704167639247,0.0704007598549,0.0700498134674,0.0698600509256,0.0696485685748,0.0692804749697,0.0693444912489,0.0692873338568,0.0690598474362,0.068800352876,0.0686025882993,0.0685705801598,0.0689043793297,0.0689546778347,0.0690564179926,0.0692473236823,0.0692187449862,0.0691364383416,0.0692336059082,0.0692050272121,0.0691821642553,0.0693273440312,0.0691170048283,0.0689592504261,0.0688952341469,0.0687008990138,0.0686277375519,0.0686323101432,0.0686105903342,0.0683911059486,0.0683476663306,0.0682402104334,0.0682127748852,0.0681773373021,0.0680893149182,0.0680595930743,0.0679212721855,0.0678309635059,0.0678492538714,0.0681601900845,0.0681144641708,0.0682424967291,0.0679875747603,0.0679372762552,0.0679704275427,0.0680264417869,0.0680893149182,0.0680961738053,0.0679189858898,0.0677978122185,0.0677646609311,0.0675531785803,0.0677120761304,0.0676800679908,0.0674205734306,0.067273107359,0.0673359804903,0.067207947932,0.0673416962295,0.0673188332727,0.0673611297428,0.0674228597263,0.0676171948595,0.067664063921,0.0679601392121,0.0681761941542,0.0681121778751,0.0682173474766,0.0680070082736,0.0679727138383,0.0679727138383,0.0679132701506,0.0674834465619,0.0673554140036,0.0671908007144,0.067084487965,0.0670113265032,0.0669130157887,0.0670936331478,0.0671016351827,0.0671885144187,0.0670661975996,0.06725138755,0.0674605836051,0.067584043572,0.0674788739706,0.0676286263379,0.0677520863048,0.0676091928246,0.0675714689458,0.0673954241781,0.0674857328576,0.0676446304077,0.0676103359724,0.0676526324426,0.0678058142534,0.0676126222681,0.0676720659559,0.0677086466868,0.0676526324426,0.0676594913296,0.0675131684058,0.0674205734306,0.0673142606813,0.0674137145436,0.0673565571515,0.0676331989293,0.0675737552415,0.0675954750505,0.0676697796602,0.0677589451919,0.0680493047438,0.0680321575261,0.0680687382571,0.0680035788301,0.0680275849348,0.0678938366372,0.0679372762552,0.0680275849348,0.0679921473517,0.0681510449017,0.0681373271276,0.068170478415,0.0681293250927,0.0680264417869,0.0678423949844,0.067975000134,0.0679064112635,0.0679052681157,0.0680481615959,0.0678263909146,0.0675714689458,0.0675851867199,0.0676812111386,0.0677006446519,0.0680607362222,0.0678332498016,0.0677840944444,0.0678835483067,0.0676446304077,0.067729223348,0.0681316113884,0.0681110347272,0.0681350408319,0.0682607870946,0.0681156073186,0.0680710245528,0.0681796235978,0.0682550713553,0.0683476663306,0.0684276866795,0.0682539282075,0.0682459261726,0.0683065130082,0.0681281819449,0.0681739078586,0.0684482633407,0.0685305699853,0.0682882226428,0.0684082531662,0.068257357651,0.068185339337,0.0681876256327,0.0681018895445,0.0682150611809,0.0681864824848,0.0682402104334,0.0681361839798,0.0681350408319,0.0683110855996,0.0683693861396,0.068359097809,0.0683076561561,0.0685008481414,0.0687043284573,0.0686711771699,0.0685602918292,0.068756913258,0.0690186941139,0.0687672015886,0.0689466757998,0.0689226696951,0.0691227205675,0.0690895692801,0.0688746574858,0.0689992606005,0.0688746574858,0.0687386228925,0.0686666045785,0.0687523406667,0.0685808684903,0.0687317640055,0.0685968725601,0.0685682938641,0.0686894675353,0.0686494573609,0.0688735143379,0.0689603935739,0.0688838026685,0.0688529376768,0.0688666554509,0.0687752036235,0.0687809193627,0.0688083549109,0.0686746066134,0.0687100441965,0.0686071608907,0.0686300238476,0.0686860380918,0.068822072685,0.0688312178678,0.0691707327769,0.0693536364316,0.0692541825693,0.0693079105179,0.069582266,0.0695594030432,0.0697605970634,0.0699046336915,0.0698200407512,0.069929782944,0.069770885394,0.0697423066979,0.069929782944,0.0700303799541,0.0698497625951,0.0699286397962,0.069690865045,0.0696680020882,0.0699537890487,0.0700486703196,0.0699640773793,0.069908063135,0.0699263535005,0.0699343555354,0.0699046336915,0.0701446947383,0.0702189993481,0.0701675576952,0.06985776463,0.0697480224371,0.0698463331515,0.0698349016731,0.0697434498457,0.0698326153774,0.06979946409,0.0697171574454,0.0696771472709,0.0695834091479,0.0695091045381,0.0695799797043,0.0695571167475,0.0698268996382,0.0698657666648,0.0698028935335,0.0698531920386,0.0699149220221,0.0700280936584,0.0701504104775,0.0703367435758,0.0704190502204,0.0705265061176,0.0703378867236,0.0703687517154,0.0703150237668,0.0701584125124,0.0698737686997,0.0697445929936,0.0697880326116,0.0698177544555,0.0698303290817,0.0698589077778,0.0697857463159,0.0697663128026,0.0699377849789,0.0702612958182,0.0705939518403,0.0705436533352,0.0705710888834,0.0704830664996,0.0703939009679,0.0701332632599,0.0703298846887,0.0703001628448,0.0703081648797,0.0701972795391,0.0699389281267,0.0700246642149,0.0700246642149,0.0700612449458,0.0701332632599,0.0703310278366,0.0701378358513,0.0702155699045,0.0700155190322,0.0697834600202,0.0698097524206,0.0698531920386,0.0698246133425,0.069669145236,0.0696291350615,0.0694473745546,0.0695616893389,0.0694325136327,0.0694245115978,0.0695799797043,0.0694428019633,0.069531967495,0.0694713806593,0.069575407113,0.0694165095629,0.0695205360165,0.0693730699449,0.0693079105179,0.0692210312819,0.0691512992635,0.0693204851442,0.0690084057833,0.0689295285822,0.0689546778347,0.0691821642553,0.0690141215225,0.0690929987236,0.069227890169,0.0692770455262,0.0692313196125,0.0692370353517,0.0694439451111,0.0693936466061,0.069336489214,0.0691855936988,0.0693193419963,0.0692313196125,0.069060990584,0.0690552748448,0.0692073135078,0.069126150011,0.0690564179926,0.0692679003434,0.0693547795794,0.0694382293719,0.0693822151276,0.0693444912489,0.0693181988485,0.0694382293719,0.069358209023,0.069358209023,0.069321628292,0.069379928832,0.0692370353517,0.0692587551607,0.0694588060331,0.0694633786244,0.0696760041231,0.0695811228522,0.0694633786244,0.0694210821543,0.0694222253021,0.0691833074031,0.0693662110579,0.0691810211074,0.0688998067383,0.06920617036,0.0690495591056,0.0689318148779,0.0690129783746,0.0689901154178,0.068923812843,0.0687123304922,0.0685900136731,0.0685077070284,0.0685511466464,0.0684699831497,0.0685008481414,0.0686220218127,0.0685580055335,0.0684699831497,0.0684059668705,0.0686963264224,0.0685454309072,0.0686597456914,0.0686231649605,0.0684139689054,0.0682390672856,0.0682470693205,0.0681579037888,0.0682687891295,0.0682459261726,0.0678469675757,0.0679830021689,0.0679189858898,0.0678183888797,0.0677189350174,0.0677715198181,0.0677166487217,0.0678801188631,0.0678435381322,0.0678698305326,0.0683465231827,0.0680927443618,0.0681739078586,0.0682550713553,0.0683396642957,0.0684882735151,0.0683968216878,0.0682825069036,0.0684196846446,0.0682665028338,0.0679944336473,0.0681144641708,0.0680881717704,0.0680172966042,0.0678115299926,0.067490305449,0.0673325510468,0.0671827986795,0.0667575476822,0.0668261365527,0.0668844370927,0.0668730056143,0.0666283719761,0.0598849428556,0.0532672599977,0.0466804421316,0.0400478983518,0.0)
m <- c(0.0405107117724,0.0471657151029,0.0538321945558,0.0605709735792,0.0673682808265,0.0672374530321,0.0673315572351,0.0675082895187,0.0675059942943,0.067633379252,0.0674027091934,0.0675805890893,0.0677114168837,0.0677355167406,0.0676196079052,0.0676586267211,0.0675266513144,0.067460089805,0.0675955080483,0.0676207555174,0.0678629016983,0.0677917497399,0.0677883069032,0.0676735456801,0.0678135543723,0.0678847063307,0.0679788105337,0.0680109436761,0.067960448738,0.0679535630646,0.0679948771049,0.0680820956345,0.0680924241446,0.0681922664087,0.0680304530841,0.0681842331231,0.0681188192259,0.0681302953482,0.0679868438193,0.0681096383281,0.0681061954914,0.0682060377555,0.0683575225701,0.068456217222,0.0687844343202,0.0688498482174,0.069011661542,0.0690736326025,0.0691883938257,0.0690965848472,0.0691413417242,0.0691723272544,0.06904149946,0.0691092085817,0.068932476298,0.0688498482174,0.068917557339,0.069061008868,0.068932476298,0.0688119770137,0.0687626296878,0.0687373822187,0.0689255906247,0.0689164097268,0.0690242852766,0.0690288757255,0.0690001854197,0.069061008868,0.0692388887639,0.0696715385751,0.0697759712882,0.0698953229603,0.0698849944502,0.0699492607352,0.0700766456929,0.0701971449772,0.0703417441183,0.0703394488939,0.0704851956473,0.0705643808913,0.0705942188093,0.0705620856668,0.0705081478919,0.0705850379114,0.0705471667078,0.0704874908717,0.0703842057709,0.0704599481782,0.0704932289329,0.0703750248731,0.0701741927325,0.0702774778334,0.0704048627911,0.0704978193818,0.0705792998503,0.0706458613597,0.0706940610734,0.0705609380546,0.0705368381977,0.070379615322,0.0704450292192,0.0703738772608,0.070379615322,0.0704037151788,0.0703509250162,0.0702143591606,0.0702889539557,0.0703394488939,0.0701569785491,0.0702235400585,0.0703635487507,0.0703015776902,0.0702591160377,0.070052545836,0.0701305834677,0.0701787831815,0.0702717397722,0.0704060104033,0.0706756992777,0.0706791421144,0.0706515994209,0.0707330798893,0.0707479988483,0.0707629178073,0.0706791421144,0.0707342275015,0.070672256441,0.0705873331359,0.070627499564,0.0704863432595,0.0705288049121,0.0705356905855,0.0707973461743,0.0708937456017,0.0707675082562,0.0709121073974,0.07082603648,0.0707629178073,0.070781279603,0.0709614547234,0.0711267108847,0.0711404822315,0.071063592212,0.0712013056797,0.0714193520037,0.0713734475145,0.0715639511449,0.0717705213466,0.0715754272672,0.0717303549185,0.0717108455105,0.0716821552048,0.0713975473713,0.0711634344761,0.0712529482302,0.0712449149445,0.0711554011905,0.0709660451723,0.0709935878658,0.0710165401105,0.0709327644176,0.0710130972738,0.0711485155171,0.0713367239231,0.071296557495,0.0714193520037,0.0711795010474,0.0712563910669,0.0714216472282,0.0712701624136,0.0712655719647,0.071168024925,0.0712162246388,0.0712093389654,0.071291967046,0.0711163823746,0.0712529482302,0.0712104865776,0.0711221204358,0.0711267108847,0.071078511171,0.0709901450292,0.0708237412556,0.0707583273584,0.0705758570136,0.0706378280741,0.0704553577293,0.0704760147494,0.0704324054846,0.0704496196681,0.070345186955,0.0704496196681,0.0705425762589,0.0704622434027,0.0704645386271,0.070454210117,0.0707158657058,0.0706779945022,0.0706493041964,0.0706791421144,0.0708202984189,0.0707560321339,0.0705712665646,0.0704633910149,0.0704174865256,0.0703405965061,0.0703383012817,0.0702637064866,0.0703073157514,0.070394534281,0.0703715820364,0.0703096109759,0.0705838902992,0.0708053794599,0.0707675082562,0.0706527470331,0.070345186955,0.0703578106896,0.0703635487507,0.0699481131229,0.0698758135524,0.0699515559596,0.0696646529018,0.0696577672284,0.0696141579636,0.0696818670852,0.0697484285947,0.069680719473,0.0695969437801,0.0697621999414,0.0697289191867,0.0694500494145,0.0695969437801,0.0694993967404,0.0694752968836,0.0696382578204,0.0696990812687,0.0696233388614,0.0694557874756,0.0695028395771,0.0694385732921,0.0695246442095,0.0693823402928,0.0690449422967,0.0691757700911,0.0688555862785,0.0688050913404,0.0687350869942,0.0689267382369,0.0687947628303,0.0688693576253,0.0689508380938,0.0690483851334,0.0692216745804,0.0691023229083,0.0692423316006,0.0693111883344,0.0693823402928,0.0691115038062,0.0692538077229,0.0690219900521,0.0689037859923,0.0687075443007,0.0689003431556,0.0690965848472,0.0690070710931,0.068669673097,0.0685514690372,0.0686800016071,0.0685778641185,0.0686054068121,0.0686031115876,0.0685916354653,0.0684378554263,0.0681578380418,0.0680832432467,0.0684791694666,0.0686822968316,0.0687086919129,0.0686593445869,0.0686914777294,0.0687224632597,0.0688900146455,0.0688349292584,0.0687511535655,0.0688349292584,0.0684665457321,0.0682783373261,0.068020124574,0.0680006151661,0.0680373387575,0.068020124574,0.0678835587184,0.0678158495968,0.067896182453,0.0676827265779,0.0677883069032,0.0678766730451,0.0680143865128,0.0679076585753,0.0680660290633,0.0680855384712,0.0681325905727,0.0681865283476,0.0681612808785,0.06834719406,0.0683517845089,0.0683150609175,0.0682519422448,0.0682886658362,0.0682243995512,0.0682484994081,0.0681222620626,0.067955858289,0.0679306108199,0.0677997830255,0.0677389595773,0.0676884646391,0.06766321717,0.0675266513144,0.0674784516007,0.0674222186014,0.0674773039885,0.0676551838844,0.0676505934354,0.0677355167406,0.0676127222318,0.0677114168837,0.0677894545155,0.067707974047,0.0675036990698,0.0673682808265,0.0672856527458,0.0671158061356,0.0670515398506,0.0668771027914,0.0669953068513,0.0668989074238,0.066904645485,0.0670320304427,0.0671089204622,0.0673097526027,0.0673671332143,0.0673648379898,0.0673774617243,0.0676000984973,0.0676196079052,0.0676609219455,0.0676081317829,0.0676861694146,0.0676884646391,0.0675507511713,0.0678032258622,0.068035043533,0.0680545529409,0.0678996252897,0.0678973300652,0.0677504356996,0.0678445399026,0.0678330637803,0.0678732302084,0.0679237251465,0.0676942027002,0.0675174704166,0.0674543517439,0.0674107424791,0.0674486136827,0.067479599213,0.0674543517439,0.0674933705597,0.0673935282956,0.0672810622969,0.0672363054199,0.0672959812559,0.0675255037022,0.0677102692715,0.0677986354133,0.0677906021277,0.0678778206573,0.0678101115356,0.0678560160249,0.0679099537998,0.0678709349839,0.0679673344113,0.0679214299221,0.0679065109631,0.0678388018414,0.0680281578596,0.0680143865128,0.0681784950619,0.0681543952051,0.0681681665519,0.068223251939,0.0681578380418,0.0681107859403,0.0680361911452,0.0680809480223,0.0680224197985,0.0680235674107,0.0680006151661,0.0681429190828,0.0681647237152,0.0683494892844,0.0684045746716,0.0683850652636,0.0686478684646,0.0686490160769,0.0687442678921,0.068937066747,0.0690346137867,0.0691964271113,0.0692561029473,0.069184950989,0.0694087353741,0.0696749814118,0.0697461333702,0.0698677802667,0.0699079466948,0.0697381000846,0.0696026818413,0.0694282447821,0.0695751391477,0.0697117050032,0.0696566196161,0.069616453188,0.0694741492713,0.06944775419,0.0695889104945,0.0698999134092,0.0701822260182,0.0706033997071,0.0706837325633,0.0707479988483,0.0707870176642,0.0708329221534,0.0710647398242,0.0713126240662,0.0713160669029,0.0714113187181,0.07137115229,0.0711737629862,0.0713126240662,0.0714721421664,0.0715937890629,0.0718554446517,0.0719862724461,0.0719185633244,0.0721389048729,0.072010372303,0.0722857992385,0.072397117625,0.0724292507675,0.0724499077876,0.0725107312359,0.0723167847688,0.0724200698696,0.0726220496224,0.07246138391,0.0727563202534,0.072689758744,0.0727012348663,0.072892886109,0.0731660178201,0.0731924129014,0.0733668499606,0.0732819266555,0.0734299686333,0.0736652291408,0.0736606386919,0.0739131133828,0.0741001741766,0.0742826445214,0.0741977212162,0.0744972480087,0.074613156844,0.0748564506371,0.0748702219839,0.0751261395115,0.075203029531,0.0753361525499,0.0756150223221,0.0755105896091,0.0756655172603,0.0757160121985,0.0760316055622,0.0761521048465,0.0763931034151,0.076556064352,0.0767327966356,0.0767362394723,0.0768131294918,0.0771333133044,0.0774007069544,0.077701381359,0.077716300318,0.07782532348,0.0779481179888,0.077968775009,0.0781960022308,0.0784897909621,0.0786194711442,0.0786791469803,0.0789293264468,0.0788834219575,0.0790372019965,0.0790601542411,0.079148520383,0.0792713148917,0.0795754321331,0.0797624929268,0.0800425103113,0.0801423525755,0.0802261282684,0.0803890892052,0.0805302455097,0.0809674857699,0.0811350371557,0.0812142223997,0.0810799517686,0.0811625798493,0.08111667536,0.0814414496215,0.08138406901,0.081552768008,0.0818258997191,0.0819418085545,0.0821460835317,0.0826028331998,0.0829528549304,0.0832202485804,0.0833591096604,0.0833097623344,0.0838193021652,0.0841326003044,0.084378189322,0.0844734411372,0.0848016582354,0.0847878868886,0.084700668359,0.0847098492569,0.085077085171,0.0854282545138,0.0852274223733,0.0852400461078,0.0853972689836,0.0858218855092,0.0861305931995,0.0861971547089,0.086722761111,0.0868662126399,0.0869729405774,0.0870417973113,0.0873906714297,0.0877682358539,0.087902506485,0.0878129927309,0.0879093921583,0.0884327033359,0.0883925369078,0.0888263343313,0.0890535615532,0.0892624269793,0.0894552258342,0.0894357164263,0.0896239248322,0.0898052475648,0.0898545948908,0.0899337801347,0.0899762417873,0.0898947613189,0.0900554270313,0.0904146296597,0.0905661144743,0.0910446687748,0.0911709061203,0.0913407527306,0.0915140421775,0.0918502925614,0.0920626008242,0.0922404807201,0.0924436080851,0.0925101695945,0.0925709930428,0.0925480407981,0.0927236254695,0.0930587282411,0.0931115184038,0.0929864286706,0.0932893982997,0.0937920524571,0.0941765025546,0.0946148904271,0.0952013202774,0.0952954244804,0.095363133602,0.0954492045194,0.0956661032311,0.0960631770632,0.0963845084881,0.0965738645063,0.0969204434002,0.0973404694769,0.0978408284099,0.0988369558268,0.0998904638553,0.100896919782,0.102082403218,0.103087711532,0.104153843295,0.105120132794,0.105964775397,0.106545467186,0.107115830465,0.107251248708,0.107554218337,0.107860630803,0.108020148903,0.108373613471,0.108518212612,0.108886596138,0.109195303828,0.10955106362,0.109888461616,0.110527681629,0.110798518116,0.111117554316,0.111456099925,0.11134592915,0.111635127433,0.111749888656,0.111716607901,0.111769398064,0.111896783021,0.112012691857,0.11237418971,0.112765525481,0.112913567459,0.113162599313,0.113286541434,0.11354704941,0.11393264712,0.114278078402,0.11432857334,0.114581048031,0.114670561785,0.114599409827,0.114879427211,0.115136492351,0.115283386717,0.115304043737,0.11560930859,0.11558865157,0.115818174017,0.115772269527,0.116060320197,0.116169343359,0.116297875929,0.116535431661,0.116836106066,0.117061038063,0.116984148044,0.117384664713,0.117610744322,0.118065198766,0.118052575031,0.118354397048,0.118462272598,0.118582771882,0.118837541798,0.119138216202,0.119483647484,0.119783174276,0.120158443476,0.120143524517,0.120475184452,0.120827501407,0.121259003606,0.121622796683,0.121819038375,0.121892485558,0.122092170086,0.122294149839,0.122382515981,0.122665976202,0.123204206339,0.123321262786,0.123500290294,0.123780307679,0.12403278237,0.12396622086,0.124214105102,0.124255419143,0.124324275876,0.12465019775,0.124750040014,0.125002514705,0.1252928606,0.125406474211,0.12552926872,0.12613635559,0.12616734112,0.126270626221,0.126500148667,0.126706718869,0.126437029995,0.126365878036,0.126069794081,0.126165045896,0.12617766963,0.12604913706,0.126182260079,0.126493262994,0.126661961992,0.126500148667,0.126531134198,0.12657359585,0.126801970684,0.12661950034,0.126618352727,0.126939684152,0.12696952207,0.126883451153,0.126795085011,0.126888041602,0.127022312233,0.127163468537,0.127075102395,0.127093464191,0.126801970684,0.126487524933,0.126222426507,0.126022741979,0.126080122591,0.125921752103,0.125850600144,0.125458116761,0.125393850476,0.125576320821,0.125835681185,0.125776005349,0.125687639208,0.125843714471,0.125759938778,0.125695672493,0.125801252818,0.126000937347,0.126065203632,0.125952737633,0.125763381615,0.125717477126,0.125541892454,0.125499430802,0.125246956111,0.125179246989,0.125008252766,0.125140228173,0.125020876501,0.12480971585,0.124856767952,0.124791354055,0.125071371439,0.124922181849,0.124688068954,0.124394280223,0.124241647796,0.123617346742,0.123270767848,0.123092887952,0.122826641914,0.122687780834,0.122506458102,0.122312511635,0.122049708434,0.12184199062,0.121417374094,0.121582630255,0.121510330685,0.121371469605,0.121086861771,0.120724216306,0.120320256801,0.119903673561,0.119956463723,0.119948430438,0.119826783541,0.119376919546,0.119335605506,0.118784751635,0.118697533105,0.118497848577,0.118425549007,0.118268326131,0.118014703828,0.117968799338,0.11788731887,0.117687634342,0.117221703776,0.117041528655,0.116748887536,0.116487231947,0.115949001811,0.115885883138,0.115800959833,0.115362571961,0.114905822292,0.114994188434,0.114677447458,0.114515634134,0.114431858441,0.11410249373,0.113889037855,0.113370317127,0.112812577582,0.112340908955,0.112153848161,0.11170054133,0.111527251883,0.111461837986,0.111048697582,0.110805403789,0.110536862527,0.11030160202,0.110021584635,0.109972237309,0.110068636737,0.109751895761,0.109623363191,0.109289408031,0.109160875461,0.108917581668,0.108899219873,0.108729373262,0.108737406548,0.108459684388,0.107856040354,0.107681603295,0.107304038871,0.10719042526,0.106788760979,0.106692361552,0.106353815943,0.10622872621,0.106054289151,0.105878704479,0.105817881031,0.105588358585,0.105490811545,0.105276208058,0.105101770999,0.104836672573,0.104656497453,0.104262866457,0.103918582788,0.103800378728,0.103495113875,0.103203620368,0.10279851325,0.102672275905,0.102451934356,0.102238478481,0.102084698442,0.101980265729,0.101918294668,0.101657786692,0.101463840225,0.101366293185,0.101419083348,0.101071356842,0.100837243946,0.100604278663,0.100390822788,0.100207204831,0.100075229425,0.0997975072646,0.0996494652867,0.0992259963733,0.0989402409276,0.0987107184813,0.0987049804202,0.0986338284618,0.0983308588327,0.0979544420208,0.0975057256383,0.097489659067,0.0973255505179,0.0973324361913,0.0970501235823,0.0968986387678,0.0966507545258,0.0964854983644,0.0962915518973,0.0960551437776,0.0957682407197,0.0954733043762,0.0952001726651,0.0950349165038,0.0949281885663,0.094619480876,0.0941202695553,0.0934730162567,0.0930862709347,0.0926478830623,0.0921945762308,0.0913648525874,0.0907853084105,0.0899395181959,0.0890386425942,0.08811596236,0.0872586960231,0.0867503038045,0.0860881315469,0.0855292443902,0.0850116712738,0.0846846017878,0.0840901386519,0.0837768405127,0.0835037088016,0.0834153426597,0.0832971385999,0.0832340199272,0.0831995915602,0.0832202485804,0.083119258704,0.0830285973377,0.0828197319116,0.0826521805258,0.0825890618531,0.0825500430372,0.0823928201615,0.0820439460431,0.0817398288017,0.0814758779885,0.0813760357243,0.0811304467068,0.0812991457048,0.0811201181967,0.0808607578324,0.0805440168565,0.0805428692443,0.0802961326145,0.0798462686197,0.0796385508058,0.0792954147486,0.0791668821787,0.0789258836101,0.0785632381449,0.078494381411,0.0782855159849,0.0780387793551,0.0779561512744,0.0783371585353,0.0782820731482,0.0782946968827,0.0780089414371,0.0776221961151,0.0775556346056,0.0773456215673,0.0773249645471,0.0772044652628,0.07713101808,0.0768544435322,0.0767787011249,0.076402284313,0.0764458935778,0.0764057271497,0.0763747416194,0.0763460513136,0.0760821005004,0.0759696345017,0.075733226382,0.0755289514048,0.0753086098563,0.0754394376507,0.0751743392252,0.0749459643912,0.0747830034543,0.0743962581323,0.0743836343977,0.0740473840139,0.0741277168701,0.0740485316261,0.0736744100387,0.0735780106112,0.0733989831031,0.0733794736952,0.0733748832462,0.0732807790433,0.0731533940856,0.0733507833894,0.0731315894532,0.0730627327193,0.0732268412684,0.0729479714961,0.0731086372085,0.0730546994336,0.0728676386399,0.0727907486204,0.0727551726412,0.0726404114181,0.0725910640921,0.0724223650941,0.0723718701559,0.0722846516263,0.0718783968963,0.0719151204878,0.0718577398762,0.0717383882041,0.0716167413076,0.0714526327585,0.0712265531488,0.0710108020493,0.0709144026219,0.0708329221534,0.0710073592126,0.0706756992777,0.0705368381977,0.0704943765451,0.0704484720559,0.0701718975081,0.0703371536694,0.0703107585881,0.0701822260182,0.070236163793,0.070007788959,0.0698253186142,0.0697426905335,0.0696692433507,0.0694190638842,0.0697185906766,0.0693777498439,0.0692687266819,0.0691815081523,0.0689313286858,0.0689646094405,0.069229707866,0.0692377411516,0.0693054502733,0.0694133258231,0.0690942896227,0.0693065978855,0.069338731028,0.0693490595381,0.0694867730059,0.0694007020885,0.0693043026611,0.0691746224789,0.0689887092974,0.0688521434418,0.0689118192779,0.0686811492193,0.06862491622,0.0683850652636,0.0680384863697,0.0679581535135,0.067881263494,0.0679317584322,0.0678732302084,0.0679053633508,0.0677022359859,0.0675553416202,0.0675484559468,0.0676574791088,0.0676987931492,0.067846835127,0.0676460029865,0.0675186180288,0.067504846682,0.0672833575214,0.0671731867471,0.0672179436242,0.067212205563,0.0671766295838,0.0672810622969,0.0671112156866,0.0671410536047,0.0670492446261,0.0670630159729,0.0670182590959,0.0670997395643,0.0670951491154,0.0671249870334,0.0668564457712,0.0668243126288,0.066765784405,0.0668116888942,0.0667588987316,0.0666246281005,0.066731356038,0.0668449696489,0.0668048032208,0.0667852938129,0.0668461172612,0.0670320304427,0.067009078198,0.067028587606,0.0671456440536,0.0672374530321,0.0672408958688,0.06711810136,0.0671284298701,0.0668346411388,0.0669838307289,0.0668334935266,0.0668357887511,0.0667554558949,0.0666797134876,0.0667049609567,0.0664960955305,0.0666200376516,0.0667256179768,0.0669562880354,0.0669390738519,0.0670228495448,0.0671192489723,0.0670423589527,0.067147939278,0.0672477815422,0.0674669754784,0.0673694284387,0.0672546672156,0.0671272822579,0.0669471071375,0.0667233227524,0.0666085615292,0.0666647945286,0.0667634891805,0.0667325036502,0.0666498755696,0.0667003705078,0.0666957800588,0.0668151317309,0.0669264501174,0.0669769450556,0.0669516975865,0.0670526874628,0.0668300506899,0.0666452851206,0.0665546237544,0.0664754385104,0.0665557713666,0.0664938003061,0.0664949479183,0.0664065817765,0.0664169102866,0.06629526339,0.0663560868383,0.0665683951011,0.0666739754264,0.0667106990178,0.0664260911844,0.0664846194082,0.0666211852638,0.0667933270985,0.0667772605273,0.0669735022189,0.0671341679313,0.0669884211779,0.0671249870334,0.0672351578076,0.0675312417634,0.067380904561,0.0672845051336,0.0672558148278,0.0674107424791,0.067365985602,0.0671766295838,0.0671926961551,0.0671399059924,0.0670744920952,0.0670687540341,0.0671100680744,0.0671192489723,0.0671307250946,0.0669103835461,0.066870217118,0.0669321881785,0.0668839884648,0.0666624993041,0.0667439797726,0.0667049609567,0.0668311983021,0.0669138263828,0.0669207120562,0.0671284298701,0.0672948336437,0.0672397482566,0.0673430333574,0.06752435609,0.0674910753353,0.0675174704166,0.0675759986404,0.0675656701303,0.0676907598636,0.0678984776775,0.0677022359859,0.0678881491674,0.0679684820236,0.0680878336957,0.0680568481654,0.0680316006963,0.068099309818,0.0681670189396,0.0679099537998,0.06780207825,0.0678835587184,0.0677802736176,0.0610093614517,0.0541959876332,0.0474698323443,0.0407551531777,0.0)
ycorr <- c(6.26174999223e-05,6.24737080375e-05,6.20429917078e-05,6.13178087079e-05,6.02956265648e-05,5.89722510053e-05,5.73420076693e-05,5.57153402621e-05,5.40865699567e-05,5.24499726946e-05,5.07992771274e-05,4.91365626604e-05,4.74632803923e-05,4.57825622702e-05,4.40982152539e-05,4.24088097734e-05,4.07140336443e-05,3.90145945732e-05,3.73115468094e-05,3.56034714559e-05,3.38946183094e-05,3.21848020398e-05,3.04667663349e-05,2.8737788615e-05,2.69934872709e-05,2.52317914292e-05,2.34578576052e-05,2.16701930387e-05,1.98700046216e-05,1.80655213796e-05,1.62561603281e-05,1.44395208866e-05,1.26188951442e-05,1.07941255214e-05,8.96450351626e-06,7.13611467619e-06,5.30713642367e-06,3.47611762663e-06,1.64257736462e-06,-1.96639338383e-07,-2.04486877761e-06,-3.90046309455e-06,-5.7654945584e-06,-7.63899654053e-06,-9.51800106806e-06,-1.14052987187e-05,-1.33045113837e-05,-1.5216278031e-05,-1.71408041092e-05,-1.90789966458e-05,-2.10290407844e-05,-2.29925846954e-05,-2.49697249677e-05,-2.695808389e-05,-2.89603653045e-05,-3.09789724988e-05,-3.30101981697e-05,-3.50499932641e-05,-3.7096749478e-05,-3.91525266199e-05,-4.12174681694e-05,-4.32936553371e-05,-4.53804998486e-05,-4.7476204932e-05,-4.95799595553e-05,-5.16896482924e-05,-5.38048169656e-05,-5.59277822805e-05,-5.80679865803e-05,-6.02207351003e-05,-6.2384739511e-05,-6.45567621001e-05,-6.67342110937e-05,-6.89126721679e-05,-7.10966476624e-05,-7.32856996234e-05,-7.5479736587e-05,-7.76822521545e-05,-7.98879096599e-05,-8.20938278215e-05,-8.43036709452e-05,-8.65172385551e-05,-8.87340985974e-05,-9.09616513122e-05,-9.31990687272e-05,-9.54430155445e-05,-9.76953018059e-05,-9.99555512281e-05,-0.00010221424774,-0.000104472573377,-0.000106725194376,-0.000108974710483,-0.000111221188929,-0.000113462897982,-0.000115697829394,-0.000117933292592,-0.000120169821062,-0.000122403088726,-0.000124633793344,-0.000126867666709,-0.000129105818381,-0.00013134844756,-0.000133593582599,-0.000135847109186,-0.000138106362116,-0.000140365543419,-0.000142620408803,-0.000144870133497,-0.000147119000061,-0.000149368493526,-0.000151618181781,-0.000153865633526,-0.000156109860965,-0.000158345079826,-0.000160565680273,-0.000162775783932,-0.000164979719445,-0.000167179085231,-0.00016937417497,-0.000171557607075,-0.000173728994806,-0.000175891637569,-0.000178049409542,-0.000180205545451,-0.000182363096172,-0.000184524467764,-0.000186685951848,-0.000188842858305,-0.000190997213475,-0.000193151436453,-0.000195312093569,-0.000197475213092,-0.000199635470207,-0.000201789532571,-0.000203935344145,-0.00020607643373,-0.000208209079293,-0.000210336856647,-0.000212459656197,-0.000214578657081,-0.000216689736778,-0.000218790525339,-0.000220884663489,-0.000222975436624,-0.000225066910558,-0.000227158614146,-0.000229247360417,-0.000231333760153,-0.000233415539148,-0.000235486892161,-0.000237542623329,-0.00023958634404,-0.000241619000958,-0.000243638497322,-0.000245644705645,-0.000247631429718,-0.000249599449396,-0.000251548827279,-0.000253478106666,-0.000255395775985,-0.00025730930043,-0.000259219725647,-0.000261124232666,-0.000263020210131,-0.000264905865601,-0.000266776903053,-0.000268638848429,-0.00027049618277,-0.000272351906047,-0.000274201960464,-0.000276043123964,-0.000277868126986,-0.000279677393127,-0.000281472905218,-0.000283258863071,-0.000285037549862,-0.000286811079387,-0.00028857677074,-0.000290331432078,-0.000292073654588,-0.00029380544605,-0.000295524737191,-0.000297236639898,-0.000298940572085,-0.000300632116416,-0.000302315665649,-0.000303992381717,-0.000305658906268,-0.000307310765188,-0.000308954313381,-0.000310583758369,-0.000312204676602,-0.000313817982668,-0.00031542247381,-0.000317018530267,-0.000318603600325,-0.000320170535688,-0.000321717526612,-0.000323252488186,-0.000324775423861,-0.00032628341182,-0.000327784386813,-0.000329274798865,-0.000330752699648,-0.000332221862069,-0.000333683009432,-0.000335139517387,-0.000336597204167,-0.000338058897027,-0.000339519175661,-0.000340982341771,-0.000342442171653,-0.000343897232251,-0.000345348948287,-0.000346798820857,-0.000348245459215,-0.000349690392169,-0.000351132024373,-0.000352561594257,-0.00035397773584,-0.000355381288007,-0.000356773375173,-0.000358154726707,-0.00035952442097,-0.000360881613873,-0.000362225261253,-0.000363556167689,-0.000364873256211,-0.000366181755753,-0.000367485667143,-0.000368784570926,-0.000370078123201,-0.000371362865756,-0.000372642582399,-0.000373915534585,-0.000375181058602,-0.000376438440536,-0.000377687422165,-0.000378926544113,-0.00038015390766,-0.000381370242697,-0.000382577823551,-0.000383778225554,-0.000384971955885,-0.000386159097733,-0.000387340129111,-0.000388518964662,-0.000389694873444,-0.000390866720052,-0.000392036333782,-0.000393205706015,-0.000394370668799,-0.000395528945557,-0.00039668079147,-0.000397826557768,-0.000398966823141,-0.000400100757102,-0.000401225188814,-0.000402341723978,-0.000403448291148,-0.000404543122172,-0.00040562460392,-0.000406701246703,-0.00040777242788,-0.00040883526319,-0.000409888273772,-0.000410928805551,-0.000411961244362,-0.0004129869951,-0.000414006381169,-0.000415019873611,-0.000416030271817,-0.000417035178316,-0.000418031480587,-0.000419019987862,-0.000420003485677,-0.000420982523223,-0.000421957084529,-0.000422922758914,-0.00042388096974,-0.000424831861148,-0.00042577569354,-0.000426705951048,-0.000427620003592,-0.000428514935665,-0.000429386486675,-0.00043023196354,-0.000431045810116,-0.00043182803615,-0.000432573592151,-0.000433275729574,-0.000433926170415,-0.00043452363938,-0.000435073421315,-0.000435578958963,-0.000436043341629,-0.00043646959697,-0.000436863564334,-0.000437230308152,-0.000437572212287,-0.000437896644115,-0.00043821355567,-0.000438532126793,-0.000438857380055,-0.000439190291358,-0.000439532397849,-0.000439882150274,-0.000440240291393,-0.000440602646294,-0.000440971237133,-0.000441345548057,-0.00044172514101,-0.000442104589024,-0.000442479380999,-0.000442845499284,-0.000443200230738,-0.000443546103677,-0.000443880836879,-0.000444208280517,-0.000444528065074,-0.00044483917444,-0.000445139675374,-0.000445431348882,-0.000445713069838,-0.000445984668729,-0.00044625013313,-0.000446508487504,-0.000446758307887,-0.000447000248805,-0.000447228666175,-0.00044744788068,-0.000447657630713,-0.000447858614716,-0.000448048984055,-0.000448237664211,-0.000448423206405,-0.000448603815678,-0.000448778290371,-0.000448944402027,-0.000449106061172,-0.000449261670605,-0.000449409198707,-0.000449550058676,-0.000449686148882,-0.000449813500002,-0.000449928259192,-0.000450031721988,-0.000450128025673,-0.000450217619387,-0.00045030075921,-0.000450376957273,-0.000450448120299,-0.000450513475218,-0.000450572466484,-0.000450623370854,-0.000450668362805,-0.000450707430045,-0.000450739424878,-0.000450761064419,-0.000450774980197,-0.000450778723713,-0.000450772375592,-0.000450753976651,-0.000450726367768,-0.000450688582208,-0.000450638380653,-0.000450577536839,-0.000450502376466,-0.000450416711432,-0.000450321628498,-0.000450215150007,-0.000450099427085,-0.000449976726922,-0.000449846487626,-0.000449707010928,-0.000449561298551,-0.000449406971216,-0.00044924541753,-0.000449077656774,-0.000448901497463,-0.000448715619022,-0.000448522923136,-0.000448322316833,-0.000448109781182,-0.000447887741027,-0.000447654874337,-0.000447409443432,-0.000447152363913,-0.000446885050367,-0.00044660529521,-0.000446314931306,-0.000446013049666,-0.000445696720675,-0.000445365805275,-0.000445018442623,-0.000444656308402,-0.000444280445854,-0.000443894308755,-0.000443495213977,-0.000443080956482,-0.00044265453109,-0.000442215004694,-0.000441760381286,-0.000441295723012,-0.000440821633808,-0.000440339703375,-0.000439850104871,-0.000439348841093,-0.000438831502175,-0.000438303883994,-0.00043776243676,-0.000437204383633,-0.000436634822889,-0.000436051470222,-0.000435453042613,-0.00043483923829,-0.000434208901283,-0.000433562361221,-0.000432905466413,-0.000432237850108,-0.000431560721655,-0.000430874918246,-0.000430177398459,-0.000429466694342,-0.000428746014302,-0.000428013033018,-0.000427269573326,-0.000426516116684,-0.000425750346183,-0.000424967242513,-0.000424167041889,-0.000423349369348,-0.000422517061206,-0.000421672715168,-0.000420812063005,-0.000419935750926,-0.000419040618017,-0.000418126589075,-0.000417193670565,-0.000416244959608,-0.000415281200981,-0.000414303942279,-0.00041330923229,-0.000412291836965,-0.000411257003976,-0.000410205992012,-0.00040913861925,-0.000408059541887,-0.000406964793558,-0.000405853551712,-0.000404723598741,-0.000403572733705,-0.000402400930381,-0.00040121474258,-0.00040001525743,-0.000398798519158,-0.000397565854154,-0.00039631588895,-0.000395049083664,-0.000393767202747,-0.000392471188271,-0.000391159489504,-0.000389835974143,-0.000388498944041,-0.000387145923647,-0.000385775673619,-0.000384390291739,-0.000382986831258,-0.000381566525577,-0.000380125391845,-0.000378664438767,-0.000377185877506,-0.000375690748127,-0.000374177648974,-0.000372646884775,-0.000371096223341,-0.000369529678253,-0.000367944062173,-0.00036634135752,-0.000364724393589,-0.00036309502787,-0.000361454264882,-0.00035979725031,-0.000358122112147,-0.000356424497838,-0.000354707636869,-0.000352970737271,-0.000351213110971,-0.000349436047346,-0.000347637756176,-0.00034581568541,-0.000343964587431,-0.000342086239142,-0.000340184597522,-0.000338263828683,-0.000336328138889,-0.00033437485081,-0.000332404650876,-0.000330414462727,-0.000328406089757,-0.000326381005159,-0.00032434204599,-0.000322291031558,-0.000320224789637,-0.000318140706972,-0.000316034333721,-0.000313902599593,-0.000311745765905,-0.000309566478059,-0.000307367424534,-0.000305145897212,-0.000302900411971,-0.000300630089847,-0.000298337198765,-0.000296024364406,-0.0002936931133,-0.000291346580434,-0.000288986615003,-0.000286612968728,-0.000284219667666,-0.000281804203344,-0.000279367309494,-0.000276909675615,-0.000274429586315,-0.000271924960497,-0.000269396008808,-0.000266841145814,-0.000264260754908,-0.00026165444145,-0.000259023992807,-0.000256377190513,-0.000253715047622,-0.000251037481406,-0.000248340592088,-0.00024562768409,-0.000242901798143,-0.000240162492329,-0.000237408308403,-0.000234638944389,-0.000231855836289,-0.000229053446454,-0.000226231082439,-0.000223389918355,-0.000220533319359,-0.000217660276079,-0.000214765340008,-0.00021184717183,-0.000208906972323,-0.00020594705728,-0.000202964264043,-0.000199959934313,-0.000196937515483,-0.000193892985844,-0.000190826492354,-0.000187735481098,-0.000184624427538,-0.000181493855125,-0.00017834197634,-0.000175166451976,-0.000171970123076,-0.000168753041104,-0.000165511247204,-0.000162246800023,-0.000158961439429,-0.000155657051594,-0.000152333561953,-0.0001489935493,-0.000145639705607,-0.000142274636809,-0.000138895388896,-0.000135500567425,-0.00013209264843,-0.000128673084799,-0.000125238905319,-0.000121790135449,-0.000118325126899,-0.000114843320634,-0.000111344940645,-0.000107825195916,-0.000104286336052,-0.000100731349799,-9.71605326379e-05,-9.35728930155e-05,-8.99691789263e-05,-8.63509689866e-05,-8.27169602256e-05,-7.90622348619e-05,-7.53860467514e-05,-7.1687160422e-05,-6.79680747671e-05,-6.41411133221e-05,-6.01167134446e-05,-5.58188638383e-05,-5.11874664526e-05,-4.57421758486e-05,-4.1112245919e-05,-3.68290981386e-05,-3.28388239498e-05,-2.90701901419e-05,-2.54355859474e-05,-2.185308389e-05,-1.84042310015e-05,-1.51767662154e-05,-1.22467495989e-05,-9.67858031495e-06,-7.95120150828e-06,-5.4329033094e-06,-2.59237375127e-06,5.14888172874e-07,3.81762781806e-06,7.23023534133e-06,1.06687884089e-05,1.41249831586e-05,1.76006378935e-05,2.10999600805e-05,2.46255618814e-05,2.81755230106e-05,3.17499792014e-05,3.53454953571e-05,3.89593096805e-05,4.25901914709e-05,4.62354670802e-05,4.99020127061e-05,5.35877494594e-05,5.7288129049e-05,6.10014195819e-05,6.47260557075e-05,6.84622063804e-05,7.22069657524e-05,7.5961721685e-05,7.97275628323e-05,8.35051766218e-05,8.7291511085e-05,9.10828704256e-05,9.48860649612e-05,9.86984933353e-05,0.000102518950333,0.000106347848184,0.000110184758743,0.000114034367953,0.000117898313671,0.000121772836739,0.000125660588914,0.000129562640726,0.000133475325265,0.00013739887902,0.00014133845531,0.000145290902888,0.000149256668574,0.000153234512798,0.000157218173322,0.000161207315043,0.000165205007998,0.000169208640534,0.000173221325859,0.000177243486126,0.000181271296602,0.000185304538125,0.000189348911254,0.000193399861812,0.00019745939304,0.00020153130814,0.000205609939955,0.000209697018027,0.000213793024298,0.000217897978898,0.000222013320122,0.000226143364455,0.000230283440738,0.000234431292052,0.000238589821073,0.00024275657597,0.000246931461997,0.000251118987049,0.000255316573671,0.000259521814149,0.000263735719798,0.000267954321704,0.00027217614953,0.000276403672458,0.00028063608511,0.000284874204651,0.00028911868682,0.000293363920636,0.000297608685434,0.000301851630203,0.000306090385122,0.000310322128761,0.000314550338456,0.0003187761126,0.000322996985603,0.000327213945718,0.000331427391105,0.000335638228719,0.000339845636369,0.000344049969881,0.000348251495651,0.000352452279188,0.000356651463182,0.000360844200758,0.00036503005165,0.000369207507833,0.000373373227993,0.000377524532132,0.000381664233999,0.000385793713802,0.000389912317857,0.00039401940374,0.000398112501729,0.000402194729871,0.000406265454612,0.000410324828885,0.000414374050105,0.000418416427646,0.000422451953671,0.000426477196345,0.00043049154849,0.000434493603894,0.000438484506109,0.000442462133571,0.000446426283073,0.000450378339311,0.000454315835814,0.000458239702383,0.000462144184615,0.000466029224913,0.00046989394646,0.000473744834948,0.000477581758765,0.000481405735237,0.000485218600055,0.000489015705249,0.00049279627487,0.00049655947854,0.000500303498738,0.000504033809004,0.000507753053095,0.000511458068209,0.000515145158235,0.000518811908168,0.000522457148301,0.000526084192166,0.00052969822731,0.000533299334248,0.000536891662886,0.000540474465907,0.000544041212941,0.000547586392159,0.000551109603825,0.000554610869583,0.000558092476492,0.000561550900439,0.000564981322531,0.000568377861929,0.00057174022689,0.000575064910962,0.000578354979652,0.000581614642352,0.000584847642356,0.000588057993801,0.000591243925347,0.00059440403279,0.000597537574544,0.000600646801392,0.000603731547615,0.000606792009925,0.000609825073629,0.000612830231563,0.000615806206592,0.000618749575099,0.000621656035396,0.000624524148254,0.000627355336623,0.000630150742154,0.000632909811789,0.000635634909138,0.000638326488168,0.000640982592199,0.000643602076671,0.000646182816587,0.000648726193022,0.000651231555884,0.000653703087484,0.000656140937832,0.000658544887727,0.000660910187923,0.000663236712369,0.000665524500864,0.000667774912091,0.000669987413164,0.000672164046495,0.000674307439386,0.000676414539195,0.000678480572821,0.00068050869109,0.000682497601667,0.000684454403564,0.000686376513969,0.000688260209427,0.000690106074545,0.000691916103191,0.000693687617809,0.000695420893652,0.000697119494741,0.000698782045349,0.000700406335488,0.000701989441192,0.000703529761214,0.000705033320518,0.000706503181752,0.000707935752976,0.000709327888353,0.000710679566941,0.000711988903293,0.000713252935633,0.000714474788217,0.000715652018236,0.000716787856258,0.000717880204992,0.000718923356986,0.000719918671713,0.000720870245576,0.000721778994178,0.000722647013449,0.000723475571124,0.000724264919075,0.000725012806759,0.000725718580628,0.000726380944004,0.000727002209767,0.000727581127983,0.000728119153737,0.000728613532864,0.00072906284257,0.000729467626667,0.000729828641505,0.000730147374401,0.000730427028913,0.00073066847678,0.000730872070276,0.000731035245838,0.000731155942079,0.000731235452734,0.000731275281866,0.000731272393828,0.000731226653765,0.000731137984727,0.000731007017213,0.000730830129227,0.000730607259355,0.000730341013944,0.000730032999776,0.000729685961044,0.000729293650025,0.000728860224535,0.000728387565017,0.000727874037736,0.000727314332046,0.000726711513683,0.000726068007375,0.000725384051563,0.000724659045877,0.000723888423595,0.000723078346841,0.000722230490908,0.000721338889942,0.000720404753167,0.000719430925485,0.000718418803743,0.000717363567097,0.000716266314472,0.000715129043254,0.000713951756545,0.00071273788748,0.000711480731142,0.000710180909879,0.000708844569933,0.00070747328891,0.000706064762639,0.000704623891276,0.000703150005292,0.000701636697559,0.000700084731913,0.000698490448521,0.00069685386733,0.000695182246526,0.000693470659707,0.000691714956697,0.000689912337599,0.000688060339583,0.000686155775615,0.000684205646333,0.000682212066687,0.000680171754209,0.000678087083441,0.000675955344807,0.000673771727847,0.000671540893335,0.000669264064808,0.000666942474537,0.000664579974188,0.000662173936046,0.000659721044361,0.000657221979218,0.000654676380418,0.000652086859106,0.000649457047856,0.000646787989584,0.000644079040248,0.000641332648858,0.000638547222034,0.00063572121519,0.000632857390572,0.000629955659066,0.000627019627853,0.000624046332112,0.000621034667017,0.000617982805165,0.000614891794996,0.000611762936183,0.000608596609962,0.000605395284498,0.000602161796861,0.000598898175319,0.000595603664609,0.000592279940116,0.000588929875203,0.000585552371807,0.000582149919849,0.000578719121044,0.00057525668133,0.000571763238613,0.000568238946094,0.00056468425076,0.000561098555613,0.000557481760503,0.000553834793265,0.00055016003293,0.00054645712164,0.000542723031733,0.000538963607623,0.00053518165815,0.000531375783141,0.000527543872389,0.000523683967169,0.000519795247691,0.000515878388728,0.00051193253776,0.000507958229163,0.00050396259948,0.000499948321809,0.000495911591603,0.000491852316215,0.000487774085346,0.000483680148959,0.000479574010206,0.000475457111856,0.000471326624684,0.000467180168878,0.000463015151189,0.000458825820891,0.000454612649119,0.000450377104059,0.000446117936616,0.000441833066412,0.00043752050446,0.000433175780149,0.000428800713917,0.00042440060663,0.000419973350221,0.000415524699065,0.000411055663881,0.000406567121213,0.000402061399331,0.000397540865298,0.000393003275752,0.000388451466756,0.000383886184742,0.00037930593355,0.000374714217285,0.000370111959248,0.0003654979384,0.000360869491293,0.000356225161179,0.000351563806633,0.000346887771601,0.000342197795748,0.000337495747561,0.000332782565384,0.000328057841479,0.000323318623594,0.000318566551656,0.000313802371508,0.000309029182792,0.000304247182114,0.0002994554808,0.000294654713534,0.000289846045005,0.000285029649183,0.000280209030441,0.000275384563192,0.000270555937248,0.000265725466295,0.000260891128363,0.000256055326303,0.000251222631235,0.000246391524936,0.000241558406596,0.000236724509558,0.000231885773364,0.000227039062809,0.000222186925279,0.000217331990449,0.00021247434309,0.000207613853803,0.000202743956111,0.000197866116239,0.000192984635551,0.000188101881775,0.000183220115379,0.000178340537536,0.000173462857296,0.000168584079949,0.000163705155065,0.000158826582593,0.000153956162538,0.000149099273254,0.000144252943551,0.000139415636596,0.000134585587291,0.000129761854701,0.000124951245442,0.000120152675299,0.000115367911615,0.000110596640746,0.000105832631266,0.0001010676789,9.63037112821e-05,9.15375845749e-05,8.67720598573e-05,8.20127870282e-05,7.72567412319e-05,7.25047510957e-05,6.77580436489e-05,6.3014713863e-05,5.82746631494e-05,5.35450792031e-05,4.88263140166e-05,4.41205355348e-05,3.94303808432e-05,3.47523372452e-05,3.00840048679e-05,2.54239915705e-05,2.07689890419e-05,1.61224072048e-05,1.14869309316e-05,6.8627083536e-06,2.25123986969e-06,-2.34577279317e-06,-6.9309280093e-06,-1.15054856375e-05,-1.60656937613e-05,-2.0609723721e-05,-2.51342752352e-05,-2.96385736522e-05,-3.41214656119e-05,-3.85845015617e-05,-4.30266215898e-05,-4.74516061033e-05,-5.18575533125e-05,-5.62430670913e-05,-6.06073493206e-05,-6.49505443786e-05,-6.92765457599e-05,-7.35840943359e-05,-7.78764410956e-05,-8.2151883929e-05,-8.64134553138e-05,-9.0659852289e-05,-9.48879068368e-05,-9.90954238072e-05,-0.000103284596767,-0.000107453374806,-0.000111601154023,-0.000115728897773,-0.000119834342538,-0.000123918587981,-0.000127979378743,-0.000132009222726,-0.000136012216796,-0.000139991372002,-0.000143950279797,-0.000147888147779,-0.000151803771495,-0.000155695832411,-0.000159558704428,-0.000163392940632,-0.000167193386325,-0.000170968043744,-0.000174721279298,-0.000178450880103,-0.000182153845008,-0.000185829539884,-0.00018947534417,-0.000193094107331,-0.000196688557058,-0.00020026141865,-0.000203815616455,-0.000207351675615,-0.000210864514167,-0.000214351315862,-0.000217812998284,-0.000221250396726,-0.000224664874734,-0.000228057987988,-0.000231428831251,-0.000234774622024,-0.000238098295183,-0.000241396910408,-0.000244671895545,-0.000247922403825,-0.000251149568218,-0.000254351504462,-0.000257528872301,-0.000260676805942,-0.000263795682184,-0.000266886898497,-0.000269949401102,-0.000272981957252,-0.00027598515573,-0.000278959677393,-0.000281905486254,-0.000284822047336,-0.000287709151056,-0.00029056782013,-0.000293397374149,-0.000296195851178,-0.000298966871817,-0.000301712763992,-0.000304430495866,-0.000307121912346,-0.000309780994405,-0.000312410588068,-0.000315010305686,-0.000317580884888,-0.000320124716771,-0.000322643088268,-0.000325133401718,-0.000327586967024,-0.000330009588122,-0.000332400488518,-0.000334763796461,-0.000337100738714,-0.000339411314693,-0.000341694074101,-0.000343947604892,-0.000346170009743,-0.000348363713386,-0.000350537013222,-0.000352685976679,-0.000354807865094,-0.0003569024142,-0.000358965776592,-0.000361001018237,-0.000363008166778,-0.000364990811423,-0.00036695287401,-0.000368887363082,-0.000370791754298,-0.00037266346865,-0.000374507751516,-0.00037632322134,-0.000378110424403,-0.000379869274926,-0.000381600074633,-0.000383299367151,-0.000384961921349,-0.000386590611558,-0.00038818985037,-0.00038976193313,-0.000391306351772,-0.000392824204303,-0.000394319045094,-0.000395792390964,-0.000397242206987,-0.000398667664109,-0.000400068323017,-0.000401445863621,-0.000402795265412,-0.000404116828018,-0.00040540953339,-0.000406673487404,-0.000407911444272,-0.000409115613012,-0.00041028747447,-0.000411336266905,-0.000412170394357,-0.000412796507363,-0.000413211251262,-0.000413418233391)
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(243)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Callithrix_jacchus-male-liver-H3K27Ac-ERR572202.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) : 243',bty='n')
dev.off()