# R script for Peak Model
#  -- generated by MACS
p <- c(0.0393398481526,0.0458256568429,0.0521035870495,0.0583399415594,0.0649089016431,0.0643637980637,0.0642667881047,0.0638464116155,0.0635738598258,0.0635369036509,0.063730923569,0.0634398936919,0.0636847283504,0.0640404315336,0.063698586916,0.0638186944843,0.0642621685828,0.0645208618069,0.0647010231594,0.0646964036376,0.0643961347167,0.0644053737604,0.0645254813288,0.0640404315336,0.0640635291429,0.0641513000582,0.0640450510554,0.0640173339243,0.0637124454816,0.0637863578313,0.0639110849215,0.0642483100172,0.0639849972712,0.0645208618069,0.0648396088152,0.0652553657825,0.0655602542252,0.0656896008373,0.0658328060149,0.0656942203591,0.0657588936652,0.0657265570122,0.0656295470531,0.0653985709602,0.0649643359054,0.0642021147986,0.0632920689924,0.0630703319431,0.0631581028585,0.0627885411097,0.0626915311507,0.062321969402,0.0619015929128,0.0618092024756,0.0620632761778,0.0621371885276,0.0623681646205,0.0622988717927,0.0622018618336,0.0622434375303,0.0624466964921,0.062779302066,0.0629687024622,0.0626915311507,0.0625899016698,0.0626730530632,0.0625575650168,0.0625991407135,0.0626915311507,0.0630518538557,0.0627377263693,0.0623681646205,0.0629456048529,0.0631950590333,0.063338264211,0.0633105470798,0.0633983179951,0.063370600864,0.0631165271617,0.0627007701944,0.0625206088419,0.0625714235823,0.0619246905221,0.0616336606449,0.0613518698115,0.0612271427213,0.061042361847,0.0611301327623,0.0611486108497,0.0611532303716,0.0617814853444,0.0617907243881,0.0620355590467,0.0620447980904,0.0622572960959,0.062090993309,0.0623774036643,0.0620678956997,0.0617999634319,0.0621972423118,0.0615135530766,0.061370347899,0.0610746985,0.0615874654263,0.0617121925165,0.0619015929128,0.0618877343472,0.0618461586505,0.0623081108364,0.0621926227899,0.0624651745796,0.0627423458911,0.0630564733776,0.062548325973,0.0623912622298,0.0624928917107,0.0620632761778,0.0622388180085,0.0621187104401,0.0619755052625,0.0618507781723,0.0618138219974,0.0616244216012,0.0620863737871,0.0622434375303,0.0623265889238,0.0626083797572,0.0628809315469,0.0629132681999,0.0634121765607,0.0637124454816,0.06363391361,0.0639249434871,0.0635184255635,0.063305927558,0.0633798399077,0.0635091865198,0.0632273956863,0.0632782104268,0.0628023996753,0.0626684335414,0.0627885411097,0.0625668040605,0.0627654435004,0.0625760431042,0.0623265889238,0.062220339921,0.0622757741834,0.062058656656,0.0620032223937,0.0617907243881,0.0616290411231,0.0618369196067,0.0619755052625,0.0621972423118,0.0622111008773,0.062386642708,0.0624097403173,0.0626638140195,0.0630241367245,0.0635507622165,0.0640080948805,0.0635230450853,0.0632966885142,0.0628347363283,0.0629132681999,0.0631534833366,0.062811638719,0.0626083797572,0.0623358279675,0.0623034913145,0.0622988717927,0.0628485948939,0.0628532144158,0.0633475032547,0.0632597323394,0.0629317462874,0.0632042980771,0.0634860889105,0.0638972263559,0.0635461426946,0.0632874494705,0.0630841905087,0.0631950590333,0.0632320152082,0.0633983179951,0.0634768498667,0.0637447821346,0.0638140749625,0.0638464116155,0.0638648897029,0.0640127144024,0.06435455902,0.0646779255501,0.0646086327222,0.0643268418888,0.0643176028451,0.064123582927,0.0638140749625,0.063698586916,0.0638602701811,0.0635830988695,0.0635600012602,0.0632458737738,0.0634907084323,0.0640866267521,0.0642575490609,0.06415591958,0.0647703159873,0.0647564574217,0.0650059116021,0.0649874335147,0.0652368876951,0.0654216685694,0.0656711227498,0.0657173179684,0.0661376944576,0.0664656805096,0.0661746506325,0.0663363338976,0.0663732900724,0.0665303538156,0.0662531825041,0.0666781785151,0.0661931287199,0.0662762801134,0.0660222064111,0.0662162263292,0.0665580709468,0.0665811685561,0.0662347044167,0.0667382322993,0.0669599693485,0.0668906765207,0.0674634972312,0.0674727362749,0.0678469175455,0.0679485470264,0.0679069713297,0.0679808836794,0.0682488159473,0.068027078898,0.0681841426412,0.0683458259063,0.0682996306877,0.0683042502096,0.0680732741166,0.0681702840756,0.0681148498133,0.0683827820812,0.0687015290895,0.0690572322726,0.0691634812754,0.0692835888437,0.0691634812754,0.0692235350595,0.0696439115487,0.0698148338575,0.0699996147319,0.0701566784751,0.0705262402238,0.0706278697047,0.07091428006,0.0711868318497,0.0718058477788,0.0721754095275,0.0723370927926,0.0723832880112,0.0724248637079,0.0723832880112,0.0723001366177,0.0723925270549,0.0722169852243,0.0718705210848,0.0717180768635,0.0719398139127,0.0717365549509,0.0719351943909,0.0724618198828,0.0722123657024,0.0722770390084,0.0727713278474,0.0733256704705,0.0739677840089,0.0741987601019,0.0744389752385,0.0748223955528,0.0753305429573,0.0754922262224,0.0760049931488,0.0762636863729,0.0760373298018,0.0761528178483,0.0755522800066,0.075931080799,0.0761435788046,0.0764068915505,0.076490042944,0.0767949313867,0.0774924791874,0.0786196425211,0.0801025090379,0.081377497071,0.0836918775224,0.0857013695312,0.0879741742859,0.0901037738629,0.0923165248335,0.0944599829761,0.0965064311597,0.0974026184004,0.0990425486604,0.100460741871,0.101250680109,0.101786544645,0.102336267746,0.102858273716,0.102682731885,0.102830556585,0.102821317541,0.1037637,0.1039115247,0.104544399195,0.104678365329,0.104895482856,0.104378096408,0.104761516722,0.105269664127,0.105773192009,0.106507695985,0.106212046586,0.106124275671,0.105449825479,0.105690040616,0.105870201968,0.106535413116,0.106655520684,0.106877257734,0.106900355343,0.107011223867,0.107616381231,0.107653337406,0.108318548554,0.108859032611,0.109076150139,0.109344082406,0.110055488773,0.110032391163,0.110097064469,0.110383474825,0.110923958882,0.111741614251,0.112374488746,0.112568508664,0.113367685946,0.113612520604,0.113164426984,0.114088331356,0.114499468801,0.114573381151,0.114457893104,0.114014419006,0.113954365222,0.114402458842,0.114231536533,0.114591859238,0.115598915004,0.115534241698,0.116139399061,0.116453526548,0.117294279526,0.118361389075,0.118116554417,0.118282857204,0.119040458789,0.119257576316,0.118592365168,0.118934209786,0.119160566357,0.119285293447,0.119165185879,0.119008122136,0.119742626111,0.120010558379,0.119964363161,0.120347783475,0.120823594226,0.12147956633,0.121812171904,0.122089343216,0.122486622096,0.122809988626,0.123184169896,0.12359068782,0.123946391003,0.124172747574,0.125147466687,0.125590940785,0.125969741577,0.126805875034,0.127101524433,0.127974614064,0.128048526414,0.128048526414,0.128002331196,0.12818711207,0.128445805294,0.128219448723,0.128445805294,0.128713737562,0.128963191742,0.12898166983,0.129882476592,0.13074632718,0.131771861033,0.13246016979,0.132321584134,0.132991414803,0.132991414803,0.132621853055,0.133545757427,0.133943036306,0.134284880924,0.134372651839,0.134183251443,0.134414227536,0.13551829326,0.136474534285,0.137329145829,0.138899783261,0.139431028275,0.139481843016,0.139504940625,0.140331835038,0.141445139806,0.142438337005,0.142156546172,0.142784801145,0.142992679628,0.142766323057,0.142757084014,0.143334524246,0.144055169656,0.144119842962,0.144447829014,0.144627990367,0.145251625818,0.144498643755,0.145348635777,0.145926076009,0.146147813058,0.146531233373,0.146180149711,0.146900795121,0.147321171611,0.147695352881,0.147626060053,0.147995621802,0.148379042116,0.148850233346,0.1495801178,0.15022685086,0.150850486311,0.151044506229,0.150993691489,0.150965974357,0.151367872759,0.152074659604,0.15179286877,0.151769771161,0.15179286877,0.151654283114,0.152347211393,0.152157810997,0.152499655615,0.152629002227,0.153187964372,0.153275735287,0.153566765164,0.153728448429,0.153589862773,0.153673014167,0.153691492254,0.153890131694,0.154486050014,0.154712406585,0.154338225315,0.154384420533,0.1549480022,0.154740123716,0.155151261162,0.155091207378,0.154841753197,0.154652352801,0.153552906599,0.153261876721,0.153733067951,0.153991761175,0.153834697432,0.15402871735,0.154171922528,0.154527625711,0.154592299017,0.154536864755,0.15489718746,0.15487408985,0.154559962364,0.154130346831,0.153345028115,0.152873836885,0.15271215362,0.151903737295,0.151487980327,0.151548034112,0.151187711407,0.151026028142,0.151261623756,0.151584990287,0.152093137691,0.152467318962,0.151857542076,0.152070040082,0.151700478333,0.151474121762,0.151621946461,0.151044506229,0.150587173565,0.149316805054,0.148582301078,0.147570625791,0.147154868824,0.14687307799,0.147085575996,0.146614384766,0.145708958482,0.145713578004,0.145020649725,0.145089942553,0.144096745353,0.143796476432,0.142964962497,0.142170404738,0.141449759328,0.140839982442,0.140336454559,0.139509560147,0.13874733904,0.137269092045,0.136525349026,0.13611421158,0.135532151826,0.134663681716,0.133591952645,0.13278353632,0.131896588123,0.131346865022,0.130552307262,0.13042296065,0.130187365035,0.129660739543,0.129499056278,0.129674598109,0.12942976345,0.12955449054,0.129332753491,0.128898518436,0.12910639692,0.128736835171,0.128806127999,0.128533576209,0.128607488559,0.12883384513,0.129078679789,0.128769171824,0.129258841141,0.129762369024,0.12948057819,0.129933291333,0.130330570213,0.130427580172,0.129799325199,0.129254221619,0.128251785376,0.128011570239,0.127253968654,0.12662109416,0.126011317274,0.125064315293,0.123424385033,0.122579012533,0.121798313339,0.120943701795,0.121036092232,0.120306207778,0.119474693843,0.118444540469,0.117774709799,0.117118737695,0.116545916985,0.115834510618,0.11442093693,0.112767148104,0.110120162079,0.107865835411,0.10619818802,0.104003915137,0.101121333497,0.098465108428,0.0961969231952,0.0935268395606,0.092399676227,0.0910369172785,0.0899975248602,0.0887872101331,0.0873597778786,0.086722283862,0.0871611384387,0.0870040746955,0.0869070647364,0.0864312539849,0.0856967500093,0.0855396862661,0.0857290866623,0.0858168575776,0.0861771802827,0.086001638452,0.0854149591759,0.0852070806922,0.0848421384654,0.0852625149545,0.0853826225229,0.0846065428505,0.0841076344898,0.0839967659651,0.0838997560061,0.0837334532192,0.0835209552136,0.0833638914704,0.0834562819076,0.0831698715523,0.0827818317162,0.0830774811152,0.0829111783282,0.0823568357051,0.0815715169891,0.0811880966748,0.0808000568386,0.080786198273,0.0806291345298,0.0799639233821,0.0794650150213,0.0791832241879,0.0790954532726,0.0793495269748,0.0790123018791,0.0790400190103,0.0789984433135,0.0785272520839,0.0777511724116,0.078065299898,0.078162309857,0.0778528018925,0.0781114951166,0.077409327794,0.0777326943241,0.0772661226163,0.0770628636545,0.0771090588731,0.0773585130535,0.076915038955,0.0767625947337,0.0767718337774,0.0761066226297,0.0761251007171,0.0755199433536,0.0752889672606,0.0749979373835,0.0747577222468,0.0747300051157,0.0745452242413,0.0742865310172,0.0741340867958,0.0740093597056,0.0738430569187,0.0738153397875,0.0738846326154,0.074097130621,0.0737183298285,0.073113172465,0.0728082840222,0.0725634493637,0.0719998676969,0.0719490529564,0.0718843796504,0.0717550330384,0.0712006904153,0.0708080310572,0.0710852023688,0.0710159095409,0.0710528657158,0.0706602063577,0.0704985230927,0.0702213517811,0.06999499521,0.0695284235022,0.0696485310706,0.0695284235022,0.0689833199229,0.0688678318764,0.0689186466168,0.0693251645404,0.0693344035842,0.0691126665349,0.0689602223136,0.0692512521907,0.0692512521907,0.0690479932289,0.069043373707,0.0686876705239,0.0683088697314,0.0681287083789,0.0680640350729,0.0681240888571,0.0679993617669,0.0674173020126,0.0670154036109,0.0666874175589,0.0664980171626,0.0665996466435,0.0664148657692,0.0660961187609,0.0660360649767,0.0659991088018,0.0659113378865,0.0655186785285,0.0658189474493,0.0656711227498,0.0655232980503,0.0655140590066,0.0653939514383,0.0653616147853,0.0651306386923,0.0647749355092,0.0648396088152,0.0645670570255,0.0640080948805,0.0641928757549,0.0639526606182,0.0638926068341,0.0641743976675,0.063795596875,0.0637817383094,0.0636708697848,0.0632181566426,0.0636616307411,0.0634722303449,0.0632504932956,0.0636292940881,0.0635091865198,0.0632966885142,0.0635184255635,0.06343527417,0.0634768498667,0.0635784793476,0.0637678797439,0.06435455902,0.064617871766,0.0644469494572,0.0642667881047,0.0638510311373,0.0635923379132,0.0636154355225,0.0632920689924,0.0633798399077,0.0631627223803,0.062354306055,0.0618507781723,0.061698333951,0.0614488797706,0.0614488797706,0.061467357858,0.0613380112459,0.0612964355492,0.0609776885409,0.0606866586638,0.0609314933223,0.0610192642377,0.060843722407,0.0607651905354,0.0609268738005,0.0609499714098,0.0610146447158,0.0612733379399,0.0613010550711,0.0616336606449,0.0615736068608,0.0615874654263,0.0613287722022,0.0616151825575,0.0615967044701,0.0614304016831,0.0611901865465,0.0609222542786,0.0606728000982,0.0603725311774,0.0600861208221,0.0600861208221,0.0601415550844,0.0597350371608,0.0595687343739,0.0593931925432,0.0593423778028,0.0591483578847,0.0594116706307,0.0596287881581,0.0597119395515,0.0594948220241,0.0600168279942,0.0599521546882,0.0598828618603,0.060090740344,0.0600306865598,0.0602108479123,0.0600491646472,0.0600399256035,0.0603032383495,0.0607698100573,0.0603725311774,0.0609268738005,0.0609130152349,0.0604787801801,0.0604741606583,0.0606173658359,0.0607420929261,0.0606404634452,0.0605203558769,0.0601276965188,0.0600722622565,0.0597442762045,0.0597673738138,0.0600029694287,0.0603124773932,0.0599105789915,0.0597073200297,0.0596241686362,0.0596056905488,0.0595225391553,0.0599752522975,0.059859764251,0.0599336766008,0.0604603020927,0.0603494335681,0.0608067662321,0.0611486108497,0.0611532303716,0.0614627383361,0.0616937144291,0.0615181725985,0.0616290411231,0.0616382801668,0.0614119235957,0.0611578498934,0.0611439913279,0.0609638299754,0.0609869275847,0.0609730690191,0.0608067662321,0.0605757901392,0.0606450829671,0.0603679116555,0.0604418240053,0.0602847602621,0.0599937303849,0.0599290570789,0.0597165590734,0.0594855829804,0.0598643837729,0.0596334076799,0.0595179196334,0.0597858519013,0.0598412861636,0.0605434534862,0.0609776885409,0.0612317622432,0.0615366506859,0.0615227921203,0.0609823080628,0.061204045112,0.0611208937186,0.0608991566693,0.0605942682266,0.0602478040872,0.059827427598,0.0597488957264,0.0596241686362,0.0596934614641,0.0598089495106,0.0600768817784,0.0603263359588,0.0608668200163,0.0610885570656,0.0609592104535,0.0611347522841,0.0611532303716,0.0613010550711,0.061402684552,0.0617075729947,0.0615920849482,0.0617583877351,0.0614165431176,0.0616290411231,0.0620032223937,0.0621187104401,0.0618138219974,0.0618045829537,0.0619570271751,0.0618877343472,0.0622157203992,0.0618784953035,0.0619385490876,0.0618461586505,0.0618831148253,0.0619893638281,0.0623727841424,0.0623173498801,0.0623265889238,0.0624097403173,0.0622341984866,0.0628301168065,0.0628994096343,0.0627700630223,0.0626453359321,0.06251598932,0.0626961506725,0.0631996785552,0.0632966885142,0.0632920689924,0.0636108160007,0.0632504932956,0.0634167960826,0.0634306546481,0.0637078259597,0.0639572801401,0.0639203239652,0.0638186944843,0.063994236315,0.0640496705773,0.0638510311373,0.0639988558368,0.0639295630089,0.0638510311373,0.0638741287466,0.0636385331318,0.0638556506592,0.063961899662,0.0636061964788,0.0636015769569,0.0636616307411,0.0638140749625,0.063961899662,0.0639988558368,0.063795596875,0.0640681486647,0.0641051048396,0.0641282024489,0.0646640669845,0.0647656964654,0.0644284713697,0.0639110849215,0.0637909773532,0.0640496705773,0.0642667881047,0.0642298319298,0.0638417920936,0.0635461426946,0.0631904395115,0.0633197861235,0.0640358120117,0.0644377104134,0.0646964036376,0.0646040132004,0.0644885251539,0.064617871766,0.0647010231594,0.0652045510421,0.065338517176,0.0651352582142,0.0649181406868,0.0649135211649,0.0647656964654,0.0649042821212,0.0651629753453,0.0652091705639,0.0655140590066,0.0653754733509,0.0653108000448,0.0656480251405,0.0657034594029,0.0657727522307,0.0658882402772,0.0658235669712,0.0659251964521,0.0660822601953,0.0660637821079,0.0662624215478,0.0662762801134,0.0661099773265,0.0657727522307,0.0658605231461,0.0658466645805,0.0659159574084,0.0657034594029,0.065601829922,0.0654771028318,0.0652969414793,0.0655602542252,0.0658004693619,0.0663779095943,0.0664703000315,0.0665349733375,0.0670200231327,0.0670015450453,0.0669322522174,0.0671632283104,0.0675605071902,0.0672048040071,0.0668398617802,0.066585788078,0.0666042661654,0.0667382322993,0.0662624215478,0.0665349733375,0.0666319832965,0.066585788078,0.0662116068074,0.0666135052091,0.0669923060016,0.0669276326955,0.0668768179551,0.0668952960425,0.0672879554005,0.0670246426546,0.0670523597857,0.0671678478322,0.0676159414525,0.0678099613706,0.0676806147586,0.0675466486247,0.0674126824907,0.0676251804963,0.0674496386656,0.0676436585837,0.0679208298953,0.0679023518078,0.067274096835,0.0671817063978,0.0673249115754,0.0676852342804,0.0683365868626,0.0683042502096,0.0682765330784,0.06855370439,0.0682303378598,0.0682072402505,0.0685629434337,0.0686368557834,0.0689694613573,0.0691265251005,0.0686645729146,0.06855370439,0.0685814215211,0.0680732741166,0.0682672940347,0.0679254494171,0.0677452880646,0.0675974633651,0.0675050729279,0.0671262721355,0.0669183936518,0.0669183936518,0.06671513469,0.0670939354825,0.0671632283104,0.0675466486247,0.0680039812887,0.0681656645538,0.0680547960292,0.0685998996086,0.0691588617535,0.0691265251005,0.0696392920269,0.0692004374502,0.0691958179284,0.0695191844585,0.0695191844585,0.0691172860568,0.0693113059749,0.0688447342671,0.0686876705239,0.0687615828736,0.0685444653462,0.0685998996086,0.0683596844719,0.0681102302915,0.0675928438433,0.0676852342804,0.0674126824907,0.0673757263159,0.0668675789114,0.0668121446491,0.0667520908649,0.0673156725317,0.0672371406601,0.0670615988295,0.067371106794,0.0676113219307,0.0679716446357,0.0683412063844,0.0688308757015,0.0687569633518,0.068978700401,0.068946363748,0.0694683697181,0.0698841266854,0.0698379314668,0.0699349414258,0.0698748876417,0.0695330430241,0.0695838577646,0.069962658557,0.0697132043766,0.0694267940213,0.0690664713163,0.068747724308,0.0686691924364,0.0687985390485,0.0685306067807,0.0689648418354,0.0691727203191,0.0688770709201,0.0689833199229,0.0687985390485,0.0689694613573,0.0688077780922,0.068715387655,0.0688354952234,0.068683051002,0.0682811526003,0.0682672940347,0.0683596844719,0.0685721824774,0.0687246266987,0.0686553338709,0.0688262561796,0.069043373707,0.0685721824774,0.0684844115621,0.0684890310839,0.0682072402505,0.068258054991,0.0683042502096,0.0685814215211,0.0687061486113,0.0686414753053,0.0687846804829,0.0686414753053,0.0689232661387,0.0689694613573,0.069011037054,0.0689001685294,0.0683504454282,0.0684613139528,0.0682672940347,0.0684520749091,0.0681240888571,0.0682996306877,0.0681240888571,0.0682672940347,0.0683781625593,0.0687523438299,0.0691219055786,0.0689556027917,0.0689740808791,0.068650714349,0.0688585928327,0.0687431047862,0.0692189155377,0.0690387541852,0.0690572322726,0.0687569633518,0.0687015290895,0.0685306067807,0.0689879394447,0.0691865788847,0.0692789693218,0.0697824972045,0.0696716286799,0.0698240729012,0.0696531505924,0.0697732581608,0.0696161944176,0.069339023106,0.0691126665349,0.068978700401,0.0688077780922,0.0683088697314,0.0612640988962,0.0543625332386,0.0475487384964,0.0405547824016,0.0)
m <- c(0.0408929692594,0.0477691863752,0.0548022052227,0.061747599573,0.0687852302361,0.0688820783645,0.069117280962,0.068646875767,0.0688544074707,0.0689374201522,0.0691080573308,0.0689973737555,0.0685500276386,0.0684024495382,0.0683471077506,0.0682917659629,0.0682594832534,0.0685269685604,0.0684439558789,0.0683609431975,0.068328660488,0.0683194368567,0.0686099812419,0.0687298884485,0.0689005256271,0.0687760066049,0.0686883821077,0.0690204328337,0.0689189728896,0.0691864581966,0.0694954498443,0.0694862262131,0.0695554034476,0.0694908380287,0.0694170489785,0.0700903740616,0.0698597832797,0.0696107452353,0.0696153570509,0.0692879181406,0.0691495636715,0.0693202008501,0.0692648590625,0.0691680109341,0.0690019855711,0.0684208968008,0.0687345002641,0.068545415823,0.0682548714378,0.0686284285045,0.0683378841193,0.068596145795,0.0685085212979,0.0686653230296,0.0687252766328,0.0691080573308,0.0694216607941,0.0693432599283,0.069550791632,0.0692417999843,0.0694770025818,0.0695046734756,0.0697813824139,0.0698736187266,0.0700442559052,0.0700350322739,0.069702981548,0.0702794585027,0.070403977525,0.0707590873291,0.0705423319941,0.069919736883,0.0696430279447,0.0698551714641,0.0698828423579,0.0696061334196,0.0698413360172,0.0698136651233,0.0697490997044,0.0694216607941,0.0696291924978,0.0703163530278,0.0706115092287,0.0704085893406,0.070390142078,0.0702979057653,0.0699566314081,0.0701687749274,0.070071926799,0.0699059014361,0.070288682134,0.0698736187266,0.0693986017159,0.0695092852913,0.0693202008501,0.0693294244814,0.069435496241,0.069232576353,0.0695830743415,0.0699381841456,0.0698321123859,0.0698367242015,0.0696799224698,0.0696753106542,0.0695784625258,0.0694308844254,0.069550791632,0.069435496241,0.0691864581966,0.0686883821077,0.0685823103481,0.0684992976666,0.0686653230296,0.0685500276386,0.0688866901802,0.0691633991184,0.0692187409061,0.0692049054592,0.0695461798164,0.069818276939,0.0697952178608,0.0693755426378,0.0696384161291,0.069384766269,0.0689281965209,0.0688221247612,0.0686791584765,0.068596145795,0.0679919979465,0.0682594832534,0.0683332723036,0.0688866901802,0.0691495636715,0.0693939899003,0.0695092852913,0.0693017535876,0.0693570953752,0.0692556354312,0.0697306524419,0.0693801544534,0.0690757746213,0.0690250446493,0.0687345002641,0.0685915339794,0.0689281965209,0.0690988336995,0.0692786945094,0.0694631671349,0.0691726227497,0.0692187409061,0.0694770025818,0.0695600152633,0.0697075933637,0.0698874541735,0.0696107452353,0.0697813824139,0.0694770025818,0.0693386481127,0.0690988336995,0.0692233527217,0.069550791632,0.0695830743415,0.0694262726098,0.0691910700122,0.0689466437835,0.0687806184205,0.0691265045933,0.0690342682806,0.0694862262131,0.069384766269,0.0688359602081,0.0687160530016,0.0684716267728,0.0686053694263,0.0690388800962,0.068863631102,0.068697605739,0.0684670149571,0.0680750106279,0.0682871541473,0.0686883821077,0.0686099812419,0.0687437238954,0.0686145930575,0.0681903060189,0.0682318123596,0.067959715237,0.0682133650971,0.0684992976666,0.0681349642312,0.0674616391481,0.0677199008238,0.0677199008238,0.0677475717177,0.0678905380024,0.0674201328074,0.0673786264666,0.0674155209917,0.0672494956288,0.0673417319415,0.0673694028354,0.067221824735,0.0675677109078,0.0674893100419,0.0675031454889,0.0680657869967,0.0680703988123,0.067858255293,0.0680796224436,0.0679412679744,0.0680473397341,0.0681349642312,0.0675723227234,0.0672771665226,0.067323284679,0.0671710947629,0.0670050694,0.0670926938971,0.0668528794839,0.0669405039811,0.0669497276123,0.0667191368304,0.0667283604617,0.0670189048469,0.0670834702658,0.0667606431712,0.0665761705457,0.0667283604617,0.0660873180881,0.0657137610214,0.0658751745688,0.0657967737029,0.0656907019432,0.0656584192338,0.0651834022231,0.0652848621671,0.0653770984799,0.065045047754,0.0655707947367,0.06563074834,0.0652249085638,0.0652387440108,0.0648559633128,0.064459347168,0.064293321805,0.0646345961622,0.0646023134527,0.0644777944305,0.0643763344865,0.0646392079779,0.0650081532289,0.0648928578379,0.0652525794577,0.0655385120272,0.0656953137589,0.0652756385359,0.0650911659103,0.0652018494856,0.0648144569721,0.0645054653244,0.0642149209392,0.0638505875038,0.0640304483137,0.0639336001853,0.0636292203532,0.063873646582,0.0637675748223,0.0639935537886,0.0644362880898,0.0644870180618,0.0644270644585,0.0647129970281,0.0645193007713,0.0643163808832,0.0643025454363,0.0642887099894,0.0646668788717,0.064344051777,0.0642103091235,0.0643763344865,0.0641872500454,0.0638136929787,0.0640581192075,0.0640950137326,0.0643117690676,0.0639013174758,0.0635462076717,0.0637306802972,0.0635369840404,0.0631910978676,0.0636707266939,0.064039671945,0.063504701331,0.063656891247,0.0637860220849,0.0639520474478,0.0642979336207,0.063873646582,0.0641457437046,0.0645239125869,0.0640073892355,0.0637399039285,0.0636338321688,0.063656891247,0.0634309122808,0.0634170768339,0.0631080851861,0.0633801823088,0.0631034733705,0.0627898699071,0.0627621990133,0.0626884099631,0.0631265324487,0.06313575608,0.0629789543483,0.0628590471417,0.0630665788454,0.062817540801,0.0630527433985,0.0630619670298,0.0630758024767,0.0631634269738,0.0629789543483,0.0624901018907,0.0630573552141,0.0630804142923,0.0628267644322,0.0631265324487,0.0627068572257,0.0628405998792,0.0627068572257,0.0628867180355,0.0629605070857,0.063338675968,0.0626791863318,0.0622964056339,0.0623286883434,0.0617614350199,0.0618905658578,0.0620289203269,0.0621534393491,0.0620796502989,0.0616784223385,0.0614155488471,0.0618121649919,0.0619828021705,0.0620335321426,0.0625546673096,0.0628267644322,0.0623655828685,0.0624255364718,0.0623794183154,0.0624439837343,0.0620565912207,0.0616784223385,0.061696869601,0.0616830341541,0.0613648188751,0.0609451436521,0.0610327681492,0.0610373799648,0.0611987935121,0.0613971015846,0.0621534393491,0.0622272283993,0.0622595111088,0.0623010174495,0.0624901018907,0.062651515438,0.0625777263878,0.0626146209129,0.062282570187,0.0622456756619,0.0617014814166,0.0617614350199,0.061849059517,0.0621718866117,0.0619828021705,0.0621903338742,0.0621396039022,0.0619182367516,0.0617383759417,0.0615907978413,0.0618582831483,0.0619874139862,0.0616645868915,0.0615907978413,0.06132792435,0.0610373799648,0.0608667427862,0.0607837301047,0.0613002534562,0.0615677387631,0.061595409657,0.0615031733442,0.0621903338742,0.0618260004389,0.0622733465557,0.0621903338742,0.0622548992932,0.0621257684553,0.0618767304109,0.0620796502989,0.0615354560537,0.0614063252158,0.0611342280932,0.0613602070595,0.061378654322,0.0619320721985,0.0621534393491,0.0627621990133,0.06270224541,0.0625085491532,0.0633248405211,0.0636476676157,0.0638828702133,0.0639059292915,0.0637860220849,0.0633663468618,0.0632049333145,0.0631403678956,0.0634770304372,0.0637906339005,0.0635231485935,0.0635738785655,0.0634770304372,0.0633663468618,0.0632648869178,0.0633847941244,0.0637445157441,0.0637583511911,0.0637906339005,0.0635508194874,0.0638920938445,0.0638551993194,0.0637998575318,0.0639151529227,0.0640719546544,0.0642887099894,0.0643624990396,0.0645700307433,0.0645331362182,0.064929752363,0.0645977016371,0.0644132290116,0.0641319082577,0.064141131889,0.0644270644585,0.0647176088437,0.064611537084,0.0643947817491,0.06451007714,0.0645377480338,0.0649205287317,0.0654416638988,0.0662441198198,0.0668021495119,0.0671434238691,0.0670511875564,0.0673094492321,0.0675861581703,0.0681072933374,0.0680427279185,0.0680703988123,0.0681856942032,0.0680288924716,0.0677798544271,0.0679274325275,0.0679458797901,0.0682548714378,0.0681534114938,0.0677660189802,0.0677614071646,0.0678075253209,0.0678536434773,0.0679458797901,0.0682133650971,0.0679458797901,0.0680565633654,0.0682410359909,0.068799065683,0.0688544074707,0.0690204328337,0.0694170489785,0.0696291924978,0.0696061334196,0.069435496241,0.0697629351513,0.0702794585027,0.0704224247875,0.0706207328599,0.0708098173011,0.0710357962673,0.0711603152895,0.0710680789768,0.0712802224961,0.0716353323002,0.071944323948,0.071944323948,0.0721334083891,0.0721011256796,0.0725438599808,0.0729174170475,0.0729912060977,0.0733970458738,0.073586130315,0.0739412401191,0.073738320231,0.0735077294491,0.0739320164878,0.0741764427166,0.0741533836384,0.0741810545322,0.0746652951742,0.074476210733,0.0742825144763,0.0743793626047,0.0744162571298,0.0746330124647,0.0743009617388,0.0744208689454,0.0745499997832,0.07474369604,0.074808261459,0.0751310885536,0.0755553755923,0.0757121773239,0.0761918061503,0.0765192450605,0.0769296966523,0.077137228356,0.0773908782161,0.0772940300877,0.0773217009815,0.0778658952267,0.0782256168465,0.0783962540251,0.0784562076284,0.0789865664267,0.0788989419296,0.078728304751,0.0788343765107,0.0792586635493,0.0792955580744,0.0790557436613,0.0793416762308,0.0793970180185,0.0796137733534,0.0798812586604,0.0801118494423,0.0805730310061,0.0804439001682,0.0801072376267,0.0803424402242,0.08085435176,0.0810711070949,0.0816521958653,0.0816245249715,0.0816337486027,0.0818366684908,0.0819565756974,0.0825930062554,0.0834323567014,0.0836214411426,0.0833216731261,0.0833308967574,0.0832294368134,0.0835568757237,0.0838105255837,0.0840595636282,0.0840503399969,0.0839027618965,0.0838981500808,0.0839903863936,0.084456179773,0.0847559477895,0.0848896904429,0.0850280449121,0.0845806987952,0.0847098296331,0.0854477201351,0.0860564797993,0.0861348806651,0.0862271169779,0.0863516360001,0.0863793068939,0.0867390285137,0.0874077417811,0.0880026659984,0.0883900585119,0.0881594677301,0.0884177294058,0.0886068138469,0.0893539279802,0.0897320968625,0.0900457003259,0.09040081013,0.0903085738172,0.0908988862189,0.091355455967,0.0924346208262,0.0934722793447,0.0959995543141,0.0981947785577,0.100071787522,0.103009514083,0.105845780701,0.108737389105,0.11148141941,0.113547512816,0.115346120914,0.117209294432,0.118233117503,0.118588227308,0.120096291021,0.120257704568,0.120506742613,0.120691215238,0.121272304009,0.1225082706,0.123218490208,0.123836473503,0.124076287916,0.125432161714,0.126096263166,0.127184651656,0.128300711041,0.129545901263,0.129578183972,0.12978110386,0.131017070451,0.131745737322,0.131810302741,0.13144135749,0.131376792071,0.130994011373,0.130491323468,0.130772644222,0.131104694948,0.130800315116,0.13021461453,0.129850281095,0.130269956318,0.130159272743,0.130007082826,0.130435981681,0.13093405777,0.130007082826,0.13006703643,0.130293015396,0.130546665256,0.130915610507,0.130758808775,0.131040129529,0.13180107911,0.132557416874,0.132838737628,0.133742653493,0.134305295001,0.135172316341,0.135619662458,0.136099291284,0.137565848657,0.13882026251,0.139046241476,0.139595047537,0.140037781838,0.14098781586,0.141550457368,0.141924014434,0.142703411277,0.143621162589,0.143833306108,0.144322158566,0.145318310744,0.145853281358,0.146932446217,0.147684172166,0.148638818003,0.149800995543,0.150658793252,0.151101527553,0.151659557245,0.152369776854,0.152803287524,0.153158397328,0.153393599925,0.153453553528,0.153347481769,0.153015431043,0.152807899339,0.152724886658,0.153167620959,0.152683380317,0.152794063892,0.152402059563,0.152503519507,0.152374388669,0.152794063892,0.152761781183,0.153167620959,0.153905511461,0.153605743445,0.15397007688,0.153942405986,0.154131490427,0.15422372674,0.154292903975,0.154514271125,0.155289056152,0.155870144923,0.154933946348,0.155007735398,0.154860157298,0.155086136264,0.154943169979,0.154597283807,0.154707967382,0.154606507438,0.153873228751,0.152747945736,0.153020042859,0.15302926649,0.153070772831,0.153010819227,0.153236798193,0.153121502803,0.153158397328,0.15201466705,0.152784840261,0.153112279171,0.153647249785,0.15299698378,0.153158397328,0.152411283194,0.152180692412,0.151825582608,0.151355177413,0.151927042552,0.151060021213,0.150566556939,0.150054645403,0.150400531576,0.149551957499,0.149505839343,0.149095387751,0.148763337025,0.148984704176,0.148698771606,0.148578864399,0.148320602724,0.147527370434,0.1466326782,0.146614230938,0.146406699234,0.146600395491,0.146549665519,0.146213002977,0.145604243313,0.145276804403,0.145101555409,0.145244521693,0.145636526023,0.14569186781,0.145585796051,0.144981648202,0.1443913358,0.143644221667,0.143238381891,0.142458985048,0.141997803484,0.141103111251,0.14070188329,0.140213030833,0.139701119297,0.139853309213,0.139738013822,0.139152313236,0.138119266533,0.138096207455,0.137957852986,0.137718038573,0.136754169104,0.135762628742,0.135319894441,0.134655792989,0.134102375113,0.133968632459,0.134060868772,0.133779548018,0.133083163857,0.132884855784,0.132764948578,0.13281567855,0.132511298718,0.131450581121,0.130657348831,0.13010854277,0.129665808469,0.128886411626,0.128093179337,0.127696563192,0.127475196041,0.126797259143,0.125967132328,0.126276123976,0.125930237803,0.125270748167,0.125229241826,0.124772672078,0.12453746948,0.123993275235,0.123891815291,0.123555152749,0.123527481856,0.122563612387,0.122808038616,0.122577447834,0.122452928812,0.122083983561,0.122360692499,0.122646625069,0.121438329372,0.121064772305,0.120557472585,0.120133185546,0.119561320407,0.119238493312,0.118380695604,0.118062480325,0.117495227001,0.116637429293,0.116738889237,0.116655876555,0.115899538791,0.116245424964,0.115968716025,0.116254648595,0.115977939657,0.115798078847,0.115816526109,0.115544428987,0.114792703038,0.114022529826,0.114165496111,0.113150896671,0.112551360638,0.111947212789,0.111596714801,0.111283111337,0.110102486534,0.109931849356,0.10989495483,0.110047144747,0.109687423127,0.109687423127,0.109383043295,0.108635929161,0.1089126381,0.108580587374,0.108423785642,0.107492198883,0.107381515308,0.1066712957,0.106440704918,0.105605966287,0.105587519025,0.105702814416,0.105343092796,0.105356928243,0.105379987321,0.105333869165,0.105665919891,0.1056982026,0.105310810087,0.104983371176,0.104632873188,0.104333105171,0.103987218999,0.10320321034,0.102963395927,0.10287577143,0.101713593889,0.101137116935,0.100343884645,0.100408450064,0.100104070232,0.099795078584,0.0994215215173,0.0995322050926,0.0987897027749,0.0982316730828,0.0982132258202,0.098508382021,0.098623677412,0.0982962385017,0.0981163776918,0.0977935505972,0.0968988583635,0.0965253012968,0.0956905626664,0.0944084779191,0.0929373087307,0.0910556879505,0.0893262570864,0.0876106616692,0.0852401884314,0.0827175252776,0.0810987779888,0.0787098574884,0.0772525237469,0.076131852547,0.075112641291,0.0745776706771,0.0738074974656,0.0730696069635,0.0727652271315,0.0728390161817,0.0725115772714,0.0723363282772,0.0718428640039,0.071727568613,0.0712986697587,0.0706253446756,0.070772922776,0.0706437919381,0.0706115092287,0.07018722219,0.0697906060451,0.0696153570509,0.0699750786707,0.0696753106542,0.0698920659892,0.0698920659892,0.0694862262131,0.0694585553192,0.0692002936435,0.0691034455151,0.0692141290904,0.0694216607941,0.069283306325,0.069449331688,0.0689973737555,0.0686883821077,0.0685361921917,0.0685546394542,0.0685269685604,0.0687529475267,0.0685592512699,0.0679873861308,0.0676276645111,0.0675630990921,0.067272554707,0.0671941538411,0.0671342002378,0.066839044037,0.0665438878362,0.0658428918593,0.0658751745688,0.066050423563,0.06563074834,0.065413993005,0.0654047693737,0.0654970056865,0.0654831702395,0.0656999255745,0.0656030774461,0.0655800183679,0.065782938256,0.0651511195136,0.06519723767,0.0650219886758,0.0652387440108,0.0648744105754,0.0647545033688,0.0642887099894,0.0644316762742,0.064459347168,0.0638367520569,0.0636292203532,0.0635231485935,0.0635508194874,0.0630896379236,0.0634954776997,0.0634263004651,0.0631680387894,0.0626745745162,0.062919000745,0.0628083171697,0.0628544353261,0.0628821062199,0.0626653508849,0.0626146209129,0.0624070892092,0.0623748064997,0.0623609710528,0.0626699627006,0.0625085491532,0.0625777263878,0.0628267644322,0.0627944817228,0.0627114690413,0.0625823382034,0.0622272283993,0.0620612030364,0.0619044013047,0.0613971015846,0.0613048652718,0.0616784223385,0.0619320721985,0.0618536713327,0.0616000214726,0.0619735785393,0.0621764984273,0.0619597430924,0.0622502874775,0.062550055494,0.0619966376175,0.061111169015,0.0608021773673,0.0609820381772,0.0611388399088,0.060792953736,0.0604885739039,0.0605992574792,0.0605208566134,0.0604286203006,0.0609313082051,0.0611803462496,0.0609543672833,0.060908249127,0.0608713546019,0.0611572871714,0.0612402998529,0.0612725825623,0.0609728145459,0.0609728145459,0.0609866499928,0.0609359200208,0.0613971015846,0.061595409657,0.0615723505788,0.0613555952438,0.0608621309706,0.0608114009986,0.060590033848,0.0602764303846,0.0598659787928,0.0602349240439,0.0602349240439,0.0600642868653,0.0596676707204,0.0593263963632,0.0593955735978,0.0594555272011,0.05952009262,0.0598844260554,0.0599720505525,0.0595523753295,0.0588283202744,0.0586761303583,0.0584962695484,0.0588190966431,0.0592572191287,0.0591142528439,0.0592941136538,0.0598152488208,0.0597322361393,0.0600089450776,0.0604516793788,0.0603640548817,0.0609728145459,0.0608021773673,0.0607099410545,0.0605531393229,0.0607099410545,0.0598152488208,0.0601150168373,0.0596261643797,0.0594739744636,0.0593955735978,0.0592387718661,0.0592756663912,0.0592433836818,0.0595247044357,0.0594140208603,0.0594094090447,0.059686117983,0.0602856540159,0.0605623629541,0.0606223165574,0.0606730465294,0.0606776583451,0.0607099410545,0.0608482955237,0.0607652828422,0.0611157808307,0.0604609030101,0.0599720505525,0.0599812741838,0.0599674387369,0.0595569871451,0.059736847955,0.0595800462233,0.0596630589048,0.059838307899,0.0599766623681,0.0601795822562,0.0604701266414,0.0601657468093,0.0603640548817,0.0611203926463,0.0609635909146,0.0610466035961,0.0609220845739,0.0608851900488,0.0603778903286,0.0604931857196,0.0602164767813,0.0604332321163,0.0603686666974,0.0604286203006,0.0605208566134,0.0604378439319,0.0603502194348,0.0605162447978,0.060843683708,0.0609405318364,0.0613325361656,0.0615216206068,0.0613187007187,0.0609313082051,0.060742223764,0.0608390718924,0.0608206246298,0.0610788863056,0.061161898987,0.0609405318364,0.0609313082051,0.0604562911945,0.0607468355796,0.0610696626743,0.0614432197409,0.0614985615286,0.0615539033162,0.0614247724784,0.0616138569195,0.0619505194611,0.061964354908,0.0626238445442,0.0626884099631,0.0627437517508,0.0628267644322,0.0630758024767,0.0631634269738,0.0629927897952,0.0626146209129,0.0622410638463,0.0624301482874,0.0619966376175,0.0620012494331,0.0614201606627,0.0614063252158,0.061060439043,0.0611526753558,0.0610973335681,0.061111169015,0.0610927217525,0.060908249127,0.0610235445179,0.0611250044619,0.0617245404948,0.061646139629,0.0618767304109,0.0619044013047,0.0621119330084,0.0621534393491,0.0625039373376,0.0627483635664,0.0626469036224,0.0623379119746,0.0622548992932,0.0618398358858,0.0621442157179,0.0621626629804,0.0622964056339,0.0626699627006,0.0629605070857,0.0622641229244,0.0626146209129,0.0627575871977,0.0625269964158,0.0627391399351,0.0624532073656,0.0623240765277,0.0620335321426,0.0617891059138,0.0614386079253,0.0619551312767,0.0616691987072,0.0618398358858,0.0618859540422,0.0623148528965,0.0626284563598,0.0622502874775,0.0626837981475,0.0565593069806,0.0503564149479,0.0440935693119,0.0379644663295,0.0)
ycorr <- c(8.95092563644e-05,8.94191572154e-05,8.91465095052e-05,8.86890130731e-05,8.80394047746e-05,8.72000158634e-05,8.6164313143e-05,8.5119772765e-05,8.40599374659e-05,8.29858291938e-05,8.18899511495e-05,8.07697602942e-05,7.96309869828e-05,7.84750934733e-05,7.72994987883e-05,7.61055979425e-05,7.48999262037e-05,7.36879707387e-05,7.24816289854e-05,7.12827225076e-05,7.00972685541e-05,6.89245010528e-05,6.77643075028e-05,6.66134781756e-05,6.54755115565e-05,6.43558945818e-05,6.32495837359e-05,6.21530551248e-05,6.10595733969e-05,5.99643009906e-05,5.8862212136e-05,5.77569851322e-05,5.66486332726e-05,5.5538253464e-05,5.44226655309e-05,5.3296890226e-05,5.2161164736e-05,5.10186409409e-05,4.98643820659e-05,4.86954544274e-05,4.75143883418e-05,4.63184860811e-05,4.5100575759e-05,4.38593539169e-05,4.25973419454e-05,4.13151292672e-05,4.00092035992e-05,3.8676210327e-05,3.73192815985e-05,3.59410393121e-05,3.45459423516e-05,3.31321343631e-05,3.17057266366e-05,3.02669432973e-05,2.88162058325e-05,2.73497641978e-05,2.58712473465e-05,2.43839877968e-05,2.28889508584e-05,2.13846277649e-05,1.98690875484e-05,1.83395703932e-05,1.67956964736e-05,1.52363348921e-05,1.36613141533e-05,1.20752133451e-05,1.04784199251e-05,8.8652457321e-06,7.2368280549e-06,5.59609478811e-06,3.94463177534e-06,2.28888790711e-06,6.32852494525e-07,-1.01961344544e-06,-2.66601514533e-06,-4.30776654966e-06,-5.94789481729e-06,-7.57869244622e-06,-9.20008277889e-06,-1.08086519668e-05,-1.24090851232e-05,-1.40038144128e-05,-1.55996592652e-05,-1.71986652059e-05,-1.88076079165e-05,-2.04316833945e-05,-2.20661014785e-05,-2.37134049145e-05,-2.53773391751e-05,-2.70566985639e-05,-2.87526037223e-05,-3.04599694236e-05,-3.21786233781e-05,-3.39090866845e-05,-3.56510189459e-05,-3.73914449667e-05,-3.91290610903e-05,-4.08661776277e-05,-4.2599763121e-05,-4.43286419243e-05,-4.60522861579e-05,-4.77767456063e-05,-4.95029758314e-05,-5.12261643715e-05,-5.29375310005e-05,-5.46405903713e-05,-5.63438002318e-05,-5.8044525199e-05,-5.97440858685e-05,-6.14452416926e-05,-6.31483887915e-05,-6.48525497718e-05,-6.6545862372e-05,-6.823734739e-05,-6.9931947776e-05,-7.16380931732e-05,-7.33470864805e-05,-7.50603309374e-05,-7.67731628351e-05,-7.84838147979e-05,-8.01876196142e-05,-8.1885200956e-05,-8.35836952448e-05,-8.52823308974e-05,-8.69727142443e-05,-8.86531307165e-05,-9.03242194799e-05,-9.19870288883e-05,-9.36402508732e-05,-9.5286713131e-05,-9.69275854889e-05,-9.85668285159e-05,-0.000100204680774,-0.000101833970065,-0.000103460859731,-0.000105080190069,-0.000106689985432,-0.000108289597102,-0.000109883241311,-0.00011147460407,-0.000113066309313,-0.000114656453909,-0.000116237864949,-0.000117813492941,-0.000119383981982,-0.000120953276192,-0.000122528054852,-0.000124108935606,-0.000125694982604,-0.000127281341537,-0.000128861967725,-0.000130434222918,-0.000132000539814,-0.000133561722959,-0.000135115853754,-0.000136661587543,-0.00013819960603,-0.000139728019902,-0.000141247855373,-0.000142761800788,-0.000144272437642,-0.000145776573534,-0.00014727224817,-0.00014876382369,-0.000150256544004,-0.000151750359213,-0.000153239167478,-0.000154716486448,-0.000156182163506,-0.000157634582115,-0.000159070189719,-0.000160496240405,-0.000161920830221,-0.000163347190928,-0.000164766942018,-0.000166177077607,-0.000167580914307,-0.000168988588216,-0.000170401227936,-0.00017181615324,-0.000173233496147,-0.000174649255737,-0.000176057369825,-0.000177451544563,-0.000178834347941,-0.000180211711071,-0.000181585879133,-0.000182951745652,-0.000184306555797,-0.00018565750297,-0.000187005742898,-0.000188352349522,-0.000189702566883,-0.000191056106341,-0.000192413716518,-0.000193771794768,-0.000195128147971,-0.000196480759933,-0.000197833124576,-0.000199178784754,-0.000200518236219,-0.000201852315691,-0.000203183193745,-0.00020450682933,-0.000205828200072,-0.00020715102271,-0.000208470232665,-0.000209786793834,-0.000211099359185,-0.000212406188032,-0.000213713297587,-0.000215017782542,-0.000216317691777,-0.000217612460155,-0.00021890347674,-0.000220186009286,-0.000221463044011,-0.000222742937783,-0.000224020650376,-0.000225305615103,-0.000226596152267,-0.000227894509829,-0.000229196880739,-0.000230508415517,-0.000231827359307,-0.000233150907954,-0.00023447744016,-0.000235799826042,-0.000237122483582,-0.000238442458612,-0.000239752947937,-0.000241056748914,-0.000242352738306,-0.000243643282288,-0.000244923788195,-0.000246199950548,-0.000247476022033,-0.000248755918083,-0.000250038575781,-0.000251322150879,-0.000252611883259,-0.000253902475361,-0.00025519763992,-0.000256494301114,-0.000257790479982,-0.000259083949078,-0.00026037319925,-0.000261654614698,-0.000262929584831,-0.000264197334199,-0.000265457434459,-0.000266713012136,-0.00026796647219,-0.000269213628648,-0.000270458765009,-0.000271701890986,-0.000272951071098,-0.000274203689704,-0.000275459051861,-0.000276714105214,-0.000277971032395,-0.000279226604339,-0.000280478522181,-0.000281728851513,-0.00028297980817,-0.000284231996442,-0.0002854781898,-0.000286714806383,-0.000287939427288,-0.000289158445907,-0.00029037461237,-0.000291590596061,-0.000292806516624,-0.000294024619833,-0.000295240852798,-0.000296450014487,-0.000297653592103,-0.00029886266829,-0.000300079593544,-0.000301304248596,-0.000302531780237,-0.000303757997134,-0.000304976806055,-0.000306185792894,-0.000307377436348,-0.000308551716812,-0.000309704110946,-0.000310823221407,-0.000311900105513,-0.000312927736653,-0.000313900809916,-0.000314814478686,-0.000315670198933,-0.000316469917674,-0.000317218397752,-0.000317924146994,-0.000318594342074,-0.000319240983702,-0.000319874118755,-0.000320500653866,-0.000321127908202,-0.000321766310217,-0.000322423413486,-0.000323100138999,-0.000323799790126,-0.000324520127983,-0.000325254616033,-0.000325997688,-0.000326746420331,-0.000327497574312,-0.00032825110173,-0.000329002562448,-0.00032974729603,-0.00033048331615,-0.000331212499739,-0.000331934111093,-0.000332652553929,-0.000333370686876,-0.000334088690714,-0.000334806740385,-0.000335524060216,-0.000336241182165,-0.000336962819043,-0.000337692673017,-0.000338429242526,-0.000339171484619,-0.000339917398016,-0.000340661497734,-0.000341405075218,-0.000342150495366,-0.000342894425199,-0.00034363829885,-0.000344378156742,-0.000345107834751,-0.000345825484238,-0.000346533314675,-0.000347228364953,-0.000347914115301,-0.000348591303424,-0.00034925777701,-0.000349913475766,-0.000350557835686,-0.000351194234101,-0.000351827275302,-0.000352457297287,-0.000353084075157,-0.000353708183131,-0.000354333307711,-0.000354959738648,-0.000355590399376,-0.000356226211277,-0.000356867190687,-0.000357515228926,-0.000358161804707,-0.000358807384389,-0.000359453118963,-0.000360101319407,-0.000360748300316,-0.000361391833372,-0.000362027879448,-0.000362655831891,-0.000363274959487,-0.000363882530572,-0.000364478837113,-0.00036506837275,-0.000365651033724,-0.000366226375994,-0.000366795874441,-0.000367360965038,-0.000367921566808,-0.000368479114929,-0.000369036131093,-0.000369591881039,-0.000370150920304,-0.000370712535659,-0.000371275961241,-0.000371838335624,-0.000372401478065,-0.000372960763624,-0.000373515830899,-0.000374068321548,-0.000374617378465,-0.000375158128823,-0.000375693052411,-0.000376218890259,-0.000376734233921,-0.000377239697041,-0.000377731821605,-0.000378211182492,-0.000378677985774,-0.000379129968929,-0.000379566438086,-0.000379994348335,-0.000380414417563,-0.000380825851203,-0.000381227144789,-0.000381622152079,-0.000382011700756,-0.000382397447851,-0.000382780589227,-0.000383162394897,-0.000383541206855,-0.00038391002301,-0.000384263820628,-0.000384603811876,-0.000384931846777,-0.000385248713028,-0.000385551412795,-0.000385840208107,-0.000386116007163,-0.000386376694307,-0.000386625138926,-0.000386866418443,-0.000387104267708,-0.000387339116002,-0.000387568637433,-0.000387790532472,-0.000388004469174,-0.000388209725338,-0.000388404418974,-0.000388589964412,-0.000388764585863,-0.00038892405983,-0.000389069603785,-0.000389203408656,-0.000389324749671,-0.000389433253561,-0.00038952720871,-0.000389609922837,-0.000389680156005,-0.000389737220817,-0.00038978064356,-0.000389816717993,-0.000389846130187,-0.000389864797075,-0.000389868759562,-0.000389856442953,-0.000389829498739,-0.000389790838609,-0.000389739151417,-0.00038967933241,-0.000389611673127,-0.000389531894097,-0.000389431857416,-0.00038931254837,-0.000389176467849,-0.000389029832476,-0.000388876724586,-0.000388713024397,-0.000388538855942,-0.000388355641386,-0.000388158030756,-0.000387947648918,-0.000387729588942,-0.00038750438135,-0.000387273724461,-0.00038703534776,-0.00038678472253,-0.000386518911788,-0.000386240390207,-0.000385941749179,-0.000385625291089,-0.000385290279384,-0.000384935316568,-0.000384558738109,-0.000384161910401,-0.000383740491454,-0.000383296624072,-0.000382832714449,-0.000382347205562,-0.000381839995499,-0.000381318718349,-0.000380780613484,-0.000380228989818,-0.000379663905004,-0.00037908486316,-0.000378492568859,-0.000377887278378,-0.000377267971335,-0.000376633072329,-0.000375985253899,-0.00037531867047,-0.000374630818112,-0.000373919507123,-0.000373182868047,-0.000372418414395,-0.000371629638877,-0.000370814579901,-0.000369974977764,-0.000369112748202,-0.000368228489798,-0.000367321951328,-0.000366398529109,-0.000365457359096,-0.000364500662933,-0.000363534459504,-0.000362556297493,-0.000361563706103,-0.000360558210251,-0.000359536510742,-0.000358494135799,-0.000357431797148,-0.000356346571974,-0.000355239676124,-0.000354112276579,-0.00035296205426,-0.000351784523884,-0.000350584529059,-0.000349360514838,-0.000348114997501,-0.000346851221398,-0.000345572535464,-0.000344279885729,-0.00034297626179,-0.000341656717962,-0.000340318534494,-0.000338962340046,-0.000337587896803,-0.000336194591848,-0.000334783767076,-0.000333353149643,-0.000331898302166,-0.000330418122642,-0.000328905599803,-0.000327363756747,-0.000325798169062,-0.000324211395911,-0.000322602096068,-0.00032096943369,-0.00031931320272,-0.00031763316863,-0.000315931036966,-0.000314209411098,-0.000312471909059,-0.000310720720928,-0.000308950959933,-0.000307160720993,-0.000305351453803,-0.000303523813886,-0.000301675979768,-0.000299806903083,-0.000297914185382,-0.000295999058498,-0.000294060406295,-0.000292097603169,-0.000290110160205,-0.00028810116158,-0.000286068062446,-0.000284011488796,-0.000281933284939,-0.000279837550648,-0.000277726596193,-0.000275600676651,-0.000273457273658,-0.000271297265809,-0.000269120541431,-0.000266928123098,-0.000264718289399,-0.000262492209984,-0.000260248607544,-0.000257984175641,-0.000255698184275,-0.000253389609072,-0.000251059955345,-0.000248706725023,-0.000246331100757,-0.00024392861166,-0.000241505085869,-0.00023905994717,-0.000236594936964,-0.000234110616481,-0.000231608940688,-0.00022908454432,-0.000226540912883,-0.000223977335077,-0.00022139418613,-0.000218792104915,-0.000216170504019,-0.000213524195781,-0.000210850630422,-0.00020814870111,-0.000205416897104,-0.000202658532193,-0.000199874472809,-0.000197064847436,-0.00019422947654,-0.000191372215408,-0.000188491924186,-0.000185587731099,-0.000182662317405,-0.000179680435015,-0.000176601671773,-0.000173391706196,-0.000170019347162,-0.000166279490374,-0.000162907367735,-0.000159680570426,-0.000156562565853,-0.000153513869644,-0.00015049302048,-0.000147456096877,-0.000144435457705,-0.000141471163253,-0.000138595358079,-0.00013583296875,-0.00013338863983,-0.000130521239753,-0.000127454879201,-0.000124222039769,-0.000120861088474,-0.000117413476711,-0.000113922781724,-0.000110391736147,-0.000106819980896,-0.000103212312972,-9.95695553263e-05,-9.58949991391e-05,-9.21876702375e-05,-8.84457643723e-05,-8.46682926564e-05,-8.08598518152e-05,-7.70238423829e-05,-7.31609489401e-05,-6.92728008809e-05,-6.53603231605e-05,-6.14190083198e-05,-5.74528753471e-05,-5.34653839476e-05,-4.94624769731e-05,-4.54478657654e-05,-4.14217266606e-05,-3.73835286663e-05,-3.33330845013e-05,-2.92715700008e-05,-2.52016029171e-05,-2.11269678887e-05,-1.70472209495e-05,-1.2960374236e-05,-8.86422125724e-06,-4.75766520836e-06,-6.42722695198e-07,3.4793930585e-06,7.61010901211e-06,1.17485191654e-05,1.58988062178e-05,2.00601078346e-05,2.42365255412e-05,2.84244454374e-05,3.26266708193e-05,3.68447828914e-05,4.108114079e-05,4.53456361228e-05,4.96366249681e-05,5.39565532534e-05,5.83063997413e-05,6.26859169639e-05,6.70973569943e-05,7.15407787189e-05,7.60165081439e-05,8.05250650748e-05,8.50676017204e-05,8.96416729691e-05,9.42451711084e-05,9.88812145052e-05,0.000103550723714,0.000108255039915,0.000112990615263,0.000117760418215,0.000122565955712,0.000127405704297,0.000132278148551,0.000137181394379,0.000142116041643,0.000147079839949,0.000152069328893,0.000157084358995,0.000162128040119,0.000167201024209,0.000172297927215,0.00017741742587,0.000182561243276,0.000187724876074,0.000192909142636,0.000198111369858,0.000203326021919,0.000208554562779,0.000213791693116,0.000219032127374,0.000224274694118,0.000229519025966,0.000234761590095,0.000240001078908,0.000245235858128,0.000250465838161,0.000255695331206,0.000260922924899,0.000266145075695,0.000271361077322,0.000276571784099,0.000281776217483,0.000286975343796,0.000292167225074,0.000297352800518,0.000302533683866,0.000307705895844,0.000312863996172,0.000318012393957,0.000323149985879,0.000328277440208,0.000333396042062,0.00033850593382,0.000343609867822,0.00034871143355,0.000353808674436,0.000358902668264,0.000363998898213,0.000369095305459,0.000374194836276,0.000379296920457,0.000384398804705,0.000389497420458,0.000394593034359,0.000399679228621,0.00040474925455,0.000409803435848,0.000414836935167,0.000419846068673,0.00042483289305,0.00042979283191,0.000434727760272,0.000439639713968,0.000444527554267,0.000449391314154,0.000454236711177,0.000459063954125,0.000463873630477,0.000468668129176,0.000473443721492,0.000478203099734,0.000482946753546,0.000487671309115,0.000492377236622,0.000497060624823,0.000501719171568,0.000506351436813,0.000510959911474,0.000515542694802,0.000520101467255,0.000524634759948,0.000529136805147,0.000533605440806,0.000538039923215,0.000542442966604,0.000546815911625,0.000551158545782,0.000555467089523,0.000559743341751,0.000563984994006,0.00056818962023,0.0005723583369,0.000576494005008,0.000580597825348,0.000584668402025,0.000588703360717,0.000592701885013,0.000596665160744,0.000600590605272,0.000604474663431,0.000608318127761,0.000612123653159,0.000615889218754,0.000619608639384,0.000623280910192,0.000626906312644,0.000630482779205,0.000634008505545,0.000637484552943,0.000640912090403,0.00064429079284,0.000647618640093,0.000650893343377,0.00065411955302,0.000657300924488,0.000660435874659,0.000663525165717,0.000666567720853,0.000669563583054,0.000672510297426,0.000675409244012,0.000678259175977,0.000681058835556,0.000683804097328,0.000686492641462,0.000689125060522,0.000691702250279,0.00069422612601,0.000696696125217,0.00069911489189,0.000701481111596,0.00070379541933,0.00070606304741,0.000708287236564,0.000710468898018,0.000712608730577,0.000714706033375,0.000716760228357,0.000718771536958,0.00072073967739,0.00072266227359,0.000724541487004,0.000726373456294,0.000728154680495,0.000729885984145,0.000731566727341,0.000733195553714,0.000734771680431,0.000736292737817,0.000737757670689,0.000739168763934,0.000740529123834,0.000741838754591,0.000743100373898,0.000744313279147,0.000745474097515,0.000746583641833,0.000747643809224,0.000748657831521,0.000749627674708,0.000750552005974,0.000751423660444,0.00075223902123,0.000752998404081,0.000753700244908,0.000754349494277,0.000754948886284,0.000755497515603,0.000755991080585,0.000756425826382,0.000756802922732,0.000757125276819,0.000757401438304,0.000757630105774,0.000757810134911,0.000757942091954,0.000758020588945,0.000758047005489,0.000758023562751,0.000757953005205,0.000757837613124,0.000757676845122,0.000757466088989,0.000757205166646,0.000756897337451,0.000756540287344,0.000756134889972,0.000755681898051,0.000755178412569,0.000754626649315,0.000754024873801,0.00075337344924,0.000752673904018,0.000751927383815,0.000751134058413,0.00075029642382,0.00074941721573,0.000748495018065,0.000747532549394,0.000746528094194,0.000745482645374,0.000744396235901,0.000743268709013,0.000742100776351,0.000740890571592,0.000739635196988,0.000738333686809,0.000736986027555,0.000735593877778,0.000734158931286,0.000732680490444,0.000731158784043,0.000729594774632,0.000727987978493,0.000726338390141,0.00072464632392,0.000722910907643,0.000721131523635,0.000719309337268,0.000717439392986,0.000715520463275,0.000713551593971,0.000711528058793,0.00070944692801,0.00070730273441,0.000705092748059,0.000702817778846,0.000700472188623,0.000698047957638,0.000695541889424,0.000692953259284,0.000690277633583,0.000687514905875,0.000684663934513,0.000681727310645,0.000678709354426,0.000675607405792,0.000672424864411,0.000669169212987,0.000665846656685,0.000662458613915,0.00065900811495,0.000655496289431,0.000651926456785,0.000648300175405,0.000644617708563,0.000640881988622,0.000637097272736,0.000633263616706,0.000629381880881,0.000625452870643,0.000621478180181,0.000617465368512,0.000613418309641,0.000609340282835,0.000605233473327,0.000601100670285,0.000596938691178,0.000592750593417,0.000588537071251,0.000584302717619,0.000580050675179,0.000575778548286,0.00057148481979,0.000567169076523,0.0005628321448,0.000558477914588,0.000554108423034,0.000549726711302,0.000545331276697,0.000540919797371,0.000536491175643,0.000532046098467,0.000527587810418,0.000523115270752,0.000518629660494,0.000514127402721,0.000509606858228,0.000505066831112,0.000500508109811,0.000495927867294,0.00049132882184,0.000486707709199,0.000482060670686,0.000477387395612,0.000472684597604,0.000467947146115,0.00046317819071,0.000458373264682,0.000453530621689,0.000448653407092,0.000443740133903,0.000438790656403,0.000433805913501,0.000428788187334,0.000423738027759,0.000418661619798,0.000413561574334,0.000408434149782,0.000403280650545,0.000398101194469,0.000392891701112,0.000387657667578,0.000382400182387,0.000377120208028,0.000371819055695,0.000366495677386,0.000361145617215,0.000355773814095,0.000350386272317,0.000344984090656,0.000339574220655,0.000334157042909,0.000328731671324,0.000323297607412,0.00031785640134,0.00031240666358,0.000306951726468,0.000301493957754,0.000296032359995,0.00029056699326,0.000285096391099,0.000279618969384,0.000274135197311,0.000268646409982,0.000263149976013,0.000257647119019,0.000252139188364,0.000246625842335,0.00024110801746,0.000235585675863,0.000230056621182,0.000224523695476,0.000218985220695,0.000213444084158,0.000207903844342,0.0002023693952,0.000196842341106,0.000191324017751,0.000185815112743,0.000180316054525,0.000174829571744,0.000169357971922,0.000163905581726,0.000158470405904,0.000153050912615,0.000147642227976,0.000142243029184,0.000136852163011,0.000131469537782,0.000126094325486,0.000120728237864,0.000115368947693,0.00011001329856,0.000104659820622,9.93127732611e-05,9.39751306061e-05,8.86502630969e-05,8.33395517779e-05,7.80402332483e-05,7.2754718894e-05,6.74831289459e-05,6.2224134771e-05,5.69823658318e-05,5.17626220254e-05,4.65638912271e-05,4.13857434455e-05,3.62269498904e-05,3.10873613825e-05,2.59712933573e-05,2.08812737439e-05,1.58171559968e-05,1.07798671682e-05,5.766559091e-06,7.73353955856e-07,-4.20068030669e-06,-9.15467602999e-06,-1.40902698074e-05,-1.90095282101e-05,-2.39128786885e-05,-2.88022741734e-05,-3.36794839649e-05,-3.85429573584e-05,-4.33877546328e-05,-4.82133522749e-05,-5.30180798889e-05,-5.78009748053e-05,-6.256055531e-05,-6.72909319519e-05,-7.1990686954e-05,-7.6659537475e-05,-8.12967935289e-05,-8.59036731424e-05,-9.04814931357e-05,-9.50322934966e-05,-9.95534661376e-05,-0.000104043641586,-0.000108502844468,-0.000112933055714,-0.000117338940111,-0.000121719002106,-0.000126071978869,-0.000130397586446,-0.000134694481985,-0.00013896223912,-0.000143202255326,-0.000147413371937,-0.000151596886316,-0.000155751967848,-0.000159875249103,-0.000163967029651,-0.000168026773777,-0.000172055139294,-0.000176054006542,-0.000180017673284,-0.000183945361043,-0.000187837897506,-0.000191695890096,-0.000195520340348,-0.000199310872304,-0.000203067003157,-0.00020678984141,-0.000210478264155,-0.000214131218424,-0.00021775058056,-0.000221340321115,-0.000224901308827,-0.000228433111548,-0.000231937270116,-0.000235414634463,-0.000238868306576,-0.000242297000565,-0.000245698565631,-0.000249075796343,-0.000252429051123,-0.000255757236336,-0.00025905790764,-0.000262331823923,-0.000265577055692,-0.000268792884128,-0.000271976953602,-0.000275131383396,-0.000278259826285,-0.000281360429546,-0.000284431600834,-0.000287474179418,-0.00029049072793,-0.000293480695971,-0.00029644382919,-0.000299381268274,-0.000302289293498,-0.000305166730997,-0.00030801094927,-0.000310822709395,-0.000313604560567,-0.000316355567424,-0.000319074831729,-0.000321759630494,-0.00032441224214,-0.000327033940755,-0.00032962707399,-0.00033219339018,-0.000334734170385,-0.000337248843521,-0.000339733053519,-0.000342187592975,-0.00034460989983,-0.00034700155026,-0.000349361706903,-0.000351686171204,-0.000353976057736,-0.000356231601193,-0.000358453736994,-0.000360641520238,-0.000362798622268,-0.000364923796578,-0.000367019423662,-0.000369087438907,-0.000371129214865,-0.00037315197994,-0.000375157454229,-0.000377140712024,-0.000379099523246,-0.000381033545659,-0.000382943779233,-0.000384829344797,-0.000386695600891,-0.000388539487656,-0.000390359846755,-0.00039214886015,-0.000393898972103,-0.000395615886948,-0.00039730273349,-0.000398961143681,-0.000400588361779,-0.000402183162528,-0.000403741074624,-0.000405265714129,-0.000406757975374,-0.000408220479535,-0.000409661424616,-0.000411080860312,-0.000412475337005,-0.000413845009433,-0.000415188991079,-0.000416513727724,-0.000417821489102,-0.000419107232253,-0.000420365257469,-0.000421598920737,-0.000422807476714,-0.000423989714349,-0.000425144434004,-0.000426270845612,-0.000427370498323,-0.000428442760743,-0.000429486766524,-0.000430506480898,-0.000431505635849,-0.000432483822516,-0.000433436196167,-0.000434362190039,-0.000435266242929,-0.000436150954967,-0.000437015529259,-0.000437856202562,-0.000438674220664,-0.000439406752182,-0.000439990044911,-0.00044042793115,-0.000440720027062,-0.000440865000248)
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(245)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Bos_taurus-male-liver-H3K27Ac-ERR572139.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) : 245',bty='n')
dev.off()