# R script for Peak Model
#  -- generated by MACS
p <- c(0.0340731047503,0.0396286040951,0.0452028403685,0.0512548683225,0.0570726846684,0.0570352108111,0.0572319485619,0.0574567917057,0.0577191087068,0.0575036340273,0.057840898743,0.0582531111733,0.0587496397825,0.0584685858528,0.0588620613544,0.0592742737848,0.0588714298188,0.0582999534949,0.0584498489241,0.0588901667474,0.0594616430713,0.0591618522129,0.0587027974609,0.0587215343896,0.0584404804598,0.0579252149219,0.0586840605323,0.058965114462,0.0587496397825,0.0584123750668,0.0582531111733,0.0585810074247,0.0589838513907,0.0588620613544,0.0585997443533,0.0587590082469,0.0582999534949,0.0579533203149,0.0579439518506,0.0579626887792,0.0578783726003,0.0577378456354,0.0574755286343,0.0576910033138,0.0579626887792,0.0583842696739,0.0588433244258,0.0590587991053,0.0590775360339,0.0593492214994,0.0594429061426,0.0597895393226,0.06017364636,0.0601268040383,0.060089330181,0.0598832239659,0.059742697001,0.0596771177507,0.0598176447156,0.059714591608,0.0595272223215,0.059339853035,0.0590494306409,0.0589276406047,0.0589838513907,0.0592274314631,0.0592180629988,0.0593492214994,0.0600424878594,0.0602392256102,0.0601268040383,0.06017364636,0.0606327011119,0.0608575442557,0.0613259674719,0.0614571259725,0.0615695475444,0.0617756537595,0.0613634413292,0.0614383890438,0.0614758629011,0.0609324919703,0.0613915467222,0.0620567076893,0.0621316554039,0.0621129184752,0.0623283931547,0.0625063939769,0.0628998694786,0.0629467118002,0.063115344158,0.0641739806268,0.0640802959835,0.0636212412316,0.0635088196597,0.0633401873018,0.0633401873018,0.0633401873018,0.0629654487288,0.0630029225861,0.0628998694786,0.0628530271569,0.0624689201196,0.0625813416915,0.0627593425137,0.0628623956213,0.0625063939769,0.0627593425137,0.0630778703007,0.0630216595148,0.0633308188375,0.0633401873018,0.0634526088737,0.0636774520175,0.0636868204819,0.064295770663,0.0645112453425,0.0647829308079,0.0651108270593,0.0656541979901,0.0663755697432,0.0663568328145,0.0667971506378,0.0675278908551,0.0675653647124,0.0674248377476,0.0681743148936,0.0680618933217,0.0681930518222,0.0682398941438,0.0677339970703,0.0677714709276,0.0677902078562,0.0673124161757,0.0672843107827,0.0674248377476,0.0674529431405,0.0673405215686,0.067293679247,0.0677808393919,0.0677902078562,0.0678932609638,0.0677808393919,0.0680899987146,0.0686427381098,0.0686895804315,0.0688582127893,0.0689800028255,0.0693360044699,0.0690549505401,0.0700199023656,0.0702728509024,0.0704227463316,0.0701323239375,0.0701323239375,0.0702822193667,0.0698137961505,0.0700199023656,0.069944954651,0.0700105339013,0.0698887438651,0.0699262177224,0.0705351679035,0.0713127504425,0.0711722234776,0.0711722234776,0.0719872798739,0.0716968574798,0.071902963695,0.0725306508047,0.072624335448,0.072596230055,0.0720434906598,0.0719685429452,0.0726618093053,0.0732613910221,0.0729334947707,0.0732707594864,0.0730646532713,0.0726711777696,0.0730084424853,0.0732239171648,0.0740764474184,0.0740764474184,0.0736736034524,0.0738328673459,0.0741888689903,0.0746010814206,0.0750601361725,0.0752100316017,0.075303716245,0.0756128755677,0.075678454818,0.0761656149629,0.0763248788564,0.0765309850715,0.0766715120364,0.0771399352527,0.0772429883602,0.0777863592911,0.076802670537,0.0766715120364,0.0767558282153,0.0762780365348,0.0767651966797,0.0768963551802,0.0769525659662,0.0769900398235,0.0774303576467,0.0777582538981,0.0784515202582,0.0794820513339,0.0804657400881,0.0808123732681,0.0809716371616,0.0806437409102,0.080981005626,0.0812620595557,0.0811964803054,0.08092479484,0.0812058487698,0.0810184794833,0.0807655309465,0.0809060579113,0.0812339541627,0.0821708005952,0.0828359615623,0.0832669109213,0.0836135441013,0.0839601772813,0.0839133349597,0.0836603864229,0.0834542802078,0.0838664926381,0.0837072287445,0.0834917540651,0.0832856478499,0.0829109092769,0.0830608047061,0.0833887009575,0.0847190228917,0.0855528162166,0.0864615572561,0.0870798759016,0.0880448277271,0.0886350409795,0.088850515659,0.0895812558764,0.0901995745218,0.0900965214142,0.0893564127326,0.0897405197699,0.089628098198,0.0905087338446,0.0905462077019,0.0908647354889,0.0912394740619,0.0909115778105,0.0908741039532,0.0910239993824,0.0919233719576,0.091558001849,0.0920264250652,0.0913706325625,0.0912956848479,0.091932740422,0.0921013727798,0.093028850748,0.0935534847502,0.0943498042178,0.0944622257897,0.0956613892233,0.0948088589698,0.095305387579,0.0959892854747,0.0960361277963,0.0962703394045,0.0962422340115,0.095708231545,0.0959237062244,0.0966357095132,0.096082970118,0.0970666588721,0.0970760273364,0.0971041327294,0.0969073949786,0.0973289758732,0.0985656131641,0.0990152994517,0.099108984095,0.0996148811685,0.100429937565,0.10057046453,0.101338678604,0.10195699725,0.10223805118,0.102903212147,0.102247419644,0.103680794686,0.104776905012,0.105151643585,0.105470171372,0.106613124019,0.107231442665,0.108271342205,0.110426089,0.110819564501,0.112543361937,0.113255365226,0.114370212481,0.115382006628,0.116890329384,0.118070755889,0.119073181572,0.119635289431,0.119616552503,0.120750136686,0.121078032937,0.121396560724,0.121846247012,0.122042984763,0.122586355694,0.123223411268,0.124113415379,0.124609943988,0.124403837773,0.12437573238,0.12513457799,0.12617447753,0.126071424423,0.12652111071,0.126155740601,0.126324372959,0.126464899924,0.126923954676,0.127804590323,0.12777648493,0.127589115643,0.126755322318,0.127635957965,0.128507225147,0.129500282366,0.129500282366,0.1292285969,0.129725125509,0.130409023405,0.132076610055,0.133125878059,0.134952728603,0.135814627321,0.135973891214,0.136667157574,0.136770210682,0.137294844684,0.137041896147,0.13700442229,0.136685894503,0.136489156752,0.13574904807,0.13499020246,0.134943360138,0.134212619921,0.13470914853,0.135093255568,0.136320524394,0.136226839751,0.137229265434,0.137388529327,0.13832537576,0.138934325941,0.140320858661,0.142007182239,0.142185183062,0.142335078491,0.141801076024,0.142972134065,0.142166446133,0.142456868527,0.142709817064,0.142934660208,0.142400657741,0.142775396314,0.143712242747,0.144592878393,0.145623409469,0.145848252613,0.147112995297,0.147824998585,0.14783436705,0.148349632588,0.148602581124,0.148274684873,0.148237211016,0.147778156264,0.147084889904,0.14783436705,0.148152894837,0.148836792732,0.149708059915,0.149867323808,0.14928647902,0.150073430023,0.151965859817,0.153043233214,0.154860715293,0.154392292077,0.155029347651,0.154373555149,0.154888820686,0.155797561726,0.157586938412,0.157774307699,0.156668828908,0.15699672516,0.156762513551,0.158074098557,0.157652517662,0.159395052027,0.160013370672,0.160228845352,0.159807264457,0.160350635388,0.160837795533,0.161212534106,0.161540430357,0.160884637855,0.162486645254,0.162177485931,0.161662220393,0.161634115001,0.162299275968,0.162177485931,0.163254859329,0.163386017829,0.164107389582,0.164781919014,0.163386017829,0.163479702473,0.16392938876,0.163629597902,0.163414123222,0.163161174686,0.162458539861,0.161924537395,0.161362429535,0.161540430357,0.162065064359,0.162852015363,0.162524119111,0.162767699184,0.162786436113,0.163807598724,0.163161174686,0.163629597902,0.163779493331,0.163779493331,0.163601492509,0.16295506847,0.163030016185,0.163123700828,0.16282390997,0.162008853574,0.162055695895,0.16317054315,0.162898857684,0.162046327431,0.161531061893,0.161465482643,0.160716005497,0.159694842885,0.159985265279,0.159535578992,0.158992208061,0.156743776623,0.155179243081,0.155057453044,0.15463587215,0.153567867217,0.15303386475,0.153127549393,0.152883969321,0.152162597568,0.152200071425,0.152818390071,0.152790284678,0.152153229104,0.151225751135,0.150532484775,0.150420063203,0.149829849951,0.14935205827,0.149492585235,0.149192794377,0.14859321266,0.148321527195,0.148349632588,0.149136583591,0.149024162019,0.148799318875,0.149042898948,0.148602581124,0.148040473265,0.14720667994,0.147112995297,0.147750050871,0.146616466687,0.146082464221,0.14519246011,0.145098775467,0.144536667607,0.143965191283,0.143037713315,0.142691080135,0.142222656919,0.140873598056,0.140864229592,0.140423911769,0.140854861128,0.139665066158,0.139983593945,0.138812535905,0.138606429689,0.138100532616,0.137585267078,0.136966948433,0.136367366716,0.13555231032,0.135018307853,0.134718516995,0.132535664807,0.132441980164,0.131701871482,0.1308306043,0.130231022583,0.130371549548,0.129425334651,0.129697020116,0.129500282366,0.128273013539,0.129069333007,0.129022490685,0.129116175328,0.129050596078,0.128966279899,0.128010696538,0.127898274966,0.12708321857,0.125659211992,0.126642900746,0.126155740601,0.125649843528,0.124862892525,0.124703628631,0.124000993807,0.123935414556,0.123429517483,0.123373306697,0.123354569768,0.122483302586,0.122005510905,0.1222959333,0.122108564013,0.121893089334,0.121377823796,0.121124875259,0.121096769866,0.120900032115,0.120881295186,0.120544030471,0.119157497751,0.118145703604,0.11805201896,0.117733491173,0.117386857993,0.117274436421,0.117162014849,0.116927803241,0.11631885306,0.116234536881,0.116487485418,0.116028430666,0.115663060557,0.115297690449,0.115475691271,0.115082215769,0.113976736979,0.113339681405,0.113386523726,0.112993048225,0.112730731224,0.112402834972,0.112009359471,0.111512830861,0.110707142929,0.109967034248,0.109967034248,0.109376820995,0.10854302767,0.107727971274,0.107278284986,0.107006599521,0.105994805374,0.105601329872,0.105029853548,0.104261639474,0.102968791397,0.102013208036,0.101441731712,0.100776570745,0.100158252099,0.0989309832728,0.0986686662717,0.0971416065867,0.0954271776152,0.0945933842903,0.0947807535768,0.0941718033957,0.0934504316426,0.0928602183901,0.0923449528523,0.0920732673868,0.0917922134571,0.0919795827436,0.0921856889587,0.0928695868545,0.0920920043155,0.0918952665647,0.0915861072419,0.0913800010268,0.0910802101684,0.0914268433484,0.0909958939895,0.0904244176656,0.0903119960937,0.0893751496612,0.0897779936272,0.0893564127326,0.0893845181255,0.0895063081618,0.0893283073396,0.0882509339422,0.0877918791903,0.0879886169411,0.0878480899762,0.0872110344021,0.0864615572561,0.086227345648,0.0856183954669,0.0850281822144,0.0840632303889,0.0836229125656,0.0833699640288,0.0824986968466,0.0823394329531,0.0821520636666,0.0821801690596,0.0817117458433,0.0817398512363,0.0809341633043,0.0814025865206,0.0813932180563,0.0807936363394,0.0808592155897,0.0799504745502,0.0801565807653,0.0797068944777,0.0793602612977,0.0790042596534,0.0792853135831,0.0790885758323,0.0791166812253,0.0796132098345,0.0793508928334,0.079744368335,0.0788824696171,0.0788168903669,0.0791916289399,0.0791260496896,0.0787232057236,0.0788543642242,0.0779830970419,0.0773085676105,0.0774209891824,0.0774771999684,0.077552147683,0.0769806713591,0.0765590904645,0.0763248788564,0.0757815079255,0.0747135029925,0.0751350838871,0.0751725577444,0.0748352930287,0.073748551167,0.073720445774,0.0733082333437,0.0728398101275,0.0724275976972,0.0728398101275,0.0726618093053,0.0719591744809,0.0714532774073,0.0708255902976,0.0708443272262,0.0702728509024,0.0706194840824,0.0706850633327,0.0703665355456,0.0694765314348,0.0692610567553,0.0690268451472,0.0687364227531,0.0687457912174,0.0675934701054,0.0670032568529,0.0668439929594,0.0663568328145,0.0663568328145,0.0664317805291,0.0658790411339,0.0664036751361,0.0665348336367,0.0663287274215,0.0671718892108,0.0674716800692,0.0670313622459,0.066890835281,0.0663193589572,0.0669095722097,0.0672093630681,0.0668439929594,0.0660476734918,0.065850935741,0.065391880989,0.0652232486312,0.0651670378452,0.0650639847376,0.0652419855598,0.06461429845,0.0642208229484,0.0635275565883,0.0640240851976,0.0642864021987,0.0645018768781,0.0642114544841,0.0639866113403,0.0633682926948,0.0630310279791,0.0629279748715,0.0636774520175,0.0637430312678,0.0634619773381,0.063490082731,0.0630966072294,0.0631247126224,0.0631621864797,0.0631528180153,0.0628717640856,0.062768710978,0.0620286022963,0.0619161807244,0.0611385981854,0.0601642778956,0.0603610156465,0.0602111202173,0.0600799617167,0.0598644870372,0.0602860679319,0.0598176447156,0.0591337468199,0.0590962729626,0.0594054322853,0.0595834331075,0.0594803799999,0.0591618522129,0.0591993260702,0.0592742737848,0.0586559551393,0.0585435335674,0.0588526928901,0.0587590082469,0.0586840605323,0.0583842696739,0.0578221618144,0.0583842696739,0.0581500580657,0.0584217435312,0.0588339559615,0.0592649053204,0.0592086945345,0.0590962729626,0.0587964821042,0.0585997443533,0.0588714298188,0.0583561642809,0.058187531923,0.0578783726003,0.0571007900613,0.0568759469175,0.0567354199527,0.0566042614521,0.0566229983808,0.0575879502062,0.0574099493841,0.0572694224192,0.05711952699,0.0567541568813,0.0568009992029,0.0567260514883,0.057063316204,0.0571663693116,0.0573443701338,0.0562857336651,0.0560046797353,0.0557142573412,0.0557423627342,0.0563044705937,0.0565105768089,0.0561826805575,0.0563606813797,0.055967205878,0.0556580465553,0.055995311271,0.055939100485,0.0557704681272,0.0558922581634,0.0556393096266,0.0557423627342,0.0558454158418,0.0551708864104,0.0551427810174,0.0548898324806,0.0544588831217,0.0544869885146,0.0546087785509,0.0539061437265,0.053746879833,0.053662563654,0.0531098242589,0.0531004557945,0.0527725595431,0.0526976118285,0.0526320325783,0.0528475072577,0.0527350856858,0.0533065620097,0.053344035867,0.0527444541502,0.0531098242589,0.0532784566167,0.053344035867,0.0538311960119,0.05371877444,0.0535220366892,0.0539529860481,0.0535782474751,0.0533815097243,0.0536063528681,0.0538030906189,0.0535782474751,0.0538311960119,0.0532597196881,0.0534564574389,0.0529037180437,0.0530442450086,0.0533252989383,0.0534751943675,0.0538311960119,0.053690669047,0.0535501420821,0.0534283520459,0.0533627727956,0.0531941404378,0.0530723504016,0.0525477163993,0.0524352948274,0.0519856085398,0.0513672898944,0.0510862359646,0.0510206567144,0.051039393643,0.0517045546101,0.0520792931831,0.0527912964718,0.0529880342226,0.0528756126507,0.0531660350448,0.0532690881524,0.0529786657583,0.0534377205102,0.0534096151173,0.0527631910788,0.0528194018648,0.052163609362,0.0526788748999,0.0527069802929,0.0528194018648,0.0524352948274,0.0526039271853,0.0527257172215,0.052566453328,0.0525758217923,0.052191714755,0.052219820148,0.0516296068955,0.0514984483949,0.0510862359646,0.0517795023247,0.0515171853236,0.0509644459284,0.0512829737155,0.0518638185036,0.0518263446463,0.0520605562544,0.052135503969,0.0521542408977,0.0522104516836,0.0519387662182,0.0521261355047,0.0521073985761,0.0523978209701,0.0522104516836,0.0522385570766,0.0519949770042,0.051845081575,0.0518731869679,0.0526320325783,0.0530910873302,0.0534658259032,0.0539717229768,0.0536063528681,0.0535314051535,0.0538124590832,0.0541028814773,0.0540841445487,0.0541871976562,0.0535314051535,0.0534470889746,0.0539623545124,0.0537000375113,0.0535876159394,0.0533065620097,0.0527819280075,0.0528662441864,0.0530536134729,0.052884981115,0.0532597196881,0.053315930474,0.0520511877901,0.0517795023247,0.0515921330382,0.0516483438241,0.0518076077177,0.0516670807528,0.0514984483949,0.0515265537879,0.050692760463,0.0505241281051,0.051067499036,0.0516389753598,0.0520137139328,0.0519949770042,0.051760765396,0.0517045546101,0.051470343002,0.051067499036,0.0517513969317,0.0514235006803,0.0514609745376,0.0516108699668,0.0514047637517,0.0518544500393,0.0523603471128,0.0524352948274,0.0524071894345,0.0524165578988,0.0520043454685,0.0520324508615,0.052191714755,0.051816976182,0.052191714755,0.0524915056134,0.0524165578988,0.0523884525058,0.0530442450086,0.053315930474,0.0535688790108,0.0534283520459,0.0530067711513,0.0530067711513,0.0528006649361,0.0520980301117,0.0522760309339,0.0526882433642,0.0523509786485,0.0529880342226,0.0525758217923,0.0527912964718,0.0530442450086,0.0523135047912,0.0522479255409,0.0524071894345,0.052510242542,0.0519949770042,0.0523884525058,0.0518731869679,0.0519481346825,0.0521448724334,0.052191714755,0.0528100334004,0.0526414010426,0.0529599288297,0.0523884525058,0.0526601379712,0.0519856085398,0.0524727686847,0.0529786657583,0.0532597196881,0.0534189835816,0.0533908781886,0.0534377205102,0.0529318234367,0.0528381387934,0.0528568757221,0.0534470889746,0.0531285611875,0.053315930474,0.0532503512237,0.0533815097243,0.0532597196881,0.0535220366892,0.05337214126,0.0540185652984,0.0545525677649,0.0544120408,0.0543651984784,0.0542902507638,0.0539248806551,0.0540560391557,0.054440146193,0.0543183561568,0.054814884766,0.0543651984784,0.0537749852259,0.0533908781886,0.0532409827594,0.0530161396156,0.0529318234367,0.0529037180437,0.0526976118285,0.0528287703291,0.0528006649361,0.0528756126507,0.0532784566167,0.0535220366892,0.0539342491195,0.0538874067978,0.0542527769065,0.0538311960119,0.0539717229768,0.0538311960119,0.0535126682248,0.0537749852259,0.0534845628319,0.0538405644762,0.0536719321184,0.0534751943675,0.0529880342226,0.0528662441864,0.0527444541502,0.0531098242589,0.0539248806551,0.0541028814773,0.0540747760843,0.0534002466529,0.0531941404378,0.0536344582611,0.0541497237989,0.054121618406,0.0542527769065,0.0536157213324,0.0527631910788,0.0527538226145,0.0528475072577,0.0530910873302,0.0534751943675,0.0536250897967,0.0532597196881,0.0534751943675,0.0529880342226,0.0531660350448,0.0534564574389,0.0535407736178,0.0531191927232,0.0531285611875,0.0531941404378,0.0529786657583,0.0528662441864,0.0528662441864,0.0531660350448,0.0534470889746,0.0535501420821,0.0533534043313,0.0533346674027,0.0535032997605,0.0531566665805,0.0530255080799,0.0531472981162,0.0532597196881,0.0534751943675,0.0530723504016,0.0530348765443,0.0528287703291,0.0532503512237,0.0530161396156,0.0533065620097,0.0535688790108,0.0538311960119,0.0541028814773,0.0539998283697,0.0538405644762,0.0536344582611,0.0535969844038,0.0535501420821,0.0534939312962,0.0532503512237,0.053287825081,0.0533908781886,0.0528287703291,0.0527444541502,0.0534939312962,0.0535126682248,0.0533534043313,0.0532222458308,0.052997402687,0.0528662441864,0.0522853993982,0.0519200292896,0.0523603471128,0.052135503969,0.0516108699668,0.0513204475728,0.0512923421798,0.0513672898944,0.0517045546101,0.0516670807528,0.0516015015025,0.0515265537879,0.0512548683225,0.0513017106441,0.0513579214301,0.0517420284674,0.051845081575,0.0514984483949,0.0517982392533,0.0517420284674,0.0522479255409,0.0524727686847,0.0524446632918,0.0523228732555,0.0522385570766,0.0522572940053,0.0524071894345,0.0527631910788,0.052510242542,0.052163609362,0.0515827645739,0.0513672898944,0.051470343002,0.0515640276452,0.0519856085398,0.0519200292896,0.052163609362,0.0522947678626,0.0520792931831,0.0517701338604,0.0517513969317,0.0515640276452,0.0512736052511,0.0512829737155,0.0509176036068,0.0506271812127,0.0500838102819,0.0494467547077,0.0497090717088,0.0501212841392,0.0502805480327,0.0502711795684,0.0503086534257,0.0503742326759,0.0500838102819,0.0503367588186,0.0501868633894,0.0500744418175,0.0496809663159,0.0502149687824,0.0501025472105,0.0503929696046,0.0501306526035,0.0497371771018,0.0497184401732,0.0497184401732,0.0498214932808,0.0502524426397,0.0504772857835,0.0501774949251,0.0453058934761,0.040087658847,0.0352441627909,0.0304568775208,0.0)
m <- c(0.0289183949349,0.0338190113848,0.0385578599132,0.0440008746887,0.0490727748204,0.0496342046661,0.0499006459488,0.0499767720296,0.0504240127542,0.0505382018753,0.050604812196,0.0503478866734,0.0508522219585,0.0501766029916,0.0500528981104,0.0493582476233,0.0492250269819,0.0486350498559,0.0489966487396,0.0486255340958,0.0489110068987,0.049424857944,0.0488158492978,0.0490918063406,0.0493772791435,0.0499101617089,0.0499958035498,0.0504335285143,0.0500719296306,0.050604812196,0.0500338665902,0.0503954654739,0.0503574024335,0.050404981234,0.0496912992267,0.0498720986685,0.0503003078729,0.0502432133123,0.050309823633,0.0501670872315,0.0506238437162,0.0500528981104,0.0503859497138,0.0500433823503,0.0504906230748,0.0505001388349,0.0503003078729,0.0499482247493,0.0493201845829,0.0497008149868,0.0494819525046,0.0496627519464,0.0495390470651,0.0493487318632,0.0490632590603,0.0491964797016,0.0493772791435,0.0497769410676,0.0503859497138,0.0496342046661,0.0493677633834,0.0492250269819,0.0495104997848,0.0503764339537,0.0509093165191,0.0509093165191,0.0511091474811,0.0513946202841,0.0514136518043,0.0519941131702,0.0521558810918,0.0522795859731,0.0521368495716,0.0516039670062,0.0515278409254,0.0515183251653,0.0512423681225,0.0508807692388,0.0510996317211,0.0512328523624,0.0516991246072,0.0516420300466,0.0518228294884,0.0518323452485,0.0516991246072,0.0516991246072,0.0520607234909,0.0524223223745,0.05197508165,0.0518133137283,0.0513375257235,0.0515278409254,0.0518418610086,0.0522795859731,0.0525460272558,0.0522891017332,0.0516991246072,0.0510520529206,0.051489777885,0.0518513767687,0.05197508165,0.0518133137283,0.0513660730038,0.0511376947614,0.0512804311629,0.0518704082889,0.0518513767687,0.0524032908543,0.0519560501298,0.0515754197259,0.0519941131702,0.0519560501298,0.0521939441322,0.0524128066144,0.0528219842986,0.0526031218164,0.0525269957356,0.0523271647736,0.0526031218164,0.0526697321371,0.0530979413414,0.0533263195838,0.0537164657477,0.0538592021492,0.0532216462227,0.0528029527784,0.053450024465,0.0535546978261,0.0536022766266,0.053640339667,0.053345351104,0.0536213081468,0.0532692250232,0.0528410158188,0.0525555430159,0.0530408467808,0.0531455201419,0.0532216462227,0.0536022766266,0.0536308239069,0.0530693940611,0.0530313310207,0.0529171418996,0.0528885946193,0.0532787407833,0.0530218152607,0.0531455201419,0.0533168038237,0.0531169728616,0.0531169728616,0.0532216462227,0.0532977723035,0.053345351104,0.053545182066,0.0534690559852,0.0533929299044,0.0526697321371,0.0525365114957,0.0523557120539,0.0524984484553,0.0522986174933,0.0523271647736,0.0520702392509,0.0520512077308,0.0518894398091,0.0521653968519,0.052270070213,0.0521178180514,0.052174912612,0.0521844283721,0.0525555430159,0.0521653968519,0.0523461962938,0.0524223223745,0.0528790788592,0.0528790788592,0.0532882565434,0.0534785717453,0.0537259815078,0.053640339667,0.0536879184674,0.0540495173511,0.0544491792752,0.0548488411993,0.0553531764844,0.0552294716032,0.0551533455224,0.0554959128859,0.0554863971258,0.0554578498455,0.0555815547268,0.0557718699287,0.0559050905701,0.0553722080046,0.0549725460805,0.0547061047978,0.0546585259973,0.0538211391088,0.053840170629,0.05393532823,0.0537830760684,0.0534880875054,0.0532121304626,0.0541256434319,0.0539162967098,0.0547536835983,0.0547631993584,0.0553246292041,0.0552485031234,0.0550867352017,0.0547346520781,0.0544682107954,0.0548298096791,0.0541256434319,0.0542874113536,0.0540970961516,0.0538021075886,0.0536308239069,0.0534976032655,0.0533834141443,0.0537640445482,0.053745013028,0.0536593711872,0.0536784027073,0.0531930989424,0.0532977723035,0.0534880875054,0.0536022766266,0.0534309929448,0.0532692250232,0.0535832451064,0.0538211391088,0.0533072880636,0.0532692250232,0.0533738983842,0.0535642135862,0.0536974342275,0.0533738983842,0.0534309929448,0.0538592021492,0.053345351104,0.0532216462227,0.0532882565434,0.053545182066,0.053840170629,0.0532026147025,0.0531455201419,0.0537830760684,0.053450024465,0.0531645516621,0.0534595402251,0.0533834141443,0.0537354972679,0.0535261505458,0.0534880875054,0.0533929299044,0.053450024465,0.052860047339,0.0531264886217,0.0533929299044,0.0532692250232,0.0538972651896,0.0535546978261,0.0540780646314,0.05393532823,0.0539829070305,0.0539638755103,0.0541066119117,0.0544777265555,0.0541732222324,0.054040001591,0.0532787407833,0.053155035902,0.0524223223745,0.052565058776,0.0528790788592,0.0528219842986,0.0536974342275,0.0529837522203,0.0532216462227,0.0536022766266,0.0538211391088,0.0536974342275,0.0533929299044,0.0530218152607,0.0529361734198,0.0528219842986,0.052469901175,0.0526126375765,0.0522415229327,0.0518704082889,0.0519465343697,0.0522510386928,0.0527363424577,0.0528505315789,0.0524889326952,0.0525840902962,0.0517942822081,0.0521844283721,0.0522510386928,0.0527458582178,0.0525365114957,0.0527077951775,0.0527363424577,0.0528790788592,0.0529647207001,0.052860047339,0.0529266576597,0.0533168038237,0.0537830760684,0.0537259815078,0.0536784027073,0.0538782336694,0.0540114543107,0.0539543597502,0.0538972651896,0.0543635374343,0.0548773884796,0.0543825689545,0.0542778955935,0.0540590331112,0.0543159586338,0.0541446749521,0.0538306548689,0.0537640445482,0.053745013028,0.0533263195838,0.0534880875054,0.0540685488713,0.0541256434319,0.0536879184674,0.0537164657477,0.0537925918285,0.0539067809497,0.0542778955935,0.0549820618406,0.0549630303204,0.0547727151185,0.0541161276718,0.0538021075886,0.0537259815078,0.0537545287881,0.0534595402251,0.0534976032655,0.0535166347857,0.0529171418996,0.0532026147025,0.053250193503,0.0533072880636,0.0538592021492,0.0542493483132,0.0543159586338,0.0543825689545,0.0544016004747,0.0541827379925,0.0543825689545,0.0539067809497,0.0542017695127,0.0543920847146,0.0542208010329,0.0542969271137,0.0539448439901,0.0543920847146,0.0545919156767,0.0545062738358,0.0544967580757,0.0550772194416,0.0546965890377,0.0544396635151,0.0545348211161,0.0542874113536,0.0543730531944,0.0541256434319,0.0538211391088,0.0540209700708,0.0539733912704,0.0541256434319,0.0548393254392,0.055315113444,0.0552865661637,0.0554673656056,0.0552485031234,0.0551818928027,0.0556957438479,0.055705259608,0.0556196177671,0.0552199558431,0.0547917466387,0.0543635374343,0.0544016004747,0.0544111162348,0.0551247982421,0.0550296406411,0.0551723770426,0.0552199558431,0.0556386492873,0.0558575117696,0.0554959128859,0.0560192796912,0.0560478269715,0.0564284573754,0.056685382898,0.0568566665798,0.0561144372922,0.0561144372922,0.0560573427316,0.0557242911282,0.0560287954513,0.0562571736936,0.056590225297,0.0566378040975,0.0565807095369,0.0570279502615,0.057665506188,0.0579129159505,0.0585028930765,0.0591119017228,0.059330764205,0.0587883658795,0.0585599876371,0.0583601566751,0.0581698414731,0.0583125778746,0.0585219245967,0.0584933773164,0.0578938844303,0.0579890420313,0.0582079045135,0.0587312713189,0.0587788501194,0.0589596495612,0.0593022169247,0.0592165750838,0.059140449003,0.0597018788488,0.06080570702,0.0607390966993,0.0605297499772,0.0610055379821,0.0615289047874,0.0616716411889,0.0613195580653,0.061395684146,0.0614242314263,0.0609674749417,0.0603679820556,0.0610911798229,0.0611387586234,0.0613290738254,0.0610531167825,0.061100695583,0.0620713031129,0.0622521025548,0.0624138704764,0.0630514264029,0.062956268802,0.0626803117591,0.0626041856784,0.0622806498351,0.0627659536,0.0632893204053,0.0630419106428,0.0629372372818,0.062956268802,0.0630894894433,0.0630228791226,0.0632702888852,0.0637651084102,0.0642884752155,0.0644026643367,0.0646976528997,0.0643931485766,0.0648974838617,0.0654303664272,0.0649355469021,0.0653352088262,0.0652305354651,0.0656016501089,0.065411334907,0.0647737789805,0.0648784523416,0.0651448936243,0.0649165153819,0.0649926414627,0.065411334907,0.0662487217955,0.0661535641946,0.0663248478763,0.0660298593133,0.0668196674013,0.0670480456437,0.0676094754894,0.0680376846938,0.0683421890169,0.0686562091001,0.0685325042188,0.0688655558222,0.0693032807867,0.0699693839935,0.0704071089579,0.0703309828772,0.0701692149555,0.0704451719983,0.0703214671171,0.0707687078416,0.0713872322479,0.0721484930557,0.0719676936138,0.072177040336,0.0722055876163,0.0723673555379,0.0725671865,0.0724529973788,0.0724434816187,0.0728050805024,0.0726813756211,0.072767017462,0.0728907223433,0.0729953957043,0.0728050805024,0.0732047424265,0.0732999000274,0.0742705075573,0.0753457884483,0.0754599775695,0.0754504618094,0.0754314302892,0.0758406079733,0.0766113845412,0.0774297399095,0.0775819920711,0.0784764735202,0.0782195479976,0.0784764735202,0.0782861583183,0.0784003474394,0.0787048517625,0.0796659435323,0.0797515853732,0.0803034994588,0.0810933075469,0.0817784422739,0.0823018090792,0.0821019781172,0.0834341845308,0.0840622246972,0.084442855101,0.0841764138183,0.0842525398991,0.0839099725356,0.0836340154928,0.0830440383668,0.0830725856471,0.0833770899702,0.0831867747682,0.0834246687707,0.0835769209322,0.0838814252553,0.0840241616568,0.0845760757424,0.0849567061463,0.0855752305526,0.0861366603983,0.0865553538426,0.0867361532844,0.0872500043297,0.0874308037715,0.0877162765744,0.0882586749,0.0885441477029,0.0889818726673,0.0893720188313,0.0895242709929,0.0892292824299,0.0891721878693,0.0893149242707,0.0897811965155,0.0900476377982,0.0905614888434,0.0911134029291,0.0910277610882,0.0915225806132,0.0920078843782,0.0930451022288,0.0928357555066,0.0929213973475,0.0928928500672,0.0932829962312,0.0932068701504,0.0934162168725,0.094053772799,0.0937112054356,0.0941108673596,0.0942345722409,0.0950243803289,0.0957666096165,0.0965469019445,0.0968038274671,0.097774434997,0.0985737588451,0.098849715888,0.0996871027765,0.100562552705,0.101438002634,0.103065197611,0.103883552979,0.105044475711,0.106500387006,0.107233100533,0.107689857018,0.109012547672,0.10987848184,0.110097344323,0.111391487696,0.111372456176,0.111648413218,0.111467613777,0.111448582256,0.111496161057,0.112190811544,0.11275224139,0.112875946271,0.113675270119,0.113170934834,0.113989290202,0.114931350452,0.116168399265,0.116387261747,0.117395932317,0.117852688802,0.118347508327,0.119070706094,0.119042158814,0.119498915299,0.119289568576,0.119184895215,0.11963213594,0.120117439705,0.119498915299,0.119394241937,0.118975548493,0.119232474016,0.120507585869,0.121278362437,0.121487709159,0.121383035798,0.120364849467,0.121078531475,0.121868339563,0.122144296605,0.123409892698,0.1236002079,0.12261056885,0.122705726451,0.123819070383,0.124361468708,0.125351107758,0.1255319072,0.125360623518,0.125998179445,0.125883990324,0.127082976096,0.128101162426,0.128139225467,0.127672953222,0.128748234113,0.12947143188,0.129909156845,0.130946374695,0.130965406215,0.131631509422,0.131831340384,0.132107297427,0.133306283199,0.134762194494,0.134543332012,0.135066698817,0.135409266181,0.136122948188,0.137369512761,0.137588375243,0.137065008438,0.137236292119,0.138111742048,0.137379028521,0.138568498533,0.138616077333,0.139482011502,0.14024327231,0.140033925588,0.140995017358,0.141937077607,0.14318364218,0.14313606338,0.14412570243,0.144534880114,0.14519146756,0.144953573558,0.144896478997,0.145553066444,0.14515340452,0.145743381646,0.14614304357,0.146333358772,0.146637863095,0.145771928926,0.146438032133,0.146552221254,0.14709461958,0.147427671183,0.147808301587,0.14804619559,0.147541860304,0.148027164069,0.148207963511,0.149178571041,0.149930316089,0.150929470899,0.150491745935,0.151176880662,0.151614605626,0.152137972431,0.152585213156,0.152147488191,0.152537634355,0.15294681204,0.152556665876,0.152385382194,0.15393645109,0.153631946767,0.154383691814,0.155049795021,0.155868150389,0.15694343128,0.157952101851,0.159741064749,0.160445230996,0.160540388597,0.160473778276,0.162081941733,0.162434024856,0.162367414536,0.163366569346,0.163927999192,0.164822480641,0.163623494868,0.163870904631,0.165117469204,0.166050013693,0.165688414809,0.165859698491,0.16673514842,0.166364033776,0.166211781615,0.166449675617,0.167277546746,0.167610598349,0.167287062506,0.166078560973,0.165888245772,0.165897761532,0.165650351769,0.165926308812,0.165355363206,0.164070735593,0.163680589429,0.163927999192,0.163642526389,0.164261050795,0.164498944797,0.164594102398,0.164812964881,0.163985093752,0.163966062232,0.164299113835,0.164974732802,0.163671073669,0.163861388871,0.163690105189,0.163385600866,0.163499789987,0.163556884548,0.164365724156,0.165450520807,0.164194440474,0.164089767113,0.164213471994,0.163690105189,0.163338022066,0.163280927505,0.163908967671,0.16276707646,0.161339712445,0.160102663633,0.159997990271,0.157999680651,0.158266121934,0.157961617611,0.157580987207,0.156477159036,0.154754806458,0.154773837978,0.153765167408,0.152918264759,0.153298895163,0.153555820686,0.152661339237,0.152337803393,0.151186396422,0.151652668666,0.150111115531,0.149359370483,0.149892253048,0.150149178571,0.149977894889,0.149121476481,0.149663874806,0.149378402003,0.150139662811,0.148455373274,0.149302275922,0.148407794473,0.148246026552,0.147703628226,0.146181106611,0.145933696848,0.144591974674,0.143916355707,0.14318364218,0.143392988902,0.143278799781,0.143516693783,0.142622212334,0.143240736741,0.143678461705,0.143726040506,0.143973450268,0.143897324187,0.143402504662,0.142612696574,0.142146424329,0.141508868403,0.141604026004,0.139957799507,0.140138598949,0.139729421265,0.138368667571,0.137969005647,0.137826269245,0.137702564364,0.136903240516,0.136627283473,0.135904085706,0.136237137309,0.13529507706,0.134914446656,0.13431495377,0.133696429363,0.132906621275,0.133011294636,0.132573569672,0.131993108306,0.132335675669,0.131688603983,0.131574414862,0.131136689897,0.13143167846,0.131488773021,0.13139361542,0.13038494485,0.130051893246,0.129833030764,0.128072615146,0.127187649457,0.126321715288,0.126017210965,0.125313044718,0.124285342627,0.12359069214,0.123800038862,0.123286187817,0.122315580287,0.122486863969,0.122353643328,0.122077686285,0.121573351,0.12159238252,0.120992889634,0.120250660346,0.1196416517,0.118880390892,0.11867104417,0.118185740405,0.117186585595,0.11667273455,0.116235009585,0.115140697174,0.114912318932,0.11478861405,0.114484109727,0.113875101081,0.113465923397,0.112466768587,0.112048075143,0.110963278491,0.109107705273,0.108127581983,0.107195037493,0.10587234684,0.104835128989,0.10392161602,0.102589409606,0.101885243359,0.101238171672,0.100886088549,0.100790930948,0.100781415188,0.100543521185,0.100695773347,0.0995348506149,0.0989639050091,0.0986023061254,0.0980599077999,0.0972605839517,0.0966039965051,0.09610917698,0.0958522514574,0.0955096840939,0.0947293917659,0.0947103602457,0.0944724662433,0.094834065127,0.0949958330487,0.0951671167304,0.0952337270511,0.0954525895333,0.0952527585713,0.0950434118491,0.0948626124073,0.0945676238443,0.094339245602,0.0933400907918,0.0932544489509,0.0926073772643,0.0921411050195,0.0925502827037,0.0923885147821,0.0919032110171,0.0917033800551,0.0907708355656,0.0905424573232,0.0906090676439,0.0904758470026,0.0904853627627,0.09022843724,0.0890579987481,0.0883443167408,0.0887154313846,0.0882301276197,0.0882872221802,0.0880493281778,0.0878875602562,0.0866695429638,0.0865172908022,0.0863935859209,0.0861461761584,0.0857369984742,0.0841193192577,0.0843001186996,0.0844333393409,0.0843096344597,0.0839194882957,0.0840146458967,0.0836054682125,0.0830250068466,0.0830535541269,0.0824064824403,0.0824635770009,0.0818450525946,0.081692800433,0.082282777559,0.0823398721196,0.0821019781172,0.0816547373926,0.0819782732359,0.0813121700291,0.0815310325114,0.0814073276301,0.0814168433902,0.0818545683547,0.0806746141026,0.0803891412997,0.080512846181,0.0802654364185,0.0797801326535,0.0793995022496,0.0788000093635,0.0785430838409,0.0782671267981,0.077962622475,0.0780102012755,0.0773440980687,0.076982499185,0.0769254046244,0.0763544590186,0.0758406079733,0.0763544590186,0.0765352584604,0.075612229731,0.075022252605,0.0744513069992,0.0743085705977,0.0737661722722,0.0738518141131,0.0744037281987,0.075022252605,0.0746130749208,0.0741087396357,0.0746511379612,0.0740040662746,0.0742324445169,0.0743466336381,0.0741658341963,0.0737566565121,0.0731191005856,0.0724339658586,0.0722341348966,0.0723673555379,0.072081882735,0.0720723669749,0.0714728740888,0.0714633583287,0.0719486620936,0.0719201148134,0.071196917046,0.071396748008,0.0710161176041,0.0710827279248,0.0705879083998,0.0702738883166,0.0702358252762,0.0698837421526,0.0693794068674,0.0686942721405,0.0693127965468,0.0691224813448,0.0690749025443,0.0682660629361,0.0684278308577,0.0680091374135,0.0683231574967,0.0681423580548,0.0679234955726,0.0686847563804,0.0684183150976,0.0683326732568,0.0678473694918,0.0684373466178,0.0680186531736,0.068161389575,0.0678378537317,0.0677046330904,0.0680186531736,0.0669053092422,0.0665151630782,0.0663058163561,0.0663058163561,0.06570632347,0.0654779452277,0.0658205125912,0.0657253549902,0.0652305354651,0.065021188743,0.0653827876267,0.0654303664272,0.0650973148238,0.0649640941824,0.0651829566647,0.0650497360233,0.0647737789805,0.0644502431372,0.0644407273771,0.063945907852,0.0637175296097,0.0639268763318,0.0640600969732,0.064336054016,0.0637555926501,0.0642789594554,0.0641647703343,0.0642028333747,0.0640886442535,0.0639363920919,0.0639268763318,0.0636794665693,0.0637080138496,0.0632798046453,0.0635367301679,0.0634986671275,0.0634606040871,0.063156099764,0.0637270453698,0.0637651084102,0.0640125181727,0.0640696127333,0.0636414035289,0.063451088327,0.0631370682438,0.0627374063197,0.0627088590394,0.0625851541582,0.0617287357494,0.0614051999061,0.0615003575071,0.0607771597397,0.0606724863787,0.0605868445378,0.0607961912599,0.0610911798229,0.061291010785,0.0611482743835,0.0615003575071,0.0619475982317,0.0610340852624,0.0610340852624,0.0614147156662,0.0616145466283,0.0612148847042,0.0609865064619,0.0602442771743,0.0607961912599,0.0607961912599,0.0610531167825,0.0610721483027,0.0609484434215,0.0604726554166,0.0606724863787,0.0606153918181,0.0601871826137,0.0604345923762,0.059720910369,0.0599017098108,0.0589501338011,0.0588264289198,0.0588073973996,0.059140449003,0.0586170821977,0.0587598185992,0.0586932082785,0.0580937153924,0.0579319474707,0.057275360024,0.0571231078625,0.0572277812235,0.0573039073043,0.0571611709029,0.0570564975418,0.0563237840143,0.0558670275297,0.0565521622567,0.0571040763423,0.0572943915442,0.0573039073043,0.0576274431476,0.0579034001904,0.0578177583496,0.0583696724352,0.0590167441218,0.0595496266872,0.0594068902858,0.059720910369,0.059920741331,0.0605297499772,0.0601015407728,0.0599588043714,0.0594164060459,0.0590928702026,0.059035775642,0.0587788501194,0.0584553142761,0.0576559904279,0.0574180964255,0.0568471508197,0.0566473198576,0.0563047524941,0.0570374660216,0.0571040763423,0.056980371461,0.0569423084206,0.0565426464966,0.0563142682542,0.0559241220902,0.0557623541686,0.0559241220902,0.0563428155345,0.0556196177671,0.0554768813657,0.055705259608,0.0552675346436,0.0557909014489,0.0562571736936,0.0564760361759,0.0572372969836,0.0570184345014,0.0567044144182,0.0572848757841,0.0515468724456,0.0455709751047,0.0404324646523,0.0345612406724,0.0)
ycorr <- c(0.000131871107515,0.000131739185379,0.000131342846621,0.000130676595727,0.000129739599282,0.000128531046826,0.000127053723926,0.000125566987318,0.000124073632552,0.000122568959326,0.000121048102468,0.000119509568643,0.000117952580865,0.000116378740903,0.000114790369864,0.000113186578734,0.000111569926789,0.000109941927817,0.000108300199052,0.000106647865694,0.000104987001885,0.000103322435772,0.000101655926688,9.99882276767e-05,9.83208468052e-05,9.66511839772e-05,9.49738495765e-05,9.32846901532e-05,9.15859414825e-05,8.98781404491e-05,8.81659664321e-05,8.64466880929e-05,8.47179889937e-05,8.29770904102e-05,8.12203573907e-05,7.94483698034e-05,7.76683898139e-05,7.58851276288e-05,7.40964521344e-05,7.23011641909e-05,7.04938472346e-05,6.86706241614e-05,6.68359224805e-05,6.49908980899e-05,6.3135865164e-05,6.12699835025e-05,5.93882342225e-05,5.74913035562e-05,5.55815699286e-05,5.36564624329e-05,5.17155408127e-05,4.97606847853e-05,4.77881513109e-05,4.58001487008e-05,4.37975567341e-05,4.17813839867e-05,3.9759199382e-05,3.77268915859e-05,3.56756439774e-05,3.36106777477e-05,3.15344511943e-05,2.94484974257e-05,2.73523491822e-05,2.52431306337e-05,2.31185357718e-05,2.09831281223e-05,1.88299022338e-05,1.6654417594e-05,1.44680446269e-05,1.2268765211e-05,1.00529387819e-05,7.82030175524e-06,5.56782384179e-06,3.30031020079e-06,1.01996511594e-06,-1.27752490926e-06,-3.59682557776e-06,-5.93229930382e-06,-8.28335600556e-06,-1.06549784717e-05,-1.3041575713e-05,-1.54441974764e-05,-1.78591647862e-05,-2.02871925549e-05,-2.27293064732e-05,-2.51857545198e-05,-2.76538383978e-05,-3.01317607599e-05,-3.26216889894e-05,-3.5118099678e-05,-3.76261780331e-05,-4.01421378962e-05,-4.2667314571e-05,-4.52034854855e-05,-4.77498719129e-05,-5.03081529414e-05,-5.28711354794e-05,-5.54392573755e-05,-5.80127207704e-05,-6.05906345742e-05,-6.31784549349e-05,-6.57740295949e-05,-6.83782869301e-05,-7.09929079261e-05,-7.36153094489e-05,-7.62454311716e-05,-7.88842445742e-05,-8.15332175787e-05,-8.41934456195e-05,-8.68678419054e-05,-8.95535233307e-05,-9.22478525635e-05,-9.49511089109e-05,-9.76613411175e-05,-0.000100379951297,-0.000103109234265,-0.000105848730734,-0.000108600120392,-0.00011136986815,-0.000114160378355,-0.000116968117226,-0.000119796140765,-0.000122649313873,-0.000125529829456,-0.0001284401299,-0.000131372185485,-0.000134329464538,-0.000137312268428,-0.000140318994404,-0.000143339307276,-0.000146371212968,-0.000149419965666,-0.00015248173825,-0.000155549036546,-0.000158618743944,-0.000161695906299,-0.000164780416911,-0.000167865836877,-0.000170952797138,-0.000174043053272,-0.000177142463369,-0.000180244947702,-0.000183340325238,-0.000186433396461,-0.000189525450135,-0.000192612795396,-0.000195693074626,-0.000198768392184,-0.000201833865072,-0.000204885869217,-0.000207922442012,-0.000210944391961,-0.000213959284422,-0.000216974829107,-0.00021998883516,-0.000223004060363,-0.0002260176278,-0.000229027569004,-0.000232036035976,-0.00023505476193,-0.000238077298934,-0.00024110259496,-0.000244128418728,-0.00024714576969,-0.000250154108618,-0.000253152437326,-0.000256144388578,-0.000259138600995,-0.000262129921346,-0.000265114524512,-0.000268088614406,-0.00027105650082,-0.000274016501424,-0.000276970314444,-0.000279923770582,-0.000282871502561,-0.000285809396473,-0.000288729284466,-0.000291623826219,-0.000294493653723,-0.000297343593517,-0.000300173246612,-0.000302985201732,-0.000305780510809,-0.000308553711405,-0.000311301164474,-0.000314021556387,-0.000316717279216,-0.000319398339686,-0.000322067079902,-0.000324727309678,-0.000327372172151,-0.00032999416702,-0.000332593276484,-0.000335162286209,-0.000337708651725,-0.000340238452091,-0.000342756312775,-0.00034526259444,-0.000347748304559,-0.000350215100868,-0.000352665242703,-0.00035510797804,-0.0003575419054,-0.000359974658466,-0.000362408533024,-0.000364840860746,-0.000367265935575,-0.000369677499036,-0.00037207547958,-0.000374458607522,-0.00037682306368,-0.000379166134727,-0.000381484879774,-0.000383786209263,-0.000386067030178,-0.000388328701484,-0.000390575164667,-0.000392808566072,-0.000395038070022,-0.000397263662282,-0.00039949071407,-0.000401718998624,-0.000403947496751,-0.000406170367536,-0.00040838309922,-0.000410582906197,-0.000412766097505,-0.000414933604346,-0.000417081469465,-0.000419204365134,-0.000421302379996,-0.000423374708728,-0.000425423301634,-0.000427451366826,-0.000429464636445,-0.000431468252574,-0.000433465595512,-0.000435460231822,-0.000437448950532,-0.000439432858148,-0.000441414074141,-0.000443391144903,-0.000445365791619,-0.000447334959673,-0.000449297087393,-0.000451251149076,-0.000453190323618,-0.000455108939875,-0.000457005799113,-0.000458881542635,-0.000460738355067,-0.00046257882579,-0.000464403115979,-0.000466207641862,-0.000467994132791,-0.000469756125205,-0.000471495174629,-0.000473217745999,-0.000474926348716,-0.000476622125497,-0.000478300102816,-0.000479959422343,-0.000481600827069,-0.000483226709414,-0.000484834757528,-0.000486429680567,-0.000488016825332,-0.000489591948165,-0.000491154438855,-0.000492705446631,-0.000494245966205,-0.00049577530607,-0.000497292142485,-0.000498792103754,-0.000500276890425,-0.000501749130301,-0.000503203102674,-0.000504641172515,-0.000506063422579,-0.000507468149118,-0.000508853004443,-0.000510219478371,-0.000511568761343,-0.000512898091448,-0.000514208269896,-0.000515493635171,-0.000516754799442,-0.000517987969762,-0.000519187834013,-0.000520351896274,-0.000521480542311,-0.000522570887568,-0.000523621626624,-0.000524635018366,-0.000525612104323,-0.000526551938651,-0.000527455403403,-0.000528326222737,-0.000529170983673,-0.000529995701323,-0.000530803175055,-0.000531594682886,-0.000532367930384,-0.000533123291862,-0.000533860613397,-0.000534582680891,-0.000535289501646,-0.00053598127352,-0.000536653992957,-0.00053730895731,-0.000537945957377,-0.000538565572132,-0.00053916824337,-0.000539760465599,-0.000540344902879,-0.000540922848349,-0.000541497631,-0.000542071459209,-0.000542648261366,-0.000543227309962,-0.000543804353496,-0.000544377673511,-0.000544950626007,-0.000545520313243,-0.00054608177931,-0.000546633780828,-0.00054717232477,-0.000547692772967,-0.00054819752283,-0.000548684710703,-0.000549155719677,-0.000549615360977,-0.000550060292316,-0.000550490040661,-0.000550906619748,-0.000551313270376,-0.000551711867981,-0.000552105817825,-0.000552492919934,-0.000552868935163,-0.000553237552716,-0.000553594908232,-0.000553940803144,-0.000554278544175,-0.000554608852514,-0.000554928850083,-0.000555238553194,-0.000555535386185,-0.000555817994683,-0.000556088710946,-0.000556342465955,-0.0005565794698,-0.00055680325691,-0.000557010760383,-0.000557199918646,-0.000557369652627,-0.000557522844933,-0.000557659502419,-0.000557783508845,-0.000557894360447,-0.00055799552347,-0.000558090405354,-0.000558177589684,-0.000558260743594,-0.00055834038833,-0.000558417960547,-0.000558489837047,-0.000558558320429,-0.000558618814911,-0.0005586687724,-0.000558709423065,-0.000558739714515,-0.000558765474993,-0.000558781050251,-0.000558783297302,-0.000558774859081,-0.000558756825896,-0.000558729208255,-0.000558689419978,-0.000558641380205,-0.000558583922449,-0.000558515887816,-0.000558434159702,-0.000558334753399,-0.000558218072669,-0.000558083049884,-0.000557927168181,-0.000557749523565,-0.000557551443972,-0.00055733694407,-0.000557106703389,-0.000556859722832,-0.000556596142245,-0.000556317278821,-0.000556027544304,-0.000555727930976,-0.000555420430902,-0.000555106591619,-0.000554789520637,-0.000554467732217,-0.000554135779176,-0.000553795030061,-0.000553444048455,-0.00055308593641,-0.000552722105833,-0.000552348364718,-0.000551965929415,-0.000551570856295,-0.000551159547344,-0.00055073029379,-0.000550288748394,-0.000549837042514,-0.000549372399743,-0.000548895395499,-0.000548404427563,-0.000547902756711,-0.000547391039036,-0.0005468673676,-0.000546337122923,-0.000545799209538,-0.000545252357914,-0.000544691566267,-0.000544118667818,-0.000543535366824,-0.000542942868092,-0.000542337341497,-0.00054171289349,-0.000541074305555,-0.000540421828995,-0.000539753083231,-0.000539068831282,-0.000538370278912,-0.000537655918928,-0.000536926445322,-0.000536181012283,-0.000535420734355,-0.000534652218801,-0.000533874814824,-0.000533084799465,-0.000532283021096,-0.000531472029513,-0.000530652160427,-0.000529823253138,-0.000528985912611,-0.000528135321548,-0.000527273865783,-0.00052639681921,-0.000525501012144,-0.000524588915715,-0.000523660470283,-0.000522714244029,-0.000521747057994,-0.000520763758864,-0.000519764130854,-0.000518748913032,-0.000517719727756,-0.000516676445609,-0.00051562412608,-0.000514561346169,-0.000513487510083,-0.000512402798593,-0.000511311164116,-0.000510211648978,-0.000509100286411,-0.000507979005321,-0.000506847189631,-0.00050570504158,-0.000504551801065,-0.000503385812365,-0.000502210117558,-0.000501023210832,-0.000499824815891,-0.00049861255724,-0.000497387567216,-0.000496148371902,-0.000494891857399,-0.000493619838331,-0.000492332036986,-0.000491027081477,-0.000489703485315,-0.000488361063519,-0.000487001379076,-0.00048562283209,-0.000484226176875,-0.000482813479236,-0.000481386226419,-0.000479945125771,-0.000478489285352,-0.000477019023982,-0.000475533345479,-0.000474033505618,-0.00047251579515,-0.000470982834084,-0.000469435382689,-0.000467871602897,-0.000466289083558,-0.000464691104689,-0.000463074840393,-0.000461441626242,-0.000459792055708,-0.000458128467847,-0.000456454819863,-0.000454773070777,-0.000453076714422,-0.000451365956763,-0.000449644651269,-0.000447907226163,-0.000446152371849,-0.000444384063679,-0.000442602526504,-0.000440805348039,-0.000438988873836,-0.00043714710673,-0.000435284685204,-0.00043340540966,-0.000431509384807,-0.000429595872945,-0.000427668916739,-0.00042572521978,-0.000423764855508,-0.000421784992343,-0.00041978549037,-0.000417768671323,-0.000415735354856,-0.00041368309045,-0.000411608581628,-0.000409511094573,-0.000407390665453,-0.000405250248258,-0.000403088756397,-0.000400907061166,-0.000398707416017,-0.000396490549971,-0.000394256600988,-0.000392006234761,-0.000389737299129,-0.000387453691499,-0.000385155339931,-0.000382842013351,-0.000380513155482,-0.000378169020916,-0.000375807065853,-0.000373429520225,-0.000371038459934,-0.000368633341724,-0.000366215459228,-0.000363785893988,-0.000361344594575,-0.000358889178724,-0.000356420126049,-0.000353937764182,-0.000351445271235,-0.000348942321883,-0.000346427967474,-0.000343902154839,-0.000341366243504,-0.000338817276739,-0.000336254882667,-0.000333678277461,-0.000331088832256,-0.000328486528854,-0.000325869547938,-0.000323236322419,-0.000320584196448,-0.000317911673675,-0.000315217299716,-0.000312501173402,-0.000309764841027,-0.000307008646916,-0.000304234067348,-0.000301442419838,-0.000298632293923,-0.000295802760131,-0.000292955102177,-0.000290090440447,-0.000287207914305,-0.000284308850033,-0.000281395150515,-0.000278466260149,-0.000275519517372,-0.000272553281181,-0.000269566363444,-0.00026656123508,-0.000263539610815,-0.000260500377168,-0.000257448964477,-0.000254383174337,-0.000251300124916,-0.00024819840311,-0.000245057046904,-0.000241847290534,-0.000238545325792,-0.000235127297998,-0.000231457018009,-0.00022804600196,-0.000224779902494,-0.000221639480873,-0.000218607631766,-0.000215662279459,-0.000212781901342,-0.000209988063616,-0.000207310844352,-0.000204775004965,-0.000202405308222,-0.000200335896307,-0.000198055640397,-0.000195677220202,-0.00019321647594,-0.000190695564885,-0.00018813834216,-0.000185566808455,-0.000182982921823,-0.000180386004179,-0.000177775996443,-0.000175153601319,-0.000172516170206,-0.000169864142428,-0.000167199874819,-0.000164522301387,-0.000161829133143,-0.000159122818102,-0.000156402146242,-0.000153666183993,-0.000150912887552,-0.000148142960964,-0.000145353869767,-0.000142549462028,-0.000139727899037,-0.000136891145457,-0.000134040273751,-0.000131173256302,-0.000128287451538,-0.000125381666024,-0.000122457402448,-0.000119515502811,-0.000116558088472,-0.000113587256335,-0.00011060359371,-0.000107606661202,-0.000104593200062,-0.000101563542585,-9.85191489041e-05,-9.54639325047e-05,-9.2398154343e-05,-8.93215476563e-05,-8.62353945857e-05,-8.31360647572e-05,-8.00238655418e-05,-7.68978195698e-05,-7.37608828895e-05,-7.06132228518e-05,-6.7455433228e-05,-6.4284558675e-05,-6.10993241602e-05,-5.79027220815e-05,-5.46956072914e-05,-5.14795010816e-05,-4.82522752262e-05,-4.50133571757e-05,-4.17627820263e-05,-3.84981743593e-05,-3.52224495548e-05,-3.19368673748e-05,-2.86446984111e-05,-2.53433521622e-05,-2.2027896606e-05,-1.86958306418e-05,-1.53500345112e-05,-1.19924649021e-05,-8.62131017485e-06,-5.23682059152e-06,-1.83989291471e-06,1.57172087876e-06,5.00057973957e-06,8.44791372109e-06,1.19094274401e-05,1.53828462264e-05,1.88684954945e-05,2.23686046694e-05,2.5881787769e-05,2.94073878196e-05,3.29465996516e-05,3.64980163453e-05,4.00594968595e-05,4.36293967372e-05,4.72061378761e-05,5.07945267367e-05,5.43954806007e-05,5.8007304998e-05,6.16293955905e-05,6.52591934516e-05,6.88953450005e-05,7.25363759857e-05,7.61850698033e-05,7.9841307186e-05,8.35072466591e-05,8.71799365385e-05,9.08565753661e-05,9.4535700592e-05,9.82183692026e-05,0.00010190677561,0.000105603264478,0.000109305656525,0.000113014159395,0.000116728197401,0.000120446300802,0.000124165153551,0.000127886308444,0.00013161117002,0.000135339972332,0.000139070713663,0.000142801285705,0.000146533613158,0.000150269067371,0.000154007188977,0.000157746738614,0.000161493423026,0.00016524765198,0.00016900956912,0.000172777399485,0.000176551103573,0.00018032978725,0.000184114329663,0.000187901690094,0.000191694314309,0.00019549605153,0.000199305459401,0.000203118780195,0.000206934754644,0.000210752065665,0.000214572051718,0.000218397779994,0.000222231717271,0.000226074711365,0.000229923321883,0.000233773153351,0.000237620325507,0.000241464878693,0.000245308519416,0.000249152815584,0.000252999621146,0.000256846477808,0.000260690817883,0.000264529236442,0.000268361701982,0.000272192978645,0.000276023284493,0.000279855529816,0.000283689446757,0.000287523426213,0.000291354841694,0.000295181915809,0.000299003451493,0.000302817449732,0.000306624536014,0.000310421705877,0.000314207942991,0.000317984055451,0.000321745663345,0.000325495027911,0.000329230475241,0.000332954172249,0.000336668647151,0.000340379173608,0.000344085064246,0.000347786753997,0.00035148377926,0.000355174040631,0.00035885971419,0.000362540813406,0.000366216910399,0.000369890352246,0.000373559924363,0.000377219277772,0.00038086555832,0.00038449887769,0.00038812048739,0.0003917321478,0.000395337038616,0.000398931371127,0.00040251726776,0.000406090602726,0.000409648632068,0.000413191285586,0.000416724474293,0.00042024762557,0.000423761709658,0.000427263352087,0.000430749729595,0.000434216279199,0.000437659906827,0.000441080188615,0.000444476915323,0.000447853477535,0.000451208310815,0.000454539933001,0.000457844741672,0.000461123385086,0.000464375687606,0.00046760450819,0.000470815553445,0.000474010806923,0.000477190695589,0.000480356405953,0.000483503064006,0.000486630435604,0.000489741345554,0.000492837228393,0.000495916145482,0.000498981287957,0.000502027198817,0.000505052082288,0.00050805525137,0.000511032498763,0.00051398778275,0.000516923555897,0.000519841191778,0.000522738099296,0.000525615412392,0.000528473020179,0.000531308991764,0.00053412459653,0.00053691754906,0.000539689983328,0.000542443698094,0.000545173611505,0.000547878242776,0.000550556306094,0.000553205151081,0.000555827039143,0.000558422468057,0.000560990962992,0.00056353595766,0.000566056630155,0.000568548570152,0.00057101167561,0.000573446935414,0.00057585446506,0.000578237923591,0.000580592982764,0.000582918536558,0.000585216178756,0.000587485081884,0.000589725178778,0.000591938964023,0.000594129516077,0.000596295515208,0.000598433471379,0.000600543129386,0.000602624371838,0.000604681019913,0.00060670987477,0.000608708602536,0.000610676647477,0.000612611195028,0.000614511515691,0.000616376292159,0.000618212938651,0.000620023626366,0.000621806042911,0.000623557880426,0.000625280160954,0.000626974661638,0.000628642510626,0.000630285261617,0.000631902733868,0.000633494318312,0.000635056871519,0.000636583253434,0.000638078153648,0.000639542659104,0.000640977565667,0.000642379735669,0.000643747430759,0.000645080320561,0.000646380224501,0.000647647763618,0.000648880702252,0.00065008165552,0.000651246942766,0.000652371655465,0.000653455876809,0.000654498587503,0.000655500794111,0.000656462680551,0.000657381358756,0.000658254079661,0.000659081488085,0.000659865885373,0.000660607947864,0.000661311294919,0.000661974181238,0.000662596581625,0.000663178152682,0.000663719125384,0.000664216751653,0.000664673574562,0.000665090165246,0.00066546292403,0.00066579130832,0.000666075398706,0.000666317306111,0.000666518894646,0.00066668258072,0.000666806893838,0.000666893373849,0.000666945563493,0.000666960881809,0.000666939069507,0.000666882232689,0.000666790389063,0.000666662037824,0.000666496078681,0.000666291567761,0.000666047999029,0.000665767283015,0.000665446054402,0.00066508505115,0.000664685789594,0.000664246210059,0.000663767767069,0.000663250286221,0.000662695892201,0.00066210291349,0.000661468946843,0.000660791271165,0.000660068206016,0.000659302314037,0.000658494594172,0.00065764884198,0.000656766267803,0.000655848339137,0.000654892416818,0.000653899146942,0.000652869470927,0.000651809304438,0.000650719704077,0.000649602446497,0.00064845707114,0.00064727917574,0.000646063692729,0.000644809490819,0.000643518060616,0.000642190242592,0.000640829152095,0.000639431895308,0.000637998257062,0.000636527819321,0.000635017920967,0.000633470183989,0.000631888556632,0.000630273169506,0.000628626251298,0.000626946347066,0.00062523263478,0.000623481704867,0.000621696864106,0.000619875033223,0.000618018643283,0.000616130181714,0.000614207784437,0.000612249530849,0.00061025506349,0.000608223480569,0.000606153199782,0.000604047267541,0.000601904389686,0.000599725136078,0.000597511888588,0.000595262258682,0.000592979164498,0.000590665242087,0.000588321602592,0.000585950787619,0.000583553616362,0.000581129218334,0.000578679301396,0.000576206189295,0.000573708316594,0.000571186393599,0.000568639249865,0.000566062990663,0.000563455902158,0.000560816754351,0.000558145960446,0.000555446876749,0.000552720212126,0.000549966834386,0.000547186009041,0.000544377068908,0.000541538567223,0.000538672291899,0.000535779887136,0.000532866379387,0.000529933576408,0.000526981480949,0.000524005995539,0.000521005740775,0.000517977713866,0.000514924124993,0.000511847112474,0.000508748806131,0.000505632273218,0.000502493935509,0.000499329617292,0.000496139129338,0.000492921543584,0.000489679161182,0.000486417326385,0.00048313805538,0.000479841132991,0.000476529770525,0.000473200392391,0.000469850484423,0.000466483613227,0.000463099935652,0.000459702258582,0.000456290608074,0.000452862993064,0.00044941450322,0.000445945308001,0.000442450917015,0.000438931517229,0.000435391022771,0.000431830274031,0.000428250143355,0.000424647924518,0.000421019836029,0.000417369300254,0.000413699124241,0.000410010943103,0.000406304102275,0.000402583516166,0.000398846953831,0.000395092947891,0.000391320022559,0.000387530018594,0.000383729252338,0.000379916355657,0.000376087620223,0.000372243240751,0.000368385155196,0.000364510303331,0.000360618711626,0.000356711761239,0.000352791983116,0.000348864931271,0.000344928988123,0.000340984866529,0.000337036599582,0.000333085519723,0.000329129827152,0.000325170962714,0.000321213900667,0.000317261304109,0.000313311682799,0.000309359738387,0.000305401644461,0.000301437719982,0.000297466548463,0.000293488474382,0.000289506573997,0.000285522130131,0.000281533146772,0.000277535637225,0.000273528786432,0.000269514936048,0.000265502515343,0.000261490321807,0.000257479668857,0.000253469079319,0.000249459254492,0.000245449731878,0.000241438414591,0.000237429092974,0.000233426216747,0.000229426813691,0.000225426127988,0.000221423370577,0.000217423086934,0.000213426597262,0.000209434898961,0.000205442416397,0.000201450783376,0.000197462825031,0.000193474168358,0.000189486480598,0.000185501054252,0.000181520259049,0.000177541630314,0.000173562653175,0.000169582375182,0.000165606598809,0.000161640666931,0.000157682121107,0.000153730866213,0.000149788846874,0.00014585565492,0.000141934443946,0.000138027675136,0.000134134864972,0.000130258347752,0.000126396335498,0.000122544752988,0.000118704507069,0.000114878127308,0.000111066531651,0.000107267273677,0.000103478511087,9.96986233838e-05,9.59277369579e-05,9.21646007175e-05,8.84109632748e-05,8.46678772779e-05,8.09346256111e-05,7.72065338541e-05,7.34857369254e-05,6.97752677665e-05,6.60788021078e-05,6.23960867671e-05,5.87279224505e-05,5.50726333463e-05,5.1433217441e-05,4.78057431952e-05,4.4191085716e-05,4.05937282639e-05,3.70161587074e-05,3.34559586354e-05,2.99089503285e-05,2.63723663892e-05,2.2845104592e-05,1.93316947088e-05,1.58301465036e-05,1.23427181993e-05,8.86969453962e-06,5.41130712213e-06,1.96379851953e-06,-1.47467755932e-06,-4.90236409987e-06,-8.31677579955e-06,-1.17126805611e-05,-1.50914952773e-05,-1.8454702413e-05,-2.18020730499e-05,-2.51347923028e-05,-2.84533780725e-05,-3.17617319033e-05,-3.50571640003e-05,-3.83378244042e-05,-4.16050029747e-05,-4.48612827865e-05,-4.81090140454e-05,-5.13470443371e-05,-5.45755195795e-05,-5.77917646146e-05,-6.09965859441e-05,-6.41855980863e-05,-6.73539233525e-05,-7.0503305593e-05,-7.36319273021e-05,-7.67399365643e-05,-7.98244516601e-05,-8.28839452645e-05,-8.59186394508e-05,-8.89313341798e-05,-9.19172420408e-05,-9.4875494605e-05,-9.7810796316e-05,-0.000100726651609,-0.000103622710667,-0.000106501459087,-0.00010936110849,-0.000112203622719,-0.000115027895668,-0.000117830696066,-0.000120613961751,-0.000123381443647,-0.000126131447046,-0.000128861228234,-0.000131569401633,-0.000134254267372,-0.000136914596131,-0.000139555423786,-0.00014217834385,-0.000144784352634,-0.000147376677217,-0.000149953005442,-0.000152514574971,-0.000155062778379,-0.000157595199804,-0.000160113220621,-0.000162621527082,-0.00016511285181,-0.000167579460507,-0.00016981286937,-0.000171607941396,-0.000172956314512,-0.000173853636378,-0.000174300461159)
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(308)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Canis_familiaris-male-liver-H3K4me3-ERR572190.50mers.unique.MACS2_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 308',bty='n')
dev.off()