# R script for Peak Model
#  -- generated by MACS
p <- c(0.0409365654729,0.0480847732428,0.0545038955196,0.061116383949,0.0679254084678,0.0681441341157,0.0683089708359,0.0680934151249,0.0677954410538,0.0677161926306,0.0681948531065,0.0677193625675,0.0678683496031,0.0680268464494,0.0682011929804,0.0679507679632,0.0680109967648,0.0678620097292,0.0677986109907,0.0681663236742,0.0675957350274,0.0673294603255,0.0675798853427,0.0676654736398,0.0673484799471,0.0676718135136,0.0675925650905,0.0675450160366,0.067567205595,0.0672311922808,0.0672026628485,0.0674213884964,0.0673770093794,0.0672882511455,0.0672914210824,0.067136094173,0.0669839372005,0.0670441660021,0.0669997868851,0.0670219764436,0.0671234144253,0.0673833492533,0.0672343622177,0.0670853751822,0.0671424340468,0.0671551137946,0.0670156365698,0.0669110286512,0.0668476299127,0.0665813552108,0.0665211264092,0.0661692634103,0.0663753093106,0.0664925969769,0.0666067147062,0.0666289042647,0.0668412900388,0.066876159345,0.0668793292819,0.0671709634792,0.0674213884964,0.0675450160366,0.0676147546489,0.0676908331352,0.0671994929115,0.0669775973267,0.0668824992188,0.0672597217131,0.0674118786856,0.0676464540182,0.0677891011799,0.0680490360079,0.0676052448382,0.0676337742705,0.0680395261971,0.0682582518451,0.0684135787545,0.0681980230435,0.0680300163864,0.0678081208015,0.0675164866042,0.0671519438576,0.0672470419654,0.0670663555606,0.0673041008301,0.067307270767,0.0672882511455,0.0671075647407,0.0672407020916,0.0670663555606,0.0668286102911,0.0668603096604,0.066746191931,0.0664387080491,0.0661280542303,0.0662770412658,0.0663467798782,0.066140733978,0.0660297861855,0.0664704074184,0.0668254403542,0.0669490678943,0.0672090027223,0.0672724014608,0.0676274343966,0.0673167805778,0.0670885451191,0.0674625976765,0.067351649884,0.0670695254975,0.0669237083989,0.0670822052452,0.0671963229746,0.0675545258473,0.0672977609563,0.0673643296317,0.067351649884,0.0671107346776,0.067050505876,0.0672533818393,0.0671677935423,0.067481617298,0.0673548198209,0.0674308983072,0.0674340682441,0.0676432840813,0.0677542318737,0.0683279904575,0.068476977493,0.0682107027912,0.0687178926995,0.0681029249357,0.0683850493222,0.0682233825389,0.0682392322235,0.0681282844311,0.0681885132327,0.0680046568909,0.0680648856925,0.0680934151249,0.0679729575217,0.0683089708359,0.0683533499529,0.0685815854116,0.0683216505836,0.068610114844,0.0686196246547,0.0684072388806,0.068476977493,0.0688193306811,0.069126814563,0.0692028930493,0.0690507360768,0.0690887753199,0.0695103769312,0.069259951914,0.0690285465183,0.0692441022293,0.0697005731468,0.0694945272465,0.0691426642477,0.0692536120401,0.0690348863922,0.0688225006181,0.0687178926995,0.068870049672,0.0693645598325,0.0694184487603,0.0691426642477,0.0694089389495,0.0693265205894,0.0692758015986,0.0693106709048,0.069906619047,0.0702236127397,0.0699858674702,0.0700080570287,0.0699858674702,0.0702141029289,0.0701348545058,0.0704169788922,0.0699858674702,0.0704581880723,0.0701443643165,0.0703535801537,0.0707466523326,0.0704835475677,0.070775181765,0.0709114890528,0.0709590381067,0.0709590381067,0.0715074371951,0.0714408685196,0.0716564242306,0.071510607132,0.0715613261228,0.0721509343912,0.0722428625621,0.0720780258419,0.0723601502284,0.0727183531011,0.0727754119658,0.072895869569,0.0728863597582,0.0727976015243,0.0730004774876,0.0730448566046,0.0731970135771,0.0734537784681,0.0735964256298,0.0733935496665,0.0735710661344,0.0737137132961,0.0739546285026,0.0740116873673,0.0742335829521,0.0744237791677,0.0743730601769,0.074195543709,0.0743381908707,0.0748770801483,0.0751560345978,0.0753430608765,0.0752701523272,0.0756346950738,0.0757931919201,0.0755586165875,0.0755903159568,0.0758185514155,0.0756600545692,0.0751718842825,0.074975348193,0.0753050216334,0.0755903159568,0.0754349890474,0.0754413289212,0.0756442048846,0.0757741722986,0.0757900219832,0.0762147935314,0.0767251533766,0.0770294673216,0.0770262973847,0.0770104477,0.077530317356,0.07761907559,0.0779455790934,0.0781294354352,0.0786239455958,0.0787063639559,0.07891874973,0.0788426712437,0.0788712006761,0.0790138478378,0.0791057760086,0.0790106779008,0.0792452532334,0.0793657108366,0.07960979598,0.0798729007449,0.0800821165821,0.0805354175626,0.0803705808424,0.0804720188241,0.0804054501486,0.0809570191739,0.0809506793,0.0812962024251,0.0811503853264,0.0815719869377,0.0817621831533,0.0816607451717,0.0823739809802,0.0826561053667,0.0829223800685,0.082599046502,0.0828653212038,0.0827004844837,0.0833059424367,0.0830396677348,0.082903360447,0.0830111383025,0.0828526414561,0.0830967265995,0.0832393737612,0.083809962408,0.0836863348679,0.0841206162269,0.0839874788759,0.0840255181191,0.0842854529471,0.0846912048737,0.0849194403324,0.0852364340251,0.0859084606536,0.0858133625458,0.0863459119495,0.0870528078842,0.0871859452351,0.0874617297477,0.0878452921159,0.0881052269439,0.0885458481767,0.0890213387157,0.0888850314279,0.0896331365426,0.0899501302353,0.0901086270816,0.0908662420071,0.0913227129246,0.0917031053558,0.0923941516058,0.0933768320532,0.0936050675119,0.0941851659695,0.0945877479592,0.0953104935785,0.0955292192265,0.0956560167035,0.0961029778102,0.0960902980625,0.096543599043,0.0963946120075,0.0968574227988,0.0971775864284,0.0975231095534,0.09723781523,0.0975135997427,0.0978115738138,0.0983853323975,0.0989210517382,0.0989971302244,0.099276084674,0.0994345815203,0.099491640385,0.0994694508265,0.100011510041,0.10012562777,0.100490170517,0.100655007237,0.100876902822,0.101159027208,0.101672556991,0.102037099737,0.102595008636,0.103070499175,0.103622068201,0.103996120758,0.104417722369,0.104864683476,0.10524190597,0.105682527203,0.105679357266,0.105669847455,0.105682527203,0.105802984806,0.105673017392,0.105717396509,0.105875893356,0.105926612346,0.10645916175,0.105967821526,0.106440142129,0.107134358316,0.107651058035,0.10742916245,0.107736646332,0.108126548574,0.108231156492,0.108278705546,0.108167757754,0.108681287536,0.108389653339,0.108446712203,0.108709816968,0.109413542966,0.109740046469,0.110488151584,0.110630798746,0.110738576601,0.111264786131,0.111305995311,0.111832204841,0.111819525093,0.111762466229,0.112127008975,0.112665898253,0.112865604279,0.113420343241,0.113921193276,0.113984592014,0.114789755994,0.114764396498,0.115334985145,0.116013351648,0.116606129853,0.116881914365,0.117049921023,0.117198908058,0.117620509669,0.117747307147,0.117569790679,0.118000902101,0.118086490398,0.118165738821,0.118168908758,0.118213287875,0.11847639264,0.118695118288,0.11912622971,0.119598550312,0.120410054165,0.120711198173,0.120853845335,0.120831655776,0.121253257388,0.121471983036,0.121503682405,0.121937963764,0.121617800134,0.121969663133,0.121858715341,0.122099630547,0.122422964114,0.12351976229,0.123389794876,0.123630710083,0.124058651568,0.124175939234,0.124759207629,0.12538685514,0.125678489337,0.126071561516,0.126328326407,0.126071561516,0.12648048338,0.126800647009,0.126848196063,0.126959143856,0.126800647009,0.126664339722,0.127412444836,0.127311006855,0.127564601809,0.127631170484,0.127437804332,0.127158849882,0.127421954647,0.127143000198,0.127317346729,0.127085941333,0.126344176092,0.126512182749,0.126252247921,0.126220548552,0.126426594452,0.126721398586,0.12704790209,0.127437804332,0.127431464458,0.127713588844,0.128201759131,0.128499733202,0.128927674687,0.128658230049,0.12859483131,0.128521922761,0.127929144555,0.127849896132,0.12762483061,0.127098621081,0.126451953948,0.126039862147,0.125361495645,0.125225188357,0.124717998449,0.124505612674,0.123811396488,0.123909664532,0.123434173993,0.12356097147,0.123472213236,0.123161559418,0.123361265444,0.123209108471,0.123224958156,0.122793846734,0.122999892634,0.122508552411,0.123171069228,0.122565611275,0.122724108122,0.122289826763,0.121998192565,0.121700218494,0.121028191866,0.120828485839,0.120080380725,0.11962073987,0.119018451854,0.118739497405,0.118232307496,0.118035771407,0.117810705885,0.117763156831,0.117905803993,0.117798026137,0.118099170145,0.11770292803,0.117119659635,0.116989692221,0.116197207989,0.116064070638,0.11543325319,0.115116259497,0.114843644922,0.114326945202,0.113575670151,0.113518611286,0.11360736952,0.113284035954,0.11312236917,0.112697597622,0.112662728316,0.112399623551,0.111962172255,0.111724426986,0.11132818487,0.111147498465,0.110672007926,0.110662498115,0.110450112341,0.110031680667,0.109489621452,0.108789065391,0.108589359365,0.108782725517,0.108890503373,0.10836746378,0.107803215007,0.10727383554,0.10719141718,0.107245306108,0.107292855162,0.107514750747,0.107064619703,0.106535240236,0.1067381162,0.106646188029,0.106785665254,0.106703246893,0.106690567146,0.106402102885,0.105999520896,0.105749095879,0.105682527203,0.105590599032,0.105181677169,0.10511827843,0.104766415431,0.104918572404,0.104680827134,0.104569879342,0.104560369531,0.104630108143,0.105153147736,0.104883703097,0.10499465089,0.104750565747,0.104525500225,0.103866153344,0.103999290695,0.104503310666,0.104652297702,0.104515990414,0.104287754955,0.104493800855,0.104620598333,0.104981971142,0.105302134772,0.105264095529,0.105032690133,0.104319454325,0.103764715362,0.103520630219,0.1027978846,0.102110008287,0.100826183831,0.0996374574836,0.0990763786476,0.0986642868471,0.0981222276326,0.0975262794904,0.09723781523,0.0966989259525,0.0964770303676,0.0956021277758,0.0957416050006,0.0958588926669,0.0954055916863,0.0946669963824,0.0937382048628,0.0935384988364,0.0926192171277,0.0918933015714,0.0909454904303,0.0906760457915,0.0897218947765,0.0889611099141,0.0887835934462,0.0886377763476,0.0886124168522,0.0880323183946,0.0878928411698,0.0875599977925,0.0875092788016,0.0872049648567,0.0868499319208,0.0866407160837,0.086019408446,0.0854963688531,0.085198394782,0.0846468257567,0.0842093744608,0.0840001586236,0.083809962408,0.0835975766339,0.0839082304528,0.0839114003897,0.0836419557509,0.0838036225342,0.0836261060663,0.0835119883369,0.0835024785261,0.0832013345181,0.0828399617084,0.0828938506362,0.0824183600972,0.0820252879182,0.0817051242886,0.0816227059285,0.081689274604,0.0816734249194,0.0818160720811,0.0813976404067,0.0815814967485,0.0815656470639,0.0814229999021,0.0809348296154,0.0808492413184,0.0806114960489,0.0804308096441,0.0799616589789,0.0797524431417,0.0798824105557,0.0794608089444,0.0785795664788,0.078395710137,0.0784812984341,0.0783576708939,0.0777965920579,0.0773654806358,0.0778441411118,0.0771752844202,0.0767822122413,0.076706133755,0.0770104477,0.0767822122413,0.0765666565303,0.0761735843513,0.0760404470004,0.0755649564614,0.0748327010313,0.0748929298329,0.0752130934625,0.0748422108421,0.0745727662033,0.0743730601769,0.0744015896093,0.0745474067079,0.0744269491047,0.0739673082503,0.0739324389441,0.0740275370519,0.0735552164498,0.0734569484051,0.0734569484051,0.0735488765759,0.0731843338294,0.0725598562548,0.0727754119658,0.07311142528,0.0733333208649,0.0728768499475,0.0727785819027,0.0725408366332,0.0722523723729,0.0718529603201,0.0718371106355,0.0724108692192,0.0718054112662,0.071554986249,0.0710858355838,0.0710953453946,0.0711745938178,0.0712189729347,0.0713140710425,0.0711587441331,0.0710826656469,0.0705818156124,0.0706357045402,0.070689593468,0.0705215868108,0.0703916193968,0.0699319785424,0.0699288086055,0.0700429263349,0.0702141029289,0.0699731877225,0.0699288086055,0.0697164228314,0.0697639718853,0.070036586461,0.0697734816961,0.0700175668395,0.0697671418222,0.0695674357959,0.0696149848498,0.069646684219,0.0695706057328,0.0700270766502,0.070125344695,0.0699668478486,0.0701570440642,0.0701221747581,0.0701126649473,0.0698083510023,0.0694438082557,0.0695230566789,0.0696181547867,0.0694342984449,0.0691807034908,0.0691838734277,0.0688225006181,0.068347010079,0.0685879252855,0.0687495920687,0.0688827294197,0.068565735727,0.068391389196,0.0678810293508,0.0674499179287,0.0671234144253,0.0672914210824,0.0675291663519,0.0670124666328,0.066657433697,0.0663182504459,0.0661026947349,0.0659315181408,0.0664038387429,0.0668603096604,0.0668983489035,0.0669839372005,0.0673326302625,0.0675830552797,0.0678176306123,0.0681092648095,0.0681568138634,0.0682519119712,0.0679475980263,0.0674847872349,0.0674023688748,0.0669015188404,0.066400668806,0.0661534137257,0.0658395899699,0.0656145244481,0.0654940668449,0.0655447858357,0.0656145244481,0.0658649494653,0.0659600475731,0.0664323681752,0.0668603096604,0.0666384140755,0.0668856691558,0.066917368525,0.0671551137946,0.0671963229746,0.066920538462,0.067050505876,0.0670790353083,0.0668381201019,0.0666542637601,0.0669680875159,0.0664387080491,0.0662041327165,0.0660202763748,0.065750831736,0.0658269102222,0.0655955048266,0.0655289361511,0.0655035766557,0.0650217462428,0.0647744911625,0.0652816810708,0.0652341320169,0.065275341197,0.0654243282325,0.065186582963,0.0653514196832,0.0652404718908,0.0650819750444,0.0653450798093,0.065576485205,0.065402138674,0.0656842630605,0.0658554396546,0.0657603415468,0.0662548517073,0.0661280542303,0.0662548517073,0.0662390020227,0.0663404400044,0.0660868450502,0.0659093285823,0.0655733152681,0.0655035766557,0.0655479557727,0.0651929228369,0.0651897528999,0.0652277921431,0.0653640994309,0.0651358639722,0.0654179883587,0.065620864322,0.065747661799,0.0658300801591,0.0661439039149,0.0663911589952,0.0661882830319,0.0658205703484,0.0658174004114,0.0656747532497,0.0659346880777,0.0657635114837,0.0662009627796,0.0662231523381,0.0657413219252,0.065750831736,0.0657857010422,0.0662453418966,0.0663784792475,0.0666542637601,0.0661946229057,0.066356289689,0.0661565836626,0.0662358320858,0.066616224517,0.0663245903197,0.0666796232555,0.0666003748324,0.0667271723094,0.0669871071374,0.067050505876,0.066920538462,0.0670822052452,0.0666257343278,0.066311910572,0.0664355381122,0.0664038387429,0.0662738713289,0.0662738713289,0.0662548517073,0.0662580216443,0.0664070086798,0.0663594596259,0.0668444599757,0.0673231204517,0.0675925650905,0.067440408118,0.0677922711168,0.0674467479918,0.0670092966959,0.0669871071374,0.0672755713978,0.0672882511455,0.0671234144253,0.0669332182097,0.0667652115526,0.0672533818393,0.0665242963461,0.0667557017418,0.0673231204517,0.0677035128829,0.0674911271088,0.0675418460996,0.0676274343966,0.067827140423,0.067915898657,0.0673643296317,0.0678398201707,0.06787151954,0.0678493299815,0.0677986109907,0.0682075328543,0.0679317483416,0.0680331863233,0.0680997549987,0.0684199186284,0.0688637097981,0.0688446901765,0.0690602458876,0.0690031870229,0.0693613898956,0.0692884813463,0.0693804095172,0.0696244946605,0.0698115209392,0.0700175668395,0.0698020111284,0.0698337104977,0.0700112269656,0.0702299526136,0.0699161288578,0.069865409867,0.0702299526136,0.0701538741273,0.069950998164,0.0697322725161,0.0700460962718,0.0706547241618,0.0707244627741,0.0704930573785,0.0706674039095,0.0710953453946,0.071035116593,0.0711682539439,0.0712443324301,0.0713838096549,0.0716595941676,0.0712031232501,0.0712538422409,0.0716025353029,0.0717166530322,0.071421848898,0.0714598881412,0.0713901495288,0.0713616200964,0.0711460643854,0.070901979242,0.0712792017363,0.0712696919256,0.0711682539439,0.0711904435024,0.0713901495288,0.0713521102857,0.0714440384565,0.0716437444829,0.0719575682387,0.0722713919944,0.0725186470747,0.0724710980208,0.0724901176424,0.0726866537318,0.0729592683076,0.0734727980897,0.0736978636115,0.0736249550622,0.0739197591964,0.0741828639613,0.073894399701,0.073894399701,0.0739546285026,0.0736629943053,0.0737676022239,0.0736439746837,0.0732730920633,0.0732921116849,0.0731019154693,0.0730765559738,0.0736566544314,0.0737961316562,0.0739387788179,0.074414269357,0.0740085174303,0.0743952497354,0.0745632563925,0.0748675703375,0.0749182893283,0.0746171453203,0.0745632563925,0.0749151193914,0.074715413365,0.0748960997698,0.0750799561116,0.0749531586345,0.0754476687951,0.075495217849,0.0759358390818,0.0760436169373,0.075840740974,0.0759358390818,0.0760721463697,0.075926329271,0.0758153814786,0.0757836821093,0.0759073096495,0.0758756102802,0.0759675384511,0.0761545647298,0.0762623425853,0.0763384210715,0.0762813622069,0.0763891400624,0.0767568527459,0.0769026698445,0.0767822122413,0.0771055458078,0.0768773103491,0.0768646306014,0.0770009378892,0.0769153495922,0.0773908401312,0.0771340752402,0.0772164936003,0.0772957420234,0.077184794231,0.0768487809168,0.0767536828089,0.076620545458,0.0762528327745,0.0759960678834,0.0755903159568,0.0759675384511,0.0757393029924,0.0759041397126,0.0759865580727,0.0760214273789,0.0762243033422,0.0763479308823,0.0764874081071,0.0769628986461,0.0773432910773,0.0776444350854,0.077704663887,0.0774922781129,0.0779107097872,0.0781199256244,0.0783354813354,0.0785320174249,0.0788775405499,0.0786112658481,0.078655644965,0.0782086838584,0.0783893702632,0.0781991740476,0.0781579648675,0.0783798604524,0.0778599907964,0.0777078338239,0.0777934221209,0.0778599907964,0.0781484550567,0.0780248275166,0.078008977832,0.0778599907964,0.0779170496611,0.0775239774822,0.0779392392196,0.0781135857506,0.0781167556875,0.0782625727861,0.0784020500109,0.078570056668,0.0785383572987,0.0786239455958,0.078224533543,0.0782911022185,0.0784305794432,0.0784274095063,0.0782720825969,0.0778948601026,0.0772830622757,0.0776254154638,0.0778663306703,0.0781991740476,0.07831012184,0.078658814902,0.0787063639559,0.0787127038297,0.0787951221898,0.079089926324,0.079305482035,0.0793530310889,0.0790772465763,0.079004338027,0.0791691747472,0.0789409392884,0.0789758085946,0.0788553509914,0.0788680307391,0.079175514621,0.0788775405499,0.0787982921267,0.0789694687208,0.0790994361348,0.0789092399192,0.0792864624135,0.0788395013068,0.0792515931073,0.079308651972,0.0791216256933,0.0796731947185,0.0796636849078,0.0797778026371,0.0797778026371,0.0801677048791,0.0804117900225,0.0804054501486,0.0803008422301,0.0801169858883,0.0800630969605,0.0799204497988,0.0797587830156,0.0797936523218,0.0797682928263,0.0793435212782,0.0788078019375,0.0791406453148,0.0790804165132,0.0791311355041,0.0788933902345,0.0788109718744,0.0789314294777,0.0790804165132,0.0793847304582,0.0796731947185,0.0795971162323,0.0795590769892,0.0796573450339,0.0797175738355,0.0800472472759,0.0803927704009,0.0805924764273,0.0804656789502,0.080478358698,0.0804212998333,0.0807826726429,0.080865091003,0.0808429014445,0.0810616270925,0.0812169540019,0.0811852546326,0.0808872805615,0.0808492413184,0.0806812346613,0.0806527052289,0.0803135219778,0.0805290776888,0.0804688488872,0.0801962343115,0.0798887504296,0.0797112339617,0.0796731947185,0.0794988481876,0.0793720507105,0.0791628348733,0.0794608089444,0.0791247956302,0.0791850244318,0.0789314294777,0.0787317234513,0.0786651547758,0.0786619848389,0.0790170177747,0.0789916582793,0.0790930962609,0.0788712006761,0.0786746645866,0.0785415272357,0.0787824424421,0.079089926324,0.0790994361348,0.0790994361348,0.0786207756588,0.0785193376772,0.078570056668,0.0786841743974,0.078785612379,0.0783006120292,0.0782403832276,0.0782308734168,0.0779107097872,0.0781421151829,0.0779424091565,0.0780977360659,0.0782594028492,0.0782213636061,0.0779899582104,0.078008977832,0.0780628667597,0.0778282914271,0.0779772784627,0.0777522129409,0.0701950833074,0.0622639011165,0.054186901827,0.0462113405191,0.0)
m <- c(0.0467946785377,0.0548107415751,0.0625100893603,0.0704374721271,0.0783078461485,0.0784598694696,0.0783331833687,0.0782064972677,0.0787385788917,0.0790457926865,0.0787607489594,0.0786245614008,0.0785643855029,0.0785928898756,0.0783965264191,0.0785897227231,0.0786974059089,0.0786689015362,0.0783236819111,0.0779847965911,0.0784376994019,0.0783363505212,0.0789254408906,0.0789539452633,0.0792991648884,0.0792611590581,0.0793054991934,0.0796570531236,0.0793656750914,0.079248490448,0.0790204554663,0.0794891940398,0.0791566430248,0.0792326546854,0.0790711299067,0.0789254408906,0.0789856167885,0.0790172883138,0.0794765254297,0.0793593407863,0.0797298976316,0.0792674933632,0.0794575225146,0.0794670239721,0.0794511882095,0.0792326546854,0.0793340035662,0.0795493699378,0.079308666346,0.0797362319367,0.0797393990892,0.0798154107498,0.0795968772256,0.079448021057,0.0794796925822,0.079647551666,0.079248490448,0.0787354117392,0.0785453825877,0.0783933592666,0.0780798111668,0.0782983446909,0.078317347606,0.0782159987253,0.0780164681163,0.0781653242849,0.0785137110625,0.0788462620775,0.0790331240764,0.0788589306876,0.0788145905523,0.0783553534363,0.0785073767575,0.0786245614008,0.0786720686887,0.078450368012,0.0781368199122,0.0779531250658,0.0780291367264,0.0780988140819,0.0782761746232,0.078643564316,0.0786467314685,0.0785200453676,0.0784883738423,0.0784535351646,0.0786847372988,0.0786467314685,0.0788525963825,0.0788779336027,0.0790172883138,0.0787924204846,0.0781431542172,0.0781526556748,0.0782856760808,0.0786277285534,0.078516878215,0.0789919510936,0.0784662037747,0.0784281979444,0.0782191658778,0.0778897820153,0.0785707198079,0.0787987547896,0.0789254408906,0.0786974059089,0.0786784029937,0.0785137110625,0.0787132416715,0.0787734175695,0.0786308957059,0.0788842679078,0.0784567023171,0.0781431542172,0.0779277878456,0.078111482692,0.0779911308961,0.0777947674396,0.0779816294385,0.0780829783193,0.0780861454718,0.0783331833687,0.0785200453676,0.0787290774341,0.0792928305833,0.0793878451591,0.0795525370903,0.079375176549,0.0791281386521,0.0789982853986,0.0791946488551,0.0791471415673,0.0793435050237,0.0791629773299,0.0786974059089,0.0784218636393,0.0784028607242,0.0785707198079,0.0788304263149,0.0790742970592,0.0791439744147,0.079181980245,0.0789286080431,0.078843094925,0.0787259102816,0.0788335934674,0.0789032708229,0.0788779336027,0.0788367606199,0.0788367606199,0.0788050890947,0.0789127722805,0.0791408072622,0.0794195166843,0.0795430356327,0.0797077275639,0.0796982261064,0.0798407479699,0.0799769355285,0.0796348830559,0.0797077275639,0.07985341658,0.0795303670226,0.0794036809217,0.079448021057,0.0792104846177,0.0791851473975,0.0790837985168,0.0786815701463,0.0786689015362,0.0785675526554,0.0783585205889,0.0783680220464,0.0783933592666,0.0784408665545,0.07817165859,0.0780766440142,0.077706087169,0.0778644447952,0.0780354710314,0.0776554127286,0.0773101931035,0.0773006916459,0.0771518354773,0.0770093136138,0.0772310142904,0.0773355303237,0.0773450317813,0.0772183456803,0.0770156479188,0.0770758238168,0.0770346508339,0.077047319444,0.0766482582261,0.0764772319898,0.076641923921,0.0765215721251,0.076369548804,0.0765057363625,0.0765785808705,0.0764518947696,0.0766134195483,0.0763600473464,0.0769428034108,0.0769998121562,0.0766102523958,0.0767401056492,0.0769396362582,0.076508903515,0.0765405750402,0.0767116012765,0.076635589616,0.0763822174141,0.0760655021617,0.0757329511467,0.0756632737912,0.0749855031511,0.074839814135,0.0752072038278,0.0753465585388,0.0751755323025,0.0751280250147,0.0755682592155,0.0752040366752,0.0753908986741,0.0753940658267,0.0756854438588,0.0758849744678,0.0756822767063,0.0754732446398,0.0753212213186,0.0751343593197,0.0748524827451,0.0750361775915,0.0748904885754,0.0748366469825,0.0747384652543,0.0745230988827,0.0745104302726,0.0744280843069,0.0741557091899,0.0741430405798,0.0742665595282,0.0745389346453,0.0747384652543,0.0748208112199,0.0749443301683,0.0748841542704,0.0747257966442,0.0745452689503,0.0749760016935,0.0744914273574,0.074440752917,0.0742792281383,0.0740195216314,0.0737724837345,0.0734494341771,0.0731232174672,0.0730472058066,0.0728476751976,0.0727178219441,0.0731517218399,0.0730883787894,0.0726734818088,0.0729300211632,0.0729426897733,0.0729236868582,0.0732404021106,0.0730472058066,0.0731802262126,0.0730788773318,0.0730250357389,0.0729616926885,0.0731580561449,0.0730091999763,0.0728350065875,0.0729616926885,0.072904683943,0.0725499628604,0.0723060921161,0.0724011066918,0.0724486139796,0.0722744205908,0.0722585848282,0.0720653885243,0.0719070308981,0.0715491426629,0.0713527792064,0.0716251543235,0.071694831679,0.0715523098154,0.0712799346984,0.0715143039851,0.0712926033085,0.0711247442247,0.0713432777489,0.0712862690034,0.0708872077854,0.0706496713462,0.0705134837876,0.0701967685353,0.070225272908,0.0697470328769,0.0698958890455,0.0697755372496,0.0693226344387,0.0694524876922,0.069493660675,0.069553836573,0.0693986460993,0.0690787636944,0.0687335440693,0.0689679133561,0.0685118433927,0.0684801718674,0.0687525469845,0.0686321951886,0.0688253914925,0.0686353623411,0.0685910222058,0.0688317257976,0.0689045703056,0.0684041602069,0.0684706704099,0.0684643361048,0.0682426354282,0.0680209347515,0.067758061092,0.0679892632263,0.0678815800405,0.0678087355324,0.0678625771253,0.0678499085152,0.0678214041425,0.0674983545851,0.0673875042468,0.0673811699417,0.0673241611963,0.0672069765529,0.0673906713993,0.0672481495357,0.0671499678075,0.0672513166882,0.0670359503166,0.0672418152307,0.0672386480781,0.067352665569,0.0673273283488,0.0672766539084,0.0669852758762,0.0669060970632,0.0666527248613,0.0663455110665,0.0666970649966,0.0664721971674,0.0664341913371,0.066355012524,0.066548208828,0.0665798803532,0.0664595285573,0.0665925489633,0.0664278570321,0.066548208828,0.0663898512018,0.0665925489633,0.0666273876411,0.0664341913371,0.0663138395412,0.0664373584896,0.0664626957098,0.0665862146583,0.0670771232994,0.0673083254337,0.0671277977398,0.0668015810299,0.0665165373027,0.0666463905562,0.0666305547936,0.0663455110665,0.0665957161158,0.0666432234037,0.0663866840493,0.0662726665584,0.0663771825917,0.0663233409988,0.0665893818108,0.0665703788956,0.0666748949289,0.0667160679117,0.0663930183543,0.0660477987292,0.0658862739505,0.066082637407,0.0658355995101,0.0660256286616,0.0660541330343,0.0658514352728,0.0660446315767,0.0661523147625,0.0664025198119,0.0669567715035,0.0672956568236,0.0672228123155,0.0673114925862,0.0673051582811,0.0673780027892,0.0679132515657,0.0675236918053,0.0673843370942,0.0674160086195,0.0670707889944,0.0673431641114,0.0671879736378,0.0674033400094,0.0676408764487,0.0675331932628,0.0670391174691,0.0669346014359,0.0666685606239,0.0665893818108,0.0667635751996,0.066681229234,0.0668649240803,0.0666463905562,0.0666685606239,0.0665735460482,0.0666178861835,0.0665830475057,0.0667794109622,0.0668395868602,0.0669916101813,0.066554543133,0.0663296753038,0.0666938978441,0.0667033993016,0.0668649240803,0.0671087948247,0.0675015217376,0.0678024012274,0.0676883837365,0.0676978851941,0.0677865654647,0.0682521368857,0.0679354216334,0.0677675625496,0.0681096150222,0.0684136616644,0.068150788005,0.0682394682756,0.0683629872241,0.0680019318364,0.0679005829556,0.0677453924819,0.0682014624453,0.0683978259018,0.0682331339706,0.0679670931586,0.068017767599,0.0677992340748,0.0677358910244,0.0680684420394,0.0685086762401,0.0685751864431,0.0689742476611,0.0690787636944,0.0689140717632,0.069021754949,0.0692687928458,0.0694144818619,0.0694778249124,0.0691927811853,0.0691579425075,0.0690565936267,0.0687905528148,0.0690787636944,0.0691136023722,0.0691262709823,0.0692561242357,0.0694018132518,0.0697153613517,0.0700890853495,0.0701429269424,0.0702411086706,0.0703962991443,0.0700225751465,0.0709537179884,0.0711690843601,0.0711469142924,0.071222925953,0.0713781164266,0.0714034536468,0.0714794653074,0.0719038637456,0.0717170017467,0.072299757811,0.0718151834749,0.0717170017467,0.0718848608304,0.0722490833706,0.0723409307938,0.0724581154372,0.0727336577068,0.0724422796746,0.0724454468271,0.0722585848282,0.0722807548959,0.0721762388626,0.0724391125221,0.072359933709,0.0726544788937,0.0725214584877,0.0723377636413,0.0725974701482,0.0727209890967,0.0728413408926,0.0732023962803,0.073762982277,0.0734430998721,0.0735507830579,0.0735824545831,0.0738801669203,0.0743869113241,0.0741620434949,0.0741905478677,0.0744755915948,0.0744692572897,0.0744565886797,0.07483347983,0.0751406936248,0.0748651513552,0.0749696673885,0.0748904885754,0.0753402242338,0.0757741241295,0.0758818073153,0.0761953554152,0.0763157072111,0.0766957655139,0.076641923921,0.077240515748,0.0768382873775,0.076768610022,0.0769903106986,0.077240515748,0.0773862047641,0.0775160580175,0.0779657936759,0.0783300162161,0.07851054391,0.0785675526554,0.0792896634308,0.079714061869,0.0798027421397,0.07985341658,0.0798565837326,0.0799642669184,0.080113123087,0.0797393990892,0.0797932406821,0.0798375808174,0.079913592478,0.0801954690526,0.0806547061685,0.0807528878968,0.08084473532,0.0808890754553,0.080718049219,0.0814401599944,0.0819120657204,0.0820989277193,0.0824631502596,0.0824029743616,0.082260452498,0.0824821531747,0.0830079004936,0.0830269034088,0.0833151142884,0.0832961113733,0.0833974602541,0.0837110083539,0.0838978703528,0.0843064330284,0.0844964621798,0.084654819806,0.0845693066878,0.0849968722785,0.0852185729552,0.0852217401077,0.0850063737361,0.0848986905503,0.0852850831582,0.0857063144438,0.0862510646779,0.0866342901333,0.0867198032514,0.086928835318,0.0873437322986,0.0878314737872,0.0881671919547,0.0887531151716,0.0891173377119,0.0891838479149,0.0895734076753,0.0896969266237,0.0902860169931,0.0907800927868,0.0913565145461,0.0920564552539,0.0927532288091,0.0930857798241,0.0931586243321,0.0937920548368,0.094083432869,0.0953946340138,0.095752522249,0.0961737535347,0.0970447204787,0.0973646028836,0.0980107019984,0.0987866543667,0.099629116938,0.0998476504622,0.101048001269,0.101611754418,0.102371871024,0.103277676645,0.10362289627,0.104192983725,0.104348174198,0.104566707722,0.104921428805,0.10563087097,0.105165299549,0.104341839893,0.104405182944,0.104167646504,0.103575388983,0.102992632918,0.103432867119,0.102913454105,0.102739260716,0.102413044006,0.102425712616,0.10263157753,0.102745595021,0.102574568785,0.102983131461,0.103363189763,0.103071811731,0.103432867119,0.103413864204,0.10358489044,0.103952280133,0.104338672741,0.104230989555,0.104848584297,0.104668056603,0.104782074094,0.104747235416,0.105098789346,0.105364830158,0.105564360767,0.105472513344,0.105459844734,0.106267468628,0.106479667847,0.106843890387,0.106989579403,0.107699021568,0.108028405431,0.108522481225,0.10896904973,0.108886703765,0.109238257695,0.10928259783,0.109371278101,0.109725999184,0.110052215894,0.110134561859,0.110159899079,0.110112391791,0.10997303708,0.110736320839,0.111110044836,0.111100543379,0.110983358735,0.111170220734,0.11161678924,0.111876495747,0.112335732863,0.112826641504,0.113219368417,0.113703942753,0.11398898648,0.114080833904,0.114581244002,0.114859953424,0.114825114747,0.11498030522,0.115290686168,0.115566228437,0.115648574403,0.115775260504,0.115974791113,0.116491036974,0.117051622971,0.117555200222,0.117773733746,0.118261475235,0.118049276016,0.11828047815,0.118939245875,0.11924645967,0.119588512142,0.120158599597,0.120402470341,0.120560827967,0.121419126301,0.121780181689,0.12266065009,0.123018538326,0.123363757951,0.123645634525,0.123962349778,0.124060531506,0.124028859981,0.124348742385,0.124478595639,0.124760472214,0.125362231193,0.12534639543,0.125140530516,0.125479415836,0.125872142749,0.12567261214,0.125837304072,0.126382054306,0.126483403186,0.126366218543,0.126071673358,0.126201526612,0.126416892983,0.126578417762,0.126714605321,0.127132669454,0.127024986268,0.127075660708,0.127237185487,0.12725302125,0.127553900739,0.127690088298,0.128203167007,0.127886451754,0.127645748163,0.128092316669,0.128627565445,0.128285512972,0.128076480906,0.12790545467,0.128022639313,0.128326685955,0.128241172837,0.129083635408,0.129409852118,0.12894744785,0.128760585851,0.128706744258,0.12860856253,0.12897278507,0.128266510057,0.128285512972,0.12789278606,0.127075660708,0.126363051391,0.125891145665,0.125796131089,0.125355896888,0.125096190381,0.124861821094,0.12464328757,0.124063698658,0.124339240928,0.12390217388,0.123876836659,0.123924343947,0.123715311881,0.123778654931,0.123525282729,0.123164227342,0.123195898867,0.123135722969,0.12229642755,0.122166574297,0.121406457691,0.121621824063,0.121203759929,0.120415138951,0.120513320679,0.120278951393,0.119750036921,0.119002588925,0.118727046656,0.117935258525,0.11833115259,0.117840243949,0.11765338195,0.117621710425,0.116766579244,0.116503705584,0.116320010738,0.116177488874,0.11598429257,0.116107811519,0.115477548167,0.114986639525,0.114802944679,0.114505232342,0.114407050614,0.114141009802,0.113960482108,0.113783121566,0.113143356757,0.113061010791,0.113133855299,0.112490923337,0.112053856288,0.112164706627,0.111911334425,0.111512273207,0.111097376226,0.110695147856,0.110809165347,0.110337259621,0.110302420943,0.110568461755,0.110058550199,0.109171747492,0.109045061391,0.109244592,0.108896205222,0.109054562849,0.109114738746,0.108652334478,0.10793972516,0.10762617706,0.107483655197,0.107835209127,0.107144769877,0.106676031303,0.106809051709,0.106498670762,0.10591908185,0.105963421985,0.105526354937,0.105086120736,0.104677558061,0.104037793251,0.104072631929,0.103768585286,0.103375858374,0.102973630003,0.102793102309,0.102194510482,0.101795449264,0.101219027505,0.101326710691,0.10118735598,0.100892810795,0.10019603724,0.0998254803945,0.0991667126696,0.0986758040284,0.0986377981981,0.0983559216235,0.0984572705042,0.0980962151165,0.0977953356268,0.0975197933572,0.0972632540028,0.0973075941381,0.0975863035602,0.0971840751897,0.0969623745131,0.0968673599374,0.0966266563456,0.0965664804476,0.0964873016345,0.096091407569,0.0961990907549,0.095546657335,0.0947422005939,0.0946028458829,0.0943399722234,0.0941562773771,0.0941879489023,0.0937540490066,0.0932663075179,0.0932599732129,0.0929305893504,0.0930604426039,0.0927944017919,0.092347833286,0.091948772068,0.0913248430209,0.090406368789,0.0895544047601,0.0890793318816,0.0884110626991,0.0880151686336,0.0870840257916,0.0866184543707,0.0863524135587,0.0859881910184,0.0858456691549,0.0855479568176,0.0854466079369,0.0850792182441,0.0849081920079,0.0846231482807,0.0842177527577,0.0842715943506,0.0839137061154,0.0831757595774,0.0828622114776,0.0829603932058,0.0825328276151,0.0827355253766,0.08252649331,0.08218760799,0.0822509510405,0.081782212467,0.0814908344348,0.0813641483338,0.0811962892501,0.0806673747786,0.0807528878968,0.0801099559345,0.0799104253255,0.0798565837326,0.0793973466166,0.079315000651,0.0796855574963,0.0799959384436,0.0799167596305,0.0799262610881,0.0797932406821,0.0798280793598,0.079720396174,0.0796253815983,0.0798629180376,0.0801352931546,0.0801226245446,0.0799737683759,0.0797679034619,0.0796317159034,0.0795842086155,0.079381510854,0.0794163495318,0.0792801619732,0.0790552941441,0.078716408824,0.0782920103859,0.0779404564557,0.0778929491679,0.0775318937802,0.0776015711357,0.0776617470336,0.0775160580175,0.0772753544257,0.0769459705633,0.0764708976847,0.0761288452122,0.0758596372477,0.0758659715527,0.075637936571,0.0750741834218,0.0746624535937,0.0743172339686,0.0740987004445,0.0742760609858,0.0743900784767,0.074434418612,0.0746212806109,0.0744724244423,0.074839814135,0.0750235089814,0.0748651513552,0.0746656207462,0.0744565886797,0.074434418612,0.0744565886797,0.0742380551555,0.0742633923757,0.0738484953951,0.0734494341771,0.0730725430268,0.0728065022148,0.0729300211632,0.0729268540107,0.0724897869624,0.0719196995082,0.0719355352708,0.0716314886285,0.0718025148648,0.0717328375093,0.0715554769679,0.0719323681183,0.0715744798831,0.0716536586962,0.0718500221526,0.0717581747295,0.071289436156,0.071362280664,0.0710170610389,0.0708745391753,0.0711659172075,0.070963219446,0.0710265624965,0.0708587034127,0.0704596421947,0.0706496713462,0.0706053312108,0.0703804633817,0.0704374721271,0.0702094371454,0.069620346776,0.0695443351154,0.0694461533872,0.0692117841004,0.069094599457,0.0689837491187,0.0688919016955,0.0685910222058,0.0684294974271,0.068356652919,0.0683788229867,0.067891081498,0.0677802311597,0.0678752457354,0.0679227530233,0.0679955975313,0.0681222836323,0.0681856266827,0.0680874449545,0.0682458025807,0.0682964770211,0.0685656849856,0.0686480309512,0.0682204653605,0.0683724886816,0.0682204653605,0.0684865061725,0.0686702010189,0.0688824002379,0.0686480309512,0.0684991747826,0.0685910222058,0.0684770047149,0.0681697909201,0.0678024012274,0.067558530483,0.0671024605196,0.0670042787914,0.0667445722844,0.0667920795723,0.0667794109622,0.0669631058086,0.0673241611963,0.0681982952928,0.0682679726483,0.0684516674947,0.0684991747826,0.068356652919,0.068223632513,0.0681222836323,0.0682996441736,0.0681856266827,0.0676883837365,0.0672798210609,0.0673178268912,0.0672006422479,0.0674096743144,0.0674635159073,0.0674318443821,0.0674381786871,0.0675015217376,0.0671626364176,0.0670644546893,0.0672354809256,0.067419175772,0.0676028706184,0.067558530483,0.0673748356367,0.0673558327215,0.0672576509933,0.0668712583854,0.0670707889944,0.0670106130964,0.0667287365218,0.0662124906605,0.066088971712,0.066088971712,0.0661586490676,0.0663043380837,0.0662980037786,0.0663613468291,0.0661459804575,0.066282168016,0.0661586490676,0.0662631651008,0.0661269775423,0.0656424032062,0.0652940164286,0.0649899697863,0.0651293244974,0.0651831660903,0.0651641631751,0.0649139581257,0.0648601165328,0.0650628142944,0.0647682691097,0.0649107909732,0.0649012895157,0.0649804683287,0.0647904391773,0.06481894355,0.0647049260592,0.0649709668712,0.0649773011762,0.0645845742633,0.0651799989377,0.0650501456843,0.065218004768,0.0651578288701,0.0652338405306,0.0651388259549,0.0650564799893,0.0647999406349,0.0650501456843,0.0653921981568,0.06514516026,0.0653605266316,0.0652908492761,0.065677241884,0.0658957754081,0.0657880922223,0.0661333118474,0.0663835168967,0.0663518453715,0.0663930183543,0.0660477987292,0.0660509658818,0.0663391767614,0.0661713176777,0.0657215820193,0.0657374177819,0.0654745441224,0.0651704974802,0.065218004768,0.0651736646327,0.0650976529721,0.0650469785317,0.0651071544297,0.065078650057,0.0653605266316,0.0654872127325,0.0653541923265,0.0658989425606,0.0658451009677,0.0656360689011,0.065876772493,0.0659147783232,0.0658260980526,0.06581026229,0.0659686199161,0.0660573001868,0.0662758337109,0.066016127204,0.0660731359494,0.0664373584896,0.0667097336067,0.066820583945,0.0667667423521,0.0668997627581,0.0667794109622,0.0666938978441,0.0667825781147,0.0666590591663,0.0667635751996,0.0664468599472,0.0664183555745,0.0665450416755,0.0666115518784,0.0665767132007,0.0668015810299,0.0670517860792,0.0673875042468,0.0675807005507,0.0673051582811,0.0677485596345,0.0678815800405,0.0677327238718,0.0678435742102,0.0679797617687,0.0678530756677,0.0677675625496,0.0607586540147,0.0540632935796,0.0474946192454,0.0405965610488,0.0)
ycorr <- c(8.45106335644e-05,8.44921836429e-05,8.44305512576e-05,8.4327234643e-05,8.4182323866e-05,8.39919613993e-05,8.37532603182e-05,8.34942111145e-05,8.32183558112e-05,8.29122292421e-05,8.25871046841e-05,8.22517076496e-05,8.19094371797e-05,8.15626245155e-05,8.12164330872e-05,8.08720713829e-05,8.05410069866e-05,8.02508076215e-05,7.99951166559e-05,7.97843134444e-05,7.96238654923e-05,7.95069922388e-05,7.94175265142e-05,7.93616501026e-05,7.93364904398e-05,7.93372500464e-05,7.93615812896e-05,7.93855338286e-05,7.93954535634e-05,7.94007594127e-05,7.93948786316e-05,7.93722759756e-05,7.93403641149e-05,7.93037030825e-05,7.92507527137e-05,7.91840497102e-05,7.91012670722e-05,7.90053959932e-05,7.89059066225e-05,7.87932313949e-05,7.86735788204e-05,7.85485558268e-05,7.84215615705e-05,7.8279311993e-05,7.81311184611e-05,7.79756008365e-05,7.78197409164e-05,7.76702316898e-05,7.75188564759e-05,7.73617833394e-05,7.7203080848e-05,7.7037694017e-05,7.68602968199e-05,7.66742517607e-05,7.64820622011e-05,7.62785518626e-05,7.60673947711e-05,7.58363662407e-05,7.55921816332e-05,7.5349071531e-05,7.51027134558e-05,7.48521717684e-05,7.45929632332e-05,7.43321651523e-05,7.40683747221e-05,7.38097331016e-05,7.3546390261e-05,7.32749903875e-05,7.30032443637e-05,7.27264245637e-05,7.24365448673e-05,7.21334071106e-05,7.18244090258e-05,7.15035815395e-05,7.11683205746e-05,7.08146748847e-05,7.04373259816e-05,7.00527017867e-05,6.96593232489e-05,6.92488543545e-05,6.88204729243e-05,6.83832473551e-05,6.79387123807e-05,6.7484371368e-05,6.70224790687e-05,6.65592583644e-05,6.6094400853e-05,6.5627390284e-05,6.51551283313e-05,6.46753683162e-05,6.41951004164e-05,6.37154141971e-05,6.32263722844e-05,6.2739583727e-05,6.22504596923e-05,6.17551198623e-05,6.12488479102e-05,6.07311911942e-05,6.01966632754e-05,5.9650061614e-05,5.90943398356e-05,5.85194783669e-05,5.79266764996e-05,5.73121765518e-05,5.66740472307e-05,5.60159338666e-05,5.53530371969e-05,5.46828774518e-05,5.40122729763e-05,5.33489649131e-05,5.2685191806e-05,5.20224778354e-05,5.13695104573e-05,5.07143499e-05,5.00717290606e-05,4.94398519496e-05,4.8812307487e-05,4.81806674989e-05,4.75510714087e-05,4.69137674716e-05,4.625921957e-05,4.5595523945e-05,4.49223327075e-05,4.42433860853e-05,4.35609392472e-05,4.28665768005e-05,4.21545254475e-05,4.14344109822e-05,4.06998326707e-05,3.99555019251e-05,3.92061786114e-05,3.84582754535e-05,3.77131189706e-05,3.69680254487e-05,3.6222597382e-05,3.5476477635e-05,3.47404438857e-05,3.40172891028e-05,3.32979143732e-05,3.25852955024e-05,3.18816105531e-05,3.11848705221e-05,3.04947937124e-05,2.98030475016e-05,2.91019505837e-05,2.83913042119e-05,2.76655074555e-05,2.69174658369e-05,2.61585179169e-05,2.5394822e-05,2.4628976417e-05,2.38537654014e-05,2.30653514589e-05,2.22771347477e-05,2.14889803741e-05,2.07118194333e-05,1.99482819161e-05,1.9211889288e-05,1.84989608892e-05,1.77920963154e-05,1.70968742758e-05,1.64082319074e-05,1.57224829501e-05,1.50449803066e-05,1.43706416015e-05,1.36941103331e-05,1.30220118193e-05,1.23419638885e-05,1.16490700418e-05,1.09460496406e-05,1.02292358806e-05,9.50261458295e-06,8.7742404192e-06,8.03966549237e-06,7.29432952297e-06,6.5421299489e-06,5.77982774898e-06,5.00905083892e-06,4.22426715489e-06,3.43346379531e-06,2.64371656747e-06,1.85009120138e-06,1.04631777866e-06,2.35473146024e-07,-5.68616049471e-07,-1.36483427765e-06,-2.15567091676e-06,-2.9473753505e-06,-3.74423066706e-06,-4.53932883762e-06,-5.34231641473e-06,-6.14989327513e-06,-6.95523129624e-06,-7.75962432644e-06,-8.57190442979e-06,-9.40142643342e-06,-1.02495952998e-05,-1.11160367381e-05,-1.19829080174e-05,-1.28588179396e-05,-1.37355489525e-05,-1.46105089551e-05,-1.54932694068e-05,-1.6384071282e-05,-1.728200019e-05,-1.81797078352e-05,-1.90813148627e-05,-1.99848103867e-05,-2.08921313269e-05,-2.18035208015e-05,-2.27248107781e-05,-2.36591927912e-05,-2.46045790144e-05,-2.55602401496e-05,-2.65216258025e-05,-2.74951600197e-05,-2.84791740182e-05,-2.94756503523e-05,-3.04846836911e-05,-3.15047278589e-05,-3.2525997724e-05,-3.35486226158e-05,-3.45814581937e-05,-3.56242173718e-05,-3.6684799015e-05,-3.77658324595e-05,-3.88565486095e-05,-3.99548062476e-05,-4.10551131747e-05,-4.21564379896e-05,-4.32782482523e-05,-4.44175008125e-05,-4.55633934966e-05,-4.6713719385e-05,-4.78704845022e-05,-4.90219841252e-05,-5.0174939881e-05,-5.13312598568e-05,-5.24970536821e-05,-5.36724832819e-05,-5.4852134093e-05,-5.60338223215e-05,-5.72297430018e-05,-5.84418045163e-05,-5.96605080717e-05,-6.08858908055e-05,-6.21164638178e-05,-6.33427479141e-05,-6.45665870196e-05,-6.57978022062e-05,-6.70346507336e-05,-6.82794633611e-05,-6.95175711406e-05,-7.07513906097e-05,-7.19778423891e-05,-7.3201370667e-05,-7.44291718657e-05,-7.56683100127e-05,-7.69258749467e-05,-7.81983899334e-05,-7.9479248452e-05,-8.07697183404e-05,-8.20719034912e-05,-8.33957251298e-05,-8.47461722298e-05,-8.61179663978e-05,-8.75079794974e-05,-8.89097369357e-05,-9.03226078506e-05,-9.17460929615e-05,-9.31863867386e-05,-9.46366142953e-05,-9.6099901982e-05,-9.75686163513e-05,-9.90315573998e-05,-0.00010049127327,-0.000101955109267,-0.000103426413401,-0.000104908744642,-0.000106394956962,-0.000107875445364,-0.000109353640639,-0.00011083267852,-0.000112311696125,-0.000113793809017,-0.00011528372665,-0.000116772804879,-0.000118258044823,-0.000119732808086,-0.000121190644654,-0.000122642078501,-0.000124092731392,-0.000125542604867,-0.000126986998262,-0.00012842870447,-0.000129875310439,-0.000131330129833,-0.000132798588507,-0.000134283549311,-0.000135791603049,-0.000137323753715,-0.000138877979335,-0.000140450613708,-0.000142037141657,-0.000143648978769,-0.000145277287091,-0.000146913896269,-0.000148563103164,-0.000150223641397,-0.000151895182112,-0.000153581903948,-0.000155281516229,-0.000156991988753,-0.000158721007017,-0.000160464015345,-0.000162217934803,-0.0001639891891,-0.000165778703765,-0.000167577727378,-0.000169387273214,-0.000171203494593,-0.000173022838848,-0.000174848440773,-0.000176673601972,-0.000178497587143,-0.000180334710717,-0.000182185436212,-0.000184045640764,-0.000185917922962,-0.000187803528403,-0.000189695956063,-0.000191600584511,-0.000193515462786,-0.00019544730406,-0.000197404539602,-0.000199378128862,-0.00020135578971,-0.000203331748948,-0.000205307282771,-0.000207285060105,-0.000209266482625,-0.000211256705333,-0.000213254924444,-0.00021525837857,-0.000217257758636,-0.000219248266971,-0.000221231705883,-0.000223212889471,-0.000225191625586,-0.000227171549069,-0.000229154822531,-0.000231138025713,-0.000233115962894,-0.000235088696948,-0.000237053845251,-0.000239011060119,-0.000240964350185,-0.00024292104561,-0.000244878647571,-0.000246836178695,-0.000248789296838,-0.000250735465324,-0.000252678834559,-0.000254626153771,-0.000256581951629,-0.00025855521889,-0.000260551117584,-0.000262563454163,-0.0002645908432,-0.000266634092279,-0.000268692036827,-0.000270759420592,-0.000272833569744,-0.000274913699974,-0.000276994489626,-0.00027906704805,-0.000281129942309,-0.000283176694293,-0.000285213042246,-0.000287231545924,-0.000289231048595,-0.000291222617928,-0.000293211011356,-0.00029519278891,-0.000297163435669,-0.000299130213527,-0.000301094155268,-0.000303056459399,-0.000305018755092,-0.000306980886358,-0.000308951450533,-0.000310924629976,-0.000312898439509,-0.000314873735123,-0.000316851575285,-0.000318827414711,-0.000320797389141,-0.000322762707126,-0.000324719872327,-0.000326673322828,-0.000328620361517,-0.00033055871755,-0.000332492308187,-0.000334414327205,-0.000336327166285,-0.000338233481232,-0.000340140086988,-0.000342045641903,-0.00034394821573,-0.000345841445751,-0.00034772408434,-0.000349598920579,-0.000351461793048,-0.000353312923036,-0.000355158138736,-0.00035699134719,-0.00035881020978,-0.000360615836624,-0.00036240645422,-0.000364188806136,-0.000365961649955,-0.000367723376839,-0.000369473953293,-0.000371214365686,-0.000372949358738,-0.000374679328087,-0.000376404961424,-0.00037812854745,-0.000379852468761,-0.000381570906045,-0.000383285121377,-0.000385000964349,-0.000386711606342,-0.000388424201779,-0.00039013199052,-0.000391839146223,-0.000393542747696,-0.000395241408371,-0.000396927714743,-0.000398599900995,-0.000400265081123,-0.00040191374022,-0.000403541788626,-0.000405152644505,-0.00040673835286,-0.000408297695555,-0.000409825249843,-0.000411318304902,-0.000412785934058,-0.000414236177033,-0.000415670572135,-0.000417091823469,-0.00041851317133,-0.000419931006993,-0.000421345616812,-0.000422754599716,-0.0004241582365,-0.000425552378625,-0.000426938158433,-0.000428311683169,-0.000429669311434,-0.000431001316265,-0.00043229966692,-0.000433558043491,-0.000434785428741,-0.000435984806815,-0.000437160767301,-0.000438314771495,-0.00043944452031,-0.000440549942183,-0.00044162064629,-0.000442661100475,-0.000443683100414,-0.000444690389465,-0.000445680244736,-0.000446648275893,-0.000447588444994,-0.000448500450674,-0.000449388027279,-0.000450250088771,-0.00045109231704,-0.000451921185863,-0.000452726855087,-0.000453499740301,-0.000454239182824,-0.000454949320155,-0.000455635860762,-0.000456306589001,-0.000456955080478,-0.000457582275707,-0.000458190244498,-0.000458773209786,-0.00045932867206,-0.00045986381413,-0.000460380921255,-0.000460870248049,-0.000461326395139,-0.000461745605597,-0.000462132778546,-0.000462493759483,-0.000462826357605,-0.000463132091274,-0.000463412906097,-0.000463675334617,-0.000463911989211,-0.00046413058674,-0.000464336273081,-0.000464530120093,-0.000464707976509,-0.00046486261403,-0.0004649894871,-0.000465091605452,-0.000465169529741,-0.000465213259155,-0.000465232764535,-0.000465228971091,-0.000465199377336,-0.000465143497291,-0.000465062497502,-0.00046495397363,-0.000464813310747,-0.000464636965575,-0.000464428029874,-0.000464193755142,-0.000463932953682,-0.00046363588822,-0.0004633044415,-0.000462939654596,-0.000462542694894,-0.000462109575771,-0.000461653339933,-0.000461180365812,-0.000460691399886,-0.000460179105421,-0.000459628174158,-0.000459046969232,-0.000458433786858,-0.000457789054648,-0.000457102409055,-0.000456378998394,-0.000455617973781,-0.000454808786114,-0.000453951672128,-0.000453050920986,-0.000452110421164,-0.000451138675564,-0.000450137962291,-0.000449104264462,-0.000448045933977,-0.00044696858331,-0.000445863098069,-0.000444740748468,-0.000443598871151,-0.000442429529631,-0.000441236151681,-0.000440012582702,-0.00043875603237,-0.000437463938183,-0.000436138988207,-0.000434776904591,-0.000433381773186,-0.000431951828778,-0.000430481702023,-0.000428981383577,-0.000427452510137,-0.00042589254774,-0.000424304250882,-0.000422691219566,-0.000421049340731,-0.000419375716683,-0.000417668469135,-0.000415923882236,-0.00041415104439,-0.00041234038894,-0.000410493022562,-0.000408616723061,-0.000406708576014,-0.000404768537802,-0.00040279995111,-0.000400807188257,-0.000398794954737,-0.000396761622611,-0.000394698168333,-0.000392608415233,-0.000390499937338,-0.000388359033593,-0.000386183096574,-0.000383975911632,-0.000381734135778,-0.000379450928254,-0.000377019484065,-0.000374349644841,-0.00037137889392,-0.000368066443159,-0.000363864055601,-0.0003607060866,-0.000357960531472,-0.000355545224453,-0.000353355629426,-0.000351272337046,-0.000349184210316,-0.000347194470642,-0.000345394566721,-0.000343840046572,-0.000342577859626,-0.000342151982594,-0.000340623809655,-0.000338631157897,-0.000336253873079,-0.0003336006023,-0.000330787280841,-0.000327931791629,-0.000325031699596,-0.000322085996625,-0.000319109870469,-0.000316096572543,-0.000313047923187,-0.000309965438651,-0.000306853597974,-0.000303710162417,-0.000300523647775,-0.000297300204087,-0.000294031171693,-0.000290727829021,-0.00028739272402,-0.000284021569819,-0.000280617437494,-0.00027717530951,-0.000273698532139,-0.00027018457357,-0.000266641983214,-0.000263078843247,-0.000259497932422,-0.000255898950656,-0.000252273197804,-0.000248615076079,-0.000244920958808,-0.000241202503524,-0.0002374602946,-0.000233694416928,-0.000229907255379,-0.00022609407725,-0.00022225241021,-0.000218381758564,-0.000214481127427,-0.000210552728833,-0.000206602969988,-0.000202631966089,-0.000198637160541,-0.000194616470963,-0.000190568286355,-0.000186488766117,-0.000182377450209,-0.000178236713244,-0.000174070297729,-0.00016988470954,-0.000165676927564,-0.00016144643897,-0.000157195643269,-0.000152924970833,-0.000148632973786,-0.000144317273254,-0.000139979373184,-0.000135620075656,-0.000131238352031,-0.000126831204731,-0.000122401512472,-0.000117948066256,-0.000113464856264,-0.000108955079802,-0.000104418620103,-9.9865670561e-05,-9.53030181352e-05,-9.07287409295e-05,-8.61432089631e-05,-8.15431848241e-05,-7.69339092349e-05,-7.23065721888e-05,-6.76621253063e-05,-6.30012515648e-05,-5.83252869392e-05,-5.36296967348e-05,-4.89084900254e-05,-4.41562764551e-05,-3.9371973816e-05,-3.45491507022e-05,-2.96897751601e-05,-2.47942155479e-05,-1.98744413938e-05,-1.49331742208e-05,-9.96773422925e-06,-4.9708030299e-06,5.10665779732e-08,5.09620312045e-06,1.01631980679e-05,1.52362372765e-05,2.03165180858e-05,2.5401074117e-05,3.05014185555e-05,3.5623316452e-05,4.07594667103e-05,4.59058899479e-05,5.10635259279e-05,5.62330976352e-05,6.14150837677e-05,6.66097866841e-05,7.18285600189e-05,7.70669607831e-05,8.23219493414e-05,8.75868555085e-05,9.28676995503e-05,9.81695517043e-05,0.000103490868707,0.000108823779887,0.000114170024199,0.000119528670273,0.000124901323567,0.000130283235936,0.000135673302529,0.000141074913854,0.000146488143406,0.000151898147331,0.000157308382728,0.000162723249234,0.000168146605597,0.000173581797574,0.000179027626704,0.000184478429531,0.000189943963931,0.000195417815805,0.000200897911657,0.000206382159611,0.000211878463542,0.000217381344206,0.000222890324199,0.000228403708025,0.00023390909636,0.000239411850869,0.000244910362224,0.000250399247138,0.000255883097335,0.000261367422497,0.000266849237751,0.000272326083147,0.000277794127406,0.00028324766383,0.000288693483862,0.000294136581424,0.000299571565856,0.000305004936916,0.000310430922268,0.00031585593919,0.000321273893973,0.000326697877082,0.000332123729811,0.000337554525164,0.00034299286109,0.000348428133233,0.000353856128573,0.000359280891336,0.000364698520868,0.000370111529265,0.000375510717336,0.000380887756648,0.000386231714533,0.000391545624713,0.000396825529953,0.000402070863568,0.000407282834267,0.000412465335623,0.000417615476576,0.000422721899878,0.000427785654094,0.000432810593171,0.000437811831137,0.000442789044962,0.000447739510227,0.000452670019848,0.000457580719506,0.000462469031258,0.000467336568633,0.000472187790265,0.000477024009181,0.000481844300875,0.000486641758451,0.000491409757539,0.000496154792891,0.000500876116285,0.000505570478655,0.000510236323426,0.000514872342553,0.000519476494748,0.00052404167496,0.00052857727865,0.000533082399942,0.000537556373779,0.000541998149845,0.000546400701381,0.00055076990552,0.000555104912074,0.000559403063514,0.000563672213762,0.000567915032684,0.00057212583419,0.000576308895963,0.000580469342245,0.000584606499176,0.000588722838302,0.000592810243785,0.000596867326386,0.000600892152892,0.000604877601112,0.000608823204928,0.000612724857644,0.00061658806517,0.000620409359829,0.00062418437963,0.000627918071655,0.000631605215888,0.000635248856938,0.000638858264955,0.000642431804417,0.000645980163215,0.00064949920515,0.000652980402053,0.000656420984929,0.000659818170477,0.000663164807014,0.00066646582795,0.000669724474506,0.000672942287146,0.000676113318074,0.000679237771449,0.000682313061429,0.000685345008216,0.000688340867207,0.000691298165639,0.000694220298889,0.000697115489478,0.00069997358696,0.000702792559481,0.000705575304861,0.000708317802822,0.000711024715149,0.000713694403487,0.000716322466545,0.000718906625967,0.000721448911565,0.000723943179471,0.000726388143608,0.000728782920535,0.000731124517681,0.000733411984324,0.000735645127744,0.000737811682961,0.000739913312062,0.000741952525362,0.000743934013424,0.00074585651433,0.000747720222326,0.000749528640408,0.000751286567704,0.000752993926663,0.000754645927776,0.00075625148493,0.000757816481492,0.000759339570036,0.00076081474983,0.000762241876007,0.000763626903347,0.000764965195199,0.000766247879654,0.000767478761521,0.000768662022109,0.000769793202708,0.000770855849868,0.000771854708756,0.000772792224651,0.000773672933806,0.000774489493678,0.000775234850565,0.000775918127034,0.000776538256102,0.00077708960141,0.000777570640158,0.000777995638543,0.000778368117558,0.000778687727955,0.000778948911693,0.000779145180137,0.000779291577938,0.000779386796516,0.000779427588665,0.000779414687237,0.00077935123109,0.000779230524176,0.000779043130431,0.000778786205958,0.00077845530382,0.000778060842191,0.000777592952527,0.000777045676849,0.00077642433004,0.000775731233935,0.000774958589622,0.000774110441447,0.000773191362473,0.000772206906856,0.000771158447052,0.000770045188254,0.000768869305782,0.000767639121596,0.000766347299586,0.000764982265674,0.000763553640484,0.000762065820872,0.000760514505688,0.000758899331757,0.000757221983432,0.000755488439379,0.00075369569691,0.000751830809104,0.000749900122931,0.0007479210651,0.000745898811578,0.000743826720328,0.0007417130114,0.000739553053788,0.000737343653478,0.000735082669585,0.000732764757371,0.000730396947781,0.000727984045573,0.000725521135676,0.000723000759539,0.000720428329436,0.000717793419442,0.000715097899726,0.000712351568035,0.000709559509294,0.000706727086043,0.000703861102465,0.000700959928516,0.000698022910928,0.000695055511418,0.000692047817236,0.000689005498717,0.000685926137873,0.000682807102788,0.000679644906166,0.000676435598517,0.000673183808988,0.000669885250705,0.000666543262878,0.000663151102643,0.000659706764245,0.000656212813139,0.000652673377163,0.000649098737624,0.000645483226388,0.000641828270559,0.000638132456407,0.000634387551149,0.000630593288711,0.000626753076585,0.000622881281196,0.000618981835621,0.000615058636801,0.000611102238754,0.000607107972733,0.000603079049493,0.000599006003674,0.00059490010765,0.000590756590878,0.000586578265278,0.000582358880805,0.00057809499365,0.000573779944707,0.000569413534899,0.000565000381606,0.000560546321305,0.000556060617872,0.000551550022806,0.000547013940426,0.000542454395952,0.000537874808885,0.00053326913102,0.000528640363811,0.000523989850688,0.000519315349969,0.000514618978918,0.000509894129101,0.000505130516682,0.000500329596611,0.000495492191051,0.000490621882766,0.000485723386866,0.000480802179515,0.000475852585875,0.00047088052792,0.000465879727243,0.000460849939653,0.000455799789971,0.000450731850782,0.00044564352098,0.000440530897256,0.0004353909211,0.000430217606301,0.000425017409238,0.000419793776753,0.000414554369504,0.000409300791864,0.00040402834152,0.000398735596398,0.000393425392476,0.00038809729868,0.000382757980414,0.000377413957599,0.000372060205297,0.000366696896458,0.000361318010093,0.000355920525926,0.000350512685896,0.000345091907821,0.000339657868485,0.000334209097813,0.000328742250467,0.000323246814686,0.000317720889921,0.000312167883824,0.00030658654319,0.000300981238915,0.0002953508872,0.000289705633246,0.000284046082101,0.000278377085414,0.000272708112053,0.000267049173919,0.000261406479914,0.00025577665583,0.000250164033914,0.000244572212287,0.000238997021105,0.000233434479497,0.000227881182412,0.000222333614972,0.000216775624845,0.000211199661978,0.000205606712379,0.000200001609923,0.000194388216173,0.000188770744804,0.000183141918918,0.000177498330099,0.000171838398033,0.000166162712249,0.000160489141454,0.000154829815623,0.000149194948806,0.000143579747101,0.000137977266279,0.000132380190353,0.000126789507433,0.000121216590817,0.000115670057509,0.00011015109612,0.000104658790497,9.91813011052e-05,9.37110116882e-05,8.82453191425e-05,8.27897111632e-05,7.73477710791e-05,7.19292692368e-05,6.65248616923e-05,6.11335912401e-05,5.57618532853e-05,5.04022782881e-05,4.50537092424e-05,3.97194715036e-05,3.44008087708e-05,2.91010293336e-05,2.38229697621e-05,1.85614670968e-05,1.33201995328e-05,8.09875071423e-06,2.88835712168e-06,-2.31311403627e-06,-7.49573412023e-06,-1.26580263422e-05,-1.77987383861e-05,-2.29182354626e-05,-2.80298820285e-05,-3.31352980704e-05,-3.82261596714e-05,-4.33045639915e-05,-4.83666946704e-05,-5.34109165481e-05,-5.84347355473e-05,-6.34403696541e-05,-6.84289542631e-05,-7.34044382721e-05,-7.83624038095e-05,-8.32966526391e-05,-8.82168021018e-05,-9.31185640386e-05,-9.80070135432e-05,-0.000102871852224,-0.000107720076269,-0.00011255937513,-0.000117385740943,-0.000122194468862,-0.000126975642268,-0.000131732310187,-0.000136456853322,-0.000141146071492,-0.000145809466287,-0.000150449741102,-0.000155072872257,-0.000159664922106,-0.000164223250973,-0.000168754030193,-0.00017326607511,-0.000177755588248,-0.000182216176793,-0.000186662252768,-0.000191085900471,-0.000195483846951,-0.000199850861549,-0.000204190203014,-0.000208505978378,-0.000212795544388,-0.000217048407243,-0.000221265102073,-0.000225465175686,-0.000229637261487,-0.000233772915354,-0.000237880135273,-0.000241954465732,-0.000245994394937,-0.000249995530973,-0.000253964267489,-0.000257904513538,-0.000261822157569,-0.000265700931934,-0.000269545238396,-0.000273361094076,-0.000277141570323,-0.00028088283575,-0.000284593452789,-0.000288279820259,-0.000291936879424,-0.000295550645582,-0.000299126918623,-0.000302668644212,-0.000306183138535,-0.000309657420614,-0.000313093246759,-0.000316498978117,-0.000319869966185,-0.000323200723433,-0.000326485859554,-0.000329744474996,-0.000332972971448,-0.000336163666687,-0.000339315062617,-0.000342432593958,-0.000345519169327,-0.000348579960981,-0.000351612380182,-0.000354611746494,-0.000357583894753,-0.000360523476776,-0.000363418074859,-0.000366280234988,-0.000369107793374,-0.000371895520056,-0.000374644787477,-0.000377347622809,-0.000380001164147,-0.000382617187252,-0.000385202909019,-0.000387753455003,-0.000390277081402,-0.000392779504057,-0.000395257575556,-0.000397713542844,-0.000400148349872,-0.000402549974236,-0.000404921282866,-0.000407262941898,-0.000409563158829,-0.000411826494776,-0.000414048428685,-0.000416228366473,-0.000418354079913,-0.000420261905517,-0.000421786204453,-0.000422921531171,-0.000423679901831,-0.000424058232063)
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(292)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Heterocephalus_glaber-male-liver-H3K4me3-ERR572203.50mers.unique.MACS-2.1.0.p1e-1_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 292',bty='n')
dev.off()