# R script for Peak Model
#  -- generated by MACS
p <- c(0.0259861947563,0.0305902931089,0.0343440850091,0.0379112242733,0.0418101904458,0.0423908875354,0.0429923238067,0.0429301062613,0.0429923238067,0.0428471495343,0.0423701483536,0.0426397577166,0.0433448898967,0.0450455028018,0.0455017648007,0.0450040244382,0.0445892408028,0.0446099799846,0.0449210677111,0.0447344150752,0.0448588501658,0.0442988922581,0.0446929367117,0.0440085437133,0.043946326168,0.0444233273487,0.0446307191664,0.0447136758935,0.0458543308907,0.0466838981615,0.0469742467063,0.0477208572499,0.0469742467063,0.0466838981615,0.0472438560692,0.0469742467063,0.0470157250698,0.0473475519781,0.0466216806162,0.0460824618902,0.0458958092543,0.0451699378924,0.0459580267996,0.0468705507974,0.0466838981615,0.0468083332521,0.0470364642516,0.0469327683427,0.0465594630709,0.0466631589797,0.0469742467063,0.0472023777057,0.0469535075245,0.0466009414344,0.0466009414344,0.0466631589797,0.0469120291609,0.0468290724339,0.0472231168875,0.0474927262505,0.0476171613411,0.0476171613411,0.0477208572499,0.0482185976124,0.0484882069754,0.0489859473378,0.0498155146086,0.049504426882,0.0493799917914,0.0496496011544,0.0503339941528,0.0504376900616,0.0508732128788,0.0505206467887,0.050582864334,0.050230298244,0.049421470155,0.0501680806986,0.0507072994246,0.0505621251523,0.0501058631533,0.050852473697,0.0508939520606,0.0506658210611,0.0513294748777,0.0513294748777,0.051661301786,0.051391692423,0.0514746491501,0.0520346070578,0.051930911149,0.0517027801495,0.0514331707865,0.0521175637849,0.0515990842407,0.0519516503308,0.0515161275136,0.0518479544219,0.0517442585131,0.0512465181506,0.0517027801495,0.0515576058772,0.0515161275136,0.0510598655147,0.0519516503308,0.0523042164208,0.0523664339661,0.0518272152401,0.0514953883318,0.0514124316048,0.0515990842407,0.0518479544219,0.0521383029667,0.0521797813302,0.0509976479694,0.0511635614235,0.0517442585131,0.0523456947844,0.0526567825109,0.0528019567833,0.0529886094192,0.0529471310557,0.0532996971457,0.0538181766899,0.0544818305065,0.0537559591446,0.0535693065087,0.0534863497816,0.0536107848723,0.0539218725988,0.0538181766899,0.0539840901441,0.053548567327,0.0533411755093,0.0531130445098,0.0531960012369,0.053278957964,0.0538181766899,0.0534863497816,0.0534033930546,0.0540877860529,0.0537766983264,0.0539426117806,0.0537974375082,0.0540670468712,0.0548966141419,0.0548343965966,0.0551247451414,0.0554358328679,0.0556847030491,0.05417074278,0.0548136574148,0.0555602679585,0.0563898352293,0.0559750515939,0.0561617042298,0.0567216621376,0.0559750515939,0.0560372691392,0.056327617684,0.0571571849547,0.0569083147735,0.0568046188647,0.056140965048,0.0564313135928,0.0560994866845,0.0566179662287,0.0563898352293,0.057136445773,0.0565350095017,0.0567424013193,0.0569912715006,0.0572816200453,0.0576756644989,0.0579660130437,0.0577171428625,0.0571571849547,0.0576341861354,0.0574060551359,0.0581526656796,0.0580697089525,0.0579660130437,0.0571157065912,0.0576341861354,0.0579867522255,0.0584430142244,0.0592725814951,0.0599777136753,0.0597703218576,0.05991549613,0.0603510189471,0.0614087172173,0.0621345885792,0.0621760669428,0.0618442400345,0.0621345885792,0.0613050213085,0.0609939335819,0.0613050213085,0.0612220645814,0.0618442400345,0.0615538914897,0.0617612833074,0.0614087172173,0.0615953698532,0.0615331523079,0.0611805862179,0.0611805862179,0.0612428037632,0.0613050213085,0.0599777136753,0.0600606704023,0.0598532785847,0.0599362353117,0.0594592341311,0.059645886767,0.0604961932195,0.0604754540377,0.0604754540377,0.0609524552184,0.061346499672,0.0611805862179,0.0616575873985,0.0626115897599,0.0633996786671,0.063233765213,0.0637522447572,0.0642085067561,0.0652869442081,0.0649758564815,0.0658469021158,0.0660542939335,0.0654528576622,0.0643122026649,0.0651832482992,0.0653076833898,0.0651417699357,0.0655772927528,0.0642499851196,0.0643122026649,0.0642292459379,0.0644988553009,0.0652454658445,0.0661994682059,0.0658469021158,0.0660750331153,0.0659505980247,0.0659920763882,0.0663446424783,0.067091253022,0.0672986448396,0.0673193840214,0.0668009044772,0.0670082962949,0.067174209749,0.0673401232032,0.0676926892933,0.0673401232032,0.0683770822916,0.0682733863828,0.0684185606552,0.0686674308364,0.0695384764707,0.0693725630165,0.0700154776514,0.069953260106,0.0700776951967,0.0705339571956,0.0709487408309,0.070762088195,0.0701191735602,0.0703887829232,0.0692688671077,0.0697666074701,0.06906147529,0.0689370401994,0.0688540834723,0.0691444320171,0.0686259524728,0.0686052132911,0.0695592156524,0.0692896062894,0.070492478832,0.0697873466519,0.0702021302873,0.070679131468,0.0715501771022,0.0718820040105,0.0715501771022,0.0727530496448,0.0727530496448,0.0730019198261,0.0739351830057,0.0749514029123,0.074889185367,0.0746403151858,0.0751173163665,0.0751173163665,0.0766105374538,0.0766934941809,0.0776060181787,0.0807583738076,0.0831226405292,0.0850928627972,0.0872497377012,0.0908376161472,0.0931189261418,0.0963957168612,0.0992577239453,0.102327122847,0.105272086658,0.105355043385,0.105396521749,0.107263048108,0.108424442287,0.109668793193,0.110270229465,0.1104568821,0.110436142919,0.110125055192,0.110975361645,0.112945583913,0.113443324275,0.112136755824,0.113671455275,0.114521761727,0.114480283364,0.115268372271,0.116056461178,0.117051941903,0.117425247175,0.116886028449,0.11748746472,0.118876989899,0.118648858899,0.118503684627,0.119146599262,0.11947842617,0.120287254259,0.120867951348,0.120577602804,0.121054603984,0.122133041436,0.121884171255,0.12182195371,0.121759736164,0.122713738526,0.121718257801,0.121801214528,0.121054603984,0.12076425544,0.120515385258,0.121158299893,0.122610042617,0.123418870706,0.123750697614,0.123875132705,0.12557574561,0.125472049701,0.126177181881,0.127359315242,0.127960751513,0.127732620514,0.127836316423,0.12862440533,0.128769579602,0.129350276692,0.130428714144,0.130366496598,0.131071628779,0.131507151596,0.131507151596,0.132274501321,0.13308332941,0.132336718866,0.132772241684,0.132357458048,0.130843497779,0.132233022958,0.13308332941,0.133456634682,0.134182506044,0.134389897862,0.134597289679,0.1371896874,0.137397079218,0.139159909668,0.141420480481,0.142685570569,0.14175230739,0.142519657115,0.143805486385,0.143224789295,0.144386183474,0.143266267659,0.144469140201,0.144780227928,0.144386183474,0.143100354204,0.14363957293,0.14363957293,0.143058875841,0.144178791656,0.143328485204,0.143929921475,0.143390702749,0.14328700684,0.14363957293,0.144158052475,0.145526838471,0.14598310047,0.146397884106,0.146252709833,0.147123755468,0.14797406192,0.149322108735,0.149342847917,0.150379807005,0.151416766094,0.151873028093,0.153345509998,0.153117378999,0.152889247999,0.153863989542,0.15429951236,0.153843250361,0.154983905358,0.154506904177,0.15477651354,0.15512907963,0.154216555633,0.155170557994,0.157037084353,0.157389650443,0.158675479713,0.159940569801,0.159857613074,0.160915311344,0.161330094979,0.160998268071,0.161724139433,0.162636663431,0.16274035934,0.162802576885,0.162284097341,0.161267877434,0.161371573343,0.162055966341,0.161869313705,0.162698880976,0.16356992661,0.165125365243,0.166535629603,0.166888195693,0.167634806237,0.170164986413,0.172695166589,0.174416518675,0.176614871943,0.180140532844,0.183541758654,0.185968242921,0.189348729549,0.194035784629,0.197437010439,0.202041108791,0.204509071422,0.207516252778,0.21187148095,0.214650531307,0.215542316123,0.216994058847,0.217450320846,0.217201450664,0.217139233119,0.214982358215,0.213883181581,0.212804744129,0.21116634877,0.208304341685,0.207371078506,0.207868818868,0.20753699196,0.206811120598,0.208885038775,0.210440477408,0.211850741768,0.213157310219,0.213572093855,0.215459359396,0.21668297112,0.21539714185,0.215169010851,0.215791186304,0.215542316123,0.214712748852,0.2136343114,0.213447658764,0.213800224854,0.212472917221,0.210855261043,0.212120351131,0.21234848213,0.212120351131,0.210793043498,0.210544173317,0.210917478588,0.209818301955,0.209320561592,0.209092430593,0.210668608407,0.209382779137,0.207619948687,0.207142947506,0.207391817688,0.207308860961,0.207391817688,0.207661427051,0.207350339324,0.20824212414,0.208034732322,0.207039251598,0.20847025514,0.209154648138,0.209756084409,0.208428776776,0.207868818868,0.206271901872,0.205857118237,0.205317899511,0.203845417605,0.202891415244,0.202684023426,0.201211541521,0.198453230345,0.197561445529,0.196068224442,0.195798615079,0.193952827901,0.190904168181,0.189327990367,0.189742774002,0.186942984464,0.185449763376,0.183749150471,0.183272149291,0.181903363294,0.180430881388,0.178854703574,0.17810809303,0.177610352668,0.175494956127,0.176013435672,0.174561692948,0.173711386495,0.172549992316,0.172218165408,0.172446296407,0.172342600498,0.172695166589,0.171678946682,0.170393117412,0.169687985232,0.169708724414,0.168588808598,0.167966633145,0.168485112689,0.167365196874,0.167531110328,0.165519409697,0.165954932514,0.167220022602,0.167033369966,0.165892714968,0.166597847148,0.167385936056,0.166908934875,0.167116326693,0.167489631965,0.169916116231,0.171471554864,0.172301122135,0.17435430113,0.177548135122,0.179725749208,0.181115274387,0.181198231114,0.181841145749,0.180057576116,0.178315484848,0.175909739763,0.174022474222,0.170123508049,0.16719928342,0.163715100883,0.160210179164,0.157762955715,0.155191297176,0.15394694627,0.152370768455,0.148616976555,0.144012878202,0.139159909668,0.134327680316,0.130656845143,0.126114964336,0.121427909256,0.116409027268,0.112053799097,0.107449700744,0.103467777844,0.102057513484,0.100273943852,0.0987599835829,0.0971008490414,0.0960016724076,0.0953172794092,0.0944047554114,0.0934922314136,0.0929115343241,0.09309818696,0.0916049658726,0.0913560956914,0.0911487038737,0.0901117447853,0.0903398757847,0.0901532231488,0.0901947015124,0.0898006570588,0.089779917877,0.0899873096947,0.0904228325118,0.0910450079649,0.090319136603,0.0905680067842,0.0902361798759,0.0896140044228,0.089510308514,0.0886392628797,0.0880585657902,0.087540086246,0.0866483014299,0.0863164745216,0.0858809517045,0.0854246897055,0.0846573399801,0.0840144253453,0.083143379711,0.0829359878933,0.0830189446204,0.0829982054386,0.0827908136209,0.0822723340767,0.0821271598043,0.0815879410783,0.0816086802601,0.0816086802601,0.0823967691673,0.0830396838021,0.0823552908038,0.0813598100789,0.0812768533518,0.0807998521711,0.0809657656253,0.0807583738076,0.0805717211717,0.0808413305346,0.0798665889915,0.0785185421765,0.078477063813,0.0789955433572,0.0789333258119,0.0782696719953,0.07820745445,0.0772327129069,0.0764446239997,0.0760920579096,0.0755528391836,0.0759883620008,0.0759054052737,0.0743914450046,0.0740388789145,0.0740181397327,0.0731056157349,0.0729811806443,0.0731056157349,0.0723382660095,0.0724212227365,0.0724627011001,0.07211013501,0.0731470940984,0.0730433981896,0.0724419619183,0.0718612648288,0.0720893958282,0.0709694800127,0.0710731759216,0.071570916284,0.0714464811934,0.0711976110122,0.0705339571956,0.0703058261961,0.0706583922862,0.0710939151033,0.0713635244663,0.0719856999194,0.0714672203752,0.0707828273768,0.0697666074701,0.0697043899248,0.069870303379,0.069331084653,0.0695592156524,0.0689370401994,0.0688955618358,0.0689785185629,0.0684392998369,0.0678793419292,0.0681489512922,0.0680867337469,0.0683148647463,0.067983037838,0.067713428475,0.0680659945651,0.0675682542026,0.0670290354767,0.0672571664761,0.0670290354767,0.0669875571131,0.066904600386,0.0659713372064,0.0658054237523,0.0651832482992,0.0650380740269,0.0644988553009,0.0646025512097,0.0645403336644,0.0649551172998,0.0645403336644,0.064125550029,0.0644988553009,0.0644988553009,0.0643122026649,0.0641877675743,0.064395159392,0.0637937231207,0.06331672194,0.0636278096666,0.0637315055754,0.06296415585,0.0628189815776,0.0624664154875,0.062694546487,0.0628397207594,0.0628604599411,0.062694546487,0.0631093301224,0.0617198049438,0.0609109768549,0.0615331523079,0.0608487593096,0.0609317160366,0.0606413674919,0.0600191920388,0.0593347990404,0.0594384949493,0.0586504060421,0.0585881884968,0.0587955803145,0.0583807966791,0.0588785370415,0.0591896247681,0.0589822329504,0.0586089276785,0.0583600574973,0.0583393183155,0.058837058678,0.0590237113139,0.0588577978598,0.0588785370415,0.0584637534062,0.0577171428625,0.0576964036807,0.0579867522255,0.0578623171349,0.0575097510448,0.0573853159542,0.0564935311381,0.0560165299574,0.0561824434116,0.0554358328679,0.0564935311381,0.056140965048,0.0557676597762,0.055788398958,0.0556224855038,0.0556017463221,0.056597227047,0.0567216621376,0.0557261814127,0.0558298773215,0.0542951778706,0.0543366562342,0.0538596550535,0.0535693065087,0.0532996971457,0.0528434351468,0.0517649976948,0.0513294748777,0.0515368666954,0.0519723895125,0.0523871731479,0.0522627380573,0.0532167404187,0.0534863497816,0.0540255685076,0.0539633509623,0.0541500035982,0.0552699194138,0.0553113977773,0.0542951778706,0.0545440480519,0.0539840901441,0.0537766983264,0.0533411755093,0.0524908690567,0.0529678702374,0.0523871731479,0.0516820409678,0.0515368666954,0.0515368666954,0.051391692423,0.0522834772391,0.051391692423,0.051661301786,0.0525323474203,0.0520346070578,0.0533826538728,0.0530508269645,0.0530300877827,0.0541292644165,0.0537144807811,0.0525323474203,0.052822695965,0.0534033930546,0.0524493906932,0.0529471310557,0.0522212596938,0.0525530866021,0.0527812176015,0.0520760854214,0.0524493906932,0.0524493906932,0.0519723895125,0.0511013438782,0.0515990842407,0.0510598655147,0.0503339941528,0.0504584292434,0.049960688881,0.0498777321539,0.0497532970633,0.0500643847898,0.0505206467887,0.050582864334,0.049774036245,0.0496496011544,0.0504169508799,0.0503547333346,0.0507072994246,0.0504791684252,0.0498777321539,0.0504376900616,0.0505621251523,0.0506865602429,0.0514539099683,0.0511635614235,0.0512879965142,0.0512050397871,0.0513709532412,0.0510598655147,0.0514953883318,0.0509354304241,0.0503339941528,0.0504169508799,0.0502925157893,0.050230298244,0.0501058631533,0.0499192105174,0.0499814280627,0.0504376900616,0.0500229064263,0.0503754725163,0.0501888198804,0.0500851239716,0.050043645608,0.0497118186997,0.0493799917914,0.0497118186997,0.0487370771566,0.0482393367941,0.048343032703,0.0481149017035,0.048343032703,0.0478867707041,0.0473890303416,0.0479489882494,0.0484467286118,0.0478452923405,0.0482808151577,0.0484052502483,0.0482600759759,0.0481149017035,0.0485504245207,0.0487370771566,0.0491933391555,0.0491933391555,0.0481978584306,0.0484467286118,0.0481563800671,0.0483637718848,0.0482600759759,0.0478867707041,0.0479489882494,0.0477208572499,0.0484467286118,0.0486748596113,0.0488200338837,0.049151860792,0.0493799917914,0.0491311216102,0.0490481648831,0.049504426882,0.0491725999737,0.0495459052456,0.0489237297925,0.0487992947019,0.0485711637024,0.0476793788864,0.0480319449765,0.0482808151577,0.0486955987931,0.0485919028842,0.0486333812478,0.0485504245207,0.0483845110665,0.0478867707041,0.0484259894301,0.0486955987931,0.0483637718848,0.0482808151577,0.0480526841582,0.0476586397046,0.0471816385239,0.0470572034333,0.046642419798,0.0465179847073,0.0463313320714,0.0466631589797,0.0465387238891,0.046103201072,0.0463105928897,0.0463935496167,0.0462483753443,0.046103201072,0.0462276361626,0.0459787659814,0.0457713741637,0.0450455028018,0.0447966326205,0.0448588501658,0.0442781530763,0.0439878045316,0.0443403706216,0.044485544894,0.0448588501658,0.0451699378924,0.0449625460747,0.0455432431642,0.0459787659814,0.0457091566184,0.0462898537079,0.0462068969808,0.0457921133454,0.0460409835267,0.0454188080736,0.0459995051631,0.0463935496167,0.0459787659814,0.0457506349819,0.0459372876178,0.045563982346,0.0456261998913,0.0459787659814,0.046103201072,0.0456884174366,0.04502476362,0.0443818489852,0.0448381109841,0.0455017648007,0.0464972455256,0.0467046373433,0.0473268127963,0.0474305087052,0.0467668548886,0.0473890303416,0.0472438560692,0.0478245531588,0.0473682911599,0.0468290724339,0.0459787659814,0.0464765063438,0.0461239402537,0.0462276361626,0.0466009414344,0.046725376525,0.0473060736146,0.0473268127963,0.047534204614,0.0472231168875,0.0475549437958,0.0470986817969,0.0469327683427,0.0469327683427,0.0468912899792,0.0473682911599,0.0466009414344,0.046455767162,0.0473268127963,0.0467875940703,0.0466838981615,0.0474305087052,0.0479282490676,0.0479489882494,0.0476171613411,0.0474097695234,0.0481771192488,0.0481978584306,0.0475964221593,0.0482600759759,0.0482393367941,0.0473268127963,0.0466631589797,0.0463520712532,0.046725376525,0.0457506349819,0.0456469390731,0.0460824618902,0.0454810256189,0.0453773297101,0.044755154257,0.044755154257,0.0453151121648,0.0456054607095,0.0450455028018,0.045916548436,0.0457921133454,0.0451906770741,0.0457091566184,0.0459580267996,0.0467668548886,0.0471401601604,0.0473060736146,0.0472023777057,0.0474305087052,0.0474719870687,0.0473890303416,0.0474719870687,0.0475964221593,0.0470157250698,0.0471194209786,0.0468912899792,0.0461239402537,0.0461239402537,0.046103201072,0.0460617227084,0.0458750700725,0.0451491987106,0.0454602864371,0.046186157799,0.0454602864371,0.0451906770741,0.0459995051631,0.0459372876178,0.046372810435,0.0464350279803,0.0464142887985,0.0473475519781,0.0465179847073,0.0457298958001,0.0460409835267,0.0460409835267,0.0456884174366,0.0451284595288,0.0446514583482,0.0442366747128,0.0441122396222,0.0440915004404,0.0448173718023,0.0459580267996,0.0454395472554,0.0456261998913,0.0457298958001,0.0458958092543,0.0461446794355,0.0462691145261,0.0466838981615,0.0466216806162,0.0456676782548,0.0452321554377,0.0456261998913,0.0452736338012,0.0452528946194,0.0454395472554,0.0454188080736,0.0453565905283,0.0448795893476,0.045833591709,0.0459580267996,0.0457921133454,0.0460617227084,0.0464142887985,0.0462276361626,0.046186157799,0.046186157799,0.0464765063438,0.0469742467063,0.0455432431642,0.0455432431642,0.045294372983,0.0452528946194,0.0450455028018,0.0450662419835,0.0448381109841,0.0455432431642,0.0451699378924,0.045294372983,0.045916548436,0.0464765063438,0.0466009414344,0.046725376525,0.045916548436,0.0459995051631,0.0460824618902,0.04502476362,0.0449418068929,0.0446929367117,0.0446929367117,0.0442574138945,0.0444025881669,0.044215935531,0.0452528946194,0.044755154257,0.0449210677111,0.0453358513465,0.0454810256189,0.0454395472554,0.0451699378924,0.0455432431642,0.0450040244382,0.0445270232575,0.0441951963492,0.0442988922581,0.0445685016211,0.0444233273487,0.0440707612586,0.044215935531,0.0444233273487,0.0444648057122,0.0446721975299,0.0450040244382,0.0447758934388,0.0449003285294,0.044755154257,0.0445477624393,0.0448381109841,0.0449832852565,0.0442781530763,0.0440500220769,0.0439255869862,0.0438426302592,0.044485544894,0.0446514583482,0.0449625460747,0.0454188080736,0.0455225039824,0.0450662419835,0.0458750700725,0.045833591709,0.0459372876178,0.0460202443449,0.0460617227084,0.0460202443449,0.0459995051631,0.0452114162559,0.0446721975299,0.0447966326205,0.0445062840758,0.0446929367117,0.0447966326205,0.0446721975299,0.0440500220769,0.0440707612586,0.0440500220769,0.0448381109841,0.045563982346,0.0411465366292,0.0367083517307,0.0319590791057,0.0275001550254,0.0)
m <- c(0.026828670345,0.0312860983334,0.0358696799441,0.0400117238766,0.0436281277162,0.0435860765088,0.0434388972828,0.0441958190166,0.043943511772,0.0442588958278,0.0435650509051,0.0435440253014,0.0435019740939,0.0436071021125,0.044321972639,0.044469151865,0.0441327422055,0.0439224861683,0.0441958190166,0.0440276141869,0.0439855629795,0.0435440253014,0.0433547948679,0.0430183852084,0.0429132571898,0.0421983866634,0.0421983866634,0.0417989001927,0.0413573625146,0.0415676185518,0.040957876044,0.0410840296663,0.0408527480254,0.0409158248365,0.0405583895733,0.0408317224217,0.040957876044,0.0404532615547,0.0405373639696,0.0399906982729,0.0398855702543,0.0400537750841,0.0400958262915,0.0402430055175,0.0403481335361,0.0402640311213,0.0400537750841,0.0406214663845,0.0400327494804,0.040579415177,0.0404532615547,0.0401799287064,0.0404112103473,0.0398435190469,0.0401799287064,0.0406845431956,0.0404742871584,0.0402219799138,0.0409368504403,0.0405163383659,0.0413573625146,0.0413363369109,0.0409789016477,0.0411891576849,0.040579415177,0.040579415177,0.0408106968179,0.0406004407808,0.0401799287064,0.0404532615547,0.0400748006878,0.0409158248365,0.0407055687993,0.0406214663845,0.0409999272514,0.0411891576849,0.0413994137221,0.0415045417407,0.0416517209667,0.0408317224217,0.0403060823287,0.039086597313,0.0390235205019,0.0392548021428,0.0394650581799,0.0391286485204,0.0388342900684,0.0386660852386,0.0387291620498,0.0390655717093,0.039233776539,0.0392758277465,0.0398014678394,0.0398855702543,0.0393178789539,0.0390655717093,0.0391496741242,0.0394440325762,0.0393809557651,0.039233776539,0.0386240340312,0.0387501876535,0.0385399316163,0.0379301891085,0.0382455731643,0.0375307026378,0.0376358306564,0.0375307026378,0.0375096770341,0.0379722403159,0.0387081364461,0.0387501876535,0.0379512147122,0.03856095722,0.0383507011829,0.0388973668795,0.0383927523903,0.0380563427308,0.0381404451457,0.0384558292015,0.0388342900684,0.0393599301614,0.0395701861985,0.0393599301614,0.0395281349911,0.039759416632,0.0392548021428,0.0391706997279,0.038939418087,0.0384348035977,0.037740958675,0.0372994209969,0.0377830098825,0.0381404451457,0.0382455731643,0.0383296755791,0.0388763412758,0.0392758277465,0.0398014678394,0.0402009543101,0.0409158248365,0.0412312088923,0.0415676185518,0.0408947992328,0.0413363369109,0.040957876044,0.0416096697593,0.0414835161369,0.0415676185518,0.0416517209667,0.0418830026076,0.0417358233816,0.0410630040626,0.0418199257964,0.0413783881183,0.0418409514002,0.0407686456105,0.0415886441555,0.0413363369109,0.0409368504403,0.0406635175919,0.0408106968179,0.0410209528551,0.0411260808737,0.0412732600998,0.0404532615547,0.0414624905332,0.0407265944031,0.0410419784588,0.0413573625146,0.04110505527,0.0409999272514,0.041252234496,0.0411681320812,0.0409158248365,0.0413573625146,0.04110505527,0.0414204393258,0.0411471064774,0.0406635175919,0.0406214663845,0.0407476200068,0.0409789016477,0.0407055687993,0.0406635175919,0.0412942857035,0.0413573625146,0.0410630040626,0.0416727465704,0.0422404378708,0.0427660779638,0.0425768475303,0.0420932586448,0.0423665914931,0.042976334001,0.0427030011526,0.0430394108121,0.0433968460753,0.042976334001,0.042597873134,0.0425137707192,0.042450693908,0.0424927451154,0.0420301818336,0.0415465929481,0.0417989001927,0.0417989001927,0.0414835161369,0.0411260808737,0.0413994137221,0.0416937721741,0.0420301818336,0.0427871035675,0.0432496668493,0.0432076156419,0.0430814620196,0.0434178716791,0.043943511772,0.044469151865,0.0437753069423,0.0427240267563,0.0424086427006,0.0421773610597,0.0424717195117,0.0428081291712,0.0431024876233,0.0424717195117,0.0425137707192,0.0425768475303,0.0426399243415,0.0429973596047,0.0430394108121,0.0429132571898,0.0424296683043,0.0420722330411,0.0414624905332,0.041630695363,0.0413573625146,0.0412732600998,0.0415255673444,0.0422824890783,0.0430394108121,0.0429973596047,0.0438804349609,0.0440276141869,0.0447214591096,0.0450999199766,0.0455624832584,0.0455204320509,0.045961969729,0.0454573552398,0.0454994064472,0.0467188914629,0.0462983793885,0.0469501731038,0.0465506866331,0.0461722257662,0.0467188914629,0.047013249915,0.0473286339707,0.0474758131968,0.0473706851782,0.0465927378406,0.0466978658592,0.046340430596,0.0463614561997,0.047013249915,0.0463614561997,0.0462773537848,0.0459409441253,0.0460040209365,0.0453522272212,0.0452681248063,0.0452050479951,0.0447214591096,0.0449737663542,0.0442168446204,0.0442168446204,0.0445112030724,0.045141971184,0.0451209455803,0.0457306880881,0.0461932513699,0.0463614561997,0.0464245330108,0.0468240194815,0.047454787593,0.0478542740637,0.0480224788934,0.047307608367,0.0474127363856,0.0475599156116,0.0477911972525,0.0481696581195,0.0495152967575,0.0496835015872,0.0492629895128,0.049178887098,0.0488845286459,0.049851706417,0.0499778600393,0.0495152967575,0.04947324555,0.0490106822682,0.0487373494199,0.0494522199463,0.0502722184913,0.0499568344356,0.0503773465099,0.0495573479649,0.0496414503798,0.0503352953025,0.0494101687389,0.0496204247761,0.0501881160765,0.0492419639091,0.049326066324,0.0496835015872,0.0492840151166,0.0497886296058,0.0507137561694,0.050524525736,0.0513024730736,0.0512814474698,0.0500619624542,0.0502932440951,0.049998885643,0.0507137561694,0.0514076010922,0.0516809339405,0.0512814474698,0.0515337547145,0.0516178571293,0.0523117020521,0.053215803012,0.0531947774082,0.0529004189562,0.0523327276558,0.051491703507,0.0513865754884,0.0515758059219,0.0510501658289,0.0515758059219,0.0515547803182,0.0517650363554,0.0518911899777,0.0523117020521,0.0529634957673,0.053215803012,0.0531737518045,0.0540988783681,0.0549399025169,0.0544352880276,0.0540988783681,0.0536993918975,0.0539727247458,0.0541619551793,0.0536573406901,0.0538675967272,0.0542670831979,0.0531737518045,0.0535942638789,0.0540988783681,0.0538675967272,0.0538465711235,0.0532368286157,0.0528583677487,0.0529634957673,0.0533419566343,0.0535732382752,0.0532999054268,0.0533419566343,0.0534681102566,0.0537414431049,0.0547296464797,0.0550450305355,0.0559911827028,0.0563906691735,0.0558860546842,0.0558229778731,0.0569583604739,0.0565378483995,0.0561593875326,0.0565588740032,0.05620143874,0.0559701570991,0.0557388754582,0.0555075938173,0.0565378483995,0.057021437285,0.056874258059,0.0567060532293,0.0572527189259,0.0580096406598,0.0585142551491,0.0592081000718,0.0587245111863,0.059712714561,0.060091175428,0.0592711768829,0.0591029720532,0.0595024585238,0.0595234841276,0.058892716016,0.058367075923,0.0589347672234,0.0599229705982,0.0595024585238,0.0593552792978,0.0597757913722,0.0600280986168,0.059418356109,0.0592081000718,0.0600280986168,0.0601122010317,0.0595024585238,0.0595234841276,0.0599650218057,0.0599650218057,0.0605537387098,0.0607429691432,0.0618783517441,0.0616260444994,0.0614788652734,0.061583993292,0.0625932222705,0.0623198894221,0.0618363005366,0.0618993773478,0.0610163019916,0.0612475836325,0.0605327131061,0.0618993773478,0.0614578396697,0.0618783517441,0.0619204029515,0.0618152749329,0.0628875807225,0.0629927087411,0.0637286048713,0.0640860401345,0.0647168082461,0.0643593729829,0.064948089887,0.0648219362647,0.0650111666981,0.0654106531688,0.0646747570386,0.0649901410944,0.0652844995465,0.0645275778126,0.0652003971316,0.0649060386795,0.0644855266052,0.0649901410944,0.0653055251502,0.065620909206,0.0661886005064,0.0665039845622,0.0670296246551,0.0677024439741,0.067639367163,0.0680809048411,0.0683542376894,0.0681019304448,0.067786546389,0.0682491096708,0.0678285975964,0.0673870599183,0.0669244966365,0.0678285975964,0.0679968024262,0.0679127000113,0.0690060314047,0.0700573115906,0.0702255164204,0.0699101323646,0.0705409004761,0.070330644439,0.0702675676278,0.0696788507237,0.070330644439,0.0710455149654,0.0702465420241,0.0702044908166,0.0712557710026,0.0718655135104,0.0722229487736,0.0728537168852,0.0735265362042,0.0740311506934,0.0736106386191,0.0730639729224,0.0737157666377,0.0740732019009,0.072643460848,0.0729167936964,0.0730639729224,0.0737578178451,0.0747670468236,0.0744096115604,0.0745567907864,0.0750403796719,0.0752716613128,0.074514739579,0.0757131989909,0.0759655062356,0.0762388390839,0.0760496086504,0.0756290965761,0.0757552501984,0.0763229414988,0.0765121719322,0.0767855047806,0.0773952472884,0.0776896057405,0.0780049897963,0.0779208873814,0.0783624250595,0.0795398588677,0.079518833264,0.0789301163599,0.0794978076603,0.0795819100752,0.0801706269793,0.0804439598276,0.0799813965458,0.0803808830165,0.0808224206946,0.0793296028306,0.0801496013756,0.0812008815615,0.0818526752768,0.0822731873512,0.0826936994255,0.082882929859,0.0829880578776,0.083702928404,0.0833454931408,0.0841024148747,0.0841654916858,0.0841654916858,0.0838711332338,0.0844177989305,0.0847121573825,0.0849854902309,0.0867936921507,0.087067024999,0.0876136906957,0.0879711259589,0.088559842863,0.0894218926155,0.0895270206341,0.0894008670118,0.0902208655568,0.0906413776312,0.0903049679717,0.089611123049,0.089611123049,0.0902418911605,0.0908936848758,0.0911459921204,0.0905993264238,0.0914613761762,0.0913562481576,0.0917347090246,0.0916506066097,0.0928700916254,0.0935218853407,0.0941526534522,0.0941526534522,0.0937741925853,0.0954352152791,0.0953931640716,0.0950147032047,0.0951829080344,0.0958767529571,0.0960659833906,0.0968018795208,0.0964444442576,0.0967177771059,0.0973695708212,0.0967388027096,0.0969280331431,0.0968859819356,0.0968649563319,0.0971382891803,0.0969490587468,0.0969280331431,0.0973485452175,0.0981685437625,0.0983577741959,0.099324951967,0.0993670031744,0.100838795435,0.101406486735,0.102331613299,0.103782379955,0.104350071256,0.105401351442,0.106810066891,0.109480318563,0.113580311288,0.118878763425,0.123125935377,0.127415158535,0.13258745705,0.136834629001,0.142406413987,0.147326405257,0.151384346774,0.155253057859,0.158743308076,0.160215100336,0.16261201916,0.165934064548,0.167616112845,0.171001235044,0.175795072692,0.180126347058,0.183090957182,0.186181720929,0.187169924304,0.188347358112,0.188368383716,0.187380180341,0.187127873096,0.185214543158,0.181198652848,0.177960709875,0.177224813745,0.175122253373,0.173881742753,0.174007896376,0.174113024394,0.174996099751,0.173965845168,0.174827894921,0.175647893466,0.175816098296,0.174743792506,0.174155075602,0.173229949038,0.172452001701,0.172515078512,0.173061744208,0.174176101205,0.174218152413,0.174449434054,0.175374560617,0.176530968822,0.179033015664,0.181408908885,0.182859675541,0.183406341238,0.183343264427,0.183658648483,0.184667877461,0.184836082291,0.186539156192,0.1871488987,0.187653513189,0.188326332508,0.187737615604,0.188116076471,0.188263255697,0.189440689505,0.190407867276,0.193162221363,0.192762734893,0.193856066286,0.194907346472,0.196147857091,0.197556572541,0.199617081705,0.200584259476,0.202770922263,0.205798609198,0.206345274895,0.2075016831,0.2086370657,0.209583217868,0.210529370035,0.211643727032,0.211475522202,0.212842186444,0.21282116084,0.210466293224,0.209288859416,0.208616040097,0.208910398549,0.207817067155,0.207207324648,0.207753990344,0.208826296134,0.209940653131,0.208763219323,0.210213985979,0.211097061335,0.212001162295,0.212737058426,0.211643727032,0.212106290314,0.212589879199,0.212064239107,0.211980136692,0.212800135237,0.212716032822,0.213935517837,0.213515005763,0.21191705988,0.214440132327,0.215007823627,0.215680642946,0.216122180624,0.215470386909,0.216584743906,0.216122180624,0.215827822172,0.217068332792,0.217215512018,0.215680642946,0.21462936276,0.213073468085,0.212127315918,0.211391419788,0.210298088394,0.209793473905,0.210066806753,0.209183731397,0.209457064245,0.209436038642,0.210403216413,0.210991933317,0.211580650221,0.211938085484,0.212484751181,0.212442699973,0.212568853596,0.214124748271,0.21479756759,0.214145773875,0.212884237652,0.21118116375,0.209309885019,0.208700142512,0.204894508238,0.201887846907,0.197577598144,0.192468376441,0.187569410774,0.185088389535,0.180694038358,0.177960709875,0.174869946128,0.171758156778,0.169992006065,0.168793546654,0.167510984827,0.167174575167,0.166186371792,0.164630477117,0.164062785817,0.163642273742,0.163474068913,0.162023302256,0.161560738974,0.161077150089,0.160635612411,0.159899716281,0.160278177147,0.159794588262,0.15966843464,0.159815613866,0.159079717735,0.159689460243,0.159037666528,0.158469975228,0.157061259778,0.155757672348,0.155168955444,0.155610493122,0.155799723555,0.153823316806,0.153024343864,0.15113203953,0.152057166093,0.151237167548,0.151237167548,0.151531526,0.150984860304,0.150101784948,0.148840248724,0.149008453554,0.149176658384,0.148335634235,0.146485381108,0.145728459374,0.145854612996,0.144950512037,0.144382820736,0.14316333572,0.142616670024,0.141901799497,0.141775645875,0.142070004327,0.141670517856,0.142532567609,0.140829493708,0.140451032841,0.139588983088,0.140135648785,0.14095564733,0.14259564442,0.142133081138,0.141712569064,0.141460261819,0.140177699992,0.140093597578,0.140114623181,0.140030520766,0.139273599032,0.137991037206,0.136182835286,0.1351315551,0.135404887948,0.135173606307,0.134858222252,0.13496335027,0.133050020332,0.132944892313,0.132314124202,0.131725407297,0.13021156383,0.131325920827,0.130316691848,0.130169512622,0.129791051755,0.128886950795,0.129412590888,0.128487464325,0.128319259495,0.12676336482,0.127310030517,0.125417726182,0.124618753241,0.124744906863,0.125039265315,0.124534650826,0.124282343581,0.124240292374,0.123525421847,0.125228495748,0.124324394789,0.124807983674,0.124976188504,0.123819780299,0.122495167265,0.122284911228,0.12314696098,0.122936704943,0.121422861475,0.120455683704,0.1198669668,0.119341326707,0.118710558596,0.118899789029,0.117554150391,0.117007484694,0.115619794849,0.115073129152,0.116271588564,0.116145434942,0.116292614168,0.115367487604,0.115830050886,0.115283385189,0.115661846056,0.115787999679,0.11568287166,0.115178257171,0.115325436397,0.114105951381,0.113412106459,0.112655184725,0.111204418068,0.11093108522,0.112003391009,0.111393648502,0.110111086675,0.109984933052,0.107756219058,0.107503911814,0.107503911814,0.107440835002,0.107377758191,0.107020322928,0.106557759646,0.106347503609,0.105800837912,0.104959813764,0.103635200729,0.101616742772,0.0989675167038,0.0966967515022,0.0949095751861,0.0913352225539,0.0871511274139,0.0828619042553,0.0801706269793,0.077206016855,0.0765121719322,0.0745988419938,0.0734214081856,0.0724542304145,0.0706460284947,0.070330644439,0.0701203884018,0.0699311579683,0.0697839787423,0.0690901338196,0.0687537241601,0.0693424410642,0.0696788507237,0.069279364253,0.0694475690828,0.0692583386493,0.0689639801972,0.0698260299497,0.0698891067609,0.0704988492687,0.0694265434791,0.0691952618382,0.0686906473489,0.0683962888968,0.0681019304448,0.0684803913117,0.0685014169154,0.0685224425192,0.0674921879369,0.0672188550886,0.0673450087109,0.0673029575035,0.0667983430142,0.0664619333547,0.0657260372246,0.0650532179056,0.0651793715279,0.0644855266052,0.0654737299799,0.0648009106609,0.0646327058312,0.0643593729829,0.064275270568,0.0639598865122,0.0637286048713,0.064275270568,0.0636655280601,0.063602451249,0.0627193758928,0.0626983502891,0.063602451249,0.0630557855523,0.062403991837,0.062782452704,0.0626983502891,0.0615209164808,0.0613737372548,0.0611214300102,0.0617101469143,0.0612475836325,0.0610373275953,0.0609742507841,0.0619414285552,0.0618783517441,0.0617942493292,0.0623619406296,0.0621937357998,0.0622147614036,0.0614788652734,0.0614578396697,0.0611004044065,0.0614578396697,0.0607429691432,0.0605116875023,0.0603014314652,0.0596075865424,0.0592291256755,0.0589347672234,0.0587875879974,0.0592501512792,0.058219896697,0.0573578469445,0.0568952836627,0.0571265653036,0.0569163092664,0.0570004116813,0.0573788725483,0.0577152822078,0.0577573334152,0.0575260517743,0.0581357942821,0.0584932295453,0.0592081000718,0.0595234841276,0.0596916889573,0.0592291256755,0.0588086136011,0.0583460503193,0.0588086136011,0.0587875879974,0.0581357942821,0.0586614343751,0.0585142551491,0.0581778454896,0.0584091271305,0.0584091271305,0.0585983575639,0.0588716904123,0.0577993846226,0.0572947701334,0.0573157957371,0.0565378483995,0.0564327203809,0.0559701570991,0.0560122083065,0.0560122083065,0.0561173363251,0.0559070802879,0.0559491314954,0.0555706706285,0.0561173363251,0.0567481044367,0.0561383619289,0.0561173363251,0.0557388754582,0.0555075938173,0.0548978513095,0.0553183633838,0.0556968242508,0.0563696435698,0.0559911827028,0.0554024657987,0.0557388754582,0.0561173363251,0.0560963107214,0.0563275923623,0.0560963107214,0.0555075938173,0.055675798647,0.0554024657987,0.0552132353652,0.0548768257057,0.0544983648388,0.0542670831979,0.0545404160462,0.0538675967272,0.0542040063867,0.0540147759533,0.0538465711235,0.0536363150863,0.0530896493896,0.0530055469748,0.0531527262008,0.0525219580892,0.0520804204112,0.0522906764483,0.0524588812781,0.0516599083368,0.0509029866029,0.0510291402252,0.051870164374,0.0523747788632,0.0524799068818,0.0525640092967,0.0524168300707,0.0526060605041,0.0526481117116,0.0526691373153,0.0530896493896,0.0527532397301,0.052164522826,0.0515758059219,0.0511342682438,0.0512604218661,0.051491703507,0.0519122155814,0.0517229851479,0.0529004189562,0.0530475981822,0.0527322141264,0.0521434972223,0.0518911899777,0.0516809339405,0.0513655498847,0.051870164374,0.0510922170364,0.0508819609992,0.0503983721137,0.0498937576244,0.0500829880579,0.0503352953025,0.0508819609992,0.0509450378103,0.0514076010922,0.0507768329806,0.0510922170364,0.050818884188,0.0503983721137,0.0503563209062,0.0505665769434,0.050671704962,0.0505876025471,0.0504614489248,0.0501670904728,0.0499778600393,0.0496204247761,0.0495152967575,0.0489896566645,0.0489265798534,0.0484219653641,0.0486742726087,0.0483378629492,0.0482327349306,0.04783324846,0.047307608367,0.0469291475001,0.0471394035373,0.0475388900079,0.0472445315559,0.0474337619893,0.0474127363856,0.047013249915,0.0471183779335,0.0469922243112,0.047160429141,0.0474758131968,0.0473286339707,0.0469922243112,0.0471183779335,0.0469291475001,0.0465086354257,0.0469501731038,0.0477070948377,0.0477911972525,0.048653247005,0.0488635030422,0.0489686310608,0.0497465783984,0.0500409368504,0.0502722184913,0.0504193977174,0.0507558073769,0.0495573479649,0.0495783735686,0.0497886296058,0.0495152967575,0.0496835015872,0.0496624759835,0.0494942711538,0.0497255527947,0.0503352953025,0.0494311943426,0.0496204247761,0.049326066324,0.0484850421753,0.0484009397604,0.0478752996674,0.0477911972525,0.0475809412154,0.0471183779335,0.0468660706889,0.0469291475001,0.047013249915,0.0472865827633,0.0479173508749,0.0477491460451,0.0478963252711,0.0473286339707,0.0474127363856,0.0473706851782,0.0466768402555,0.0464035074071,0.0469081218964,0.0475388900079,0.0464245330108,0.0464455586145,0.0461301745588,0.0467188914629,0.0463614561997,0.0462353025774,0.0464665842183,0.0469501731038,0.0469711987075,0.0465506866331,0.0470763267261,0.047160429141,0.0469291475001,0.0468870962926,0.0470553011224,0.0476440180265,0.047307608367,0.0471394035373,0.0468870962926,0.0468240194815,0.0468870962926,0.0423455658894,0.0380983939382,0.0330943002532,0.0286578978686,0.0)
ycorr <- c(7.06015482116e-05,7.03995578294e-05,6.97924929112e-05,6.87761774555e-05,6.73540603995e-05,6.5525991955e-05,6.3291586604e-05,6.10114570476e-05,5.86879290811e-05,5.63284089756e-05,5.39409476192e-05,5.1535726172e-05,4.91310906663e-05,4.67410074178e-05,4.43717303761e-05,4.20290256492e-05,3.97194609067e-05,3.74397178539e-05,3.51899773569e-05,3.296378354e-05,3.07612035257e-05,2.85781714702e-05,2.64050811356e-05,2.42314951141e-05,2.20562979379e-05,1.98818833014e-05,1.77033554178e-05,1.5519408719e-05,1.33298784991e-05,1.11350186706e-05,8.93457158316e-06,6.7245248592e-06,4.50677017414e-06,2.28212235598e-06,4.77341432034e-08,-2.20485237485e-06,-4.47830769172e-06,-6.77137484451e-06,-9.08359431164e-06,-1.14110227736e-05,-1.37536765668e-05,-1.61104986404e-05,-1.84815379244e-05,-2.08687230734e-05,-2.32719503017e-05,-2.56887277784e-05,-2.81152074914e-05,-3.05491662756e-05,-3.29922176763e-05,-3.54467764242e-05,-3.79161486906e-05,-4.04020060543e-05,-4.29080126667e-05,-4.54331403744e-05,-4.79758058024e-05,-5.05356927848e-05,-5.31170749267e-05,-5.57222941192e-05,-5.8353991773e-05,-6.10114792984e-05,-6.36970319059e-05,-6.64154923158e-05,-6.91641142256e-05,-7.19378064682e-05,-7.47382360988e-05,-7.75674297783e-05,-8.04244154685e-05,-8.33061887059e-05,-8.62099817751e-05,-8.91358462419e-05,-9.20826603663e-05,-9.50410209083e-05,-9.80016777067e-05,-0.00010096225373,-0.000103924989339,-0.000106886570487,-0.000109843793532,-0.000112797961074,-0.000115749104028,-0.00011869908676,-0.000121642961833,-0.000124583827071,-0.000127529402188,-0.000130485621685,-0.000133456935572,-0.000136435298373,-0.000139423967464,-0.000142424916127,-0.00014543601426,-0.000148454920758,-0.000151481544712,-0.000154519442282,-0.000157567666343,-0.000160622354521,-0.000163675223974,-0.00016673239505,-0.000169799960704,-0.000172876341747,-0.000175960742184,-0.000179052429597,-0.000182154987928,-0.000185264385963,-0.000188378136487,-0.000191496732631,-0.000194623141894,-0.000197756821303,-0.000200885865117,-0.000204006651061,-0.000207116883589,-0.000210214268614,-0.000213296327859,-0.000216357893203,-0.000219403488843,-0.000222433235792,-0.00022544536619,-0.000228440108206,-0.000231428130793,-0.000234415104595,-0.000237405079435,-0.000240400895795,-0.000243407238022,-0.000246425508325,-0.000249457402852,-0.000252502060129,-0.000255558137106,-0.000258621147729,-0.000261683953457,-0.000264732821948,-0.000267759755253,-0.000270761347039,-0.000273725332774,-0.000276642964287,-0.000279505049773,-0.000282302501328,-0.000285026775719,-0.000287677404214,-0.000290248849675,-0.000292744398584,-0.00029516833412,-0.00029752151558,-0.000299802997166,-0.000302024453129,-0.000304191496552,-0.000306314774844,-0.000308401377887,-0.000310455215386,-0.000312479403161,-0.000314483987703,-0.000316471767205,-0.000318444572177,-0.000320409895142,-0.000322370811138,-0.000324327228532,-0.00032627856514,-0.00032822495082,-0.000330166939632,-0.000332108004963,-0.000334047791939,-0.000335981794449,-0.000337911279411,-0.000339834655812,-0.000341747085379,-0.000343645052648,-0.000345524210943,-0.000347384019089,-0.000349227456992,-0.000351055864477,-0.000352864058413,-0.000354652624139,-0.000356420270596,-0.000358169183581,-0.00035990030453,-0.000361615466573,-0.000363319006167,-0.000365014563233,-0.000366699702164,-0.000368368785551,-0.000370022423897,-0.000371664517453,-0.000373293256625,-0.00037490867232,-0.000376506117738,-0.000378088704685,-0.000379656005704,-0.000381206247603,-0.000382738276744,-0.00038425474778,-0.000385756815236,-0.000387244270517,-0.000388719077721,-0.000390182728658,-0.000391641092083,-0.000393091975153,-0.00039453364955,-0.000395966484528,-0.000397392908045,-0.000398815486404,-0.000400240297137,-0.000401667662724,-0.000403096290795,-0.00040452264411,-0.000405945785237,-0.000407363849044,-0.000408781155334,-0.000410197371693,-0.000411610746832,-0.000413018487664,-0.000414415455361,-0.000415792842758,-0.00041715121243,-0.000418492090397,-0.000419814402776,-0.000421119987282,-0.000422405996025,-0.000423671781106,-0.000424917773771,-0.000426145310982,-0.000427351512045,-0.000428546602991,-0.000429732879908,-0.000430910717434,-0.0004320804857,-0.000433242779848,-0.000434397161372,-0.000435545385182,-0.000436687015113,-0.000437819304295,-0.000438945680451,-0.000440064511931,-0.000441168974696,-0.000442261297873,-0.000443341046165,-0.000444406021251,-0.000445458830007,-0.000446497506954,-0.000447520018564,-0.000448528930653,-0.000449524696568,-0.000450503886363,-0.00045147134608,-0.000452424958222,-0.000453360389494,-0.000454276614717,-0.000455175827601,-0.000456057030653,-0.000456918897844,-0.000457764513682,-0.000458590127644,-0.000459399593244,-0.000460191716999,-0.000460967554912,-0.000461728110619,-0.000462477113096,-0.000463212676249,-0.000463933720707,-0.000464645027044,-0.000465348294437,-0.000466043764156,-0.000466729944048,-0.000467406906625,-0.000468076192595,-0.000468738411892,-0.000469393901256,-0.000470041716891,-0.000470685614523,-0.000471326348249,-0.000471956500476,-0.000472576271185,-0.000473184617038,-0.000473782813886,-0.000474370642951,-0.000474950429055,-0.000475522066412,-0.000476084915987,-0.000476638608907,-0.000477177912602,-0.000477704369203,-0.000478222104087,-0.000478732472622,-0.000479236118406,-0.00047973150093,-0.000480215479748,-0.000480683896877,-0.000481135191257,-0.000481569821835,-0.000481983130723,-0.00048237291845,-0.00048273021826,-0.000483048220365,-0.000483322574453,-0.000483545386083,-0.000483712893083,-0.000483821052291,-0.000483868480821,-0.000483849732656,-0.00048376853265,-0.000483629573317,-0.000483438495218,-0.000483202476543,-0.000482925075146,-0.000482611642469,-0.000482271251118,-0.000481909360399,-0.000481532096818,-0.000481142107595,-0.000480744519758,-0.000480337533887,-0.00047992292938,-0.000479500104906,-0.00047906836737,-0.000478628634867,-0.000478177690101,-0.000477717680715,-0.000477246486013,-0.000476765502454,-0.000476272293631,-0.00047576707792,-0.000475249491608,-0.000474718356095,-0.000474174701847,-0.000473620103491,-0.000473056857014,-0.000472485479215,-0.000471903187943,-0.000471313336721,-0.000470716099135,-0.000470115490176,-0.000469510266189,-0.00046889969691,-0.000468283393894,-0.000467661816755,-0.000467033783288,-0.000466397930486,-0.000465756535998,-0.000465106868412,-0.000464448683735,-0.00046378018955,-0.000463099930218,-0.000462409326477,-0.000461708354968,-0.000460998673254,-0.000460279267869,-0.000459550001649,-0.000458810023532,-0.000458058832058,-0.000457300476054,-0.000456532617236,-0.000455753923507,-0.000454966761738,-0.000454171416089,-0.000453366232512,-0.000452551443094,-0.000451726807862,-0.000450893361417,-0.000450050983753,-0.000449199048954,-0.000448336024439,-0.00044746817696,-0.00044659603326,-0.000445717911741,-0.000444834308921,-0.000443945048842,-0.00044305032696,-0.000442150920802,-0.00044124564424,-0.000440333902916,-0.000439416709856,-0.000438491162537,-0.000437552517625,-0.000436601030288,-0.000435636457008,-0.000434657459158,-0.000433665479834,-0.000432658386504,-0.000431638580432,-0.000430603783038,-0.000429554567506,-0.000428489601125,-0.00042741291179,-0.000426324177612,-0.000425224915908,-0.000424116841537,-0.000423001153079,-0.00042187939259,-0.000420752040124,-0.00041962054985,-0.000418487978624,-0.0004173568659,-0.000416227686853,-0.000415100107225,-0.000413973769124,-0.000412847685091,-0.000411720438597,-0.000410592675717,-0.000409463992922,-0.000408332812959,-0.000407197291107,-0.000406055517135,-0.000404905764958,-0.000403749144356,-0.000402584601597,-0.00040141397271,-0.000400237951151,-0.000399053155455,-0.00039785665707,-0.000396648519108,-0.000395428992252,-0.000394197730868,-0.000392954860911,-0.000391700121271,-0.000390431337484,-0.000389148416866,-0.000387849439115,-0.000386535762924,-0.000385210244788,-0.000383875807848,-0.000382532307293,-0.000381180027385,-0.000379817715625,-0.000378446919419,-0.000377068536662,-0.000375682252259,-0.000374290116944,-0.000372893935095,-0.000371493053479,-0.000370086877796,-0.000368674397521,-0.000367256058169,-0.000365834009023,-0.000364408029962,-0.000362979173633,-0.000361546822293,-0.000360111368353,-0.000358671747485,-0.000357227447694,-0.000355776163811,-0.000354318465781,-0.0003528534769,-0.000351381709226,-0.000349901803927,-0.000348412010038,-0.000346911760853,-0.000345399554704,-0.00034387435507,-0.000342333895342,-0.000340779151929,-0.000339210427516,-0.000337627526152,-0.000336029190112,-0.000334413652829,-0.000332780949038,-0.000331133418551,-0.000329469151374,-0.000327789428584,-0.00032609752962,-0.000324396131756,-0.000322685614636,-0.000320968553155,-0.000319244833837,-0.000317516322057,-0.000315784627649,-0.000314050621011,-0.000312314390302,-0.000310578572276,-0.000308842053695,-0.000307101931108,-0.000305355849331,-0.000303600852486,-0.00030183655766,-0.000300064432981,-0.000298285581682,-0.000296497492442,-0.000294700791618,-0.000292893424464,-0.000291073295417,-0.000289240665675,-0.000287395438351,-0.000285538634442,-0.000283670218912,-0.000281789729215,-0.000279894998033,-0.000277986358846,-0.00027606488555,-0.000274128535687,-0.000272178883768,-0.000270216594906,-0.000268245080207,-0.000266265232816,-0.000264278520166,-0.000262284126377,-0.000260281487393,-0.000258269972365,-0.000256248037567,-0.000254216480493,-0.00025217733639,-0.000250130856038,-0.000248076722902,-0.000246013283293,-0.000243940273185,-0.000241856870474,-0.000239764093215,-0.000237662776999,-0.000235553269405,-0.000233436240959,-0.000231310588265,-0.000229175011795,-0.000227027825666,-0.00022486885859,-0.000222696781536,-0.00022051098174,-0.000218310888935,-0.000216097613352,-0.000213870738026,-0.000211631554932,-0.000209379176613,-0.000207115422227,-0.000204839964001,-0.000202553768966,-0.000200255923377,-0.000197949191728,-0.000195635459368,-0.000193313558,-0.000190983525539,-0.000188643453347,-0.000186292752859,-0.000183929722423,-0.000181553496977,-0.000179165804322,-0.000176767436367,-0.000174359311743,-0.000171938261638,-0.000169503151228,-0.000167055308043,-0.000164594628071,-0.00016212201737,-0.000159637881394,-0.000157144294584,-0.000154637681939,-0.000152116640568,-0.000149580569788,-0.000147029074784,-0.000144463811527,-0.000141885803063,-0.000139295628513,-0.00013669438405,-0.00013408321801,-0.000131460436652,-0.000128827038485,-0.000126186617971,-0.000123537942503,-0.000120881325097,-0.000118217229736,-0.000115544613483,-0.00011286093882,-0.000110165398834,-0.000107457267165,-0.000104736917043,-0.000102008016724,-9.92690402553e-05,-9.65203531714e-05,-9.37628263485e-05,-9.09954411127e-05,-8.82171924076e-05,-8.54303176943e-05,-8.26352677033e-05,-7.98302555372e-05,-7.70136209843e-05,-7.41845828198e-05,-7.13426823036e-05,-6.84860361716e-05,-6.56145469824e-05,-6.27282775956e-05,-5.98305662402e-05,-5.69209546832e-05,-5.39985617071e-05,-5.1065363916e-05,-4.81245443218e-05,-4.51758462163e-05,-4.22179886378e-05,-3.92518561649e-05,-3.62797155797e-05,-3.32997524706e-05,-3.03097404186e-05,-2.73066130858e-05,-2.42930213161e-05,-2.12675929024e-05,-1.82283810182e-05,-1.51722799784e-05,-1.20993423105e-05,-9.00626485136e-06,-5.87867010122e-06,-2.70288362465e-06,5.34568782213e-07,3.8441793734e-06,7.28733147373e-06,1.06118975186e-05,1.38764383341e-05,1.70950644851e-05,2.02828835628e-05,2.34535010906e-05,2.66174053264e-05,2.97665564088e-05,3.28922947872e-05,3.59849844482e-05,3.90368597536e-05,4.19907697586e-05,4.51055397634e-05,4.832694474e-05,5.16433967022e-05,5.50439735811e-05,5.85160528848e-05,6.20484132589e-05,6.56397903918e-05,6.92867064585e-05,7.29842449546e-05,7.67264907169e-05,8.05065892071e-05,8.43160558011e-05,8.81478764383e-05,9.19940188576e-05,9.58465938123e-05,9.97003123717e-05,0.00010354857656,0.000107385040472,0.000111206223786,0.00011500772111,0.000118788423358,0.000122547906891,0.000126286944753,0.000130005581826,0.000133705332754,0.00013738519719,0.000141044433132,0.000144684322006,0.000148305609929,0.0001519095971,0.000155498845845,0.000159074539427,0.00016263988222,0.000166197815417,0.000169751025814,0.00017330331452,0.000176860138676,0.000180424948608,0.000184000795747,0.000187591233401,0.000191198602378,0.000194827811108,0.000198478692955,0.000202152622323,0.000205851144227,0.000209575216528,0.000213325090888,0.000217100776438,0.00022090574399,0.000224740163409,0.000228605686091,0.00023250133947,0.000236427065705,0.000240385155464,0.000244376102098,0.000248399492833,0.000252457512357,0.000256550513734,0.00026067816105,0.000264840494138,0.000269039413536,0.000273274685,0.00027754699486,0.000281854285938,0.000286196421885,0.000290574023934,0.000294984947892,0.000299426607448,0.000303895839858,0.000308389937722,0.000312903198513,0.000317431636611,0.000321971179337,0.000326522377303,0.00033108138603,0.000335644069857,0.000340204837641,0.000344762129244,0.000349314236076,0.000353861199602,0.000358401603597,0.000362937128644,0.000367467328313,0.000371989168478,0.000376499544916,0.000380999109682,0.000385489579104,0.000389971187526,0.000394443463548,0.000398904709794,0.000403353524241,0.000407790546557,0.000412216014119,0.000416630973206,0.000421037492686,0.000425436301883,0.000429828059164,0.000434212405784,0.000438591020302,0.000442965600916,0.000447339011634,0.000451709576311,0.000456076151229,0.000460436746821,0.00046478975857,0.000469134778585,0.000473470179459,0.000477796040633,0.000482112657499,0.000486418295069,0.000490711124701,0.000494989998111,0.000499259834132,0.000503519896782,0.000507771389823,0.000512014796652,0.00051625025807,0.000520477872388,0.000524693862012,0.000528896918037,0.000533087123162,0.00053726258219,0.000541419219739,0.000545553462744,0.000549663909732,0.000553746745725,0.000557797574415,0.000561813896671,0.000565793849891,0.000569736347403,0.000573635982966,0.000577489132135,0.000581290546024,0.000585036113006,0.000588719308231,0.000592335336673,0.000595878822495,0.000599345377984,0.000602729130791,0.000606023190966,0.00060922231901,0.000612322190216,0.000615317458207,0.000618208513475,0.000620996041228,0.000623677831335,0.000626257357753,0.000628736793944,0.000631117888953,0.000633405530774,0.000635606226555,0.000637727223163,0.000639778948556,0.000641768753962,0.000643702219121,0.000645588918438,0.000647437310869,0.000649252113459,0.000651041454759,0.000652813536928,0.000654573520688,0.000656323170137,0.000658066419921,0.00065980326709,0.000661533838733,0.000663258774721,0.000664974506024,0.000666682015885,0.000668378180183,0.000670057784848,0.000671716812899,0.00067335324791,0.000674962174963,0.000676538127219,0.000678080255288,0.000679585990975,0.000681052567623,0.000682476347211,0.000683854738725,0.00068518846287,0.000686476377323,0.000687717895008,0.000688910673253,0.000690058416162,0.000691160480422,0.000692215124977,0.000693223090553,0.00069418470517,0.000695101441592,0.000695972297367,0.000696797583671,0.000697579661371,0.000698319570681,0.00069901641963,0.000699670282484,0.000700280861569,0.000700848802161,0.000701373573774,0.000701853597638,0.000702286768841,0.000702672166719,0.000703006930805,0.000703288068106,0.000703513238002,0.000703683079613,0.000703796317638,0.000703854034978,0.000703853844106,0.000703795061025,0.000703679396925,0.000703505938466,0.000703275949728,0.000702991235092,0.000702653963934,0.000702264289174,0.000701823268252,0.000701329750509,0.000700785602957,0.000700192777583,0.000699551487989,0.000698863393722,0.000698130192766,0.000697351694999,0.000696527218985,0.000695654988621,0.000694735712753,0.000693769199476,0.000692756085515,0.000691695099427,0.000690588006963,0.000689437456572,0.00068824226282,0.000687005448187,0.000685729056648,0.000684415028066,0.000683065482545,0.000681681991916,0.000680264101701,0.000678813434976,0.000677328819043,0.000675808150026,0.000674253234863,0.000672662809956,0.000671036210314,0.000669373241387,0.000667673924733,0.000665939488379,0.000664171868786,0.000662374814569,0.000660550299761,0.000658702022368,0.000656830886667,0.000654936206681,0.000653018868926,0.000651079454689,0.000649119252865,0.000647137272298,0.000645132610422,0.000643103148679,0.000641045939184,0.000638957189243,0.0006368340819,0.000634677541199,0.000632486284913,0.000630261816988,0.000628003527349,0.000625709818227,0.000623383719949,0.000621026343518,0.000618638664735,0.000616224732181,0.000613788706825,0.000611334069649,0.000608861733392,0.000606374634669,0.000603874939449,0.000601365582625,0.000598848696421,0.000596322951849,0.000593789449175,0.000591247776217,0.00058869653121,0.000586132651955,0.000583557714489,0.000580969874694,0.000578362874266,0.000575732055627,0.000573069588299,0.000570372524581,0.000567637116199,0.00056485774037,0.000562028569366,0.000559145100903,0.000556203295656,0.000553195280075,0.000550119657399,0.000546977480462,0.000543768605251,0.000540494329601,0.000537153287206,0.000533746927601,0.000530278129548,0.000526749883335,0.000523165238115,0.000519527856921,0.000515842010161,0.000512109456651,0.000508333607722,0.000504518062537,0.000500670316059,0.000496794888966,0.000492896782342,0.0004889810194,0.000485051390073,0.000481111111547,0.000477164627864,0.000473216521474,0.000469271841276,0.000465334953448,0.000461406400283,0.000457486202067,0.000453576163347,0.000449676746107,0.000445789306687,0.000441917226973,0.000438058840372,0.000434213211488,0.000430377360491,0.000426546687635,0.000422719586392,0.000418896249453,0.000415073535756,0.000411250054512,0.000407420273521,0.000403579470784,0.000399725387708,0.000395857555877,0.000391973990703,0.000388072591703,0.000384154464662,0.000380217408575,0.000376260365912,0.000372280914944,0.000368278217511,0.000364256007497,0.000360213530196,0.000356149933013,0.00035206598792,0.000347964041754,0.000343843430519,0.000339705644852,0.000335551175921,0.000331379910616,0.000327196584837,0.000322999150561,0.000318787941702,0.000314563707702,0.000310326031995,0.000306076411369,0.000301814415405,0.000297540852772,0.000293253734982,0.000288953775252,0.000284640310572,0.000280312539088,0.000275972594371,0.000271618874455,0.000267253367803,0.00026287475656,0.000258483729569,0.000254079622339,0.000249664555703,0.000245241686418,0.000240811084563,0.000236373696484,0.000231930020972,0.000227481383438,0.000223030624441,0.000218579508711,0.000214128902361,0.000209678647149,0.000205231271335,0.000200786944989,0.000196344620457,0.000191905937252,0.000187472168052,0.000183044654111,0.00017862317574,0.00017420610767,0.00016979204946,0.000165383208429,0.000160977980356,0.000156574002858,0.000152173495394,0.000147777798029,0.000143386912228,0.000139001523346,0.000134620466913,0.000130244457398,0.000125877077832,0.000121516817297,0.00011716531358,0.000112824943242,0.000108495499015,0.000104174909111,9.98618337757e-05,9.55555627142e-05,9.12569709847e-05,8.69675368075e-05,8.26856122108e-05,7.84118782177e-05,7.41480067859e-05,6.98930922555e-05,6.56471928549e-05,6.14138845135e-05,5.71945465148e-05,5.29879616115e-05,4.87926789795e-05,4.46060171007e-05,4.04271828971e-05,3.62572035785e-05,3.20933430947e-05,2.79358620032e-05,2.37855127181e-05,1.96404064731e-05,1.55008242373e-05,1.13708017288e-05,7.25501300898e-06,3.1598941176e-06,-9.08333888592e-07,-4.94674568061e-06,-8.94918834382e-06,-1.29117107174e-05,-1.68307423002e-05,-2.07008871749e-05,-2.45186870935e-05,-2.82821745442e-05,-3.19903235258e-05,-3.56424697115e-05,-3.92427818874e-05,-4.27898385735e-05,-4.62878215149e-05,-4.97404091105e-05,-5.31470064345e-05,-5.65109884827e-05,-5.98369388693e-05,-6.31264418913e-05,-6.63825177753e-05,-6.96102761552e-05,-7.28123897626e-05,-7.59902785805e-05,-7.91464711177e-05,-8.22797606363e-05,-8.53923592607e-05,-8.84889033574e-05,-9.15674620538e-05,-9.46305913052e-05,-9.76803002437e-05,-0.000100716792484,-0.000103737570392,-0.000106744411207,-0.000109736592878,-0.000112713879022,-0.000115676380258,-0.000118622148781,-0.000121551840745,-0.00012446553422,-0.000127362142739,-0.000130240258426,-0.000133101487651,-0.000135945165924,-0.000138769399597,-0.000141575129455,-0.000144364688265,-0.000147138388068,-0.000149896077078,-0.000152635726749,-0.000155359578928,-0.00015806629997,-0.000160755133135,-0.000163426218744,-0.000166082543886,-0.000168725785959,-0.000171353021598,-0.000173965203745,-0.000176561760976,-0.000179144000425,-0.000181710729884,-0.000184260859957,-0.000186795278044,-0.000189315195108,-0.00019181955745,-0.00019430614318,-0.000196775182503,-0.000199225900145,-0.000201659341379,-0.000204075875827,-0.000206477195104,-0.000208868558681,-0.00021125095703,-0.000213623933458,-0.000215987630778,-0.000218341651468,-0.000220689314099,-0.000223031371008,-0.000225367782063,-0.000227698537583,-0.000230022740747,-0.000232335093467,-0.000234632180238,-0.000236916583035,-0.000239187467239,-0.000241444346068,-0.000243686060253,-0.000245908865728,-0.000248112574078,-0.000250299827197,-0.000252465725358,-0.000254614039243,-0.000256747631199,-0.000258863168298,-0.000260956591517,-0.000263031022004,-0.000265086160229,-0.000267122719912,-0.000269141949292,-0.000271139587305,-0.000273117527555,-0.000275077022333,-0.000277015137748,-0.000278934249084,-0.000280840550677,-0.000282732628006,-0.000284607379804,-0.000286467220505,-0.000288310525909,-0.000290138672719,-0.000291955102247,-0.00029375727018,-0.000295547119803,-0.000297322223378,-0.000299078967627,-0.000300816507409,-0.000302538167282,-0.000304244874139,-0.000305936221344,-0.000307614700047,-0.000309280361354,-0.000310931500491,-0.000312568112309,-0.000314190311572,-0.000315802550506,-0.000317406381277,-0.000319000135458,-0.000320582479301,-0.000322154197834,-0.000323712032084,-0.000325254936401,-0.000326782099022,-0.000328294160632,-0.000329792329707,-0.000331274275055,-0.000332737368926,-0.000334182848994,-0.00033561050919,-0.000337019165659,-0.000338410239126,-0.000339783142221,-0.000341139943809,-0.000342481533309,-0.000343808284892,-0.000345120647525,-0.000346419801525,-0.00034770722971,-0.000348981910326,-0.000350245890405,-0.000351499652561,-0.000352742126679,-0.000353977436298,-0.000355201238428,-0.000356414715232,-0.000357617321154,-0.000358807591973,-0.00035998351866,-0.000361143800533,-0.000362286706565,-0.000363407373025,-0.000364505455874,-0.000365577780441,-0.000366541177068,-0.000367316744875,-0.000367900018033,-0.000368290419731,-0.000368484955243)
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(212)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('GSE46663-LY1_BCL6_DMSO-GSM1133657.36mers.unique.pseudoRep1.pseudoRep1.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) : 212',bty='n')
dev.off()