# R script for Peak Model
#  -- generated by MACS
p <- c(0.0432135484724,0.0504007733749,0.0574670495412,0.0645948250648,0.0717410503957,0.0717482253207,0.0717256755563,0.071646751381,0.0714950529661,0.0715401524948,0.0714776281481,0.0715083778268,0.0716488013596,0.0716518763275,0.0716939008884,0.0716764760704,0.0714909530089,0.0713689792834,0.0715452774413,0.0716426514238,0.0716067767987,0.0713628293476,0.0711639814253,0.0713279797118,0.0713638543369,0.0714991529232,0.0716016518522,0.0717441253636,0.0716939008884,0.0715944769272,0.0718425243354,0.0721038966044,0.072367318852,0.0721664209511,0.0720639220221,0.0718783989606,0.0717574502243,0.0717922998602,0.0716959508669,0.0717277255349,0.0715493773984,0.0714827530946,0.0712142059006,0.0713064549367,0.0713300296904,0.0714766031588,0.0715432274627,0.0714335536087,0.0716365014881,0.071685700974,0.0716990258348,0.0717554002458,0.071805624721,0.0717851249352,0.0718589241641,0.0718486742712,0.0719286234358,0.0719347733715,0.0717851249352,0.0715237526662,0.0714079288764,0.0713177298189,0.0715340025591,0.071441753523,0.0713976789835,0.0711988310612,0.0710502076141,0.0709333588351,0.0708974842099,0.0710153579783,0.0711465566074,0.071148606586,0.0710297078283,0.0712111309327,0.0710010081282,0.0710040830961,0.0711650064146,0.0714161287907,0.0712644303758,0.0711916561362,0.0712070309755,0.0711742313183,0.0712234308042,0.0709784583638,0.071251105515,0.071441753523,0.0712695553222,0.0711158069287,0.0711906311469,0.0711701313611,0.0711127319608,0.0710358577641,0.0710184329461,0.0711547565217,0.0711014570787,0.0708595596062,0.0709876832674,0.0710174079569,0.0708862093277,0.07091183406,0.0708134350881,0.0708452097561,0.0706730115554,0.070516188194,0.0704669887081,0.0705356629905,0.0706371369302,0.07057973753,0.0707826854094,0.0709384837815,0.0709364338029,0.0707427108271,0.0707242610199,0.0706976112983,0.0706166371444,0.070547962862,0.070396264447,0.0703901145113,0.0703060653895,0.0701246422851,0.0700713428421,0.0703306651325,0.0703880645327,0.0704628887509,0.0705756375728,0.070664811641,0.0705438629048,0.070675061534,0.0705951123693,0.0706586617053,0.0705848624764,0.0705069632904,0.0705202881511,0.0705346380012,0.0705500128406,0.0707437358164,0.0709138840386,0.0709159340171,0.0709282338886,0.0708892842956,0.0710491826249,0.0710717323892,0.0710819822821,0.0711926811255,0.0711639814253,0.0709589835673,0.070982558321,0.07091183406,0.071046107657,0.0711352817252,0.0712664803544,0.0712572554508,0.0713290047011,0.0712336806971,0.0711824312326,0.0711844812112,0.0712090809541,0.0711270818109,0.0711260568216,0.0711701313611,0.0711680813825,0.0713915290478,0.0712951800545,0.0712213808256,0.0710368827534,0.0710942821536,0.0709846082996,0.0711035070572,0.0710584075285,0.0710307328176,0.0708216350024,0.0707611606343,0.0706156121551,0.0707242610199,0.0710666074428,0.0710625074856,0.0710020331175,0.071155781511,0.0712142059006,0.0712716053008,0.071551427377,0.0714233037158,0.0716764760704,0.0716457263917,0.071685700974,0.0717984497959,0.0721592460261,0.0721069715723,0.0721961456405,0.0721776958333,0.0720680219793,0.0723150443982,0.072247395105,0.072406268445,0.0722555950194,0.0722309952764,0.0720526471399,0.0720413722577,0.0720270224076,0.0720485471827,0.0720557221078,0.0719419482966,0.07208134684,0.0719808978896,0.0718732740141,0.0718947987892,0.0721069715723,0.0722781447837,0.0724370181237,0.0725026174383,0.0724872425989,0.0725569418707,0.0725887165386,0.0727199151678,0.0728183141396,0.0727916644181,0.072762964718,0.0728480388291,0.0728131891932,0.0729915373297,0.0732252348878,0.0733267088276,0.0734128079279,0.0734435576066,0.0736188307752,0.0738074288046,0.0737049298756,0.0736813551219,0.0737479794258,0.073632155636,0.073624980711,0.0736342056146,0.0736188307752,0.0738084537939,0.0739529772838,0.0740811009451,0.0741262004739,0.0742809738567,0.0742266494243,0.0746345951618,0.0746561199369,0.0748662427413,0.0750230661027,0.0750579157386,0.0752793134253,0.0752987882218,0.0753725874507,0.0753520876649,0.0755939851373,0.0754474116689,0.0756647093984,0.0758184577919,0.0758994319458,0.0760859799966,0.0761454293754,0.0763360773834,0.07652877537,0.076567724963,0.0767317232494,0.0768536969749,0.0768721467822,0.07687522175,0.076945946011,0.0770771446402,0.0769121213645,0.0769449210218,0.0772349929909,0.0774010412559,0.0775353148529,0.0774348659024,0.0775619645744,0.077620388964,0.0778335867363,0.0779012360295,0.0782230826666,0.0783932308887,0.0784844549356,0.0786515281898,0.0788298763263,0.0791886225779,0.0794335950182,0.0796539677156,0.0796775424693,0.079906115081,0.0800916381425,0.0802279617181,0.0804975339014,0.0806277075412,0.0805508333445,0.0805364834944,0.0806307825091,0.080665632145,0.0809741539213,0.0809813288463,0.0809362293176,0.0807855558919,0.0806195076269,0.0807486562775,0.081259100944,0.082032967858,0.0825116378565,0.0832168304881,0.0840142721559,0.084777889177,0.085805953435,0.086985716108,0.0881511289309,0.0889885451809,0.0896968127804,0.0901488330574,0.0908806754105,0.0912804212337,0.0915346185777,0.0919056647007,0.0921260373981,0.091938464358,0.0918954148078,0.0922326362842,0.0924458340566,0.0926877315291,0.0925903575465,0.0927953554045,0.0929675536053,0.0931889512919,0.0934974730683,0.0939525683131,0.0941503912461,0.0942641650573,0.094248790218,0.094082741953,0.0943912637293,0.0947305351843,0.0949375830209,0.0951149061681,0.0951733305577,0.0956417506633,0.0959143978144,0.0960517463793,0.0964033177058,0.0969096624152,0.0971197852196,0.0969701367833,0.097340157917,0.0975636055823,0.0976835293292,0.097665079522,0.0977542535902,0.097862902455,0.0979572014697,0.0981457994991,0.0982370235459,0.0985352954293,0.098597819776,0.098685968855,0.0989719408669,0.0990867396674,0.0991318391962,0.0992753376968,0.0993347870756,0.0992927625147,0.0994567608012,0.099572584591,0.0994762355977,0.0995203101372,0.0997232580166,0.099791932299,0.100043054675,0.100340301569,0.10051249977,0.100508399813,0.100595523903,0.100653948292,0.100994244736,0.101177717819,0.101120318419,0.101401165485,0.10174043694,0.101881885462,0.102116608009,0.10244767955,0.102791050962,0.103161072096,0.103330195329,0.10363154218,0.103803740381,0.10403641295,0.104085612435,0.104235260872,0.104576582305,0.104796955003,0.104923028686,0.10527767498,0.105307399669,0.105513422517,0.105612846478,0.105756344978,0.106154040823,0.106192990416,0.106232964998,0.106424637996,0.106683960286,0.106682935297,0.107028356687,0.107046806495,0.107433227457,0.107782748805,0.107683324844,0.108113820346,0.108197869468,0.108441816919,0.108581215462,0.108752388673,0.109087560171,0.109295632997,0.109352007408,0.109382757087,0.109627729527,0.109852202182,0.109950601154,0.110214023401,0.110513320274,0.110959190615,0.110979690401,0.111319986845,0.111452210464,0.11151473481,0.111745357401,0.111854006265,0.112098978706,0.112087703824,0.112233252303,0.112046704252,0.112047729241,0.112245552174,0.112534599154,0.112729347119,0.112978419517,0.113034793928,0.113250041679,0.113476564312,0.113414039965,0.113860935296,0.114380604866,0.11461942737,0.11485107495,0.115157546748,0.115144221887,0.115354344691,0.115619816917,0.115830964711,0.116153836338,0.116259410234,0.116290159913,0.116241985417,0.116335259442,0.116409058671,0.116729880319,0.117066076806,0.117344873893,0.117543721815,0.117714895026,0.117630845905,0.117774344405,0.117936292713,0.117835843763,0.117788694255,0.118083891171,0.118072616289,0.118118740807,0.117957817488,0.117964992413,0.11817204025,0.118219189757,0.118292988986,0.118692734809,0.119114005408,0.118875182903,0.118834183331,0.118849558171,0.119288253587,0.119426627141,0.119431752087,0.119518876177,0.119715674121,0.119912472065,0.119880697397,0.11990529714,0.120240468637,0.120388067095,0.120334767652,0.120417791785,0.12059716491,0.120617664696,0.120547965424,0.120253793498,0.120141044676,0.120305042963,0.120263018402,0.12010619504,0.120102095083,0.120009846047,0.120095945147,0.120050845619,0.120061095512,0.120189219173,0.120295818059,0.120505940864,0.120588964996,0.120635089514,0.120778588015,0.120859562169,0.120653539321,0.120709913732,0.120617664696,0.120607414803,0.120586915017,0.120364492342,0.120127719815,0.120060070522,0.119958596583,0.119744373821,0.119713624142,0.119569100652,0.119336428083,0.11902380635,0.118882357828,0.118555386244,0.118282739093,0.117982417231,0.117551921729,0.117154225885,0.116789329697,0.116697080661,0.116538207321,0.116496182761,0.116257360256,0.115894514047,0.115840189615,0.115626991842,0.115436343835,0.115255945719,0.114975098654,0.114680926728,0.11456202797,0.114295530755,0.113978809064,0.113992133925,0.113345365683,0.113170092514,0.112999944292,0.113129092942,0.11294459487,0.112639148062,0.112376750803,0.112357276007,0.112226077378,0.112062079091,0.112265026971,0.112047729241,0.11189090588,0.11152908466,0.111547534468,0.111405060956,0.110979690401,0.110694743378,0.110501020402,0.109989550747,0.109605179763,0.109622604581,0.109459631284,0.109463731241,0.109375582162,0.109188009122,0.109290508051,0.109087560171,0.108976861328,0.109238233597,0.109179809207,0.108862062528,0.108683714391,0.108566865612,0.10822246921,0.107970321845,0.107842198184,0.107756099083,0.1075439263,0.107271279149,0.107081656131,0.107098055959,0.106911507908,0.106310864184,0.106011567312,0.105721495343,0.105516497484,0.105109576736,0.104928153632,0.104500733098,0.104086637425,0.103460368968,0.102812575737,0.102339030685,0.101759911736,0.101179767798,0.100128128786,0.0992630378253,0.0980802001845,0.0970049864191,0.0961101707689,0.0951272060396,0.0946013865338,0.0938408444805,0.0931141270738,0.0924694088103,0.0921762618733,0.0917129667141,0.091472094231,0.0914054699271,0.0910969481508,0.0911953471226,0.0909667745109,0.090931924875,0.0909759994145,0.0909329498643,0.0907433268457,0.090631603013,0.0905455039127,0.0903107813652,0.0902687568043,0.0899202604457,0.0896168636158,0.0893534413682,0.0892816921179,0.0890541444955,0.0888778463376,0.088868621434,0.0886625985867,0.0886379988437,0.0884606756965,0.0883653516925,0.0881818786096,0.0881521539202,0.087886681694,0.0875740599605,0.0873854619312,0.0873711120811,0.0874172365991,0.0872450383984,0.087190713966,0.0869826411401,0.0868647673718,0.0866423446958,0.0863727725125,0.0863666225768,0.0863030732408,0.0860765506076,0.0859535518928,0.0858418280602,0.0857055044846,0.0855343312732,0.0853980076976,0.0854051826226,0.0854574570764,0.0853098586186,0.0851837849359,0.0848988379133,0.0846395156229,0.0844816672722,0.0842438697569,0.0841987702281,0.0842141450675,0.0840634716418,0.0838020993728,0.0836821756259,0.0834228533355,0.0834741028,0.0833736538495,0.0832639799955,0.0831040816662,0.08280990974,0.0825598123532,0.0823343147093,0.0821662164657,0.0821118920334,0.0821559665728,0.0818494947751,0.0816947213923,0.0815696726989,0.0816065723133,0.0814917735128,0.0814661487806,0.0813902995731,0.0813144503656,0.081100227604,0.0809157295318,0.080729181481,0.08067280707,0.0805252086122,0.0802822861505,0.0802751112254,0.0799819642885,0.0797697915054,0.0796088681868,0.0794868944613,0.079249096946,0.0792152722994,0.0788452511657,0.0786054036718,0.0787202024723,0.0785613291323,0.0782927819383,0.0781216087268,0.0780385845943,0.0779463355582,0.0779688853226,0.0779340356867,0.0780508844658,0.0779945100549,0.0776009141674,0.0775517146815,0.0775937392424,0.0775506896922,0.0773754165236,0.077341591877,0.0771950184086,0.0771181442118,0.0769889955612,0.0769561959039,0.0767696478531,0.0767153234208,0.0765482501665,0.0764611260768,0.076416026548,0.0761843789685,0.0761003298467,0.0756124349446,0.0753602875792,0.0752916132968,0.0751368399139,0.0749349170238,0.0750835404709,0.0748980174093,0.0746561199369,0.0746622698726,0.0745792457401,0.0746540699583,0.0745126214362,0.074328123364,0.0744336972609,0.0743168484818,0.0741180005595,0.0741374753561,0.0742030746706,0.0739857769411,0.0738269036011,0.0738986528515,0.0738392034726,0.0736372805825,0.0736844300898,0.0737725791688,0.0737192797257,0.0736024309466,0.0736516304325,0.0735358066427,0.0734896821247,0.0732898092131,0.0733287588061,0.0735255567498,0.0732652094701,0.0730817363872,0.072999737244,0.0726932654462,0.0724923675454,0.0724462430273,0.0724247182522,0.0723919185949,0.0721428461974,0.0719050486821,0.0718906988321,0.0716816010169,0.0715145277626,0.0716529013167,0.0716057518094,0.0714653282767,0.0712070309755,0.0711281068002,0.0711301567788,0.0711844812112,0.0710594325178,0.0711045320465,0.0711045320465,0.0711742313183,0.0710901821965,0.0712449555793,0.0713638543369,0.0712603304186,0.0712500805257,0.0709671834816,0.0710450826677,0.0710194579354,0.0709477086851,0.0708185600346,0.0706730115554,0.0706402118981,0.0705397629477,0.0705049133118,0.0706299620052,0.0708370098418,0.0707365608914,0.0707519357307,0.0706678866089,0.0705120882368,0.0704946634189,0.0703398900361,0.0704229141686,0.0704444389437,0.0703398900361,0.0702209912784,0.0702671157965,0.0702035664605,0.0701789667175,0.0703388650468,0.0703050404002,0.0703521899076,0.0701953665462,0.0703552648754,0.0703378400575,0.070350139929,0.0702107413855,0.0703511649183,0.0703111903359,0.0701430920924,0.0701143923922,0.0700077935061,0.0700836427135,0.0699657689452,0.0698991446413,0.0699196444271,0.0699534690737,0.0697525711728,0.0699524440844,0.070113367403,0.0702763407001,0.0702773656894,0.0703224652181,0.0702363661178,0.0702732657322,0.0703132403145,0.0704054893506,0.0702958154966,0.0702486659893,0.0702988904645,0.070113367403,0.0702445660321,0.0703511649183,0.0703716647041,0.0702486659893,0.0702353411285,0.0701502670174,0.0700395681741,0.069954494063,0.0696910718154,0.0698888947484,0.0696869718583,0.0696234225223,0.0696623721153,0.0698448202089,0.0697505211942,0.0697658960336,0.0700047185382,0.0700446931205,0.0703532148968,0.070166666846,0.0704321390722,0.0702753157108,0.0701543669746,0.0699739688595,0.0700610929492,0.0700457181098,0.0701389921352,0.0701072174672,0.0700539180241,0.0701810166961,0.0700949175957,0.0700221433561,0.0700979925636,0.0701113174244,0.069922719395,0.0699698689023,0.0699749938488,0.070127717253,0.0700549430134,0.0698776198662,0.0698079205945,0.0698458451982,0.0699175944485,0.0698253454124,0.0698827448127,0.0698212454553,0.0698212454553,0.0696162475972,0.0697341213656,0.0698940196949,0.0700200933775,0.0701461670602,0.0701174673601,0.0704341890508,0.0705192631618,0.0705582127549,0.0705920374014,0.0706566117267,0.0704823635474,0.0703993394149,0.0704300890936,0.0705008133546,0.0705848624764,0.0705141382154,0.070445463933,0.0703880645327,0.0704741636331,0.0705008133546,0.0704956884082,0.0705766625621,0.0705981873372,0.0704854385153,0.0705438629048,0.0704372640186,0.0706494368017,0.0708318848953,0.0707960102702,0.0708318848953,0.070848284724,0.070848284724,0.0708267599489,0.0709538586209,0.0708913342742,0.0708759594348,0.0708974842099,0.0709712834388,0.0707929353023,0.0707386108699,0.0708195850239,0.070950783653,0.0709538586209,0.070880059392,0.0709846082996,0.0710717323892,0.07092618391,0.0707006862662,0.0708882593063,0.0710092080425,0.0710081830532,0.0708329098846,0.0710266328605,0.0711291317895,0.071077882325,0.0712408556221,0.0713269547225,0.0714991529232,0.0715340025591,0.071551427377,0.0716570012739,0.07190812365,0.0718097246781,0.0717707750851,0.0717441253636,0.071678526049,0.0717195256206,0.0717267005456,0.0717769250209,0.0718988987464,0.0718753239927,0.0718250995175,0.0717718000744,0.0718240745282,0.0717379754278,0.071947073243,0.0720536721292,0.072113121508,0.0721120965187,0.0720587970756,0.0720157475255,0.0720280473969,0.0720505971613,0.072098771658,0.0722812197516,0.0722227953621,0.0721592460261,0.0720772468829,0.0720290723862,0.0720854467972,0.0721428461974,0.0722535450408,0.0723662938627,0.0723181193661,0.0725046674169,0.072406268445,0.0723878186378,0.0725466919778,0.0726666157247,0.0726717406711,0.0728736635613,0.0730294619334,0.0730151120833,0.0730653365586,0.0729700125546,0.0730274119548,0.0732313848236,0.07307763643,0.072975137501,0.0729003132829,0.0728541887648,0.072777314568,0.072794739386,0.0727004403713,0.0727670646751,0.0728459888505,0.0728306140111,0.0728306140111,0.0729310629616,0.0730796864086,0.0732600845237,0.073031511912,0.0730530366871,0.0731452857232,0.0730140870941,0.0729730875225,0.0730110121262,0.0732795593202,0.073292884181,0.0732846842667,0.0730991612051,0.0732016601342,0.0732344597914,0.0734394576495,0.0735091569212,0.073473282296,0.0734814822104,0.0732149849949,0.0732785343309,0.0733779582921,0.0734353576923,0.0735019819962,0.0733472086134,0.0731042861516,0.0729310629616,0.0729771874796,0.0729126131543,0.0729556627045,0.0727834645038,0.0726266411424,0.0725528419135,0.0724995424704,0.0726327910781,0.0729730875225,0.0732395847379,0.0732201099414,0.0730868613337,0.0732016601342,0.0733113339882,0.0733431086562,0.0731883352734,0.073388208185,0.0734886571354,0.0732211349307,0.0731370858089,0.0733400336883,0.0734148579065,0.0734138329172,0.0734548324888,0.0733994830672,0.0736055059145,0.0734179328744,0.0734322827244,0.0734763572639,0.0735071069426,0.0733779582921,0.0733174839239,0.073458932446,0.0733718083563,0.0734261327887,0.0733185089132,0.0734097329601,0.0732057600913,0.0731709104554,0.0730837863658,0.0730222870084,0.07323650977,0.0732959591488,0.0731842353162,0.0731801353591,0.0732477846522,0.0730919862801,0.0731463107125,0.0732252348878,0.0733062090417,0.0734579074567,0.0732098600485,0.072936187908,0.0731524606482,0.0733369587205,0.0733359337312,0.0733933331314,0.0734558574781,0.073331833774,0.0733984580779,0.0733800082706,0.0736608553361,0.0737777041152,0.0736803301327,0.0735522064714,0.0735675813107,0.073702879897,0.0737069798542,0.0738094787832,0.0736967299613,0.0736834051005,0.0735491315035,0.0735060819533,0.0735194068141,0.0733820582492,0.073268284438,0.0731473357018,0.0732078100699,0.0732324098129,0.0732980091274,0.073243684695,0.0731206859802,0.0731360608196,0.0731493856804,0.0732703344166,0.0734743072853,0.0735737312465,0.0735419565785,0.0736065309038,0.0735337566642,0.0735142818676,0.0734671323603,0.073370783367,0.0733400336883,0.0732231849092,0.0730930112694,0.0730663615479,0.0729136381436,0.0729095381865,0.0728306140111,0.0728131891932,0.0730479117406,0.0731698854662,0.0732344597914,0.0732867342452,0.0734107579493,0.073292884181,0.0734866071568,0.0734138329172,0.0736926300041,0.0736731552076,0.0737080048435,0.073720304715,0.0736116558502,0.0737090298328,0.0736782801541,0.0736823801112,0.0736270306896,0.0736403555503,0.0734005080564,0.0735194068141,0.0732775093416,0.0732067850806,0.0731842353162,0.0730663615479,0.0730058871797,0.0730294619334,0.072897238315,0.0727219651464,0.0727270900928,0.0725200422562,0.0725559168814,0.0726737906497,0.0727455399,0.0727906394288,0.0727434899215,0.0729146631329,0.0729372128973,0.0729976872654,0.0730325369013,0.0730930112694,0.0731463107125,0.0728890384007,0.0728183141396,0.0726471409282,0.0727445149107,0.0726481659175,0.0726235661745,0.0725917915065,0.072628691121,0.0725805166243,0.0724985174811,0.07257231671,0.0725487419563,0.0725753916779,0.072515942299,0.0723724437984,0.0723375941626,0.072349894034,0.0721284963474,0.0720300973755,0.0648028978907,0.0575592985773,0.0503495239104,0.0431971486438,0.0)
m <- c(0.0432034220128,0.0504535359897,0.057835880237,0.0649834901282,0.0720726726906,0.0720675474863,0.0720521718735,0.0720019448715,0.0721987527159,0.0719783689318,0.0720255208112,0.0720490967509,0.0718410134571,0.0718820150913,0.072062422282,0.0721782518988,0.0722684554942,0.0723637842938,0.0721792769397,0.0723842851109,0.0726149193036,0.072498064646,0.0725462415662,0.0726456705293,0.0725226656265,0.0726005687316,0.0726436204476,0.0728209525157,0.0729121811519,0.0728312029243,0.0727584250235,0.0728312029243,0.072876304722,0.0727984016169,0.0729490826228,0.0728517037414,0.0727666253503,0.0728096770663,0.0728086520255,0.072669246469,0.0728465785371,0.0728568289457,0.0729501076636,0.0730321109321,0.0729511327045,0.07289783058,0.0730485115858,0.0729009057025,0.0730567119127,0.0730536367901,0.0729654832765,0.0731141142006,0.073033135973,0.0729285818056,0.0730003346656,0.0731192394049,0.0730269857279,0.0731130891598,0.0732945213914,0.0733908752319,0.0734031757221,0.0734052258038,0.0734052258038,0.073589733158,0.0735712824226,0.0735958834031,0.0737229884693,0.0738285676775,0.0736953123662,0.0736922372436,0.0734810788272,0.0735067048486,0.0736020336483,0.0735425812786,0.0737168382242,0.0738213923915,0.0737506645724,0.0737086378973,0.0737291387144,0.0739402971308,0.0740920031776,0.0740612519519,0.0741309547301,0.0742508845103,0.074117629199,0.0739167211912,0.0738490684946,0.0738347179226,0.0738798197203,0.0738439432904,0.0739023706192,0.0739085208643,0.0740089748682,0.0739495224986,0.073960797948,0.0740120499908,0.0741914321407,0.0742078327944,0.0742836858177,0.0740786776465,0.0739905241328,0.0740694522787,0.0738275426367,0.0737516896133,0.0737793657164,0.0738552187398,0.0736901871619,0.0735907581988,0.0735056798078,0.0736912122028,0.0738234424732,0.0736491855276,0.0736502105685,0.0738992954966,0.0739208213546,0.0739402971308,0.074088928055,0.0740971283819,0.0740028246231,0.0739300467223,0.0737875660433,0.0739587478663,0.0740212753585,0.073889045088,0.0740315257671,0.0740264005628,0.0740305007262,0.0740735524422,0.0741258295258,0.0742498594695,0.0743790146174,0.0742355088975,0.0742355088975,0.0742109079169,0.0741063537496,0.0740971283819,0.0741196792807,0.0742426841835,0.0742806106952,0.0742498594695,0.0741340298527,0.0741688812418,0.0741166041581,0.0741627309967,0.0742119329578,0.0741627309967,0.0740571517885,0.0738644441075,0.0739587478663,0.0737937162884,0.0737670652261,0.0738418932086,0.0738213923915,0.0738275426367,0.0736840369168,0.0737670652261,0.0737916662067,0.0737639901036,0.073440077193,0.0736030586891,0.073732213837,0.0737814157981,0.07386751923,0.0736553357728,0.0735815328311,0.0735220804615,0.0736840369168,0.0739587478663,0.0742857358994,0.0742027075901,0.0741381300161,0.0740756025239,0.074124804485,0.0742806106952,0.0744425671505,0.0740868779733,0.0739566977845,0.0738736694752,0.0738398431269,0.0738654691483,0.0738859699655,0.0738511185763,0.0737219634284,0.0735938333214,0.0734318768661,0.0739136460686,0.0737937162884,0.0735671822591,0.0734759536229,0.0733211724536,0.0732012426734,0.0732504446345,0.0733129721268,0.0734462274381,0.0737557897767,0.0734062508447,0.0735015796443,0.0736625110588,0.073710687979,0.07390339566,0.0739126210277,0.0737557897767,0.0737947413292,0.0738367680044,0.0735600069731,0.0737281136736,0.0737311887962,0.073689162121,0.0736953123662,0.0735128550938,0.0736286847105,0.073696337407,0.0736245845471,0.0736409852008,0.0734667282552,0.0733631991287,0.0733303978213,0.0733129721268,0.0732770956968,0.0733990755587,0.0731346150178,0.0730351860547,0.0729644582356,0.0726938474495,0.0728414533329,0.0730064849107,0.0727348490838,0.0727092230624,0.0726651463056,0.0725759677511,0.0725749427102,0.0725534168522,0.0724990896868,0.0726682214281,0.0727799508815,0.0726610461421,0.0728199274749,0.0728373531694,0.0727276737978,0.0726958975313,0.0728793798445,0.0730854130567,0.0731100140372,0.0730095600333,0.0728178773932,0.07279020129,0.0726938474495,0.0725113901771,0.072541116362,0.072483714074,0.0724878142374,0.0723012568016,0.0722541049222,0.0723750597432,0.0723668594164,0.0723607091712,0.0724427124397,0.0723719846207,0.0722192535331,0.0720009198307,0.0718625393151,0.0718871402956,0.0717169835135,0.0715468267313,0.0715755278753,0.0714699486671,0.071399220848,0.0713366933558,0.0712956917215,0.071520175669,0.0715755278753,0.071363344418,0.0714586732177,0.0713377183966,0.071348993846,0.0715611773033,0.0714227967877,0.0713961457254,0.0713797450717,0.0714227967877,0.071370519704,0.0714842992391,0.0715027499745,0.0715058250971,0.0713694946632,0.071028156058,0.0710722328148,0.0711737118596,0.071206513167,0.0711019589997,0.0710558321611,0.0709594783206,0.0709420526261,0.0707903465793,0.070799571947,0.0708877254607,0.0709092513187,0.0708990009101,0.0709020760327,0.0707452447817,0.070828273091,0.0709441027078,0.0709338522992,0.0710804331417,0.0712259889433,0.0712229138207,0.0713059421301,0.071348993846,0.0711931876359,0.0711860123499,0.0710086802817,0.0708867004198,0.0709379524626,0.070700142984,0.0705166606707,0.0704848844041,0.0702480999663,0.0702009480869,0.0703495790111,0.0704028811356,0.0704377325248,0.0703475289294,0.0701179197776,0.0702870515189,0.0704182567485,0.0703598294197,0.0704756590364,0.0703372785208,0.0704592583827,0.0705750879995,0.0706376154917,0.0707062932291,0.0707954717836,0.0706078893069,0.070428507157,0.070471558873,0.0705340863652,0.0708559491941,0.0705617624684,0.0705453618147,0.0702173487406,0.0703403536434,0.0703106274586,0.07067144184,0.0707062932291,0.0707483199042,0.0705730379178,0.0703598294197,0.0703424037251,0.0702891016006,0.0705802132038,0.070450033015,0.0704315822796,0.0703085773769,0.0705340863652,0.0705556122232,0.0706406906143,0.0707831712933,0.0710558321611,0.0710691576923,0.0710189306903,0.0711060591631,0.0711224598168,0.0711163095716,0.0709656285658,0.0708795251338,0.0709881794646,0.0710261059763,0.0709758789743,0.0709236018907,0.0709236018907,0.0708754249704,0.0708415986221,0.0709482028712,0.0708518490307,0.0709389775035,0.0708200727642,0.0705750879995,0.0704736089547,0.0704920596901,0.0703331783574,0.0702634755792,0.0705320362835,0.070628390124,0.0705699627952,0.0706160896338,0.070536136447,0.070685792412,0.0708262230093,0.0709010509918,0.0709758789743,0.0711122094082,0.0710199557312,0.0708815752155,0.071020980772,0.0708477488673,0.0710650575288,0.0711675616145,0.0711675616145,0.0712331642293,0.0714330471963,0.0714156215017,0.0713356683149,0.0713223427838,0.0715119753422,0.0716442056127,0.0715427265679,0.0714924995659,0.0714935246068,0.0713315681515,0.0713807701126,0.0713459187235,0.0716298550407,0.0717087831866,0.0714412475231,0.0717374843306,0.0718861152548,0.0718830401322,0.0718645893968,0.071962993319,0.0719404424201,0.0721280248968,0.0720224456886,0.0721259748151,0.0723719846207,0.0722418044319,0.0721382753054,0.0720613972412,0.0719896443812,0.0720952235894,0.072076772854,0.0721792769397,0.0721792769397,0.0721064990389,0.0721177744883,0.0721680014902,0.0723863351926,0.0725585420565,0.0727235736344,0.0728435034146,0.0729552328679,0.0730034097882,0.0731694664069,0.073225843654,0.0732073929186,0.073261720084,0.0734236765393,0.0735548817689,0.0737547647359,0.0737229884693,0.0738644441075,0.0738521436172,0.0739720733974,0.0742611349189,0.0743913151076,0.0743933651893,0.0743082867983,0.0743328877788,0.0742447342652,0.0742683102049,0.074288811022,0.0745522465221,0.0746404000357,0.0747490543665,0.0749889139269,0.0751129438705,0.0751723962402,0.0752666999989,0.07538765482,0.0755957381138,0.0759165759019,0.0759114506976,0.0758632737773,0.0758027963668,0.0758427729602,0.0760283053552,0.0762240881588,0.0762312634448,0.0765746521316,0.0768893396745,0.0767427588321,0.0768298873049,0.0771620005423,0.0773383075696,0.0772675797505,0.0773629085501,0.0775515160677,0.0777862504238,0.0777431987078,0.0777893255464,0.0779748579414,0.0779195057351,0.0778723538557,0.0781286140698,0.0783284970368,0.0785324801672,0.0785919325369,0.0786882863774,0.0788184665661,0.0788276919339,0.0790009238386,0.0793074110546,0.0795093441033,0.0792766598289,0.0794416914068,0.079511394185,0.0794683424691,0.0794632172648,0.0795165193893,0.0798189064419,0.0799193604458,0.0800341650218,0.0800054638778,0.0804154802203,0.0806789157204,0.0805764116348,0.0809259505668,0.0812221873742,0.0814292456272,0.0814220703412,0.0814897230378,0.0816465542888,0.081916140034,0.0819243403608,0.0818935891351,0.0821201231644,0.0822984802734,0.0823743332968,0.0825629408143,0.0825824165906,0.082807925579,0.0830385597717,0.0830580355479,0.0832968700675,0.0834988031162,0.0838473170073,0.0838862685599,0.0840031232175,0.0841374035697,0.0844623415211,0.0845392195853,0.084470541848,0.0846283981399,0.0847565282469,0.0850476398501,0.0850732658715,0.0852393224902,0.0854156295175,0.0855232588074,0.0856062871168,0.0856698396499,0.0857128913659,0.085940450436,0.085883048148,0.0859988777648,0.0861249577901,0.0861751847921,0.0863371412474,0.0865882762572,0.0866661793622,0.0869654912923,0.0874154842282,0.087666619238,0.0879567058004,0.087938255065,0.0879700313315,0.0885040776177,0.0888751424076,0.0888464412637,0.0890575996801,0.0892113558085,0.0891549785614,0.0890514494349,0.0890842507423,0.0891734292968,0.0893271854253,0.0891734292968,0.0890699001703,0.0892267314214,0.089115001968,0.0890965512326,0.0892421070342,0.0894009883669,0.0895906209254,0.0898776323651,0.0900980161493,0.0901164668847,0.0903183999334,0.0905326334723,0.0907130406631,0.0908780722409,0.0910543792682,0.0912132606009,0.0913598414434,0.0914428697528,0.0915074473267,0.0918559612179,0.0921316972082,0.092254702111,0.0928892024011,0.0935114022008,0.0941223265512,0.0950376880359,0.0958054436373,0.096935038661,0.097990830743,0.0989943457414,0.0999794100043,0.101094654456,0.101909561937,0.102601464515,0.103618305044,0.104103149369,0.104614644757,0.104891405788,0.105364974664,0.105686837492,0.105982049259,0.106129655142,0.106329538109,0.106792856576,0.106840008456,0.107148545754,0.107573937709,0.107878374843,0.108096708546,0.108167436365,0.108409346007,0.108444197396,0.108668681343,0.108737359081,0.108790661205,0.108908540904,0.109061271991,0.10926320504,0.109349308472,0.109491789151,0.109516390132,0.109854653614,0.109905905657,0.110023785356,0.110178566525,0.110414325922,0.110437901862,0.110325147367,0.110502479435,0.110749514282,0.110780265508,0.111089827846,0.111236408689,0.111593122907,0.111737653667,0.111713052687,0.11211179358,0.112473633002,0.112568961802,0.112605863273,0.112856998282,0.1130456058,0.113230113154,0.113067131658,0.113215762582,0.113543775656,0.113606303148,0.113981468102,0.114299230767,0.114363808341,0.114705146946,0.114786125174,0.115118238412,0.115536455081,0.116032574855,0.116152504636,0.116343162235,0.116144304309,0.116243733272,0.117035064813,0.117262623883,0.117525034342,0.117598837284,0.11804883022,0.118144159019,0.118328666374,0.118535724627,0.119087196607,0.119694020794,0.11948491246,0.119513613603,0.119725797061,0.120023058909,0.119860077413,0.119978982152,0.120163489506,0.120237292448,0.12022806708,0.12015528918,0.120305970185,0.120440250538,0.120595031707,0.120678060016,0.120611432361,0.120738537427,0.120592981625,0.120583756258,0.120345946779,0.120005633215,0.119930805232,0.119842651718,0.119736047469,0.119874427985,0.11983240131,0.119669419814,0.119843676759,0.119922604905,0.12015631422,0.120182965283,0.120403349067,0.120494577703,0.120525328929,0.120376698005,0.120409499312,0.120008708337,0.1199400306,0.119649944037,0.119513613603,0.119433660417,0.119121022956,0.119124098078,0.118980592358,0.118604402364,0.118412719724,0.118666929856,0.118431170459,0.118633103508,0.118613627732,0.118543924953,0.118414769805,0.118279464412,0.118083681609,0.118186185695,0.11812058308,0.117762843821,0.117904299459,0.117811020741,0.117776169352,0.117671615185,0.117626513387,0.117452256441,0.117300550395,0.117386653827,0.117456356605,0.117443031074,0.117264673965,0.116892584134,0.116409789891,0.116260133925,0.116135078941,0.115971072404,0.115835767011,0.115543630367,0.115241243314,0.115357072931,0.114987033182,0.114912205199,0.114806625991,0.114671320598,0.114295130604,0.114124973822,0.11385948824,0.113616553557,0.113546850779,0.113145034763,0.113044580759,0.112804721199,0.112610988477,0.112420330878,0.112264524667,0.111974438105,0.112011339576,0.111785830588,0.111454742391,0.111334812611,0.111319436998,0.111233333566,0.111239483811,0.111048826212,0.111028325395,0.11091454586,0.110658285646,0.110620359134,0.110571157173,0.110252369467,0.109803401571,0.109397485392,0.109136099974,0.108806036818,0.10847289854,0.108181786937,0.107949102662,0.107628264874,0.107417106458,0.107231574063,0.107164946407,0.107050141831,0.106598098814,0.10649764481,0.106284436312,0.106316212578,0.106105054162,0.10580369215,0.105523855996,0.105431602319,0.105268620823,0.105047211998,0.105007235405,0.104800177152,0.104877055216,0.10463002037,0.104423987157,0.104404511381,0.104197453128,0.103824338256,0.103540401939,0.103506575591,0.103486074774,0.103370245157,0.103112959902,0.102920252221,0.102782896746,0.102590189065,0.102276526563,0.102292927217,0.101988490083,0.101713779133,0.101473919573,0.101421642489,0.101198183583,0.100961399145,0.100765616341,0.100470404575,0.10048885531,0.100121890683,0.100024511802,0.0997241748311,0.0995714437435,0.0993643854905,0.0989574442706,0.0987913876518,0.0984941258035,0.0983137186128,0.0982009641186,0.0983434447976,0.0982870675505,0.0983239690213,0.0981384366263,0.0979293282916,0.0980748840932,0.0979088274745,0.0978421998189,0.097812473634,0.0977776222449,0.0974537093343,0.0973901568012,0.097142096914,0.0971164708926,0.0967823075734,0.0965752493204,0.0964840206842,0.0963374398418,0.0961970092444,0.0957839177793,0.0954969063396,0.0952539716566,0.095108415855,0.0947558018004,0.0947240255339,0.0945569438743,0.0943293848042,0.0943017087011,0.0940895252438,0.0940403232827,0.0938937424403,0.0937656123332,0.0935862301834,0.0933525208681,0.0930829351229,0.0927702976617,0.0927231457823,0.0921347723308,0.0919379644864,0.0916878545174,0.0915843253909,0.0913854674648,0.0913946928325,0.0912296612546,0.090991851776,0.090991851776,0.090592085842,0.0904096285696,0.0900170379216,0.0895680700265,0.0890391489447,0.0884753764737,0.0876799447692,0.0869070639635,0.0862848641637,0.0853090252685,0.0844766920931,0.0839190698673,0.0833112206395,0.0827054214934,0.082065795999,0.081494848242,0.0809177502399,0.0806543147398,0.0803283517475,0.0801151432494,0.0800474905529,0.0798291568505,0.0796907763349,0.0795585460644,0.0795482956559,0.0795093441033,0.0795349701247,0.0793740387103,0.0793730136694,0.0793678884651,0.0792694845429,0.0790860022296,0.0789219956926,0.0787159624805,0.0786811110914,0.0785714317198,0.0785017289415,0.0785878323735,0.0783192716691,0.0781839662761,0.0779553821651,0.0777534491164,0.0774397866144,0.0773393326105,0.0770092694547,0.07687191398,0.0766453799507,0.0763798943689,0.0763993701452,0.0762107626276,0.0761728361159,0.0761820614837,0.0761287593591,0.0762743151607,0.0762527893027,0.0761297844,0.0761318344817,0.0761882117288,0.0760754572346,0.0760713570712,0.075894025003,0.0758366227151,0.0757330935886,0.0753630538394,0.0754112307597,0.0752646499172,0.0751119188296,0.0748413080436,0.0746896019968,0.0744066907205,0.0743841398216,0.0741637560375,0.0741401800978,0.0742098828761,0.0740684272379,0.0739761735608,0.0740028246231,0.0740305007262,0.0739279966406,0.0739454223351,0.0739074958234,0.073953622662,0.0738429182495,0.0737619400218,0.0736215094245,0.0736409852008,0.0734780037046,0.0732309688583,0.0732002176326,0.0731387151812,0.073025960687,0.0729767587259,0.0728814299263,0.0728896302531,0.07289783058,0.0727317739612,0.0727666253503,0.0727799508815,0.0727256237161,0.0727338240429,0.072690772327,0.0726743716733,0.0727245986752,0.0724673134203,0.0724960145643,0.0724806389514,0.0723689094981,0.072326882823,0.0722735806984,0.0722059280019,0.0721885023074,0.0722469296362,0.0720470466692,0.0720818980583,0.0718799650096,0.0717477347391,0.0716923825329,0.0714822491574,0.0715212007099,0.0714750738714,0.0713038920484,0.0710291810989,0.0711665365736,0.0710896585094,0.0710025300366,0.0709451277486,0.0709092513187,0.0711542360833,0.0709769040152,0.0708549241533,0.0709451277486,0.0710066302,0.0710076552409,0.0710291810989,0.0710168806086,0.0709646035249,0.0710681326514,0.0710117554043,0.0710384064666,0.0709051511552,0.0707913716202,0.0708385234996,0.0707370444548,0.0707841963342,0.0706755420034,0.0706888675346,0.0705453618147,0.0704028811356,0.0702870515189,0.0704490079742,0.0703608544605,0.0702880765597,0.0702275991492,0.0699159867289,0.0700082404059,0.0701015191239,0.0701086944099,0.0701209949001,0.0702829513554,0.0701199698593,0.0701568713301,0.0698944608709,0.069958013404,0.0700041402425,0.0699282872192,0.0698452589098,0.0696679268416,0.0694916198144,0.069408591505,0.069601299186,0.0696248751257,0.0699477629954,0.0698247580927,0.0699764641394,0.070086143511,0.0699498130771,0.06996518869,0.0701179197776,0.0701045942464,0.0698883106258,0.0698708849312,0.0697704309273,0.0698831854215,0.0698473089915,0.0698022071938,0.0700441168359,0.0701917227192,0.070165071657,0.0702522001298,0.0701763471064,0.0702891016006,0.070136370513,0.0701609714935,0.0700984440013,0.0701045942464,0.0700000400791,0.0699559633223,0.0700871685519,0.0698503841141,0.0700851184702,0.0699323873826,0.0700215659371,0.0699682638126,0.0699467379546,0.0699426377911,0.0698165577658,0.0699785142211,0.0699928647931,0.0700851184702,0.0700256661005,0.0700318163456,0.069943662832,0.069822708011,0.0698042572755,0.0697499301102,0.0699785142211,0.0695766982054,0.0693122376645,0.0693522142579,0.0694864946101,0.0695674728377,0.069765305723,0.0698708849312,0.0699744140577,0.069943662832,0.0698688348495,0.0700697428573,0.0700902436745,0.0700379665908,0.0698739600538,0.0698585844409,0.0696187248805,0.0696546013105,0.0696669018008,0.0698534592366,0.0697591554779,0.069750955151,0.0699272621783,0.0699969649565,0.0701158696959,0.070129195227,0.0704110814625,0.070314727622,0.0702962768866,0.0702050482504,0.0704582333419,0.0703895556045,0.0703208778671,0.0704725839139,0.0704992349761,0.0704961598536,0.070186597515,0.0703475289294,0.0703239529897,0.0703639295831,0.0701824973515,0.0702327243535,0.0702747510286,0.0701240700227,0.0700779431842,0.070150721085,0.0702901266414,0.0703024271317,0.0705586873458,0.070485909445,0.0705474118964,0.0706734919217,0.0707585703128,0.0707462698225,0.0707616454354,0.070871324807,0.0708538991124,0.0706816922486,0.0705176857115,0.0707124434743,0.0707165436377,0.0707103933925,0.070842623663,0.0709133514821,0.0708918256241,0.0707718958439,0.0708374984587,0.0708682496844,0.0709769040152,0.0708672246436,0.070985104342,0.0711316851845,0.0712013879627,0.0713223427838,0.0714443226457,0.0714381724005,0.0715591272216,0.0717979617411,0.0717661854746,0.0718399884162,0.0718850902139,0.0716257548772,0.0715314511185,0.0714719987488,0.0715068501379,0.0716114043053,0.0717139083909,0.0716923825329,0.0715755278753,0.0716821321243,0.0716370303267,0.0718123123131,0.071734409208,0.0717672105154,0.0645744988265,0.0573633364022,0.0501470487736,0.0429543370847,0.0)
ycorr <- c(6.24580747381e-05,6.23204958308e-05,6.19116568117e-05,6.12268215161e-05,6.02623674966e-05,5.90152096877e-05,5.74833359621e-05,5.5954279436e-05,5.44290357471e-05,5.29025969282e-05,5.13787542599e-05,4.98520677159e-05,4.83267738795e-05,4.67961281538e-05,4.52606623226e-05,4.37269497009e-05,4.21921761909e-05,4.06566646901e-05,3.9120850442e-05,3.75890734301e-05,3.60598192561e-05,3.45316595835e-05,3.30017843106e-05,3.14677313052e-05,2.99321687708e-05,2.83948534106e-05,2.68514884335e-05,2.53068689207e-05,2.37639058958e-05,2.22159360703e-05,2.06560306286e-05,1.90872855804e-05,1.75027453918e-05,1.59087041934e-05,1.4301838269e-05,1.26830850147e-05,1.10560758788e-05,9.41709516253e-06,7.76332613979e-06,6.09701126721e-06,4.42655726944e-06,2.75179881591e-06,1.06925924022e-06,-6.16989528866e-07,-2.30386372897e-06,-3.98996039768e-06,-5.67979408403e-06,-7.37504433139e-06,-9.07950133325e-06,-1.07945666839e-05,-1.25210582511e-05,-1.42650688679e-05,-1.60198461508e-05,-1.77887229683e-05,-1.95735209728e-05,-2.13836570905e-05,-2.32142828842e-05,-2.5061549251e-05,-2.69184848094e-05,-2.87783710239e-05,-3.06544719815e-05,-3.25435077967e-05,-3.44421234658e-05,-3.635115906e-05,-3.82732313137e-05,-4.02016883486e-05,-4.21354303506e-05,-4.40796671486e-05,-4.60408977163e-05,-4.80328839455e-05,-5.00390972291e-05,-5.20472049178e-05,-5.40646776792e-05,-5.60917846741e-05,-5.81238515219e-05,-6.01572068381e-05,-6.21959199442e-05,-6.4235809717e-05,-6.6275668525e-05,-6.83077492164e-05,-7.03290784557e-05,-7.23522782584e-05,-7.43775776505e-05,-7.64011086901e-05,-7.84202386361e-05,-8.04441901729e-05,-8.24628898365e-05,-8.44752660061e-05,-8.64775403615e-05,-8.84649038919e-05,-9.04405995446e-05,-9.24025084941e-05,-9.43513059114e-05,-9.62919642518e-05,-9.82246400644e-05,-0.000100148941999,-0.000102068888077,-0.000103991989814,-0.000105921534345,-0.000107859041205,-0.00010981383091,-0.000111784715673,-0.000113770778332,-0.000115766648615,-0.000117765293002,-0.000119759222322,-0.000121753332557,-0.000123737726098,-0.000125709865997,-0.000127667500989,-0.000129611849516,-0.000131541718289,-0.000133454000734,-0.000135344861985,-0.000137220624238,-0.000139089567114,-0.000140951934572,-0.000142812069929,-0.000144674646494,-0.000146542696019,-0.000148409084992,-0.000150271887976,-0.000152125727726,-0.000153977727203,-0.000155831158462,-0.000157680272625,-0.000159526103438,-0.000161374887382,-0.000163219826596,-0.00016505757467,-0.000166887949358,-0.000168715525695,-0.000170543018925,-0.000172375863078,-0.000174211453327,-0.000176049854423,-0.000177891451554,-0.00017972109032,-0.000181534119171,-0.000183331177971,-0.000185117953709,-0.000186893999544,-0.000188663452267,-0.00019042596967,-0.000192176174598,-0.000193915479298,-0.000195637991658,-0.0001973498301,-0.000199057680461,-0.000200770208076,-0.000202479338671,-0.000204183760514,-0.000205879235441,-0.000207558821646,-0.000209225363889,-0.00021087905874,-0.000212519077197,-0.000214150701517,-0.000215772593145,-0.000217383035404,-0.000218980785495,-0.000220568267854,-0.000222149139821,-0.000223724976763,-0.000225299741539,-0.000226874014886,-0.000228452701088,-0.000230030526822,-0.00023161145369,-0.000233190646334,-0.000234772174363,-0.000236354730503,-0.000237937254883,-0.00023951913349,-0.000241099381157,-0.000242672316885,-0.000244231896563,-0.000245774241831,-0.000247302102098,-0.000248812013106,-0.000250308745839,-0.000251790780148,-0.000253259253792,-0.000254715407006,-0.000256156243948,-0.000257585020071,-0.000259009107491,-0.000260434308546,-0.00026185309663,-0.000263270785377,-0.000264685456671,-0.000266098110048,-0.000267506869207,-0.000268907541535,-0.000270304544419,-0.000271698455086,-0.000273087095806,-0.000274468683129,-0.000275845586567,-0.000277221913017,-0.000278596384946,-0.000279969010614,-0.000281336758511,-0.000282704668271,-0.000284072513806,-0.000285435882494,-0.000286792598062,-0.00028814609334,-0.000289498643913,-0.000290847551764,-0.000292194499167,-0.000293534572576,-0.000294870557937,-0.000296202565902,-0.00029752202337,-0.000298836815597,-0.00030014549468,-0.000301448043218,-0.00030274322935,-0.000304030795091,-0.000305306927558,-0.000306576185253,-0.000307838284841,-0.000309090078786,-0.000310338039379,-0.000311581853821,-0.000312822506389,-0.000314061543569,-0.000315299115075,-0.000316532047989,-0.000317755375317,-0.000318973874629,-0.000320184867802,-0.000321392083043,-0.000322600782996,-0.00032381018612,-0.000325025068875,-0.000326243039997,-0.000327463872662,-0.000328686659588,-0.000329918171477,-0.000331156053399,-0.000332399865238,-0.000333652214431,-0.0003349086508,-0.000336163230008,-0.000337413366456,-0.000338656453348,-0.000339893664885,-0.000341124694765,-0.000342352966309,-0.000343575375219,-0.000344795916389,-0.000346010814792,-0.000347216260262,-0.000348412631482,-0.000349601108767,-0.000350779670607,-0.000351948220373,-0.000353107723312,-0.000354259477368,-0.000355401896567,-0.000356536454528,-0.000357661983921,-0.000358781349655,-0.000359894182442,-0.000361004594333,-0.000362116145247,-0.000363227077636,-0.000364337036857,-0.000365436091362,-0.000366529436238,-0.000367607956918,-0.000368673075902,-0.0003697270115,-0.000370774534698,-0.000371816336349,-0.00037285251749,-0.00037387914745,-0.000374897964531,-0.000375918526355,-0.000376938707602,-0.000377954752554,-0.00037896977204,-0.000379973924492,-0.000380959141479,-0.000381916016653,-0.000382836316265,-0.000383709780713,-0.000384534277087,-0.000385296559814,-0.000385986183612,-0.000386614294217,-0.000387181486608,-0.000387693000966,-0.00038815438469,-0.000388571710077,-0.000388948086966,-0.000389301404592,-0.000389643742799,-0.000389987346413,-0.000390350281522,-0.000390735038343,-0.00039113620088,-0.000391555123536,-0.000391994570357,-0.000392455886673,-0.000392944591432,-0.000393458010884,-0.000393988009826,-0.000394529150798,-0.000395072951187,-0.000395611726761,-0.000396147324372,-0.000396679101115,-0.000397207580698,-0.000397727851706,-0.000398239190496,-0.000398741657026,-0.000399234673375,-0.000399718481367,-0.000400188830953,-0.000400647487714,-0.000401093616957,-0.000401530049061,-0.000401955483028,-0.000402372427841,-0.000402781391217,-0.000403179269911,-0.000403564764331,-0.000403940500106,-0.000404311408174,-0.000404682988316,-0.000405054914535,-0.00040543432293,-0.000405816458844,-0.000406202520075,-0.000406588715446,-0.000406978296424,-0.000407369869603,-0.000407761385833,-0.000408151479646,-0.000408534686526,-0.000408909047079,-0.000409269299244,-0.000409615751905,-0.000409949653572,-0.000410271103872,-0.000410578142892,-0.000410869677632,-0.000411146502627,-0.000411410275986,-0.000411661433379,-0.000411902318859,-0.000412134858886,-0.000412362894379,-0.000412579400518,-0.000412788203572,-0.000412991811473,-0.000413190614164,-0.000413385405526,-0.000413577655167,-0.000413765829436,-0.000413950635118,-0.00041413051709,-0.000414303124054,-0.0004144736549,-0.000414641285822,-0.000414799708851,-0.000414952165333,-0.000415098137684,-0.000415233724608,-0.000415360954871,-0.000415478460374,-0.000415588576671,-0.000415689677302,-0.00041577881503,-0.00041585610475,-0.000415925438651,-0.000415988764876,-0.000416043731606,-0.000416090766149,-0.000416131413869,-0.000416165648859,-0.00041618884624,-0.000416203465795,-0.000416209910554,-0.000416209029146,-0.000416196199279,-0.000416169438606,-0.000416129232222,-0.000416076476273,-0.00041601527109,-0.000415940951453,-0.000415855750097,-0.000415760629295,-0.00041565095429,-0.000415527517446,-0.00041539022194,-0.000415244613151,-0.000415091169671,-0.000414928180166,-0.000414747920463,-0.000414553347546,-0.000414345219041,-0.000414120583099,-0.00041388437001,-0.000413637001072,-0.000413383697304,-0.000413118162341,-0.000412834497356,-0.00041253672114,-0.000412227578122,-0.000411910078177,-0.000411580470045,-0.000411240411957,-0.000410888054351,-0.000410525093758,-0.000410148736707,-0.000409755449271,-0.000409351598918,-0.000408934029557,-0.000408500833649,-0.000408050215025,-0.000407587119042,-0.000407109209215,-0.00040662017342,-0.000406117539886,-0.000405595358327,-0.000405056357363,-0.000404501495083,-0.000403931765895,-0.000403350990136,-0.000402757171455,-0.000402142425572,-0.000401507970773,-0.000400854569983,-0.000400180907198,-0.000399491855453,-0.000398793035084,-0.000398079482693,-0.000397349632901,-0.00039659982406,-0.000395832806206,-0.000395049196138,-0.000394253797559,-0.000393440625086,-0.000392605376826,-0.000391747439585,-0.000390866015126,-0.000389965639518,-0.000389050545687,-0.000388123071892,-0.000387182228548,-0.000386227755963,-0.000385257794225,-0.000384271947548,-0.000383272914415,-0.000382266732006,-0.000381250421,-0.000380217029677,-0.000379161194366,-0.000378082261715,-0.000376978987632,-0.000375856740465,-0.000374712837413,-0.00037355204743,-0.000372377982952,-0.000371185014153,-0.000369972155128,-0.000368739013352,-0.000367492272321,-0.000366224900446,-0.000364939173534,-0.000363628008508,-0.000362293451871,-0.000360935555895,-0.000359551515061,-0.000358143528039,-0.000356710965252,-0.000355257966652,-0.000353783512167,-0.000352289455687,-0.00035077818555,-0.000349249801653,-0.00034770689721,-0.000346143579931,-0.000344562140901,-0.000342961564861,-0.000341340204765,-0.000339700802198,-0.000338038272758,-0.000336356330791,-0.000334652156034,-0.000332928221029,-0.000331183126769,-0.000329421515553,-0.000327638531071,-0.000325829438752,-0.000323996082224,-0.000322141834235,-0.00032026916409,-0.00031837867487,-0.000316470851129,-0.000314545949815,-0.00031260120723,-0.000310634550779,-0.00030864418701,-0.000306637798332,-0.000304616845065,-0.00030257408862,-0.000300503066125,-0.000298401045577,-0.000296268807227,-0.000294107573109,-0.000291920738855,-0.000289707500236,-0.000287471937441,-0.00028521204799,-0.000282926536744,-0.000280617207547,-0.000278290477272,-0.000275950839132,-0.000273596213106,-0.000271223096564,-0.00026882677701,-0.000266408019932,-0.000263966490184,-0.000261500692473,-0.000259015042239,-0.000256512041422,-0.000253988807904,-0.000251438365027,-0.00024886094463,-0.000246259429678,-0.000243636531197,-0.000240994483908,-0.000238332513238,-0.00023565325987,-0.00023295139919,-0.00023022220479,-0.000227466723375,-0.000224688828287,-0.000221892908076,-0.000219079949378,-0.000216247189612,-0.00021339307885,-0.000210518473079,-0.000207620770718,-0.000204698642953,-0.000201755730759,-0.00019879351426,-0.000195808136931,-0.000192796568662,-0.000189759107211,-0.000186697936583,-0.000183614678851,-0.000180509059941,-0.000177383734529,-0.000174238319998,-0.000171075080302,-0.000167893350008,-0.000164694990821,-0.000161479153434,-0.000158245847662,-0.000154991768078,-0.000151715907092,-0.00014842376941,-0.000145114342813,-0.000141786588633,-0.000138439630901,-0.000135071712216,-0.000131685588469,-0.000128283361929,-0.000124867352229,-0.000121438893533,-0.000118000853078,-0.000114540043052,-0.000111054868926,-0.000107547920004,-0.000104019800755,-0.00010047246317,-9.69088880499e-05,-9.33254240508e-05,-8.9714580847e-05,-8.60814192086e-05,-8.24226126003e-05,-7.87447239676e-05,-7.50526669036e-05,-7.13456108731e-05,-6.74853857175e-05,-6.3340315819e-05,-5.88022519942e-05,-5.37888149963e-05,-4.75721640071e-05,-4.25703365136e-05,-3.80433410889e-05,-3.39099150367e-05,-3.00591428693e-05,-2.63649463873e-05,-2.26916200491e-05,-1.91753370505e-05,-1.59418505069e-05,-1.30953398936e-05,-1.07188199613e-05,-9.53965190714e-06,-7.1403684415e-06,-4.2603143777e-06,-9.82899780095e-07,2.58516891497e-06,6.31654212079e-06,1.00773732371e-05,1.38663971289e-05,1.76767150235e-05,2.15057718525e-05,2.5358737263e-05,2.92269231932e-05,3.31110173436e-05,3.70135875168e-05,4.09370893118e-05,4.48816571917e-05,4.88442533158e-05,5.28244228581e-05,5.68224994325e-05,6.08408928171e-05,6.48749641111e-05,6.89220212884e-05,7.29868374194e-05,7.7064587823e-05,8.11541475796e-05,8.52479632727e-05,8.93481371542e-05,9.34530938926e-05,9.75627593923e-05,0.000101677535098,0.000105796296344,0.000109923383346,0.000114059218268,0.000118203814641,0.000122356413294,0.000126522233615,0.000130701720134,0.000134895241901,0.000139104966738,0.000143330094482,0.0001475685333,0.000151822404412,0.000156087977453,0.000160364048007,0.000164651022196,0.000168951401658,0.000173262317631,0.000177581482743,0.000181910656158,0.000186245772429,0.000190589941445,0.00019494331622,0.000199303426299,0.000203675161424,0.000208056909218,0.0002124428908,0.000216833752222,0.00022123025425,0.000225635029849,0.000230045527851,0.000234461858154,0.000238880818887,0.000243305953996,0.000247736632421,0.000252174082797,0.000256620498587,0.00026107975085,0.0002655524639,0.000270034819149,0.00027453294434,0.000279045925712,0.000283573821731,0.000288114056458,0.000292665169641,0.000297225377456,0.000301791437937,0.00030636179945,0.00031093515456,0.000315508721532,0.000320079594506,0.00032464434707,0.000329200939236,0.000333754182229,0.000338302301943,0.000342842244089,0.000347378223764,0.000351910440371,0.000356440382386,0.00036096805359,0.000365492751831,0.000370014212252,0.00037453047604,0.000379040797813,0.000383544891818,0.0003880452587,0.000392537780487,0.000397018560935,0.000401483154969,0.000405931069644,0.000410363613335,0.000414780465329,0.000419183858711,0.000423570803177,0.00042793585405,0.000432279058766,0.000436605331006,0.00044091843091,0.000445218042092,0.000449503955809,0.000453769594898,0.000458015974437,0.000462242819221,0.000466449836079,0.000470640704575,0.000474821208742,0.000478982005613,0.000483115586068,0.00048722290983,0.000491302907976,0.000495363399482,0.000499405828549,0.000503428754865,0.000507430128035,0.00051141211814,0.000515368548454,0.000519297194734,0.000523206309485,0.000527097145949,0.000530968402364,0.000534819122265,0.000538647622039,0.000542451342461,0.000546230031428,0.000549984926096,0.000553714714818,0.000557424176851,0.000561108053642,0.000564760739043,0.000568388175286,0.000571988478731,0.000575558082317,0.000579096423217,0.000582607489361,0.000586090061222,0.000589540630138,0.000592961620118,0.00059635602663,0.000599726209002,0.000603064520787,0.000606361074405,0.000609617804774,0.000612839489246,0.000616023048394,0.000619166793346,0.000622265635397,0.000625321370375,0.000628326562751,0.000631279939807,0.000634190097652,0.000637068647087,0.000639915455395,0.000642728016464,0.000645505159921,0.000648244069817,0.000650952573526,0.000653632160193,0.00065628398702,0.000658910598222,0.000661505043787,0.000664061647069,0.000666575321989,0.000669051471485,0.000671490138198,0.000673892924269,0.000676254425028,0.000678570206801,0.000680842407284,0.000683072395097,0.000685257979211,0.000687399045154,0.000689498704832,0.000691557518706,0.000693570463223,0.000695537151667,0.000697458994613,0.000699339025413,0.00070117232918,0.000702957658593,0.000704694687979,0.000706385443616,0.000708034906804,0.000709637377144,0.000711195110746,0.000712710719658,0.000714187338969,0.000715620735988,0.000717012409301,0.000718365762186,0.000719681789987,0.000720959244686,0.000722198303768,0.000723394896838,0.000724551497141,0.000725667159776,0.000726736267273,0.000727755631304,0.000728730967398,0.000729660782385,0.000730545236757,0.000731385694791,0.000732178173098,0.000732920598422,0.000733613278544,0.000734252829949,0.000734841988298,0.000735388205257,0.000735892969068,0.000736348299876,0.000736755832468,0.000737111380821,0.000737412449301,0.000737662470817,0.000737863580586,0.00073801988432,0.000738134665674,0.000738203502002,0.000738219485096,0.000738184295882,0.000738098563876,0.000737963715251,0.000737784548155,0.00073756663974,0.000737309034303,0.000737010373935,0.00073666759823,0.000736279428594,0.000735848966313,0.000735379735679,0.000734871469977,0.000734332243707,0.000733759470515,0.00073314765725,0.000732493101575,0.000731799914103,0.000731067863987,0.000730298853618,0.0007294917275,0.000728647495842,0.000727766236039,0.000726839910535,0.000725865993307,0.000724849230916,0.000723790261203,0.000722681869138,0.000721524941512,0.000720323646084,0.000719076155115,0.000717781513062,0.000716438405132,0.000715050647281,0.000713624140286,0.000712152545473,0.000710634464959,0.000709075081532,0.000707480220206,0.000705847770961,0.000704173772631,0.00070246135529,0.000700710382731,0.000698921407629,0.000697091136851,0.000695222266341,0.000693319494282,0.000691385372956,0.000689414762503,0.000687401058382,0.000685345808373,0.000683249929887,0.000681115208114,0.000678944483844,0.000676735084294,0.000674486314267,0.000672195691646,0.000669858742086,0.000667471890998,0.000665038070643,0.000662566122154,0.000660050224728,0.000657487742668,0.000654869869795,0.000652195206911,0.000649468533004,0.000646687876364,0.000643853307429,0.000640969614563,0.000638037950454,0.000635052341169,0.000632013926889,0.000628922948313,0.000625781941735,0.000622592733625,0.000619352041903,0.000616062295019,0.000612724738158,0.000609340649667,0.000605907790077,0.000602425688315,0.000598898735538,0.000595325750601,0.000591710517159,0.000588057753504,0.000584373963206,0.000580659466132,0.000576911213597,0.000573130108848,0.000569319209181,0.000565482444753,0.000561616626271,0.000557724988317,0.000553811730382,0.000549875140724,0.000545913813329,0.000541928189257,0.000537919469188,0.000533885435762,0.000529824631656,0.000525738178666,0.000521630185966,0.000517509223395,0.000513368171978,0.000509206283524,0.000505021052053,0.000500812456493,0.000496577976059,0.000492321894707,0.000488049907981,0.0004837602671,0.000479445762622,0.000475100055262,0.000470723593913,0.000466318881761,0.00046188568837,0.000457428246199,0.000452944941306,0.000448439381473,0.000443910834883,0.000439358039687,0.000434787730627,0.00043020486654,0.00042560664073,0.000420992327543,0.000416365405197,0.000411723981058,0.000407071673829,0.000402406472285,0.000397724536288,0.000393027362287,0.000388315578823,0.000383587581875,0.000378844002794,0.000374088023588,0.000369314609827,0.000364518060766,0.000359703614715,0.000354867317285,0.000350012431128,0.000345139795323,0.000340250040567,0.000335336118118,0.000330399998685,0.000325437673829,0.000320452445844,0.000315451316461,0.00031043806395,0.000305409641856,0.00030036711291,0.000295311329353,0.000290240226821,0.000285158784903,0.000280071569442,0.000274980781485,0.00026988818801,0.000264791596904,0.000259686621352,0.000254575904777,0.000249457381223,0.000244335723441,0.000239211398879,0.000234084883069,0.000228954875511,0.000223822710539,0.000218688525843,0.00021355592683,0.000208425715209,0.000203304493561,0.000198192530964,0.000193086828603,0.00018798332044,0.000182882464407,0.000177784589929,0.000172688319948,0.00016759341216,0.000162500519769,0.000157409876622,0.000152315708047,0.000147220250697,0.000142126362772,0.000137041327032,0.000131965622222,0.000126896385711,0.000121839031251,0.000116793206651,0.000111758353592,0.000106730997628,0.000101715541035,9.67167142889e-05,9.17250341108e-05,8.6737709906e-05,8.17545551183e-05,7.67795578927e-05,7.18167606887e-05,6.68603602578e-05,6.19101879669e-05,5.6968629967e-05,5.20335618907e-05,4.71008447018e-05,4.21779241849e-05,3.72672482012e-05,3.23704245642e-05,2.74833770007e-05,2.26043284607e-05,1.77372495549e-05,1.28873334719e-05,8.05574890928e-06,3.24646697782e-06,-1.54058054489e-06,-6.30826165256e-06,-1.10570386121e-05,-1.57855554615e-05,-2.04911325111e-05,-2.51729291635e-05,-2.98310536037e-05,-3.44676466781e-05,-3.90818774326e-05,-4.36757921505e-05,-4.82509372644e-05,-5.28021881447e-05,-5.73303417555e-05,-6.18395168186e-05,-6.63269375061e-05,-7.07966870752e-05,-7.52478503352e-05,-7.9678021055e-05,-8.40862161358e-05,-8.84757663205e-05,-9.28427697047e-05,-9.7188202373e-05,-0.00010151530619,-0.000105819279204,-0.00011010060139,-0.000114357586297,-0.000118584005739,-0.000122786213268,-0.000126967208915,-0.000131130205755,-0.000135274932887,-0.000139403625865,-0.000143512043276,-0.000147596835985,-0.000151654020072,-0.000155684861282,-0.000159695342614,-0.000163684691261,-0.000167646042274,-0.000171577653856,-0.000175480346082,-0.000179349237453,-0.00018318224685,-0.000186983511446,-0.000190755300247,-0.000194499330307,-0.000198213436669,-0.000201899852244,-0.000205563602331,-0.000209195947695,-0.000212794209494,-0.000216360234606,-0.000219896444296,-0.000223407245854,-0.00022689506095,-0.000230358186654,-0.000233797717021,-0.000237208407514,-0.000240587036936,-0.000243936698604,-0.000247265319634,-0.000250572198922,-0.000253858033279,-0.000257120683931,-0.000260356224091,-0.000263564673469,-0.000266745567107,-0.000269898383706,-0.000273028206202,-0.000276131944717,-0.000279206783789,-0.000282252044884,-0.000285268985238,-0.000288251624781,-0.000291199630462,-0.00029411390431,-0.000296992529645,-0.000299835352068,-0.000302643861606,-0.000305421373435,-0.000308169285451,-0.000310886137152,-0.000313567912756,-0.000316219548674,-0.000318846283893,-0.000321449656865,-0.000324028340727,-0.000326583514631,-0.000329111411643,-0.0003316110457,-0.000334076182584,-0.000336508256447,-0.000338911335063,-0.000341286607797,-0.000343630460696,-0.000345937173861,-0.000348207263263,-0.000350444422121,-0.00035265169596,-0.000354829997969,-0.000356982782029,-0.000359109793913,-0.000361206638251,-0.000363268865167,-0.000365297557488,-0.00036729648899,-0.000369271137318,-0.000371220175308,-0.000373141987965,-0.000375033220829,-0.000376896990542,-0.000378733764055,-0.000380544023444,-0.000382332351549,-0.000384104292764,-0.000385859157696,-0.000387589533491,-0.00038929183366,-0.000390963634622,-0.0003926073093,-0.000394222527974,-0.000395808243978,-0.000397362307872,-0.000398887669812,-0.000400379892472,-0.000401828711778,-0.000403239821541,-0.000404617955986,-0.000405964118876,-0.000407279701207,-0.000408562510424,-0.000409812118922,-0.000411034309995,-0.000412228918089,-0.000413394966706,-0.000414541058029,-0.000415671899454,-0.00041678305805,-0.000417869653676,-0.000418932125508,-0.000419969136691,-0.000420981045943,-0.000421968778155,-0.00042292431349,-0.000423847183724,-0.000424738991474,-0.000425597332889,-0.000426419200395,-0.000427212734159,-0.000427981415674,-0.000428730588582,-0.000429467551325,-0.000430190175109,-0.00043090724013,-0.000431620954423,-0.00043226808128,-0.00043278289752,-0.000433162385519,-0.00043341852561,-0.000433543935607)
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(231)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Rattus_norvegicus-male-liver-H3K27Ac-ERR572186.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) : 231',bty='n')
dev.off()