# R script for Peak Model
#  -- generated by MACS
p <- c(0.0383181708192,0.0447846883602,0.051007010514,0.0573933723172,0.0638673462059,0.063667888905,0.0638058313374,0.0636268789926,0.0636399276011,0.0635355387333,0.0634852083864,0.0633137123893,0.0634963929079,0.0634516548217,0.0632186439562,0.0633621786494,0.0633640427363,0.063248469347,0.0632876151724,0.063542995081,0.0635784127326,0.0636548402965,0.0634497907348,0.0635895972541,0.0637517728166,0.0637144910781,0.0635821409064,0.0637834622943,0.0638226081197,0.0637592291643,0.0637443164689,0.0635299464726,0.0634236935179,0.0634031885617,0.0636306071665,0.0635616359503,0.0636846656873,0.0635746845587,0.0636548402965,0.0636753452527,0.0636697529919,0.0641152697668,0.064603660541,0.0646577190619,0.064456397674,0.0643426883716,0.064160007853,0.0642643967208,0.0641805128092,0.0641954255046,0.0641003570714,0.0638729384667,0.0637704136858,0.0634535189087,0.063248469347,0.0636511121226,0.0634833442994,0.063419965344,0.0634889365602,0.0633248969109,0.0633808195186,0.0634181012571,0.0632261003039,0.0635560436895,0.0636865297742,0.0634181012571,0.0636399276011,0.0637480446427,0.0636567043834,0.0636958502088,0.063667888905,0.0636436557749,0.063666024818,0.0634647034302,0.0634181012571,0.0634553829956,0.0633491300409,0.0633062560416,0.0634069167355,0.0635877331672,0.0636809375134,0.0637033065565,0.0638803948144,0.063962414639,0.0641972895915,0.0641544155923,0.0644004750663,0.0643426883716,0.0642737171554,0.0642737171554,0.0642010177654,0.0642122022869,0.0641637360269,0.064160007853,0.0640071527252,0.0641637360269,0.0639717350737,0.063716355165,0.063667888905,0.0635802768195,0.0635951895149,0.0633565863886,0.0635057133425,0.063518761951,0.0635821409064,0.0635840049934,0.0637629573381,0.0640723957676,0.0642494840254,0.0644191159355,0.0643650574147,0.064555194281,0.0642662608077,0.0642103382,0.0641935614177,0.0641972895915,0.0639847836821,0.0639791914214,0.0641395028969,0.0641767846353,0.0644265722832,0.0645626506287,0.0647956614943,0.0649429243613,0.0649932547083,0.0649634293175,0.0650529054898,0.0650510414029,0.0649410602744,0.0647341466258,0.0648161664504,0.0648236227981,0.0648963221882,0.0646950008003,0.0648422636674,0.0648814094928,0.0650529054898,0.0651013717499,0.0652542268777,0.0652784600077,0.0653082853985,0.0653064213116,0.0653958974839,0.0655692575679,0.0653343826154,0.0652188092261,0.0652076247046,0.0652765959208,0.0651517020968,0.0653437030501,0.0653753925278,0.0653865770493,0.0653399748762,0.0653660720932,0.0655729857418,0.0657761712165,0.0660632406029,0.0661955907745,0.0662049112092,0.0663596304239,0.0663223486854,0.0664211452924,0.0664677474655,0.0665777285941,0.0666000976371,0.0667119428526,0.0666299230279,0.0666206025933,0.0667678654603,0.0669617305005,0.067122041976,0.0671406828452,0.0672879457123,0.0675209565778,0.0677856569211,0.068035444569,0.067862084485,0.0680391727428,0.0682982808253,0.0681547461321,0.0681957560445,0.0683542034331,0.068134241176,0.0680764544813,0.0680689981336,0.0679403761358,0.0683262421292,0.0684660486485,0.0686953313402,0.0687531180349,0.0688836041196,0.0692172756791,0.06944096611,0.0696180543678,0.069563995847,0.0696366952371,0.0695845008032,0.069563995847,0.0693030236776,0.0695080732393,0.0694223252408,0.0693906357631,0.0695956853248,0.0695472190647,0.0697970067126,0.0699256287104,0.0701996494883,0.0702052417491,0.0702891256607,0.0701866008798,0.0704606216577,0.0703953786153,0.0705855154816,0.0707756523479,0.0707514192179,0.0710962752989,0.0711223725159,0.071390801033,0.0716610936371,0.0718959685895,0.0719108812849,0.0721662611936,0.0720842413689,0.0720916977166,0.0724048643199,0.0725670398823,0.0726416033593,0.0727553126617,0.0727049823148,0.0730069643965,0.0732437034359,0.0734673938669,0.0737507350794,0.0739446001195,0.0741850673328,0.0741999800282,0.0744199422853,0.0745560206307,0.0749996733188,0.0750220423619,0.0751488002727,0.0750052655795,0.075165577055,0.0756670164377,0.0755514430484,0.0757527644362,0.0758757941733,0.0762169220804,0.0761908248635,0.0761218536473,0.0763455440782,0.076697856507,0.0768973138079,0.0769998385887,0.0773092770182,0.0773912968429,0.0776951430115,0.07775665788,0.0779635715287,0.0784090883036,0.0785265257798,0.0786234582999,0.0787353035154,0.0786532836907,0.0787819056885,0.0789981397717,0.0791621794211,0.0795424531537,0.0797400463677,0.0800010185371,0.0803943408782,0.0805882059183,0.0810710044317,0.0814736472074,0.0818762899831,0.0818669695485,0.0818073187669,0.0818874745047,0.0821950488472,0.0824317878866,0.082420603365,0.0825529535367,0.0825231281459,0.0826722550998,0.0826741191868,0.0829108582262,0.0831941994387,0.083261306568,0.083483132912,0.0835260069113,0.0837422409945,0.0842269035948,0.0843983995919,0.0847115661952,0.0850657427109,0.0854366960088,0.0857591830468,0.0861189518232,0.0866688574659,0.0872019863263,0.0878171350114,0.0886522459535,0.0894221138533,0.0900447188861,0.0906617316581,0.0913029775601,0.0922890795431,0.0930477629214,0.0935436100433,0.0938679611682,0.0945763141995,0.0947776355873,0.0951206275814,0.0957301840057,0.0960452146959,0.0964478574716,0.0965578386002,0.0964832751232,0.0967069655541,0.0974675130193,0.0973575318908,0.0974209108462,0.0977228929279,0.0977676310141,0.0982261963976,0.0983343134392,0.0985263143924,0.0990613073397,0.0991451912513,0.0989736952543,0.0993092309007,0.0994303965508,0.0995459699401,0.0996242615909,0.099670863764,0.100166710886,0.100343799144,0.100675606616,0.100744577832,0.101244153128,0.10135227017,0.101661708599,0.102010292854,0.102513596324,0.102821170666,0.103208900747,0.103699155608,0.104010458124,0.104541722898,0.104847433153,0.105484950881,0.106135517218,0.106620179818,0.106963171813,0.107404960414,0.107671524844,0.107749816495,0.10814686701,0.108420887787,0.108648306392,0.108812346042,0.108637121871,0.108782520651,0.109026716038,0.109201940209,0.109485281421,0.110098566019,0.110283110625,0.110739811921,0.110959774179,0.111215154087,0.112044672769,0.112136013028,0.111925371205,0.11220125607,0.112449179631,0.112743705365,0.11304382336,0.113036367012,0.113332756833,0.113787594043,0.113757768652,0.114212605862,0.114868764459,0.115150241585,0.11537766019,0.115308688973,0.115539835752,0.116235140175,0.116509160953,0.11663778295,0.117180232245,0.117642525803,0.117940779711,0.118306140748,0.118555928396,0.119236320123,0.119387311164,0.119514069075,0.120043469761,0.120380869495,0.120742502358,0.12077792001,0.120891629312,0.121225300872,0.121512370258,0.121685730342,0.121931789816,0.122116334421,0.122121926682,0.122276645897,0.122241228245,0.122623366065,0.123283252836,0.123635565265,0.124123956039,0.124207839951,0.124992620546,0.125570487492,0.12605701418,0.126595735301,0.127128864161,0.127499817459,0.127615390849,0.127835353106,0.128096325275,0.128633182309,0.128612677353,0.128573531528,0.128769260655,0.128918387609,0.129272564124,0.129324758558,0.129604371597,0.12977213942,0.130051752459,0.130245617499,0.130551327755,0.130713503317,0.130983795921,0.131084456615,0.131337972437,0.131755527908,0.132072422685,0.132583182502,0.132773319369,0.133280351012,0.133459303357,0.133999888565,0.134258996647,0.134596396381,0.13456657099,0.134872281246,0.135081058981,0.135177991501,0.135504206713,0.135658925928,0.135916169923,0.136069025051,0.136438114262,0.136980563557,0.137152059554,0.137323555551,0.137511828331,0.137739246935,0.137880917542,0.137619945372,0.137804489978,0.138195948232,0.137994626844,0.138126977016,0.13830592936,0.138624688224,0.138751446135,0.138872611785,0.139086981782,0.139443022384,0.139547411252,0.139616382468,0.13999106394,0.139655528294,0.139791606639,0.139920228637,0.139847529247,0.139925820898,0.139992928027,0.140108501416,0.140089860547,0.140060035156,0.140032073852,0.14047013428,0.140755339579,0.14068823245,0.140842951665,0.140790757231,0.140734834623,0.140874641142,0.140878369316,0.141107652008,0.141243730353,0.141130021051,0.14097903001,0.141098331573,0.141445051741,0.14145810035,0.141590450521,0.141761946518,0.142198142859,0.142028510949,0.142052744079,0.142345405726,0.142302531726,0.142287619031,0.14194276295,0.142019190514,0.141799228257,0.141441323567,0.140803805839,0.140522328714,0.140375065847,0.139828888378,0.139875490551,0.139526906296,0.139586557077,0.139206283345,0.139018010566,0.138676882658,0.138675018571,0.138328298403,0.137644178502,0.137509964244,0.136829572516,0.136467939653,0.135739081665,0.135237642283,0.134641134467,0.134134102823,0.133645712049,0.133416429358,0.133341865881,0.132790096151,0.132573862068,0.131910247123,0.131667915822,0.131246632177,0.131106825658,0.130775018186,0.1302027435,0.129535400381,0.129209185169,0.128940756652,0.128666735874,0.128512016659,0.128111237971,0.127727236064,0.127138184596,0.126772823559,0.12651744365,0.126051421919,0.125296466715,0.124843493592,0.124381200035,0.123987877694,0.123598283526,0.123331719096,0.122962629885,0.122455598242,0.12205668364,0.1221051499,0.121978391989,0.121734196602,0.121415437738,0.121199203655,0.120951280094,0.120597103578,0.120626928969,0.12039578219,0.12029884967,0.119730303158,0.119689293246,0.119277330035,0.118841133695,0.118434762746,0.118171926489,0.118039576318,0.117500855196,0.117506447457,0.117195144941,0.117100076508,0.116734715471,0.116259373305,0.115797079748,0.115260222713,0.114781152374,0.114426975858,0.114119401516,0.11369252561,0.113073648751,0.112514422674,0.111688632166,0.111134998349,0.110760316878,0.110247692973,0.109291416381,0.108396654657,0.10728565885,0.106256682868,0.105483086794,0.104782190111,0.10426770212,0.103738301433,0.103151114052,0.10248563502,0.102353284848,0.10219483746,0.101816427814,0.101523766167,0.101430561821,0.101026054958,0.100545120532,0.100271099754,0.099868456978,0.0995813875916,0.0989028599511,0.0983790515254,0.098313808483,0.098142312486,0.097597999104,0.0974731052801,0.0972829684138,0.097154346416,0.096956753202,0.0967927135526,0.0969791222451,0.0968560925081,0.0966995092064,0.0964981878186,0.0962055261714,0.0960563992175,0.0959725153059,0.0955269985309,0.0952958517523,0.0954692118363,0.0949752288013,0.0948708399335,0.0945278479394,0.0940991079468,0.0939481169059,0.0934056676109,0.0929787917052,0.092835257012,0.0925332749302,0.0919908256352,0.0918435627682,0.0912451908654,0.0909152474798,0.090738159222,0.0906430907888,0.0904865074872,0.090270273404,0.0900633597553,0.0895936098504,0.089135044467,0.0887435862128,0.088566497955,0.0885404007381,0.0881116607454,0.087874921706,0.0877556201429,0.0876456390143,0.0872131708478,0.0875170170165,0.0875505705812,0.087479735278,0.0872355398909,0.0867881590291,0.0866893624221,0.0865551481635,0.0863724676449,0.0859437276523,0.0858654360015,0.0853211226195,0.0849091594092,0.0846314104575,0.0844263608958,0.0844282249827,0.084297738898,0.0841225147271,0.0836397162136,0.0833284136973,0.0829555963124,0.0827020804906,0.0823441758011,0.0821465825872,0.081880018157,0.0814270450343,0.0811287911264,0.0805677009621,0.0805602446144,0.0805360114844,0.0804558557467,0.0803309619227,0.0801836990557,0.0800010185371,0.0798239302793,0.07978105628,0.0796617547168,0.079436200199,0.079115577248,0.0789794989025,0.07867192456,0.0784146805644,0.0782375923066,0.0780008532671,0.0777659783147,0.0774341708421,0.0773055488443,0.0771433732819,0.0768134298963,0.0762896214705,0.076302670079,0.0761628635596,0.0760603387788,0.0758459687825,0.0756893854808,0.0754955204407,0.0750406832311,0.0752084510543,0.0750891494911,0.075167441142,0.0747778469748,0.0747126039324,0.0742353976797,0.0741626982897,0.0740023868142,0.0737432787317,0.0737749682094,0.0732138780451,0.0729324009195,0.0727758176179,0.0728597015295,0.0725502631,0.0727441281402,0.0726714287501,0.0723116599737,0.0723116599737,0.0719854447619,0.0717934438087,0.0717449775487,0.071340470686,0.0711838873844,0.070947148345,0.0706787198279,0.0703841940938,0.070576195047,0.0703394560076,0.070281669313,0.070281669313,0.0701399987067,0.0702089699229,0.0698771624503,0.0697336277572,0.0696255107155,0.0693216645469,0.0691855862014,0.0691240713329,0.0690774691598,0.0689693521181,0.0686300882979,0.0683523393461,0.0682945526515,0.0680671340467,0.0676458504018,0.0675153643171,0.0671910131922,0.0671313624106,0.0668834388497,0.0666112821587,0.066726855548,0.0667622731996,0.0667007583311,0.0669281769359,0.0670567989336,0.0670083326736,0.0670456144121,0.066972915022,0.0668424289373,0.0670064685867,0.0669580023266,0.0667566809388,0.0665367186817,0.0661154350368,0.0659588517351,0.0659756285175,0.0656438210449,0.0653120135723,0.0650324005337,0.0649969828821,0.0648329432328,0.0647844769727,0.064581291498,0.064432164544,0.0643687855886,0.0642084741131,0.0641432310707,0.06418610507,0.0641879691569,0.0639027638574,0.0637778700335,0.0634647034302,0.063444198474,0.0637088988173,0.0637424523819,0.0636212867319,0.0636846656873,0.0634758879517,0.0635523155157,0.0634367421263,0.0634423343871,0.0636250149057,0.0634069167355,0.0633081201285,0.0634292857786,0.0634982569948,0.063518761951,0.0635411309941,0.0634143730832,0.0633193046501,0.0634684316041,0.0635877331672,0.0636790734265,0.0635392669072,0.0634609752564,0.0633081201285,0.0632521975208,0.0631440804792,0.0631049346538,0.0631515368269,0.0629353027437,0.0627134763996,0.0627358454427,0.0627805835289,0.0625736698803,0.0626948355304,0.0625028345772,0.0625587571849,0.0625513008372,0.0624450478825,0.0625177472726,0.0625102909249,0.0625289317941,0.0625252036203,0.0624692810125,0.0623667562317,0.0624394556217,0.0624021738833,0.0627395736166,0.0628887005705,0.0627563503989,0.0628607392667,0.0627078841389,0.0623723484925,0.0622940568416,0.0622474546685,0.0622381342339,0.0622623673639,0.0618112583282,0.0616956849389,0.0617124617212,0.0615428298111,0.0617217821558,0.0619305598914,0.0617944815459,0.0617534716335,0.061790753372,0.0616229855488,0.061643490505,0.0617087335474,0.0617124617212,0.0616863645043,0.0614626740733,0.0613992951179,0.0616155292011,0.0615745192888,0.0615540143326,0.0615540143326,0.0616285778096,0.0617012771997,0.061792617459,0.0618429478059,0.0619771620645,0.0621393376269,0.0623164258847,0.0623294744932,0.06213747354,0.0622586391901,0.0620163078899,0.0619958029337,0.0617702484159,0.0617832970243,0.0618727731967,0.0616584032004,0.0615036839857,0.061496227638,0.0616695877219,0.061520460768,0.0618131224151,0.061766520242,0.061990210673,0.0619752979776,0.0620088515422,0.0619603852822,0.0617870251982,0.0617404230251,0.0617516075466,0.0619510648475,0.0620740945846,0.0620181719768,0.0620013951945,0.0621076481492,0.0618298991974,0.0619995311076,0.0622008524954,0.0623760766663,0.0625140190987,0.0625289317941,0.062407766144,0.0623928534486,0.0622567751032,0.0621244249315,0.0621598425831,0.0622903286678,0.0621896679739,0.0621784834523,0.0619995311076,0.0618802295444,0.0618634527621,0.0620703664107,0.0620349487591,0.0620834150192,0.062212037017,0.0620498614545,0.0621300171923,0.0622772800593,0.0623145617978,0.0625531649241,0.0625009704903,0.062409630231,0.0624972423164,0.0624357274479,0.0625643494457,0.0626109516188,0.0627638067466,0.062506562751,0.0625587571849,0.062530795881,0.0626184079665,0.0626687383135,0.0627656708335,0.0627880398766,0.0628980210052,0.0629390309175,0.0629203900483,0.0629315745698,0.0628570110928,0.0628439624844,0.0628104089197,0.0628141370936,0.0627843117028,0.0628961569182,0.0628066807459,0.0628626033536,0.062853282919,0.0631832263046,0.0633565863886,0.0634591111694,0.0635653641241,0.0636511121226,0.0635895972541,0.063518761951,0.0635057133425,0.0634236935179,0.0633938681271,0.0633435377801,0.0632950715201,0.0633137123893,0.063321168737,0.0632000030869,0.0633509941278,0.0636063740365,0.0635094415164,0.0635858690803,0.0637107629042,0.0637443164689,0.0638934434228,0.063964278726,0.0640332499422,0.064184240983,0.0643650574147,0.0643277756762,0.064456397674,0.0646260295841,0.0645738351503,0.0644433490655,0.0644135236748,0.0644992716733,0.0644508054132,0.064284901677,0.064184240983,0.0642084741131,0.0642774453293,0.0643035425462,0.0645104561948,0.0644191159355,0.0643967468924,0.0642662608077,0.0643706496755,0.0644601258479,0.064407931414,0.0644974075864,0.0645589224549,0.0644787667171,0.0643109988939,0.0645645147156,0.0646502627142,0.0647602438427,0.0648403995805,0.0650100314906,0.0651125562714,0.0650640900114,0.0647714283642,0.0648683608843,0.0648292150589,0.0646428063665,0.0646894085396,0.0645868837587,0.0645123202817,0.0644936794125,0.0643520088062,0.0641991536784,0.0645290970641,0.0644023391532,0.0645962041933,0.0648366714066,0.0648888658405,0.0649522447959,0.0648851376666,0.0649075067097,0.0649112348836,0.0649615652305,0.0649112348836,0.0650305364467,0.0649652934044,0.0649485166221,0.0648310791458,0.064950380709,0.0652411782692,0.0652765959208,0.0656009470456,0.0656270442626,0.0657538021734,0.0655692575679,0.0656456851318,0.0658209093027,0.0660520560814,0.0659756285175,0.0659551235613,0.0659905412128,0.0657966761727,0.0661415322537,0.0659812207782,0.0662869310338,0.0662254161653,0.0661471245145,0.0659085213882,0.0660334152121,0.0659197059097,0.065740753565,0.065690423218,0.0655394321771,0.0657295690434,0.0656121315672,0.0655934906979,0.0655338399164,0.0656233160887,0.0654462278309,0.0655468885248,0.0657612585211,0.0658544628674,0.0658936086928,0.0659588517351,0.0659719003436,0.0658675114758,0.0657780353035,0.0659178418228,0.065837686085,0.0656363646972,0.0653660720932,0.065369800267,0.0652560909646,0.0650435850552,0.065049177316,0.0650827308806,0.0653903052232,0.0651461098361,0.0653306544416,0.0654238587878,0.0655151990471,0.0655506166987,0.065666190088,0.0656717823488,0.0655599371333,0.0658115888681,0.0656680541749,0.0656605978272,0.0656233160887,0.0655860343502,0.0656251801757,0.065517063134,0.0654089460924,0.065468596874,0.0658246374766,0.0655878984372,0.0654872377432,0.065517063134,0.0652933727031,0.0652821881816,0.0652765959208,0.065420130614,0.0653120135723,0.0651311971407,0.064827350972,0.0649037785359,0.0649298757528,0.0648795454059,0.0651535661838,0.0652635473123,0.0653082853985,0.0649671574913,0.0651274689668,0.0651628866184,0.0651833915746,0.0652411782692,0.06524677053,0.0655487526117,0.0654499560048,0.0653660720932,0.0655878984372,0.0656978795657,0.0655878984372,0.0657593944342,0.0656475492187,0.065617723828,0.0655338399164,0.0653306544416,0.0653269262677,0.0655841702633,0.0654779173086,0.0656270442626,0.0658227733896,0.0657593944342,0.0659905412128,0.0659271622574,0.0659402108659,0.0659402108659,0.0658731037366,0.0656345006103,0.0654667327871,0.0656270442626,0.0654350433094,0.0653809847885,0.0652971008769,0.0652915086162,0.0652076247046,0.0652915086162,0.0652188092261,0.0651889838353,0.0649578370567,0.0646316218449,0.0646223014103,0.064777020625,0.0647993896681,0.0646819521919,0.0647882051466,0.0645179125425,0.0645868837587,0.0646502627142,0.0648292150589,0.0650417209683,0.0651050999237,0.0648348073197,0.0646875444526,0.0646744958442,0.0647155057565,0.0648087101027,0.0649597011436,0.0648851376666,0.0648963221882,0.0648105741897,0.0646689035834,0.0648329432328,0.0648888658405,0.0650379927944,0.065073410446,0.0650939154022,0.0650957794891,0.0586013006443,0.0521347831033,0.0456477606062,0.0392539424553,0.0)
m <- c(0.0380643175949,0.04426611051,0.050493937938,0.0569077261732,0.0633568469616,0.0638254681954,0.0637380666161,0.063630209348,0.0637343473999,0.0638198893712,0.0638310470196,0.0640876729333,0.0642029686337,0.064212266674,0.0641564784319,0.0640541999881,0.063974236841,0.0640746556768,0.0638961333021,0.0639258870312,0.0640225866509,0.0640560595961,0.064236441579,0.0642885106049,0.0643796314004,0.0646120824092,0.0647348165419,0.064738535758,0.0651402111012,0.0650453710896,0.0650156173605,0.0649133389166,0.0649412330377,0.0649542502942,0.0652778220984,0.0648687083229,0.0648910236198,0.0647850259598,0.0645488557348,0.0646436957464,0.0645451365187,0.0647534126226,0.0646734494755,0.0647013435966,0.0644093851295,0.0644800502362,0.0646957647724,0.0648222181212,0.0647552722306,0.0649003216601,0.065080703643,0.065134632277,0.0652183146402,0.0651959993433,0.0652555068016,0.0654042754472,0.0654544848651,0.065528869188,0.0657166896031,0.0657185492111,0.0657985123582,0.0658301256954,0.0658375641277,0.06595100022,0.0658784755052,0.0659881923814,0.0660365421912,0.0659993500298,0.0659993500298,0.0661220841624,0.0661722935803,0.066136961027,0.0660681555284,0.0659231060989,0.0660012096379,0.0660439806235,0.0660811727849,0.0660867516091,0.0661313822028,0.0661239437705,0.0661406802431,0.0660086480701,0.0660979092575,0.0662857296726,0.0662076261337,0.0663433775228,0.0661983280933,0.0663024661453,0.0663285006583,0.0664028849811,0.0664772693039,0.0667301760015,0.0667915430678,0.066875225431,0.0669700654426,0.0667264567853,0.0667245971773,0.0666148803011,0.0666018630446,0.0666967030562,0.066691124232,0.0664902865604,0.0664847077362,0.0662187837821,0.0660904708252,0.0659807539491,0.0660960496495,0.0661871704449,0.0663638332116,0.0661239437705,0.0661834512288,0.0663563947793,0.066348956347,0.0665646708832,0.0666967030562,0.0668659273906,0.0670816419268,0.0669923807394,0.0668547697422,0.0669458905377,0.0668715062148,0.0668343140534,0.0666743877594,0.066611161085,0.0667041414885,0.0666929838401,0.0663935869407,0.0663861485084,0.0665386363702,0.0665218998976,0.0663675524277,0.0663154834018,0.0663563947793,0.0663099045776,0.0661927492691,0.066241099079,0.0661574167158,0.0661332418109,0.066004928854,0.0659231060989,0.0658561602084,0.0658189680469,0.0658691774649,0.0661258033786,0.0661202245544,0.0661760127965,0.0662187837821,0.0661704339723,0.0661667147561,0.0663061853614,0.0663861485084,0.0663303602663,0.0663787100762,0.0661425398512,0.066030963367,0.0659454213957,0.0658189680469,0.0660142268944,0.0658598794245,0.0656013939027,0.065740864508,0.0658152488308,0.0656850762659,0.0656962339143,0.0657873547098,0.0658598794245,0.0658580198164,0.0655995342946,0.0657650394129,0.0658710370729,0.0655493248767,0.0655549037009,0.0657873547098,0.0656701994013,0.0658412833438,0.0657371452918,0.0656943743062,0.0658189680469,0.0658487217761,0.0657650394129,0.0660216653266,0.0659138080585,0.0656739186175,0.0658505813841,0.0658635986406,0.0658096700066,0.0659714559087,0.0660904708252,0.0659342637473,0.0659956308136,0.0660160865024,0.066084892001,0.0660346825831,0.0661127861221,0.065740864508,0.0657278472515,0.0656850762659,0.0653540660293,0.0652462087612,0.0651011593317,0.0650844228591,0.064816639297,0.0648891640117,0.0645042251411,0.0647292377176,0.0646362573141,0.0646548533948,0.0647422549741,0.0648538314584,0.0648519718503,0.0647534126226,0.0650528095219,0.065108597764,0.0650639671703,0.0648426738099,0.0649430926457,0.0648594102826,0.0650211961847,0.0649021812682,0.0647775875275,0.0645358384783,0.0642215647144,0.0639928329217,0.0642290031467,0.0641806533368,0.0639165889908,0.0638979929101,0.0637176109273,0.0638515027084,0.0638663795729,0.0638756776133,0.0639612195845,0.0640709364607,0.063816170155,0.0638663795729,0.0638793968294,0.0638291874115,0.0637864164259,0.0637120321031,0.063710172495,0.0638608007487,0.0635948767946,0.0636190516996,0.0635372289445,0.0635056156073,0.0633958987311,0.0634423889329,0.0631857630191,0.063366145002,0.0634349505006,0.0632657261662,0.063394039123,0.0633252336244,0.0634907387427,0.0636283497399,0.0638050125066,0.0637194705354,0.0640114290024,0.0638031528985,0.0636748399417,0.0637064532789,0.0636469458206,0.0634256524602,0.0635149136476,0.0633958987311,0.0633977583392,0.0637269089676,0.0637473646564,0.063658103469,0.0636357881722,0.0635967364027,0.063842204668,0.0640374635154,0.063816170155,0.0638477834922,0.0639798156652,0.0634554061894,0.0632434108693,0.0631969206676,0.0632489896935,0.0632861818549,0.0630276963331,0.0630146790766,0.0629867849556,0.0628268586615,0.0626446170706,0.0628566123907,0.0628008241485,0.0626966860966,0.0628175606212,0.0626725111917,0.0627710704194,0.0627245802177,0.0628175606212,0.0628696296472,0.0628547527826,0.0629421543619,0.063076046143,0.0632731645984,0.0633587065697,0.0635186328638,0.0634423889329,0.0634219332441,0.0635037559992,0.0636395073883,0.0637715395613,0.0634107755957,0.0632675857742,0.0630686077107,0.0626650727594,0.0627171417854,0.0628249990535,0.0628045433647,0.0627171417854,0.0625423386267,0.0624214641022,0.0627190013934,0.0626111441254,0.0625163041138,0.0626576343271,0.0624530774394,0.0625869692204,0.0624214641022,0.062415885278,0.0623340625228,0.0623470797793,0.0621462421077,0.0623749739004,0.0625311809783,0.0626148633415,0.0626315998141,0.0625144445057,0.0626371786383,0.062469813912,0.0625386194106,0.0625125848976,0.0626297402061,0.0627320186499,0.0628473143503,0.0627208610015,0.06283801631,0.0627022649208,0.0628287182696,0.0631318343851,0.0631950610595,0.0631002210479,0.0630425731977,0.0631262555609,0.0630314155493,0.0631113786963,0.063182043803,0.0631188171286,0.0631485708577,0.0630965018318,0.063234112829,0.0633828814746,0.0633549873535,0.0633363912728,0.0636023152269,0.063788276034,0.0636134728753,0.0637455050484,0.0636729803336,0.0635409481606,0.0635446673767,0.063682278374,0.0637975740743,0.0635874383624,0.0633605661778,0.0630816249672,0.0631281151689,0.0631132383044,0.0631671669384,0.0631522900739,0.0629347159296,0.0628882257279,0.0630872037914,0.0632471300855,0.06336800461,0.0637194705354,0.063948202328,0.064000271354,0.0641825129449,0.0642252839305,0.0644372792506,0.064580469072,0.0644112447376,0.0643331411986,0.0643517372793,0.0641267247028,0.0640095693944,0.0642736337404,0.06415833804,0.064290370213,0.0643331411986,0.0642457396193,0.0643759121842,0.0645637325994,0.0644075255214,0.0646158016253,0.0648017624324,0.0648073412566,0.0647999028243,0.0647831663517,0.064950531078,0.0649207773489,0.0650081789282,0.0649598291184,0.065240629937,0.0654860982023,0.065528869188,0.065476800162,0.0658022315743,0.0661313822028,0.0663898677246,0.0664661116555,0.0664289194941,0.0667060010966,0.0668789446471,0.066585126572,0.0667301760015,0.0669626270103,0.0671337109528,0.0670927995752,0.0670314325089,0.0671578858577,0.0674424058925,0.067455423149,0.0675669996332,0.0678924310455,0.0679984287056,0.068195547161,0.0681602146077,0.0683071236453,0.0684019636569,0.0686902029078,0.0685525919106,0.0685953628962,0.0685525919106,0.0686399934899,0.0688445503776,0.0690156343201,0.0690453880493,0.0693652406374,0.0693931347584,0.0694656594732,0.0699993669894,0.0703471136986,0.0707859812032,0.0708492078776,0.0708454886615,0.0708008580678,0.0709310306327,0.070858505918,0.0712062526272,0.0713438636244,0.0712862157742,0.0713680385293,0.0713215483275,0.0716525585641,0.0720040244894,0.0722978425645,0.0723182982533,0.0726307124092,0.0727701830144,0.0729914763748,0.073127227764,0.0733838536777,0.073601427822,0.0735251838911,0.0736925486174,0.0736795313609,0.0741686082835,0.0742987808484,0.0744066381165,0.0745851604912,0.0749515032811,0.0751002719268,0.0753922303938,0.0758682900599,0.0760189183136,0.0763926995358,0.0765451873975,0.0768836360664,0.0771811733576,0.0773875898535,0.0774638337844,0.0777576518595,0.0776367773349,0.0778431938307,0.0780570487588,0.0781723444592,0.0781742040673,0.078246728782,0.0783973570357,0.0786539829495,0.0786781578544,0.0786781578544,0.0793513359759,0.0793476167598,0.0795949446331,0.0798422725065,0.0803090341322,0.0805377659249,0.080647482801,0.0808353032162,0.0813039244499,0.081491744865,0.0814043432857,0.0817055997932,0.0818376319662,0.0823639010501,0.0825703175459,0.0828250838516,0.0830073254425,0.0832118823302,0.0834722274601,0.0838850604518,0.0842179302964,0.0844950118989,0.084550800141,0.0846196056396,0.0847702338933,0.0850454558878,0.0852183994383,0.0852351359109,0.0852425743432,0.0850603327523,0.0851923649253,0.0854861830005,0.0857967375482,0.0858413681419,0.0861537822978,0.0861965532834,0.0866149650992,0.0870705690765,0.0872397934109,0.0877735009272,0.0880784766507,0.0883983292388,0.088772110461,0.0889655097003,0.0889208791067,0.089088243833,0.0893671850436,0.0895308305538,0.0899473827616,0.0902114471076,0.0905275804796,0.0905443169522,0.091040832307,0.0914852786359,0.0917735178868,0.0921844912704,0.0919706363423,0.092279331282,0.0923258214837,0.092491326602,0.092545255236,0.0928018811498,0.0926828662333,0.0926047626943,0.0930213149021,0.0931998372769,0.0939492593293,0.0942282005398,0.0946057009781,0.0950557261312,0.0953123520449,0.0954239285292,0.0955912932555,0.0959148650598,0.0961212815556,0.09639650355,0.0964727474809,0.0966215161266,0.0968985977291,0.096922772634,0.0973095711126,0.0977912096029,0.0980515547328,0.09840116105,0.0988009767852,0.0989646222954,0.0993941917597,0.0996954482671,0.0999371973162,0.100134315772,0.100182665582,0.100495079737,0.100989735484,0.101211028845,0.101599686931,0.101954872073,0.102148271312,0.102445808603,0.102808432177,0.103202669088,0.103950231532,0.104396537469,0.105006488916,0.105713139983,0.106356564376,0.107120863293,0.108095297921,0.108948858026,0.109958625208,0.111133897509,0.111442592448,0.112219908622,0.112662495343,0.113462126813,0.114073937868,0.11486241169,0.115052091713,0.115639727863,0.11596144006,0.116123225962,0.1170307147,0.117212956291,0.117675998701,0.117834065387,0.118029324234,0.118083252868,0.11849608586,0.118542576062,0.118825236488,0.119275261641,0.119381259301,0.119836863279,0.12019204842,0.120595583371,0.120900559095,0.121380337977,0.121540264271,0.121886151372,0.122477506739,0.122600240871,0.122756447949,0.122918233851,0.122845709137,0.12303538916,0.123113492699,0.123303172722,0.123730882578,0.12414371557,0.12393172025,0.124130698313,0.124610477196,0.125168359617,0.125925220101,0.126336193485,0.126797376286,0.127405468125,0.127678830512,0.128106540368,0.128684878478,0.129419423666,0.129776468415,0.130246949257,0.130259966514,0.130499855955,0.130942442676,0.131132122699,0.131905719656,0.132521249927,0.132876435069,0.133490105732,0.133962446182,0.13433064858,0.134942459635,0.135643531878,0.136050786045,0.136405971187,0.136536143752,0.136655158668,0.137252092859,0.137276267764,0.137716994876,0.138048005113,0.138520345563,0.138784409909,0.139221417805,0.139392501748,0.139864842198,0.140264657933,0.140342761472,0.140781628977,0.140984326256,0.141410176504,0.141477122395,0.14151059534,0.14146224553,0.141917849508,0.14172259066,0.141601716136,0.14182858832,0.141624031432,0.141633329473,0.141605435352,0.141748625173,0.141785817335,0.141854622833,0.141689117715,0.141692836931,0.141958760885,0.141731888701,0.14165564477,0.14165564477,0.141287442372,0.141306038452,0.141101481565,0.141253969426,0.141051272147,0.14113495451,0.141010360769,0.14103825489,0.141309757669,0.1410866047,0.141417614937,0.140841136435,0.140627281507,0.140554756792,0.140595668169,0.140365076769,0.140153081449,0.139903893967,0.139398080572,0.139362748019,0.138830900111,0.138830900111,0.138483153401,0.138064741586,0.13766492585,0.137508718772,0.137198164225,0.137266969723,0.136997326553,0.136692350829,0.136785331233,0.136736981423,0.136973151648,0.136895048109,0.136738841031,0.136528705319,0.136167941354,0.135900157791,0.135727214241,0.135288346736,0.134743481572,0.134808567854,0.1345426439,0.134228370136,0.134395734862,0.134170722286,0.134113074436,0.133841571657,0.13390665794,0.133958726966,0.133623997513,0.133168393536,0.133064255484,0.133237199035,0.132761139368,0.132199537731,0.131712320417,0.131258576048,0.130812270111,0.130390139079,0.130540767332,0.130187441799,0.129597946041,0.129062378916,0.128630949844,0.128787156922,0.12884666438,0.128809472219,0.128701614951,0.128487760022,0.127903843088,0.127390591261,0.127461256368,0.127057721416,0.126933127676,0.126551908021,0.126287843675,0.12600332364,0.125540281231,0.125131167455,0.124822472516,0.124881979974,0.12434641285,0.123920562601,0.123559798636,0.123212051927,0.122851287961,0.122470068306,0.122228319257,0.121912185885,0.121811767049,0.12156071996,0.121255744236,0.120729475152,0.12055839121,0.120472849239,0.11998935114,0.119721567578,0.119223192615,0.119163685157,0.118654152546,0.118191110136,0.118122304638,0.118200408177,0.117735506159,0.117620210459,0.117220394723,0.116796404083,0.116651354654,0.116351957754,0.116225504406,0.11586474044,0.115466784313,0.115202719967,0.115055810929,0.114702485396,0.11454441871,0.11429337162,0.114276635148,0.113902853926,0.113462126813,0.11306045147,0.112898665568,0.112673652991,0.11218271646,0.111624834039,0.111379365774,0.111053934362,0.11047745586,0.110351002511,0.110099955421,0.109910275398,0.109623895755,0.109289166303,0.109237097277,0.108946998418,0.108556480723,0.108136209299,0.107887021818,0.107444435097,0.107399804503,0.10736447195,0.107089249955,0.106618769114,0.106006958058,0.105685245862,0.105791243522,0.105675947822,0.105534617608,0.105424900732,0.105047400294,0.104560182979,0.103963248789,0.103529960108,0.103539258149,0.103310526356,0.10268011922,0.102442089387,0.102271005445,0.101791226563,0.101367235922,0.10104180451,0.100651286815,0.100628971518,0.100273786377,0.100108281259,0.0999520741808,0.0997252019962,0.0991375658459,0.0989590434712,0.0984718261567,0.0982654096609,0.0984643877244,0.0981724292573,0.0978488574531,0.0974732166228,0.0970324895101,0.0966438314234,0.096236577256,0.0960822297861,0.096026441544,0.0957605175899,0.095262142627,0.095130110454,0.0947302947189,0.0944885456697,0.0942374985802,0.0941203432717,0.0940124860037,0.0934211306372,0.0929320537147,0.0924504152244,0.0916842566994,0.0909590095519,0.0905089843989,0.0898172101966,0.0889190194986,0.0879706193826,0.0872528106674,0.0869534137681,0.0865647556813,0.0862337454448,0.0861017132718,0.0857204936173,0.0855029194731,0.0851421555074,0.0851198402106,0.0849710715649,0.0847516378126,0.0844038911034,0.083892498884,0.0837102572931,0.0833476337194,0.0830686925088,0.0827172265835,0.0826539999091,0.0824698987101,0.0822467457417,0.0819845410037,0.0815066217296,0.0815865848766,0.0810212640232,0.0809134067551,0.0808222859597,0.0806214482881,0.0802402286336,0.0800282333136,0.0799408317343,0.0797418536707,0.0795614716879,0.079353195584,0.0792193038029,0.0789942912264,0.0788585398372,0.0786335272607,0.0784140935084,0.0782039577964,0.0777836863725,0.0777427749949,0.0775252008507,0.0772667153289,0.0772871710177,0.0773243631791,0.0769933529425,0.0765805199509,0.0764168744407,0.0763778226712,0.0762643865789,0.0760412336104,0.0759519724231,0.0758422555469,0.0755986468897,0.0752341637078,0.0749812570103,0.0749868358345,0.0748306287565,0.0746111950042,0.0744103573326,0.0742299753498,0.0742411329982,0.0740328568943,0.0738989651132,0.073601427822,0.0735977086058,0.0733373634759,0.0733485211244,0.0732890136661,0.0731904544384,0.0728334096888,0.0724335939537,0.0722550715789,0.0720319186105,0.0720040244894,0.0719017460455,0.0717790119129,0.0713680385293,0.0712099718433,0.0711690604658,0.0711169914398,0.0709663631861,0.070674404719,0.0705460917621,0.0704828650877,0.0701406972028,0.0703787270358,0.0702504140789,0.0699584556119,0.0698338618711,0.0698970885455,0.0698729136406,0.0698729136406,0.0696664971448,0.0694098712311,0.0693206100437,0.0690063362798,0.0689449692134,0.0689207943085,0.0688036390001,0.0686399934899,0.068459611507,0.0682383181467,0.0681899683368,0.0682978256049,0.0683703503197,0.0681843895126,0.0681248820544,0.0678998694778,0.0679333424231,0.0675539823767,0.0674795980539,0.0676692780771,0.0675484035525,0.0672861988146,0.0670239940766,0.066901259944,0.0669942403475,0.067087220751,0.0667227375692,0.0669496097538,0.0668975407278,0.0667376144338,0.0665683900994,0.0665702497074,0.0665665304913,0.0665553728429,0.0663768504681,0.0662615547677,0.066241099079,0.0660793131768,0.0660625767042,0.0658133892227,0.0657854951017,0.0656423052803,0.0654991154588,0.065528869188,0.0654860982023,0.0653763813262,0.0652982777872,0.0653150142598,0.0651569475739,0.0651959993433,0.065238770329,0.0653410487728,0.0653094354356,0.0650156173605,0.0648054816485,0.0645600133832,0.0644093851295,0.064238301187,0.0639946925298,0.0637436454403,0.0636339285641,0.0633642853939,0.0635111944315,0.0636432266045,0.0637008744547,0.0638515027084,0.0638291874115,0.0638050125066,0.0640988305817,0.0642959490372,0.0642494588355,0.0642680549162,0.0640932517575,0.0639630791926,0.0639779560572,0.0641453207835,0.0642699145242,0.0641955302014,0.0642345819709,0.0641099882302,0.0639705176249,0.0640151482186,0.0640504807719,0.0639705176249,0.0639128697747,0.0638273278035,0.0637752587775,0.0637250493596,0.0634368101087,0.0634368101087,0.0636134728753,0.063446108149,0.0633177951921,0.0633308124486,0.0632303936128,0.0630797653591,0.0631188171286,0.0630946422237,0.0632452704774,0.06315600929,0.0630890633995,0.0631057998721,0.0630723269268,0.0630853441833,0.0632285340048,0.0632266743967,0.0633773026504,0.0632899010711,0.0632043590998,0.0630946422237,0.0630741865349,0.0630053810363,0.0631597285061,0.0629570312265,0.0628938045521,0.0628770680794,0.0624846907766,0.062495848425,0.062311747226,0.0624921292088,0.062523742546,0.0625163041138,0.062285712713,0.0624623754797,0.0622392225113,0.0621778554449,0.0622745550646,0.0623359221309,0.0625981268689,0.0624493582232,0.0624028680215,0.0624995676411,0.0626520555029,0.0626371786383,0.0627617723791,0.0630016618202,0.0630109598605,0.0629514524023,0.0629068218086,0.0630611692784,0.0629347159296,0.062811981797,0.0626520555029,0.0626427574626,0.0624196044941,0.0623452201713,0.0624512178313,0.0623712546843,0.0623954295892,0.062285712713,0.0624791119523,0.0625869692204,0.0627971049324,0.0627468955145,0.0628807872956,0.0627561935549,0.062759912771,0.0628510335664,0.0627896665001,0.0629309967135,0.0629774869152,0.0632136571402,0.0628621912149,0.0630834845753,0.0631541496819,0.0631150979125,0.0628789276875,0.0629291371054,0.0630109598605,0.0629812061314,0.0629495927942,0.0628026837566,0.0629254178893,0.0628082625808,0.0627561935549,0.0627134225692,0.0629291371054,0.0628696296472,0.0628807872956,0.0628826469036,0.0629998022121,0.0629031025924,0.0630704673188,0.0630035214282,0.0631132383044,0.0632787434227,0.0632917606792,0.0632396916532,0.0632787434227,0.0631225363447,0.0628473143503,0.063023977117,0.0630611692784,0.063234112829,0.0631708861546,0.0631876226272,0.0632024994918,0.0632266743967,0.0629923637798,0.0629849253475,0.0630574500623,0.0626446170706,0.062601846085,0.0624474986151,0.0624716735201,0.0622801338888,0.0558979589909,0.0497445158856,0.0435743363077,0.0373855606491,0.0)
ycorr <- c(6.61775579822e-05,6.60358426055e-05,6.56033604344e-05,6.48801211588e-05,6.38660330462e-05,6.25599199932e-05,6.09648230095e-05,5.93628403693e-05,5.77545363899e-05,5.61407148468e-05,5.45206035291e-05,5.2890850375e-05,5.12513766351e-05,4.96049354438e-05,4.79486958366e-05,4.62832708139e-05,4.46087712658e-05,4.2922179519e-05,4.12234260073e-05,3.95137890314e-05,3.7788983668e-05,3.605338414e-05,3.43085774566e-05,3.25534167723e-05,3.07924703577e-05,2.90257551334e-05,2.72558032773e-05,2.54817121597e-05,2.37031557588e-05,2.19151744874e-05,2.01219859102e-05,1.83232866145e-05,1.65148652508e-05,1.46943812812e-05,1.28577606104e-05,1.10033499839e-05,9.12954118779e-06,7.23344518577e-06,5.31685090149e-06,3.38204477781e-06,1.42886046444e-06,-5.48494199392e-07,-2.54763497407e-06,-4.56623133568e-06,-6.5988289473e-06,-8.64207091384e-06,-1.06975397801e-05,-1.27635100037e-05,-1.48436366757e-05,-1.69411262493e-05,-1.90536629118e-05,-2.11810212169e-05,-2.33206660488e-05,-2.5474667038e-05,-2.76443942939e-05,-2.98360397603e-05,-3.20472470542e-05,-3.42757749799e-05,-3.65200929712e-05,-3.87747255199e-05,-4.10428776576e-05,-4.33239879994e-05,-4.56193413739e-05,-4.79289816486e-05,-5.02545084291e-05,-5.2592471337e-05,-5.49428289966e-05,-5.73061541242e-05,-5.96835242422e-05,-6.20764036891e-05,-6.44826115931e-05,-6.69005590842e-05,-6.93303324171e-05,-7.17703675767e-05,-7.42176392596e-05,-7.66699080383e-05,-7.91273778028e-05,-8.159046171e-05,-8.40585807999e-05,-8.65306906649e-05,-8.90076102966e-05,-9.14872648081e-05,-9.39677656515e-05,-9.64500645888e-05,-9.89326052347e-05,-0.000101416273763,-0.000103900252847,-0.000106384836606,-0.000108864910332,-0.000111343507286,-0.000113817632822,-0.000116285582263,-0.000118750422403,-0.000121207832038,-0.00012366088547,-0.000126107895108,-0.000128552347001,-0.000130991200229,-0.000133426906547,-0.000135859220381,-0.000138287760199,-0.000140718166074,-0.000143146887334,-0.000145578251833,-0.000148008431639,-0.000150433526657,-0.00015285494847,-0.000155272409479,-0.00015768770697,-0.000160098558277,-0.000162505621283,-0.00016490463271,-0.000167295426483,-0.000169677646479,-0.000172049755833,-0.000174418272228,-0.000176781754835,-0.000179138358154,-0.000181487378555,-0.00018382760256,-0.000186161774801,-0.000188489174772,-0.000190812023529,-0.000193129208705,-0.000195443925459,-0.000197756283862,-0.000200066800388,-0.000202376105419,-0.000204683509543,-0.000206987458758,-0.000209289175318,-0.000211586179786,-0.000213877363098,-0.000216161181345,-0.00021843936172,-0.000220709223859,-0.000222966953831,-0.000225215786219,-0.000227456140435,-0.000229690724898,-0.000231917962945,-0.00023414097343,-0.000236360345072,-0.000238575641812,-0.000240787979644,-0.000242994503076,-0.000245200010445,-0.000247400578921,-0.000249590638718,-0.000251769558919,-0.000253935639896,-0.000256089054196,-0.000258226929289,-0.00026035234875,-0.000262466160982,-0.000264567713535,-0.000266655159923,-0.000268726323264,-0.000270789610698,-0.000272848139533,-0.000274904110645,-0.000276957982613,-0.0002790103389,-0.000281058558972,-0.000283096839853,-0.000285130537386,-0.000287158816753,-0.000289185310438,-0.000291209635152,-0.000293226796702,-0.000295234617238,-0.000297231113033,-0.000299215919626,-0.000301189894147,-0.000303157403532,-0.000305116063927,-0.000307061251655,-0.000308994046618,-0.000310909770079,-0.000312809808893,-0.000314694725449,-0.000316566087712,-0.000318423848071,-0.000320269257543,-0.000322103783107,-0.000323926116514,-0.00032573954206,-0.000327546732112,-0.000329349551953,-0.000331147836178,-0.000332941063276,-0.000334727978787,-0.000336510540185,-0.000338288895857,-0.000340060524728,-0.0003418259152,-0.000343585834496,-0.000345339084814,-0.000347086354961,-0.000348823385041,-0.000350551423851,-0.000352270836127,-0.000353983557589,-0.000355687150828,-0.000357381044977,-0.000359066677676,-0.000360742726082,-0.000362407415922,-0.000364062368086,-0.000365707966588,-0.000367347627742,-0.000368984157109,-0.000370612581595,-0.00037223122821,-0.000373840370247,-0.000375442691036,-0.000377038078659,-0.00037862549322,-0.000380203799532,-0.000381774682926,-0.00038333507685,-0.000384882697208,-0.00038642028422,-0.000387952063732,-0.000389477962204,-0.000390996808032,-0.000392507617534,-0.000394011298861,-0.000395508062603,-0.000396997299714,-0.000398477041115,-0.000399948861201,-0.000401413726349,-0.000402870213395,-0.000404320829723,-0.000405766555728,-0.000407205649123,-0.000408635875254,-0.000410055752355,-0.000411469374571,-0.000412879047545,-0.000414285105839,-0.000415686448283,-0.000417081487519,-0.0004184635581,-0.000419826593727,-0.000421171645102,-0.000422503055042,-0.000423823583943,-0.000425130314555,-0.000426420834639,-0.000427696164842,-0.000428953903584,-0.000430193351859,-0.000431417872135,-0.000432631039199,-0.000433837780443,-0.000435037555417,-0.00043622873074,-0.000437411792629,-0.000438588668598,-0.000439755778881,-0.000440914597796,-0.000442066276665,-0.000443212740758,-0.000444356428403,-0.00044549682885,-0.000446631851571,-0.000447759317701,-0.000448877223484,-0.000449984661529,-0.000451081464362,-0.000452172156772,-0.000453255371247,-0.000454332877795,-0.000455402432223,-0.000456460188928,-0.000457504798261,-0.00045853832335,-0.000459563732197,-0.000460582648058,-0.000461595175702,-0.000462597890181,-0.000463587167422,-0.000464561287963,-0.000465515295005,-0.000466448441108,-0.000467361625455,-0.000468252830772,-0.000469115258785,-0.000469945520017,-0.000470742631358,-0.000471508506526,-0.000472247217358,-0.000472959304369,-0.000473646693381,-0.000474312858742,-0.000474959575629,-0.00047558613187,-0.000476198263381,-0.000476800728482,-0.000477395907215,-0.000477983147914,-0.000478558996531,-0.000479124323469,-0.000479678780178,-0.000480222045542,-0.000480754793265,-0.000481279029381,-0.000481794834521,-0.000482299516878,-0.000482793696365,-0.00048327585082,-0.000483751022103,-0.000484217069422,-0.000484676432105,-0.000485130051126,-0.000485575717267,-0.000486012812168,-0.000486440294151,-0.000486860193775,-0.000487271309114,-0.000487672152684,-0.000488063440773,-0.000488441702143,-0.000488809373623,-0.000489164203862,-0.000489505569253,-0.000489833533316,-0.000490149285385,-0.000490449338174,-0.000490734318265,-0.00049100621188,-0.000491265139668,-0.000491514238992,-0.000491753766678,-0.000491981265548,-0.000492194632187,-0.000492395490643,-0.000492585171429,-0.00049276406879,-0.000492932776361,-0.000493090000288,-0.0004932354377,-0.000493367962787,-0.00049348412819,-0.000493583964725,-0.000493673351651,-0.000493752595122,-0.000493819890127,-0.00049387425983,-0.000493916260809,-0.000493946904494,-0.000493963999339,-0.000493968915222,-0.000493962115328,-0.000493947225813,-0.000493920392282,-0.000493880730156,-0.000493829392119,-0.000493767438843,-0.000493692805356,-0.000493602720897,-0.000493497375295,-0.00049337718857,-0.000493241590582,-0.000493091424908,-0.00049292544439,-0.000492744280004,-0.000492547198049,-0.000492334872238,-0.000492106079683,-0.00049186336037,-0.000491607942746,-0.000491339514527,-0.000491059685269,-0.000490764798949,-0.000490458144878,-0.000490136857229,-0.000489802183089,-0.000489452689865,-0.000489089898431,-0.000488713983242,-0.000488324898282,-0.000487922643998,-0.000487505442938,-0.000487073521255,-0.000486627777683,-0.000486166708367,-0.000485691841537,-0.000485203496475,-0.000484701095612,-0.000484182567218,-0.000483647001879,-0.000483095465526,-0.000482530292445,-0.000481953386347,-0.000481363113265,-0.00048076129503,-0.000480145106666,-0.00047951548901,-0.000478870168282,-0.000478210555937,-0.000477537937365,-0.000476851095678,-0.000476147264234,-0.000475423682971,-0.000474680076937,-0.000473918125417,-0.000473137078716,-0.000472336519646,-0.000471519144314,-0.000470687202962,-0.000469840016666,-0.000468974490686,-0.000468093509575,-0.000467198968125,-0.000466290493994,-0.000465366574891,-0.000464426579056,-0.000463470332478,-0.000462497887628,-0.000461505491193,-0.000460491751333,-0.000459458071543,-0.000458404938669,-0.000457331202771,-0.000456236983959,-0.000455123464913,-0.000453992470175,-0.000452842703749,-0.000451675161834,-0.000450489882278,-0.000449287881011,-0.000448071221962,-0.000446839643004,-0.000445592761405,-0.000444328856141,-0.000443045949936,-0.000441741426186,-0.000440414589602,-0.000439064976576,-0.000437691673204,-0.000436296126521,-0.000434877868178,-0.000433435199028,-0.000431968745672,-0.000430481424536,-0.000428975414272,-0.000427453073512,-0.000425916028025,-0.000424364994151,-0.000422801733694,-0.000421226205717,-0.000419636806576,-0.000418032717312,-0.000416413487353,-0.000414775835363,-0.000413118321164,-0.000411441538132,-0.000409744901333,-0.000408027454151,-0.00040629024045,-0.000404530603803,-0.000402748114916,-0.000400944730423,-0.000399121657952,-0.000397280331711,-0.000395421874222,-0.000393544884643,-0.000391648326781,-0.000389731003418,-0.000387791804346,-0.000385829522598,-0.000383846785755,-0.000381841650375,-0.000379813400002,-0.000377761313371,-0.000375685107456,-0.000373585317852,-0.00037146384516,-0.000369320761793,-0.000367157880037,-0.000364977319205,-0.000362777332773,-0.000360557054273,-0.000358317804723,-0.000356058942254,-0.000353779921725,-0.000351480006685,-0.000349160232754,-0.000346818168136,-0.000344453397951,-0.000342063362405,-0.000339649598237,-0.000337212988293,-0.000334755007079,-0.000332274852863,-0.000329774482298,-0.000327254810545,-0.000324713050306,-0.000322149831636,-0.000319565256099,-0.000316962095831,-0.00031434121,-0.000311701261556,-0.000309040725019,-0.000306359955288,-0.000303658417084,-0.000300933843731,-0.000298186589197,-0.000295419726202,-0.000292632704025,-0.000289824229527,-0.000286992033143,-0.000284137047424,-0.000281259390336,-0.000278360274504,-0.000275438786848,-0.000272499253256,-0.000269541545202,-0.000266563719594,-0.000263566947352,-0.000260550478794,-0.00025751517467,-0.000254460294575,-0.00025138406069,-0.000248287196774,-0.000245168566176,-0.000242026463086,-0.00023886174727,-0.000235674467988,-0.000232464627638,-0.000229232174407,-0.000225978106066,-0.0002227043746,-0.00021941373909,-0.000216105686167,-0.000212780382432,-0.000209438706847,-0.000206079414269,-0.000202701185326,-0.00019930571679,-0.000195895258579,-0.000192470310866,-0.000189030555969,-0.000185571693487,-0.000182094353174,-0.000178599470992,-0.000175086090808,-0.000171553832538,-0.000168006560271,-0.000164443011989,-0.000160860068238,-0.000157254539559,-0.000153625364575,-0.000149972965251,-0.000146300722858,-0.000142606902168,-0.000138891928771,-0.000135158459518,-0.000131405886416,-0.000127632640027,-0.00012383929077,-0.000120030352657,-0.000116206425426,-0.000112369883932,-0.000108517607929,-0.000104650606128,-0.00010076958926,-9.68745727505e-05,-9.29619587047e-05,-8.90339302363e-05,-8.50895526186e-05,-8.11264764714e-05,-7.71455063103e-05,-7.3146796951e-05,-6.91296571487e-05,-6.50952551165e-05,-6.10440926735e-05,-5.69742651476e-05,-5.2887360578e-05,-4.87827918366e-05,-4.4660881144e-05,-4.05236439662e-05,-3.63695951878e-05,-3.21981361793e-05,-2.80098768873e-05,-2.38054814128e-05,-1.95834139396e-05,-1.52952504196e-05,-1.0890285517e-05,-6.32300999735e-06,-1.55875843508e-06,3.67551234708e-06,8.38188248147e-06,1.28434657132e-05,1.70996260459e-05,2.11965542426e-05,2.51904580882e-05,2.91320500257e-05,3.29733846566e-05,3.66623833714e-05,4.01546602341e-05,4.34128426198e-05,4.61636986877e-05,4.94054981619e-05,5.28529436427e-05,5.64690498918e-05,6.02063863307e-05,6.40110095086e-05,6.78284052092e-05,7.16578372204e-05,7.54983348712e-05,7.93488069576e-05,8.32103538862e-05,8.70852038224e-05,9.09745865854e-05,9.48755975295e-05,9.87856790416e-05,0.000102704901955,0.000106630953765,0.000110567355991,0.000114514513699,0.000118473846525,0.000122445160737,0.000126425584808,0.000130411264156,0.000134402965305,0.000138404715778,0.000142416066341,0.000146437684702,0.000150468853091,0.000154506485077,0.000158549860134,0.000162598349494,0.000166652508395,0.0001707155446,0.000174786364916,0.000178862300611,0.00018294183887,0.000187027812237,0.000191119834117,0.000195218988613,0.000199327775408,0.000203445258802,0.000207573018021,0.0002117098007,0.000215852403796,0.000220004311372,0.000224164443625,0.000228330214862,0.000232501522345,0.000236678839726,0.000240862487887,0.000245052246718,0.000249247372856,0.000253447637695,0.000257654220974,0.000261866373815,0.000266083426779,0.000270309036179,0.000274541368528,0.000278778921921,0.00028302029007,0.000287265438285,0.000291512607966,0.000295760518453,0.000300009758189,0.000304260050123,0.000308513359187,0.00031276590281,0.000317015375106,0.000321263849059,0.000325509013594,0.000329752126056,0.000333992724974,0.000338231681618,0.000342470528552,0.000346705880407,0.000350936565503,0.000355163241269,0.000359387747179,0.000363609318469,0.000367830498428,0.000372050083937,0.00037626593733,0.000380478054982,0.000384685670332,0.000388889058877,0.000393087636236,0.000397281473514,0.000401468102458,0.000405649284171,0.000409823219436,0.000413987699541,0.000418144977683,0.000422293957177,0.000426432678419,0.000430558283773,0.000434669458573,0.000438764579414,0.000442846009271,0.000446912334627,0.000450959197515,0.000454986423277,0.000458993475627,0.000462980163276,0.000466946260619,0.000470894144373,0.000474826551182,0.000478746014535,0.000482652584712,0.000486542976662,0.000490420428695,0.000494286897661,0.000498143153191,0.000501987244692,0.000505818559669,0.000509636276158,0.000513436807874,0.000517218248158,0.000520977082254,0.000524715470436,0.000528432616303,0.000532127253547,0.000535796535207,0.000539441571576,0.000543061834741,0.000546657738784,0.000550231705212,0.000553783012891,0.000557312931408,0.000560822558097,0.000564311816174,0.000567777339591,0.00057121991844,0.000574638045607,0.000578033126074,0.000581405138546,0.000584753210824,0.000588076652763,0.000591375551063,0.000594646281053,0.000597887972005,0.000601102004188,0.000604291017981,0.000607454488441,0.000610592212272,0.00061370114254,0.000616779139774,0.000619823963122,0.000622835416165,0.000625814076017,0.000628760375866,0.000631673458959,0.000634550703933,0.000637391028288,0.000640192614035,0.00064295858618,0.000645689564704,0.000648387328257,0.000651052759074,0.000653683067149,0.000656277010373,0.000658835129394,0.000661354387806,0.000663835367176,0.000666279130075,0.000668685435521,0.000671053273893,0.000673381465756,0.000675669063515,0.000677917885806,0.00068012871602,0.000682302159247,0.000684439469373,0.000686543575641,0.000688613285548,0.000690647292231,0.000692644480621,0.000694605144191,0.000696529128312,0.000698413471283,0.000700257477793,0.000702061869463,0.000703827223745,0.000705550553301,0.000707233215969,0.00070887270124,0.000710468928151,0.000712023514651,0.000713535335335,0.000715005066532,0.000716434278975,0.000717821856408,0.000719165171655,0.000720463805488,0.000721717099912,0.000722925726401,0.000724091295917,0.000725213965061,0.000726292489269,0.00072732902291,0.000728323295653,0.000729275629906,0.000730186089464,0.000731057409784,0.000731888609471,0.000732679304945,0.000733427942998,0.000734134142568,0.000734798693508,0.000735422148352,0.000736002429163,0.000736537162506,0.000737028338432,0.000737473360704,0.00073787052144,0.000738221721031,0.000738527483099,0.000738787010772,0.000738999971934,0.000739166608304,0.000739286412354,0.000739360738538,0.000739391270395,0.000739378465396,0.000739324875828,0.000739231313153,0.000739097005167,0.000738922821274,0.000738708867323,0.000738452994457,0.000738154960935,0.000737814820568,0.000737432090169,0.000737005818318,0.000736534964697,0.000736019070505,0.000735457434964,0.000734850348584,0.000734197649021,0.000733500432996,0.000732762378759,0.000731982611831,0.000731160780147,0.000730296517717,0.000729390317684,0.000728442508055,0.000727453368772,0.000726423340155,0.000725352432262,0.000724243351734,0.00072309394115,0.000721903838245,0.000720672664052,0.000719400567696,0.000718087371132,0.000716733661105,0.000715340419989,0.000713907801151,0.000712436297732,0.000710924371986,0.000709369083916,0.000707773675973,0.000706138102935,0.000704464452829,0.000702753670894,0.000701005183343,0.000699219957226,0.00069739523843,0.00069553210392,0.000693630020546,0.000691691957011,0.000689718540732,0.00068770673111,0.000685657305583,0.000683570826513,0.000681446739139,0.000679287074125,0.000677092666211,0.000674864838618,0.000672601921199,0.000670304111352,0.000667967364157,0.000665595528123,0.000663189220883,0.000660748121448,0.00065827182172,0.000655759938974,0.000653210369435,0.000650621350371,0.000647993895863,0.000645330364865,0.000642632147357,0.000639901309381,0.000637135689019,0.000634335194907,0.000631501782981,0.00062863292984,0.00062572997504,0.000622792926176,0.000619820852442,0.000616812169184,0.000613768015561,0.000610687399539,0.000607570432311,0.000604417727948,0.000601229577137,0.000598006242596,0.000594750232401,0.000591462852872,0.00058814689185,0.000584804440402,0.000581435901214,0.000578039575068,0.000574615388101,0.000571164428021,0.000567685331076,0.000564179076668,0.000560642828741,0.000557077811795,0.000553484514199,0.000549861130669,0.000546207684835,0.000542527155629,0.000538820767083,0.000535088756581,0.000531331292951,0.000527548366751,0.000523742867603,0.000519916365551,0.000516068647276,0.000512199471503,0.000508309381761,0.000504395477886,0.000500458162903,0.000496497132127,0.000492512995602,0.000488509314382,0.000484486273539,0.000480442191792,0.000476376406297,0.000472288371493,0.000468180109663,0.000464054405441,0.000459913623624,0.000455757998957,0.00045158761218,0.00044740070909,0.00044319491718,0.000438969949368,0.000434727797608,0.000430470732468,0.000426198485008,0.000421908951668,0.000417600805324,0.000413273693125,0.000408927125623,0.000404562054417,0.00040018070602,0.000395784288793,0.000391371790808,0.000386942044359,0.000382493857489,0.000378027090371,0.000373542704836,0.000369042751959,0.000364527163789,0.000359994515451,0.00035544498222,0.000350879252628,0.000346297459206,0.000341704078246,0.000337101177887,0.000332488948662,0.000327869067052,0.000323239407636,0.000318600456377,0.000313956515765,0.000309308293403,0.00030465526188,0.000299997899355,0.000295333342057,0.000290660001896,0.000285979456641,0.000281290400126,0.000276592880133,0.000271889763694,0.000267178242352,0.000262459153159,0.000257733319276,0.000253001175124,0.000248263837981,0.000243522270727,0.000238776432268,0.000234025270306,0.000229271002707,0.000224516849874,0.000219761401322,0.00021500572082,0.000210246857308,0.000205487237289,0.000200727754227,0.000195967485158,0.000191208478715,0.00018645208203,0.00018169853823,0.000176948029464,0.000172199008948,0.000167453189573,0.000162714935776,0.000157984591556,0.000153258726041,0.000148540111464,0.000143831244463,0.000139134515287,0.000134450633265,0.000129775875862,0.000125111971723,0.00012045995605,0.000115818716009,0.000111186548839,0.000106565151553,0.00010195467083,9.73531487889e-05,9.27580054171e-05,8.81653613167e-05,8.35758452322e-05,7.89941137498e-05,7.44173266719e-05,6.98453238143e-05,6.52774403587e-05,6.07147344064e-05,5.61582319898e-05,5.16098675042e-05,4.7069330683e-05,4.25403172288e-05,3.80245262455e-05,3.35205395751e-05,2.90275708935e-05,2.45487003211e-05,2.00861407668e-05,1.56418175877e-05,1.12135312652e-05,6.80192024268e-06,2.4067467948e-06,-1.97175387817e-06,-6.33497695821e-06,-1.0682819644e-05,-1.50131003285e-05,-1.9330161e-05,-2.36345058016e-05,-2.79275152371e-05,-3.22075124518e-05,-3.64736152005e-05,-4.07254824711e-05,-4.49620048158e-05,-4.91830744377e-05,-5.33863524681e-05,-5.75721141211e-05,-6.17380967951e-05,-6.58794248984e-05,-7.00000045086e-05,-7.40987408366e-05,-7.8179612362e-05,-8.22415621687e-05,-8.6286406804e-05,-9.03103778986e-05,-9.43153748034e-05,-9.83026773944e-05,-0.000102270810167,-0.000106223729321,-0.000110158041632,-0.000114070895439,-0.000117960890311,-0.000121826658437,-0.000125667544157,-0.000129485908683,-0.000133282145538,-0.000137053473024,-0.000140800409148,-0.000144523206478,-0.000148220598301,-0.000151896034871,-0.000155550393696,-0.000159185459863,-0.000162798532171,-0.000166390835013,-0.00016996009026,-0.000173508936989,-0.00017703838416,-0.000180546743456,-0.000184034768018,-0.000187501924603,-0.000190947375877,-0.000194367859302,-0.000197763448936,-0.000201134640773,-0.000204481031437,-0.000207801295855,-0.000211095167994,-0.000214362578995,-0.000217605201519,-0.000220822160799,-0.000224012743013,-0.000227179250846,-0.00023032489963,-0.000233448715604,-0.000236551367882,-0.000239631114769,-0.000242687093084,-0.000245719471801,-0.000248726002442,-0.00025170762684,-0.00025466307703,-0.000257593052886,-0.000260493073706,-0.000263359893359,-0.000266196182551,-0.000269004064995,-0.000271787249192,-0.00027454758575,-0.000277283998608,-0.000279994038333,-0.000282679530589,-0.000285338746173,-0.000287972656106,-0.000290583782826,-0.000293172654318,-0.000295736781201,-0.000298271215294,-0.000300773417278,-0.000303242033514,-0.000305681844963,-0.00030809416375,-0.00031047786245,-0.000312836351636,-0.000315169392327,-0.000317475914381,-0.000319756552964,-0.000322014154544,-0.000324250162065,-0.000326465234503,-0.000328656586776,-0.000330819160373,-0.000332954590589,-0.000335060133725,-0.00033713712852,-0.000339185099272,-0.000341206495774,-0.000343197088485,-0.000345158040865,-0.000347087388263,-0.000348985905783,-0.000350860138907,-0.00035271030329,-0.00035453534416,-0.000356335580195,-0.000358107002629,-0.000359847486875,-0.000361556954829,-0.000363234918425,-0.000364882815767,-0.000366504125454,-0.000368095067773,-0.000369653174209,-0.00037117928833,-0.000372674611175,-0.000374140009626,-0.000375576641373,-0.000376986610009,-0.000378371753339,-0.000379735286314,-0.000381073550877,-0.000382386138904,-0.000383675436786,-0.000384943367273,-0.000386186858678,-0.00038740659433,-0.000388605229659,-0.000389782843902,-0.000390937246006,-0.000392066268517,-0.000393168526588,-0.000394244749807,-0.000395292642867,-0.000396310436173,-0.000397297687173,-0.000398257996256,-0.000399190475985,-0.000400093613751,-0.000400969353857,-0.000401818416915,-0.000402576484952,-0.000403181535408,-0.000403631604499,-0.000403930373137,-0.000404081222356)
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(226)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('C2C12-myoblast-H3K27ac-17871-vs-17872.pooled.sorted.MACS-2.1.0.p1e-1_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 226',bty='n')
dev.off()