# R script for Peak Model
#  -- generated by MACS
p <- c(0.0397438737206,0.0461978326803,0.0531346484221,0.0598198345733,0.0666886423176,0.0667498495153,0.0665458255229,0.0670354831047,0.066783853514,0.0672055030983,0.0672259054976,0.0673823238918,0.067348319893,0.0674435310895,0.0668790647105,0.0669266703087,0.0669334711085,0.0670354831047,0.0672939134951,0.0669606743075,0.0668178575128,0.0670966903024,0.0666614391186,0.0664234111275,0.0671238935014,0.0669674751072,0.0670898895026,0.0669266703087,0.0668450607118,0.0672395070971,0.0672735110958,0.0672803118956,0.0673959254913,0.0676271526826,0.0670898895026,0.0667634511148,0.0668042559133,0.066919869509,0.0670626863037,0.066919869509,0.0666206343201,0.0661853831363,0.0661377775381,0.0659813591439,0.065845343149,0.0663690047295,0.0663894071287,0.0658997495469,0.0660085623429,0.0658657455482,0.0659337535457,0.0660221639424,0.066328199931,0.0669674751072,0.0674911366877,0.0669538735077,0.0667090447168,0.066919869509,0.0665390247232,0.0667090447168,0.066919869509,0.0670286823049,0.0664438135267,0.0659337535457,0.065253673571,0.0654712991629,0.0655937135583,0.0653896895659,0.0656685223556,0.0653420839677,0.0649136335837,0.0648184223872,0.0648524263859,0.0646756055925,0.06474361359,0.0644239760019,0.0639751232186,0.0642879600069,0.0639003144214,0.0640363304163,0.0643763704037,0.0638935136216,0.0637847008257,0.0636486848307,0.0642199520095,0.0645939959956,0.0651516615748,0.0654236935647,0.065790936751,0.0658317415495,0.0655393071604,0.0657569327523,0.0661581799373,0.0659609567447,0.0659201519462,0.0662057855356,0.0658113391502,0.0653488847675,0.0651788647738,0.065144860775,0.0654917015621,0.0654985023619,0.0654917015621,0.0659609567447,0.0657773351515,0.0653148807687,0.0655189047611,0.0653896895659,0.0654304943644,0.0654168927649,0.0650972551768,0.0651584623745,0.0650972551768,0.0649476375824,0.0651788647738,0.0652332711718,0.0656549207561,0.0658385423492,0.0659677575444,0.0661785823366,0.0663758055292,0.0665186223239,0.0668042559133,0.0667090447168,0.0661649807371,0.0658045383505,0.065226470372,0.0651788647738,0.0649340359829,0.0649340359829,0.0650972551768,0.0650700519778,0.0649136335837,0.0653692871667,0.0652876775697,0.066273793533,0.0669334711085,0.067858379874,0.068021599068,0.067912786272,0.0678175750756,0.068021599068,0.0680624038664,0.0677155630794,0.067912786272,0.0673687222923,0.0666274351199,0.0660561679411,0.0660765703404,0.0657229287535,0.0661241759386,0.0661241759386,0.0661717815368,0.0659881599437,0.0664914191249,0.0668042559133,0.0675795470844,0.0674163278905,0.0679535910705,0.0683548382556,0.0677291646788,0.0681100094647,0.0683480374558,0.0690281174305,0.0688512966371,0.0688648982366,0.0689533086333,0.0690757230287,0.068422846253,0.0686132686459,0.0685996670464,0.0684568502518,0.0685384598487,0.0679535910705,0.0687288822416,0.0686948782429,0.0687628862404,0.0690009142315,0.0697217990047,0.0698850181986,0.0704630861771,0.0705582973735,0.0703950781796,0.0711023613533,0.0703678749806,0.0704290821783,0.0700006317943,0.0698850181986,0.0698714165991,0.0696877950059,0.069633388608,0.0694089622163,0.0695177750123,0.0693953606168,0.0693953606168,0.0692321414229,0.0695381774115,0.069551779011,0.0693409542189,0.0692117390237,0.0692185398234,0.0698714165991,0.0702182573862,0.070170651788,0.0705038909756,0.0711227637525,0.0713063853457,0.0709731461581,0.0708371301632,0.0713063853457,0.0709527437589,0.0705582973735,0.0699734285953,0.0700550381923,0.0702522613849,0.0704902893761,0.0704698869768,0.0711227637525,0.0720000669199,0.0720884773166,0.0731017964789,0.0735710516614,0.0742715340353,0.0746591796209,0.0749720164092,0.0752100444004,0.0755228811887,0.0758969251748,0.0756588971837,0.0759921363713,0.0760601443687,0.0759581323725,0.0763865827566,0.0768762403384,0.0770530611318,0.0773386947211,0.0774611091166,0.0773931011191,0.0773114915222,0.0773318939214,0.0772706867237,0.0773931011191,0.0770054555335,0.0767334235437,0.0765021963523,0.0762573675614,0.0764545907541,0.0767266227439,0.0772910891229,0.0774611091166,0.0773863003194,0.0777807467047,0.0790592970571,0.079195313052,0.0795625562384,0.0800590146199,0.0801678274158,0.080351449009,0.0802562378125,0.0800386122206,0.0806098793994,0.0811879473779,0.0804466602055,0.0803378474095,0.0806914889963,0.0802834410115,0.080433058606,0.0806234809989,0.0805350706022,0.0810451305832,0.0812559553753,0.0814667801675,0.0820924537442,0.0825753105262,0.0826637209229,0.082983358511,0.0829969601105,0.0829969601105,0.0835614264895,0.0840170800725,0.0836770400852,0.0834594144933,0.0833642032969,0.0836430360865,0.0831261753057,0.0833710040966,0.083493418492,0.0836770400852,0.0838878648774,0.0842007016657,0.085105208032,0.0854248456201,0.0853772400219,0.0854792520181,0.086342953586,0.0863361527862,0.0868190095682,0.0877371175341,0.0884512015075,0.0887572374961,0.0890904766837,0.0893693094733,0.0902194094417,0.0913143382009,0.0921100317713,0.0931505541326,0.0939258453037,0.0943134908893,0.0950207740629,0.0952928060528,0.0955852404419,0.0960612964242,0.0965713564052,0.0962381172176,0.0967481771986,0.0976322811657,0.09805393075,0.0985299867323,0.0984483771354,0.0986592019275,0.0990264451138,0.0994888994966,0.0999785570784,0.100604230655,0.100896665044,0.100719844251,0.10127750983,0.101195900233,0.101665155416,0.102229621795,0.102658072179,0.102930104169,0.103474168148,0.104011431328,0.103807407336,0.104528292109,0.104705112902,0.104807124899,0.104630304105,0.104745917701,0.104875132896,0.10503155129,0.105228774483,0.105691228866,0.106527727235,0.106221691246,0.106833763223,0.107384628003,0.107779074388,0.108132715975,0.108880803947,0.109214043135,0.109098429539,0.109438469526,0.109275250332,0.109404465528,0.109513278323,0.109962131107,0.110832633474,0.110900641472,0.111084263065,0.11174394064,0.112233598222,0.112056777429,0.112770861402,0.112886474998,0.112689251805,0.112866072599,0.112580439009,0.112954482995,0.113267319784,0.11391339576,0.11390659496,0.114627479733,0.114545870136,0.115627197296,0.116647317258,0.116776532453,0.117225385236,0.118374720394,0.118497134789,0.118626349984,0.118925585173,0.118857577176,0.119986509934,0.119741681143,0.119530856351,0.120476167515,0.120523773114,0.120476167515,0.120775402704,0.120993028296,0.12141467788,0.122210371451,0.121577897074,0.122210371451,0.122013148258,0.12222397305,0.122917654625,0.122856447427,0.123080873818,0.123244093012,0.123713348195,0.123624937798,0.124209806576,0.124441033768,0.125080308944,0.124883085751,0.125590368925,0.126148034504,0.126243245701,0.126916524876,0.127351776059,0.127732620845,0.12841950162,0.128705135209,0.129358011985,0.129684450373,0.129902075965,0.130051693559,0.13054815194,0.130582155939,0.130595757539,0.131133020719,0.131031008723,0.131391451109,0.132336762274,0.133125655045,0.133186862242,0.133404487834,0.133839739018,0.133574507828,0.133921348615,0.133975755013,0.134717042185,0.135573942953,0.135301910964,0.13484625738,0.134295392601,0.134662635787,0.135322313363,0.136437644521,0.136655270113,0.137144927695,0.136634867714,0.13619281573,0.135873178142,0.136532855718,0.137396557286,0.13781820687,0.137784202871,0.137654987676,0.13836227085,0.137852210869,0.138301063652,0.138253458054,0.138532290843,0.138736314836,0.138103840459,0.138851928431,0.138743115635,0.138185450056,0.137138126895,0.137600581278,0.137219736492,0.137478166883,0.137580178879,0.137913418066,0.138484685245,0.137525772481,0.13646484772,0.136145210132,0.136492050919,0.136111206133,0.136226819729,0.135839174144,0.136301628526,0.135839174144,0.135444727758,0.134955070176,0.135308711763,0.135628349351,0.134771448583,0.1343225958,0.13352010143,0.13298283825,0.132037527085,0.131037809522,0.130262518351,0.130092498357,0.130364530347,0.129623243175,0.129398816783,0.128881956002,0.12948722718,0.129643645574,0.129181191191,0.1289431632,0.129364812785,0.128983967999,0.128344692822,0.127834632841,0.127535397653,0.128269884025,0.127719019246,0.127256564863,0.126780508881,0.126746504882,0.126583285688,0.126222843301,0.126046022508,0.1262704489,0.126304452898,0.125522360928,0.125223125739,0.124767472156,0.124298216973,0.123475320204,0.12276803703,0.122285180248,0.121353470683,0.120945422698,0.120013713133,0.119585262749,0.118544740387,0.118517537188,0.1181978996,0.118551541187,0.118932385973,0.118537939588,0.118877979575,0.118510736389,0.118633150784,0.118320313996,0.118286309997,0.117687839619,0.117415807629,0.117238986836,0.116776532453,0.117463413228,0.117007759645,0.116681321257,0.116613313259,0.116144058077,0.116293675671,0.116110054078,0.115926432485,0.116035245281,0.11524635251,0.114913113322,0.114668284532,0.11471589013,0.114817902126,0.115042328518,0.114416654941,0.11471589013,0.115423173303,0.114743093329,0.114817902126,0.115130738914,0.115647599695,0.115967237283,0.116518102063,0.117198182037,0.118299911596,0.118979991571,0.11955125875,0.120666589908,0.121809124266,0.122652423434,0.123658941797,0.125549564127,0.12761700725,0.129589239176,0.131507064705,0.133037244648,0.13460142859,0.136049998936,0.137498569282,0.137797804471,0.138280661253,0.137627784477,0.13566915415,0.13352010143,0.131316642312,0.129371613584,0.127433385656,0.124896687351,0.12222397305,0.120040916332,0.117456612428,0.11523955171,0.113852188562,0.112784463002,0.111628327045,0.110234163097,0.108826397549,0.107772273588,0.106956177619,0.105779639262,0.104834328098,0.103841411335,0.102964108167,0.101372721027,0.100053365876,0.0991216563103,0.097169826783,0.0956872524381,0.0947555428728,0.0940550604989,0.0929805341389,0.0923208565634,0.091205525405,0.0905526486293,0.0898861702541,0.0892332934784,0.0890768750842,0.0893557078738,0.0885328111045,0.0879411415265,0.0875058903427,0.0869822287622,0.0865333759789,0.0864925711804,0.0859213040017,0.0854996544174,0.0851800168293,0.0844727336556,0.0845543432525,0.0844727336556,0.0848739808407,0.0848263752424,0.0848195744427,0.0842959128622,0.0852072200282,0.0851936184288,0.0853024312247,0.0852072200282,0.0850167976353,0.0848195744427,0.0843911240586,0.0841258928685,0.084166697667,0.0843707216594,0.0838062552804,0.083146577705,0.0830173625098,0.0827997369179,0.0824937009293,0.082418892132,0.08247329853,0.082418892132,0.0824528961308,0.0822896769368,0.0816640033601,0.0817116089584,0.0816368001612,0.0813375649723,0.0811879473779,0.0805282698024,0.0798617914272,0.0793789346452,0.0784132210811,0.0782432010875,0.0783724162827,0.0780731810938,0.0775699219125,0.0775631211128,0.0772638859239,0.0775087147148,0.0776311291103,0.0773114915222,0.0772162803257,0.0769578499353,0.0766042083485,0.0762641683611,0.0764273875551,0.0761621563649,0.07602614037,0.0759513315728,0.0757609091799,0.0753528611951,0.0754548731913,0.0750536260062,0.0747067852191,0.074897207612,0.0742783348351,0.0741831236386,0.0738090796525,0.073312621271,0.072720951693,0.0732106092748,0.0730405892811,0.072693748494,0.0729249756854,0.0727957604903,0.0726869476943,0.0719932661201,0.0715988197348,0.0719592621214,0.0724081149047,0.0722516965105,0.0720680749173,0.072238094911,0.0720408717184,0.0715580149363,0.0713743933432,0.0720068677196,0.0720884773166,0.0716872301315,0.0709663453583,0.0705378949743,0.0700482373925,0.0699734285953,0.0702862653837,0.0700482373925,0.0697013966054,0.0691913366244,0.0690757230287,0.0690281174305,0.0687696870401,0.0689737110325,0.068960109433,0.0686880774432,0.0682188222606,0.0681236110642,0.0685384598487,0.068558862248,0.0682868302581,0.0680896070654,0.0684976550502,0.0682528262594,0.0685928662467,0.0685520614482,0.0681712166624,0.068558862248,0.068477252651,0.0685248582492,0.0685180574495,0.0682528262594,0.0681168102644,0.0681984198614,0.0675795470844,0.0672055030983,0.0675319414862,0.067457132689,0.0675183398867,0.0672939134951,0.067402726291,0.0673959254913,0.0669130687092,0.0665934311211,0.0667702519145,0.0673279174938,0.0669810767067,0.0665730287219,0.066382606329,0.0661649807371,0.0660697695406,0.0656889247548,0.0659065503467,0.0655529087599,0.0651924663733,0.0646416015938,0.0651584623745,0.0651176575761,0.0643627688042,0.0643559680044,0.0639751232186,0.0641655456115,0.0639547208193,0.0637098920285,0.0644443784011,0.064179147211,0.0637574976267,0.0637506968269,0.0642403544087,0.064070334415,0.0644035736026,0.0642403544087,0.064716410391,0.0650768527776,0.0647368127902,0.0649816415811,0.0646824063923,0.0645599919968,0.0642267528092,0.0642811592072,0.064097537614,0.0641655456115,0.0637438960272,0.0637847008257,0.0637370952275,0.0639887248181,0.0640227288168,0.0638595096229,0.0639615216191,0.0640431312161,0.0643151632059,0.0645395895976,0.0642947608067,0.0642879600069,0.0641655456115,0.0640023264176,0.0638119040247,0.064260756808,0.0637847008257,0.0634786648371,0.0630298120538,0.0629482024568,0.0632474376457,0.0635194696356,0.0635058680361,0.0626557680677,0.0630094096545,0.0627713816634,0.0631522264492,0.0632474376457,0.0633630512414,0.0632610392452,0.0632202344467,0.0627713816634,0.0627645808637,0.0636214816318,0.0634990672363,0.0637030912287,0.06366908723,0.0633698520411,0.0633902544404,0.062995808055,0.0623497320791,0.0620913016887,0.0622885248814,0.06152003451,0.0612139985214,0.060901161733,0.0611663929231,0.0613976201145,0.0615948433072,0.0618464728978,0.0623701344783,0.0625741584707,0.0619824888928,0.0625265528725,0.0625741584707,0.0624925488738,0.0624381424758,0.0623089272806,0.0623633336786,0.0622069152844,0.0615812417077,0.0612071977216,0.0613432137166,0.0611663929231,0.0610779825264,0.0609895721297,0.0606359305429,0.0612548033199,0.0607515441386,0.0604591097495,0.0605203169472,0.0607719465378,0.0610507793274,0.0611527913236,0.060928364932,0.0610779825264,0.0614248233135,0.0608603569345,0.0614724289118,0.0621865128852,0.0626693696672,0.0628121864619,0.0627509792642,0.0626013616697,0.0629414016571,0.0627305768649,0.0625537560715,0.0627237760652,0.0623701344783,0.0616220465062,0.0616356481057,0.0618124688991,0.06152003451,0.0618056680993,0.0616356481057,0.061921281695,0.0620232936912,0.0618940784961,0.06205729769,0.0622885248814,0.062485748074,0.0624381424758,0.0628733936596,0.0629141984581,0.0629005968586,0.0631930312477,0.0629482024568,0.0634242584391,0.0629209992578,0.0632542384454,0.063587477633,0.0638799120221,0.0634310592388,0.06366908723,0.0638459080234,0.0639479200196,0.0644851831996,0.0643967728029,0.065253673571,0.0652332711718,0.0649884423809,0.0646756055925,0.0653828887662,0.0654032911654,0.0656345183568,0.0658861479475,0.0660085623429,0.0659473551452,0.0655801119588,0.0659541559449,0.0658249407497,0.0658997495469,0.0658861479475,0.0655121039614,0.0653488847675,0.0650904543771,0.0645803943961,0.0646416015938,0.0644307768016,0.0641111392135,0.0643695696039,0.0645395895976,0.0641451432123,0.0642675576077,0.0644919839994,0.064798019988,0.0650836535773,0.0653624863669,0.0657297295533,0.0659677575444,0.0656549207561,0.0657025263543,0.0658929487472,0.0656889247548,0.0656685223556,0.0656345183568,0.0656073151578,0.0655597095596,0.065682123955,0.0659405543454,0.0663486023302,0.0666818415178,0.0670286823049,0.0675591446852,0.067939989471,0.0678651806738,0.0675795470844,0.0678719814735,0.0677971726763,0.0673959254913,0.0675523438854,0.0673619214925,0.0672939134951,0.0675727462847,0.0675863478842,0.0676679574811,0.0681916190616,0.0680896070654,0.0681168102644,0.0683140334571,0.0683480374558,0.0684160454533,0.0686472726447,0.0683548382556,0.0686404718449,0.0687016790426,0.0688240934381,0.0688104918386,0.069068922229,0.0693817590173,0.069497372613,0.07011624539,0.0702930661834,0.070599102172,0.0703746757804,0.0707759229654,0.071136365352,0.0711295645523,0.071109162153,0.0710683573546,0.0712995845459,0.0706195045713,0.0701026437905,0.0699938309945,0.0700482373925,0.0697285998044,0.0693613566181,0.0692117390237,0.0691437310262,0.0693137510199,0.069096125428,0.0691845358247,0.0698850181986,0.0697149982049,0.0697149982049,0.0696265878082,0.070034635793,0.0704290821783,0.070571898973,0.0703202693824,0.0701570501885,0.0698918189983,0.069470169414,0.0695041734128,0.0699870301948,0.0700822413913,0.0702794645839,0.0701502493887,0.070007432594,0.0697217990047,0.0698170102011,0.0702454605852,0.0704902893761,0.0708167277639,0.0703270701821,0.0697966078019,0.0692185398234,0.0693409542189,0.0698306118006,0.0704154805789,0.070599102172,0.0709119389604,0.0710411541556,0.0713199869452,0.0709935485573,0.071782441328,0.0721292821151,0.072183688513,0.0717688397285,0.0717416365295,0.0715852181353,0.0715308117373,0.0710683573546,0.0710139509566,0.0713743933432,0.0710139509566,0.0705582973735,0.0704766877766,0.0704426837778,0.0704902893761,0.0706739109692,0.0707691221657,0.0711023613533,0.0711703693508,0.0709527437589,0.0711159629528,0.0718776525244,0.0719864653204,0.0725781348984,0.0724489197032,0.071782441328,0.07172803493,0.0717756405282,0.0716600269325,0.0719320589224,0.0723265053077,0.0722584973102,0.0724829237019,0.0722584973102,0.0720000669199,0.0725917364978,0.0723741109059,0.0724897245016,0.0725373300999,0.0724897245016,0.0721428837146,0.0721224813153,0.0720204693191,0.0724557205029,0.0725917364978,0.0727345532925,0.0729181748857,0.0726393420961,0.0723605093065,0.0731221988781,0.0726189396968,0.0722857005092,0.0720884773166,0.0717484373292,0.0720000669199,0.0718232461265,0.0714900069389,0.0711159629528,0.0707759229654,0.0697694046029,0.0706399069705,0.0708711341619,0.0708439309629,0.0708711341619,0.0707623213659,0.0707827237652,0.0713675925434,0.071809644527,0.0721088797158,0.0725237285004,0.0723333061075,0.0724081149047,0.0724149157044,0.0720748757171,0.0719864653204,0.0721496845143,0.0719660629211,0.0717144333305,0.072319704508,0.072693748494,0.0720612741176,0.0720068677196,0.0718028437272,0.0719320589224,0.0718232461265,0.0720068677196,0.0719184573229,0.0719592621214,0.0714492021404,0.0709323413596,0.0714287997411,0.0709663453583,0.0708167277639,0.0706739109692,0.0707419189667,0.0704630861771,0.0700278349933,0.070061838992,0.070170651788,0.0697966078019,0.0693681574178,0.0696877950059,0.0696129862087,0.0697285998044,0.0695993846092,0.0696945958057,0.0699870301948,0.0703610741809,0.0697558030034,0.0703474725814,0.0710343533558,0.0710003493571,0.0710275525561,0.0706603093697,0.0705378949743,0.0702658629844,0.0703678749806,0.0699734285953,0.0704562853773,0.070034635793,0.06957898221,0.0695041734128,0.0694837710135,0.0697149982049,0.0701366477892,0.0700482373925,0.0696129862087,0.0697762054027,0.0694565678145,0.0696537910072,0.0696197870085,0.069551779011,0.0700482373925,0.0696945958057,0.0695857830097,0.0700686397918,0.0700278349933,0.0697558030034,0.0702522613849,0.0699938309945,0.0698714165991,0.0696469902075,0.0693001494204,0.0691981374242,0.0687220814419,0.0684840534507,0.0690825238285,0.068558862248,0.0682596270591,0.06850445585,0.0684976550502,0.0689125038348,0.0687900894394,0.0692525438221,0.0694837710135,0.0689941134318,0.068531659049,0.06904171903,0.0688921014356,0.0686880774432,0.0689057030351,0.0686608742442,0.0688240934381,0.0686812766434,0.0688853006358,0.0684092446535,0.0682460254596,0.0683616390553,0.0680760054659,0.0680147982682,0.0675523438854,0.0606087273439,0.0536991148011,0.0468371078565,0.039839084917,0.0)
m <- c(0.0405458606112,0.0469833507914,0.0540060673517,0.0605192927105,0.0674869291409,0.0672872636701,0.0671702183941,0.0675351242546,0.0677485597579,0.0680239604073,0.0680996955859,0.068306246073,0.0680996955859,0.0681341206671,0.0677141346767,0.0679826503099,0.0680583854885,0.0677347897254,0.0675144692059,0.0675075841896,0.0677347897254,0.0673974239299,0.0676039744169,0.067810524904,0.0681341206671,0.0686091867873,0.0679688802774,0.0678036398878,0.0679138001475,0.0677967548715,0.0676452845143,0.0679964203424,0.0676521695306,0.0675833193682,0.0673767688812,0.0669980929882,0.0677554447741,0.0676590545468,0.0675006991734,0.0671426783291,0.0670049780044,0.0670669431506,0.0674869291409,0.0677623297903,0.0682649359755,0.0679482252287,0.0679344551962,0.0685334516087,0.0685541066574,0.0690773678913,0.068746887112,0.069242608281,0.0688363923231,0.0692012981836,0.0690016327128,0.0693389985083,0.0691462180537,0.068746887112,0.0695042388979,0.0698760297747,0.0697314444337,0.0690291727777,0.069944879937,0.0696970193525,0.0693458835245,0.0692012981836,0.0692908033946,0.0690429428102,0.0689396675666,0.068746887112,0.0694973538817,0.0695455489954,0.0686986919984,0.068746887112,0.0694009636544,0.069593744109,0.0697658695149,0.0701376603916,0.0698002945961,0.0697727545311,0.0694216187031,0.0700963502942,0.0703166708137,0.0699999600669,0.0697934095798,0.0703097857975,0.0705920714632,0.0709363222749,0.0714113883952,0.0710327125022,0.0713631932815,0.0709776323724,0.0708950121775,0.0711979528919,0.0710946776484,0.0704681411709,0.0701720854728,0.069476698833,0.069359653557,0.0695455489954,0.0689190125179,0.068774427177,0.068657381901,0.0682924760405,0.068540336625,0.0689672076316,0.0688983574692,0.0696901343363,0.0694629288005,0.0696488242389,0.0697796395474,0.0698829147909,0.0703924059923,0.0707435418203,0.0706678066418,0.070674691658,0.0709638623399,0.0705232213008,0.0705025662521,0.0707228867716,0.071376963314,0.0717212141258,0.0714526984926,0.0713356532166,0.071170412827,0.0712392629893,0.0710533675509,0.0712117229244,0.0712461480055,0.0707297717879,0.0708743571288,0.0704956812359,0.0703373258624,0.070296015765,0.0700550401968,0.0701445454079,0.0702547056676,0.0701858555053,0.070089465278,0.0701652004566,0.0696006291252,0.0701514304241,0.0703442108787,0.0707022317229,0.0710395975185,0.0708399320476,0.0708261620152,0.0709776323724,0.0711015626646,0.0709500923074,0.0711635278107,0.0708192769989,0.0709156672262,0.0707710818853,0.0709638623399,0.0709914024048,0.0708950121775,0.0707986219502,0.0704337160897,0.070674691658,0.0706678066418,0.0705989564794,0.0706540366093,0.0711084476808,0.0709156672262,0.0709914024048,0.0707573118528,0.0705438763495,0.0708399320476,0.0707366568041,0.0710740225997,0.0711910678757,0.0712668030542,0.0705094512683,0.0709294372587,0.0705438763495,0.0713081131517,0.0713149981679,0.0714595835088,0.071259918038,0.0710533675509,0.0707022317229,0.0706540366093,0.0709018971938,0.0705163362846,0.0704819112034,0.0697865245636,0.0698622597422,0.0697039043688,0.0704337160897,0.0705714164145,0.0713149981679,0.0716317089147,0.071755639207,0.0719346496291,0.0726300362689,0.0728710118371,0.0730775623242,0.0734493532009,0.0728228167235,0.0729329769833,0.0730018271456,0.0726644613501,0.0720723499538,0.0717487541907,0.0712117229244,0.0710809076159,0.0708743571288,0.0706815766742,0.0708881271613,0.0703097857975,0.0698829147909,0.0696832493201,0.0701996255377,0.069944879937,0.0698140646285,0.0701514304241,0.0704681411709,0.0700688102293,0.070089465278,0.070440601106,0.0703924059923,0.0707366568041,0.070530106317,0.0708123919827,0.0708674721126,0.0704681411709,0.070296015765,0.0706815766742,0.0705369913333,0.0703097857975,0.0703924059923,0.0697245594175,0.0695455489954,0.0696901343363,0.0700963502942,0.0701376603916,0.070206510554,0.0697658695149,0.0699861900344,0.0695730890603,0.0694698138168,0.0696075141415,0.0696419392227,0.0691531030699,0.0688708174043,0.0688088522582,0.0680652705047,0.0684301763652,0.0679344551962,0.0681134656184,0.0680859255534,0.0683682112191,0.0681203506346,0.0684990265276,0.068161660732,0.0682029708294,0.0686918069822,0.0687950822257,0.0692081831998,0.0691875281511,0.0691117929725,0.0688845874367,0.0693940786382,0.0690429428102,0.0689672076316,0.0686642669172,0.0683131310892,0.0682924760405,0.0682373959106,0.068161660732,0.0677898698553,0.0677210196929,0.067431849011,0.0678036398878,0.067576434352,0.0673767688812,0.0681754307645,0.0679826503099,0.0677003646442,0.0680033053586,0.0681478906995,0.0678449499852,0.0680652705047,0.0675970894007,0.0679619952612,0.068044615456,0.0670738281668,0.0672803786539,0.0674800441247,0.0677210196929,0.0677416747416,0.0682029708294,0.0677279047092,0.0682236258781,0.0681754307645,0.0682649359755,0.0681410056833,0.0680377304398,0.0681065806021,0.0673974239299,0.0672872636701,0.0671289082967,0.0674387340273,0.0667984275174,0.0664197516244,0.0663233613971,0.066640072144,0.0663440164458,0.0657450200333,0.0663853265432,0.0669017027609,0.0667226923388,0.0665987620465,0.0666607271927,0.0674387340273,0.0677554447741,0.0678518350014,0.0682993610567,0.0686023017711,0.068189200797,0.0679964203424,0.0680583854885,0.0679413402125,0.0679482252287,0.067576434352,0.067431849011,0.0671633333779,0.0663853265432,0.0661099258938,0.0657794451145,0.0658138701957,0.0655728946274,0.0661236959263,0.0665574519491,0.0659859956016,0.0658482952769,0.0659378004879,0.0658001001632,0.0660892708451,0.0658896053743,0.0656692848547,0.0662958213322,0.0660686157964,0.0654351943027,0.0661650060237,0.0659378004879,0.0663164763809,0.0668603926635,0.0668603926635,0.0669154727934,0.0668259675823,0.066261396251,0.065765675082,0.0659309154717,0.0657381350171,0.0659722255691,0.0655728946274,0.0651666786695,0.0647880027766,0.0649119330688,0.0647535776954,0.0648086578253,0.0649945532637,0.0652424138481,0.0652630688968,0.0650358633611,0.0651529086371,0.0658138701957,0.0662132011373,0.0665987620465,0.0668259675823,0.0669498978746,0.0669292428258,0.0666744972251,0.0663233613971,0.0665918770303,0.0666607271927,0.0661512359912,0.0657105949522,0.0652355288319,0.06494635815,0.0645401421921,0.0642647415427,0.0638860656497,0.0643404767213,0.0638791806335,0.0639411457796,0.0638241005036,0.063865410601,0.0636932851951,0.063541814838,0.063748365325,0.0639893408933,0.0641408112504,0.0635624698867,0.0638309855198,0.0639136057147,0.063631320049,0.0639962259095,0.0641201562017,0.0638378705361,0.0638241005036,0.0639273757471,0.063865410601,0.0641063861693,0.0640857311206,0.0633490343834,0.0637827904062,0.0638378705361,0.0642922816076,0.0652286438157,0.0651873337183,0.0653525741079,0.0659240304555,0.0658276402282,0.0662200861536,0.0666056470628,0.0665230268679,0.0666538421764,0.0665712219816,0.0659515705204,0.0660823858289,0.065882720358,0.0661994311049,0.0663302464134,0.0656417447898,0.065793215147,0.0654765044001,0.0648706229714,0.0646296474032,0.0649325881175,0.0648981630364,0.0649325881175,0.06436113177,0.0642991666239,0.0647053825818,0.0648224278578,0.0650220933286,0.0654627343677,0.0658620653093,0.0660823858289,0.0664472916894,0.0662545112348,0.0662820512997,0.0665023718192,0.06675711742,0.0662682812672,0.0665712219816,0.0666882672576,0.0665161418517,0.0664817167705,0.0660479607477,0.0664748317543,0.0671289082967,0.067108253248,0.0673836538974,0.0680790405372,0.0680996955859,0.0678656050339,0.0680859255534,0.0682305108944,0.0680859255534,0.0680859255534,0.0677072496605,0.0678242949365,0.0680033053586,0.0682236258781,0.0686023017711,0.0687124620309,0.068746887112,0.068657381901,0.0692976884109,0.0692770333622,0.0692012981836,0.0690429428102,0.0686711519334,0.0686229568198,0.0687813121932,0.0693389985083,0.0692081831998,0.0694285037194,0.0694285037194,0.0695799740765,0.0696006291252,0.0699242248883,0.0700206151156,0.0704199460573,0.070178970489,0.0700343851481,0.0703304408462,0.070206510554,0.0705232213008,0.0702133955702,0.0709914024048,0.0709569773236,0.0710809076159,0.0708468170639,0.0709500923074,0.0706058414956,0.070206510554,0.0703992910086,0.0706333815606,0.0713425382328,0.0711979528919,0.0714251584277,0.0715766287848,0.0715146636387,0.0714733535413,0.0718520294343,0.0726438063014,0.0729054369183,0.0721687401811,0.0719484196616,0.0720585799213,0.0721893952298,0.0727057714475,0.073187722584,0.0737867189965,0.0740965447271,0.0741378548245,0.0743168652466,0.0749020916266,0.0751086421137,0.0754942030229,0.0756594434125,0.0753840427631,0.0752532274546,0.0751430671949,0.0753909277793,0.0757833737048,0.0758935339645,0.0761827046464,0.0769331714161,0.0766440007342,0.0772843072441,0.0780829691274,0.0786062303614,0.0788334358971,0.0790193313355,0.0791570316602,0.0794530873583,0.0800314287221,0.0800107736734,0.0803825645501,0.0797904531539,0.0799143834461,0.0795357075532,0.0800038886572,0.0803825645501,0.0806786202483,0.0812913866932,0.0812363065633,0.0813051567257,0.0812294215471,0.0816562925537,0.0816631775699,0.0827578951514,0.082482494502,0.0827923202326,0.0824342993883,0.0822002088363,0.0827510101352,0.0829782156709,0.0835014769048,0.0838250726679,0.0839696580089,0.0835703270672,0.0843001387882,0.0839076928627,0.0848371700545,0.0847752049084,0.0846788146811,0.0849197902494,0.0850988006715,0.0849197902494,0.0851332257527,0.0853948563696,0.0854981316131,0.0862761384478,0.0871229954447,0.0877633019546,0.0879698524417,0.0880249325716,0.0888098244224,0.0895740612246,0.0898976569877,0.090317642978,0.0906618937898,0.0908684442769,0.0903038729456,0.0905655035625,0.0907307439522,0.0909992595854,0.0912746602348,0.091309085316,0.0915913709816,0.0919907019233,0.0924864230922,0.0927618237417,0.0930234543586,0.0938496563069,0.0948410986448,0.096073516551,0.0962662970056,0.0979600109995,0.0990616135972,0.100438616844,0.101519564393,0.103075578063,0.104542086521,0.105753849378,0.106800371846,0.108466545775,0.110105179639,0.110917611555,0.112287729786,0.113678503065,0.11509681641,0.116480704673,0.118656369804,0.120887115064,0.123207365535,0.125245330341,0.128109497095,0.130891043654,0.132990973606,0.134712227665,0.13633020648,0.138092770637,0.138423251416,0.137734749792,0.137541969338,0.136509216902,0.134801732876,0.132839503249,0.13117332932,0.129844521186,0.128460632923,0.126064647273,0.124797804286,0.124302083117,0.12292507987,0.122312313425,0.121355296168,0.12089400008,0.120405163927,0.119455031687,0.118890460356,0.118559979576,0.118229498797,0.117300021605,0.116735450274,0.115923018358,0.115633847676,0.115805973082,0.115558112498,0.11557188253,0.11568204279,0.115640732692,0.115654502725,0.115399757124,0.115558112498,0.11599186852,0.116115798813,0.115496147351,0.115805973082,0.11568204279,0.115544342465,0.115764662985,0.11599186852,0.117196746362,0.117265596524,0.116921345712,0.116900690664,0.117981638213,0.117761317693,0.117926558083,0.118367199122,0.118821610193,0.119214056119,0.119021275664,0.120040258067,0.120267463603,0.120680564577,0.121121205616,0.121651351866,0.122450013749,0.123035240129,0.123654891591,0.123434571071,0.12356538638,0.123407031006,0.124274543052,0.124839114383,0.124260773019,0.12504566487,0.124722069107,0.124811574318,0.124907964545,0.12585121177,0.126209232614,0.12680134401,0.127035434562,0.128336702631,0.12888750393,0.128515713053,0.128446862891,0.128219657355,0.128983894157,0.128825538784,0.128949469076,0.129734360927,0.1298927163,0.129768786008,0.130347127372,0.130567447891,0.131400534856,0.131965106187,0.131965106187,0.132674262859,0.133500464807,0.132894583379,0.133300799337,0.133583085002,0.133452269694,0.134856813006,0.135717440035,0.136509216902,0.136701997357,0.136426596708,0.137101328299,0.137941300279,0.137948185296,0.138051460539,0.138519641643,0.138037690507,0.1376108195,0.136929202893,0.137342303867,0.137204603542,0.136543641984,0.136474791821,0.136357746545,0.136268241334,0.136522986935,0.136881007779,0.137376728948,0.137982610377,0.138739962163,0.139008477796,0.139442233819,0.138822582358,0.139249453364,0.139511083981,0.138712422098,0.137927530247,0.138437021448,0.138450791481,0.136867237747,0.136887892795,0.136529871951,0.136681342308,0.136991168039,0.136061690847,0.136433481724,0.136640032211,0.135868910392,0.13649544687,0.136591837097,0.136688227325,0.137177063477,0.136984283023,0.136536756967,0.136798387584,0.136598722113,0.136571182049,0.136343976513,0.13504959346,0.135400729288,0.134891238087,0.13356931497,0.133108018882,0.13234378208,0.132268046901,0.131854945927,0.13153823518,0.131462500002,0.131132019222,0.130388437469,0.130415977534,0.130829078508,0.131097594141,0.130966778833,0.130443517599,0.130064841706,0.129507155391,0.12855702315,0.128116382111,0.12755181078,0.127097399708,0.126574138474,0.126298737825,0.126312507858,0.125568926104,0.126684298734,0.126167922517,0.126050877241,0.125899406883,0.125231560309,0.124852884416,0.124859769432,0.123882097126,0.123324410811,0.123420801039,0.121720202028,0.121382836233,0.121203825811,0.120997275324,0.121382836233,0.121375951217,0.120811379885,0.120921540145,0.120412048944,0.120081568164,0.120102223213,0.119923212791,0.119097010843,0.118876690323,0.117768202709,0.117540997173,0.116845610534,0.11721740141,0.116611519982,0.115730237903,0.115757777968,0.116019408585,0.116604634965,0.115867938228,0.115984983504,0.115158781556,0.114828300777,0.113788663325,0.114119144104,0.114167339218,0.113072621637,0.112046754217,0.111695618389,0.11189528386,0.111681848357,0.111413332724,0.111110392009,0.110573360743,0.110036329477,0.109919284201,0.109485528178,0.109258322642,0.108507855872,0.107330518096,0.106586936343,0.106063675109,0.105444023648,0.105478448729,0.105106657852,0.104528316488,0.104727981959,0.104597166651,0.10439750118,0.104783062089,0.104666016813,0.104569626586,0.104989612576,0.104714211927,0.104858797268,0.104170295644,0.103598839296,0.103378518777,0.103454253955,0.102848372527,0.102731327251,0.102008400546,0.101788080026,0.101113348435,0.100535007072,0.100700247461,0.100087481016,0.100087481016,0.0997501152207,0.0993645543116,0.0988826031751,0.0995435647337,0.0993576692953,0.0998602754805,0.0993989793927,0.0987242478016,0.0987655578991,0.0985039272821,0.0979324709346,0.0975882201228,0.0972715093759,0.0966518579147,0.0954538650898,0.0939529315504,0.0932368898619,0.0925828133195,0.0919011967122,0.0902832178969,0.0891816152992,0.0882590231236,0.0878596921819,0.0866754693894,0.0863105635289,0.0860351628795,0.0857184521327,0.0854017413858,0.0848715951357,0.0846512746162,0.0844516091453,0.0847132397623,0.084499804259,0.0844171840642,0.083797532603,0.0838939228303,0.0832811563853,0.0830746058982,0.0826201948267,0.0826339648592,0.0828611703949,0.08283363033,0.0823516791935,0.0819454632356,0.0822002088363,0.0815736723589,0.0814703971153,0.0812707316445,0.0816218674725,0.0810986062386,0.0807681254593,0.0798455332838,0.0797835681376,0.0798661883325,0.0796389827967,0.0793085020174,0.0791914567414,0.0796596378454,0.0791983417576,0.0793291570661,0.0786337704263,0.0785098401341,0.078420334923,0.0779108437216,0.0778282235267,0.077924613754,0.0776492131046,0.0770364466596,0.0769262863999,0.0766508857505,0.0767885860752,0.0763892551335,0.0764512202796,0.0759554991107,0.0752325724059,0.0749089766429,0.0748814365779,0.0742617851167,0.0742273600355,0.0743168652466,0.0740896597108,0.0744476805551,0.0738349141101,0.0741309698082,0.0742273600355,0.0739726144348,0.0735801685094,0.0740552346296,0.0735457434282,0.0728503567884,0.0725405310578,0.071989729759,0.0714113883952,0.0710533675509,0.0709914024048,0.0712392629893,0.0713012281354,0.0705232213008,0.0707641968691,0.0710946776484,0.0714113883952,0.0717900642882,0.0721412001162,0.0723546356195,0.0724166007656,0.0718107193369,0.0717625242232,0.0721274300837,0.0713563082653,0.0709018971938,0.070674691658,0.0702891307488,0.070178970489,0.06973832945,0.0693527685408,0.0697176744012,0.0700688102293,0.0697589844987,0.0697245594175,0.0697452144662,0.0694835838492,0.0693045734271,0.0688845874367,0.0689396675666,0.0689740926478,0.0682511659431,0.0673836538974,0.0672941486863,0.0675075841896,0.0670187480369,0.0668190825661,0.0666813822414,0.0662820512997,0.066378441527,0.0661512359912,0.0669017027609,0.067459389076,0.0674525040597,0.0671633333779,0.0673836538974,0.067548894287,0.0675282392383,0.067576434352,0.0672046434753,0.0671633333779,0.0667226923388,0.0664128666082,0.0663440164458,0.0662545112348,0.0666194170952,0.0661030408776,0.0658551802931,0.0659309154717,0.0657037099359,0.0656830548872,0.0655178144976,0.0649738982149,0.0650152083124,0.0651460236208,0.0648568529389,0.064712267598,0.0650152083124,0.0652217587994,0.0653043789943,0.0651735636858,0.0654627343677,0.0659171454392,0.0652286438157,0.0654902744326,0.0654076542378,0.0657450200333,0.0654833894164,0.0654283092865,0.065325034043,0.0651597936533,0.0646571874681,0.0641476962667,0.0649325881175,0.0644644070135,0.0645057171109,0.0646503024519,0.0650565184098,0.0647466926792,0.0644093268836,0.0645401421921,0.0648499679227,0.0651873337183,0.0647053825818,0.0649738982149,0.0649394731338,0.0642853965914,0.063658860114,0.0638241005036,0.0642372014777,0.0638791806335,0.0637345952925,0.06377590539,0.0640926161368,0.0636795151627,0.0638034454549,0.064450636981,0.0647880027766,0.0649670131987,0.0649257031013,0.0653663441404,0.0655453545625,0.0648568529389,0.0645401421921,0.0650083232961,0.0649394731338,0.0645126021272,0.0638516405686,0.0633559193996,0.0632251040911,0.0630254386203,0.0627569229871,0.0631700239612,0.0631355988801,0.0628808532793,0.0629221633768,0.0626467627273,0.0630529786852,0.0632526441561,0.0632457591398,0.0631287138638,0.0628601982306,0.0629978985553,0.0629910135391,0.062901508328,0.0627293829222,0.0630323236365,0.0631011737989,0.0626811878085,0.0627913480683,0.0627982330845,0.0627706930196,0.0628326581657,0.0630323236365,0.0632664141885,0.0631906790099,0.0628533132144,0.0627362679384,0.0630254386203,0.0629152783605,0.0627018428572,0.0628326581657,0.0626329926949,0.0626398777111,0.0631149438313,0.0628739682631,0.0630667487177,0.0630392086528,0.0631700239612,0.0631011737989,0.0633628044158,0.0634454246107,0.0630323236365,0.0629497034417,0.0621028464447,0.062199236672,0.0625503725,0.0627775780358,0.0629978985553,0.0633008392697,0.0635900099516,0.0633146093022,0.0642372014777,0.0639411457796,0.0642991666239,0.0642578565265,0.063658860114,0.0634798496918,0.0631355988801,0.0634247695619,0.0633214943184,0.0636726301464,0.0630185536041,0.0633077242859,0.0632388741236,0.0632526441561,0.063397229497,0.0630736337339,0.0632319891074,0.0628533132144,0.0624815223377,0.0626605327598,0.0630667487177,0.0630116685878,0.0628257731495,0.0630805187502,0.0630874037664,0.0635349298217,0.0639480307959,0.0639549158121,0.0641683513154,0.0639480307959,0.0635693549029,0.0639067206984,0.0639686858446,0.0639549158121,0.0641821213479,0.0642991666239,0.0643060516401,0.064244086494,0.0639618008283,0.0639686858446,0.064244086494,0.0645883373058,0.0646571874681,0.0645883373058,0.0648981630364,0.0649050480526,0.0645057171109,0.0646021073382,0.0651529086371,0.0649738982149,0.065180448702,0.0647053825818,0.0644644070135,0.058137077093,0.0514310712796,0.044952271002,0.0386180560652,0.0)
ycorr <- c(9.46532044617e-05,9.45163880844e-05,9.41072673555e-05,9.34281570221e-05,9.24627507922e-05,9.12024124166e-05,8.96425916192e-05,8.80022287316e-05,8.6273114061e-05,8.44529440592e-05,8.25394923011e-05,8.05383080807e-05,7.84509261683e-05,7.62764609353e-05,7.40339968102e-05,7.17600056085e-05,6.94761857983e-05,6.72134681025e-05,6.4998591453e-05,6.28611656124e-05,6.08163283236e-05,5.88713383299e-05,5.7034709756e-05,5.53248670412e-05,5.37456605961e-05,5.22755540251e-05,5.08983123828e-05,4.96023983865e-05,4.83716540159e-05,4.71843778388e-05,4.60262301729e-05,4.4895541243e-05,4.37857402962e-05,4.26883020558e-05,4.15869202045e-05,4.04875494481e-05,3.93968831837e-05,3.8312766529e-05,3.7232548135e-05,3.61516156489e-05,3.50763270208e-05,3.4001594431e-05,3.29216836706e-05,3.18384665996e-05,3.07536714689e-05,2.96706244586e-05,2.85796592557e-05,2.74747576843e-05,2.63559903043e-05,2.52364862076e-05,2.41128940658e-05,2.2986648863e-05,2.18615954336e-05,2.07352456083e-05,1.96045918176e-05,1.84582060547e-05,1.73035895163e-05,1.61479197515e-05,1.49974651071e-05,1.38401743316e-05,1.26741639322e-05,1.15040232647e-05,1.03224843994e-05,9.13118059405e-06,7.93080762411e-06,6.72955572276e-06,5.52782430129e-06,4.32112797291e-06,3.10653720272e-06,1.88120701865e-06,6.52723726465e-07,-5.92691691197e-07,-1.85682731774e-06,-3.14138892289e-06,-4.44091649046e-06,-5.75650006309e-06,-7.09162900192e-06,-8.44447076903e-06,-9.82340794882e-06,-1.12205337058e-05,-1.26419508635e-05,-1.40777904295e-05,-1.552213822e-05,-1.69713086779e-05,-1.84254571943e-05,-1.9888841231e-05,-2.13621620293e-05,-2.28463262292e-05,-2.43405605802e-05,-2.58401557631e-05,-2.7345586372e-05,-2.88485030345e-05,-3.03486423e-05,-3.18497802696e-05,-3.3350820099e-05,-3.48508215164e-05,-3.63592828982e-05,-3.78676862762e-05,-3.93748731992e-05,-4.08800020695e-05,-4.23829274263e-05,-4.38937376656e-05,-4.54162319948e-05,-4.69570135333e-05,-4.85180747276e-05,-5.01045160717e-05,-5.17017596747e-05,-5.33101824985e-05,-5.49401645807e-05,-5.65945819988e-05,-5.82795526695e-05,-6.00006093741e-05,-6.17563216416e-05,-6.35403262198e-05,-6.53456511079e-05,-6.71649115724e-05,-6.9001121259e-05,-7.08612486876e-05,-7.27380204733e-05,-7.46257372773e-05,-7.65172980439e-05,-7.83947342871e-05,-8.02508415477e-05,-8.20897278608e-05,-8.39115970293e-05,-8.57247377249e-05,-8.75335903641e-05,-8.93278465433e-05,-9.11073996105e-05,-9.28732496658e-05,-9.46272579997e-05,-9.63814684341e-05,-9.81414388659e-05,-9.99179090035e-05,-0.000101705284664,-0.000103506130998,-0.000105307501711,-0.000107112185455,-0.000108925079346,-0.000110740522117,-0.000112554410932,-0.000114372940056,-0.000116193435065,-0.000117999701368,-0.000119794086623,-0.000121576338178,-0.000123348264153,-0.000125123290468,-0.000126882659347,-0.000128637258276,-0.000130400297395,-0.000132169187191,-0.000133943171278,-0.000135717102277,-0.000137501634227,-0.000139288406064,-0.000141074058318,-0.000142856099263,-0.000144641141523,-0.000146437711118,-0.000148231473794,-0.000150013409454,-0.00015177870827,-0.000153529820998,-0.00015526743625,-0.000156986515349,-0.00015868842985,-0.000160374734055,-0.000162046897138,-0.000163694216928,-0.000165319404982,-0.000166931045508,-0.000168531697445,-0.000170127515754,-0.000171714478098,-0.000173297784734,-0.000174888263613,-0.000176481481602,-0.00017807462272,-0.000179662316555,-0.000181244916264,-0.000182813233411,-0.000184363927453,-0.000185897758655,-0.000187416197351,-0.000188915286835,-0.000190393084652,-0.000191849489295,-0.000193283714515,-0.000194713666782,-0.00019613534892,-0.000197552891979,-0.000198974935346,-0.000200394464404,-0.000201813779645,-0.000203236850104,-0.00020465591818,-0.000206067414469,-0.000207474729839,-0.000208867966213,-0.000210236973203,-0.000211594527593,-0.000212937308596,-0.000214268751503,-0.000215594149581,-0.000216907596144,-0.000218211887337,-0.000219509482403,-0.000220799101548,-0.000222081099552,-0.000223369857762,-0.000224653632549,-0.000225932692813,-0.000227202451096,-0.000228464240744,-0.000229717202497,-0.000230971411977,-0.000232217818412,-0.000233458125717,-0.00023469897098,-0.000235937180314,-0.00023717865136,-0.000238423511626,-0.000239672943695,-0.000240924557476,-0.000242172752916,-0.000243411153731,-0.0002446459227,-0.00024588240551,-0.000247115337221,-0.000248338646542,-0.000249550314763,-0.000250747834487,-0.000251938462109,-0.000253114589997,-0.000254287513606,-0.000255456247605,-0.000256624705284,-0.000257785333397,-0.000258937883076,-0.000260092345375,-0.000261251079364,-0.000262409742485,-0.000263564572767,-0.000264718689512,-0.000265869501807,-0.000267021434646,-0.000268174504405,-0.000269328983216,-0.000270486079308,-0.000271647792014,-0.000272809090208,-0.000273975002967,-0.000275149357612,-0.000276329863289,-0.000277521404239,-0.000278724564122,-0.000279937932762,-0.000281156499024,-0.000282381666107,-0.000283607933023,-0.000284836855169,-0.000286065785595,-0.000287291626669,-0.000288511202888,-0.000289725977199,-0.000290924284688,-0.000292107670904,-0.000293280107753,-0.000294441681253,-0.000295599641486,-0.000296753437053,-0.000297894711612,-0.000299026959741,-0.000300157883461,-0.000301288334122,-0.000302424762575,-0.000303568352062,-0.000304714452565,-0.000305857331737,-0.000306998257786,-0.000308127180043,-0.00030925027891,-0.000310369610886,-0.000311482935982,-0.000312574699722,-0.000313640642383,-0.000314674376724,-0.000315679918304,-0.000316660709024,-0.00031760310829,-0.000318511078959,-0.000319385782863,-0.000320225795327,-0.000321028798216,-0.000321804288347,-0.000322561840108,-0.000323306891581,-0.000324036427371,-0.000324748639622,-0.000325449677549,-0.000326148849422,-0.000326853041063,-0.00032756489424,-0.0003282817622,-0.000329001441127,-0.000329722811642,-0.00033043971041,-0.000331157321653,-0.000331878259276,-0.000332608474224,-0.000333351747248,-0.000334110150453,-0.000334876860809,-0.00033565430039,-0.000336447748008,-0.000337256656971,-0.000338077304096,-0.000338913531402,-0.000339767748958,-0.000340633863821,-0.000341508256236,-0.000342375062184,-0.000343235159336,-0.000344091371593,-0.00034494160319,-0.000345776807914,-0.000346606822016,-0.000347437058628,-0.000348261665019,-0.000349081581225,-0.000349894674398,-0.000350704417626,-0.000351523815741,-0.000352345942941,-0.000353169881185,-0.000354001936092,-0.000354844446847,-0.00035569098931,-0.000356538080378,-0.000357387398775,-0.00035823546425,-0.000359087756354,-0.000359938942609,-0.000360780199651,-0.000361614555832,-0.000362441995385,-0.000363258143674,-0.000364058499044,-0.000364850546776,-0.000365636944354,-0.00036642122355,-0.000367205860082,-0.000367987998632,-0.00036877328358,-0.000369565754172,-0.000370364582446,-0.000371165922661,-0.000371975872857,-0.000372792499116,-0.000373606300974,-0.000374412216862,-0.000375205719598,-0.000375978475734,-0.000376738302674,-0.000377484909548,-0.000378221982769,-0.000378955529743,-0.000379679482261,-0.000380390686931,-0.000381097894598,-0.00038180732976,-0.000382519825226,-0.00038323883864,-0.000383965118807,-0.000384690611759,-0.000385406124775,-0.000386107599038,-0.00038679516522,-0.000387472202417,-0.000388134389984,-0.000388781577397,-0.000389412934343,-0.000390032312953,-0.000390641606981,-0.00039124396464,-0.000391847540491,-0.000392460395263,-0.000393080254399,-0.000393703364009,-0.000394332902267,-0.000394964704063,-0.000395597499856,-0.00039622790495,-0.000396850862545,-0.000397467065917,-0.0003980707996,-0.000398656017178,-0.000399224014542,-0.000399779770919,-0.000400320301428,-0.000400848256568,-0.000401368029671,-0.000401875847091,-0.000402379114794,-0.000402875730475,-0.00040337247644,-0.000403875478066,-0.000404384626393,-0.000404894070636,-0.0004054033307,-0.000405919358705,-0.000406435622046,-0.000406952904864,-0.000407469836042,-0.000407980218463,-0.000408481843885,-0.0004089629246,-0.000409422215175,-0.000409862919627,-0.000410290572637,-0.000410694264465,-0.000411074047829,-0.000411435492221,-0.000411775651318,-0.000412100100673,-0.000412408758772,-0.000412704335031,-0.000412992768105,-0.000413274752729,-0.000413547927313,-0.000413809404499,-0.000414069092459,-0.000414325238378,-0.000414577153795,-0.000414828711299,-0.000415081079356,-0.000415337271137,-0.000415591226055,-0.000415842066933,-0.000416085534413,-0.000416324902297,-0.000416556350204,-0.000416779740133,-0.00041699218937,-0.000417190952983,-0.000417369771928,-0.000417522855732,-0.000417660844398,-0.000417785187904,-0.000417896766333,-0.000417996182422,-0.000418084902388,-0.000418157669166,-0.000418208396177,-0.00041823991025,-0.00041825815939,-0.000418266414848,-0.000418256667615,-0.000418218822705,-0.000418152803259,-0.000418052181924,-0.000417914324701,-0.00041774284259,-0.000417550156092,-0.000417335308397,-0.000417095850263,-0.00041683140722,-0.000416544253703,-0.000416241928787,-0.000415925994951,-0.000415607698534,-0.000415289992546,-0.00041497373537,-0.000414648717815,-0.000414312263135,-0.000413968387614,-0.000413609137452,-0.000413231559086,-0.000412838098728,-0.000412430753154,-0.000412002996907,-0.000411547019381,-0.000411063220264,-0.000410555986441,-0.000410030746165,-0.000409484286188,-0.000408923826095,-0.000408356855468,-0.000407780173742,-0.000407191977944,-0.000406590178009,-0.000405978386549,-0.000405357784303,-0.000404727226526,-0.000404081115826,-0.000403415588955,-0.000402734425804,-0.000402032206344,-0.000401309458566,-0.000400566231324,-0.00039980259875,-0.000399021986462,-0.000398216814371,-0.00039738820775,-0.000396538400023,-0.000395670858622,-0.000394784384662,-0.000393876276004,-0.000392944112571,-0.000391983860222,-0.000390994244367,-0.000389972468672,-0.000388921681912,-0.000387848703149,-0.000386748794961,-0.000385620394651,-0.000384464574949,-0.000383281817757,-0.000382077500584,-0.000380849688784,-0.000379601579357,-0.000378335938378,-0.000377051368962,-0.000375742208101,-0.000374411476814,-0.000373063027137,-0.000371687801414,-0.000370285547601,-0.000368848842944,-0.000367373654681,-0.000365869483244,-0.000364339537039,-0.000362788116819,-0.000361214827333,-0.00035961899398,-0.000357989299349,-0.000356336208928,-0.00035466006012,-0.000352964258193,-0.00035125759263,-0.000349528554258,-0.000347767294475,-0.00034596701959,-0.000344128377963,-0.000342251803299,-0.000340345821252,-0.000338409906266,-0.000336439689958,-0.000334441033573,-0.000332407252803,-0.000330341141764,-0.000328249010708,-0.000326136974824,-0.000324007231075,-0.000321854056908,-0.000319679936328,-0.000317480759957,-0.000315261671539,-0.000313014818375,-0.000310746805231,-0.00030846035583,-0.00030615516204,-0.000303834856185,-0.00030149446553,-0.000299136160559,-0.000296758168532,-0.000294355522554,-0.000291931635294,-0.000289488415471,-0.000287028509158,-0.000284546828189,-0.000282044908212,-0.000279521999549,-0.000276974765403,-0.000274404430703,-0.0002718109329,-0.000269199407067,-0.000266574541549,-0.000263929696134,-0.000261264347175,-0.000258582762022,-0.000255883470394,-0.000253160520086,-0.000250413499885,-0.00024764870323,-0.000244862796741,-0.000242057856449,-0.000239224650415,-0.000236360786018,-0.000233409447543,-0.000230306450236,-0.000226993976203,-0.000223431071521,-0.000219299131664,-0.000215744711905,-0.000212430487717,-0.000209311448886,-0.000206328244351,-0.000203421443431,-0.000200530486216,-0.000197708728017,-0.000195019381465,-0.000192509194782,-0.000190219472206,-0.000188469415224,-0.000186101365821,-0.000183448803388,-0.00018055699074,-0.00017748235415,-0.000174282659837,-0.000171017498283,-0.00016768649297,-0.000164284656753,-0.00016081942389,-0.000157285300313,-0.000153679233826,-0.000150006381928,-0.000146264778805,-0.000142451511845,-0.000138565667091,-0.000134615625023,-0.000130606597461,-0.000126541846178,-0.00012242133138,-0.000118249679852,-0.0001140309055,-0.000109769971844,-0.000105473441475,-0.000101141914806,-9.67835469849e-05,-9.23959236399e-05,-8.79764327809e-05,-8.35291457885e-05,-7.90583665343e-05,-7.45735694386e-05,-7.00772855939e-05,-6.5575244184e-05,-6.10693144812e-05,-5.65670850195e-05,-5.20792054342e-05,-4.76129956863e-05,-4.31821602703e-05,-3.87962125968e-05,-3.44572352689e-05,-3.01710140431e-05,-2.59413281513e-05,-2.17756592419e-05,-1.76813359026e-05,-1.36697985488e-05,-9.7397364841e-06,-5.88763147258e-06,-2.10741125355e-06,1.6030925195e-06,5.25094177754e-06,8.84103496293e-06,1.23782737e-05,1.58725684425e-05,1.93433894203e-05,2.28005525599e-05,2.62596105728e-05,2.9726036833e-05,3.31977069009e-05,3.66850892306e-05,4.01945355842e-05,4.372680795e-05,4.72884041588e-05,5.08814105453e-05,5.4501144717e-05,5.81503558621e-05,6.18264396218e-05,6.552947709e-05,6.92689404001e-05,7.3051054893e-05,7.68669054666e-05,8.07215135882e-05,8.461893344e-05,8.85583031227e-05,9.25394879745e-05,9.65612750586e-05,0.000100625873776,0.000104731399265,0.000108879126898,0.000113070798084,0.000117306197318,0.000121588886852,0.000125912343573,0.000130272302342,0.000134670133006,0.000139109324811,0.000143587988005,0.000148105171845,0.000152661295164,0.000157243742749,0.00016184678764,0.00016647216833,0.000171114807058,0.000175776392267,0.000180455630737,0.000185152833807,0.000189867625434,0.000194607493572,0.000199366804969,0.000204147016454,0.000208953357708,0.000213776673659,0.000218615028458,0.000223473049917,0.000228352335945,0.000233250347823,0.000238162880366,0.000243073179623,0.000247979426681,0.000252878114792,0.000257771714334,0.000262665584644,0.000267567928672,0.000272473865525,0.000277380215032,0.000282285380105,0.000287191396179,0.000292106123414,0.000297036719395,0.00030198270573,0.000306945928004,0.000311925113801,0.000316912964915,0.000321905118782,0.000326901737979,0.000331900639896,0.000336900917713,0.000341904936864,0.00034690471935,0.000351905444485,0.000356902272211,0.000361893375425,0.000366873280075,0.000371845986406,0.000376816499872,0.0003817885407,0.000386762231409,0.000391732689643,0.000396691204285,0.000401636801318,0.000406565860198,0.000411476906774,0.000416371785501,0.000421256340113,0.000426119411322,0.000430956310436,0.000435759847211,0.000440525336929,0.000445257463306,0.000449957517776,0.000454621739029,0.000459250977836,0.000463843438946,0.000468394495052,0.000472902962831,0.00047737313198,0.000481805254232,0.000486208209244,0.000490579068177,0.000494913526857,0.000499215366705,0.000503487364473,0.000507731107041,0.000511946485134,0.000516132994285,0.000520289912507,0.000524415408825,0.000528501256024,0.000532548275076,0.000536562353039,0.000540545069353,0.000544490468051,0.000548397325352,0.000552260039379,0.000556077324324,0.0005598444288,0.000563562987376,0.000567235869926,0.000570873066989,0.000574465797812,0.000578014206026,0.000581513068132,0.000584963330953,0.000588367789644,0.000591730533357,0.000595055349012,0.00059834765657,0.000601604211535,0.000604821021258,0.000607991099028,0.00061111866715,0.000614206513593,0.000617262582357,0.000620290926745,0.000623288286672,0.000626252593842,0.000629177266161,0.000632062776152,0.000634907589909,0.000637721758245,0.000640502482691,0.000643245396125,0.000645947439734,0.000648602065056,0.000651207368754,0.00065376178715,0.000656267384278,0.000658733895336,0.000661161685575,0.000663547314377,0.000665887071579,0.000668194492534,0.000670471823192,0.000672721995206,0.000674949592627,0.000677157718205,0.00067934985921,0.00068152119508,0.000683670800889,0.000685798811274,0.000687911864487,0.000690003084294,0.000692064486498,0.000694093060921,0.000696081515992,0.000698030201258,0.000699935541699,0.000701797295819,0.000703617098824,0.000705394149105,0.00070712581046,0.000708807954349,0.000710445866522,0.000712038403861,0.000713591751136,0.000715111121043,0.000716588910133,0.00071802306587,0.000719409033206,0.000720747527176,0.000722033068438,0.000723267535123,0.000724449436013,0.000725581968067,0.000726665289932,0.000727696036357,0.000728673616363,0.000729607278829,0.00073049998893,0.00073135265999,0.000732167347365,0.000732946798522,0.000733686060039,0.000734385288903,0.000735041511122,0.000735653062452,0.000736222061335,0.000736746242863,0.000737220900795,0.000737646456329,0.000738024538902,0.00073835361936,0.000738637289548,0.000738879114737,0.000739078077591,0.000739233394917,0.00073934403741,0.000739405819739,0.000739420478313,0.000739386653858,0.000739303753979,0.000739172791092,0.000738991655548,0.000738756955939,0.000738472213265,0.00073813665209,0.000737755174019,0.000737332529555,0.000736868231766,0.00073636468422,0.000735825990813,0.000735249010204,0.000734634542235,0.000733982079487,0.000733291438287,0.000732561404901,0.000731794769943,0.000730984180514,0.000730123093213,0.000729216469911,0.000728252893646,0.000727229372811,0.000726148416148,0.000725011413852,0.000723815056776,0.000722558104748,0.00072123150414,0.000719835210959,0.000718370711252,0.000716835419936,0.000715228184975,0.000713556504635,0.00071181989473,0.000710008059652,0.000708120917562,0.000706157957724,0.000704123673141,0.000702020168409,0.000699847789697,0.000697608576634,0.0006953047721,0.000692933915217,0.000690494675541,0.000687987391207,0.000685417971435,0.000682785137991,0.00068009636968,0.000677346826597,0.000674543541411,0.000671681247711,0.000668762595162,0.000665790678129,0.000662766413627,0.000659698660917,0.000656598771691,0.000653473291014,0.000650321913922,0.000647150478955,0.000643961150845,0.000640755969406,0.000637546788241,0.00063433278545,0.000631116223755,0.000627900379442,0.000624672479894,0.000621428670939,0.000618168277266,0.000614889045908,0.000611592182296,0.000608281871365,0.000604955539504,0.000601607672681,0.0005982338523,0.000594831996889,0.000591405580294,0.000587954419576,0.00058447645882,0.000580970703777,0.000577436442348,0.000573868084696,0.0005702556594,0.000566599510835,0.000562905316671,0.000559177977931,0.000555420493502,0.000551631897978,0.00054781842671,0.000543977450111,0.000540110566102,0.000536216005424,0.000532302602595,0.000528378655399,0.000524440973434,0.000520483733946,0.000516501792089,0.000512491650357,0.000508446050279,0.000504368641955,0.000500260270787,0.000496125019003,0.000491963521628,0.000487766252307,0.000483534495153,0.000479274086555,0.000474986309622,0.000470675944077,0.000466349877204,0.000462010241431,0.000457659755333,0.000453288579257,0.00044888815689,0.000444466465829,0.000440024938831,0.000435562281852,0.000431075272731,0.00042656584116,0.000422024457179,0.000417450905278,0.000412842014608,0.000408200202514,0.000403539097289,0.000398859472817,0.000394152739937,0.000389417699012,0.000384656240757,0.000379869942083,0.000375065535766,0.000370246053261,0.000365404164298,0.000360549282629,0.00035567499548,0.000350778599212,0.00034587076728,0.00034095623137,0.000336035939668,0.000331109029252,0.000326172369626,0.000321222237268,0.000316268798621,0.000311313761888,0.000306356920289,0.000301397098311,0.000296434387558,0.00029146030644,0.000286476855037,0.000281484721251,0.000276486879058,0.000271484739785,0.000266480185329,0.000261465721515,0.000256446851031,0.000251419895556,0.000246385298186,0.000241346854411,0.000236303078595,0.000231256399591,0.000226203625606,0.000221141272533,0.000216075020549,0.000211006643482,0.000205935282549,0.000200863127306,0.000195795192018,0.000190731353082,0.000185670419274,0.000180611211886,0.000175558509873,0.000170519396945,0.000165483545093,0.00016045127566,0.000155417583618,0.000150388831836,0.000145356133582,0.000140316358355,0.000135272223453,0.000130226228798,0.000125182192567,0.000120136933995,0.000115096211133,0.00011006684791,0.000105041110934,0.000100021080029,9.50118161217e-05,9.00196420233e-05,8.50437721663e-05,8.00833206506e-05,7.51337861425e-05,7.01984674446e-05,6.52707687758e-05,6.03451975727e-05,5.54327437203e-05,5.05362800516e-05,4.56527991556e-05,4.0782230067e-05,3.59257291981e-05,3.10856208592e-05,2.62641924665e-05,2.14561913884e-05,1.66634943239e-05,1.18919986327e-05,7.13824164745e-06,2.39988280158e-06,-2.32293816594e-06,-7.02752318895e-06,-1.17159570014e-05,-1.63878273192e-05,-2.10455637632e-05,-2.56913923757e-05,-3.03139981175e-05,-3.49161211767e-05,-3.949985426e-05,-4.40663172989e-05,-4.86201257037e-05,-5.31597199814e-05,-5.76907666776e-05,-6.22106981946e-05,-6.67188353271e-05,-7.12083974292e-05,-7.56836478539e-05,-8.01489325414e-05,-8.46039063421e-05,-8.90491513032e-05,-9.34749353727e-05,-9.78752070105e-05,-0.000102243249938,-0.000106581364393,-0.000110894313119,-0.000115180002921,-0.000119439921847,-0.000123672502825,-0.000127875574429,-0.000132042887221,-0.000136176003259,-0.00014029076184,-0.000144394720023,-0.000148489355653,-0.000152568337176,-0.000156629372453,-0.00016067902934,-0.000164714848268,-0.000168729233646,-0.00017273307339,-0.000176730190443,-0.000180712860265,-0.000184667503084,-0.000188591113308,-0.000192480939189,-0.000196341377511,-0.000200174778233,-0.000203975506335,-0.000207750153674,-0.000211497671468,-0.000215208358759,-0.000218884665535,-0.00022252935185,-0.00022614659491,-0.000229738156116,-0.000233305926561,-0.000236840171955,-0.000240339290033,-0.000243806246959,-0.000247235730473,-0.000250631160315,-0.000253994495587,-0.000257323168825,-0.000260619297852,-0.000263882802425,-0.000267110274106,-0.000270312886233,-0.000273497288252,-0.000276657745353,-0.000279791418411,-0.000282894731538,-0.000285963219225,-0.000288996225642,-0.000291995254141,-0.000294957666849,-0.00029788608646,-0.000300771708588,-0.000303606978891,-0.000306388775108,-0.000309125641277,-0.000311823796994,-0.000314489181777,-0.000317124274316,-0.000319725686481,-0.000322295007549,-0.000324830364127,-0.000327325626524,-0.000329791659196,-0.000332234916755,-0.000334652856539,-0.000337042266211,-0.000339399125483,-0.000341722394945,-0.000344012523834,-0.000346275726632,-0.000348509652268,-0.000350729489877,-0.000352934160545,-0.000355121241024,-0.00035728083889,-0.000359419242285,-0.000361538557689,-0.000363644893501,-0.000365733724564,-0.000367804000131,-0.000369849246417,-0.000371866123539,-0.000373845070819,-0.000375787800985,-0.000377697764552,-0.000379577925683,-0.000381424542047,-0.000383229861785,-0.000384992454633,-0.000386722481964,-0.000388423163808,-0.000390095526076,-0.000391745655511,-0.000393368900874,-0.000394833436609,-0.000396003878514,-0.000396878710508,-0.000397459524303,-0.00039775215746)
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(272)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Bos_taurus-male-liver-H3K4me3-ERR572137.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) : 272',bty='n')
dev.off()