# R script for Peak Model
#  -- generated by MACS
p <- c(0.0292372596837,0.0343089563305,0.0390377777111,0.0439380367248,0.0488740119121,0.0486239986971,0.0486311419318,0.0489883036675,0.0486168554624,0.0487668633914,0.0487597201566,0.0485239934111,0.0488097227996,0.0489454442592,0.0492168871783,0.0499169241803,0.0501955103341,0.0506526773558,0.0508312582236,0.0505312423657,0.0507383961724,0.0507026799988,0.0507669691112,0.0506669638252,0.0503669479672,0.049974070058,0.0499312106497,0.0494883300974,0.0494669003933,0.0496026218529,0.0493311789337,0.049424040985,0.0493597518726,0.0497097703736,0.0494311842197,0.0492383168825,0.0494097545156,0.0495597624446,0.0496740542,0.0497454865471,0.0498454918331,0.050324088559,0.0506026747128,0.0504098073755,0.0509598364485,0.0513741440619,0.0510598417345,0.0512884252453,0.0512455658371,0.0511884199593,0.051345571123,0.0512098496635,0.0507669691112,0.0505455288351,0.050424093845,0.0503598047325,0.0502669426813,0.0499312106497,0.0501312212217,0.0506098179475,0.0503669479672,0.049974070058,0.0503455182631,0.0504455235491,0.0504955261921,0.0506455341211,0.0508598311625,0.0513241414189,0.051345571123,0.0507312529377,0.0507455394071,0.0502526562118,0.0501812238647,0.0503883776714,0.0508098285195,0.0506169611822,0.0506312476517,0.0502383697424,0.0502383697424,0.0505455288351,0.0511884199593,0.0521313269416,0.0517670219712,0.0520384648903,0.0518598840224,0.0520313216556,0.0520241784209,0.0521098972374,0.0520884675333,0.051945602839,0.0514384331743,0.051345571123,0.0519027434307,0.0517598787364,0.0515884411033,0.0517598787364,0.0516098708075,0.051545581695,0.0515741546339,0.051895600196,0.0522599051664,0.0522527619317,0.0519598893084,0.0517598787364,0.0518241678489,0.05179559491,0.0519313163696,0.0519027434307,0.0518313110836,0.0518884569613,0.0519598893084,0.0522170457581,0.0525813507285,0.0528670801171,0.0529385124642,0.0528242207088,0.0528313639435,0.0533313903735,0.0535885468232,0.0533242471388,0.0530456609849,0.0526599263104,0.052595637198,0.0527527883617,0.052545634555,0.0524313427995,0.0527099289534,0.0526599263104,0.0528170774741,0.0530313745155,0.0536099765273,0.0539099923853,0.0539599950283,0.0540742867837,0.054367159407,0.0544600214583,0.054467164693,0.0545243105707,0.0546028861526,0.0546528887956,0.054567169979,0.0543028702946,0.0545528835096,0.0543600161723,0.054517167336,0.0545100241013,0.0545600267443,0.0549600478882,0.0548743290717,0.0551029125825,0.0554315013794,0.0558815251663,0.0560101033912,0.0564315542393,0.0562458301367,0.0563529786574,0.0566744242196,0.0565172730559,0.0568744347916,0.0569458671387,0.0566172783419,0.056388694831,0.0565815621683,0.0563172624839,0.0569672968428,0.0572673127008,0.056888721261,0.0568815780263,0.056638708046,0.0566672809849,0.05703872919,0.0577601958961,0.0572458829967,0.057338745048,0.05703872919,0.0572173100578,0.0578030553044,0.0577673391308,0.0578244850085,0.0580530685193,0.0577887688349,0.0575673285588,0.0576744770795,0.0576959067836,0.0575887582629,0.0575887582629,0.0572601694661,0.0572173100578,0.0576387609059,0.0578030553044,0.0577744823655,0.0578959173556,0.0580744982235,0.0579602064681,0.0579959226416,0.0579316335292,0.0579673497028,0.05816021704,0.05816021704,0.0576530473754,0.0575387556199,0.0575816150282,0.0571530209454,0.0576030447324,0.0577387661919,0.0574387503339,0.0574316070992,0.0574744665075,0.0573601747521,0.0577459094266,0.0581316441012,0.0577673391308,0.0583673708467,0.0582316493872,0.0586459570006,0.0588888269809,0.059260275186,0.059310277829,0.0594031398803,0.0589316863891,0.058760248756,0.058960259328,0.0590816943181,0.0591031240223,0.0589816890321,0.059260275186,0.0592531319513,0.0594174263497,0.0594031398803,0.0603889062708,0.0606389194857,0.0605460574345,0.0604389089138,0.0603960495055,0.0602388983418,0.0603389036278,0.0602603280459,0.0602174686376,0.0599174527796,0.0596531530952,0.059310277829,0.0596245801564,0.0598888798408,0.0598460204325,0.0601746092293,0.0602246118723,0.0604531953832,0.0605246277303,0.0608389300577,0.0606960653635,0.0608960759354,0.0610960865074,0.0609460785784,0.0611460891504,0.0613889591307,0.0611460891504,0.0610389406297,0.0611246594463,0.0613175267836,0.0612103782629,0.0614675347125,0.0613389564877,0.0615103941208,0.0617604073358,0.0619389882037,0.0618461261524,0.0618461261524,0.0620675664285,0.0623675822865,0.0622961499394,0.0620889961327,0.0621175690715,0.0623104364088,0.0626175955015,0.0627890331346,0.0634104945547,0.0639462371582,0.0638605183417,0.063653364535,0.0644962662312,0.0651534438249,0.0654177435093,0.0657820484797,0.0658534808268,0.065774905245,0.0659892022864,0.0661892128584,0.0664749422469,0.0666963825231,0.0664606557775,0.066374936961,0.0671535495448,0.0673178439432,0.0673107007085,0.0670678307282,0.0670106848505,0.0675249977499,0.0680107377104,0.0686679153041,0.0693393793672,0.069717970807,0.0700965622469,0.0705608725033,0.0711394745151,0.0722252461916,0.0731752964085,0.0733324475722,0.0733824502152,0.0741539195643,0.0745539407083,0.0752825506491,0.0755682800377,0.0760468767635,0.076432611438,0.0767969164084,0.0771469349094,0.0775540992881,0.0781612742388,0.0783898577496,0.0789756029962,0.0797113561717,0.0797970749882,0.0805185416943,0.0810185681243,0.0810971437062,0.0813543001559,0.0817043186568,0.0820829100967,0.0822114883215,0.0824329285977,0.0822186315562,0.0826257959349,0.082125769505,0.0824615015365,0.083097249426,0.0836758514379,0.0834544111617,0.08349727057,0.0834401246923,0.083797286428,0.0843115993274,0.0845401828382,0.0855330924635,0.0860116891893,0.0864259968027,0.0861759835877,0.0866545803135,0.0871903229171,0.087590344061,0.087490338775,0.0877260655206,0.0880189381439,0.0882118054811,0.0886689725028,0.088490391635,0.0894118689131,0.089811890057,0.0907190808657,0.0916334149091,0.0927906189327,0.0932549291891,0.0938478176704,0.0939692526605,0.0939121067828,0.0944335629169,0.094404989978,0.0952407484396,0.095005021694,0.0950335946329,0.0946692896625,0.0948621569997,0.0948478705303,0.0951621728577,0.0956907722265,0.0965265306881,0.0966551089129,0.096826546546,0.0973980053231,0.0981194720292,0.0983909149484,0.0986552146328,0.0993338219306,0.100041002167,0.0999552833507,0.0997052701357,0.1002124398,0.100619604179,0.100341018025,0.10034816126,0.101119630609,0.10134821412,0.101719662325,0.101269638538,0.101755378499,0.102262548163,0.102569707256,0.103355463074,0.104776966783,0.105519863193,0.105884168163,0.107448536566,0.107677120076,0.109020048203,0.109605793449,0.110298687216,0.110970151279,0.11069870836,0.111005867453,0.111105872739,0.111984490609,0.111877342088,0.113005973173,0.113055975816,0.113670294001,0.113977453094,0.115091797709,0.116213285559,0.116741884928,0.117177622246,0.117641932502,0.118206248045,0.118956287689,0.11957774911,0.120099205244,0.120842101654,0.121227836328,0.122056451555,0.122913639721,0.124077986979,0.125285193646,0.126056662995,0.126556689425,0.127699606979,0.128956816289,0.129742572107,0.130985494948,0.131556953725,0.132421285125,0.133371335342,0.133407051516,0.134064229109,0.135114284612,0.135864324257,0.13629291834,0.137235825322,0.137507268241,0.138150159366,0.138850196368,0.139628808951,0.14079315621,0.141928930529,0.142214659918,0.142757545756,0.143807601259,0.144821940588,0.145514834356,0.14615772548,0.147650661535,0.148665000864,0.149415040509,0.150607960706,0.151572297393,0.152715214947,0.15388670544,0.154943904178,0.156772572265,0.158908399444,0.159315563823,0.160615632541,0.162058565953,0.163437210253,0.164337257826,0.166187355617,0.167587429621,0.169316092422,0.170044702363,0.170823314947,0.171559068122,0.172244818655,0.172959142126,0.173566317077,0.175680714552,0.176495043309,0.177287942363,0.178559438142,0.180080947136,0.180559543862,0.182173914907,0.183623991554,0.185166930252,0.186281274867,0.187409905952,0.188617112619,0.190524356287,0.191424403861,0.192395883782,0.193803101021,0.194888872698,0.196310376406,0.198346198299,0.199646267017,0.201603513329,0.20280357676,0.203660764926,0.20469653396,0.206675209975,0.20892532891,0.211289739601,0.213054118575,0.214375616997,0.216082850094,0.216611449462,0.218090099048,0.219383024531,0.221140260271,0.222040307845,0.222476045162,0.22315465246,0.223997554156,0.224476150882,0.225104755537,0.226469113367,0.227454879758,0.227847757667,0.228376357036,0.228433502914,0.229433555774,0.229940725438,0.229905009265,0.229254974906,0.229947868673,0.229947868673,0.228919242874,0.228854953762,0.227419163584,0.226804845399,0.226811988634,0.225511919916,0.224147562085,0.223583246543,0.222297464295,0.219983056247,0.219404454235,0.218118671987,0.217868658772,0.21703290031,0.215032794591,0.213511285597,0.21254694891,0.211632614867,0.210082532934,0.20893961538,0.208096713683,0.206889507017,0.205053695695,0.203567902875,0.201924958891,0.201417789226,0.200653463112,0.199281962047,0.197767596287,0.197324715735,0.195503190883,0.19445313538,0.193245928713,0.192238732619,0.19095295037,0.189988613684,0.188009937668,0.187181322441,0.18684559041,0.185781248437,0.185009779088,0.184388317668,0.183752569779,0.183423980982,0.18360256185,0.182781089858,0.183523986268,0.183488270094,0.183409694512,0.183402551278,0.1833454054,0.183395408043,0.184095445045,0.183645421258,0.183195397471,0.182459644295,0.180759554434,0.178995175459,0.177452236761,0.175094969306,0.173109150055,0.170780455538,0.16773743755,0.165323024217,0.16261573826,0.160701351357,0.158722675341,0.15625111613,0.153600976052,0.151836597077,0.14977934548,0.147572085953,0.145750561101,0.143093277788,0.141193177354,0.138571610214,0.13705010122,0.135692886624,0.134099945283,0.132742730687,0.131056927295,0.129135397157,0.127863901378,0.127821041969,0.126792416171,0.126849562048,0.125513777157,0.124692305165,0.12380654406,0.122777918261,0.122542191516,0.123292231161,0.122956499129,0.121520708952,0.12018492406,0.119056292975,0.118527693607,0.118270537157,0.117927661891,0.11757764339,0.1169418955,0.11532038122,0.114070315145,0.114056028676,0.114056028676,0.112663097907,0.112670241141,0.111641615343,0.110448695145,0.109891522838,0.109155769662,0.108441446191,0.108434302956,0.10746996627,0.10721280982,0.107584258025,0.10684850485,0.106484199879,0.106312762246,0.105477003784,0.105384141733,0.104984120589,0.104241224179,0.103684051871,0.10284829341,0.101562511161,0.100462453015,0.100333874791,0.0994624001554,0.0996195513191,0.0986409281633,0.0980623261515,0.0972479973941,0.0968051168419,0.0963836659938,0.097076559761,0.0970551300569,0.0964050956979,0.0969051221279,0.0958693530944,0.095355040195,0.095305037552,0.0953836131338,0.0952693213784,0.0951907457966,0.0941406902936,0.0936835232719,0.0935049424041,0.0930620618518,0.0927263298203,0.0924620301359,0.0926763271773,0.0923048789722,0.0921477278085,0.0919620037059,0.0916762743174,0.0912048208262,0.090611932345,0.0895761633115,0.0895404471379,0.0894904444949,0.0890832801162,0.088790407493,0.0881189434299,0.0875331981833,0.0872546120295,0.0871474635088,0.0866545803135,0.0871260338046,0.0864902859151,0.0859902594851,0.0850259227988,0.0848902013392,0.0845258963688,0.0841258752248,0.0837615702544,0.0831115358955,0.0830043873748,0.0823186368422,0.0823257800769,0.0817971807081,0.0816686024833,0.0809042763689,0.0810042816549,0.0808685601953,0.0806614063886,0.0807042657969,0.0804399661125,0.0802399555405,0.0798827938048,0.080004228795,0.079704212937,0.0801613799587,0.0796470670593,0.0790256056392,0.0788613112407,0.0786327277299,0.0783469983413,0.0780326960139,0.0777612530948,0.0779112610238,0.0780684121875,0.07713264844,0.0772112240218,0.0774040913591,0.077282656369,0.0768612055209,0.0762968899785,0.0757897203138,0.0754254153434,0.0749182456787,0.0743753598404,0.0741753492685,0.0740324845742,0.0732038693474,0.0727538455604,0.0724252567636,0.0722252461916,0.0723681108859,0.0724966891107,0.0717680791699,0.0715823550673,0.0719538032725,0.0710180395249,0.0714109174342,0.0712751959746,0.0713680580259,0.0712537662705,0.0709823233514,0.0701822810634,0.0702251404717,0.0698465490319,0.0691965146729,0.0691322255605,0.0687036314777,0.0686393423652,0.0680250241798,0.067296414239,0.0670106848505,0.0676035733317,0.0671249766059,0.0671678360142,0.0669178227992,0.0667463851661,0.0662320722667,0.0658820537657,0.0656677567243,0.0660820643377,0.0658391943574,0.0648962873752,0.0654034570399,0.0649820061918,0.0653391679274,0.0653963138052,0.0652677355803,0.0651391573555,0.0655463217341,0.0653534543969,0.0653963138052,0.0655106055606,0.0649962926612,0.0648534279669,0.0642605394857,0.063753369821,0.0640390992095,0.0641962503732,0.063653364535,0.0637676562904,0.0636962239433,0.0634247810241,0.0635176430754,0.0636176483614,0.0637176536474,0.0637105104127,0.0638962345153,0.0634747836671,0.0634962133713,0.0635319295448,0.0636105051267,0.0642105368427,0.0636962239433,0.0636247915961,0.0632604866257,0.0632819163299,0.062953327533,0.0630461895843,0.0629461842983,0.0627318872569,0.0623675822865,0.0621247123062,0.0622032878881,0.0623247228782,0.0622461472964,0.0623461525824,0.0625890225626,0.0622247175922,0.0622032878881,0.0623604390518,0.062603309032,0.0621675717145,0.0624175849295,0.0620247070202,0.0619532746731,0.0618104099788,0.0613603861918,0.0612175214976,0.0612675241406,0.0608889327007,0.0605031980262,0.060431765679,0.0601746092293,0.0600388877698,0.0602174686376,0.0606746356593,0.0607389247717,0.0609889379867,0.0608032138842,0.0608960759354,0.0608175003536,0.0607960706494,0.060981794752,0.0610603703339,0.0608175003536,0.0602817577501,0.0600960336475,0.0602317551071,0.0602103254029,0.0600460310045,0.0600746039434,0.0602174686376,0.0600817471781,0.0601246065863,0.0600531742392,0.0601960389335,0.0600317445351,0.0598174474937,0.0601960389335,0.0599388824838,0.0601388930558,0.0599460257185,0.0597245854424,0.0595817207481,0.059510288401,0.0591745563694,0.0588173946337,0.0583387979079,0.0580673549888,0.0580030658763,0.058360227612,0.0581816467442,0.0582030764483,0.0581673602748,0.0580816414582,0.0579173470598,0.0581816467442,0.0585888111229,0.0582030764483,0.0578173417738,0.0571173047718,0.0566458512807,0.0565101298211,0.0564601271782,0.0565529892294,0.0564672704129,0.0562601166062,0.0555815093083,0.0556100822472,0.0562458301367,0.0558600954622,0.055888668401,0.0557315172373,0.0556672281249,0.0550886261131,0.054867185837,0.0548100399593,0.0547386076121,0.0541957217739,0.0538599897423,0.053867132977,0.0539385653242,0.0539099923853,0.0538099870993,0.0539885679672,0.0542528676516,0.0544028755806,0.0543242999987,0.0548600426023,0.0543743026417,0.0544100188153,0.0541528623656,0.054267154121,0.0539099923853,0.0535528306496,0.0536528359356,0.0534028227206,0.0537885573952,0.0534813983025,0.0536385494662,0.0533885362512,0.0537242682828,0.0536028332926,0.0537957006299,0.0542242947127,0.0538028438646,0.0536956953439,0.0531956689139,0.0535885468232,0.0532456715569,0.0533099606693,0.0530599474544,0.052595637198,0.0525884939633,0.0523099078094,0.0519670325431,0.0517527355017,0.0519384596043,0.0516170140422,0.0520598945944,0.0522027592887,0.0521027540027,0.052195616054,0.0521170404721,0.051845597553,0.0522099025234,0.0522384754623,0.0521527566457,0.0516813031546,0.0515884411033,0.0516098708075,0.0518098813794,0.0519884622473,0.0516027275727,0.05179559491,0.0518527407877,0.0520170351861,0.0517027328587,0.051895600196,0.0518241678489,0.0514598628785,0.0514670061132,0.0512312793676,0.0511812767246,0.0516098708075,0.0515241519909,0.0512027064288,0.0517098760935,0.0517098760935,0.0514670061132,0.0515170087562,0.0514170034702,0.0517741652059,0.0516670166852,0.0514384331743,0.0514884358173,0.0515741546339,0.0513241414189,0.0512098496635,0.0513384278883,0.0509884093874,0.0507455394071,0.0503169453243,0.0507169664682,0.0501669373953,0.0500169294663,0.0502455129771,0.050274085916,0.0502669426813,0.0503026588548,0.0504312370797,0.0509098338055,0.0509241202749,0.0507169664682,0.0510098390915,0.0508884041014,0.0505812450087,0.0506669638252,0.0507098232335,0.0503169453243,0.0502526562118,0.0497597730166,0.0496811974347,0.0495383327404,0.0493883248115,0.0494597571586,0.0495883353834,0.049474043628,0.0493811815767,0.0496383380264,0.0498883512414,0.0497169136083,0.0496954839041,0.0499383538844,0.0499812132927,0.0501526509258,0.0498669215373,0.0496740542,0.0498169188943,0.0498812080067,0.0498669215373,0.0499812132927,0.0499812132927,0.0496954839041,0.0495311895057,0.049474043628,0.0494168977503,0.0497597730166,0.0495597624446,0.0495454759752,0.0498097756596,0.0498169188943,0.0500883618134,0.0502526562118,0.0504669532532,0.0503455182631,0.0506812502947,0.0505026694268,0.0503526614978,0.0502312265077,0.0500169294663,0.0502883723854,0.0498097756596,0.0498097756596,0.0498169188943,0.0495383327404,0.0495954786182,0.0494311842197,0.0496883406694,0.0495026165669,0.0495454759752,0.0494669003933,0.049424040985,0.0493811815767,0.0491383115965,0.0494454706892,0.0491168818923,0.0493883248115,0.0493168924643,0.0495526192099,0.0492168871783,0.0493311789337,0.0493883248115,0.0493097492296,0.049124025127,0.0486954310442,0.0489097280856,0.0487311472178,0.0486740013401,0.0484382745945,0.0484382745945,0.0479953940423,0.0479453913993,0.048102542563,0.0480239669811,0.0484239881251,0.0483454125432,0.0486025689929,0.0484239881251,0.0481811181448,0.0480668263894,0.0479668211034,0.0483096963697,0.0485239934111,0.0487097175136,0.0482954099002,0.0483239828391,0.0477453808273,0.048002537277,0.048302553135,0.0480453966853,0.0480096805117,0.0474953676123,0.0468453332533,0.0467381847326,0.046752471202,0.0466167497425,0.0465238876912,0.0459167127405,0.045730988638,0.0462524447721,0.0463667365275,0.0465667470995,0.0466881820896,0.0466453226813,0.0469810547129,0.0464810282829,0.0469096223658,0.0473382164486,0.0474382217346,0.0472596408667,0.0471310626419,0.0471882085196,0.0468810494269,0.0468239035492,0.0464024527011,0.0469881979476,0.0466024632731,0.0463595932928,0.0461381530167,0.0460381477307,0.0462881609456,0.0461167233125,0.0464595985788,0.0467381847326,0.0468881926616,0.0468096170798,0.0469810547129,0.0469810547129,0.0472167814584,0.0473382164486,0.0473596461527,0.0474096487957,0.0473382164486,0.0475096540817,0.0477168078884,0.047702521419,0.0476453755413,0.0474382217346,0.0474596514387,0.0473310732139,0.0477096646537,0.0481239722671,0.0482954099002,0.047902531991,0.0476739484801,0.0473739326222,0.046902479131,0.047402505561,0.0472739273362,0.0472239246932,0.0465453173953,0.04593099921,0.0456595562908,0.045830993924,0.0458238506893,0.0457452751074,0.0461595827208,0.0459095695058,0.0458595668628,0.0457881345157,0.0457952777504,0.0460095747918,0.0461238665472,0.0462953041804,0.0461381530167,0.0464310256399,0.0461238665472,0.0460810071389,0.0465167444565,0.0466953253243,0.0470882032336,0.0469881979476,0.0472239246932,0.047002484417,0.047202494989,0.0472810705709,0.0472239246932,0.0470953464683,0.0466810388549,0.0464738850482,0.0461381530167,0.0460595774348,0.0456952724644,0.0454666889536,0.0454666889536,0.0453881133717,0.045530978066,0.0458738533322,0.0459024262711,0.0461667259555,0.0462381583027,0.0462738744762,0.0461595827208,0.0465167444565,0.0466667523855,0.0419522174744,0.0375019822476,0.0327445879282,0.0281157718337,0.0)
m <- c(0.0287123871287,0.0334373004009,0.0377850745113,0.0422395861204,0.0468648777272,0.0462458002352,0.0461319469034,0.0457619235748,0.0456836494092,0.045591143577,0.0452282360817,0.044822633587,0.0449862977515,0.0448510969199,0.0446091585897,0.0448510969199,0.0446660852557,0.04458781109,0.044559347757,0.0446589694224,0.0444027994257,0.0447230119216,0.0447301277548,0.0449080235859,0.0449436027521,0.0448012860872,0.0452211202485,0.0457049969089,0.0459327035726,0.0459682827388,0.0461746419028,0.0459753985721,0.0461319469034,0.0463738852336,0.0464521593992,0.0467937193948,0.0464948543987,0.0463027269012,0.0464663910657,0.0463383060674,0.0465375493981,0.0466656343965,0.0468648777272,0.0467225610624,0.0469644993926,0.046829298561,0.0469858468923,0.0472064377228,0.0470570052247,0.0473060593882,0.047626271884,0.0476476193838,0.0474056810536,0.0474910710524,0.0475622293849,0.04768319855,0.0476618510502,0.0476689668835,0.0478539785478,0.0475337660519,0.0470925843909,0.0473914493871,0.0474626077195,0.0475195343854,0.0475551135516,0.0475622293849,0.0475337660519,0.0477899360486,0.0475551135516,0.0477757043821,0.0478041677151,0.0474412602198,0.0471779743898,0.0471210477239,0.0470925843909,0.046800835228,0.0470214260585,0.0465731285643,0.046594476064,0.0468719935605,0.0470143102253,0.0470712368912,0.0476049243843,0.0476476193838,0.0476760827167,0.0483520868746,0.0482026543766,0.04845170854,0.0489284693672,0.0487576893694,0.0486438360375,0.0486367202043,0.0484090135406,0.0485442143722,0.0485370985389,0.0483093918752,0.0484090135406,0.0486438360375,0.0482382335428,0.0482097702098,0.0484445927068,0.0489569327002,0.0492415660298,0.0489427010337,0.0491846393639,0.0488715427013,0.0485869093716,0.0484872877062,0.0487790368691,0.048892890201,0.0487363418697,0.0484374768735,0.0483663185411,0.0487434577029,0.0484161293738,0.0487719210359,0.0495404310259,0.0495760101922,0.0497467901899,0.049661400191,0.0496542843578,0.0498108326891,0.049896222688,0.0500029601866,0.050074118519,0.049924686021,0.0495617785257,0.0489498168669,0.0491490601977,0.0489355852004,0.0488288477018,0.0491277126979,0.049099249365,0.0489355852004,0.0490636701988,0.0491205968647,0.0493838826946,0.0501168135185,0.0500243076864,0.0503587518487,0.0509493660077,0.0505295318465,0.0503587518487,0.0502591301833,0.0502093193506,0.0505508793462,0.049896222688,0.0500385393528,0.0499033385213,0.0499673810204,0.0496827476908,0.0496969793573,0.0498392960221,0.0498748751883,0.0498037168559,0.0493909985279,0.0494621568603,0.0494052301944,0.0493838826946,0.0493554193617,0.0494265776941,0.0495688943589,0.0495404310259,0.0496969793573,0.0496827476908,0.0497894851894,0.0501168135185,0.0499460335207,0.0500385393528,0.0499460335207,0.0499175701877,0.0500456551861,0.0500670026858,0.0499175701877,0.0500527710193,0.0498037168559,0.0497539060232,0.0500456551861,0.0500456551861,0.0500812343523,0.0501452768515,0.0500527710193,0.0502093193506,0.0501096976852,0.0502733618498,0.0504156785146,0.0505935743457,0.0499104543545,0.0497681376897,0.0495546626924,0.0491988710304,0.0492202185301,0.0491846393639,0.049511967693,0.0494194618608,0.0497040951905,0.0498535276886,0.0500883501855,0.0501523926847,0.0504726051806,0.0506647326781,0.0509707135074,0.0509422501745,0.0509920610072,0.0508212810094,0.0507785860099,0.0506718485113,0.0507785860099,0.0506078060121,0.0506220376786,0.0503516360155,0.0499318018542,0.0495475468592,0.0493981143611,0.0494408093606,0.0494336935273,0.0493411876952,0.0495261993595,0.0493411876952,0.0494408093606,0.0496044735251,0.0498108326891,0.0501808560177,0.0502022035174,0.0502520143501,0.050337404349,0.0498321801888,0.0500029601866,0.0504014468481,0.0502591301833,0.0507145435108,0.0505508793462,0.050486836847,0.050750122677,0.0510916826725,0.0510276401734,0.051724991831,0.0516396018321,0.0512909260033,0.0512482310039,0.0513336210028,0.0513905476687,0.0515684434997,0.0516111384992,0.0516609493319,0.0515115168338,0.0513193893363,0.0513478526692,0.0515826751662,0.0518174976632,0.0515044010005,0.0516538334986,0.051753455164,0.0514118951684,0.0511984201712,0.0514617060011,0.0515684434997,0.0515684434997,0.0517178759978,0.0517605709972,0.0519740459945,0.0520950151596,0.0520380884936,0.0524009959889,0.0524792701546,0.0526144709862,0.0525931234865,0.0524863859878,0.0525290809873,0.0529844943147,0.0527639034843,0.052521965154,0.0522657951574,0.0524935018211,0.0528137143169,0.0529204518156,0.0533260543103,0.0537245409718,0.0540661009674,0.0538953209696,0.0542724601314,0.0544005451298,0.0551477076201,0.0550053909553,0.0548773059569,0.0547207576256,0.0546211359602,0.0544503559624,0.0541087959669,0.0536533826394,0.0534399076422,0.0539878268018,0.0538383943037,0.0536178034732,0.0534612551419,0.0538668576367,0.0538241626372,0.0541443751331,0.0547634526251,0.0551477076201,0.0553113717846,0.0549200009564,0.0547990317913,0.0554608042827,0.0558023642783,0.0560869976079,0.0564000942706,0.0561083451077,0.0554892676157,0.0557810167786,0.0560869976079,0.0565566426019,0.0568412759315,0.0568412759315,0.057033403429,0.0569195500972,0.0568412759315,0.0574888167565,0.0578730717515,0.0577805659194,0.0573678475914,0.0573891950911,0.0573465000917,0.0574034267576,0.0573820792579,0.0573180367587,0.0573465000917,0.0573180367587,0.0574247742573,0.0576951759205,0.0581648209144,0.0581932842474,0.0586629292413,0.0585846550756,0.0588265934058,0.0586558134081,0.0591610375682,0.0592820067333,0.0596306825621,0.0596947250613,0.0598583892258,0.0597018408945,0.0593247017327,0.059509713397,0.0594954817305,0.0597516517272,0.0597374200607,0.0597729992269,0.0595737558962,0.0598014625599,0.0596520300618,0.059744535894,0.0597231883942,0.0597872308934,0.0597303042275,0.0598726208923,0.0598085783931,0.059509713397,0.0592820067333,0.0589475625709,0.0591112267355,0.059509713397,0.0603138025533,0.0606482467156,0.0609471117118,0.0611036600431,0.0609969225444,0.061189050042,0.0612957875406,0.0616729267024,0.0615306100375,0.0612530925411,0.060541509217,0.060128790889,0.0596804933948,0.0596947250613,0.0598726208923,0.0598014625599,0.0602995708868,0.0602141808879,0.0603707292192,0.0601999492214,0.0606838258818,0.0604632350513,0.0608830692126,0.0611819342087,0.0608332583799,0.0609969225444,0.0609471117118,0.0611463550425,0.0613313667068,0.0616302317029,0.0615590733705,0.0622208458619,0.0620073708647,0.0616515792026,0.0618508225334,0.0622208458619,0.0620714133639,0.0620144866979,0.0620429500309,0.0624983633584,0.0627616491883,0.0624841316919,0.0627189541888,0.0628755025201,0.0630391666847,0.0631245566836,0.0631885991828,0.0632597575152,0.063608433344,0.0636511283434,0.06340207418,0.0633380316808,0.0637151708426,0.0635372750116,0.0639784566725,0.0635870858443,0.0637792133418,0.0637934450083,0.0641065416709,0.063843255841,0.0641634683368,0.0644979124992,0.0646615766637,0.0652735383225,0.0649746733263,0.065408739154,0.0655724033186,0.0656649091507,0.0653233491552,0.0657787624826,0.0655866349851,0.0660918591452,0.0657716466494,0.0657787624826,0.065878384148,0.0657004883169,0.0656649091507,0.0659637741469,0.0663409133087,0.0662199441436,0.0665330408062,0.0661487858111,0.0665401566394,0.066853253302,0.0673584774622,0.0676929216245,0.0680700607863,0.0682479566173,0.0682123774511,0.068532589947,0.0685681691132,0.0695003432678,0.0694505324351,0.0692014782717,0.0691801307719,0.0691658991055,0.069507459101,0.0693936057692,0.0697493974312,0.0702617374246,0.0708808149166,0.0703827065897,0.0710231315814,0.0715354715748,0.0721332015671,0.072602846561,0.0726740048934,0.0729799857228,0.0732646190524,0.0729657540563,0.0732005765533,0.0735990632148,0.0735777157151,0.0737840748791,0.0741540982076,0.0749012606979,0.0754064848581,0.0761963423479,0.0762176898476,0.0770715898365,0.0777618256609,0.0786370731496,0.0792134556422,0.0799819656322,0.0802594831286,0.0806722014566,0.0808572131209,0.0812983947819,0.081981514773,0.082394233101,0.0817680397758,0.0818818931077,0.0814762906129,0.0814834064461,0.081625723111,0.0811133831176,0.0812841631154,0.0811204989508,0.0808216339547,0.0806437381237,0.0815118697791,0.0817111131099,0.0830275422595,0.0833406389221,0.0835968089188,0.0845503305731,0.0851551763987,0.0857102113915,0.086549879714,0.0871333780397,0.0870622197073,0.0874322430359,0.0872329997051,0.0875603280342,0.0881651738597,0.0884996180221,0.0886561663534,0.0888198305179,0.0894531396764,0.0897093096731,0.0901077963346,0.0907197579934,0.0920006079768,0.0922781254732,0.092064650476,0.0917871329796,0.0923137046394,0.093067982963,0.0932885737935,0.0935233962904,0.0944199912788,0.0946334662761,0.0944413387786,0.094690392942,0.095309470434,0.0959214320927,0.0961989495892,0.0961277912567,0.0962131812556,0.0966116679172,0.0966899420828,0.0968037954147,0.096931880413,0.0973872937405,0.0975082629056,0.0984760162264,0.0992089470502,0.0998422562087,0.100553839533,0.101137337859,0.101386392022,0.101941427015,0.102752632004,0.102937643669,0.104424852816,0.104503126982,0.10491584531,0.105698586966,0.106317664458,0.106602297788,0.107313881112,0.108082391102,0.108843785259,0.109654990248,0.109797306913,0.110516006071,0.110594280236,0.111277400227,0.111554917724,0.112423049379,0.112472860212,0.112992316039,0.113063474371,0.114009880192,0.11497051768,0.115546900172,0.116628506825,0.116941603488,0.117525101813,0.118499970967,0.119766589284,0.120641836773,0.121545547595,0.122072119255,0.122634270081,0.123744340066,0.124889989218,0.125252896713,0.126604905029,0.127174171689,0.128262894174,0.129116794163,0.130105894984,0.131130574971,0.131208849136,0.131593104131,0.132667594951,0.134211730764,0.135464117415,0.137235959892,0.139619764028,0.14124928984,0.143106522316,0.145419168119,0.147895478087,0.150884128049,0.152705781358,0.155253249659,0.156740458806,0.158619038782,0.160518966257,0.162796032895,0.165037520366,0.167755768664,0.170260541965,0.172288554438,0.174964107737,0.176942309378,0.179283418515,0.180813322661,0.181987435146,0.183495991793,0.184456629281,0.184051026786,0.184591830113,0.184164880118,0.183801972623,0.183545802626,0.183745045957,0.183702350957,0.183495991793,0.183197126797,0.183382138462,0.183673887624,0.184371239282,0.184883579276,0.185153980939,0.185958070095,0.18662695842,0.187865113404,0.188904025057,0.190312960039,0.191444377524,0.192924470838,0.193671633329,0.195692529969,0.197343403281,0.198040754939,0.198631369098,0.200374748242,0.201207300731,0.202160822385,0.20333493487,0.204978692349,0.206266658166,0.206679376494,0.207668477314,0.209518593957,0.211411405599,0.212066062257,0.213439418073,0.215346461382,0.21626440387,0.216719817197,0.21775872885,0.219167663832,0.219971752988,0.220975085475,0.221515888802,0.223017329616,0.224269716266,0.224312411266,0.226162527908,0.227806285387,0.228909239539,0.229535432865,0.230488954519,0.229948151193,0.231250348676,0.230994178679,0.230510302019,0.230062004525,0.228674417042,0.228233235382,0.227279713727,0.226724678734,0.226333307906,0.22653966707,0.225643072082,0.224646855428,0.224746477093,0.224810519592,0.223906808771,0.222291514625,0.221530120468,0.220491208815,0.218520123007,0.21676962803,0.214577951391,0.21286303558,0.210457883945,0.208159469808,0.206586870661,0.205014271515,0.20331358737,0.201171721565,0.200132809912,0.199399879088,0.197962480773,0.196980495786,0.195948699966,0.195109031643,0.19380683416,0.192803501673,0.190981848363,0.190398350038,0.189366554218,0.188256484232,0.18735277341,0.186192892592,0.184691451778,0.182940956801,0.181489326819,0.179788642675,0.179084175184,0.177853136033,0.176252073554,0.173903848584,0.172117774441,0.170594986127,0.16882314365,0.168403309489,0.167705957831,0.166361065348,0.165258111196,0.163628585384,0.16210579707,0.161216317915,0.160696862088,0.159166957941,0.158562112116,0.156982397136,0.155850979651,0.155046890495,0.153602376347,0.153495638848,0.152769823858,0.152236136364,0.150926823048,0.150087154726,0.149382687235,0.148386470581,0.147098504764,0.145568600617,0.144266403134,0.142480328991,0.141412954004,0.139819007358,0.139178582367,0.138346029877,0.136915747396,0.13532180075,0.134581754093,0.134396742428,0.133884402435,0.133137239945,0.132937996614,0.13325820911,0.131806579129,0.130995374139,0.130860173308,0.130440339146,0.129757219155,0.128675612502,0.127771901681,0.126839727526,0.125338286712,0.123523749236,0.123473938403,0.122648501747,0.121901339257,0.121630937594,0.120478172608,0.119795052617,0.119538882621,0.119190206792,0.119197322625,0.118905573462,0.118499970967,0.117717229311,0.117026993486,0.115902691834,0.115618058505,0.115269382676,0.114330092688,0.113568698531,0.112700566876,0.112551134378,0.110978535231,0.110928724399,0.110103287743,0.10976884358,0.109228040254,0.108637426095,0.108295866099,0.107385039444,0.106687687787,0.106225158626,0.106573834455,0.106388822791,0.10616823196,0.105783976965,0.105029698642,0.104531590315,0.104090408654,0.10331478283,0.103208045332,0.102631662839,0.101934311182,0.101144453692,0.100717503697,0.100425754534,0.100518260367,0.100432870368,0.100134005372,0.100311901203,0.0996857078774,0.0988958503876,0.09819849873,0.0980063712325,0.0972236295759,0.0968536062474,0.0968180270812,0.0959641270922,0.0955798720972,0.0953735129332,0.095337933767,0.0954090920994,0.0953165862672,0.0948754046063,0.0950177212711,0.0941282421159,0.0932956896267,0.093452237958,0.0928972029652,0.0929897087973,0.0926623804682,0.0921429246416,0.0917871329796,0.0909261171574,0.0902643446659,0.0902999238321,0.0902429971662,0.0894673713429,0.0894317921767,0.088734440519,0.0881580580265,0.0878734246968,0.0878093821977,0.0879943938619,0.0880086255284,0.0878307296974,0.0875318647013,0.087318389704,0.0863292888835,0.0861158138862,0.0856888638918,0.0856461688923,0.0849843964009,0.0844720564075,0.0839383689144,0.0831271639249,0.0826717505974,0.0824440439337,0.0827215614301,0.0823586539348,0.0819245881071,0.081597259778,0.0815047539459,0.0813980164473,0.0812058889497,0.0808500972877,0.0804089156267,0.0801029347973,0.0796973323026,0.0791422973098,0.0793700039735,0.0792348031419,0.0789928648117,0.0786584206494,0.0784449456521,0.0781033856565,0.0783310923203,0.0780322273241,0.077733362328,0.0773704548327,0.076317311513,0.075228589027,0.074844334032,0.0746949015339,0.0741398665411,0.073663105714,0.0727878582253,0.0723751398973,0.0713789232435,0.070980436582,0.0708736990834,0.0707669615847,0.0697565132645,0.0689595399415,0.0685539374467,0.0687531807775,0.0687318332777,0.0684116207819,0.0690449299404,0.068532589947,0.0686108641126,0.0682408407841,0.0682693041171,0.0680629449531,0.0674794466273,0.0668603691353,0.0665970833053,0.0668247899691,0.0660207008128,0.066056279979,0.0655225924859,0.0652877699889,0.0655581716521,0.0653873916543,0.0656933724837,0.0660776274787,0.0654158549873,0.0645477233318,0.0641777000033,0.0641065416709,0.0640994258376,0.0638930666736,0.0635515066781,0.063579970011,0.0629466608526,0.0625054791916,0.0628897341866,0.0630533983512,0.0632811050149,0.0630676300177,0.0624699000254,0.0620429500309,0.0621141083633,0.0619931391982,0.0622991200276,0.0625125950248,0.0623133516941,0.0620500658642,0.0621496875295,0.0618365908669,0.0619504441988,0.062605100857,0.0623133516941,0.0622279616952,0.0623773941933,0.0620714133639,0.0616444633694,0.0618579383666,0.0620002550315,0.0624699000254,0.0620642975306,0.0617298533683,0.0617156217018,0.0613313667068,0.0611748183755,0.0614309883722,0.0615946525367,0.0613242508735,0.0610182700442,0.0609755750447,0.0614807992048,0.0613527142065,0.0611178917095,0.06133848254,0.0611819342087,0.0606695942153,0.0606055517162,0.0606126675494,0.0603707292192,0.0598085783931,0.0597587675605,0.0594741342308,0.0598655050591,0.0598655050591,0.0598228100596,0.0596947250613,0.0595737558962,0.0596662617283,0.0593460492325,0.0599722425577,0.0598228100596,0.0600932117228,0.059687609228,0.0594599025643,0.0594456708978,0.0593602808989,0.0592179642341,0.0590044892369,0.0596306825621,0.0592677750668,0.05953817673,0.0596235667289,0.0595951033959,0.0595310608967,0.0595666400629,0.0596662617283,0.0594670183976,0.0596449142286,0.0592037325676,0.0587625509067,0.058684276741,0.0584281067443,0.0585490759094,0.0587981300729,0.0585206125765,0.0591183425687,0.0590827634025,0.0587981300729,0.0589689100707,0.0591183425687,0.059068531736,0.0588265934058,0.058712740074,0.0585704234092,0.0586202342418,0.0577734500861,0.0582004000806,0.0581150100817,0.0579798092501,0.0578944192512,0.0576595967543,0.0578090292523,0.0576453650878,0.0572041834268,0.0572468784263,0.0571970675936,0.0567914650988,0.0570832142617,0.0568056967653,0.0568982025974,0.0564499051032,0.0562862409387,0.056030070942,0.0564499051032,0.0560514184417,0.056001607609,0.0557881326118,0.0555034992822,0.0553825301171,0.0553967617835,0.0556031209475,0.0553754142838,0.0551975184528,0.0549698117891,0.0549271167896,0.0545499776278,0.0542084176322,0.053966479302,0.0538526259702,0.0533402859768,0.0530058418145,0.0527212084848,0.0527710193175,0.0526500501524,0.0523511851563,0.0526287026527,0.0531268109796,0.0530698843136,0.0533118226438,0.0536249193065,0.0537814676378,0.0540091743015,0.054229765132,0.0541372592998,0.0541870701325,0.0543507342971,0.0540732168007,0.0541087959669,0.0539522476356,0.0536818459724,0.0537672359713,0.0535181818078,0.053553760974,0.0534683709751,0.0536035718067,0.0535039501413,0.0531339268128,0.0526998609851,0.0526429343192,0.052372532656,0.0521875209917,0.0522088684914,0.0519669301612,0.051959814328,0.0519740459945,0.0518957718288,0.0523511851563,0.0524650384881,0.0523013743236,0.0524721543214,0.0523013743236,0.052166173492,0.051988277661,0.0517392234975,0.0517107601645,0.0514972851673,0.0514332426681,0.0512339993374,0.0517463393307,0.0521519418255,0.0520167409939,0.0523084901568,0.0522871426571,0.0528492934831,0.0525575443203,0.0528492934831,0.0522088684914,0.0523583009895,0.0520096251607,0.0517036443313,0.0521732893252,0.0518815401623,0.0517748026637,0.051162841005,0.0514190110016,0.050899555175,0.0511841885047,0.0510987985058,0.0507003118443,0.0506291535119,0.0503516360155,0.0502377826836,0.0501808560177,0.0503018251828,0.0499389176875,0.0503018251828,0.0503658676819,0.0505864585124,0.0507572385102,0.0505935743457,0.0506718485113,0.0510276401734,0.0508497443423,0.0506505010116,0.050543763513,0.049896222688,0.0498891068548,0.0496827476908,0.0497966010226,0.050074118519,0.0499318018542,0.0498819910215,0.0502733618498,0.0504085626814,0.0508782076753,0.0510916826725,0.0510774510061,0.0511272618388,0.0510418718399,0.0507857018432,0.050750122677,0.050693196011,0.051134377672,0.0510418718399,0.0505722268459,0.0507003118443,0.0508355126759,0.0508212810094,0.0511770726714,0.0514047793352,0.0512197676709,0.0508568601756,0.0504299101811,0.0505081843468,0.0507430068437,0.0507785860099,0.0506149218454,0.0507857018432,0.0505081843468,0.0501879718509,0.0502235510171,0.0506505010116,0.0505224160132,0.0500171918531,0.0502947093495,0.0504156785146,0.050308941016,0.0500385393528,0.0497610218564,0.0500812343523,0.0502733618498,0.0499389176875,0.0496258210248,0.0496756318575,0.0491561760309,0.0486936468702,0.0486011410381,0.0488075002021,0.0439260385986,0.0387243644992,0.0336009645654,0.0287479662949,0.0)
ycorr <- c(-7.40749734641e-06,-7.62193228862e-06,-8.26571894146e-06,-9.33663985023e-06,-1.08329621936e-05,-1.27520783714e-05,-1.50915919521e-05,-1.74761610652e-05,-1.99014393105e-05,-2.23606643902e-05,-2.48482670847e-05,-2.73559131443e-05,-2.98776614162e-05,-3.24078139037e-05,-3.49443570876e-05,-3.74823091854e-05,-4.00195630099e-05,-4.25520429975e-05,-4.50784797692e-05,-4.7598664222e-05,-5.01168425379e-05,-5.26333462753e-05,-5.51519266162e-05,-5.7675562366e-05,-6.02061470624e-05,-6.27448522846e-05,-6.52936451089e-05,-6.78575400641e-05,-7.04401221722e-05,-7.30427297239e-05,-7.56660606263e-05,-7.83128413179e-05,-8.09843225841e-05,-8.36818361655e-05,-8.64033063696e-05,-8.91515179715e-05,-9.19257858557e-05,-9.47255980923e-05,-9.75481271575e-05,-0.000100395781632,-0.000103267979522,-0.000106165440064,-0.000109086085993,-0.000112030532139,-0.000115000379746,-0.000117996672481,-0.000121017538811,-0.000124065016241,-0.00012713911542,-0.000130239892288,-0.000133364853455,-0.000136512631372,-0.000139683091427,-0.000142875205127,-0.000146088516389,-0.000149323335441,-0.000152579844973,-0.000155855457962,-0.000159151722458,-0.000162468734402,-0.000165806135874,-0.000169164085434,-0.000172542034438,-0.000175937302216,-0.000179351171192,-0.000182777657556,-0.000186212931308,-0.000189654813918,-0.000193099687216,-0.000196541099077,-0.000199975825167,-0.000203401557935,-0.000206816058718,-0.000210218384661,-0.000213605895085,-0.000216973922014,-0.000220326219666,-0.000223662119518,-0.000226979728868,-0.000230279323459,-0.000233560879353,-0.000236822035698,-0.000240058615059,-0.000243267014956,-0.000246444053572,-0.000249589822005,-0.000252701404819,-0.000255773556233,-0.000258803162547,-0.000261788899918,-0.000264730168581,-0.000267625177155,-0.000270477422529,-0.00027329079895,-0.000276064685375,-0.000278800523535,-0.000281498625481,-0.000284161873696,-0.00028679195879,-0.000289390496215,-0.000291957781455,-0.000294497334948,-0.000297008822808,-0.000299490320634,-0.000301941218142,-0.000304363398013,-0.000306754823128,-0.000309114761924,-0.000311442053136,-0.000313737247666,-0.000316001203096,-0.000318234840121,-0.000320435770105,-0.000322603208768,-0.000324735269799,-0.000326831907377,-0.000328893192227,-0.000330923881588,-0.000332927113237,-0.000334903338759,-0.000336853315241,-0.000338773673413,-0.000340663876368,-0.000342524211983,-0.000344358589585,-0.000346167691914,-0.000347952128562,-0.000349710644258,-0.000351441468533,-0.000353142674102,-0.000354812719225,-0.00035645383707,-0.000358068649924,-0.000359659336013,-0.00036122523124,-0.000362764923605,-0.000364280896639,-0.000365771805489,-0.000367237898071,-0.000368677482743,-0.000370091456575,-0.000371480489272,-0.000372842356003,-0.000374176581237,-0.000375484811069,-0.000376768025493,-0.000378024572603,-0.000379252900525,-0.000380454916902,-0.00038163446864,-0.000382793863009,-0.000383933093908,-0.000385055897151,-0.000386164132569,-0.000387255743508,-0.000388329081212,-0.000389387227322,-0.000390431996171,-0.000391464151319,-0.000392482011977,-0.000393482619609,-0.000394464224279,-0.000395425122793,-0.000396361315354,-0.0003972740644,-0.00039816589342,-0.000399036025143,-0.000399882300606,-0.000400703686854,-0.000401500969586,-0.000402276733209,-0.000403032841791,-0.000403771334489,-0.000404495118299,-0.000405206624266,-0.000405902597242,-0.000406583820723,-0.000407250415986,-0.00040790340021,-0.000408543870045,-0.000409169902838,-0.000409780470991,-0.000410374833906,-0.000410953752584,-0.000411513536771,-0.000412057340984,-0.000412584306936,-0.000413095972292,-0.000413593372587,-0.000414076621698,-0.00041454664147,-0.000415003946413,-0.000415447850882,-0.000415878016547,-0.000416295205719,-0.000416701730652,-0.000417095778484,-0.00041747865551,-0.000417846895244,-0.000418200194334,-0.000418538103324,-0.000418859737227,-0.000419167982927,-0.000419464248931,-0.000419749138798,-0.000420019794412,-0.000420277251452,-0.000420521567141,-0.000420755530549,-0.000420982029555,-0.0004212010234,-0.000421414479299,-0.000421622845164,-0.000421823567945,-0.000422014993321,-0.000422198468483,-0.000422373782282,-0.00042254145997,-0.000422701523635,-0.000422850595186,-0.000422989097541,-0.000423117084508,-0.000423232756727,-0.000423337310745,-0.000423433081427,-0.000423520857714,-0.000423601940002,-0.000423675792513,-0.000423742027357,-0.000423800486545,-0.00042385204297,-0.00042389667466,-0.000423935063976,-0.000423966859313,-0.000423990798743,-0.000424004536349,-0.000424006545893,-0.000423995049379,-0.000423971377525,-0.000423934964031,-0.000423885455839,-0.000423823097338,-0.000423746754926,-0.000423656525463,-0.000423553097482,-0.000423438160767,-0.000423314423524,-0.000423183465671,-0.000423044402625,-0.000422897022331,-0.000422741416465,-0.000422577893317,-0.000422405779773,-0.000422225192636,-0.000422034838289,-0.00042183362531,-0.000421619778137,-0.000421391808514,-0.000421149993103,-0.000420896011059,-0.000420630716655,-0.000420353634936,-0.000420063813508,-0.000419762991488,-0.000419451560936,-0.000419131102016,-0.000418802000751,-0.000418464320071,-0.00041811786086,-0.000417762107946,-0.00041739575129,-0.000417017878399,-0.000416630760883,-0.000416233998548,-0.000415826706339,-0.00041540786008,-0.000414976386051,-0.000414532221459,-0.00041407643852,-0.000413608850727,-0.000413129478906,-0.000412638065862,-0.000412132987696,-0.000411611687347,-0.000411075629583,-0.000410524423735,-0.000409958342293,-0.000409376977574,-0.000408779660339,-0.000408166431155,-0.000407535577297,-0.000406886708405,-0.000406220470018,-0.000405538839652,-0.000404841501323,-0.000404127181544,-0.000403395447792,-0.000402647450352,-0.000401884005792,-0.00040110500028,-0.000400312217619,-0.00039950710352,-0.000398691302644,-0.000397863980494,-0.000397024329206,-0.000396174124731,-0.000395313645892,-0.000394442623732,-0.000393560363321,-0.000392667779704,-0.000391763860213,-0.000390847826494,-0.000389919667554,-0.000388978099211,-0.00038802485138,-0.000387059724015,-0.000386083008614,-0.000385096707658,-0.000384100512811,-0.000383092647583,-0.000382071650779,-0.000381039645119,-0.000379995385465,-0.000378939922462,-0.000377873628928,-0.000376796516887,-0.000375708601715,-0.000374609127489,-0.000373497907666,-0.000372376832476,-0.000371248787017,-0.000370113780413,-0.000368970326983,-0.000367817650888,-0.000366656607869,-0.000365487107727,-0.000364309636798,-0.000363125672924,-0.000361935451269,-0.000360737568523,-0.000359532568985,-0.000358318908977,-0.000357097794245,-0.000355872530833,-0.000354642825659,-0.000353407767048,-0.000352168450779,-0.000350922399874,-0.000349668805126,-0.000348409198197,-0.000347144191148,-0.000345873529756,-0.000344597028118,-0.000343313737106,-0.000342021718036,-0.000340722118134,-0.000339415824466,-0.000338103657234,-0.00033678708816,-0.000335465886906,-0.000334138675244,-0.000332805531326,-0.000331467225284,-0.000330124361057,-0.000328777153586,-0.000327426047368,-0.000326068932876,-0.000324704227274,-0.000323330676633,-0.000321948578134,-0.000320558057283,-0.000319158936539,-0.000317751301585,-0.000316333259829,-0.000314906607662,-0.000313471894337,-0.000312029659899,-0.000310581527269,-0.000309128282546,-0.000307669310061,-0.000306202959076,-0.00030473116888,-0.000303254404446,-0.000301772010036,-0.000300283901562,-0.000298788012178,-0.000297283990809,-0.000295771443064,-0.000294250699041,-0.000292722075035,-0.000291188196425,-0.00028964888571,-0.000288103239601,-0.000286552488938,-0.000284996771316,-0.000283436893428,-0.000281874589127,-0.000280310299432,-0.000278743022,-0.000277173584663,-0.000275601106245,-0.000274023002727,-0.000272441115903,-0.000270854580068,-0.000269263139945,-0.00026766789688,-0.000266067964683,-0.000264463568156,-0.000262854225785,-0.000261240421855,-0.000259622132998,-0.000258000601634,-0.000256376052587,-0.00025474755262,-0.000253116012494,-0.000251480904651,-0.00024984103519,-0.000248195150943,-0.000246543896316,-0.000244886255716,-0.00024322217343,-0.000241551503149,-0.00023987324635,-0.000238188731126,-0.000236496743205,-0.000234795497362,-0.000233085396545,-0.000231367090604,-0.00022964179906,-0.000227909439383,-0.000226169826967,-0.00022442245969,-0.000222666191961,-0.000220901300253,-0.000219126377007,-0.00021734486423,-0.000215556737517,-0.000213760713538,-0.000211955784158,-0.000210141388911,-0.000208315404085,-0.000206479460006,-0.000204633792218,-0.000202777848346,-0.000200910995394,-0.00019903197212,-0.000197138403784,-0.000195230695627,-0.000193308140777,-0.000191370640135,-0.000189419262877,-0.000187452796037,-0.000185470775537,-0.000183472628511,-0.000181459768746,-0.000179432677371,-0.00017739175278,-0.000175338063421,-0.000173273240153,-0.000171197714635,-0.000169111905896,-0.000167015679086,-0.000164909930685,-0.000162794577776,-0.000160669808578,-0.000158533483606,-0.000156385217069,-0.000154225627178,-0.000152052774281,-0.000149865310402,-0.000147663418422,-0.000145446315226,-0.000143213641774,-0.000140964818183,-0.000138700355536,-0.000136420588113,-0.000134127537298,-0.000131820386796,-0.000129497287165,-0.000127158276384,-0.000124803757654,-0.00012243336014,-0.000120047084432,-0.000117644909326,-0.000115226814533,-0.000112792084387,-0.000110340427353,-0.000107871033053,-0.000105386058269,-0.000102886810731,-0.00010037360556,-9.78464111465e-05,-9.53053508445e-05,-9.27507275908e-05,-9.01818465621e-05,-8.75984270304e-05,-8.50003267339e-05,-8.23870729273e-05,-7.97589329673e-05,-7.7114497943e-05,-7.44549513004e-05,-7.17813164563e-05,-6.90924965645e-05,-6.63883546666e-05,-6.366870419e-05,-6.09356513993e-05,-5.81882137509e-05,-5.5426883542e-05,-5.26494861796e-05,-4.98558776462e-05,-4.70446711957e-05,-4.42143671234e-05,-4.13648787635e-05,-3.84964163238e-05,-3.56074897852e-05,-3.26959187034e-05,-2.97610111312e-05,-2.68031375965e-05,-2.38237394969e-05,-2.08250999767e-05,-1.78063548238e-05,-1.47683309728e-05,-1.17107310461e-05,-8.63277908233e-06,-5.53562241637e-06,-2.42135624206e-06,7.07708018238e-07,3.85120645674e-06,7.00877556267e-06,1.01822068354e-05,1.33711182288e-05,1.65752663363e-05,1.97938866066e-05,2.30257807404e-05,2.62705096024e-05,2.95284971196e-05,3.28008222568e-05,3.60894110001e-05,3.93943408046e-05,4.27149105771e-05,4.605078422e-05,4.9401309233e-05,5.27662654937e-05,5.61452758451e-05,5.9538168515e-05,6.29459598373e-05,6.63681181169e-05,6.98036587197e-05,7.32516254395e-05,7.67125954181e-05,8.01873330514e-05,8.3677888053e-05,8.71847380514e-05,9.07083030734e-05,9.42485026536e-05,9.78063868393e-05,0.000101382374182,0.000104976909043,0.000108589849726,0.000112220784156,0.000115868928103,0.000119532661299,0.000123211744953,0.000126907264872,0.000130619425025,0.000134348069228,0.000138092385742,0.000141851178858,0.000145624695458,0.000149412783814,0.000153215403006,0.000157033899509,0.000160868283909,0.000164716342588,0.000168578223415,0.000172454413756,0.000176344182069,0.000180248260053,0.000184167850657,0.000188103892259,0.000192058360269,0.000196030276023,0.000200019638585,0.000204028346125,0.000208057239186,0.000212105052181,0.00021617231566,0.000220260743613,0.000224370437038,0.000228499943614,0.000232659390174,0.000236862965583,0.000241125304853,0.000245458328669,0.000249927040759,0.00025423663073,0.000258451679126,0.000262581834564,0.000266640369452,0.000270640915789,0.000274594811685,0.000278491872994,0.000282315857517,0.000286054102657,0.000289695626315,0.000293174680221,0.000296786052625,0.000300466840348,0.000304205783823,0.000307989591671,0.000311805280542,0.000315642015095,0.000319499562674,0.000323379433404,0.000327280503845,0.000331202001616,0.000335144148085,0.000339107914313,0.000343092049039,0.000347096099239,0.0003511190839,0.000355159429559,0.000359217858589,0.000363292974833,0.000367383486326,0.000371487863431,0.00037560426319,0.000379729959723,0.000383863327867,0.000388004227441,0.000392151911447,0.000396305904661,0.000400465104045,0.000404627653721,0.000408792755114,0.000412960075688,0.000417130573461,0.000421305414747,0.000425486447723,0.000429673228717,0.00043386468083,0.000438061712993,0.000442264773146,0.000446474987945,0.000450694269175,0.000454925788422,0.000459169654801,0.00046342593667,0.000467693506145,0.000471972899196,0.000476266066746,0.000480574059266,0.000484897385183,0.000489236318805,0.00049358936093,0.000497953085368,0.000502325937731,0.000506707611167,0.000511097475177,0.000515496222737,0.000519902111805,0.000524312397023,0.000528725676403,0.000533139934364,0.000537554375475,0.000541969239095,0.000546384391993,0.000550796605252,0.000555204571648,0.000559606103024,0.000563999223486,0.000568382578421,0.000572753962696,0.000577110598549,0.000581451284429,0.000585773083885,0.000590073692144,0.000594352583328,0.000598608925153,0.000602841534507,0.000607047944559,0.000611226603005,0.000615375103268,0.000619493568731,0.000623580341556,0.000627632434425,0.000631648685894,0.000635626841777,0.000639563367393,0.00064345462083,0.000647298687116,0.000651093993833,0.000654838965158,0.000658531093217,0.000662167262064,0.000665746923558,0.000669268498748,0.000672730795282,0.000676133828053,0.000679477671567,0.000682762542932,0.000685985839372,0.000689147124446,0.000692247101692,0.0006952872948,0.000698267472861,0.000701187036966,0.000704045574255,0.000706842020519,0.000709576293891,0.000712248179343,0.000714860289165,0.00071741308121,0.000719906647236,0.000722338093266,0.000724706282488,0.000727011792918,0.00072925484788,0.000731436954522,0.0007335579384,0.000735616816852,0.000737611558433,0.000739538417392,0.000741396826837,0.000743185588483,0.000744905484947,0.000746555779984,0.000748135577053,0.000749642713243,0.000751075544252,0.000752432478663,0.000753712870558,0.000754918483718,0.00075604928108,0.0007571049284,0.000758085860259,0.00075899065321,0.000759817339793,0.000760564735648,0.000761231823349,0.000761818679615,0.00076232385912,0.000762746701268,0.000763084653129,0.000763337092124,0.000763502446717,0.000763579423166,0.000763568127616,0.000763468554928,0.000763280445045,0.000763003697945,0.000762637514134,0.000762183281436,0.000761639963116,0.000761009240761,0.000760290444799,0.000759484979812,0.000758593331473,0.000757615628055,0.000756553458729,0.000755406525366,0.000754176975809,0.000752864170291,0.000751469079517,0.000749992204561,0.000748433389483,0.000746793983526,0.000745074555707,0.000743276457312,0.000741399685599,0.000739444281736,0.000737412263514,0.000735304801782,0.000733124507295,0.000730872612188,0.000728551020713,0.000726160483925,0.00072370231866,0.000721176930031,0.000718585834645,0.000715931973029,0.000713216838779,0.000710440398843,0.000707602128522,0.000704701989126,0.000701740923626,0.000698719693663,0.000695639322907,0.000692501992527,0.000689309600627,0.000686062880114,0.000682761993446,0.00067940886373,0.000676006200414,0.000672556646064,0.000669063340584,0.000665528100822,0.000661953414887,0.000658340771281,0.000654689963799,0.000651002544517,0.000647279904207,0.00064352266811,0.000639731786588,0.000635908351581,0.000632051645602,0.000628160541017,0.000624234955466,0.000620275097326,0.000616282334489,0.000612257860091,0.00060820178817,0.000604116528884,0.000600001936106,0.000595859395823,0.000591690050306,0.000587497334537,0.000583283352004,0.00057904998519,0.000574799004713,0.00057053109669,0.000566246858686,0.000561948272138,0.000557635671303,0.000553310782718,0.000548974761722,0.0005446275937,0.000540269407759,0.000535901394024,0.000531523429624,0.000527136334912,0.000522742530096,0.000518342623259,0.000513936018781,0.000509522391071,0.000505102976835,0.00050067796602,0.000496248971329,0.000491815404877,0.000487377810018,0.000482936663198,0.000478491054003,0.000474038938304,0.000469583000754,0.000465124469008,0.000460662543206,0.000456198134074,0.000451730779744,0.000447260769903,0.000442789039271,0.000438315652368,0.000433840897921,0.000429366307557,0.00042489334382,0.000420420508745,0.000415948298522,0.000411477737362,0.00040700722141,0.000402538434749,0.000398070430045,0.000393603845189,0.000389138915342,0.000384677079076,0.00038021808755,0.000375763772552,0.000371315568107,0.000366872694116,0.000362436474964,0.000358007732239,0.000353586956673,0.00034917518687,0.000344774358988,0.000340383928961,0.000336003331071,0.000331632957702,0.000327270581791,0.000322916717671,0.000318572852802,0.000314239193626,0.000309915804881,0.000305602010453,0.000301297332552,0.000297000462666,0.000292712558852,0.000288432903605,0.000284161635834,0.000279899888588,0.000275648191192,0.00027140433973,0.000267167370304,0.000262938448837,0.000258715986921,0.000254499900765,0.000250290496239,0.000246087281181,0.000241891255928,0.000237700699977,0.000233514646622,0.000229333194646,0.000225158248628,0.000220990280984,0.000216829557292,0.000212677879762,0.000208534451064,0.000204399206818,0.00020027157566,0.000196153498595,0.000192044887539,0.000187945777461,0.000183855982151,0.000179774973721,0.000175702164791,0.000171637593821,0.000167580803528,0.000163532769851,0.000159492807353,0.000155462909249,0.000151442435227,0.000147434173948,0.000143438228171,0.000139452837353,0.000135479043072,0.000131517482681,0.000127568387978,0.000123631629462,0.00011970900782,0.000115799420734,0.000111901568457,0.000108014452048,0.000104137760481,0.000100271975804,9.64189077006e-05,9.25779461317e-05,8.87493693394e-05,8.49333682732e-05,8.11305643187e-05,7.73389653752e-05,7.35602330693e-05,6.97935421828e-05,6.60394429574e-05,6.22980742263e-05,5.85691405225e-05,5.48518105322e-05,5.1145829832e-05,4.74514855292e-05,4.37679489483e-05,4.00945424613e-05,3.6432297834e-05,3.27809464774e-05,2.9140743112e-05,2.55116108943e-05,2.18939052391e-05,1.82884828609e-05,1.46946565616e-05,1.11118044452e-05,7.53934734551e-06,3.97836414493e-06,4.30047828536e-07,-3.1043773931e-06,-6.62476816261e-06,-1.0129909699e-05,-1.36211948367e-05,-1.71001213414e-05,-2.05666559567e-05,-2.401904975e-05,-2.74562817112e-05,-3.08778715337e-05,-3.42846524012e-05,-3.7678388391e-05,-4.10611066551e-05,-4.44320319236e-05,-4.77910321522e-05,-5.11367235051e-05,-5.44666099036e-05,-5.77814970232e-05,-6.10808308038e-05,-6.43647909917e-05,-6.76326954614e-05,-7.08844741424e-05,-7.41171184484e-05,-7.73292299651e-05,-8.05221026804e-05,-8.36957219319e-05,-8.68502420559e-05,-8.99876739307e-05,-9.31066675332e-05,-9.62073789869e-05,-9.92890949269e-05,-0.000102351105298,-0.000105393614215,-0.000108418268771,-0.000111424994219,-0.000114411126969,-0.000117377036603,-0.000120320425428,-0.000123241868941,-0.000126141062116,-0.000129018317919,-0.000131874073307,-0.000134707900868,-0.000137518788343,-0.000140306438711,-0.000143071194725,-0.000145814791613,-0.000148537262553,-0.000151239258985,-0.000153919368131,-0.000156579331276,-0.000159218571089,-0.000161836237236,-0.000164435265263,-0.000167014183007,-0.00016957254862,-0.000172109726637,-0.000174624187322,-0.000177115228747,-0.000179584431274,-0.000182030946739,-0.000184454412675,-0.000186855667058,-0.000189234039195,-0.000191588914282,-0.000193922400255,-0.000196233917391,-0.000198526070109,-0.000200799316417,-0.000203053026393,-0.000205288465235,-0.000207506072911,-0.000209705493037,-0.000211886216373,-0.000214049180044,-0.000216193956011,-0.000218321025452,-0.000220430327994,-0.000222521296326,-0.000224595529119,-0.000226653146121,-0.000228692430039,-0.000230714635289,-0.000232719110731,-0.000234707310001,-0.0002366784085,-0.000238631659514,-0.000240567169659,-0.000242485324241,-0.000244384463098,-0.000246264356149,-0.00024812550509,-0.000249967957388,-0.000251793779348,-0.000253601434169,-0.000255392182505,-0.000257167285299,-0.000258926646698,-0.000260670130563,-0.00026239951468,-0.000264114881124,-0.000265817419315,-0.000267507628832,-0.000269184167504,-0.000270844705589,-0.000272491562214,-0.000274123228965,-0.000275739052239,-0.000277339663986,-0.000278924686043,-0.000280492981399,-0.000282044181161,-0.000283577142645,-0.000285093002322,-0.000286594477746,-0.000288078918305,-0.00028954639748,-0.000290997172562,-0.000292432265284,-0.00029385128715,-0.000295253261042,-0.000296637986858,-0.000298006414903,-0.000299356983743,-0.000300687649235,-0.000301998844247,-0.000303293091166,-0.000304570930593,-0.000305831405708,-0.000307073747524,-0.000308300079421,-0.000309511914069,-0.000310711128367,-0.000311897980539,-0.000313075510708,-0.000314245015687,-0.000315405843585,-0.000316558354887,-0.000317704022942,-0.000318844057958,-0.000319978894091,-0.000321107259288,-0.000322227288566,-0.000323338499274,-0.000324440760526,-0.000325532927515,-0.000326613283465,-0.000327680542927,-0.000328732574965,-0.000329768577491,-0.00033078833171,-0.000331792297519,-0.000332781720442,-0.000333757223213,-0.000334717332227,-0.000335662011963,-0.000336591151858,-0.00033750747022,-0.000338412435905,-0.000339307166819,-0.00034018992136,-0.000341059761136,-0.000341914690074,-0.000342753785506,-0.000343578674332,-0.000344390920924,-0.00034519141096,-0.000345979632217,-0.000346755049572,-0.000347516521209,-0.00034826462871,-0.000349000098379,-0.000349722726082,-0.000350434858508,-0.000351136003687,-0.000351825452293,-0.000352503608724,-0.00035317003345,-0.000353822961749,-0.000354463906558,-0.000355092386788,-0.000355709414455,-0.000356317705173,-0.0003569181448,-0.000357510694863,-0.000358093864876,-0.000358666607359,-0.000359225788257,-0.000359772030638,-0.00036030583208,-0.00036082662955,-0.000361333729246,-0.000361824055474,-0.000362293872619,-0.000362741391178,-0.000363165433018,-0.000363567446694,-0.000363948513288,-0.000364309289274,-0.000364649180898,-0.000364969783266,-0.000365267773124,-0.000365545485979,-0.000365805562482,-0.000366047540321,-0.000366273969369,-0.00036648531842,-0.000366680823292,-0.000366860365753,-0.000367023387625,-0.000367167999927,-0.000367295960201,-0.000367407700611,-0.000367502308652,-0.000367580614811,-0.000367642785748,-0.00036768472958,-0.000367706231587,-0.000367708576398,-0.000367691226012,-0.000367655855111,-0.000367603477258,-0.00036753060459,-0.000367437238569,-0.000367320787168,-0.000367178607125,-0.000367013400757,-0.000366830011711,-0.00036662651198,-0.000366401829099,-0.000366155164754,-0.000365884294076,-0.000365590549801,-0.000365273921252,-0.00036493892506,-0.000364588614649,-0.000364222535474,-0.00036383648009,-0.000363475002928,-0.000363186145944,-0.000362968257142,-0.000362820157072,-0.000362745148369)
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(146)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('GSE29282-OCI-LY1_BCL6_N-3_rep2_CHIP-GSM763402.36mers.unique.dedup.MACS-2.1.0_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) : 146',bty='n')
dev.off()