# R script for Peak Model
#  -- generated by MACS
p <- c(0.0491337877939,0.0577084230814,0.06563101349,0.0737349998424,0.0816919084025,0.0817654472986,0.0818487913809,0.0819566484285,0.0822655117922,0.0822753169784,0.0824371025498,0.0820743106623,0.0817458369263,0.0817605447055,0.0817164213679,0.0812997009565,0.0809908375928,0.0798632411857,0.0796279167181,0.0796181115319,0.0796377219042,0.0793435663198,0.0795494752289,0.0795935985666,0.0794073000297,0.0796622348696,0.0796769426488,0.0804025264239,0.0802407408524,0.0802505460386,0.079686747835,0.0798044100688,0.0796965530211,0.0794367155882,0.0796622348696,0.0790690211076,0.0794122026228,0.0792013911206,0.0792455144583,0.0791866833414,0.079426910402,0.0795004492981,0.0797995074757,0.0799710982333,0.0801034682463,0.0806329482984,0.0804221367962,0.0801868123286,0.0798681437787,0.0797259685796,0.079623014125,0.0791670729691,0.078701326627,0.0783042165879,0.0780100610035,0.0773580161245,0.0768040231071,0.0768824645963,0.0771177890639,0.0771324968431,0.0769903216439,0.0770491527608,0.0772060357392,0.0769854190509,0.0770001268301,0.0771226916569,0.0773531135315,0.07719132796,0.077323697973,0.0766520427218,0.0766275297564,0.0766422375356,0.0763235689858,0.0767844127348,0.0766275297564,0.0769167827478,0.0770442501678,0.0770295423885,0.0768481464448,0.0773335031592,0.0770540553539,0.0766177245703,0.0767157764318,0.0763088612066,0.0761127574836,0.0756715241069,0.0753136348124,0.0749655507041,0.0749753558903,0.0747498366088,0.0750145766349,0.0748625962495,0.0748527910634,0.0746566873404,0.0747106158642,0.0745782458512,0.0744850965828,0.0744262654659,0.0742693824875,0.0747449340158,0.0740634735784,0.0740585709853,0.0738624672623,0.0740144476476,0.0741517202537,0.0740193502407,0.0740928891368,0.0739507139377,0.073710486877,0.0734506494441,0.0738232465177,0.0740732787645,0.0739114931931,0.0738232465177,0.0735192857471,0.0739801294961,0.0737693179939,0.0737987335524,0.0739114931931,0.0734261364787,0.0732643509072,0.072921169392,0.0733231820241,0.0729603901366,0.0726417215867,0.0724260074915,0.0722740271061,0.0725828904698,0.0725387671322,0.0725828904698,0.0729947082881,0.0731025653358,0.0727593838205,0.0732202275695,0.0732300327557,0.072921169392,0.0729162667989,0.0725142541668,0.0723377608161,0.0722250011754,0.0718622092879,0.0722151959892,0.0721563648724,0.0716464951926,0.0718524041017,0.0716023718549,0.0716023718549,0.0713572422012,0.0713327292358,0.0715337355519,0.0713082162704,0.0708963984522,0.0710336710583,0.0713964629458,0.0715288329588,0.071739644461,0.0719063326255,0.0721416570931,0.0720926311624,0.0719063326255,0.0719259429978,0.0716857159372,0.0713376318289,0.0712591903397,0.0712199695951,0.0714160733181,0.071278800712,0.0714503914696,0.0713866577596,0.0716317874134,0.0714994174004,0.0718573066948,0.0720436052316,0.0720190922663,0.0720141896732,0.071474904435,0.0717445470541,0.0716563003787,0.0714209759112,0.0714356836904,0.0716808133441,0.0717151314956,0.071935748184,0.0719700663355,0.071935748184,0.0724554230499,0.0722102933962,0.0720485078247,0.0720141896732,0.0717592548333,0.0717347418679,0.0716219822272,0.0712935084912,0.0714160733181,0.0716268848203,0.0717102289026,0.0717641574264,0.0717249366818,0.0720141896732,0.0723622737815,0.0722102933962,0.0721024363485,0.0719455533701,0.071803378171,0.0714700018419,0.0714307810973,0.0715729562965,0.0719798715217,0.0721073389416,0.0718180859502,0.0721073389416,0.0721612674654,0.0727152604829,0.072592695656,0.0728476304959,0.0726368189937,0.0723230530369,0.0722936374784,0.0719553585563,0.0720436052316,0.0714307810973,0.0720190922663,0.0720877285693,0.0723524685953,0.0721563648724,0.0718622092879,0.0721220467208,0.0716857159372,0.0719210404048,0.0718475015087,0.0725436697252,0.0719602611494,0.0718082807641,0.0714454888765,0.0713817551666,0.0714013655389,0.0713768525735,0.0714700018419,0.0719063326255,0.0717935729848,0.0713866577596,0.0715337355519,0.0715239303657,0.0717592548333,0.0718475015087,0.0723034426646,0.0723769815607,0.0726368189937,0.0723132478507,0.0724799360153,0.0725975982491,0.0725730852837,0.0727740915998,0.0727593838205,0.0726515267729,0.0724063971192,0.0724063971192,0.0726270138075,0.0728035071582,0.073249643128,0.0735094805609,0.0733231820241,0.0732692535003,0.0735977272363,0.0741124995091,0.0743527265698,0.0740634735784,0.0739065906,0.0740193502407,0.0742399669291,0.0745880510374,0.0747008106781,0.074695908085,0.0745341225135,0.0744949017689,0.0747792521673,0.0749165247734,0.0746370769681,0.0746370769681,0.0741370124745,0.0739997398684,0.0743772395352,0.0742399669291,0.0743380187906,0.0741272072884,0.0743772395352,0.0746713951196,0.0749459403318,0.0750292844141,0.0753185374055,0.0753724659293,0.0751616544271,0.0756274007692,0.0756274007692,0.0758038941199,0.0750341870072,0.0748576936565,0.0753381477778,0.0756666215138,0.0755587644661,0.0759607770983,0.0764314260334,0.0767402893971,0.0769363931201,0.0773482109384,0.0785248332763,0.0795053518912,0.080015221571,0.0807457079391,0.0815056098657,0.0818291810086,0.082515544039,0.0828342125889,0.0835401859916,0.0837068741562,0.0841432049398,0.0845893409096,0.0846236590611,0.0842559645805,0.0848540809356,0.0846628798057,0.0847707368534,0.0854521972907,0.0854178791392,0.0860797292043,0.0862120992173,0.0861091447627,0.0863738847888,0.0864719366503,0.0865601833256,0.0873691111829,0.0876142408366,0.0871975204253,0.0875897278713,0.087177910053,0.0869965141092,0.0873936241483,0.0873298904383,0.0876583641743,0.0880064482826,0.0877564160358,0.0878446627112,0.088227064971,0.0884084609147,0.0888938176291,0.0890703109798,0.0890408954214,0.0892026809928,0.0895115443565,0.0893987847158,0.0896144988111,0.0897566740103,0.0903498877723,0.0905116733438,0.0914872893656,0.0916490749371,0.0918108605085,0.0925021261321,0.0927178402273,0.0928355024611,0.0935218654916,0.0936591380977,0.0932031969417,0.09355128105,0.0930119958118,0.0936199173531,0.0938552418206,0.0937326769938,0.0937228718076,0.0938895599722,0.0940856636952,0.0944484555827,0.0949534226694,0.0947475137602,0.0951642341716,0.0951985523231,0.0956741038513,0.0956005649552,0.0961006294488,0.0962329994618,0.0963947850333,0.0967624795139,0.0970370247261,0.0975370892197,0.097095855843,0.0973066673452,0.0970517325053,0.0980420563064,0.0983067963324,0.0987186141507,0.0986499778476,0.0987137115576,0.0988803997221,0.0989196204667,0.0993706590296,0.100081535025,0.100385495796,0.100150171328,0.100385495796,0.100606112484,0.100978709558,0.10107676142,0.101464066272,0.102111208558,0.102439682294,0.102170039675,0.102439682294,0.103081921987,0.102822084554,0.103032896056,0.103444713875,0.104503673979,0.10441052471,0.104753706226,0.105126303299,0.105386140732,0.105729322247,0.105695004096,0.106072503763,0.106342146382,0.106283315265,0.105739127434,0.106141140066,0.106420587871,0.106905944585,0.107479547975,0.10769526207,0.108087469516,0.108538508079,0.10871500143,0.109175845179,0.109313117785,0.110112240456,0.109818084872,0.11003870156,0.110028896374,0.110720161997,0.110872142383,0.110881947569,0.111225129084,0.1109309735,0.111632044309,0.111176103153,0.111710485798,0.111499674296,0.111636946902,0.111622239123,0.111445745772,0.111916394708,0.111499674296,0.111597726158,0.111774219508,0.112058569907,0.112087985465,0.112681199227,0.112391946236,0.11249490069,0.112740030344,0.113073406673,0.113235192245,0.113607789318,0.113298925955,0.113181263721,0.113117530011,0.112838082206,0.113656815249,0.112970452219,0.113240094838,0.112985159998,0.11313223779,0.113225387058,0.113029283336,0.113318536327,0.113122432604,0.113338146699,0.112833179613,0.113210679279,0.112911621102,0.112926328881,0.112774348496,0.112411556608,0.112269381409,0.112024251755,0.11212720621,0.112313504747,0.112092888058,0.112284089188,0.112058569907,0.111200616119,0.111494771703,0.112132108803,0.112352725491,0.112083082872,0.112166426954,0.111283960201,0.111685972833,0.111215323898,0.111445745772,0.111803635067,0.111519284669,0.111014317582,0.111033927954,0.111014317582,0.110533863461,0.110509350495,0.109901428954,0.109675909672,0.109166039993,0.108808150698,0.10858753401,0.10820513175,0.107660943919,0.107185392391,0.107077535343,0.107474645382,0.107155976832,0.106915749771,0.107067730157,0.10694516533,0.10581266633,0.105474387408,0.105332212208,0.105248868126,0.10479292697,0.104287959883,0.10397909652,0.104175200243,0.103841823914,0.103665330563,0.10429776507,0.104121271719,0.10397909652,0.104096758754,0.104023219857,0.103464324247,0.103528057957,0.10276815603,0.101743514078,0.101424845528,0.100983612151,0.100689456567,0.100071729839,0.099199068272,0.0992971201335,0.0990765034451,0.0988362763845,0.0986548804407,0.0988362763845,0.0989882567698,0.0990372827005,0.0984734844969,0.0983509196701,0.0986941011853,0.0980714718648,0.0979341992587,0.0978459525834,0.0977380955358,0.0981989392848,0.0975027710682,0.0972478362283,0.0973704010552,0.0978361473972,0.0975076736612,0.0971693947391,0.0968066028516,0.0968262132239,0.0969585832369,0.0964928368948,0.0963800772541,0.0961447527865,0.0957917660851,0.0955760519898,0.0956397856998,0.095522123466,0.0957280323752,0.0956839090375,0.0957525453405,0.096110434635,0.0963947850333,0.0965418628255,0.0966055965355,0.0960712138904,0.0953848508599,0.0952769938123,0.0947426111672,0.0939581962752,0.0932718332448,0.0925266390974,0.0917177112401,0.0908940756036,0.0907666081836,0.0903253748069,0.090526381123,0.0904773551922,0.0903204722138,0.0900508295947,0.089413492495,0.0887810579884,0.0888742072568,0.0886486879754,0.0877073901051,0.0876583641743,0.0865405729533,0.0855600543384,0.0849766457625,0.0841726204983,0.0839765167753,0.0835058678401,0.0825596673767,0.0821772651169,0.0819125250909,0.0812114542812,0.0808829805452,0.0812898957704,0.0814516813418,0.0816281746925,0.0811281101989,0.0812163568743,0.0812849931773,0.0812212594673,0.0809663246275,0.0804711627269,0.0807800260906,0.0801573967701,0.0795641830081,0.079490644112,0.0796671374627,0.0797700919172,0.0797161633934,0.0795102544843,0.0797014556142,0.0797897022895,0.0795985011596,0.079358274099,0.0790445081422,0.0783679502979,0.0778973013627,0.0770834709124,0.077058957947,0.0771030812847,0.0771177890639,0.0769020749686,0.0763578871373,0.0760539263667,0.0758921407952,0.0761470756351,0.0763480819512,0.0765000623365,0.0759313615398,0.0753724659293,0.0749704532972,0.0747841547604,0.0746861028989,0.0746861028989,0.0748674988426,0.0744115576867,0.0739262009723,0.073445746851,0.0735045779679,0.073185909418,0.0728721434612,0.072857435682,0.0729162667989,0.0729113642058,0.0726074034352,0.0725338645391,0.0726270138075,0.0724358126776,0.0725240593529,0.0728378253097,0.0729309745781,0.0725436697252,0.0725093515737,0.0727103578898,0.0727397734482,0.0724260074915,0.072396591933,0.0726858449244,0.0725632800975,0.0725093515737,0.0724014945261,0.0725730852837,0.0723426634092,0.0721661700585,0.0715239303657,0.0716219822272,0.0713523396081,0.0714700018419,0.0713621447943,0.0711905540367,0.0710238658721,0.0709405217898,0.0707002947292,0.0705139961924,0.0713621447943,0.0713670473873,0.0714896122142,0.0713131188635,0.071146430699,0.0712837033051,0.0713180214566,0.0711219177336,0.0711023073613,0.0710483788375,0.0704061391447,0.0705090935993,0.070357113214,0.0702247432009,0.0700776654087,0.069440328309,0.0692491271791,0.0698913668719,0.0698962694649,0.0699600031749,0.070033542071,0.0700237368849,0.0697933150104,0.069832535755,0.069705068335,0.0701119835602,0.0702394509802,0.0700874705949,0.070033542071,0.0702247432009,0.0702198406079,0.0702051328287,0.0699551005818,0.0698227305688,0.0697737046381,0.0699698083611,0.0703865287724,0.0699305876165,0.0701413991187,0.0699992239195,0.0698619513134,0.0698031201965,0.0703865287724,0.0704600676685,0.0703522106209,0.070033542071,0.0697835098242,0.0699992239195,0.0699207824303,0.0693324712614,0.0699501979888,0.0697835098242,0.0697933150104,0.0697589968589,0.0699551005818,0.0696756527766,0.0695481853567,0.0695825035082,0.0695628931359,0.0696854579627,0.069048120863,0.0692393219929,0.0689647767808,0.0685284459971,0.0685039330318,0.0686902315686,0.0684892252525,0.0683274396811,0.0684794200664,0.0688618223262,0.068719647127,0.0686657186032,0.0685725693348,0.068714744534,0.068714744534,0.0685725693348,0.0686853289755,0.0684647122872,0.0683176344949,0.0681460437373,0.0687343549063,0.0686657186032,0.068714744534,0.0686755237894,0.068714744534,0.0690383156769,0.0694697438675,0.0699109772442,0.069700165742,0.0699403928026,0.0696070164735,0.0700433472572,0.069832535755,0.0701070809672,0.070357113214,0.0700629576295,0.0699600031749,0.0696560424043,0.0700825680018,0.069964905768,0.0701561068979,0.0697491916727,0.0700923731879,0.0702590613525,0.0699845161403,0.0701953276425,0.0699845161403,0.0703178924694,0.0700727628156,0.0700629576295,0.0704110417378,0.0706071454608,0.07062185324,0.0707885414045,0.0710091580929,0.0709797425344,0.0711023073613,0.0706022428677,0.0708375673353,0.0708767880799,0.0708669828937,0.0710532814306,0.0712346773743,0.0712689955258,0.0715582485172,0.0717053263095,0.0717200340887,0.0720534104178,0.071935748184,0.0721073389416,0.0717200340887,0.071935748184,0.0716857159372,0.0714356836904,0.0709111062314,0.0711023073613,0.0715729562965,0.0724162023053,0.072661331959,0.0724456178638,0.0725044489807,0.0723720789676,0.0729505849504,0.0731810068249,0.0735585064917,0.0736859739116,0.0731221757081,0.0724260074915,0.0726172086214,0.0726809423313,0.0728770460543,0.0727005527036,0.0726368189937,0.0726466241798,0.0728133123444,0.0727986045651,0.0729800005089,0.0730780523704,0.0728721434612,0.0731662990457,0.0731662990457,0.073382013141,0.073313376838,0.0734212338856,0.0734604546302,0.0738624672623,0.0745243173274,0.0745586354789,0.0747400314227,0.0749508429249,0.0752106803578,0.0754263944531,0.0756421085484,0.0754460048254,0.0755293489077,0.0753430503709,0.0747302262365,0.0748871092149,0.0746223691889,0.074431168059,0.0743576291629,0.0740144476476,0.074038960613,0.0747155184573,0.0745488302928,0.0744213628728,0.0744262654659,0.074632174375,0.0751126284964,0.0751175310894,0.0757254526307,0.0759509719121,0.0762990560204,0.0756568163276,0.0757744785614,0.075946069319,0.076402010475,0.0765490882672,0.0766128219772,0.0767206790248,0.076274543055,0.0765490882672,0.0762500300897,0.0766324323495,0.0769707112716,0.0767500945833,0.0767648023625,0.0767010686525,0.076799120514,0.0769216853409,0.0769167827478,0.0768726594101,0.0767451919902,0.0770785683193,0.0769756138647,0.0774070420553,0.0772158409254,0.0772844772284,0.0771521072154,0.0772648668561,0.0773580161245,0.0774021394622,0.077912009142,0.0775933405921,0.0777208080121,0.0775001913237,0.0776864898605,0.0778531780251,0.0779267169212,0.0780688921204,0.078044379155,0.0778433728389,0.0776962950467,0.0779071065489,0.0776325613367,0.0778923987697,0.0779904506312,0.0779218143281,0.0781081128649,0.0784954177178,0.078568956614,0.0792749300167,0.079230806679,0.0797651893242,0.0803191823416,0.080343695307,0.0803976238308,0.0807604157183,0.0809859349998,0.0809222012898,0.0812849931773,0.0813242139219,0.0813585320734,0.080873175359,0.0811183050128,0.0809712272205,0.0809025909175,0.0809859349998,0.0806917794153,0.0809123961036,0.0808584675798,0.0808633701729,0.0813389217011,0.0812800905842,0.0809810324067,0.0814124605972,0.0820056743593,0.0817213239609,0.0819321354632,0.0818046680432,0.0815987591341,0.0812310646535,0.0810790842682,0.0812506750258,0.0811624283504,0.0807898312768,0.0803633056793,0.080147591584,0.0798975593372,0.0797455789519,0.0801917149217,0.0804221367962,0.0805937275538,0.0806035327399,0.0810202531513,0.081657590251,0.0819174276839,0.0825694725629,0.0829812903811,0.0828293099958,0.0826479140521,0.0822311936407,0.0820743106623,0.0821527521515,0.0825302518183,0.0827312581343,0.0826724270174,0.0824567129221,0.0827018425759,0.0831822966972,0.0835450885847,0.0845059968273,0.084814860191,0.0845893409096,0.0842412568013,0.0842608671736,0.0847903472257,0.0847168083295,0.0845844383165,0.0846971979572,0.0848736913079,0.0844275553381,0.0843442112559,0.0853002169054,0.0852953143124,0.0852953143124,0.0849815483556,0.0848933016802,0.0848589835287,0.084809957598,0.0844716786758,0.0847021005503,0.0844520683035,0.0839127830653,0.0842461593944,0.0842265490221,0.0844520683035,0.0849619379833,0.0853198272777,0.0855600543384,0.0856335932345,0.0853786583946,0.0856483010137,0.0856188854553,0.0850943079963,0.0852364831955,0.0853002169054,0.0852855091262,0.0849325224248,0.0851678468924,0.0855502491522,0.0858787228882,0.0861140473558,0.0865650859187,0.0868396311309,0.0868298259447,0.0868298259447,0.0868886570616,0.0872710593214,0.0867219688971,0.0865356703602,0.0862022940312,0.0859032358536,0.0853198272777,0.0846971979572,0.0844226527451,0.0841677179052,0.084089276416,0.0837362897146,0.0831921018833,0.0827214529482,0.0829175566712,0.0828293099958,0.0831970044764,0.0838539519484,0.0840745686368,0.0844961916412,0.0841383023467,0.0844422631174,0.0849864509486,0.0854914180353,0.0852855091262,0.0857708658406,0.0856973269445,0.0859571643774,0.0861777810658,0.0860356058666,0.0861189499489,0.0857512554683,0.0857806710267,0.085996385122,0.0862268069965,0.0862709303342,0.0863640796026,0.0860061903082,0.0854816128492,0.0858100865852,0.0860454110528,0.0862219044035,0.0863101510788,0.0860748266112,0.0858836254813,0.0855502491522,0.0851972624509,0.0855404439661,0.0856139828622,0.084942327611,0.0849815483556,0.0849717431694,0.0850060613209,0.0848197627841,0.0855551517453,0.0859228462259,0.0864131055334,0.0861777810658,0.086452326278,0.086717066304,0.0869916115162,0.0869670985508,0.0868886570616,0.0870994685638,0.0864866444295,0.0859865799359,0.0857610606544,0.0855061258146,0.0851041131824,0.0851629442993,0.0846677823988,0.085074697624,0.0850158665071,0.0849717431694,0.0851580417063,0.0855012232215,0.0860454110528,0.0862611251481,0.0866337222217,0.0867023585248,0.0868935596547,0.0867906052001,0.0871190789361,0.087177910053,0.0870406374469,0.086785702607,0.0857855736198,0.0864278133126,0.0865405729533,0.086123852542,0.0861189499489,0.0860012877151,0.0854767102561,0.0855796647107,0.0854080739531,0.0856826191652,0.0862268069965,0.0855208335938,0.0849325224248,0.0850796002171,0.0850403794725,0.0850207691002,0.0853737558015,0.0851629442993,0.0851776520786,0.0849766457625,0.0848491783426,0.085143333927,0.0853541454292,0.0856335932345,0.0859914825289,0.0862415147758,0.0857463528752,0.0856826191652,0.0854570998838,0.0849962561348,0.0850943079963,0.0845207046066,0.0841824256844,0.0832313226279,0.0828930437058,0.0825547647836,0.0826822322036,0.0826479140521,0.0826528166451,0.0832166148487,0.0833293744894,0.0835156730263,0.0839421986238,0.0846187564681,0.0842902827321,0.0840206401129,0.084153010126,0.0836774585977,0.0838980752861,0.0837559000869,0.0832166148487,0.0831185629872,0.0829910955673,0.083040121498,0.0834225237578,0.0834666470955,0.0834176211648,0.0840157375199,0.0840010297406,0.0840598608575,0.0846530746196,0.0847168083295,0.0843442112559,0.0839716141822,0.0839471012168,0.0837902182384,0.0838784649138,0.0836725560046,0.0833391796756,0.0828979462989,0.0822998299438,0.0824027843983,0.0823341480953,0.0823096351299,0.0817458369263,0.0819419406493,0.0819027199047,0.0817850576709,0.0824665181083,0.074367434349,0.0662438376244,0.0578653060598,0.0498985923135,0.0)
m <- c(0.0517645300901,0.0605358768945,0.0692781152472,0.077399373295,0.086228937003,0.0864326961655,0.0861028003786,0.085782607409,0.08609794897,0.0859184468506,0.0856419165587,0.0852635066855,0.0847929200483,0.0849336108986,0.0847977714569,0.0847880686397,0.0853411292236,0.0858262700867,0.0855739968379,0.0858844869902,0.085874784173,0.0863308165842,0.0868887285768,0.0873010983104,0.087490303247,0.0875242631074,0.0874029778916,0.0866510095539,0.0869372426631,0.0867577405438,0.0869178370286,0.0867334835006,0.0866073468762,0.0866267525107,0.0863308165842,0.0865248729295,0.086359925036,0.0865539813813,0.0860785433355,0.0860542862923,0.0855206313429,0.0855109285257,0.08528291232,0.0850694503403,0.0851664785129,0.0847250003275,0.0853411292236,0.0855497397947,0.086005772206,0.0863065595411,0.0867383349092,0.0864909130691,0.0866607123711,0.0865006158863,0.0865200215208,0.0867819975869,0.0862046799598,0.0865588327899,0.0868741743509,0.0870973391479,0.0870682306961,0.0872913954931,0.0873205039449,0.0876261426887,0.0879754441101,0.0878590103029,0.0883587053919,0.0883198941229,0.0880094039705,0.0879269300238,0.0878881187547,0.0880918779172,0.0884460307473,0.0888584004809,0.0882374201761,0.0885236532853,0.0881258377776,0.0877813877648,0.0871507046428,0.0872768412672,0.0875097088815,0.0872428814068,0.0869663511149,0.086859620125,0.0870585278789,0.0867431863179,0.0872913954931,0.08726713845,0.0879026729806,0.0874369377521,0.0874029778916,0.0873544638053,0.0877522793131,0.0880530666482,0.0884799906077,0.0885333561026,0.0883732596178,0.08879048076,0.0886837497702,0.0889602800621,0.0885867215975,0.0887565208996,0.0886934525874,0.0882956370797,0.0882422715848,0.0886788983615,0.0884411793386,0.0880918779172,0.0882325687675,0.0880336610136,0.0883490025746,0.0885576131458,0.0884266251127,0.0883344483488,0.0882034603157,0.0880870265086,0.0881452434122,0.0881792032726,0.0884945448336,0.0888147378032,0.0888778061154,0.0887565208996,0.088620681458,0.0891155251383,0.0889699828794,0.0886400870925,0.0890524568261,0.08925136458,0.0890330511916,0.0886012758234,0.0885576131458,0.0884120708868,0.0884896934249,0.087844456077,0.087805644808,0.0880094039705,0.0876115884628,0.0878735645288,0.0876018856455,0.0878590103029,0.087805644808,0.0879560384756,0.0877959419907,0.0877037652268,0.0876261426887,0.0875582229678,0.0877328736785,0.0875485201506,0.0880094039705,0.0881064321431,0.0882422715848,0.0884120708868,0.0882180145416,0.0880191067878,0.0881792032726,0.0883295969401,0.0886740469529,0.0889166173844,0.088475139199,0.087674656775,0.0874854518384,0.0878541588943,0.0883490025746,0.0886983039961,0.0891106737297,0.0888584004809,0.0884993962422,0.0881064321431,0.0880821751,0.0884896934249,0.0881986089071,0.0879997011532,0.0876358455059,0.0877377250872,0.0875776286024,0.0877619821303,0.087529114516,0.0875436687419,0.0878541588943,0.0880579180568,0.0884266251127,0.0883101913056,0.0884605849731,0.0880821751,0.0877037652268,0.0873399095794,0.0875194116988,0.0872234757723,0.0872283271809,0.0874660462038,0.0877328736785,0.0873302067622,0.0876795081836,0.0883829624351,0.0883684082092,0.0886983039961,0.0885576131458,0.0890767138693,0.0887322638565,0.0884605849731,0.0880336610136,0.0882907856711,0.0881792032726,0.0877813877648,0.087989998336,0.0880676208741,0.0878541588943,0.0876843595922,0.0877716849476,0.0879463356583,0.088028809605,0.0879511870669,0.0875727771937,0.0876843595922,0.0880191067878,0.0877619821303,0.0881549462294,0.0876940624095,0.0881258377776,0.0883198941229,0.0885527617371,0.0884557335645,0.0886788983615,0.0886886011788,0.08843632793,0.0882956370797,0.0882277173589,0.0883878138437,0.088028809605,0.0878687131202,0.0876649539577,0.0873641666226,0.0870342708357,0.0870003109753,0.0869081342113,0.0871070419652,0.0866024954676,0.0867480377265,0.0863405194015,0.0861610172822,0.0862046799598,0.086583089833,0.0868450658991,0.0867771461783,0.0868547687164,0.0868547687164,0.0865006158863,0.0862192341857,0.0862337884116,0.0860348806578,0.0858262700867,0.0854527116221,0.0849869763935,0.0844339158096,0.0840118432587,0.0835364052129,0.0838226383222,0.0835461080302,0.0839196664948,0.0837304615582,0.0836528390201,0.0839924376242,0.0838177869135,0.0839778833983,0.0843756989061,0.0846328235635,0.0843659960888,0.0845746066599,0.0842689679162,0.0842253052385,0.0841573855177,0.0838614495912,0.0839342207207,0.0836334333856,0.0830464129412,0.0832889833728,0.0835072967612,0.0831628467484,0.0830464129412,0.0830900756189,0.0829736418118,0.0829057220909,0.0827698826493,0.0828766136392,0.0832889833728,0.082668003068,0.0824545410883,0.0822701875603,0.082090685441,0.0822507819258,0.0826631516594,0.0827310713802,0.0826000833472,0.082629191799,0.0816346530297,0.0816055445779,0.0814454480931,0.0815036649967,0.0815715847175,0.0813775283723,0.0807516966589,0.0801695276232,0.0804363550979,0.0806886283467,0.0809457530041,0.0804509093238,0.0804363550979,0.0808487248315,0.0805964515827,0.0800336881815,0.0798202262018,0.0797231980292,0.0798153747931,0.0793496395646,0.0790925149072,0.0796213184479,0.0796552783083,0.0795194388667,0.0792865712524,0.0797717121155,0.0797765635241,0.0797620092982,0.079475776189,0.0796213184479,0.0797183466205,0.0793690451991,0.0790488522295,0.0787917275721,0.0787577677116,0.0781853014932,0.0783939120643,0.0782968838917,0.0780349078257,0.0780591648688,0.0782241127623,0.0782386669882,0.0780591648688,0.0779863937394,0.0778699599322,0.0778942169754,0.0773848190691,0.0772829394879,0.0774624416072,0.0767929472162,0.0760652359216,0.0761816697287,0.076230183815,0.0763660232567,0.076453348612,0.07663770214,0.0764339429775,0.0762981035359,0.0759051394368,0.0757887056296,0.0759779105662,0.0754199985737,0.0754976211118,0.0745904076978,0.0746680302359,0.0747019900963,0.0746583274187,0.0753181189924,0.0754102957564,0.0758566253505,0.0762932521272,0.0760312760612,0.0761088985993,0.0760506816957,0.0759390992972,0.0755946492844,0.0757984084469,0.0753811873046,0.0749979260228,0.0746631788273,0.0741198210606,0.0743866485353,0.0741052668348,0.0741731865556,0.0738335879514,0.0737414111874,0.0741246724693,0.0739257647154,0.0742362548678,0.0742314034592,0.0745079337511,0.0745710020633,0.0748960464416,0.0754879182945,0.0755461351981,0.075284159132,0.0745807048806,0.0744594196648,0.0737268569616,0.0739112104895,0.0734066639919,0.0733727041315,0.0733338928625,0.0730864710223,0.0730331055274,0.0733387442711,0.0731640935604,0.0732853787762,0.0736346801976,0.0736928971011,0.073537652025,0.0734648808955,0.0732950815934,0.0732368646898,0.0732126076467,0.0729700372152,0.0733387442711,0.0730234027101,0.0731834991949,0.0729797400324,0.0730622139791,0.0728875632684,0.0722035146515,0.07196094422,0.0717377794229,0.0718445104128,0.0719366871768,0.0716747111107,0.0713060040548,0.0709033371385,0.0711507589786,0.0712623413771,0.0711701646131,0.0713254096893,0.0714078836361,0.0712041244736,0.0706898751587,0.0709130399557,0.0711362047527,0.0712089758822,0.0710682850319,0.0709955139024,0.0713836265929,0.0713351125066,0.0710440279887,0.0710391765801,0.0711410561614,0.0711022448923,0.0711507589786,0.0712817470117,0.0716795625194,0.0714709519483,0.0714855061741,0.0712817470117,0.0714369920878,0.0715631287122,0.0714127350447,0.0715097632173,0.071014919537,0.0709761082679,0.0702775054251,0.0702580997906,0.0702678026078,0.0704667103617,0.0704715617703,0.0701368145748,0.0703357223287,0.0702969110596,0.0707480920623,0.0705491843084,0.0703017624682,0.0701707744352,0.0705588871257,0.0702775054251,0.0700785976712,0.0703745335977,0.0707189836105,0.070961554042,0.0705976983947,0.0707529434709,0.0712671927858,0.0714806547655,0.0708887829126,0.0711556103873,0.0715097632173,0.0716941167453,0.0717474822402,0.0716164942072,0.0719949040804,0.0717862935093,0.0718445104128,0.0718784702732,0.0721210407048,0.0720579723926,0.0719172815423,0.0718202533697,0.0714175864533,0.0712623413771,0.0710391765801,0.0711653132045,0.0711944216563,0.0714272892706,0.0715340202605,0.0716116427985,0.0718590646387,0.0715340202605,0.0715000604,0.0714224378619,0.0718105505524,0.0721452977479,0.0723442055018,0.0722035146515,0.0720143097149,0.0719027273164,0.0715873857554,0.0718590646387,0.0719900526717,0.0723442055018,0.0723733139536,0.0723684625449,0.072091932253,0.0723345026845,0.0725479646643,0.0726886555146,0.0727517238268,0.0727856836872,0.0727032097405,0.0725285590298,0.0722520287378,0.0723636111363,0.0722568801464,0.072130743522,0.0717280766057,0.0717426308316,0.0721889604256,0.0724315308571,0.0728827118598,0.0729506315806,0.0735230977991,0.0733193386366,0.0738287365428,0.073799628091,0.0743235802231,0.0744885281166,0.0744545682562,0.0741246724693,0.0739500217586,0.0740567527484,0.0737899252738,0.0737123027357,0.0735182463904,0.0738821020377,0.0739791302104,0.0737511140047,0.073799628091,0.0741828893728,0.0743138774059,0.0744351626216,0.0744206083958,0.0748232753121,0.0747408013654,0.0748184239035,0.0750658457436,0.0759633563403,0.0759536535231,0.0761040471906,0.0762592922668,0.0763320633963,0.0766474049573,0.0765261197415,0.0772053169498,0.0772732366706,0.0768075014421,0.0767783929903,0.077360562026,0.0775012528763,0.0776807549956,0.0777923373941,0.0776710521784,0.0782192613536,0.0780979761379,0.0781561930414,0.079199245897,0.0788353902497,0.0785103458715,0.0784036148816,0.0786170768614,0.079291422661,0.0796213184479,0.0794709247804,0.0801161621283,0.0802325959354,0.0798881459226,0.0802665557958,0.0804412065065,0.0807177367985,0.081183472027,0.0805382346791,0.0805721945395,0.0807905079279,0.0807031825726,0.080421800872,0.0805430860878,0.0807613994761,0.0810039699077,0.0812174318874,0.0811592149839,0.0815764361261,0.0821683079791,0.0826777058853,0.0827650312406,0.0837450157841,0.0848220285001,0.0853847919013,0.086005772206,0.0868256602646,0.0868111060387,0.0875679257851,0.08762129128,0.0877037652268,0.0887662237169,0.0888584004809,0.0888875089327,0.08925136458,0.089421163882,0.0896782885395,0.0906534216743,0.0911579681718,0.0919875590477,0.0926910132992,0.0932925879694,0.0943065323732,0.0946461309774,0.0950487978937,0.0958541317264,0.0962519472341,0.0966594655591,0.0966594655591,0.0962616500514,0.0965333289347,0.0958492803178,0.095597007069,0.0955290873482,0.0952913683253,0.0949808781729,0.0946461309774,0.0943307894164,0.0941609901143,0.0944569260408,0.0941415844798,0.0942822753301,0.0939766365863,0.0940930703935,0.0945102915357,0.0945248457616,0.0955193845309,0.0962567986428,0.0969311444424,0.0972610402293,0.0975715303817,0.0977558839097,0.0984059726662,0.0987601254962,0.0983768642144,0.0994247684787,0.099104575509,0.0988280452171,0.0987213142272,0.0989590332501,0.0986922057754,0.0989299247983,0.0995509051031,0.0993471459406,0.100647323454,0.100031194557,0.0999875318798,0.100036045966,0.100526038238,0.101001476284,0.101763147439,0.102044529139,0.101661267857,0.10225313971,0.102136705903,0.102306505205,0.102767389025,0.102796497477,0.102908079876,0.103087581995,0.103325301018,0.10306817636,0.103461140459,0.104009349635,0.104266474292,0.104601221488,0.104479936272,0.105319229965,0.105241607427,0.105464772224,0.105561800397,0.106207037744,0.10615367225,0.106076049711,0.106173077884,0.106847423684,0.107434444128,0.107308307504,0.107536323709,0.107492661032,0.10809908711,0.108501754027,0.108593930791,0.108763730093,0.108982043481,0.108763730093,0.109113031514,0.108909272352,0.108967489255,0.109244019547,0.108758878684,0.108952935029,0.109569063926,0.109879554078,0.11008331324,0.110728550588,0.110728550588,0.111126366096,0.11125250272,0.110961418203,0.110990526654,0.111048743558,0.111291313989,0.110883795664,0.110461723114,0.109976582251,0.109782525905,0.109991136476,0.110927458342,0.111310719624,0.112188824586,0.112319812619,0.112339218254,0.112411989383,0.112906833064,0.112683668266,0.112256744307,0.112222784447,0.111946254155,0.111660021045,0.111529033012,0.111184583,0.111451410474,0.111985065424,0.111596952733,0.112256744307,0.112872873203,0.113328905614,0.112678816858,0.112547828825,0.112538126008,0.112504166147,0.111931699929,0.111184583,0.111499924561,0.110413209027,0.110282220994,0.109753417454,0.110563602695,0.110946863977,0.110243409725,0.110384100576,0.110442317479,0.110587859738,0.110345289306,0.111189434408,0.110791618901,0.11036954635,0.109646686464,0.10912758574,0.109074220245,0.108831649814,0.108365914585,0.108288292047,0.107492661032,0.106769801146,0.106367134229,0.105906250409,0.105629720117,0.105100916577,0.104795277833,0.104378056691,0.104368353873,0.103810441881,0.103655196805,0.103985092592,0.103718265117,0.103752224977,0.103456289051,0.104193703163,0.103917172871,0.103723116525,0.102951742553,0.102811051703,0.102616995358,0.101787404482,0.102369573518,0.101991163644,0.102029974913,0.101622456588,0.101326520662,0.100885042477,0.100851082616,0.100516335421,0.100322279075,0.099919612159,0.0991094269177,0.0993665515751,0.0987601254962,0.0980178599757,0.0983574585799,0.0981488480088,0.0984593381611,0.0984496353439,0.0987358684531,0.0985903261942,0.0983623099885,0.0979741972981,0.0974405423487,0.0973435141761,0.0968486704957,0.0964411521707,0.095820171866,0.0953641394547,0.094781970419,0.0948159302794,0.095058500711,0.0943404922336,0.0946994964723,0.0943696006854,0.0940251506726,0.0937292147461,0.0935060499491,0.0933071421953,0.0933216964212,0.0928947724617,0.0921767639843,0.0923805231468,0.0919244907355,0.0915751893141,0.0913956871948,0.0913180646567,0.090866883654,0.0907213413951,0.090236200532,0.0903332287046,0.0897462082603,0.088974834288,0.0885915730062,0.0884702877904,0.0880142553791,0.0879414842497,0.0882665286279,0.0878541588943,0.0875436687419,0.0877910905821,0.0878250504425,0.0877183194526,0.0876843595922,0.0880142553791,0.087989998336,0.0878590103029,0.0873156525363,0.0870197166098,0.0866073468762,0.085559442612,0.0859427038938,0.0863502222188,0.0861998285512,0.0855448883861,0.0850257876626,0.0848850968123,0.0848074742742,0.085467265848,0.0853799404926,0.0857340933227,0.0855012257084,0.0848996510382,0.0848462855432,0.0846619320153,0.0847735144138,0.0847880686397,0.0848511369519,0.0842592650989,0.0844581728528,0.083352051685,0.0828960192737,0.0830900756189,0.0830512643499,0.0826049347558,0.0826243403904,0.0821246453014,0.0815327734484,0.0815473276743,0.0812416889306,0.0817510868368,0.0813096086514,0.0811058494889,0.0806789255294,0.0804897205928,0.0799124029658,0.0792283543488,0.0785249000974,0.0775643211885,0.0771471000462,0.07663770214,0.0763126577617,0.0753860387133,0.0749736689797,0.074745652774,0.0744642710734,0.0744739738907,0.0744982309338,0.0745758534719,0.0745758534719,0.0744497168475,0.0745176365684,0.0746777330532,0.07465347601,0.074391499944,0.0741828893728,0.0741537809211,0.0740179414794,0.0741634837383,0.0736443830148,0.0734212182178,0.0732853787762,0.0730428083446,0.0725334104384,0.0722665829637,0.0720337153494,0.0720434181667,0.0716407512503,0.0712623413771,0.0714224378619,0.0715097632173,0.0714078836361,0.0715631287122,0.0715728315295,0.0718299561869,0.072130743522,0.0721598519738,0.0728439005908,0.072538261847,0.0721889604256,0.0720531209839,0.0718542132301,0.0715970885727,0.0716310484331,0.071776590692,0.0715194660346,0.0709712568593,0.070699577976,0.0708839315039,0.0707772005141,0.070607401212,0.0704715617703,0.0705103730394,0.0706316582551,0.0705782927602,0.0704133448667,0.0703211681028,0.0700397864022,0.0702775054251,0.0705637385343,0.0702435455647,0.0699330554123,0.0697972159706,0.069661376529,0.0694964286355,0.0695643483564,0.0697050392067,0.0697778103361,0.069661376529,0.0695206856787,0.0696274166686,0.0702726540165,0.0702823568337,0.0700203807677,0.0699864209072,0.0700106779504,0.0697438504757,0.0694867258183,0.0691859384832,0.0688511912876,0.0687881229754,0.0683806046505,0.0683272391555,0.0684097131022,0.0684145645109,0.0684776328231,0.0689142595998,0.068938516643,0.0688123800186,0.0689627736862,0.0690840589019,0.068938516643,0.0691034645364,0.0689967335466,0.0687202032546,0.0682835764778,0.0680555602722,0.0682253595743,0.0687493117064,0.0687202032546,0.0687202032546,0.0685940666302,0.0685989180388,0.0689627736862,0.0692781152472,0.0695886053995,0.0698360272397,0.0693314807421,0.0688511912876,0.0688172314272,0.0688220828359,0.068661986351,0.0683951588764,0.0684679300058,0.0680652630895,0.0683223877469,0.0681865483052,0.0684630785972,0.0686086208561,0.0687493117064,0.0685455525439,0.0689288138257,0.0688560426963,0.0682835764778,0.0685407011353,0.0684776328231,0.0682447652088,0.0684048616936,0.0679488292823,0.0677111102594,0.0678323954752,0.0678663553356,0.0682108053484,0.0684485243713,0.0683903074677,0.0679488292823,0.0679633835082,0.0679585320996,0.0680701144981,0.0682108053484,0.0682738736606,0.0681380342189,0.0682205081656,0.0680749659067,0.0681283314017,0.0684339701454,0.0684048616936,0.0680943715412,0.0686862433942,0.0690646532674,0.0690937617192,0.069438211732,0.0692053441177,0.0696856335721,0.0693508863766,0.0694576173665,0.0697389990671,0.0701368145748,0.0699379068209,0.0696128624427,0.0695837539909,0.0692587096126,0.069346034968,0.0689821793207,0.0693120751076,0.0696710793462,0.069661376529,0.0694479145492,0.0692684124299,0.0693314807421,0.069530388496,0.069792364562,0.0694285089147,0.069753553293,0.0697438504757,0.0694527659579,0.069384846237,0.0697244448412,0.0701804772525,0.0702289913388,0.0703502765545,0.0702532483819,0.0704715617703,0.0704715617703,0.0705103730394,0.0704861159962,0.0704521561358,0.0701222603489,0.0696953363894,0.0695546455391,0.0692975208817,0.0696904849808,0.0695789025823,0.0698117701965,0.0695158342701,0.0694527659579,0.0697826617448,0.0697438504757,0.0701416659834,0.0701950314784,0.0703405737373,0.0701028547144,0.0701804772525,0.0696953363894,0.0699961237245,0.070199882887,0.0700397864022,0.0701028547144,0.0703793850063,0.0704084934581,0.0700931518971,0.0700834490799,0.0704570075444,0.0705443328998,0.0709664054507,0.0707335378364,0.0709567026334,0.0711992730649,0.0710197709456,0.0711410561614,0.0712477871512,0.0711362047527,0.0714903575828,0.072184109017,0.0717474822402,0.0718930244991,0.0716698597021,0.0716892653366,0.0717523336488,0.0716504540676,0.0718202533697,0.0721501491566,0.0714418434965,0.0708984857298,0.0709372969989,0.0709421484075,0.0713108554634,0.0718056991438,0.0714030322274,0.0718445104128,0.0719366871768,0.0720434181667,0.0721647033825,0.072499450578,0.0730622139791,0.0727129125577,0.0723975709967,0.0719852012631,0.0725140048039,0.0726352900196,0.072906968903,0.072630438611,0.0729021174943,0.0727080611491,0.0723587597277,0.0728827118598,0.0732029048294,0.0732902301848,0.0731155794741,0.0731349851086,0.072630438611,0.0729166717202,0.0729215231288,0.0731932020122,0.073037956936,0.0730282541187,0.0733969611747,0.0733727041315,0.0732950815934,0.0732029048294,0.0738772506291,0.0740130900708,0.0740810097916,0.0740907126089,0.0739791302104,0.0740810097916,0.0736589372407,0.0737462625961,0.0743720943094,0.074561299246,0.0743817971267,0.0742896203627,0.0743672429008,0.0744933795252,0.0753181189924,0.0756383119621,0.0757547457692,0.0763708746653,0.0763078063531,0.0763660232567,0.0762398866323,0.076506714107,0.0767056218608,0.0769578951096,0.0769384894751,0.0764630514293,0.076860866937,0.0762689950841,0.0684145645109,0.060700824788,0.0534673745195,0.0457148235276,0.0)
ycorr <- c(-8.10506789974e-05,-8.10392761391e-05,-8.09896389336e-05,-8.0902141241e-05,-8.0824682714e-05,-8.07167326852e-05,-8.06129126674e-05,-8.0531324446e-05,-8.04850748548e-05,-8.04502324524e-05,-8.04267243401e-05,-8.0413272716e-05,-8.04041861009e-05,-8.03995628148e-05,-8.04030860884e-05,-8.03648792926e-05,-8.02647879073e-05,-8.00884884228e-05,-7.97923796895e-05,-7.93860890634e-05,-7.88677435986e-05,-7.82527858862e-05,-7.75513484692e-05,-7.67609750039e-05,-7.58922554037e-05,-7.49544248465e-05,-7.39866639607e-05,-7.29997952125e-05,-7.20070812687e-05,-7.10265044729e-05,-7.005746422e-05,-6.91076231492e-05,-6.81751589011e-05,-6.7292859657e-05,-6.64589430086e-05,-6.56735089001e-05,-6.49244916661e-05,-6.4199633934e-05,-6.34972247368e-05,-6.28118929514e-05,-6.21577254037e-05,-6.15018009516e-05,-6.08730586667e-05,-6.02347571558e-05,-5.95432151993e-05,-5.88054342408e-05,-5.80244223229e-05,-5.71879230612e-05,-5.63025299052e-05,-5.54035932385e-05,-5.44602460288e-05,-5.35250487805e-05,-5.25738475273e-05,-5.1573842754e-05,-5.05682598073e-05,-4.95789930021e-05,-4.86059202558e-05,-4.76556843214e-05,-4.67419735748e-05,-4.5828984243e-05,-4.49091660716e-05,-4.39809854409e-05,-4.29925737742e-05,-4.19996198503e-05,-4.09813510601e-05,-3.99347914579e-05,-3.88411209814e-05,-3.77032982301e-05,-3.64992336823e-05,-3.52494426026e-05,-3.39911688164e-05,-3.27117642678e-05,-3.14367818441e-05,-3.01532295785e-05,-2.88775987528e-05,-2.75965270696e-05,-2.63271735086e-05,-2.50673953946e-05,-2.38204954452e-05,-2.25757105593e-05,-2.13132468438e-05,-2.00149270599e-05,-1.87032317128e-05,-1.73818842316e-05,-1.60545619363e-05,-1.47075519058e-05,-1.33484111815e-05,-1.19782840135e-05,-1.06054632589e-05,-9.2118459786e-06,-7.82152483064e-06,-6.4343105525e-06,-5.0382615102e-06,-3.62188769594e-06,-2.15928882852e-06,-6.71641399336e-07,8.38167963467e-07,2.38515745605e-06,3.9727503649e-06,5.57725647298e-06,7.19704837185e-06,8.82343460702e-06,1.0438708276e-05,1.20444253402e-05,1.36486901761e-05,1.52509037924e-05,1.68777349701e-05,1.85241821664e-05,2.0159269585e-05,2.17944619756e-05,2.347037316e-05,2.51915106195e-05,2.6978774784e-05,2.88364134272e-05,3.07315692765e-05,3.26303788455e-05,3.45217097271e-05,3.636857933e-05,3.8203137361e-05,4.00426987338e-05,4.1887662579e-05,4.37144135674e-05,4.55297317176e-05,4.73377955279e-05,4.9138778602e-05,5.09564278409e-05,5.28284514905e-05,5.47414925689e-05,5.67209440323e-05,5.87222187793e-05,6.07259145552e-05,6.27501677717e-05,6.4771077661e-05,6.67635816284e-05,6.87087060643e-05,7.06584032758e-05,7.2602766764e-05,7.45428934154e-05,7.6489677769e-05,7.84506927545e-05,8.04576817719e-05,8.24918845938e-05,8.45711893491e-05,8.67041352035e-05,8.89032209823e-05,9.11242712464e-05,9.33139664838e-05,9.55074903511e-05,9.7681385579e-05,9.98327460096e-05,0.00010194661587,0.000104026519109,0.000106067698975,0.000108059950975,0.000110043886832,0.000112026950787,0.000114062688355,0.000116147030825,0.000118243118649,0.000120382396366,0.00012254824285,0.000124759415543,0.000127004840231,0.000129312041589,0.000131653987046,0.000134006579858,0.000136359001417,0.000138701149435,0.000141051584481,0.000143397552374,0.000145743065518,0.000148094665523,0.000150415320284,0.00015271901569,0.000154984968201,0.000157218225942,0.000159394255262,0.000161535772423,0.000163645434967,0.000165742179518,0.000167829441275,0.000169894207533,0.000171963930794,0.00017400920773,0.000176044478011,0.000178076620757,0.000180109473686,0.00018216307726,0.000184223760121,0.000186278989918,0.000188303508789,0.000190304076329,0.000192285640418,0.000194246405639,0.000196202582173,0.000198148966641,0.000200102054194,0.000202020877312,0.000203913850374,0.000205755543184,0.00020756887122,0.000209347360506,0.000211104089639,0.000212833985338,0.000214527040108,0.000216218705745,0.000217886602996,0.000219536150006,0.000221207806744,0.000222897271418,0.000224612294268,0.000226338052401,0.000228064701735,0.000229769379273,0.000231472142354,0.000233136486349,0.0002347652059,0.000236366483891,0.000237926527406,0.00023943933152,0.00024090373333,0.000242316299546,0.000243687385688,0.000245048755602,0.000246389577833,0.000247696847214,0.000248997973384,0.000250272873523,0.000251505201385,0.00025270951543,0.000253881282285,0.000255023379249,0.000256132159641,0.000257213554353,0.000258265727344,0.000259316258831,0.000260343279673,0.000261358522023,0.000262362509562,0.000263341621922,0.000264298217299,0.000265242701384,0.000266152109947,0.000267038571317,0.000267886647287,0.000268673462726,0.000269375908494,0.000270010700605,0.000270573711015,0.000271089892101,0.000271585671116,0.000272060010142,0.000272527607607,0.000272978193319,0.000273396221479,0.000273789135347,0.000274184912321,0.000274608202607,0.000275043230781,0.000275482552013,0.000275871936978,0.000276209490314,0.000276473013883,0.000276647106455,0.00027678679455,0.000276906991286,0.000277003751245,0.00027704354771,0.000277015576425,0.00027691740475,0.000276773890196,0.000276611877449,0.000276464517155,0.000276339722708,0.000276205022714,0.000276031757934,0.000275835430047,0.00027559652735,0.000275343608585,0.000275096842056,0.000274852612312,0.000274592432128,0.000274307613705,0.000273980230194,0.000273611137165,0.000273230150387,0.000272839769497,0.000272433843179,0.000272035344074,0.000271637204753,0.000271239017083,0.000270836216259,0.000270412961085,0.000269974912939,0.000269517986301,0.000269031044853,0.000268497587401,0.000267924647677,0.000267291846303,0.000266582915995,0.000265774299056,0.000264853414888,0.000263842903416,0.000262755820765,0.000261600459573,0.000260363657212,0.000259065745684,0.000257713612296,0.000256304392337,0.000254850576095,0.000253354370071,0.000251841818139,0.000250305235333,0.000248737382333,0.000247141649078,0.000245534296265,0.000243902172471,0.000242240129258,0.000240539344405,0.000238815074798,0.000237070490836,0.000235300266997,0.000233489226267,0.000231642887349,0.000229758324727,0.000227833953262,0.000225857073162,0.000223832677884,0.000221757547,0.000219618428545,0.000217431043989,0.000215204073028,0.000212955520981,0.000210690182449,0.000208404477973,0.000206097339434,0.000203758573065,0.000201399172583,0.000199039438012,0.000196671333242,0.000194300610625,0.000191899724296,0.000189454172656,0.000186966656244,0.000184432344816,0.000181848621579,0.000179226345356,0.000176570986325,0.000173877714427,0.000171140280785,0.000168355127642,0.000165535306425,0.000162693590958,0.000159827274574,0.000156929134406,0.000154000239133,0.000151044903223,0.000148059433849,0.000145038666431,0.000141980643384,0.000138883834097,0.000135757602036,0.000132596266003,0.000129364903442,0.000126071243233,0.000122741104254,0.000119378877559,0.000115986792973,0.000112570946568,0.000109138326679,0.000105686637508,0.000102216646887,9.87307969021e-05,9.52539947623e-05,9.18061413514e-05,8.83668448513e-05,8.49106554088e-05,8.14319777585e-05,7.79153539507e-05,7.43664233803e-05,7.07920171153e-05,6.71912306559e-05,6.35590545284e-05,5.99113636519e-05,5.62268613672e-05,5.25111208517e-05,4.87832910321e-05,4.50541353181e-05,4.13309089988e-05,3.76138574478e-05,3.38724697468e-05,3.01032381787e-05,2.63069849568e-05,2.24890477704e-05,1.86357187489e-05,1.47486923798e-05,1.08248018891e-05,6.86028280158e-06,2.84792545807e-06,-1.1888860385e-06,-5.22720298009e-06,-9.25339814699e-06,-1.32744037848e-05,-1.72906123684e-05,-2.13073184635e-05,-2.53371330504e-05,-2.93590604099e-05,-3.33892538995e-05,-3.74217220119e-05,-4.14691784027e-05,-4.55441573268e-05,-4.96560750587e-05,-5.37862364659e-05,-5.79445263219e-05,-6.21184734363e-05,-6.62859579478e-05,-7.04581418256e-05,-7.46452514453e-05,-7.88258842131e-05,-8.30128246408e-05,-8.71837606243e-05,-9.13488502365e-05,-9.55148595643e-05,-9.96904044776e-05,-0.000103866478385,-0.000108056138156,-0.000112267824482,-0.000116466072973,-0.000120659263848,-0.000124856302839,-0.000129052619001,-0.000133262158492,-0.000137486367303,-0.000141712188851,-0.000145948587664,-0.000150180674202,-0.000154409575223,-0.00015865330474,-0.000162913266271,-0.000167166168198,-0.000171430572708,-0.000175699298736,-0.000179955282122,-0.00018420912318,-0.000188453768352,-0.000192702960033,-0.000196940528593,-0.000201168773954,-0.000205386181457,-0.000209611249832,-0.00021384527037,-0.000218055691561,-0.000222254958407,-0.00022644105474,-0.000230605874936,-0.000234750412441,-0.000238871959791,-0.000243003310441,-0.000247134502466,-0.000251248673454,-0.000255335838121,-0.000259409235868,-0.000263474105984,-0.000267528148397,-0.000271565632432,-0.000275593848311,-0.000279614271145,-0.000283597509362,-0.000287534569075,-0.0002914409435,-0.000295339176578,-0.000299227100906,-0.000303110310851,-0.000306977061822,-0.000310824897892,-0.000314668058042,-0.000318499021218,-0.000322319869437,-0.000326137255673,-0.000329942897038,-0.00033370616531,-0.000337424651334,-0.000341100263744,-0.000344750575169,-0.000348381643578,-0.000351991223335,-0.000355573439251,-0.000359127914702,-0.000362670131769,-0.00036619338158,-0.000369718515729,-0.000373250674397,-0.000376778570493,-0.000380290923528,-0.000383768419169,-0.000387207184225,-0.000390612843834,-0.000393998401281,-0.000397351692597,-0.000400667795115,-0.000403965926295,-0.000407226196,-0.000410444666931,-0.000413626887406,-0.000416795714777,-0.000419940176799,-0.000423088942629,-0.000426212524158,-0.000429318664797,-0.000432416181705,-0.000435487753979,-0.000438525055399,-0.000441538622473,-0.000444527610972,-0.000447503404487,-0.00045046889287,-0.000453386279343,-0.000456250424795,-0.000459065451265,-0.000461817923161,-0.000464502808178,-0.000467127831956,-0.000469689865476,-0.000472198983267,-0.000474637274666,-0.000476982695857,-0.000479243617891,-0.000481458788726,-0.000483629925946,-0.000485779728473,-0.000487882238386,-0.000489962872419,-0.000492022057429,-0.000494058644649,-0.000496058178808,-0.000498059837673,-0.000500076688531,-0.000502057777541,-0.000504000411423,-0.000505887037829,-0.000507741732277,-0.000509582570746,-0.000511391052014,-0.000513149062032,-0.000514869142931,-0.000516532475061,-0.000518117933538,-0.000519642064833,-0.000521132574821,-0.000522592619668,-0.000524007827531,-0.000525347804424,-0.000526599645159,-0.000527777540692,-0.000528897412453,-0.000529958578502,-0.000530969536908,-0.000531944826456,-0.000532873780201,-0.000533740563615,-0.000534549070623,-0.00053530566004,-0.000536032914674,-0.000536738152357,-0.000537395994917,-0.000538008726999,-0.000538558066581,-0.000539053712024,-0.00053946318092,-0.000539781010763,-0.000540039299558,-0.000540238473349,-0.000540378910948,-0.000540431023768,-0.000540413515535,-0.000540332799551,-0.000540213262857,-0.0005400602604,-0.000539880542744,-0.000539719445283,-0.00053954877852,-0.000539339780426,-0.000539074863098,-0.000538775711702,-0.000538445600912,-0.00053807744787,-0.000537658754031,-0.000537140836543,-0.00053654528115,-0.000535834952718,-0.000534744162857,-0.000533097566203,-0.000530776092312,-0.000527692762576,-0.000522524304109,-0.00051956399631,-0.000517339900379,-0.000515736042806,-0.000514587388963,-0.000513631456749,-0.000512613193345,-0.000511811302666,-0.000511419780931,-0.000511557406752,-0.000512343044947,-0.000515076281819,-0.000515469167538,-0.00051500310628,-0.000513822976601,-0.000512110050411,-0.00051010090791,-0.00050806710739,-0.000505967127326,-0.000503812831244,-0.000501610671981,-0.000499352924433,-0.000497042168664,-0.000494647808787,-0.000492142501427,-0.000489520036633,-0.000486783441365,-0.000483926703452,-0.000480992857561,-0.000477987614169,-0.000474896954651,-0.000471736658932,-0.000468504848992,-0.00046521478151,-0.000461899438021,-0.000458566617884,-0.000455194644637,-0.000451801035085,-0.000448372814126,-0.000444889414105,-0.000441348545357,-0.000437729227259,-0.000434029050881,-0.000430251052343,-0.000426396961917,-0.000422454771725,-0.000418467204414,-0.000414447393295,-0.000410384892888,-0.000406318866574,-0.000402236559432,-0.000398152739937,-0.000394073982709,-0.000389991690865,-0.000385882143702,-0.000381756279042,-0.00037760700661,-0.000373405679253,-0.000369151684249,-0.000364816100892,-0.000360384879289,-0.000355871657372,-0.000351276266223,-0.000346620404872,-0.000341915727547,-0.000337170259116,-0.000332360144994,-0.00032749187748,-0.000322550450332,-0.000317554144917,-0.000312533481839,-0.000307487671515,-0.000302421126989,-0.000297316018334,-0.000292126298335,-0.000286861662822,-0.00028153556204,-0.000276155392974,-0.000270744957391,-0.000265311564514,-0.00025983261814,-0.000254308029966,-0.000248728095259,-0.000243078438496,-0.000237413976439,-0.000231746640233,-0.000226055558419,-0.000220319590217,-0.00021453265791,-0.000208675024048,-0.000202750226873,-0.000196767207594,-0.000190720284849,-0.000184624103414,-0.000178474259758,-0.000172235194757,-0.000165946607845,-0.000159620230601,-0.000153267633669,-0.000146892718747,-0.000140518072237,-0.000134137010512,-0.000127753805245,-0.000121364768659,-0.000114971532256,-0.000108584605432,-0.000102185103513,-9.57407359302e-05,-8.92530595099e-05,-8.2720768683e-05,-7.61404881683e-05,-6.94886427942e-05,-6.27714760087e-05,-5.5990379887e-05,-4.91327562875e-05,-4.22044871228e-05,-3.52040076372e-05,-2.81792550651e-05,-2.11519101951e-05,-1.41095063991e-05,-7.0590147826e-06,-2.41888511787e-08,7.00987189222e-06,1.403323538e-05,2.10389829848e-05,2.80073300739e-05,3.49512939742e-05,4.18832048908e-05,4.88505314651e-05,5.5847240182e-05,6.28651831108e-05,6.99011894391e-05,7.69495788426e-05,8.40064709487e-05,9.10836064794e-05,9.81943570932e-05,0.000105338230655,0.000112498999622,0.000119659847057,0.000126791653794,0.000133915529053,0.000141033501083,0.000148159427124,0.000155309708416,0.000162459509637,0.000169613330228,0.000176756115793,0.000183905998517,0.000191062919521,0.000198229038602,0.000205403841424,0.000212591186241,0.00021978828734,0.000226981601852,0.000234150065787,0.000241281804341,0.000248367638572,0.000255410548679,0.000262396086017,0.000269334035779,0.000276217473176,0.000283043535466,0.00028978651251,0.000296451717892,0.00030304819575,0.00030961953056,0.000316183583902,0.000322737134324,0.00032928675251,0.00033584909155,0.000342418682868,0.000348998065145,0.000355601159716,0.000362232130351,0.000368893327117,0.000375559209863,0.000382204788662,0.000388818485932,0.000395383120262,0.000401892277285,0.000408333818381,0.000414721655803,0.000421060430448,0.000427336646884,0.000433562345493,0.000439737029302,0.000445858962955,0.00045194450617,0.000458004716939,0.000464051202055,0.000470089008009,0.000476088973683,0.000482020566979,0.00048788745907,0.000493682596465,0.000499400864103,0.000505054277363,0.000510641116994,0.000516161458732,0.000521608901124,0.000526984807721,0.000532286417047,0.000537540842307,0.000542766644994,0.000547971114742,0.000553138735221,0.000558252467149,0.000563310882731,0.000568325848048,0.000573276546592,0.000578174226389,0.000583031348137,0.00058784020276,0.000592580534528,0.000597265471571,0.000601903284449,0.000606529616763,0.000611127361429,0.000615666031929,0.000620143071212,0.000624550577918,0.000628890791953,0.000633154469198,0.000637354906016,0.000641486063601,0.000645525601491,0.000649450331946,0.000653272506948,0.000657025893604,0.000660741295561,0.000664429221746,0.000668087974654,0.000671706866674,0.000675266698381,0.000678754465666,0.000682187016989,0.000685576110344,0.000688911020484,0.000692159465889,0.000695295822457,0.000698298560031,0.000701156790356,0.000703895262715,0.000706525638125,0.00070906639393,0.000711521155458,0.000713882183992,0.00071615287039,0.000718348319882,0.000720496085147,0.000722597136432,0.000724681982494,0.000726743122609,0.000728748544284,0.000730690747777,0.000732568237977,0.000734366008067,0.000736088649387,0.000737725105053,0.000739264860096,0.000740702164071,0.000742034729664,0.000743238457589,0.000744330078284,0.000745312090172,0.000746202629458,0.000747005151282,0.000747746391696,0.000748417574909,0.000749025110827,0.000749581038851,0.000750072220808,0.000750508610556,0.000750899572224,0.000751236251903,0.000751515213831,0.000751732475455,0.000751863143235,0.000751905994897,0.000751858043461,0.000751708507078,0.000751455503102,0.000751106285328,0.000750651419119,0.000750090470639,0.000749426850467,0.000748676405473,0.000747825222315,0.000746891803573,0.000745867678977,0.000744763000884,0.000743591114461,0.000742345564976,0.000741035582384,0.000739668831716,0.000738239589068,0.000736733581953,0.000735156254396,0.000733504012462,0.000731772705164,0.000729973738934,0.000728090783421,0.000726120176748,0.000724050740808,0.000721884532876,0.000719615603076,0.000717233970374,0.000714757663083,0.000712196582082,0.000709546579261,0.000706800700028,0.000703958468083,0.000701030945775,0.000698031731013,0.000694961680148,0.000691785622729,0.000688535291551,0.000685197707277,0.000681789947198,0.000678296579921,0.000674729891413,0.000671100975593,0.000667396000549,0.000663614089264,0.000659732595261,0.000655803925586,0.000651848195292,0.000647850091264,0.000643804784554,0.00063970889975,0.000635551118669,0.000631323485039,0.000627025054543,0.000622668640273,0.000618279849431,0.000613845826546,0.000609323812319,0.000604726961265,0.000600049470467,0.000595312044701,0.000590514345996,0.000585656724999,0.000580760496002,0.000575842801726,0.000570890689866,0.000565887714606,0.000560855090643,0.000555797524123,0.00055071145655,0.0005456018709,0.000540476615109,0.00053533500157,0.000530183798649,0.000524988500104,0.000519740562124,0.000514457635674,0.00050914105795,0.00050379333459,0.000498406475697,0.00049296533591,0.000487474538788,0.00048192281751,0.000476297847029,0.000470612498425,0.000464881702134,0.000459105927971,0.000453274981015,0.000447395333426,0.000441459507249,0.000435478127813,0.00042944432842,0.000423378685617,0.000417312904599,0.000411252882496,0.000405190430087,0.000399122433406,0.000393034010322,0.000386938234847,0.000380829602796,0.000374724967582,0.000368627113138,0.000362539173202,0.000356414420435,0.000350216085095,0.000343947330131,0.000337623712244,0.000331259392846,0.000324856441059,0.000318437320608,0.000312002120537,0.000305557260225,0.000299086589705,0.000292616585843,0.000286159840797,0.000279728796401,0.000273315185219,0.000266910650999,0.000260499610784,0.000254090526667,0.000247656969672,0.000241184896224,0.000234675591768,0.000228140728116,0.000221588025578,0.000215027043548,0.000208454980513,0.000201879053259,0.000195302790117,0.000188719432504,0.000182128148736,0.00017554053416,0.000168964741227,0.00016239335882,0.000155822106187,0.000149250001271,0.000142684177365,0.000136115821585,0.000129549376532,0.000122976417567,0.000116419892877,0.000109868594678,0.000103323536733,9.67918051133e-05,9.02785787738e-05,8.37840126324e-05,7.72872465113e-05,7.08015492207e-05,6.43238445583e-05,5.78697713781e-05,5.14416256377e-05,4.50474631087e-05,3.86899277679e-05,3.23503680096e-05,2.60251145418e-05,1.97023972817e-05,1.33918645819e-05,7.09610631795e-06,8.17919440363e-07,-5.448860214e-06,-1.17248677767e-05,-1.80020201821e-05,-2.42865910337e-05,-3.05714611268e-05,-3.68453734051e-05,-4.30980309435e-05,-4.93288420023e-05,-5.55366221481e-05,-6.17161461057e-05,-6.78776924927e-05,-7.4003912076e-05,-8.00991654742e-05,-8.61600575349e-05,-9.21807029977e-05,-9.81682039958e-05,-0.000104133345702,-0.000110080028134,-0.000115995565601,-0.000121896121547,-0.000127754312313,-0.000133583872751,-0.000139382541459,-0.000145147558072,-0.000150881684524,-0.000156577047143,-0.000162227204196,-0.000167824313759,-0.000173372245408,-0.000178863132634,-0.00018431694147,-0.000189745391532,-0.000195135200119,-0.000200484197782,-0.000205783389138,-0.000211026450366,-0.000216227004859,-0.000221361139122,-0.000226448803339,-0.000231495939664,-0.000236515337489,-0.000241457303271,-0.000246344354738,-0.000251164230947,-0.000255923847591,-0.000260632464969,-0.000265298950949,-0.000269930625283,-0.000274531620032,-0.00027907500977,-0.000283544669533,-0.000287950357864,-0.00029230410393,-0.000296590719386,-0.000300833768216,-0.000305041611985,-0.000309206257936,-0.000313330032845,-0.000317399303271,-0.00032141967192,-0.000325396151229,-0.000329335308073,-0.000333228178972,-0.0003371064689,-0.000340982778357,-0.000344833907089,-0.000348632888573,-0.000352379838698,-0.000356066017882,-0.000359721006543,-0.000363333523025,-0.000366909456943,-0.000370451999602,-0.000373958074379,-0.000377390660727,-0.000380746028752,-0.000384040619967,-0.000387274625698,-0.000390452119775,-0.000393559868586,-0.000396610471765,-0.000399618002478,-0.000402568765015,-0.000405457672264,-0.000408290686199,-0.0004110732672,-0.00041379423725,-0.000416471850119,-0.000419106417473,-0.000421723944992,-0.000424326690892,-0.000426879539363,-0.000429372376633,-0.000431818163818,-0.000434218814144,-0.000436572030788,-0.000438874566091,-0.000441138182726,-0.000443354731703,-0.000445509308376,-0.000447568072619,-0.000449551223469,-0.000451473037293,-0.000453331367953,-0.000455115390876,-0.00045683779454,-0.000458512287439,-0.000460136160315,-0.000461705454594,-0.000463217610462,-0.000464691871317,-0.000466138269947,-0.000467552695088,-0.000468935238045,-0.00047029978033,-0.000471647346901,-0.000472974085614,-0.000474272011698,-0.000475543467801,-0.000476772635201,-0.000477954902493,-0.000479098956484,-0.00048020592691,-0.000481277928942,-0.000482306498327,-0.000483278499875,-0.00048418119077,-0.000485000000224,-0.000485739420585,-0.000486427619173,-0.000487083859244,-0.000487705112981,-0.000488272858931,-0.000488780533253,-0.000489228348691,-0.000489632533777,-0.000490021667792,-0.000490402297852,-0.000490778259595,-0.000491111061274,-0.000491379464766,-0.000491583170115,-0.000491724033675,-0.000491815428636,-0.000491864903697,-0.000491860186445,-0.000491789832783,-0.000491636274311,-0.000491423086014,-0.000491171694324,-0.00049090467376,-0.000490593587777,-0.000490250819964,-0.000489858823932,-0.000489417522151,-0.000488919747979,-0.000488368799878,-0.000487772693805,-0.000487122361718,-0.000486412609803,-0.000485624245671,-0.000484792870484,-0.000483954718859,-0.000483161837504,-0.000482502334971,-0.000481984656173,-0.0004816384604,-0.00048146832157)
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(2, 272)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Mus_musculus_domesticus-male-liver-H3K4me3-ERR572250.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) : 2,272',bty='n')
dev.off()