# R script for Peak Model
#  -- generated by MACS
p <- c(0.0429818254678,0.0499222526496,0.0569584377657,0.0640202482445,0.0712007446137,0.070905378591,0.0708824506349,0.0707152114257,0.0708595226788,0.070864917492,0.0707853439973,0.0707044217993,0.0705749462825,0.0706100125683,0.0703173439522,0.070177078809,0.0702377704575,0.0701932632486,0.0700192805229,0.0697293093134,0.0698426003906,0.0699491479513,0.0701217819737,0.0700449058856,0.0701716839958,0.0701622430727,0.0701271767869,0.0702917185895,0.0704764909416,0.0704886292713,0.0704009635568,0.0703281335786,0.0702957646994,0.0702094476882,0.0702458626773,0.0702229347212,0.0702094476882,0.0701676378859,0.0699990499734,0.0699100355556,0.0697846061487,0.0696901969177,0.0696551306319,0.0694164101478,0.0694042718181,0.0693894360818,0.0694029231148,0.0693840412686,0.0694164101478,0.0695108193788,0.0692882833343,0.0694231536643,0.0694636147633,0.0695715110273,0.0696308539725,0.0697549346761,0.0696551306319,0.0696092747197,0.0697293093134,0.0697104274672,0.069880364083,0.070082669578,0.0700300701493,0.0702161912047,0.0700165831163,0.0698196724345,0.0697347041266,0.0696281565659,0.0693611133125,0.0693449288729,0.0696281565659,0.0694191075544,0.0693665081257,0.0691898279934,0.0690630498832,0.0693058164772,0.0692518683452,0.0693665081257,0.0694541738402,0.0694123640379,0.0691223928284,0.0690994648723,0.0689146925202,0.0689780815753,0.069044168037,0.0688081449595,0.068733966278,0.0684844561675,0.0684021852662,0.0684763639477,0.0685950498381,0.0685977472447,0.0686328135305,0.068626070014,0.0685883063216,0.0688216319925,0.0690023582347,0.0692747963013,0.0693206522135,0.0692316377957,0.06932739573,0.0691453207845,0.0693031190706,0.0694784504996,0.0696052286098,0.0692909807409,0.0690387732238,0.0689929173116,0.068841862542,0.0689416665862,0.0688728827179,0.0691507155977,0.0691695974439,0.0689133438169,0.0690010095314,0.0690751882129,0.069367856829,0.06905765507,0.0692221968726,0.0692262429825,0.0690050556413,0.0688486060585,0.0688728827179,0.0687987040364,0.0687042948054,0.0687380123879,0.0686233726074,0.0689160412235,0.0689281795532,0.0687717299704,0.0689565023225,0.0690185426743,0.0690738395096,0.0693853899719,0.069570162324,0.069583649357,0.069421804961,0.0694676608732,0.069637597489,0.0696740124781,0.0695458856646,0.0697306580167,0.0696011824999,0.069529701225,0.0695175628953,0.0695593726976,0.0698223698411,0.069812928918,0.0696618741484,0.0696470384121,0.0697077300606,0.0696524332253,0.0696659202583,0.0694420355105,0.0692950268508,0.0692451248287,0.069232986499,0.0692289403891,0.0692788424112,0.0694703582798,0.0695485830712,0.0695148654887,0.069664571555,0.0699302661051,0.0700772747648,0.070150104743,0.0702647445235,0.0704360298426,0.0703335283918,0.0702998108093,0.0704009635568,0.0704818857548,0.0703605024578,0.0705317877769,0.0705655053594,0.0705938281287,0.0703969174469,0.0703834304139,0.0707947849204,0.0709175169207,0.070878404525,0.0708851480415,0.0709606754263,0.0709377474702,0.0708837993382,0.0710591307672,0.0713666351196,0.0714704852737,0.0714543008341,0.0717469694502,0.0718858858901,0.0720625660224,0.0720639147257,0.0719223008792,0.0719627619782,0.07202480233,0.0719775977145,0.071782035736,0.0717712461096,0.0715042028562,0.0715406178453,0.0716228887466,0.0720167101102,0.0722163181986,0.0720301971432,0.0719749003079,0.0722958916933,0.0723309579791,0.0722689176273,0.0724644796058,0.0724725718256,0.0723970444408,0.0721232576709,0.0722877994735,0.0726708312107,0.0728286294968,0.0727895171011,0.0731361338492,0.0734193615422,0.0733182087947,0.0735151194765,0.0735650214986,0.0737821627299,0.0737835114332,0.0740127909942,0.0741395691044,0.074263649808,0.074371546072,0.0743998688413,0.0746251022924,0.0747127680069,0.075005436623,0.0752940591292,0.0755300822067,0.0754936672176,0.0755597536793,0.0756002147783,0.0757634078776,0.0756379784707,0.0757728488007,0.0760547277904,0.0761019324059,0.0759576211528,0.0759360419,0.0762759151316,0.0762502897689,0.0764472004507,0.0764660822969,0.0767506586932,0.0769286875288,0.0769030621661,0.0771282956172,0.0773494829584,0.0773832005409,0.0772537250241,0.0774910968049,0.0775288604973,0.0775828086293,0.0776151775085,0.0778026472672,0.0778215291134,0.0778741285421,0.0779226818609,0.0781007106965,0.0782113043671,0.078485091137,0.0787184168079,0.0789247684128,0.0793860249414,0.079253852018,0.079361748282,0.0795047108318,0.0795559615572,0.0798756042393,0.0800522843716,0.0802559385699,0.0802869587458,0.0804393622187,0.0804757772078,0.0808709472747,0.0811339444182,0.0812283536492,0.0815237196719,0.0817381634966,0.0819027052992,0.0818258292111,0.0819094488157,0.0820888263546,0.0820375756292,0.0820537600688,0.0819836274972,0.082086128948,0.0821913278054,0.0822142557615,0.0823868897839,0.0824206073664,0.0828562385323,0.082989760159,0.0835211492592,0.0839891493043,0.0846810340972,0.0852582791096,0.0862873397275,0.0870817259712,0.0882402621059,0.089571432263,0.0905816110347,0.0917860030816,0.0927071674355,0.0935109946023,0.0943364010219,0.0950350293313,0.095330395354,0.0958456000146,0.0959319170258,0.0962650467409,0.0964511677963,0.0966885395771,0.0967451851157,0.0969272600612,0.0971120324133,0.0973966088096,0.097461346568,0.0978106607227,0.0980804013827,0.0984364590539,0.0982854042843,0.0984445512737,0.0987871219119,0.0990069605498,0.0991485743963,0.0994318020893,0.0997999980902,0.0999119404641,0.100102107629,0.0997473986615,0.100147963542,0.100272044245,0.100332735894,0.100456816597,0.100765669653,0.100750833917,0.101085312335,0.101244459325,0.101427882973,0.101794730271,0.102028055942,0.102067168338,0.102385462316,0.10262822891,0.102663295196,0.102761750537,0.102976194362,0.103228401879,0.103467122363,0.103641105089,0.103697750627,0.104191376035,0.104312759332,0.104458419288,0.104729508652,0.10492507063,0.105014085048,0.104914281004,0.104846845839,0.104984413575,0.105154350191,0.105169185928,0.105304056258,0.105541428038,0.105735641314,0.106062027512,0.106237358941,0.106590719206,0.106824044877,0.107184148658,0.107549647252,0.107784321626,0.108037877847,0.10831301332,0.108593543606,0.108752690596,0.108890258332,0.109211249718,0.109505267037,0.109588886642,0.109726454378,0.109646880884,0.109664414026,0.109793889543,0.109529543696,0.109978661895,0.11019715183,0.110276725325,0.110414293061,0.110650316139,0.110721797414,0.111234304668,0.111452794602,0.111765693768,0.112124448846,0.112067803307,0.111953163527,0.111915399834,0.112168956055,0.112301128978,0.112511526693,0.112534454649,0.11275564199,0.11290265065,0.113251964804,0.113523054168,0.11396542885,0.114224379884,0.11449681795,0.114751722874,0.114995838171,0.114983699842,0.114959423182,0.115188702743,0.11519544626,0.115515088942,0.115520483755,0.116010063053,0.115997924723,0.11613953857,0.116283849823,0.116479411801,0.116946063143,0.116968991099,0.117250870089,0.117115999759,0.1174599191,0.117405970968,0.117667619409,0.117834858618,0.118114040201,0.118282628113,0.118244864421,0.118145060377,0.118362201608,0.11840805752,0.118463354356,0.118638685785,0.118714213169,0.118782997038,0.118761417785,0.119021717522,0.119028461038,0.119214582094,0.119255043193,0.119275273742,0.119244253566,0.119250997083,0.119070270841,0.118915169961,0.119228069127,0.119408795369,0.119814755062,0.11978508359,0.119736530271,0.120027850184,0.1199118617,0.12005887036,0.120458086536,0.120739965526,0.120683319987,0.120551147064,0.12045538913,0.120694109614,0.12083976957,0.120869441043,0.121344184604,0.12112164856,0.121332046275,0.121288887769,0.120953060647,0.121122997263,0.121046121175,0.12112164856,0.12097059379,0.120988126933,0.120765590889,0.12084381568,0.12043920469,0.120270616778,0.120394697481,0.120170812733,0.120120910711,0.119849821348,0.11978508359,0.119729786754,0.119751366007,0.119812057656,0.119940184469,0.120365026009,0.120379861745,0.120176207547,0.120149233481,0.119992783898,0.11992400003,0.11978103748,0.119616495677,0.119596265128,0.119450605171,0.11895967717,0.119072968247,0.119275273742,0.119230766533,0.119183561918,0.119215930797,0.118998789566,0.119093198797,0.118746582049,0.118658916334,0.11868184429,0.118302858663,0.118204403322,0.11813831686,0.118095158355,0.117664922002,0.117674362925,0.117242777869,0.116981129429,0.116603492505,0.116495596241,0.116275757603,0.115910259009,0.115431469337,0.115246696985,0.115184656633,0.114860967841,0.114673498083,0.11464787272,0.11452918683,0.114043653642,0.113772564278,0.113487987882,0.113428644937,0.113053705419,0.112736760144,0.112483203923,0.112378005066,0.112330800451,0.112368564143,0.112318662121,0.111990927219,0.111814247087,0.111559342163,0.111384010734,0.111277463173,0.111237002074,0.110685382425,0.110269981808,0.109692736796,0.109305658949,0.109332633015,0.108812033541,0.108597589716,0.108569266947,0.108416863474,0.108172748177,0.108259065188,0.108129589671,0.108116102638,0.108335941276,0.108132287078,0.108489693452,0.108601635826,0.108464068089,0.108553082507,0.10844788365,0.108629958595,0.108526108441,0.10844788365,0.108222650199,0.108134984484,0.107880079561,0.107847710681,0.107607641494,0.107286650109,0.106967007426,0.106326373359,0.106182062106,0.105962223468,0.105610211907,0.105406557708,0.105271687378,0.104846845839,0.104749739201,0.104573059069,0.104470557618,0.104606776651,0.104462465398,0.104218350101,0.10411584865,0.103855548913,0.103264816868,0.102734776471,0.102547306712,0.101848678403,0.100822315192,0.099632758881,0.0986279749225,0.0974249315789,0.0962488623013,0.0951577613316,0.0941381416368,0.0931009887991,0.0917725160486,0.0908351672551,0.090421115342,0.0901230519127,0.0893610345482,0.0893461988119,0.088789184349,0.0883602966996,0.0881040430726,0.088047397534,0.0879057836875,0.0880028903251,0.0877196626321,0.0873110055322,0.0872975184992,0.086927973795,0.0869455069379,0.0870911668943,0.0870817259712,0.0869023484323,0.0870021524765,0.0868133340145,0.0867499449594,0.0866892533109,0.0865476394644,0.0866083311129,0.0865112244753,0.0859528613091,0.0857154895283,0.0855266710663,0.0851449880324,0.0847686998117,0.0845380715474,0.0841590859201,0.0839635239416,0.0836708553255,0.0833646996764,0.0833593048632,0.0831974604672,0.0829938062689,0.0828238696531,0.0828670281587,0.0827577831914,0.0831394662253,0.0828940022247,0.0826728148835,0.0825770569492,0.0825757082459,0.0825864978723,0.0827362039386,0.0827901520706,0.0827213682023,0.0826323537845,0.0823221520255,0.0823599157179,0.0822398811242,0.0821414257833,0.0819836274972,0.0817961577385,0.0814414487706,0.0811298983083,0.0808507167252,0.0807266360216,0.0805715351421,0.0804501518451,0.0803719270537,0.0801736676686,0.080063073998,0.0799740595802,0.0797110624367,0.0794440191833,0.0791122381715,0.0790205263471,0.0788371026983,0.0786820018188,0.07836370784,0.0784702554007,0.0783286415542,0.0782935752684,0.0782666012024,0.0783313389608,0.0783974254225,0.0782045608506,0.0780629470041,0.0780494599711,0.0781155464328,0.0779712351797,0.0777473504319,0.0773508316617,0.0773144166726,0.0772564224307,0.077257771134,0.0771660593096,0.0770581630456,0.0769232927156,0.0766414137259,0.0765793733741,0.0764822667365,0.0767371716602,0.0767290794404,0.0764633848903,0.0764175289781,0.0762718690217,0.0760452868673,0.0758780476581,0.0759279496802,0.075733736405,0.0755058055473,0.0753372176348,0.0751160302936,0.0750337593923,0.0748948429524,0.0748988890623,0.0750040879197,0.0748449409303,0.0745954308198,0.0744200993908,0.0743297362697,0.0741382204011,0.073953448049,0.0737039379385,0.0735178168831,0.0734881454105,0.0733964335861,0.0731105084865,0.0729675459367,0.0727557995186,0.072847511343,0.0727085949031,0.0726128369688,0.0726627389909,0.0724145775837,0.0720544738026,0.071862957934,0.0719991769673,0.0720612173191,0.0721205602643,0.0717537129667,0.07175506167,0.0716390731862,0.0714907158232,0.0715042028562,0.0714893671199,0.0712870616249,0.0709026811844,0.0708689636019,0.0706787964366,0.0707475803049,0.0704238915129,0.0703456667215,0.0703106004357,0.0704023122601,0.0704616552053,0.0705358338868,0.0708676148986,0.0708864967448,0.0709026811844,0.0708325486128,0.0709283065471,0.0708743584151,0.0708959376679,0.0705911307221,0.0703551076446,0.0702337243476,0.070015234413,0.0698439490939,0.0697427963464,0.0698412516873,0.0698978972259,0.0699140816655,0.0698291133576,0.0698048366982,0.0700098395998,0.0700597416219,0.0700341162592,0.07000174738,0.0698992459292,0.0698493439071,0.0695823006537,0.0693840412686,0.0692653553782,0.0693826925653,0.0690360758172,0.0689686406522,0.0691075570921,0.0691156493119,0.069125090235,0.0690293323007,0.0690347271139,0.0691601565208,0.0692694014881,0.0690940700591,0.0691938741033,0.0690360758172,0.0689713380588,0.0689052515971,0.0689578510258,0.0690563063667,0.0689726867621,0.0689996608281,0.0688809749377,0.0690765369162,0.0689618971357,0.0690050556413,0.0687960066298,0.0689200873334,0.0689551536192,0.0687798221902,0.0687906118166,0.0689200873334,0.0687906118166,0.0685464965193,0.0685977472447,0.0686827155526,0.0687663351572,0.0684035339695,0.0683374475078,0.0681216549798,0.068032640562,0.067884283199,0.067992179463,0.0681230036831,0.0681917875514,0.0680798451775,0.0679260930013,0.0680852399907,0.0681230036831,0.0682416895735,0.0686220239041,0.0685262659698,0.0684898509807,0.0684885022774,0.0685208711566,0.0687676838605,0.0688216319925,0.0689146925202,0.0688324216189,0.0689699893555,0.0686368596404,0.0686274187173,0.0687825195968,0.0684386002553,0.0683037299253,0.0680677068478,0.0681162601666,0.0678937241221,0.0677655973086,0.0677696434185,0.0679193494848,0.0681257010897,0.0680879373973,0.0682915915956,0.0683441910243,0.0682322486504,0.068342842321,0.0685653783655,0.0688944619707,0.0688351190255,0.0688364677288,0.0688755801245,0.0688917645641,0.0690549576634,0.0691210441251,0.0693638107191,0.069138577268,0.0689969634215,0.0687056435087,0.0688121910694,0.0686719259262,0.0684588308048,0.0682929402989,0.0682632688263,0.0682322486504,0.068046127595,0.0681391881227,0.0681324446062,0.0682255051339,0.0682659662329,0.0684399489586,0.0685653783655,0.0687488020143,0.0689565023225,0.0690859778393,0.0692613092683,0.0695067732689,0.0698237185444,0.0699194764787,0.0698898050061,0.0700165831163,0.0701433612265,0.0700408597757,0.0698749692698,0.0698493439071,0.0698385542807,0.0696618741484,0.0694393381039,0.0696524332253,0.0697266119068,0.0695553265877,0.0695903928735,0.0697576320827,0.0695512804778,0.0694663121699,0.0697036839507,0.0697104274672,0.0697778626322,0.0698021392916,0.0698142776213,0.0697846061487,0.0696632228517,0.0697144735771,0.0698709231599,0.0701474073364,0.0699491479513,0.0702242834245,0.0701487560397,0.0700570442153,0.0701743814024,0.0704346811393,0.0704657013152,0.0704778396449,0.0705911307221,0.0703969174469,0.0705115572274,0.0703537589413,0.0705371825901,0.0704050096667,0.0703362257984,0.070338923205,0.0703348770951,0.0701797762156,0.0702202373146,0.0703321796885,0.0705304390736,0.0706531710739,0.0706855399531,0.0710011365253,0.0710146235583,0.0711414016685,0.0714475573176,0.0716134478235,0.0717496668568,0.0717388772304,0.071714600571,0.0718548657142,0.0719128599561,0.0718332864614,0.0719209521759,0.071984341231,0.0717914766591,0.0720032230772,0.071916906066,0.0721583239567,0.0720463815828,0.0720086178904,0.0721826006161,0.0722904968801,0.0723876035177,0.072186646726,0.0723228657593,0.0722446409679,0.0722244104184,0.0721313498907,0.0722581280009,0.0720194075168,0.0720531250993,0.0719587158683,0.0716970674281,0.071782035736,0.0717793383294,0.0720045717805,0.0722459896712,0.0725534940236,0.0725980012325,0.0729068542882,0.0728906698486,0.0728515574529,0.0732184047505,0.0733128139815,0.0733573211904,0.0729473153872,0.0729540589037,0.0726816208371,0.0727072461998,0.0728461626397,0.0728137937605,0.0730282375852,0.0732467275198,0.0731078110799,0.0731900819812,0.07350837596,0.0735056785534,0.0735785085316,0.0735744624217,0.0736891022022,0.0736311079603,0.073656733323,0.07337350563,0.0737902549497,0.0738819667741,0.0738617362246,0.073845551785,0.0739898630381,0.0741206872582,0.0737835114332,0.0739655863787,0.0739332174995,0.0739426584226,0.0737025892352,0.0735785085316,0.0734517304214,0.0732817938056,0.0733276497178,0.0733182087947,0.0735919955646,0.0734328485752,0.0733964335861,0.0733991309927,0.0733789004432,0.0733883413663,0.0736796612791,0.0739116382467,0.0739359149061,0.0739628889721,0.073845551785,0.0740559494998,0.074169240577,0.0743836844017,0.0744227967974,0.0746048717429,0.0745320417647,0.0745698054571,0.0743661512588,0.0743971714347,0.0746426354353,0.0746089178528,0.0744983241822,0.0745226008416,0.0746062204462,0.0745158573251,0.0747775057653,0.0750539899418,0.0751740245355,0.0750850101177,0.0748678688864,0.0749892521834,0.0750688256781,0.0748961916557,0.0749568833042,0.0750081340296,0.0749299092382,0.0747882953917,0.0747478342927,0.074816618161,0.0748988890623,0.074816618161,0.0746655633914,0.0749339553481,0.0748907968425,0.0748759611062,0.0746655633914,0.0747397420729,0.0749272118316,0.0749420475679,0.0751038919639,0.0751295173266,0.0755341283166,0.0752846182061,0.0752171830411,0.075288664316,0.0753318228216,0.075099845854,0.0749191196118,0.0749609294141,0.074708721897,0.0746938861607,0.0744902319624,0.0744834884459,0.0746358919188,0.074695234864,0.0746345432155,0.0747694135455,0.0748759611062,0.0748584279633,0.0749393501613,0.0747680648422,0.0745994769297,0.0745684567538,0.0744942780723,0.0744241455007,0.0745010215888,0.0743877305116,0.0741854250166,0.0741166411483,0.0739601915655,0.0742447679618,0.0745590158307,0.0747532291059,0.0747464855894,0.0747235576333,0.0748854020293,0.0749622781174,0.0752846182061,0.0753277767117,0.0754208372394,0.0752225778543,0.0748543818534,0.0747478342927,0.0747114193036,0.0745536210175,0.0744349351271,0.07445246827,0.0743567103357,0.0745252982482,0.074668260798,0.0746439841386,0.0747680648422,0.0747788544686,0.0748125720511,0.0748314538973,0.0748193155676,0.07472220893,0.0746979322706,0.0744335864238,0.0744268429073,0.0747936902049,0.0747977363148,0.0748125720511,0.0748314538973,0.0750620821616,0.0751457017662,0.0753331715249,0.0752724798764,0.0753048487556,0.0752104395246,0.074938001458,0.0749029351722,0.0749852060735,0.0748489870402,0.0746790504244,0.0745185547317,0.0744335864238,0.074438981237,0.0744443760502,0.0746534250617,0.0747033270838,0.0748395461171,0.0748489870402,0.0749555346009,0.0749487910844,0.0749879034801,0.0748489870402,0.0748988890623,0.0748341513039,0.0745455287977,0.0746291484023,0.0747775057653,0.0746021743363,0.0746655633914,0.0746358919188,0.0746790504244,0.0746048717429,0.0743243414565,0.0741786815001,0.0742582549948,0.0739952578513,0.0738981512137,0.073939961016,0.0737255171913,0.0737430503342,0.0735501857623,0.0735137707732,0.0735663702019,0.0735420935425,0.0736257131471,0.0736931483121,0.0734557765313,0.0733532750805,0.0735016324435,0.0735016324435,0.0734935402237,0.0736742664659,0.0738482491916,0.0740842722691,0.0738806180708,0.0738495978949,0.0740195345107,0.0740721339394,0.0741045028186,0.0740087448843,0.0739615402688,0.0736216670372,0.0737214710814,0.073535350026,0.0736338053669,0.0736998918286,0.073535350026,0.0661592916783,0.0586739883633,0.0513262527849,0.0440742751408,0.0)
m <- c(0.0444640248222,0.0516868270792,0.0589839658115,0.0662729951101,0.0735904074266,0.0736093294385,0.0736052747217,0.0735795948484,0.0735282351018,0.0735120162344,0.0735309382463,0.0738161199971,0.0740012853993,0.0740742703023,0.0742256463976,0.0741864508015,0.0742297011144,0.0741026533202,0.0739958791102,0.0736917753475,0.0737390803772,0.0736742049079,0.0735160709513,0.0735066099453,0.0734741722106,0.0732876552362,0.0733322571214,0.0736917753475,0.0737498929555,0.0740985986034,0.074339178469,0.0742797092887,0.0742269979698,0.0742783577164,0.0744324369562,0.0746203055029,0.0746892356891,0.0745973287742,0.0749298155547,0.0749419797052,0.0747730331704,0.0749176514042,0.0751893174322,0.0751460671193,0.0748284476338,0.074848721218,0.0749284639824,0.0747824941763,0.0747378922912,0.0747068061287,0.0748635885131,0.0747446501525,0.0746716652495,0.0747838457486,0.0750190193251,0.0752906853531,0.0752420287511,0.0754231394364,0.0751014652341,0.0750487539152,0.0749230576933,0.0750582149212,0.0751798564263,0.0752555444739,0.0751663407035,0.0749271124102,0.0749014325369,0.0749135966874,0.0749433312775,0.0750149646083,0.0748919715309,0.0747527595862,0.0748433149289,0.0748703463745,0.0748771042358,0.0748541275071,0.0747054545565,0.0746378759425,0.0746284149366,0.0747162671347,0.0748406117843,0.0750514570598,0.0749500891389,0.0748027677605,0.074989284735,0.0751906690045,0.0752447318956,0.0750311834756,0.0751406608302,0.074989284735,0.0749730658676,0.0748852136695,0.0749879331627,0.0750555117766,0.0749595501448,0.0749946910241,0.0751082230955,0.0752582476184,0.0753839438403,0.0754569287434,0.0755704608148,0.0756177658445,0.0754380067315,0.0753893501294,0.0755623513811,0.0753650218284,0.0753014979313,0.0755299136464,0.0755285620741,0.0754474677374,0.0752285130283,0.0752933884977,0.0752312161728,0.0752393256065,0.0751622859866,0.0753947564186,0.0754434130206,0.0753650218284,0.0751311998242,0.0752244583115,0.0753271778046,0.0753136620818,0.0754123268582,0.0754974759117,0.0754055689968,0.0753042010759,0.0752433803234,0.0753204199432,0.0754974759117,0.0756137111277,0.0757515715001,0.0757326494882,0.0758232048309,0.075862400427,0.07582861112,0.0757826576625,0.0757867123794,0.0756001954049,0.0755420777969,0.0755258589296,0.0757245400545,0.0756948054644,0.0754434130206,0.0755839765376,0.0756934538921,0.0757529230724,0.0757583293615,0.0758961897339,0.0758123922527,0.0757731966566,0.0757961733853,0.0757042664704,0.075886728728,0.0756839928862,0.0755515388029,0.0753244746601,0.0756853444585,0.0755515388029,0.0757258916268,0.075755626217,0.0754298972978,0.0753271778046,0.075144715547,0.0749757690122,0.0751379576856,0.0753596155393,0.0749406281329,0.0750784885054,0.0750690274994,0.0749162998319,0.0750487539152,0.0751257935351,0.0753393419551,0.0754434130206,0.0754447645929,0.0754109752859,0.0755974922604,0.0753744828344,0.0751730985649,0.075013613036,0.0748919715309,0.0749392765607,0.07479060361,0.0748527759348,0.0747473532971,0.0749419797052,0.0747608690199,0.0748595337962,0.0750217224697,0.0751230903906,0.0749946910241,0.0748838620972,0.074873049519,0.0749663080062,0.0748284476338,0.0745635394672,0.0747041029842,0.0745229922988,0.0744919061364,0.0745973287742,0.0746162507861,0.0746730168218,0.0745702973286,0.0744621715463,0.0745716489009,0.0744756872691,0.0743148501679,0.0744837967028,0.0744783904137,0.0744689294077,0.0744094602274,0.0742337558312,0.0741945602351,0.0740850828806,0.0737215099376,0.0737485413832,0.0738309872922,0.0736687986188,0.0735931105712,0.0735958137157,0.0736444703177,0.0736877206307,0.0738120652803,0.0737917916961,0.0741269816212,0.0741418489163,0.0740877860251,0.0740729187301,0.0740364262785,0.0738674797437,0.0737471898109,0.0737471898109,0.0735985168603,0.0736687986188,0.0736079778662,0.0735403992523,0.0734011873076,0.0735093130899,0.073422812464,0.0733728042897,0.0734376797591,0.0733822652957,0.0735079615176,0.0733728042897,0.0732971162421,0.0731754747371,0.0732984678144,0.0731592558697,0.0730876225389,0.0731335759964,0.0730700520993,0.0729943640517,0.0728754256912,0.0728105502218,0.0727389168911,0.0727254011683,0.0725037433146,0.0722361320034,0.0722226162806,0.0720563728904,0.072132060938,0.0720631307518,0.0719766301259,0.0720090678606,0.0719969037101,0.0717279408267,0.0718941842169,0.0720198804388,0.07196716912,0.0720766464745,0.0717009093811,0.0715400722799,0.0714738452383,0.0713819383233,0.071258945246,0.0713454458718,0.0711683899033,0.0711778509093,0.0711075691508,0.0707953559544,0.0709183490318,0.071011607519,0.0707480509246,0.0708494188455,0.0708696924297,0.0706858785998,0.0705088226313,0.070269594338,0.0703168993678,0.0704425955897,0.0705331509323,0.0706061358354,0.0708331999782,0.0708102232495,0.0708264421168,0.0713211175708,0.0714292433531,0.0715441269968,0.0712792188301,0.0712089370717,0.0709210521763,0.0708291452614,0.070672362877,0.0704074547104,0.0702871647776,0.0698600679376,0.0696951761196,0.0695681283254,0.0697195044206,0.0695721830422,0.0694681119768,0.0694424321035,0.0694478383926,0.0694099943688,0.069338361038,0.0693072748756,0.0691937428042,0.0694167522302,0.0693559314777,0.0695100107174,0.0695113622897,0.0694613541154,0.0694937918501,0.0693775566341,0.0692734855687,0.0693762050618,0.069653277379,0.0695829956205,0.0696586836681,0.0696789572523,0.0696492226621,0.0694289163807,0.0695965113433,0.0696870666859,0.0698762868049,0.0697289654266,0.0698060050464,0.069619488072,0.0695005497115,0.069299165442,0.0694275648084,0.0695559641749,0.0692694308518,0.0690775075883,0.0690558824318,0.0691288673349,0.0688396308672,0.0689193736317,0.068828818289,0.0689896553902,0.0689437019327,0.0689328893545,0.0691018358893,0.0693829629232,0.0693248453153,0.0693099780202,0.0692870012915,0.069216719533,0.0693532283331,0.0692126648161,0.069149140919,0.0694654088322,0.0695532610303,0.0693316031766,0.0691545472081,0.0693261968875,0.0694478383926,0.0694113459411,0.0694491899649,0.0696465195176,0.0696370585116,0.0692153679607,0.068993710107,0.0692005006656,0.0692423994063,0.0691140000398,0.0690139836912,0.0690653434378,0.0690910233111,0.0688409824395,0.068877474891,0.0690396635645,0.0689234283485,0.0690085774021,0.06917346922,0.0692261805389,0.0692140163884,0.0691599534973,0.0692342899726,0.0695965113433,0.069561370464,0.0695762377591,0.0697276138543,0.0697113949869,0.069726262282,0.0694708151213,0.0695816440482,0.0697519421553,0.0698343880643,0.0694235100916,0.0695194717234,0.0696816603968,0.0697370748602,0.0694275648084,0.0691275157626,0.0693153843093,0.0693113295925,0.0692437509785,0.0690788591605,0.0691477893468,0.0692815950023,0.0691545472081,0.0691261641903,0.0691694145032,0.069488385561,0.0696938245473,0.0697573484444,0.0698722320881,0.0697154497038,0.069900615106,0.0699208886901,0.0699938735932,0.070031717617,0.0701776874231,0.0702844616331,0.0701371402547,0.0702722974826,0.070293922639,0.0704899006194,0.0705345025046,0.0704493534511,0.0704033999936,0.0704452987342,0.0705912685403,0.0704385408728,0.0706547924374,0.0706710113048,0.0708318484059,0.0708575282792,0.0709615993447,0.0710670219824,0.0710751314161,0.0712143433608,0.0713819383233,0.0717711911396,0.0716711747909,0.0716563074959,0.0715468301413,0.0716252213335,0.0717225345375,0.0718941842169,0.0720509666012,0.0720212320111,0.0720212320111,0.0717536206999,0.0718103867356,0.0719387861021,0.0719076999397,0.0720955684864,0.0720266383002,0.0719928489933,0.0721334125102,0.0724375162729,0.0724753602967,0.0727402684633,0.0729173244318,0.0728700194021,0.0730605910934,0.0730957319726,0.0732903583807,0.0732781942302,0.0732808973748,0.0730876225389,0.0732146703331,0.0734174061749,0.0734944457948,0.0737431350941,0.0740364262785,0.0740742703023,0.0743189048848,0.0747108608456,0.0748676432299,0.0750122614637,0.0750744337885,0.0749257608379,0.074979823729,0.0749906363073,0.0749244092656,0.0750055036023,0.0748108771942,0.0748500727903,0.074955495428,0.0751271451074,0.0753217715155,0.0754650381771,0.0755961406881,0.0757150790486,0.075877267722,0.0758205016863,0.075911057029,0.0760164796667,0.0761313633104,0.076396271477,0.0762570595323,0.0763084192789,0.0764692563801,0.076594952602,0.0766287419089,0.0769328456716,0.07708016705,0.077128823652,0.0773166921988,0.077172073965,0.0773396689275,0.0775153733237,0.0776410695456,0.0777897424963,0.0780249160728,0.0783006368176,0.0785222946713,0.0787034053566,0.0788466720182,0.0792521437018,0.0793372927553,0.0795427317417,0.0795751694764,0.0797306002884,0.0797292487161,0.0799036015401,0.080267174483,0.0804469335961,0.0805780361071,0.0804550430297,0.0809037650262,0.0810402738264,0.0813241040049,0.0812659863969,0.0812646348246,0.0812173297949,0.081188946777,0.081295720987,0.081460612805,0.0817093021043,0.0817566071341,0.0818620297718,0.0819228505243,0.0821769461127,0.082663512133,0.0828297555233,0.0830487102324,0.0832054926167,0.0832325240623,0.083313618399,0.0833514624228,0.0833352435555,0.083478510217,0.0835893391439,0.0834906743675,0.0834947290844,0.0834474240546,0.0833528139951,0.0834244473259,0.0836406988905,0.0835271668191,0.0837636919678,0.083759637251,0.0840421158572,0.0843570321981,0.0846651906777,0.0848476529353,0.0851679755653,0.0855423610865,0.0857261749164,0.0861167793049,0.0863830390438,0.0867249868303,0.0867668855709,0.086961511979,0.0871615446763,0.0873237333497,0.0876332434015,0.0876035088114,0.0877400176115,0.088057637097,0.0882333414932,0.0883563345706,0.0885604219847,0.0887036886462,0.0889158854939,0.0890578005832,0.0889483232286,0.0889780578187,0.0893024351656,0.0892794584369,0.089192957811,0.0892713490032,0.0892781068646,0.0895065225797,0.0899282131306,0.090371528838,0.0909459470564,0.0919028602297,0.0924691690144,0.0933301205559,0.0945600513295,0.0958521544278,0.0971591248213,0.0981592883075,0.0991297172035,0.100370460555,0.101482804541,0.102238333444,0.102776259211,0.103639913897,0.103942666088,0.104112964195,0.104461669843,0.104883360394,0.105018517621,0.104896876116,0.105021220766,0.105094205669,0.105494271064,0.105351004402,0.105906500609,0.106166002486,0.106313323864,0.106587693037,0.106802593029,0.107216174147,0.107635161553,0.107791943937,0.107973054623,0.108287970963,0.108298783542,0.108233908072,0.108374471589,0.108413667185,0.108167681031,0.108056852104,0.108002789213,0.108171735748,0.108114969712,0.108105508706,0.108315002409,0.10852314454,0.108759669689,0.108774536984,0.109248938854,0.109390853943,0.109388150798,0.109719286007,0.110009874046,0.110123406118,0.110082858949,0.110400478435,0.110258563346,0.110136921841,0.110361282839,0.110428861453,0.110828926847,0.110664035029,0.110850552004,0.111097889731,0.111292516139,0.111689878389,0.112154819253,0.112800870802,0.112999551927,0.113498282098,0.113557751278,0.114024043714,0.11418758396,0.114506555017,0.114778221045,0.11468631413,0.114825526075,0.114978253743,0.115283709078,0.115487796492,0.115809470694,0.11572432164,0.116163582631,0.116356857467,0.116394701491,0.116689344247,0.117009666877,0.116982635432,0.117285387622,0.117190777563,0.117190777563,0.117644905848,0.117500287615,0.117757086348,0.117951712756,0.117997666213,0.118115253001,0.118388270602,0.118303121548,0.118646420907,0.119130283783,0.119188401391,0.119457364274,0.119551974334,0.119947985011,0.120091251673,0.119868242247,0.119812827783,0.11998853218,0.120019618342,0.119854726524,0.119989883752,0.119987180607,0.120029079348,0.119706053573,0.119354644781,0.119504669304,0.119656045399,0.119574951062,0.119772280615,0.11977498376,0.119557380623,0.119722272441,0.119653342254,0.119808773066,0.120065571799,0.11992365671,0.12026154978,0.120085845384,0.120073681233,0.120118283118,0.120341292544,0.120299393804,0.12030885481,0.120479152917,0.120753522089,0.121030594406,0.1207481158,0.120881921456,0.120900843468,0.120881921456,0.12067107618,0.120625122723,0.120596739705,0.120429144742,0.120281823364,0.120062868655,0.120173697582,0.120225057328,0.120010157336,0.119642529676,0.119453309557,0.119139744789,0.118742382539,0.118703186943,0.118272035386,0.11852342783,0.118134175013,0.117886837286,0.117889540431,0.118130120296,0.118040916526,0.11801929137,0.118355832867,0.118193644194,0.118436927204,0.117958470617,0.118240949223,0.118177425326,0.118135526586,0.117997666213,0.118000369358,0.117821961817,0.117594897674,0.117635444842,0.117616522831,0.117701671884,0.117309715923,0.117170503979,0.116965064992,0.116390646774,0.116481202116,0.116542022869,0.11621629395,0.115912190187,0.115539156238,0.115163419145,0.115055293363,0.115028261917,0.114868776388,0.115016097766,0.114678204697,0.114448437409,0.114589000926,0.114295709742,0.114198396538,0.114103786478,0.11363614247,0.113199584624,0.11305496639,0.112940082746,0.11264543999,0.112535962635,0.112184553843,0.111999388441,0.111741238135,0.111672307949,0.111380368337,0.111216828091,0.110745129366,0.110381556423,0.110173414292,0.109557097333,0.109380041365,0.109205688541,0.109005655843,0.10884346717,0.10896781182,0.109002952699,0.109007007416,0.10893267094,0.109109726909,0.109208391685,0.109000249554,0.10890293635,0.108692091075,0.108469081649,0.108325814987,0.108079828833,0.10791223387,0.107816272238,0.107359440808,0.107143189243,0.106764749005,0.106616076055,0.106390363484,0.105933532054,0.105638889297,0.105326676101,0.105209089313,0.104876602532,0.104536006318,0.10441841953,0.104606288076,0.104150808219,0.10435354406,0.104435989969,0.104192706959,0.103919689359,0.103684515782,0.10351692082,0.103385818309,0.103322294412,0.1030303548,0.103173621461,0.10287627556,0.102400522118,0.102501890039,0.102462694443,0.102232927155,0.101950448549,0.101972073705,0.101763931575,0.101417929071,0.101063817134,0.100852971859,0.100932714623,0.100623204571,0.100466422187,0.100347483827,0.100262334773,0.0999649888717,0.0994770712791,0.099495993291,0.099694674416,0.0995000480078,0.09936489078,0.0990499744391,0.0986661279119,0.0984755562206,0.0984809625098,0.0984606889256,0.0985282675395,0.0980254826519,0.0974307908493,0.0971969688451,0.096919896528,0.0967617625714,0.0964806355374,0.0960589449865,0.0957832242416,0.0955007456354,0.0954466827442,0.0957832242416,0.0955804883998,0.095421002871,0.0953480179679,0.0949276789893,0.0947857639,0.094349206054,0.0938085771426,0.0930584545279,0.0918852897901,0.090783758383,0.0898741502395,0.0886753056283,0.0873872572468,0.086427640929,0.0854572120329,0.0845489554617,0.0836569177578,0.0828581385411,0.0824796983031,0.0819039285124,0.0815106209793,0.0816457782072,0.0812822052643,0.0813281587217,0.0811565090423,0.0812673379692,0.0812943694148,0.0812849084088,0.0809213354659,0.0809794530738,0.0808456474183,0.0801306656829,0.0802171663087,0.079922523552,0.0799792895877,0.0795413801694,0.0792791751473,0.0789318210717,0.0790521110045,0.0788818128974,0.0788399141568,0.0789020864816,0.0785587871228,0.0784574192019,0.0781316902828,0.0780979009758,0.0779073292845,0.0778816494112,0.0778046097914,0.0776451242625,0.0773396689275,0.0770531356044,0.0772045116996,0.0768814859251,0.0769017595092,0.0767922821547,0.076817962028,0.0767301098298,0.076667937505,0.076463850091,0.0763732947483,0.0763557243087,0.0761191991599,0.0761624494728,0.0758569941379,0.0758259079754,0.0755609998088,0.0755826249653,0.075367724973,0.0750528086321,0.0751393092579,0.0751460671193,0.074989284735,0.0749014325369,0.0747162671347,0.0744297338116,0.0744229759502,0.0741188721875,0.0740945438865,0.0742391621203,0.0739053237675,0.0738134168526,0.0737255646545,0.0735120162344,0.0735552665474,0.0735322898186,0.0732890068085,0.0733876715848,0.0733390149828,0.0731741231648,0.073301170959,0.0731876388876,0.0733579369947,0.0734092967413,0.0731768263093,0.0729862546181,0.0730565363765,0.0731051929786,0.0728821835526,0.0727091823009,0.0726294395365,0.0725888923681,0.0723253357738,0.0720766464745,0.0723591250808,0.0725456420552,0.0721496313776,0.0719104030843,0.0720266383002,0.0720577244626,0.0718982389338,0.0718887779278,0.0718144414525,0.07186039491,0.0715738615869,0.0714576263709,0.0714792515274,0.0715360175631,0.0714751968105,0.0713832898956,0.0712629999628,0.0711197333013,0.0710805377052,0.0710562094042,0.070846715701,0.0707426446355,0.0706466830038,0.070376368548,0.070046584912,0.0698979119614,0.0700938899418,0.0698438490702,0.0697992471851,0.0698384427811,0.0700033345991,0.0697127465592,0.0699587327139,0.0699371075575,0.0698925056723,0.0700154987496,0.0696384100839,0.0697424811494,0.0698681773713,0.0696208396443,0.0695113622897,0.0696789572523,0.0694816276996,0.0695870503373,0.0694383773867,0.0692518604122,0.0690896717388,0.0691518440636,0.0688572013069,0.0688112478494,0.0687936774098,0.0687247472235,0.0685314723877,0.0683354944073,0.06853282396,0.0685828321343,0.0686909579166,0.0685395818214,0.0686206761581,0.0687923258375,0.0688936937584,0.068993710107,0.0691937428042,0.0691112968952,0.0690099289743,0.0690207415526,0.0690193899803,0.0688396308672,0.0687477239523,0.0686490591759,0.0684976830807,0.0682435874924,0.0679273195792,0.068261157932,0.0683625258529,0.0682962988112,0.0684030730212,0.0685449881105,0.0686166214413,0.0685639101224,0.0686368950254,0.0686801453384,0.0689518113664,0.0687504270968,0.0686693327601,0.0685801289897,0.0684355107559,0.0684368623282,0.068276025227,0.0682571032151,0.0679989529099,0.0681246491318,0.067989491904,0.0679719214644,0.067931374296,0.0679435384465,0.0680678830961,0.0681124849813,0.068120594415,0.0681232975596,0.0682706189379,0.0682638610765,0.0682246654805,0.0681165396982,0.0680543673733,0.0680651799516,0.0681597900111,0.0683598227083,0.0685949962848,0.0685314723877,0.0685395818214,0.0683733384311,0.0684882220748,0.0686098635799,0.0687342082295,0.0686842000552,0.0685341755323,0.0683327912627,0.0680935629694,0.0682800799439,0.0684693000629,0.0685612069778,0.0684584874847,0.0684476749064,0.0683665805697,0.0684395654728,0.0684571359124,0.0685098472312,0.0685193082372,0.0685301208154,0.0684030730212,0.0685558006887,0.0686423013146,0.0684720032074,0.0684598390569,0.0684949799362,0.0685666132669,0.0683800962925,0.0686044572907,0.0684301044668,0.0684801126411,0.0684936283639,0.0684909252193,0.0686869031997,0.0686760906215,0.0687585365305,0.0686409497423,0.0688112478494,0.068605808863,0.0687531302414,0.0685936447125,0.0684422686173,0.0684206434609,0.0682733220825,0.0682638610765,0.0681733057339,0.0683125176786,0.0683571195638,0.0684949799362,0.0682922440944,0.0683936120153,0.0684584874847,0.0684057761658,0.0684733547797,0.0685355271045,0.068581480562,0.0686355434532,0.0684868705025,0.0686139182967,0.0688788264633,0.0689869522456,0.0689477566495,0.0689774912396,0.0691748207923,0.0692856497192,0.0694613541154,0.0694343226698,0.069619488072,0.0695221748679,0.0695397453076,0.0696181364997,0.0697641063058,0.06999792831,0.0699871157318,0.0700154987496,0.0699898188763,0.0700398270506,0.0700087408882,0.0700965930864,0.070138491827,0.0700952415141,0.070089835225,0.0699803578704,0.0701128119537,0.0701371402547,0.0700411786229,0.0700709132131,0.0700425301952,0.06999792831,0.0701195698151,0.0702303987419,0.0702222893083,0.0701222729596,0.0699060213951,0.0697735673118,0.0699506232803,0.0699938735932,0.0700857805081,0.0630913939662,0.055925357745,0.0487674309574,0.0417946695719,0.0)
ycorr <- c(8.06972015579e-05,8.05986254911e-05,8.03084700701e-05,7.98331286896e-05,7.91645853878e-05,7.82957319823e-05,7.72241158341e-05,7.61718994709e-05,7.51321289012e-05,7.40983334426e-05,7.30642615659e-05,7.20272205455e-05,7.09884253517e-05,6.99363196279e-05,6.88610481166e-05,6.77668907061e-05,6.66541300609e-05,6.55286025214e-05,6.4390990325e-05,6.32549581243e-05,6.21170201942e-05,6.09794582357e-05,5.9849501071e-05,5.87289429819e-05,5.7624183208e-05,5.65352452221e-05,5.54610564991e-05,5.44014060346e-05,5.33554748786e-05,5.23156490555e-05,5.12782978555e-05,5.02476063181e-05,4.92131710235e-05,4.81732949575e-05,4.71264713836e-05,4.60679727296e-05,4.49997140373e-05,4.39214947081e-05,4.28325525149e-05,4.17302919206e-05,4.06228574498e-05,3.95091616403e-05,3.83820955883e-05,3.7248984728e-05,3.61026727096e-05,3.49507187692e-05,3.37947491416e-05,3.26331315283e-05,3.14643211596e-05,3.02832965147e-05,2.90906079813e-05,2.78778687806e-05,2.66509451692e-05,2.54108824017e-05,2.41633500796e-05,2.29049045104e-05,2.16289889114e-05,2.033783369e-05,1.90326213262e-05,1.77187402941e-05,1.63975524643e-05,1.50719711665e-05,1.37443036511e-05,1.24092552449e-05,1.10668108434e-05,9.71828697349e-06,8.36277413238e-06,6.99765915233e-06,5.62533310962e-06,4.24320711184e-06,2.84569443782e-06,1.44037761991e-06,2.22983293253e-08,-1.40374582769e-06,-2.83515294104e-06,-4.27626989532e-06,-5.72479808166e-06,-7.17713649135e-06,-8.63313189218e-06,-1.00940682076e-05,-1.15557952231e-05,-1.30203980103e-05,-1.44885211103e-05,-1.59591190905e-05,-1.74410543064e-05,-1.89309817148e-05,-2.04222248621e-05,-2.19208968198e-05,-2.34252278758e-05,-2.49314131288e-05,-2.64373729295e-05,-2.79446659933e-05,-2.94532241965e-05,-3.09651621472e-05,-3.24741017543e-05,-3.39784741875e-05,-3.5483391333e-05,-3.69866774094e-05,-3.84854329873e-05,-3.99735962472e-05,-4.14564612061e-05,-4.2937245663e-05,-4.44128972696e-05,-4.58860944318e-05,-4.73574462839e-05,-4.88261163411e-05,-5.02944394334e-05,-5.17604426799e-05,-5.32286686175e-05,-5.47053178828e-05,-5.61901172354e-05,-5.76900173949e-05,-5.91960688052e-05,-6.07123157067e-05,-6.22325074006e-05,-6.37606909764e-05,-6.52968580989e-05,-6.68351589738e-05,-6.83787565115e-05,-6.99289104749e-05,-7.14859618446e-05,-7.30440672292e-05,-7.45994954774e-05,-7.61540576491e-05,-7.77053062426e-05,-7.9250281301e-05,-8.07854557944e-05,-8.23171524144e-05,-8.38445915091e-05,-8.53672127465e-05,-8.68760123879e-05,-8.83711557589e-05,-8.98630684859e-05,-9.13452661492e-05,-9.28188349562e-05,-9.42865348299e-05,-9.57499955891e-05,-9.72031090417e-05,-9.86477389547e-05,-0.000100077862365,-0.000101505450843,-0.000102929369038,-0.000104348898734,-0.000105767356823,-0.000107190531003,-0.000108619789958,-0.000110052873293,-0.000111498885186,-0.000112956155139,-0.000114426518495,-0.000115906636499,-0.000117393253009,-0.000118886885257,-0.000120386924646,-0.000121888473772,-0.000123387855676,-0.000124887256877,-0.000126385642143,-0.000127878664681,-0.000129372351857,-0.000130861908745,-0.000132349527464,-0.000133829748867,-0.000135303359781,-0.000136765439201,-0.000138223789081,-0.000139680748628,-0.000141130450497,-0.000142573001272,-0.000144004407368,-0.000145424751473,-0.000146837598964,-0.00014825053632,-0.000149661438575,-0.000151077668098,-0.000152499384776,-0.000153919295408,-0.000155340581172,-0.000156766048105,-0.000158196913406,-0.000159633928922,-0.000161070936935,-0.000162499746156,-0.000163921337501,-0.000165335480715,-0.000166735421206,-0.000168129207469,-0.000169514493907,-0.000170887460937,-0.000172250964369,-0.000173607511866,-0.000174954047249,-0.000176301050332,-0.000177648707193,-0.000178996566278,-0.000180342439725,-0.000181680742209,-0.000183011960331,-0.000184338121394,-0.000185658702987,-0.000186976809624,-0.000188296441041,-0.000189623247225,-0.000190954509628,-0.000192290343824,-0.000193637787872,-0.000194997827603,-0.000196375078928,-0.00019776688826,-0.00019917091393,-0.000200582953728,-0.000201999801201,-0.000203411534733,-0.000204817187459,-0.000206217965426,-0.000207610877826,-0.000208989834984,-0.000210351879786,-0.000211703445873,-0.000213041363129,-0.000214364970073,-0.000215677938671,-0.000216980819435,-0.000218280544327,-0.000219573822429,-0.000220859106536,-0.000222145300264,-0.000223437950873,-0.000224733729451,-0.000226038903007,-0.000227356106525,-0.000228686356346,-0.000230027559767,-0.000231380263319,-0.000232739301523,-0.000234105658764,-0.000235481033379,-0.000236859747494,-0.000238238616103,-0.000239620093996,-0.00024099041873,-0.000242355380376,-0.000243717555095,-0.000245074473644,-0.000246426060329,-0.000247779532811,-0.000249132942633,-0.000250480537379,-0.000251824478133,-0.00025316173572,-0.000254500063349,-0.00025584070521,-0.00025717939089,-0.000258516868155,-0.000259859302141,-0.00026120300117,-0.000262538743542,-0.00026387731875,-0.000265228511065,-0.000266587535852,-0.000267958733804,-0.000269334494585,-0.00027071475881,-0.000272096323105,-0.000273481091726,-0.000274868210039,-0.000276264660106,-0.000277664962359,-0.0002790567834,-0.000280439485808,-0.000281815930881,-0.000283182116174,-0.000284539969,-0.000285891371784,-0.000287237685071,-0.000288576346488,-0.000289909202725,-0.00029124290715,-0.000292581243048,-0.000293929018325,-0.000295280580885,-0.000296632942788,-0.000297983912476,-0.000299330372115,-0.000300666336533,-0.000301981479121,-0.000303262229544,-0.000304496168584,-0.000305668767457,-0.000306776332527,-0.000307809699057,-0.000308769669352,-0.000309662263359,-0.000310487344642,-0.000311252413163,-0.000311966359889,-0.000312647567092,-0.000313309454513,-0.000313966271289,-0.000314633218949,-0.000315317591878,-0.000316035526445,-0.000316786857542,-0.000317575916237,-0.000318404088828,-0.000319270461408,-0.000320167825573,-0.000321093140645,-0.000322043401597,-0.000323001545027,-0.000323967583282,-0.000324938509608,-0.000325911354329,-0.000326878728619,-0.000327836771926,-0.000328782201175,-0.000329718638894,-0.00033065100224,-0.000331576213096,-0.000332501971454,-0.00033343348784,-0.000334361451862,-0.000335285321638,-0.000336205220615,-0.000337127345018,-0.000338053647492,-0.000338989673808,-0.000339926265327,-0.00034086089448,-0.000341789075903,-0.000342712091195,-0.000343631594007,-0.000344551344835,-0.0003454765606,-0.000346406398442,-0.000347341679581,-0.000348278992436,-0.000349213463951,-0.000350149876444,-0.000351092945838,-0.000352039904661,-0.000352990476693,-0.000353943858099,-0.000354896968749,-0.000355844521283,-0.000356787453938,-0.000357722160267,-0.000358645141677,-0.000359564541787,-0.000360478901263,-0.000361386096854,-0.000362289212212,-0.000363182147959,-0.000364068498272,-0.000364950062943,-0.000365825807605,-0.000366693907619,-0.000367563682091,-0.000368432111777,-0.000369295552146,-0.000370154165239,-0.000371006822328,-0.00037185670158,-0.000372703185349,-0.000373542374663,-0.000374376024547,-0.000375208636898,-0.000376036379656,-0.000376857799409,-0.00037767675831,-0.000378494788223,-0.000379310222723,-0.000380121278056,-0.000380923076427,-0.000381720252021,-0.00038251694865,-0.000383305569774,-0.000384085178348,-0.000384855504084,-0.00038561396765,-0.000386358932947,-0.000387083625144,-0.000387797549229,-0.000388509368449,-0.000389215248394,-0.000389911786335,-0.000390602281284,-0.000391288978962,-0.000391971069907,-0.000392649743479,-0.000393323953386,-0.000394000808893,-0.000394676436887,-0.000395340649692,-0.000395989741851,-0.000396631650652,-0.000397267585474,-0.000397894659478,-0.000398513055606,-0.000399123746209,-0.00039972573912,-0.00040031831452,-0.000400896572484,-0.000401467433805,-0.000402031320476,-0.000402582463462,-0.000403115206306,-0.000403630160727,-0.000404132759513,-0.000404615931011,-0.000405083468212,-0.000405539223031,-0.00040598643846,-0.000406420326649,-0.000406847509442,-0.000407267262812,-0.000407681520373,-0.000408093905077,-0.000408495801214,-0.000408888882024,-0.00040928178816,-0.000409667098124,-0.000410040428017,-0.000410403586037,-0.000410757308011,-0.000411096989362,-0.000411422074065,-0.000411732839593,-0.000412027017383,-0.000412312444892,-0.000412575606262,-0.000412815771564,-0.000413037292988,-0.000413239941921,-0.000413416901237,-0.000413572824058,-0.000413709410674,-0.000413829175026,-0.000413935525483,-0.000414028472844,-0.000414109459655,-0.000414187402467,-0.000414262219196,-0.000414334534641,-0.000414407371364,-0.000414476571306,-0.000414540622523,-0.000414596006034,-0.000414641642947,-0.000414669205585,-0.000414680618768,-0.0004146714223,-0.000414637418168,-0.000414574808525,-0.000414479022629,-0.000414357877235,-0.000414215336463,-0.000414050360368,-0.000413863933575,-0.000413659488449,-0.0004134419436,-0.000413208198346,-0.000412957911102,-0.000412691854885,-0.000412415566589,-0.00041212639647,-0.000411816130066,-0.000411484235703,-0.000411129046708,-0.000410750190013,-0.000410342133069,-0.000409907848874,-0.000409447211628,-0.000408964911277,-0.000408458970427,-0.00040792763218,-0.000407376508224,-0.000406802666643,-0.000406211777215,-0.000405605169178,-0.000404979495837,-0.00040433652532,-0.000403677877087,-0.000403004985943,-0.000402310509792,-0.000401595369418,-0.000400856060237,-0.000400095542641,-0.000399316815765,-0.000398520082443,-0.000397712249499,-0.000396888213337,-0.000396046581128,-0.000395178011512,-0.000394288507887,-0.000393381810911,-0.00039246076638,-0.000391524013454,-0.000390564493364,-0.000389575949678,-0.000388549912847,-0.000387489155218,-0.000386402552399,-0.000385292288099,-0.00038416081106,-0.000383002749752,-0.00038181495381,-0.000380597866981,-0.000379355400617,-0.000378093497243,-0.000376817030787,-0.000375528083399,-0.000374215991922,-0.000372882391501,-0.000371527228556,-0.00037015135694,-0.000368756333152,-0.00036734360023,-0.000365909846568,-0.000364449693938,-0.000362965354699,-0.000361452132499,-0.00035991483504,-0.000358356923962,-0.000356774487767,-0.000355167120673,-0.000353534052759,-0.000351877484916,-0.000350195744368,-0.000348493351994,-0.000346769506029,-0.000345025374812,-0.000343258376175,-0.000341463635102,-0.00033963989304,-0.000337782804258,-0.00033589503384,-0.00033397737286,-0.000332030965381,-0.000330059268215,-0.000328059059818,-0.000326029443124,-0.000323967785952,-0.000321880087159,-0.000319765936898,-0.000317630793488,-0.000315477967666,-0.000313305060826,-0.000311114788046,-0.00030889955592,-0.000306662238803,-0.0003044055392,-0.00030213598691,-0.00029984953833,-0.000297546415681,-0.000295230789025,-0.000292897517551,-0.000290548111294,-0.000288178621831,-0.000285789244767,-0.000283378125794,-0.000280940851641,-0.000278474756772,-0.000275979489916,-0.000273459545348,-0.000270912349505,-0.000268334345201,-0.000265723370548,-0.000263076914263,-0.000260397835626,-0.000257687047455,-0.00025494870072,-0.00025218311975,-0.000249388519409,-0.000246561760397,-0.000243703072107,-0.000240817464458,-0.000237905829463,-0.000234972872889,-0.000232018307085,-0.000229043175319,-0.000226050076093,-0.000223040367595,-0.00022001348318,-0.000216967972394,-0.000213902655787,-0.00021081299855,-0.000207698676494,-0.000204560083697,-0.000201396073608,-0.000198088403742,-0.000194519313315,-0.000190589613284,-0.000186229904737,-0.000180798462899,-0.000176484003593,-0.000172604196917,-0.000169082114826,-0.000165814624476,-0.000162676174533,-0.000159540460142,-0.00015652293356,-0.000153741641404,-0.000151295095033,-0.000149249544423,-0.000148252867413,-0.000146110792969,-0.0001435074283,-0.000140518973482,-0.000137244532014,-0.000133808066036,-0.000130337128466,-0.000126836626872,-0.000123300278281,-0.000119727854937,-0.000116122479101,-0.000112482540692,-0.000108817122676,-0.00010512725461,-0.000101419788378,-9.76997961862e-05,-9.39651762156e-05,-9.02132245092e-05,-8.64458790024e-05,-8.266696325e-05,-7.8873266013e-05,-7.50676301512e-05,-7.12459100284e-05,-6.74106253125e-05,-6.35597162476e-05,-5.96908630673e-05,-5.58026960305e-05,-5.18971104763e-05,-4.7976954391e-05,-4.40404052764e-05,-4.00880289691e-05,-3.61171120627e-05,-3.21232077092e-05,-2.81065631597e-05,-2.40697164208e-05,-2.00122233405e-05,-1.5934615597e-05,-1.18405046121e-05,-7.72819284135e-06,-3.59561844709e-06,5.56727247529e-07,4.72811596431e-06,8.91365403239e-06,1.31125058812e-05,1.73243172537e-05,2.15584939877e-05,2.58092927002e-05,3.00808818466e-05,3.43711888332e-05,3.86743415124e-05,4.29864669581e-05,4.73091388589e-05,5.16431651978e-05,5.59934626246e-05,6.0361127193e-05,6.47415642386e-05,6.91292205397e-05,7.35307866014e-05,7.79467094354e-05,8.23845542714e-05,8.68483245004e-05,9.13373780511e-05,9.58531714532e-05,0.000100390697578,0.000104947210649,0.000109519759388,0.000114113226574,0.000118720509973,0.000123333513528,0.000127953676354,0.000132580367226,0.000137214017598,0.000141856547811,0.000146503738158,0.000151159305397,0.000155825691109,0.000160501486796,0.00016518535397,0.000169884941376,0.000174597395433,0.000179318649478,0.00018404511539,0.000188773541707,0.000193506337691,0.000198242233409,0.000202978247516,0.000207716627079,0.000212464123081,0.000217220535686,0.000221988770087,0.000226770486251,0.000231565339868,0.000236372674848,0.000241192220061,0.000246025146019,0.000250870060836,0.000255722966236,0.000260572626954,0.000265414572141,0.000270246087295,0.000275063249552,0.000279870843936,0.000284663276386,0.00028944249685,0.000294207290985,0.000298954602019,0.000303689425156,0.000308419165306,0.000313144339467,0.000317864695164,0.000322582419831,0.0003272949163,0.000332002338363,0.000336709299019,0.000341412121451,0.000346107766669,0.000350796572501,0.000355473869602,0.000360141857899,0.000364802371153,0.000369454700125,0.00037410161231,0.000378746175828,0.000383384462012,0.000388014653003,0.000392647956257,0.000397280417434,0.000401908897692,0.000406531622077,0.00041114315631,0.000415743759091,0.000420327981815,0.000424892088108,0.000429435415076,0.000433961765717,0.000438465661764,0.000442940748878,0.000447396265971,0.000451830756924,0.00045624495064,0.00046063737879,0.000465010407303,0.000469370501568,0.000473714411643,0.000478037462979,0.000482336961501,0.00048662087635,0.000490883032332,0.000495126041931,0.000499356474113,0.000503574586845,0.000507776623134,0.000511954224289,0.000516104462811,0.000520229148371,0.000524332680115,0.00052841209027,0.000532467253783,0.000536496830734,0.000540489745843,0.000544445412716,0.00054836421053,0.000552253845778,0.000556118695608,0.00055995915532,0.000563772204929,0.000567558341642,0.000571313880151,0.000575037509519,0.00057873322622,0.000582406369389,0.000586051258625,0.000589662320245,0.00059323496409,0.000596769728836,0.00060026601925,0.000603723886752,0.00060714625755,0.000610533384507,0.000613883308887,0.000617192173217,0.000620458801875,0.00062368419958,0.000626874897845,0.000630033296919,0.00063315666704,0.000636246196732,0.000639295787448,0.0006423064901,0.000645282647881,0.000648221082105,0.000651126384225,0.000653998591201,0.000656837645539,0.000659634057556,0.000662388987319,0.000665103046291,0.000667777627339,0.000670419809697,0.000673024327347,0.00067559062052,0.000678123600166,0.000680618552184,0.000683072738472,0.00068548731878,0.000687869379545,0.000690211500304,0.000692515576712,0.00069477270515,0.000696980265605,0.000699141372071,0.000701252977562,0.000703320263423,0.000705346938474,0.000707339590342,0.000709290405637,0.00071120192178,0.000713080833998,0.000714923519666,0.000716735179114,0.000718514267761,0.000720252949633,0.000721948686772,0.000723593793168,0.00072518332197,0.000726714972375,0.000728194713549,0.000729619263394,0.000730988866708,0.000732303519333,0.000733564518338,0.000734776170882,0.000735945606165,0.000737073977489,0.000738165138914,0.000739223243579,0.000740246754562,0.000741231599142,0.000742179271767,0.000743090825506,0.000743965218507,0.000744803144486,0.000745599590362,0.000746354892161,0.000747073433781,0.000747749415868,0.000748384138126,0.000748975190819,0.000749524819694,0.000750032862399,0.000750496867938,0.000750921271128,0.000751302245834,0.000751641239053,0.000751932125584,0.000752174779872,0.000752367420839,0.000752511081706,0.000752606307656,0.000752653378727,0.00075264786105,0.00075258327538,0.000752462274319,0.000752284630716,0.000752052187944,0.000751767590552,0.00075143316046,0.000751047822084,0.000750613273719,0.000750124661833,0.000749589163514,0.000749011321632,0.000748393069154,0.000747735808608,0.000747037947595,0.000746297816669,0.000745514544529,0.000744687213148,0.000743813538234,0.000742895907687,0.000741935988673,0.000740923944058,0.000739858092101,0.000738739446307,0.000737562871073,0.000736333354132,0.000735053304204,0.000733720790925,0.000732331630257,0.000730884398922,0.000729368145619,0.000727789132903,0.000726145327866,0.000724432231709,0.000722650674377,0.000720796223894,0.000718857281454,0.000716834098523,0.000714731448406,0.00071254988057,0.000710295390146,0.000707975353742,0.000705591252825,0.000703148503322,0.000700652290932,0.000698105031547,0.000695513897041,0.000692888006597,0.000690226303797,0.000687526954769,0.0006847928804,0.000682024722756,0.000679218808556,0.000676369995131,0.000673474498975,0.000670534042236,0.000667546560074,0.000664511048308,0.00066142456468,0.000658291993912,0.00065511227422,0.000651881181008,0.000648602535266,0.000645281276122,0.000641924969881,0.000638533972934,0.000635114433191,0.00063166695155,0.000628198449951,0.000624708701408,0.000621197855525,0.000617666777926,0.000614119192967,0.000610552686243,0.000606965165014,0.000603356673705,0.000599726342734,0.000596066367439,0.000592373233882,0.000588644289342,0.000584883973468,0.00058108609935,0.000577253753299,0.000573387416314,0.000569484136077,0.000565541380635,0.000561552976889,0.000557527152015,0.000553463558799,0.000549366255732,0.000545230231511,0.000541064557111,0.000536871268495,0.000532643012109,0.000528385645156,0.000524101425465,0.000519796043883,0.000515469722098,0.00051112221797,0.000506755171544,0.000502368929483,0.000497962624438,0.000493526242179,0.000489069355489,0.000484591582724,0.000480085768957,0.000475554124522,0.000470990481141,0.000466398155878,0.000461775783986,0.000457124128935,0.000452441474786,0.000447725338949,0.000442978370499,0.000438194233179,0.000433380892569,0.000428537955801,0.000423670916898,0.000418782332925,0.000413871828643,0.000408935600075,0.000403978294255,0.000399006446236,0.000394023477339,0.000389027132224,0.000384018610122,0.000378997322795,0.000373964311453,0.000368919612552,0.000363859490553,0.00035878822778,0.000353708221191,0.000348619853326,0.000343515568595,0.000338397967446,0.000333269620014,0.000328128332399,0.000322973367493,0.000317806338775,0.000312627736336,0.000307441265421,0.000302244508083,0.000297038295253,0.000291817362123,0.00028658709732,0.000281350962122,0.000276108451338,0.000270862538637,0.000265607693798,0.000260343603264,0.000255071068271,0.000249788729634,0.000244493777783,0.000239189701574,0.000233883511,0.000228572266524,0.000223256416991,0.000217937093141,0.000212616411291,0.000207301529032,0.000201990811066,0.000196678112531,0.000191369269962,0.000186066188583,0.000180764887647,0.000175459205547,0.000170149853146,0.000164835811614,0.000159518523653,0.000154195751616,0.000148867709851,0.000143543675213,0.000138225118451,0.000132913973625,0.000127612412099,0.000122324907472,0.000117054314627,0.000111803702917,0.000106567648556,0.000101344448551,9.61359843342e-05,9.09409349469e-05,8.57539341128e-05,8.0573854477e-05,7.53997310214e-05,7.02264810493e-05,6.50565061568e-05,5.98862595594e-05,5.47201198966e-05,4.95645843701e-05,4.44181126377e-05,3.92771571062e-05,3.41458693279e-05,2.90263797492e-05,2.39192044445e-05,1.88293457419e-05,1.37576592237e-05,8.70153271574e-06,3.66013886298e-06,-1.37055735195e-06,-6.38819135029e-06,-1.13862219798e-05,-1.63669528739e-05,-2.13335826882e-05,-2.62839246697e-05,-3.12204959492e-05,-3.61473958769e-05,-4.10617056253e-05,-4.59610846402e-05,-5.08391873956e-05,-5.56960716674e-05,-6.05339108278e-05,-6.53532675737e-05,-7.01479170759e-05,-7.49166598564e-05,-7.96621602462e-05,-8.43789844263e-05,-8.9067009444e-05,-9.37225476815e-05,-9.83525139131e-05,-0.000102960662701,-0.000107546824523,-0.000112112741442,-0.000116658343078,-0.000121183547277,-0.000125686355448,-0.000130162986023,-0.000134615887623,-0.000139048034867,-0.000143459725301,-0.000147843195178,-0.000152196207027,-0.000156512738087,-0.000160792003688,-0.000165042858015,-0.000169265134991,-0.000173462445681,-0.000177635955135,-0.000181780435336,-0.000185894161344,-0.000189979868303,-0.000194041081422,-0.000198079804153,-0.000202105847792,-0.000206114893357,-0.000210099256793,-0.000214057840048,-0.000217990112978,-0.000221898968327,-0.000225785992846,-0.000229648104199,-0.000233486240602,-0.000237298941317,-0.000241083396363,-0.000244835916478,-0.000248558729677,-0.000252258073278,-0.000255933948098,-0.000259584218878,-0.000263204821821,-0.000266798563273,-0.000270365877048,-0.000273905823645,-0.000277412594122,-0.000280885404881,-0.000284322090577,-0.000287722990767,-0.000291084210681,-0.000294409980953,-0.000297702388764,-0.000300966543542,-0.000304200022566,-0.000307403471814,-0.000310573935334,-0.000313717263658,-0.000316834427497,-0.000319927486886,-0.000322993366419,-0.000326033416797,-0.000329039483018,-0.000332008414342,-0.000334936827725,-0.000337825583251,-0.000340680583325,-0.000343505560957,-0.000346300776471,-0.000349064744902,-0.000351796151975,-0.000354492812162,-0.000357160543345,-0.000359804592656,-0.000362429830154,-0.000365036480745,-0.000367625537052,-0.000370191648383,-0.000372739215967,-0.000375266382764,-0.000377772046999,-0.000380258038508,-0.000382728611174,-0.000385175733549,-0.00038759690045,-0.000389985413954,-0.000392340375986,-0.000394660814503,-0.000396938466957,-0.000399167322806,-0.000401350987649,-0.000403489294529,-0.000405581221467,-0.000407627752061,-0.000409625660869,-0.000411581243945,-0.000413493820427,-0.000415364727738,-0.000417197884224,-0.000419006687337,-0.000420785828187,-0.000422536276663,-0.000424255455448,-0.000425940666591,-0.000427597770907,-0.000429226378142,-0.000430826808515,-0.000432406257392,-0.000433965038312,-0.000435494798532,-0.00043700337648,-0.000438490616255,-0.000439957985209,-0.000441283879798,-0.00044234508541,-0.000443141297053,-0.000443669565459,-0.000443937345316)
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(264)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Oryctolagus_cuniculus-male-liver-H3K27Ac-ERR572126.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) : 264',bty='n')
dev.off()